|
发表于 2012-6-4 00:27:03
|
显示全部楼层
http://www.tudou.com/v/WvdpCK4Qii0/&resourceId=60302632_04_02_99&autoPlay=true/v.swf
;---------------8051@12MHz---------------;
;---------------最炫民族风---------------;
;----------------WSHTYR---------------;
;---------------2012/05/19---------------;
BEEP BIT P1.0
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
DELAY EQU R1
TIMER1H EQU R2
TIMER1L EQU R3
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ORG 0000H
AJMP START
ORG 001BH
AJMP ONTIMER1
ORG 0030H
START:
;
MOV TMOD, #10H
SETB TR1
SETB EA
PLAY:
;
MOV DPTR, #MZF_0
CALL MUSIC
;
MOV DPTR, #MZF_1
CALL MUSIC
;
MOV DPTR, #MZF_1
CALL MUSIC
;
MOV DPTR, #MZF_2
CALL MUSIC
;
MOV DPTR, #MZF_3
CALL MUSIC
;
AJMP PLAY
DELAYMS:
D0:
MOV R6, #10D
D1:
MOV R7, #48D
D2:
DJNZ R7, D2
DJNZ R6, D1
DJNZ DELAY, D0
RET
MUSIC:
CLR A
MOVC A,@A+DPTR
JZ FINISHMUSIC
MOV TIMER1H,A
CLR A
INC DPTR
MOVC A,@A+DPTR
MOV TIMER1L,A
CLR A
INC DPTR
MOVC A, @A+DPTR
INC DPTR
MOV R0, A
MOV A, TIMER1H
INC A
JNZ SKIPBLANK
MOV A, TIMER1L
INC A
JZ MUSICDELAY
SKIPBLANK:
SETB ET1
MUSICDELAY:
MOV DELAY, #80D
CALL DELAYMS
DJNZ R0, MUSICDELAY
CLR ET1
SETB BEEP
MOV DELAY, #08D
CALL DELAYMS
JMP MUSIC
FINISHMUSIC:
CLR ET1
SETB BEEP
RET
ONTIMER1:
CLR TR1
MOV TH1, TIMER1H
MOV TL1, TIMER1L
CPL BEEP
SETB TR1
RETI
;NOTES:
; DB 0F8H,00EH,002H ;2L
; DB 0F8H,0F2H,002H ;3L
; DB 0F9H,055H,002H ;4L
; DB 0FAH,00FH,002H ;5L
; DB 0FAH,0B4H,002H ;6L
; DB 0FBH,044H,002H ;7L
; DB 0FBH,08EH,002H ;1
; DB 0FCH,007H,002H ;2
; DB 0FCH,077H,002H ;3
; DB 0FCH,0A8H,002H ;4
; DB 0FDH,007H,002H ;5
; DB 0FDH,059H,002H ;6
; DB 0FDH,0A2H,002H ;7
; DB 0FDH,0C8H,002H ;1H
; DB 0FEH,004H,002H ;2H
; DB 0FEH,03BH,002H ;3H
; DB 0FEH,054H,002H ;4H
; DB 0FEH,083H,002H ;5H
; DB 0FEH,0ACH,002H ;6H
; DB 0FEH,0D1H,002H ;7H
; DB 0FEH,0E3H,002H ;1HH
MZF_0:
DB 0FCH,077H,004H ;3
DB 0FAH,0B4H,002H ;6L
DB 0FAH,0B4H,002H ;6L
DB 0FBH,08EH,004H ;1
DB 0FCH,077H,004H ;3
DB 0FCH,007H,002H ;2
DB 0FCH,007H,001H ;2
DB 0FCH,077H,001H ;3
DB 0FCH,007H,002H ;2
DB 0FBH,08EH,002H ;1
DB 0FCH,007H,002H ;2
DB 0FBH,08EH,002H ;1
DB 0FAH,0B4H,004H ;6L
DB 0FCH,077H,004H ;3
DB 0FAH,0B4H,002H ;6L
DB 0FAH,0B4H,002H ;6L
DB 0FBH,08EH,004H ;1
DB 0FCH,077H,004H ;3
DB 0FDH,007H,002H ;5
DB 0FCH,007H,001H ;2
DB 0FCH,077H,001H ;3
DB 0FCH,007H,002H ;2
DB 0FBH,08EH,002H ;1
DB 0FCH,007H,002H ;2
DB 0FBH,08EH,002H ;1
DB 0FBH,044H,002H ;7L
DB 0FAH,00FH,002H ;5L
;
DB 0FCH,077H,004H ;3
DB 0FAH,0B4H,002H ;6L
DB 0FAH,0B4H,002H ;6L
DB 0FBH,08EH,004H ;1
DB 0FCH,077H,004H ;3
DB 0FCH,007H,002H ;2
DB 0FCH,007H,001H ;2
DB 0FCH,077H,001H ;3
DB 0FCH,007H,002H ;2
DB 0FBH,08EH,002H ;1
DB 0FCH,007H,002H ;2
DB 0FBH,08EH,002H ;1
DB 0FAH,0B4H,004H ;6L
DB 0FCH,077H,004H ;3
DB 0FAH,0B4H,002H ;6L
DB 0FAH,0B4H,002H ;6L
DB 0FBH,08EH,004H ;1
DB 0FCH,077H,004H ;3
DB 0FDH,007H,002H ;5
DB 0FCH,077H,002H ;3
DB 0FFH,0FFH,00CH ;0
DB 000H
MZF_1:
DB 0FAH,0B4H,004H ;6L
DB 0FAH,0B4H,002H ;6L
DB 0FAH,00FH,002H ;5L
DB 0FAH,0B4H,004H ;6L
DB 0FAH,0B4H,002H ;6L
DB 0FBH,08EH,002H ;1
DB 0FBH,08EH,004H ;1
DB 0FCH,007H,002H ;2
DB 0FBH,08EH,002H ;1
DB 0FAH,0B4H,008H ;6L
;
DB 0FBH,08EH,004H ;1
DB 0FBH,08EH,002H ;1
DB 0FAH,00FH,002H ;5L
DB 0FBH,08EH,002H ;1
DB 0FCH,007H,002H ;2
DB 0FCH,077H,002H ;3
DB 0FDH,007H,002H ;5
DB 0FDH,007H,002H ;5
DB 0FCH,077H,002H ;3
DB 0FCH,007H,004H ;2
DB 0FCH,077H,008H ;3
;
DB 0FDH,059H,002H ;6
DB 0FDH,059H,002H ;6
DB 0FDH,059H,002H ;6
DB 0FDH,007H,002H ;5
DB 0FCH,077H,002H ;3
DB 0FCH,077H,004H ;3
DB 0FBH,08EH,002H ;1
DB 0FAH,0B4H,002H ;6L
DB 0FAH,0B4H,002H ;6L
DB 0FAH,0B4H,002H ;6L
DB 0FCH,077H,002H ;3
DB 0FCH,007H,008H ;2
;
DB 0FCH,077H,002H ;3
DB 0FCH,077H,002H ;3
DB 0FDH,007H,002H ;5
DB 0FCH,077H,002H ;3
DB 0FCH,007H,002H ;2
DB 0FCH,077H,002H ;3
DB 0FCH,007H,002H ;2
DB 0FBH,08EH,002H ;1
DB 0FAH,0B4H,004H ;6L
DB 0FAH,00FH,004H ;5L
DB 0FAH,0B4H,008H ;6L
DB 000H
MZF_2:
;
DB 0FCH,077H,002H ;3
DB 0FCH,077H,002H ;3
DB 0FDH,007H,002H ;5
DB 0FCH,077H,002H ;3
DB 0FCH,077H,002H ;3
DB 0FDH,007H,002H ;5
DB 0FDH,007H,002H ;5
DB 0FDH,059H,002H ;6
DB 0FDH,0C8H,002H ;1H
DB 0FDH,059H,002H ;6
DB 0FDH,007H,004H ;5
DB 0FDH,059H,008H ;6
;
DB 0FCH,007H,004H ;2
DB 0FCH,007H,002H ;2
DB 0FBH,08EH,002H ;1
DB 0FCH,007H,004H ;2
DB 0FCH,0A8H,004H ;4
DB 0FDH,007H,002H ;5
DB 0FDH,059H,001H ;6
DB 0FDH,007H,001H ;5
DB 0FCH,0A8H,002H ;4
DB 0FDH,007H,002H ;5
DB 0FDH,059H,008H ;6
;
DB 0FCH,007H,002H ;2
DB 0FEH,004H,002H ;2H
DB 0FEH,004H,002H ;2H
DB 0FDH,0C8H,002H ;1H
DB 0FDH,059H,002H ;6
DB 0FDH,007H,002H ;5
DB 0FCH,0A8H,002H ;4
DB 0FDH,007H,002H ;5
DB 0FDH,059H,008H ;6
;
DB 0FDH,059H,002H ;6
DB 0FDH,059H,002H ;6
DB 0FDH,059H,004H ;6
;
DB 0FCH,0A8H,002H ;4
DB 0FCH,007H,002H ;2
DB 0FCH,007H,002H ;2
DB 0FCH,0A8H,002H ;4
DB 0FDH,007H,004H ;5
DB 0FBH,08EH,002H ;1
DB 0FBH,08EH,002H ;1
DB 0FDH,059H,002H ;6
DB 0FDH,0C8H,002H ;1H
DB 0FDH,059H,002H ;6
DB 0FDH,007H,002H ;5
DB 0FCH,0A8H,008H ;4
;
DB 0FCH,007H,002H ;2
DB 0FCH,0A8H,002H ;4
DB 0FDH,007H,002H ;5
DB 0FDH,059H,002H ;6
DB 0FDH,007H,002H ;5
DB 0FCH,0A8H,002H ;4
DB 0FBH,08EH,002H ;1
DB 0FAH,0B4H,002H ;6L
DB 0FCH,007H,008H ;2
;
DB 0FCH,007H,002H ;2
DB 0FCH,007H,002H ;2
DB 0FCH,007H,004H ;2
;
DB 0FCH,007H,004H ;2
DB 0FCH,007H,002H ;2
DB 0FBH,08EH,002H ;1
DB 0FCH,007H,004H ;2
DB 0FCH,0A8H,004H ;4
DB 0FDH,007H,002H ;5
DB 0FDH,059H,001H ;6
DB 0FDH,007H,001H ;5
DB 0FCH,0A8H,002H ;4
DB 0FDH,007H,002H ;5
DB 0FDH,059H,008H ;6
;
DB 0FCH,007H,002H ;2
DB 0FEH,004H,002H ;2H
DB 0FEH,004H,002H ;2H
DB 0FDH,0C8H,002H ;1H
DB 0FDH,059H,002H ;6
DB 0FDH,007H,002H ;5
DB 0FCH,0A8H,002H ;4
DB 0FDH,007H,002H ;5
DB 0FDH,059H,008H ;6
;
DB 0FDH,059H,002H ;6
DB 0FDH,059H,002H ;6
DB 0FDH,059H,004H ;6
;
DB 0FCH,0A8H,002H ;4
DB 0FCH,007H,002H ;2
DB 0FCH,007H,002H ;2
DB 0FCH,0A8H,002H ;4
DB 0FDH,007H,004H ;5
DB 0FBH,08EH,002H ;1
DB 0FBH,08EH,002H ;1
DB 0FDH,059H,002H ;6
DB 0FDH,0C8H,002H ;1H
DB 0FDH,059H,002H ;6
DB 0FDH,007H,002H ;5
DB 0FCH,0A8H,006H ;4
DB 0FCH,0A8H,002H ;4
;
DB 0FCH,007H,002H ;2
DB 0FCH,0A8H,002H ;4
DB 0FDH,007H,002H ;5
DB 0FDH,059H,002H ;6
DB 0FDH,0C8H,002H ;1H
DB 0FDH,059H,002H ;6
DB 0FDH,059H,002H ;6
DB 0FDH,0C8H,002H ;1H
DB 000H
MZF_3:
DB 0FEH,004H,010H ;2H
;
DB 0FEH,004H,002H ;2H
DB 0FEH,004H,002H ;2H
DB 0FEH,004H,002H ;2H
DB 0FEH,004H,002H ;2H
DB 0FEH,004H,002H ;2H
DB 0FDH,0C8H,002H ;1H
DB 0FDH,059H,002H ;6
DB 0FDH,007H,002H ;5
DB 0FDH,007H,002H ;5
DB 0FDH,007H,002H ;5
DB 0FDH,059H,002H ;6
DB 0FDH,0C8H,002H ;1H
DB 0FDH,059H,002H ;6
DB 0FDH,007H,002H ;5
DB 0FCH,0A8H,002H ;4
DB 0FCH,007H,002H ;2
;
DB 0FCH,007H,004H ;2
DB 0FCH,007H,002H ;2
DB 0FBH,08EH,002H ;1
DB 0FCH,007H,004H ;2
DB 0FCH,0A8H,004H ;4
DB 0FDH,007H,002H ;5
DB 0FDH,059H,001H ;6
DB 0FDH,007H,001H ;5
DB 0FCH,0A8H,002H ;4
DB 0FDH,007H,002H ;5
DB 0FDH,059H,008H ;6
;
DB 0FEH,004H,002H ;2H
DB 0FDH,0C8H,002H ;1H
DB 0FDH,059H,002H ;6
DB 0FDH,007H,002H ;5
DB 0FDH,0C8H,002H ;1H
DB 0FDH,059H,002H ;6
DB 0FDH,007H,002H ;5
DB 0FCH,0A8H,002H ;4
DB 0FCH,0A8H,008H ;4
;
DB 0FAH,0B4H,001H ;6L
DB 0FBH,08EH,001H ;1
DB 0FCH,007H,001H ;2
DB 0FCH,077H,001H ;3
DB 0FCH,007H,001H ;2
DB 0FBH,08EH,001H ;1
DB 0FAH,0B4H,001H ;6L
DB 0FBH,08EH,001H ;1
DB 000H
END |
|