资源描述：
《16组可调时钟程序》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、ORG0000HAJMPMAINORG001BHLJMPSERVEMAIN:movp1,#0ffhMOVTMOD,#10H;设置中断MOV20H,#14HCLRAMOV30H,AMOV31H,AMOV32H,ASETBET1SETBEAMOVTH1,#3CHMOVTL1,#0B0HSETBTR1LCALLXIANSHI:LCALLJIANPAN;调用键盘ACALLXIAN;调用显示SJMPSHI;显示程序XIAN:MOVP0,#0FFH;显示初始化MOVP2,#0FFHMOVR0,#30HMOVR1,#33HHUAN:MOVA,
2、@R0;缓存程序SWAPAANLA,#0FHMOV@R1,AINCR1MOVA,@R0ANLA,#0FHMOV@R1,AINCR0INCR1CJNER0,#33H,HUANMOVR0,#33HMOVA,#0dFHL1:MOVP2,A;显示程序MOVDPTR,#TABMOVA,@R0MOVCA,@A+DPTRACALLDIANMOVP0,AMOVA,P2RRAINCR0MOVR1,#0FfHDJNZR1,$MOVR1,#0FFHDJNZR1,$MOVR1,#0FFHDJNZR1,$MOVR1,#0FFHDJNZR1,$MOVP0,
3、#0FFHMOVP2,#0FFHCJNER0,#39H,L1movr0,#00hRETDIAN:CJNER0,#34H,L2;打点CLRACC.7L2:CJNER0,#36H,L3CLRACC.7L3:RETTAB:DB0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,88h,83h,0c6h,0a1h,86h,8eh;键盘程序JIANPAN:LCALLKEY;调用查询程序，对按键状态查询JNZK1LCALLDELAYLJMPRETURNK1:LCALLDELAY;延时确定按键是否真的被按
4、下LCALLKEYJNZK2LJMPRETURNK2:MOVR3,#0EFH;扫描的初始列MOVR4,#00H;列序号K3:MOVP3,R3;逐列扫描JBP3.3,L6movA,#00HLJMPLKL6:JBP3.2,L4MOVA,#04HLJMPLKL4:JBP3.1,L5MOVA,#08HLJMPLKL5:JBP3.0,NEXTMOVA,#0CHLJMPLKNEXT:INCR4;修改列号JNBP3.7,RETURNMOVA,P3RLAMOVR3,ALJMPK3LK:ADDA,R4JnBTR1,ZM;判断是不是进入设置状态CJ
5、NEA,#0FH,RETURN;判断是否输入为设置键CPLTR1MOVR0,#33HK8:LCALLDELAY;等待放开设置键mov39h,r0lcallxian1movr0,39hLCALLKEYJNZK8ZM2:LCALLKEY;调用查询程序，对按键状态查询JNZK11LCALLDELAYmov39h,r0lcallxian1movr0,39hSJMPZM2K11:LCALLDELAY;延时确定按键是否真的被按下LCALLKEYJNZK2SJMPZM2ZM:CJNEA,#0FH,ZM1;设置是否结束，没输入设置键跳到zm1Z
6、M3:MOVR0,#30HMOVR1,#33HZM4:MOVA,@R1SWAPAINCR1ADDA,@R1MOV@r0,aINCR1INCR0CJNER0,#33H,ZM4ljmpk4ZM1:MOV@R0,AINCR0K5:LCALLDELAYmov39h,r0lcallxian1movr0,39hLCALLKEYJNZK5CJNER0,#39H,ZM2LCALLZM3K4:LCALLDELAYlcallxian1LCALLKEYJNZK4CPLTR1LJMPRETURNRETURN:RETKEY:MOVP3,#0F0H;查询是
7、否有按键按下MOVA,P3CPLAANLA,#0f0HRETDELAY:MOVR6,#64HL7:MOVR7,#13HL8:NOPNOPNOPDJNZR7,L8DJNZR6,L7RETxian1:MOVR0,#33HMOVA,#0DFHL12:MOVP2,A;显示程序MOVDPTR,#TABMOVA,@R0MOVCA,@A+DPTRACALLDIANMOVP0,AMOVA,P2RRAINCR0MOVR1,#0FFHDJNZR1,$MOVR1,#0FFHDJNZR1,$MOVR1,#0FFHDJNZR1,$MOVR1,#0FFHD
8、JNZR1,$MOVP0,#0FFHMOVP2,#0FFHCJNER0,#39H,L12RETSERVE:PUSHPSW;中断程序PUSHACCMOVTH1,#3CHMOVTL1,#0B0HDJNZ20H,RETUNTMOV20H,#14HMOVA,#01HAD
