PRÁCTICA 1

LENGUAJE ENSAMBLADOR 80386 PRÁCTICA 1
;SacaCadena/SacaCadena2 ESCRIBE CADENA A SALIDA ESTÁNDAR
;
;Entrada: DI = dirección de cadena(s)
; CX = número de caracteres a escribir (sólo SacaCadena2)
;Salida: Cadena cad copiadas al dispositivo de salida estándar
;Registros: CX (sólo para SacaCadena2)
PROC SacaCadena
call LargoCad ;Pone CX = largo de cadena
PROC SacaCadena2 ;Punto alternativo de entrada
@@10:
push ax bx di ;Salva registros a usar
mov bx,07 ;Handle para salida estándar
mov al,[di] ;DS:DX apunta a dirección de cadena
mov ah,0eh ;BIOS escribe a "teletipo"
in 10h ;Llama a DOS (retorna con AX = bytes
inc di
loop @@10 ;escritos)
pop di bx ax ;Repone registros
ENDP SacaCadena2 ;Fin de rutina alternativa
ENDP SacaCadena ;Fin de rutina normal
;NuevaLinea EMPIEZA OTRA LÍNEA EN DISPOSITIVO ESTÁNDAR
;
;Entrada: Ninguna
;Salida: Retorno de carro y nueva línea a la salida
;Registros: AH y DL
PROC NuevaLinea
mov ah,2 ;Rutina de DOS para sacar un carácter
mov dl,rc ;Pone retorno de carro en DL
int 21h ;Manda y exhibe retorno de carro
mov dl,nl ;Pone salta línea en DL
int 21h ;Manda a nueva línea
ENDP NuevaLinea
END ;fin de módulo CADENAS.ASM
El procedimiento SacaCadena llama a otro procedimiento para contar los caracteres de la
cadena a exhibir, este procedimiento nos regresa en CX el número de caracteres a exhibir.
Mediante la interrupción 10H servicio 0EH exhibimos letra por letra. La instrucción LOOP
AUTOR: PROFESOR SALVADOR SAUCEDO FLORES
EDICIÓN: PROFESOR PABLO FUENTES RAMOS
1-4