2.1. NORTON exdbad.asm -:
.286
TITLE EXDBAD (COM)
CODESG SEGMENT PARA 'Code'
ASSUME CS:CODESG,DS:CODESG,SS:CODESG,ES:CODESG
ORG 100H; PSP
BEGIN: JMP SHORT MAIN;
;-------------------------------------------------------
WORD1A DW 0123H;
WORD1B DW 0BC62H
WORD2A DW 0012H
WORD2B DW 553AH
WORD3A DW?
WORD3B DW?
;--------------------------------------------------------
MAIN PROC NEAR;
CALL D10DWD; 1
CALL E10DWD; 2
RET
MAIN ENDP
;
; ----------------------------
D10DWD PROC
MOV AX,WORD1B
ADD AX,WORD2B;
MOV WORD3B,AX
MOV AX,WORD1A
ADC AX,WORD2A;
MOV WORD3A,AX
RET
D10DWD ENDP
;
; --------------------------
E10DWD PROC
CLC;
MOV CX,2;
LEA SI,WORD1B; WORD1B
LEA DI,WORD2B; WORD2B
LEA BX,WORD3B;
E20: MOV AX,[SI];
ADC AX,[DI];
MOV [BX],AX;
DEC SI
DEC SI
DEC DI
DEC DI
DEC BX
DEC BX
LOOP E20;
RET
E10DWD ENDP
CODESG ENDS
END BEGIN
D10DWD (WORD1A WORD1B) (WORD2A WORD2B) (WORD3A WORD3B). BC62 553A. . 1.
, ADD ADC. , CF , 1.
E10DWD . . , - , . SI, DI 2. DEC . CLC -
, .
ADC E10DWD SBB.
2.2. . . DEBUG .
2.3. D CS:100 . , . CF ( NC - 0, , CY 1, ). : MOV WORD1B,AX MOV WORD3A,AX .