第4章 汇编语言子程序和循环程序设计举例.ppt

DATA SEGMENT B1 DB B2 DB 20 DUP(?) D1 DB 10 DUP(?) DATA ENDS STACK SEGMENT DW 200 DUP(?) STACK ENDS CODE SEGMENT ASSUME CS:CODE,DS:DATA,SS:STACK ORG 1000H BEGIN:MOV AX,DATA MOV DS,AX MOV AX,STACK MOV SS,AX MOV SP,200 ；功能：将8位二进制数转换成相应的ASCⅡ码字符串 ；AL为被转换的二进制数 ；ASCⅡ码存放到BX为首的地址中 SUB1 PROC PUSH CX PUSH DX MOV CX，8 L1： MOV DL,0 SHL AL,1 RCL DL,1 OR DL,30H MOV [BX]，DL INC BX LOOP L1 MOV BYTE PTR[BX]，’B’ POP DX POP CX RET SUB1 ENDP SUB3 PROC MOV AH，2 INT 21H RET SUB3 ENDP CODE ENDS END BEGIN DSEG SEGMENT DATA DB 80，85，86，71，79，96 DB 83，56，32，66，78，84 DSEG ENDS CODE SEGMENT ASSUME DS：DSEG，CS：CODE start: MOV AX ,DSEG MOV DS , AX MOV SI,OFFSET DATA MOV CX ,9 【例3 】试编一程序，求三个带符号字数据中的最大值，并将最大值存入MAX字单元中。 设三个带符号数分别在三个字变量X、Y、Z中存储。 程序如下： DATA SEGMENT X DW 00ABH Y DW –5 Z DW 200 MAX DW ？ DATA ENDS * 【例1】将8位二进制数转换成十进制数（BCD码），并在显示器上显示出计算式。 MAIN: MOV AL,B1 MOV BX,OFFSET B2 CALL SUB1 MOV AL,B1 MOV BX,OFFSET D1 CALL SUB2 MOV CX，9 MOV BX，OFFSET B2 M1：MOV DL，[BX] CALL SUB3 INC BX LOOP M1 MOV DL，‘＝‘ CALL SUB3 MOV CX，3 MOV BX，OFFSET D1 M2：MOV DL，[BX] OR DL，30H CALL SUB3 INC BX LOOP M1 MOV AH，4CH INT 21H ；功能：将二进制数转换为未压缩型BCD 码 ；入口参数 AL为二进制数 ；出口参数 BX为存放BCD码的首地址