shengrkuaile.asm

生日快乐 或许人人都会唱 但是要用汇编编出来写进单片机就不是很容易的事情。看看已经通过的程序吧。

;祝你生日快乐 测试成功 p3.4口输出


ORG 0000H
LJMP MAIN
ORG 000BH
AJMP TIM0
MAIN:MOV TMOD ,#1
MOV IE,#10000010B

S0:MOV 30H,#0

NEXT:MOV A,30H
MOV DPTR ,#TAB
MOVC A,@A+DPTR
MOV R2,A
JZ END0
ANL A,#0FH
MOV R5,A
MOV A,R2
SWAP A
ANL A,#0FH
JNZ SG
CLR TR0
AJMP SG1

SG:DEC A
MOV 22H ,A
RL A
MOV DPTR ,#TAB1
MOVC A,@A+DPTR
MOV TH0,A
MOV 21H,A
MOV A,22H
RL A
INC A
MOVC A,@A+DPTR
MOV TL0,A
MOV 20H,A
SETB TR0

SG1:LCALL DEL
INC 30H
AJMP NEXT

END0:CLR TR0
AJMP S0

TIM0:PUSH ACC
PUSH PSW
MOV TL0,20H
MOV TH0,21H
CPL P3.4
POP PSW
POP ACC
RETI

DEL:MOV R7,#2
D2:MOV R4,#125
D3:MOV R3,248
DJNZ R3,$
DJNZ R4,D3
DJNZ R7,D2
DJNZ R5,DEL
RET
TAB1:DW 64140,64216,64360,64489,64603,64655,64751,64837
     DW 64876,64948,65012,65070,64934
TAB:DB 82H,01H,81H,94H,84H,0B4H,0A4H,04H,82H,01H,81H,94H,84H
    DB 0C4H,0B4H,04H,82H,01H,81H,0F4H,0D4H,0B4H,0A4H,04H,82h
    DB 0C4H,0B4H,04H,00H
DB 00

END