微機(jī)原理課設(shè)-霓虹燈的模擬顯示(編輯修改稿)
2024-10-06 10:59 本頁面
【文章內(nèi)容簡介】 39。Code39。 ASSUME SS:STACK,DS:DATASEG,CS:CODESEGMAIN PROC FAR MOV AX,DATASEG MOV DS,AXCALL CLEAR 。調(diào)用清屏子程序 MA 8,0 。歡迎界面的出現(xiàn)位置 WAT0: LEA DX,MENU 。輸入S進(jìn)入霓虹燈顯示 MOV AH,9 INT 21H MOV AH,1 INT 21H CMP AL,39。S39。 CALL CLEAR 。如果輸入的不是S就清屏 MA 8,0 JNZ WAT0 PUSH AX 。入棧 PUSH BX PUSH CX PUSH DX MOV ROW,24 。完成矩形框的左豎行 MOV COLUME,0 LOP3: CALL CURSOR 。調(diào)用設(shè)置光標(biāo)位置 MOV AL,24H 。把$的ASCII 碼傳遞給AL MOV BL,0BH 。設(shè)置字符屬性 PUSH CX 。入棧 MOV CX,1 。字符顯示1次 MOV AH,09H INT 10H POP CX 。出棧 CALL DELAY1 。調(diào)用延時 DEC ROW 。行坐標(biāo)減1 CMP ROW,0 。若行坐標(biāo)大于0就跳轉(zhuǎn)到lop3否則執(zhí)行下個程序 JNZ LOP3 MOV ROW,0 MOV COLUME,0 。完成矩形框的上行 LOP1: CALL CURSOR MOV AL,24H MOV BL,0BH PUSH CX MOV CX,1 MOV AH,09H INT 10H POP CX CALL DELAY1 INC COLUME CMP COLUME,79 JNZ LOP1 MOV ROW,0 MOV COLUME,79 。完成矩形框的右豎行 LOP2: CALL CURSOR MOV AL,24H 。完成$的輸出 MOV BL,0BH PUSH CX MOV CX,1 MOV AH,09H INT 10H POP CX CALL DELAY1 INC ROW CMP ROW,24 JNZ LOP2 MOV ROW,24 MOV COLUME,79 。完成矩形框的下橫行 LOP4: CALL CURSOR MOV AL,24H MOV BL,0BH PUSH CX MOV CX,1 MOV AH,09H INT 10H POP CX CALL DELAY1 DEC COLUME CMP COLUME,0 JNZ LOP4 。到此矩形框已完成 MOV COLUME,0 。從上往下從左往右39。39。填充 LOP6: MOV ROW,1 INC COLUME LOP5: CALL CURSOR MOV AL,23H MOV BL,0BH PUSH CX MOV CX,1 MOV AH,09H INT 10H POP CX CALL DELAY1 INC ROW CMP ROW,24 JNZ LOP5 CMP COLUME,78 JNZ LOP6 MOV COLUME,79 。反向消失LOP7: MOV ROW,23 DEC COLUME LOP8: CALL CURSOR MOV AL,39。 39。 MOV BL,0BH PUSH CX MOV CX,1 MOV AH,09H INT 10H POP CX CALL DELAY1 DEC ROW CMP ROW,0 JNZ LOP8 CMP COLUME,1 JNZ LOP7 MOV CL,1 。消失矩形框左豎行 LOP10: MA CL,0 MOV AL,39。 39。 MOV BL,0BH PUSH CX MOV CX,1 MOV AH,09H INT 10H POP CX CALL DELAY1 INC CL
醫(yī)療健康相關(guān)推薦
鄂ICP備17016276號-1