【正文】
H,253,0,1 DB 06H,253,0,1 DB 06H,253,0,1 DB 06H,253,0,1 DB 06H,253,0,1 DB 06H,253,0,1 DB 06H,253,0,1 DB 06H,253,0,1 DB 06H,253,0,1 。P DB 06H,253,0,15 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,7,0 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,0,1 DB 06H,253,0,1 DB 06H,253,0,1 DB 06H,253,0,1 DB 06H,253,0,1 DB 06H,253,0,1 DB 06H,253,0,1 DB 06H,253,0,1 DB 06H,253,0,1 DB 06H,253,0,1 DB 06H,253,0,1 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,1,0 DB 06H,253,1,0 。UDATA ENDS 。數(shù)據(jù)段結(jié)束STACK SEGMENT DB 2000 DUP(0) 。初始化堆棧大小2000STACK ENDSCODE SEGMENT ASSUME CS:CODE,DS:DATA,SS:STACKSTART: MOV AX,DATA MOV DS,AX 。裝數(shù)據(jù)段 MOV AH,00H 。0號功能調(diào)用,設(shè)置顯示模式, MOV AL,04H 。al=04h,屬性為320*200,彩色圖形4色 INT 10H 。BIOS功能調(diào)用 CALL CLEAR_SCREEN 。調(diào)用清屏子程序 LEA DI,CAR MOV DH,10 MOV DL,2 CALL MOVE_SHAPEMOV AH,4CH INT 21HCLEAR_SCREEN PROC NEARPUSH AX PUSH BX PUSH CX PUSH DX MOV AH,06H 。初始化窗口,向上滾屏 MOV AL,0 。清窗口,黑色屏幕代碼 MOV CH,0 。(CH、CL)=窗口的左上角位置(Y坐標(biāo),X坐標(biāo)) MOV CL,0 MOV DH,120 MOV DL,200 。(DH、DL)=窗口的右下角位置(Y坐標(biāo),X坐標(biāo)) MOV BH,7 。BH=空白區(qū)域的缺省屬性 INT 10H POP DX POP CX POP BX POP AX RETCLEAR_SCREEN ENDPMOVE_SHAPE PROC NEAR PUSH AX PUSH BX PUSH CX PUSH DX PUSH DI MOV AH,0FH 。讀取顯示器模式 INT 10H 。出口參數(shù):AH=屏幕字符的列數(shù),AL=顯示模式,BH=頁碼 MOV CH,0 MOV CL,[DI] 。取字符總數(shù) INC DIMOV_CRSR: PUSH CX ADD DH,[DI+2] 。Y坐標(biāo),變量的第三位,2 ,初始值10 ADD DL,[DI+3] 。X坐標(biāo),變量的第四位,+3,初始值2 MOV AH,02H 。 用文本坐標(biāo)下設(shè)置光標(biāo)位置 INT 10H 。BH=顯示頁碼,當(dāng)前屏幕下顯示為0, DH=行(Y坐標(biāo)),DL=列(X坐標(biāo) MOV AL,[DI] 。字符 MOV BL,[DI+1] MOV CX,1 MOV AH,09H 。在當(dāng)前光標(biāo)處按指定屬性顯示字符,AL=字符,BH=顯示頁碼,BL=屬性(文本模式)或顏色(圖形模式, INT 10H 。CX=重復(fù)輸出字符的次數(shù),AH=0AH的話,只顯示字符,屬性不變 POP CX ADD DI,4 LOOP MOV_CRSR CALL DELAY POP DI POP DX POP CX POP BX POP AX RETMOVE_SHAPE ENDPDELAY PROC NEAR PUSH CX PUSH BX MOV BX,5000 L1:MOV CX,4000 L2:LOOP L2 DEC BX JNZ L1 。不為0轉(zhuǎn) POP BX POP CX RETDELAY ENDP CODE ENDS END STAR