• Author / Uploaded
• byron zuñiga

Citation preview

PAGE 60,132 TITLE P04ASM1 Operaciones de mover y sumar ;------------------STACKSG SEGMENT PARA STACK 'Stack' DW 32 DUP(0) STACKSG ENDS ;------------------DATASG SEGMENT PARA 'Data' DATO1 DB 3 DUP('0') DATO2 DB 3 DUP('0') COMENT1 DB 'INGRESE EL PRIMER NUMERO DE UN DIGITO:', '$' COMENT2 DB 'INGRESE EL SEGUNDO NUMERO DE UN DIGITO:', '$' COMENT3 DB 'LA RESPUESTA ES:','$' RESULT DB 2 DUP(0),'$' DATASG ENDS ;------------------CODESG SEGMENT PARA 'Code' BEGIN PROC FAR ASSUME SS:STACKSG,DS:DATASG,CS:CODESG MOV AX,DATASG ;se asigna direcci¢n de DATaSG MOV DS,AX ;en registro DS MOV ES,AX MOV LEA INT

AH,09H DX,COMENT1 21H

MOV MOV MOV LEA INT

AH,3FH BX,0 CX,3 DX,DATO1 21H

MOV LEA INT

AH,09H DX,COMENT2 21H

MOV MOV MOV LEA INT

AH,3FH BX,0 CX,3 DX,DATO2 21H

MOV AND

CL,DATO2 CL,0FH

MOV AND MUL AAM OR XCHG LEA MOV

AL,DATO1 AL,0FH CL

MOV LEA INT

AH,09H DX,COMENT3 21H

MOV

AH,09H

AX,3030H AH,AL SI,RESULT [SI],AX

LEA INT

DX,RESULT 21H

MOV INT

AX,4C00H 21H

BEGIN ENDP CODESG ENDS END

BEGIN

;Peticion ;Salida a DOS