Programa que imprime valores númericos con macros (Hexadecimales y decimales) CAROLINA

include 'emu8086.inc'

Mostrar Macro Mensaje
    LEA DX,Mensaje ;mandamos el mensaje a leer
    MOV AH,9 ;usamos el servicio para mostrar en pantalla
    INT 21H
endM     

Terminar Macro
    MOV AX,4C00H
    INT 21H
endM

DATOS SEGMENT
    ENCABEZADO DB 13,10,13,09h,09h,"==============================="
    DB 13,10,13,09h,09h,"PROGRAMA QUE IMPRIME VALORES NUMERICOS DEC Y HEXA "
    DB 13,10,13,09h,09h,"================================",13,10,"$"
    ALINEAR DB 13,10,13,09h,09h
    VALOR_1 DW 41D,"$"
    VALOR_2 DW 42D,"$"
    VALOR_3 DW 43D,"$"
    VALOR_4 DW 44D,"$"
    VALOR_5 DW 45D,"$"
    VALOR_6 DW 46,"$"
    VALOR_7 DW 47,"$"
    VALOR_8 DW 48,"$"
    VALOR_9 DW 49,"$"
    VALOR_10 DW 50,"$"
DATOS ENDS


valores Macro 
    Mostrar ALINEAR
    Mostrar VALOR_1
    Mostrar VALOR_2
    Mostrar VALOR_3
    Mostrar VALOR_4
    Mostrar VALOR_5
    Mostrar VALOR_6 
    Mostrar VALOR_7
    Mostrar VALOR_8
    Mostrar VALOR_9
    Mostrar VALOR_10
endM

Titulo Macro
    Mostrar ENCABEZADO
endm

CODIGO SEGMENT
ASSUME CS: CODIGO,DS:DATOS,SS:PILA
Main PROC

MOV AX,DATOS
MOV DS,AX

Titulo
valores


Main ENDP 
Terminar
CODIGO ENDS
END Main


Mejora...

include 'emu8086.inc'

Mostrar Macro Mensaje
    LEA DX,Mensaje ;mandamos el mensaje a leer 
    MOV AH,9 ;usamos el servicio para mostrar en pantalla
    INT 21H
endM       

Terminar Macro
    MOV AX,4C00H
    INT 21H
endM

DATOS SEGMENT
    ENCABEZADO DB 13,10,13,09h,09h,"==============================="
    DB 13,10,13,09h,09h,"PROGRAMA QUE IMPRIME VALORES NUMERICOS DEC Y HEXA "
    DB 13,10,13,09h,09h,"================================",13,10,"$" 
    ALINEAR DB 13,10,13,09h,09h
    VALOR_1 DW 41H,"$"
    VALOR_2 DW 42H,"$"
    VALOR_3 DW 43H,"$"
    VALOR_4 DW 44H,"$"
    VALOR_5 DW 45H,"$"
    VALOR_6 DW 46,"$"
    VALOR_7 DW 47,"$"
    VALOR_8 DW 48,"$"
    VALOR_9 DW 49,"$"
    VALOR_10 DW 50,"$"
DATOS ENDS


valores Macro   
    Mostrar ALINEAR
    Mostrar VALOR_1
    Mostrar VALOR_2
    Mostrar VALOR_3
    Mostrar VALOR_4
    Mostrar VALOR_5
    Mostrar VALOR_6    
    Mostrar VALOR_7
    Mostrar VALOR_8
    Mostrar VALOR_9
    Mostrar VALOR_10
endM

Titulo Macro
    Mostrar ENCABEZADO
endm

CODIGO SEGMENT
ASSUME CS: CODIGO,DS:DATOS,SS:PILA
Main PROC

MOV AX,DATOS
MOV DS,AX

Titulo
valores


Main ENDP   
Terminar
CODIGO ENDS 
END Main




Comentarios

Publicar un comentario

Entradas populares de este blog

Programas usando la documentación y libreria emu8086

Imagen
Hola mundo con string include 'emu8086.inc' org 100h .code printn " "  printn "hola mundo" ret Hola mundo con gotoxy include 'emu8086.inc' org 100h .code gotoxy 5,5 printn "hola mundo" ret Hola mundo con putc include 'emu8086.inc' org 100h .code gotoxy 5,5 printn "hola mundo"  putc 'A' ret Hola mundo con cursuron include 'emu8086.inc' org 100h    .code gotoxy 5,5 print "hola mundo" cursoron call scan_num define_scan_num ret Hola mundo final name 'hola mundo' include 'emu8086.inc' org 100h .code gotoxy 5,5 printn "hola mundo" gotoxy 5,6 printn "hola mundo 2" gotoxy 5,7 print "dame un numero:" call scan_num define_scan_num putc "A" ret ...
Leer más

Instrucción CMP, JE, JNE, LOOP

Imagen
Instrucción  CMP, JE, JNE, LOOP En esta ocasión introducimos un programa que incluye saltos, ciclos, este programa permite comparar una dos palabras y si estas coinciden. Código: org 100h ;directiva include 'emu8086.inc' mov si, 0 ;ponemos si en 0(asigna),el registro 'si' para poder utilizar cmp comienzo: mov al, msg2[0] ;copiar la primera letra de la palabra A al, del cmp msg[si],"$" ;si es el fin de la cadena mandar a final,compara msg con msg2 je final ; brinca si es igual ;continuar cmp msg[si], al ;comparar si encuentra la primera letra de la cadena en msg2 jne seguir ;brinca si es diferente mov di, 1 ;poner en 1 = di comprobar: mov al, msg[di] ;compara en la [?] posicion (di, inc di)msg mov bx, di ; bx = di cmp msg2[si+bx], al ;posicion de la letra coincidente di(si+bx),comparar con(al) la cadena msg jne seguir ;si no coincide mandar a seguir inc...
Leer más

Unidad 3(15 programas TASM)

Imagen
Descargar Turbo Assambler https://sourceforge.net/projects/guitasm8086/ Programas en TASM (Juan Olivares Ramirez)  El alumno apreciara el uso de los Registros de Segmento, en programas en ensamblador en la siguiente liga: https://www.dropbox.com/s/az9twlsaqfyjbee/Programas_WORDS%5B1%5D.docx?dl=0 REALIZAR LOS PRIMEROS 4 PROGRAMAS PROGRAMA 1 HOLA MUNDO CR EQU 13 LF EQU 0Ah DATOS SEGMENT      MENSAJE DB CR,LF, 'Hola Mundo este programa fue compilado por Anahi Mendoza Natal',CR,LF,'$' DATOS ENDS PILA SEGMENT STACK     DB 64 DUP('PILA') PILA ENDS CODIGO SEGMENT      HM PROC FAR      ASSUME CS: CODIGO, DS:DATOS, SS:PILA          MOV AX, DATOS     MOV DS,AX     LEA DX, MENSAJE          MOV AH,9     INT 21H          MOV AX, 4C00H     INT 21H ...
Leer más