;利用汇编语言程序结构例三(子程结构) 用二进制显示中断向量表中数据D0H的个数 key EQU ODOH 用符号表示常量关键字):用二进制显示BX内容子程 code SEgMent ;代码段开始 display proc ASSUME CS: code MOV CX. 16 begin: MOV AX, 0000H rotate ROL BX. 1 MOV DS. AX MOV DL. BL MOV SI 0000H AND DL OIH MOV CX.0400H ADD DL 30H MOV BX. 0 MOV AH 2H MOV AL, key NT 21H next: CMP SI, AL LOOP rotate JNZ point RET ;子程返回 INC BX display endp point: INC SI code ENDS 代码段结束 LOOP next eNd begin;指示程序结束和 CALL display;调用显示子程 程序入口 MOV AH,4CH;返回DOS INT 21H7 ;利用汇编语言程序结构例二（子程结构） ;用二进制显示中断向量表中数据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 ;指示程序结束和 ;程序入口