;利用汇编语言程序结构例三(子程结构) 用二进制显示中断向量表中数据D0H的个数 key EQU0D0H;用符号表示常量(关键字) code SEgMent ;代码段开始 ;用二进制显示BX内容子程 ASSUME CS: code begin: MOV AX. 0000H display proc MOV DS. AX MOV CX.16 MOV SI 0000H rotate: ROL BX. 1 MOV CX.0400H MOV DL BL MOV BX. 0 AND DL OIH MOⅤAL,key ADD DL 30H next: CMP I SI, AL MOV AH. 2H JNZ point INT 21H INC BX LOOP rotate point: INC SI RET 子程返回 LOOP next display ENDP CALL display;调用显示子程 code ENDs ;代码段结束 MOAH,4CH;返回DOS INT 21H end begin;指示程序结束和 ;程序入口5 ;利用汇编语言程序结构例二（子程结构） ;用二进制显示中断向量表中数据D0H的个数 key EQU 0D0H ;用符号表示常量(关键字) code SEGMENT ;代码段开始 ASSUME CS:code begin: MOV AX , 0000H MOV DS , AX MOV SI , 0000H MOV CX , 0400H MOV BX , 0 MOV AL , key next: CMP [ SI ] , AL JNZ point INC BX point: INC SI LOOP next CALL display ; 调用显示子程 MOV AH, 4CH ; 返回DOS INT 21H ;用二进制显示BX内容子程 display PROC MOV CX , 16 rotate: ROL BX , 1 MOV DL , BL AND DL , 01H ADD DL , 30H MOV AH , 2H INT 21H LOOP rotate RET ;子程返回 display ENDP code ENDS ;代码段结束 END begin ;指示程序结束和 ;程序入口