【文章內容簡介】 t:00C1 E550 mov a,PulseCNT00C3 70FC jnz Wait00C5 C28C clr TR000C7 020097 ljmp MLoop end 根據(jù)運行狀態(tài)的操作流程，可以確定運行操作的控制流程如圖開始鍵盤讀入一個字符Y是ESC鍵嗎？NN是數(shù)字1~8鍵嗎？返回DOSY點亮點陣Y點亮LED燈N是機內嗎？60個正弦波完了嗎？YN求出音階值保存正弦波個數(shù)計數(shù)器賦值60每個正弦波數(shù)據(jù)個數(shù)計數(shù)器賦初值取正弦波數(shù)據(jù)送DAC0832求出音階值保存Y賦相應頻率值一個正弦波完了嗎？N延時延時 圖 9程序：data segmentioport equ 0c800h0280hio8253a equ ioport+280h。8253通道0地址io8253b equ ioport+283h。8253控制字寄存器地址io8255a equ ioport+288h 。8255A口地址io8255b equ ioport+289h 。8255B口地址io8255d equ ioport+28bh。8255控制字寄存器地址io0832a equ ioport+290hproth equ ioport+2a8h 。點陣行選的地址protlr equ ioport+2b0h 。點陣列選的地址data1 db 80h,96h,0aeh,0c5h,0d8h,0e9h,0f5h,0fdh db 0ffh,0fdh,0f5h,0e9h,0d8h,0c5h,0aeh,96h db 80h,66h,4eh,38h,25h,15h,09h,04h db 00h,04h,09h,15h,25h,38h,4eh,66h。正弦波數(shù)據(jù)time db 120,106,94,89,79,70,63,59。發(fā)不同音時8253的計數(shù)器初值banquan db 0dh,0ah db 39。
*************************************************39。,0dh,0ah db 39。 **
**39。,0dh,0ah db 39。 ** WELCOME TO USE
dianziqin **39。,0dh,0ah db 39。 ** THIS PROGRAMME IS
DESIGHED BY **39。,0DH,0AH db 39。 ** zhouqiuping 61007204
**39。,0DH,0AH db 39。 **
**39。,0dh,0ah db 39。
*************************************************39。,0dh,0ah db 39。 Press 1,2,3,4,5,6,7,8,ESC:39。,0dh,0ah,39。$39。num db ? 。num為8253計數(shù)器初值的序號freq dw 262,294,330,349,392,440,494,523 。揚聲器發(fā)聲各頻率值tim dw 400data endsstack segment stack dw 256 dup(?)stack endscode segment assume cs:code,ds:datastart: mov ax,data mov ds,ax mov dx,offset banquan 。 版權顯示 mov ah,9 int 21h 。顯示提示信息sss: mov ah,7 int 21h 。等待從鍵盤接收字符,不回顯al=asc碼 cmp al,1bh je exit 。若為ESC鍵,則轉EXIT推出 cmp al,31h jl sss 。小于31h cmp al,38h 。大于38h jg sss 。不在39。139。39。839。之間轉sss sub al,31h mov num,al 。num求出相應的時間常數(shù)的序號dianzhen: mov al,0ffh 。點陣板的列全部選通 mov dx,proth out dx,al mov al,00000001 ：點陣的行賦初值 shl al,num 。根據(jù)輸入的數(shù)字，左移相應位數(shù)，即點陣亮相應行 mov num,al 。如輸入3，則num為2，左移兩位，第三行亮 mov dx,prothl out dx,alled: mov dx,io8255d mov al,99h 。設置8255A口入B口出 mov dx,io8255b out dx,num 。根據(jù)移位后的num點亮相應led燈kaiguan: mov dx,io8255a 。判斷機內機外 in al,dx 。從8255B口讀一字節(jié) test al,10b 。判斷PA0口是否為10(二進制） jz jiwai 。是的話轉實驗儀 jmp nei 。否則轉機內。jiwaijiwai: mov cx,60 。取60次32個正弦波數(shù)據(jù)ddd: mov si,0lll: mov al,data1[si] 。取正弦波數(shù)據(jù) mov dx,io0832a out dx,al 。放音 call delay 。調延時子程序 inc si cmp si,32 。是否取完32個數(shù)據(jù) jl lll 。若沒有,則繼續(xù) loop ddd ?？傃h(huán)次數(shù)60是否完,沒有,則繼續(xù) jmp sssexit: