;A4-1.asm
;二進制雙精度加法運算

STACK1  SEGMENT STACK
         DW 256 DUP(?)
STACK1  ENDS

DATA SEGMENT
MES1	DB	'The result is:$'
XL	    DW  65A0H
XH	    DW  0015H
YL	    DW  0B79EH
YH	    DW  0021H
DATA	ENDS

CODE SEGMENT
	ASSUME CS:CODE,DS:DATA
START: MOV 	AX,DATA
       MOV 	DS,AX

	   MOV	DX,OFFSET MES1
	   MOV	AH,09H
	   INT	21H
	   MOV 	AX,XL
	   ADD 	AX,YL
	   MOV	BX,AX
	   MOV 	AX,XH
	   ADC 	AX,YH
	   PUSH	BX
	   CALL	SHWORD	
	   POP	BX
   	   MOV	AX,BX
	   CALL	SHWORD

	   MOV	AX,4C00H
	   INT	21H

SHWORD	PROC	NEAR
	   MOV	BL,AH
	   CALL	SHOW
	   MOV	BL,AL
	   CALL	SHOW
	   RET	
	   ENDP
		
SHOW	PROC	NEAR
	   PUSH	AX
	   PUSH	DX
	   MOV	AL,BL
	   AND	AL,0F0H			;取高4位
	   SHR	AL,4
	   CMP	AL,0AH			;是否是A以上的數
	   JB	C2		
	   ADD	AL,07H		
C2:	   ADD	AL,30H		
	   MOV	DL,AL			;show character 
	   MOV	AH,02H
	   INT	21H
	   MOV	AL,BL
	   AND	AL,0FH			;取低4位
	   CMP	AL,0AH
	   JB	C3
	   ADD 	AL,07H
C3:	   ADD	AL,30H
	   MOV	DL,AL			;show character 
	   MOV	AH,02H
	   INT	21H
	   POP	DX
	   POP	AX
	   RET
	   ENDP	
CODE ENDS
       END START