5语言程序设计资料.pptVIP

MOV CX,NUM1 CLC MOV SI,0 LOOP1: MOV AL,DS:[BP][SI] ADC AL, [BX][SI] DAA MOV [BX][SI],AL INC SI LOOP LOOP1 MOV CX,NUM2 LOOP2: JNB DONE MOV AL,0 ADC AL, [BX][SI] DAA MOV [BX][SI],AL INC SI LOOP LOOP2 DONE: MOV AH, 4CH INT 21H MULT1 ENDS END START MULT1 SEGMENT ASSUME CS:MULT1,DS:ADD_DATA START: MOV AX,ADD_DATA MOV DS,AX LEA BX,SECOND LEA BP, FIRST MOV AX, NUM2 CMP AX, NUM1 JAE NUM2_BIGGER XCHG AX,NUM1 XCHG AX,NUM2 XCHG BX,BP NUM2_BIGGER: MOV CX,NUM2 SUB CX,NUM1 MOV NUM2,CX ADD_DATA SEGMENT FIRST DB 11H,22H,33H NUM1 DW $-FIRST SECOND DB 99H,88H,77H,66H,55H NUM2 DW $-SECOND ADD_DATA ENDS 5-13 两个数值长度(所占字节数)不一样的压缩型BCD码的加法程序。比如说一个数占五个字节,另一个数占3个字节。 MOV CX, NUM1 ADD CX, NUM2 MOV SI, CX LOOP3: DEC SI MOV DL, [BX][SI] AND DL, 0F0H SHR DL,1 SHR DL,1 SHR DL,1 SHR DL,1 OR DL, 30H MOV AH, 02H INT 21H MOV DL,[BX][SI] AND DL, 0FH OR DL, 30H MOV AH, 02H INT 21H LOOP LOOP3 例；编一数据块传送子程序。 根据题意，该子程序有三个输入参数： （1）源数据块首地址 （2）目的数据块首地址 （3）传送的数据块的长度 现在我们采用寄存器传递参数的方法设计该子程序 DATA SEGMENT SOUCE DB …… LENT EQU $-SOUCE DEST DB LENT DUP(?) DATA ENDS STAK SEGMENT PARA STACK ‘STAK’ SPINT DB 100 DUP(?) STAK ENDS CODE SEGMENT ASSUME DS:DATA,CS:CODE,SS:STAK MAIN PROC FAR START: PUSH DS XOR AX,AX PUSH AX MOV AX,DATA MOV DS,AX MOV SI,OFFSET SOUCE MOV DI，OFFSET DEST MOV CX，LENT CALL MOVTOR ┇ RET ；子程序名：MOVTOR ；功能：完成数据块的传递 ；输入参数：SI源数据块首地址 DI目的数据块首地址 CX数据块长度 ；输出参数：在内存单元DEST开始存放传送的数据 ；******** MOVTOR PROC NEAR PUSH AX ；寄存器保护 PUSH BX PUSH DX LOP1： MOV AL，[SI] MOV [DI]，AL；完成数据传递 INC SI INC DI ；修改地址 LOOP LOP1 POP DX ；寄存器恢复 POP BX POP AX RET ；返回 MOVTOR ENDP DATA SEGMENT SOUCE DB …… LENT EQU $-SOUCE DEST DB LENT DUP(?) DATA ENDS STAK SEGMENT SPIONT DB 100 DUP(?) STAK ENDS CODE SEGMENT ASSUME DS:DATA,CS:CODE,SS:STAK MAIN PROC FAR MOV AX,DATA MOV DS,AX MOV SI,OFFSET SOUCE MOV