UP EQU P3.6
DN EQU P3.7
ORG 0000H
AJMP START Fosc＝12MHz
ORG 000BH T0 中断入口地址
AJMP INT_T0
ORG 001BH T1 中断入口地址
AJMP INT_T1
START:
MOV SP, #60H
MOV TMOD, #11H
MOV IE, #8AH
MOV IP, #08H T1中断优先于T0中断
MOV TH1, #3CH
MOV TL1, #0BH 以上为系统初始化，T=60ms
W1: MOV P2, #01110001B 等待提示"F" ,01110001
LCALL GETKEY
CJNE A, #0FFH, W1
MOV A, B
CJNE A, #0AH, W2
LCALL KEY_A 输入键是'A',转KEY_A
SJMP W1
W2: CJNE A, #0BH, W3
LCALL KEY_B 输入键是'B',转KEY_B
W3: CJNE A, #0CH, W4
LCALL KEY_C 段芦族 输入键是'C',转KEY_C
W4: CJNE A, #0DH, W5
LCALL KEY_D
SJMP W1 输入键是'D',转KEY_D
W5: CJNE A,#0EH,W6 下一首
INC NUM
MOV A,NUM
CJNE A,#4,W51
W51:
JC W52
MOV NUM,#0
W52:
MOV A,NUM
SJMP D0
W6: CJNE A,#0FH,W7 上一首
MOV A,NUM
JNZ W61
MOV NUM,#4
W61:
DEC NUM
MOV A,NUM
SJMP D0
W7:
SJMP W1
KEY_A: 从1～4按顺序播放
LCALL MUSIC1 乐曲《我和你》
LCALL MUSIC2 乐曲《万水千山总是情》
LCALL MUSIC3 乐曲《送别》
LCALL MUSIC4 乐曲《北京欢迎您》
RET
KEY_B: 从1～4循环播放
T11: LCALL KEY_A
SJMP T11
RET
KEY_C: 循环播放某一乐曲
T3: LCALL GETWORD
CJNE A, #0FFH, T3
MOV A, B
D0:
JNZ D1
SJMP E0
D1: DEC A
JNZ D2
SJMP E1
D2: DEC A
JNZ E3
SJMP E2
E0: LCALL MUSIC1 乐曲《我和你》
SJMP E0
E1: LCALL MUSIC2 乐曲《万水千山总是情》
SJMP E1
E2: LCALL MUSIC3 握弊 乐曲《送别》
SJMP E2
E3: LCALL MUSIC4 乐曲《北京欢迎您》
SJMP E3
RET
KEY_D: 从某一乐曲开始播放，播放完后停止
T2: LCALL GETWORD
CJNE A, #0FFH, T2
MOV A, 哗迹B
CJNE A, #00H, B1
SJMP C0
B1: CJNE A, #01H, B2
SJMP C1
B2: CJNE A, #02H, C3
SJMP C2
C0: LCALL MUSIC1 乐曲《我和你》
C1: LCALL MUSIC2 乐曲 《万水千山总是情》
C2: LCALL MUSIC3 乐曲《送别》
C3: LCALL MUSIC4 乐曲《北京欢迎您》
RET
MUSIC1: 第一首《我和你》
MOV P2, #00000110B 显示1,00000110
MOV R5, #11111001B
MOV 52H, #HIGH TABLE10
MOV 53H, #LOW TABLE10
MOV NUM,#0
LCALL music
RET
MUSIC2: 第二首《万水千山总是情》
MOV P2, #01011011B 显示2,01011011
MOV R5, #10100100B
MOV 52H, #HIGH TABLE20
MOV 53H, #LOW TABLE20
MOV NUM,#1
LCALL music
RET
MUSIC3: 第三首《送别》
MOV P2, #01001111B 显示3,01001111
MOV R5, #10110000B
MOV 52H, #HIGH TABLE30
MOV 53H, #LOW TABLE30
MOV NUM,#2
LCALL music
RET
MUSIC4: 第四首《北京欢迎您》
MOV P2, #01100110B 显示4,01100110
MOV R5, #10011001B
MOV 52H, #HIGH TABLE40
MOV 53H, #LOW TABLE40
MOV NUM,#3
LCALL music
RET
music: MOV R3,#00H 音乐解码器
NEXT20:
MOV A,P3
ORL A,#0C0H
MOV P3,A
MOV A,P3
CPL A
ANL A,#0C0H
JZ NEXT21
POP ACC
POP ACC
LJMP W1
RET
NEXT21:
MOV A, R3
MOV DPH, 52H
MOV DPL, 53H
MOVC A, @A+DPTR
MOV R2, A
JZ STOP
ANL A, #0FH
MOV R1, A
MOV A, R2
SWAP A
ANL A, #0FH
JNZ SING
CLR TR0
JMP W11
----------------------------------------------------------
SING:
DEC A
MOV 22H, A
RL A
MOV DPTR, #TABLE00
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
SETB TR1
W11:
LCALL DELAY3
INC R3
LJMP NEXT20
-----------------------------------------------------------
STOP:
CLR TR0
CLR TR1
RET
***************************************************
定时器0中断子程序
***************************************************
INT_T0:
CLR TR0
MOV TL0, 20H
MOV TH0, 21H
CPL P3.0
SETB TR0
RETI
***************************************************
定时器1中断子程序
***************************************************
INT_T1:
CLR TR1
CLR TR0
LCALL KEY_E
MOV TH1, #3CH
MOV TL1, #0BH
DJNZ 60H, OUT
MOV 60H, #20
OUT:
SETB TR1
RETI
KEY_E:
JB P3.1, L2 中断键盘检测
LCALL DELAY2 消除抖动
JB P3.1, L2 如果是高电平就跳到L2
JNB P3.1, $ 如果仍然是低电平就执行中断程序
MOV P2, #0111100B 让LED显示E,01111001
L3: JB P3.1, $ 检测低电平，直到低电平时才跳出该指令
LCALL DELAY2
JB P3.1, L3
JNB P3.1, $ 如果再来一个高电平才跳出中断
MOV P2,R5
L2: SETB TR0
RET
GETKEY: 读A B C D键盘子程序
SA: JB P1.0, SB 读A,是高电平表示没有按键，跳转到SB
LCALL DELAY2
JB P1.0, SA
JNB P1.0, $
MOV P2, #01110111B 显示A,01110111
MOV R5, #10001000B
MOV A, #0FFH
MOV B, #0AH
RET
SB: JB P1.1, C11 读B，是高电平表示没有按键按下，跳转到C11
LCALL DELAY2
JB P1.1, SB
JNB P1.1, $
MOV P2, #01111100B 显示B,01111100
MOV R5, #10000011B
MOV A, #0FFH
MOV B, #0BH
RET
C11:JB P1.2, ED1 读C
LCALL DELAY2
JB P1.2, C11
JNB P1.2, $
MOV P2, #00111001B 显示C,00111001
MOV R5, #11000110B
MOV A, #0FFH
MOV B, #0CH
RET
ED1:
JB P1.3, L0 读D
LCALL DELAY2
JB P1.3, ED1
JNB P1.3, $
MOV P2, #01011110B 显示D,01011110
MOV R5, #10100001B
MOV A, #0FFH
MOV B, #0DH
L0: JB UP,L01
LCALL DELAY2
JB UP,L01
JNB UP,$
MOV A,#0FFH
MOV B,#0EH
RET
L01:
JB DN,L02
LCALL DELAY2
JB DN,L02
JNB DN,$
MOV A,#0FFH
MOV B,#0FH
L02:
RET
GETWORD: 读音乐序号子程序
S1: JB P1.4, S2 读1键
LCALL DELAY2
JB P1.4, S1
JNB P1.4, $
MOV P2, #00000110B 显示1
MOV R5, #11111001B
MOV A, #0FFH
MOV B, #00H
RET
S2: JB P1.5, S3 读2键
LCALL DELAY2
JB P1.5, S2
JNB P1.5, $
MOV P2, #01011011B 显示2
MOV R5, #10100100B
MOV A, #0FFH
MOV B, #01H
RET
S3: JB P1.6,S4 读3键
LCALL DELAY2
JB P1.6,S3
JNB P1.6,$
MOV P2,#01001111B 显示3
MOV R5,#10110000B
MOV A,#0FFH
MOV B,#02H
RET
S4: JB P1.7, L1 读4键
LCALL DELAY2
JB P1.7, S1
JNB P1.7, $
MOV P2, #01100110B 显示4
MOV R5, #10011001B
MOV A, #0FFH
MOV B, #03H
L1: RET
DELAY: 延时子程序
PUSH 0 保存现场
PUSH 1
MOV 0, #0H
DELAY1: MOV 1, #0H
DJNZ 1, $
DJNZ 0, DELAY1
POP 1 恢复现场
POP 0
RET
DELAY2: MOV 41H, #100 延时子程序2
F1: MOV 42H, #250
DJNZ 42H, $
DJNZ 41H, F1
RET
DELAY3: 延时子程序3
MOV R7, #2
W22: MOV R4, #125
W33: MOV R0, 248
DJNZ R0, $
DJNZ R4, W33
DJNZ R7, W22
DJNZ R1, DELAY3
RET
TABLE00: 频率表
DW 64260,64400,64524,64580 简码值 低音5, 低音6, 低音7,1
DW 64684,64777,64820,64898 简码值 2,3,4,5
DW 64968,65030,65058,65110 简码值 6,7,高音1,高音
DW 65157,65178,65217 简码值 高音3,高音4,高音5
--------------------------------------------------------------------
第一首《我和你》
--------------------------------------------------------------------
TABLE10: DB 64H,82H,42H,48H
DB 54H,64H,18H
DB 44H,54H,64H,84H
DB 5CH
DB 64H,84H,44H,04H,42H
DB 54H,64H,28H
DB 54H,14H,54H,64H
DB 4CH
DB 98H,88H
DB 98H,48H
DB 64H,24H,64H,84H
DB 5CH
DB 64H,82H,42H,48H
DB 54H,64H, 28H
DB 54H,14H,54H,34H
DB 4CH
DB 00H
--------------------------------------------------------------------
第二首《万水千山总是情》
--------------------------------------------------------------------
TABLE20: DB 64H,74H,84H,04H,82H,94H,84H,6CH
DB 54H,44H,04H,62H,54H,44H,2CH
DB 24H,18H, 44H,54H,64H,84H,94H,64H,5CH
DB 64H,74H,84H,04H,82H,94H,84H,6CH
DB 54H,44H,04H,62H,54H,44H,2CH
DB 24H,18H, 44H,64H,54H,04H,42H,24H,44H,4CH
DB 64H,84H,9CH,0A4H,94H,74H,84H,04H,92H,8CH,64H,88H
DB 64H,84H,9CH,0A4H,0A4H,94H,84H,64H,5CH
DB 64H,74H, 84H,04H,82H,94H,84H,6CH
DB 54H,44H,04H,62H,54H,44H,2CH
DB 24H,18H,44H,64H,54H,42H,24,44H,4CH
DB 00H
--------------------------------------------------------------------
第三首《送别》
--------------------------------------------------------------------
TABLE30: DB 84H,62H,82H,0B8H
DB 94H,0B2H,92H,88H
DB 84H,42H,52H,64H,52H,44H
DB 5CH
DB 84H,62H,82H,0B4H,04H,82H
DB 94H,0B4H, 88H
DB 84H,52H,62H,74H,04H,32H
DB 4CH
DB 94H,0B4H,0B8H
DB 0A4H,92H,0A2H,0B8H
DB 92H,0A2H,0B2H,92H,92H,82H,62H,42H
DB 5CH
DB 84H,62H,82H,0B4H,04H,0A2H
DB 94H,0B4H,88H
DB 84H,52H,62H,74H,04H,32H
DB 4CH
DB 00H
--------------------------------------------------------------------
第四首《北京欢迎您》
--------------------------------------------------------------------
TABLE40: DB 62H,82H,62H,52H,12H
DB 62H,52H,12H,64H
DB 62H,52H,22H,42H
DB 62H,54H
DB 52H,42H,22H,42H
DB 52H,62H,82H,52H
DB 62H,92H,82H,12H
DB 52H,44H
DB 52H,42H,22H,42H
DB 52H,62H,82H,52H
DB 62H,92H,82H,82H
DB 68H
DB 52H,62H,52H,42H
DB 82H,92H,64H
DB 22H,62H,64H
DB 54H,64H
DB 64H,84H
DB 0B2H,82H,94H
DB 02H,92H,82H,62H
DB 62H, 82H,88H
DB 00H
END
编程指令顺序输入指令
顺序输出指令
顺序输出指令
定时器和计数器指令
比较指令
数据传送指令
指令助记符
装载LD
装载非LD NOT
与AND
与非AND NOT
或OR
或非OR NOT
与装载AND LD
或装载OR LD
非NOT
条件ON UP
条件OFF DOWN
指令助记符
输出OUT
输出非OUT NOT
保持KEEP
上升沿微分DIFU
下降沿微分DIFD
置位SET
复位RSET
多位置位SETA
多位复位RSTA
单一位置位SETB
单一位复位RSTB
指令助记符
结束END
空 *** 作NOP
联锁IL
联锁解除ILC
多联锁区别保持MILH
多联锁区别释放MILR
多联锁解除MILC
跳转JMP
跳转结束JME
条件跳转CJP
FOR循环FOR
循环终止BREAK
下一个循环NEXT
指令助记符
定时器
TIM
编辑指令
数据移位指令
递增/递减指令
四则运算指令
转换指令
逻辑指令
特殊算术指令
特殊算术指令
表格数据处理指令
数据控制指令
指令助记符
移位寄存器SFT
可逆移位寄存器SFTR
字移位WSFT
算术左移ASL
算术右移ASR
循环左移ROL
循环右移ROR
一个数字左移SLD
一个数字右移SRD
左移N位NASL
双字左移N位NSLL
右移N位NASR
双字右移N位NSRL
指令助记符
二进制递增＋＋
双字二进制递增＋＋L
二进制递减－－
双字二进制递减－－L
BCD递增＋＋B
双字BCD递增＋＋BL
BCD递减－－B
双字BCD递减－－BL
指令助记符
无进位带符号二进制加法＋
无进位带符号双字二进制加法＋L
有进位带符号二进制加法＋C
有进位带符号双字二进制加法＋CL
无进位BCD加法＋B
无进位双字BCD加法＋BL
有进位BCD加法＋BC
有进位双字BCD加法＋BCL
无进位带符号二进制减法－
无进位带符号双字二进制减法－L
有进位带符号二进制减法－C
有进位带符号双字二进制减法－CL
无进位BCD减法－B
无进位双字BCD减法－BL
有进位BCD减法－BC
有进位双字BCD减法－BCL
带符号二进制乘法*
带符号双字二进制乘法*L
BCD乘法*B
双字BCD乘法*BL
带符号二进制除法/
带符号双字二进制除法/L
BCD除法/B
双字BCD除法/BL
指令助记符
BCD→二进制BIN
双字BCD→双字二进制BINL
二进制→BCD BCD
双字二进制→双字BCD BCDL
二进制求补NEG
数据译码MLPX
数据编码DMPX
ASCⅡ转换码ASC
ASCⅡ→HEX HEX
指令助记符
逻辑与ANDW
双字逻辑与ANDL
逻辑或ORW
双字逻辑或ORWL
异或XORW
双字异或XORL
求补COM
双字求补COML
指令助记符
算术处理APR
位计数器BCNT
指令助记符
浮点数→16位FIX
浮点数→32位FIXL
16位→浮点数FLT
32位→浮点数FLTL
浮点数加法＋F
浮点数减法－F
浮点数除法/F
浮点数乘法*F
浮点符号比较
LD, AND, OR＋＝F
LD, AND, OR＋<>F
LD, AND, OR＋<F
LD, AND, OR＋<＝F
LD, AND, OR＋>F
LD, AND, OR＋>亮岁源＝F
浮点数→ASCⅡ FSTR
ASCⅡ→浮点数FVAL
指令助记符
交换字节SWAP
帧校验雀敏和FCS
指令助记符
带自调整的PID控制PIDAT
时间比例输出TPO
标度SCL
标度2 SCL2
标度3 SCL3
平均值AVG
子程序指令
中断控制指令
高速计数器和脉冲输出指令
步指令
I/O单元指令
串行通信指令
时钟指令
故障诊断指令
其他指令
指令助记符
子程序调用SBS
子程序进入SBN
子程序返回RET
指令助记符
设置中断屏蔽MSKS
清除中断CLI
禁止中断DI
允许中断EI
指令助记符
模式控制INI
高速计数器当前值读取PRV
比较表载入CTBL
速度输出SPED
设置脉冲PULS
脉冲输出PLS2
加速度模式ACC
原点搜索ORG
可变占空比系数脉冲PWM
指令助记符
步定义STEP
步启动SNXT
指令助记符
I/O刷新IORF
7段译码SDEC
数字开关输入DSW
矩阵输入MTR
7段显示输出7SEG
指令助记符
发送敬态TXD
接收RXD
指令助记符
日历加法CADD
日历减法CSUB
时钟调整DATE
指令助记符
故障报警FAL
严重故障报警FALS
指令助记符
设置进位STC
清除进位CLC
延长最大循环时间WDT
TIMX
计数器
CNT
CNTX
高速定时器
TIMH
TIMHX
1MS定时器
TMHH
TMHHX
累计定时器
TTIM
TTIMX
长时间定时器
TIML
TIMLX
可逆计数器
CNTR
CNTRX
定时器/计数器复位
CNR
CNRX
指令助记符
输入比较指令
(无符号)
LD,AND,OR＋＝
LD,AND,OR＋<>
LD,AND,OR＋<
LD,AND,OR＋<＝
LD,AND,OR＋>
LD,AND,OR＋>＝
输入比较指令
(双字长，无符号)
LD,AND,OR＋＝＋L
LD,AND,OR＋<>＋L
LD,AND,OR＋<＋L
LD,AND,OR＋<＝＋L
LD,AND,OR＋>＋L
LD,AND,OR＋>＝＋L
输入比较指令
(带符号)
LD,AND,OR＋＝＋S
LD,AND,OR＋<>＋S
LD,AND,OR＋<＋S
LD,AND,OR＋<＝＋S
LD,AND,OR＋>＋S
LD,AND,OR＋>＝＋S
输入比较指令
(双字长，带符号)
LD,AND,OR＋＝＋SL
LD,AND,OR＋<>＋SL
LD,AND,OR＋<＋SL
LD,AND,OR＋<＝＋SL
LD,AND,OR＋>＋SL
LD,AND,OR＋>＝＋SL
时间比较指令
＝DT
<>DT
<DT
<＝DT
>DT
>＝DT
比较CMP
双字比较CMPL
带符号二进制比较CPS
双字长带符号二进制比较CPSL
表格比较TCMP
无符号块比较BCMP
区域范围比较ZCP
双区域范围比较ZCPL
指令助记符
传送MOV
双字长传送MOVL
传送非MVN
传送位MOVB
数字传送MOVD
多位传送XFRB
块传送XFER
块置位BSET
数据交换XCHG
单字分配DIST
数据收集COLL
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）