【正文】 1H AddrC DW 0E802H AddrCTL DW 0E803H c0 db 0edh c1 db 21h c2 db 0f4h c3 db 0f1h c4 db 39h c5 db 0d9h c6 db 0ddh c7 db 61h c8 db 0fdh c9 db 0f9hDAT ENDSSTA SEGMENT STACK DB 100H DUP (?)STA ENDSCOD SEGMENT ASSUME CS:COD,DS:DAT,SS:STASHOW MACRO X,Y MOV AL,X MOV DX,AddrB OUT DX,AL MOV AL,Y MOV DX,AddrA OUT DX,AL ENDMSTOP: MOV DX,AddrB MOV AL,0 OUT DX,AL MOV AH,4CH INT 21HSTART: MOV AX,DAT MOV DS,AX MOV AX,STA MOV SS,AX MOV AL,80H MOV DX,AddrCTL OUT DX,ALDISPLAY: MOV DX,0E8E0H IN AL,DX MOV AH,AL。AH IS A COPY OF AL AND AH,80H CMP AH,80H JNZ STOP。BIT7=0 FOR STOP AND AL,01H CMP AL,01H JZ LZA。BIT0=1 FOR LZALDD: SHOW 01H,c2 。2 CALL DELAY SHOW 02H,c1 。1 CALL DELAY SHOW 04H,c0 。0 CALL DELAY SHOW 08H,c7 。7 CALL DELAY SHOW 10H,c8 。8 CALL DELAY SHOW 20H,c0 。0 CALL DELAY JMP DISPLAYLZA: SHOW 01H,c2 。2 CALL DELAY SHOW 02H,c1 。1 CALL DELAY SHOW 04H,c0 。0 CALL DELAY SHOW 08H,c7 。7 CALL DELAY SHOW 10H,c7 。7 CALL DELAY SHOW 20H,c5 。5 CALL DELAY JMP DISPLAY。DELAY FOR 1MSDELAY PROC MOV CX,50OUTER: PUSH CX MOV CX,4000INNER: LOOP INNER POP CX LOOP OUTER RETDELAY ENDPCOD ENDS END START四、實(shí)驗(yàn)結(jié)果2（6位數(shù)碼管動(dòng)態(tài)顯示）程序說(shuō)明在數(shù)碼管上動(dòng)態(tài)顯示“HELLO”，4種速度可調(diào)、暫停、退出。①4種速度，由SW4~SW5控制SW5 SW4速度計(jì)數(shù)周期0 01倍速1*1FH0 11/2倍速2*1FH1 01/4倍速4*1FH1 11/6倍速6*1FH②暫停，由SW6控制（執(zhí)行程序前必須置SW6=1）SW6=1 運(yùn)行SW6=0 暫停③退出，由SW7控制（執(zhí)行程序前必須置SW7=1）SW7=1 運(yùn)行SW7=0 退出（返回DOS）流程圖源代碼DAT SEGMENT AddrA DW 0E800H AddrB DW 0E801H AddrC DW 0E802H AddrCTL DW 0E803H MESG DB 0,0,0,0,0,0,3DH,0DCH,8CH,8CH,0EDH,0 POINT DW MESGDAT ENDSSTA SEGMENT STACK DW 100H DUP (?)STA ENDS COD SEGMENT ASSUME CS:COD,DS:DAT,SS:STA SHOW MACRO X,Y MOV AL,X MOV DX,AddrB OUT DX,AL MOV AL,Y MOV DX,AddrA OUT DX,AL ENDM START: MOV AX,DAT MOV DS,AX MOV AX,STA MOV SS,AX MOV AL,80H。A/B/C IN MODE 0, OUTPUT MOV DX,AddrCTL OUT DX,AL MOV SI,POINT MOV BX,POINT ADD BX,7 DISPLAY: MOV DX,0E8E0H IN AL,DX AND AL,30H ROL AL,1 MOV CX,1FH OR CL,AL 。MOV CX,83。 (*6)=SCAN: SHOW 01H,[SI] CALL DELAY1MS SHOW 02H,[SI+1] CALL DELAY1MS SHOW 04H,[SI+2] CALL DELAY1MS SHOW 08H,[SI+3] CALL DELAY1MS SHOW 10H,[SI+4] CALL DELAY1MS SHOW 20H,[SI+5] CALL DELAY1MS MOV DX,0E8E0H IN AL,DX MOV AH,AL。AH IS A COPY OF AL AND AL,80H CMP AL,80H JNZ STOP。IF BIT7=0 THEN STOP LOOP SCAN AND AH,40H CMP AH,40H JNZ NONINC。IF BIT6=0 THEN PAUSE, NONINC SI INC SINONINC: CMP SI,BX JZ NEXT JMP DISPLAYNEXT: MOV SI,POINT JMP DISPLAYDELAY1MS PROC PUSH CX MOV CX,50OUTER: PUSH CX MOV CX,4000INNER: LOOP INNER POP CX LOOP OUTER POP CX RETDELAY1MS ENDPSTOP: MOV AL,0 MOV DX,AddrA OUT DX,AL MOV DX,AddrB OUT DX,AL MOV AH,4CH INT 21HCOD ENDS END START五、實(shí)驗(yàn)結(jié)果（擴(kuò)展部分）程序說(shuō)明采用 行反轉(zhuǎn)法識(shí)別閉合鍵，把兩次讀取到的值相或； 16個(gè)按鍵分別對(duì)應(yīng)于16個(gè)這樣的值，依數(shù)值大小存成ARRAY數(shù)組；把向或得到的值與數(shù)組中的值比較，用在數(shù)組中的偏移量確定該按鍵所對(duì)應(yīng)的數(shù)值。在讀取到按鍵鍵盤(pán)輸入后，循環(huán)讀取按鍵鍵盤(pán)直到按鍵被釋放，以實(shí)現(xiàn)防抖。按鍵鍵盤(pán)上，C鍵清除所有輸入，D鍵清除最近一個(gè)輸入，E鍵退出程序，返回DOS。流程圖源代碼DATA SEGMENT ID DB 6 DUP(0) ARRAY DB 11100111B,11101011B,11101101B,11101110B DB 11010111B,11011011B,11011101B,11011110B DB 10110111B,10111011B,10111101B,10111110B DB 01110111B,01111011B,01111101B,01111110B KEY DB 0EDH,21H,0F4H,0F1H,39H 。0~5 DB 0D9H,0DDH,61H,0FDH,0F9H 。6~9 DATA ENDS 。STACK SEGMENT STACK 39。STACK39。 DB 100 DUP(0)STACK ENDS 。CODE SEGMENT ASSUME DS:DATA,CS:CODE,SS:STACK 。 MAIN PROC FAR MOV AX,DATA MOV DS,AX MOV ES,AX MOV DX,0E823H MOV AL,16H OUT DX,ALCLEAR:XOR DX,DX 。 Record how many digits has been stored MOV CX,6 MOV AL,0 XOR SI,SILOPC: MOV ID[SI],AL 。Clear all ID value INC SI LOOP LOPCDELETE: CMP DX,0 。Do nothing if no digit JE NEXT DEC DX 。Digits number decrease one MOV AL,0 MOV SI,DX MOV ID[SI],AL NEXT: CAL