【文章內容簡介】 PUSH AX MOV AL, AH CALL DISP1 POP AX CALL DISP1 POP DX POP CX POP BX RET DISP ENDP GETNUM PROC NEAR 。字符匹配程序 PUSH CX REGET: XOR DX, DX GGG: MOV AH, 01H INT 21H CMP AL, 0DH JZ PPP CMP AL, 20H JZ PPP SUB AL, 30H JB KKK CMP AL, 0AH JB GETS CMP AL,11H JB KKK SUB AL, 07H CMP AL, 0FH JBE GETS CMP AL, 2AH JB KKK CMP AL, 2FH JA KKK SUB AL, 20H GETS: MOV CL, 04H SHL DX,CL 12 XOR AH, AH ADD DX ,AX JMP GGG KKK: CRLF MOV AH, 09H MOV DX,OFFSET ERROR INT 21H JMP REGET PPP: PUSH DX CRLF POP DX POP CX RET GETNUM ENDP CODE ENDS END START 程序運行 結果 輸入 N 的值，然后再回車。結果如圖 13 的階乘流程圖 三 .硬件中斷時鐘設計 概述 本設計是利用 Masm for window 集成實驗環(huán)境來實現的，編寫程序，利用主機內的 8253/82542 的計數器 0產生 10ms 對稱方波輸出，該輸出送至 IRQO 使 8259A 每 10ms 產生一次中斷， 100 次中斷后秒數加 1，通過計數器值 count 自減，即從 100 自減到 0 為止，即是 100*10ms=1s，只有當 count數值減到 1 時，才是 1s 的時間， 通過秒值 +1，重復操作秒個位和“ 9”比較：如果為真，返回 DOS顯示當前時間的數值 。如果為假，即是進位后秒十位加 1 操作而個位清零操作，并在 DOS 窗口下進行輸出顯示。 14 源程序 。FILENAME: 。內容 : 硬件中斷時間顯示 8253 10MS INTERRUPT PAGE 60,78 STACK SEGMENT PARA STACK 39。STACK39。 DB 256 DUP(0) STACK ENDS DATA SEGMENT PARA PUBLIC 39。DATA39。 COUNT DB 100 TENH DB 39。239。 HOUR DB 39。3:39。 TENM DB 39。539。 MINUTEDB 39。939。 DB 39。:39。 TENS DB 39。539。 SECOND DB 39。039。, 0DH ,39。$39。 DATA ENDS CODE SEGMENT PARA PUBLIC 39。CODE39。 START PROC FAR ASSUME CS:CODE PUSH DS MOV AX,0 PUSH AX MOV AH, 01H 。等待鍵按下， AL=字符的 ASCII 碼 INT 21H CLI CLD MOV AX, 0000H MOV DS, AX MOV SI, 0020H 。DS： SI 指向 08H 中斷向量 LODSW 。取 08 中斷入口的偏移地址 MOV BX,AX LODSW 。取 08 中斷入口段地址 PUSH AX 。壓棧保護 PUSH BX MOV AX,DATA 。建立數據段的可尋址性 MOV DS, AX ASSUME DS:DATA MOV AX, 0000H MOV ES, AX MOV DI, 0020H 。ES： DS 指向 08 中斷 向量存放地址 MOV AX,OFFSET TIMER 15 STOSW 。寫入偏移地址 MOV AX,CS STOSW 。寫入段地址 MOV AL,00110110B 。8253 初始化， 0 通道， 3 方式， HEX OUT 43H,AL MOV AX,11932 。初值＝ 11932 OUT 40H, AL MOV AL ,AH OUT 40H, AL IN AL,21H 。讀 8259 的中段屏蔽寄存器 IMR PUSH AX 。壓棧保護 MOV AL, 0FCH STI FOREVER: MOV DL,0FFH 。有鍵按下嗎 ? MOV AH, 06H INT 21H JZ DISP 。無鍵按下則轉顯示 DISP CMP AL, 20H 。是空格鍵嗎 ? JZ EXIT 。是則退出 DISP: MOV DX, OFFSET TENH 。不是則顯示時間 MOV AH, 09H INT 21H MOV AL, SECOND 。取秒單元值 WAITCHA: CMP AL,SECOND 。改變否 ? JZ WAITCHA 。沒變則等待 JMP FOREVER 。變則轉 FOREVER EXIT: CLI 。有空格鍵按下退出 CLD POP AX OUT 21H,AL ?；謴?IMR MOV AL, 36H 。8253 初始化， 55ms