基于51單片機簡易電子琴2-資料下載頁
2025-06-19 13:14本頁面
【正文】 g 001bh jmp tim0 org 1100hYYstart: mov tmod,00010000b setb ea setb et1 mov numtim,01h mov r6,2hYYstart0:mov 40h,00hnext: mov a,40h mov dptr,table movc a,@a+dptr mov r2,a jz end0 anl a,0fh mov r5,a mov a,r2 swap a anl a,0fh jnz sing clr tr1 jmp d1sing: dec a mov 22h,a rl a mov dptr,table1 movc a,@a+dptr mov th1,a mov 21h,a mov a,22h rl a inc a movc a,@a+dptr mov tl1,a mov 20h,a setb tr1 d1:lcall delay inc 40h jmp next end0:clr tr1 djnz r6, YYstart0 jmp main tim0:push acc push psw mov tl1,20h mov th1,21h cpl 。 pop psw pop acc retidelay: mov r7,02h d2: mov r4,180 d3: mov r3,248 djnz r3,$ djnz r4,d3 djnz r7,d2 djnz r5,delay ret table1: dw 64260,64400,64524,64580 dw 64684,64777,64820,64898 dw 64968,65030,65058,65110 dw 65157,65178,65217 table:db 82h,01h,81h,94h,84h db 0b4h,0a4h,04h db 82h,01h,81h,94h,84h db 0c4h,0b4h,04h db 82h,01h,81h,0f4h,0d4h db 0b4h,0a4h,94h db 0e2h,01h,0e1h,0d4h,0b4h db 0c4h,0b4h,04h db 00LYBF1: MOV 30H,@R0 MOV 31H,@R1 INC R0 INC R1 CLR 。調(diào)試用 SETB TR0 LCALL DELAY1 CLR TR0 LJMP LYBF1 RETDELAY1: MOV R4,25LOOP1: MOV R5,248 DJNZ R5,$ DJNZ R4,LOOP1 RET END 附錄二作品實物圖電子琴主要電路原理圖LM386音頻放大電路
黨政相關(guān)相關(guān)推薦
鄂ICP備17016276號-1