【正文】 36。 本次實(shí)驗(yàn)也是本學(xué)期最后一次實(shí)驗(yàn)，也是我們學(xué)到的最多的一次實(shí)驗(yàn)。在對每一個(gè)版本改進(jìn)的過程中，我都逐漸加深了對匯編語言的理解，鍛煉了匯編編程及應(yīng)用的能力。 CODE ENDS END MAIN五、實(shí)驗(yàn)總結(jié) 本次實(shí)驗(yàn)綜合了前兩次實(shí)驗(yàn)所有學(xué)習(xí)到的東西，我了解并熟悉了實(shí)驗(yàn)臺的結(jié)構(gòu)、功能、使用方法；掌握8253計(jì)數(shù)器和定時(shí)器運(yùn)用的基本方法；熟練掌握Debug及編寫匯編程序。Keep info in AL for SCASB POP DX RET READ ENDP。Read Row info MOV BL,AL MOV DX,0E803H MOV AL,88H OUT DX,AL MOV AL,00H MOV DX,0E802H OUT DX,AL IN AL,DX 。Unknown state, terminate the program.EXIT:MOV AX,4C00H INT 21HCLEAR2: JMP CLEARMAIN ENDP 。CMP DX,6 。Store the input number to memory. 。MOV SI,DX 。Yes:begin to judge the key. MOV DX,0E820H XOR AL,AL OUT DX,AL POP DX 。No:wait until it is released。Key pressed! push AX CALL SCAN MOV AL,NUM[DI] MOV CAT[0],AL pop ax CMP AL,0FFH 。Counter 0 OUT DX,AL 。 ADD DI,7 MOV AL,MID[DI] MOV CAT[1],0 。ADD DI,14 MOV AL,HIG[DI] MOV CAT[1],3DH 。Key E means Exit the program. JMP NEXT ISNUM: PUSH DX MOV DX,0E8E0H IN AL,DX AND AL,03H CMP AL,01H JE PLOU CMP AL,02H JE PHIG JMP PMIDPLOU: MOV AL,LOU[DI] PUSH AX 。reserve for future use. CMP DI,12 JE CLEAR 。Is the key 0~7? JBE ISNUM 。Usually this is not going to 。Set DF direction: DI + 1 DI MOV CX,16 MOV DI,OFFSET ARRAY REPNZ SCASB 。No Key pressed ? JE NEXT 。Display notes, can display 6 a time CALL READ 。Record how many digits has been stored MOV CX,6 MOV AL,0 XOR SI,SILOPC: MOV CAT[SI],AL 。 SCAN PROC PUSH SI MOV SI,Offset CAT 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 POP SI RETSCAN ENDP MAIN PROC FAR MOV AX,DATA MOV DS,AX MOV ES,AX MOV DX,0E823H 。 。 。 DB 100 DUP(0)STACK ENDS 。STACK SEGMENT STACK 39。6~9 。Char code 0~9 NUM DB 0EDH,21H,0F4H,0F1H,39H 。Store input note char。按鍵鍵盤1~7對應(yīng)音符1~7，按鍵E退出返回DOS，按鍵C清除（保留）。 CODE ENDS END MAIN四、實(shí)驗(yàn)結(jié)果2（擴(kuò)展部分）程序說明能播放不同音符（1~7）和音階（高中低），SW0=1 SW1=0時(shí)低音，SW0=0 SW1=1時(shí)高音，其他情況中音。Reset 8255A MOV DX, 0E801H OUT DX, AL MOV DX, 0E800H OUT DX, AL MOV AH,4CH 。Or go on to playOVER:MOV DX, 0E823H 。Keyboard pressed, quit program LOOP LOP 。Next note MOV AH,0BH 。Music on CALL RHYME 。Read note/rhyme/tone CALL DISP 。s length XOR BX,BX 。initialize 8255 MOV DX,0E803H OUT DX,AL PLAY:MOV CX,LEN 。Initialize 8253 MOV AL,00010110B 。 MAIN: 。Get note char OUT DX,AL MOV AL,00000001B 。Display note being played MOV DX,0E800H MOV AL,BOK[BX] 。Rhyme, delay time in AX RETRHYME ENDP。Control rhyme MOV AL,TRHY MOV AH,0FFH 。Save counter/timer number RET READ ENDP 。Save rhyme MOV AL,TON[BX] CMP AL,1 JE ISLOW CMP AL,2 JE ISMID CMP AL,3 JE ISHIGISLOW:MOV AL,LOU[SI] 。BX is the order in BOK/RHY/TON XOR AH,AH MOV SI,AX DEC SI MOV TBOK,AL 。 READ PROC 。Use Counter 0 OUT DX,AL 。MUSIC MACRO 。control time for dAX, 0FFH*188H for 。AX=TRHY*0FFH LOPA: MOV CX,0FFFFHLOPC: NOP LOOP LOPC 。CODE SEGMENT ASSUME DS:DATA,CS:CODE,SS:STACK 。STACK39。never used TRHY DB 0 COUNT DB 0DATA ENDS。12Three beat. RHY DB 4,2,2,2,2 DB 4,4,4 DB 4,2,2,2,2 DB 4,4,4 DB 4,2,2,2,2 DB 4,2,2,2,2 DB 4,2,2,2,2 DB 12 DB 4,2,2,2,2 DB 4,4,4 DB 4,2,2,2,2 DB 4,4,4 DB 4,2,2,2,2 DB 4,2,2,2,2 DB 4,2,2,2,2