80＊86汇编语言程序设计 第2版 作者 马力妮 第6章 子程序设计.pptVIP

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * ；子程序CLEAR：直接写屏幕缓冲区，清屏。；入口参数： 无；出口参数： 无CLEAR PROC NEAR ；直接写屏幕缓冲区，清屏 PUSH ES ；保护现场 PUSH DI PUSH CX MOV AX，0B800H MOV ES，AX ；显示缓冲区的段地址 MOV DI，0 ；偏移地址初值为0。 MOV AX，7020H ；颜色为白底，屏幕为空。 MOV CX，2000 ；个数为25*80 REP STOSW ；利用AX值填写显示缓冲区。 POP CX ；恢复现场 POP DI POP ES RETCLEAR ENDP ；子程序OUTPUT：显示输出子程序。；入口参数： 无，把POSITION中的4个随机数显示在屏幕上；出口参数： 无OUTPUT PROC NEAR ；显示输出。 PUSH BX ；保护现场 PUSH CX PUSH DXAGAIN： MOV CX，4 LEA BX，POSITIONNEXT1： MOV AH，01H  INT 16H ；键盘输入的中断。 JZ NEXT2 ；判断是否有键按下? MOV AH，0h ；有键按下，取该键的字符码。 INT 16h CMP AL，1Bh ；按下ESC键，则退出该程序 JZ EXIT NEXT2： MOV AX，[BX+8] ；取已存放的随机数 MOV DL，10 DIV DL ；转换为10进制数。 ADD AX，3030H ；转换为ASCII码。 MOV DH，AH MOV DL，AL ；先显示对应的数字的高位。 MOV AH，2 INT 21H MOV DL，DH ；显示对应的数字的低位。 INT 21H MOV DL，20H ；空格 INT 21H INC WORD PTR [BX+8] ；将当前随机数加1。 CMP WORD PTR [BX+8]，100 ；是否两位数范围内？ JB NEXT3 MOV WORD PTR [BX+8]，0 ；大于99，则赋为零。NEXT3： ADD BX，2 ；取下一随机数处理。 LOOP NEXT1 ；分别在屏幕上显示四个数。 CALL CRLF ；回车，换行。 CALL DELAY ；延时一段时间，稳定显示。 JMP AGAINEXIT： POP DX