发表于:2005/3/24 11:51:00
#0楼
无线电 2003 11期中介绍的制作方法
其代码如下:
主程序(MAIN),如下:
ORG 0000H
AJMP MAIN
ORG 000BH
AJMP TIME
ORG 0300H
MAIN: MOV 20H,#00H ;计时的0.1秒、秒、时和分单元清0
MOV 21H,#00H
MOV 22H,#00H
MOV 23H,#00H
MOV IP,#02H ;IP,IE初始化
MOV IE,#82H
MOV TMOD,#01H ;定时器的初始化
MOV TL0,#0B0H
MOV TH0,#3CH
SETB TR0 ;启动定时器工作
MOV SP,#40H ;堆栈指针设为40H
NEXT: LCALL DISP ;调用显示子程序
LCALL KEY ;调按键判断子程序
JZ NEXT ;无键按下转NEXT
LCALL ANKEY ;有键按下转按键处理子程序
SJMP NEXT ;按键处理完转NEXT
NOP
NOP
NOP
定时中断处理程序:
TIME: PUSH ACC ;现场保护
PUSH PSW
MOV TL0,#0B4H ;重置初值
MOV TH0,#3CH
INC 20H ;计时处理
MOV A,20H
CJNE A,#0AH,RETI1 ;这里应该是秒的个位不超过9
MOV 20H,#00H
MOV A,21H
ADD A,#01H
DA A
MOV 21H,A
CJNE A,#60H,RETI1 ;这里应该是秒的十位吧,他怎么写60H.应该是6h吧. MOV 21H,#00H
MOV A,22H
ADD A,#01H
DA A
MOV 22H,#00H
MOV A,23H
ADD A,#01H
DA A
MOV 23H,A
CJNE A,#24H,RETI1 ;这里他怎么把时的个位和十位连起来一起考虑了?? MOV 23H,#00H
RETI1: POP PSW ;恢复现场
POP ACC
RETI ;中断返回
NOP
NOP
显示子程序
DISP: ANL 2FH,#10H ;拆字,注意小数点的显示
MOV A,21H
ANL A,#0FH
ORL A,2FH
MOV 2FH,A
MOV A,21H
ANL A,#0F0H
SWAP A
MOV 2EH,A
ANL 2DH,#10H
MOV A,22H
ANL A,#0FH
ORL A,2DH
MOV 2DH,A
MOV A,22H
ANL A,#0F0H
SWAP A
MOV 2CH,A
ANL 2BH,#10H
MOV A,23H
ANL A,#0FH
ORL A,2BH
MOV 2BH,A
MOV A,23H
ANL A,#0F0H
SWAP A
MOV 2AH,A
MOV R0,#2FH
MOV R3,#06H
MOV DPTR,#TABLE
MOV A,#01H
LOOP1: MOV B,A ;送位控制字与段控制字
MOV P2,A
MOV A,@R0
MOVC A,@A+DPTR
MOV P0,A
MOV R2,#80H ;延时
DJNZ R2,$
DEC R0
MOV A,B
RL A
DJNZ R3,LOOP1
RET
TABLE: DB 0C0H,0F9H,0A4H,0B0H,99H,92H ;小数点不亮的代码
DB 82H,0F8H,80H,90H,00,00,00,00,00,00
DB 40H,79H,24H,30H,19H,12H,02H,78H ;小数点亮的显示代码
DB 00H,10H,00,00,00,00,00,00
NOP
NOP
按键判断程序
KEY: MOV P3,#0FFH ;读按键状态
MOV A,P3
CPL A
ANL A,#0FH
JZ RETX ;无键按下返回,有键按下延时去抖动
LCALL DISP
LCALL DISP
MOV A,P3
CPL A
ANL A,#0FH
JZ RETX ;是抖动则返回主程序,否则读按键状态存入R6及A中
MOV R6,A
LOOP2: LCALL DISP ;等待按键的释放
MOV A,P3
CPL A
ANL A,#0FH
JNZ LOOP2
MOV A,R6
RETX: RET
NOP
NOP
按键处理子程序
ANKEY: CLR EA ;关中断
LX: MOV A,R6
JB ACC.0,L1 ;是功能键转L1
JB ACC.1,L2 ;是确认键转L2
JB ACC.2,L3 ;是增1键转L3
JNB ACC.3,L12 ;不是减1键,转L12
JB 2BH.4,L6 ;判断使哪一位(时、分、秒)的值减1
JB 2DH.4,L8
JB 2FH.4,L9
L12: LCALL DISP
LCALL DISP
LCALL KEY
JZ L12
LJMP LX
L2: MOV 25H,#00H ;是确认键,处理完毕返回
CLR 2BH.4
CLR 2DH.4
CLR 2FH.4
SETB EA
RET
L3: JB 2BH.4,L61
JB 2DH.4,L81
JB 2FH.4,L91
AJMP L12
L1: MOV A,25H
JZ LB1
JB ACC.0,LB2
JB ACC.1,LB3
JNB ACC.2,L12
LB1: MOV 25H,#01H ;25H单元是标志位,(25H)=01H调节时单元的值
SETB 2BH.4
CLR 2DH.4
CLR 2FH.4
AJMP L12
LB3: MOV 25H,#04H ;(25H)=04H调节秒单元的值
SETB 2FH.4
CLR 2DH.4
CLR 2BH.4
AJMP L12
LB2: MOV 25H,#02H ;(25H)=02H,调节分单元的值
SETB 2DH.4
CLR 2BH.4
CLR 2FH.4
AJMP L12
L61: AJMP L611 ;调节时间时注意使用的是十进制,而且注意
L81: AJMP L811 ;分和秒都是60进制,时是24进制
L91: AJMP L911
L6: MOV A,23H
ADD A,#01H
DA A
MOV 23H,A
CJNE A,#24H,L15
L15: JC L112
MOV 23H,#00H
L112: AJMP L12
L8: MOV A,22H
ADD A,#01H
DA A
MOV 22H,A
CJNE A,#60H,L16
L16: JC L112
MOV 22H,#00H
AJMP L12
L9: MOV A,21H
ADD A,#01H
DA A
MOV 21H,A
CJNE A,#60H,L17
L17: JC L112
MOV 21H,#00H
AJMP L12
L611: MOV A,23H
ADD A,#99H
DA A
MOV 23H,A
CJNE A,#99H,L112
MOV 23H,#23H
AJMP L12
L811: MOV A,22H
ADD A,#99H
DA A
MOV 22H,A
CJNE A,#99H,L112
MOV 22H,#59H
AJMP L12
L911: MOV A,21H
ADD A,#99H
DA A
MOV 21H,A
CJNE A,#99H,L112
MOV 21H,#59H
AJMP L12
NOP
NOP
END
小弟不明白的地方 用颜色标出来了.我不明白他怎么把秒位的十.个位一起考虑了?
很多 方案都是分开考虑的.
时钟的基本显示原理应该是:时钟开始显示为0时0分0秒,也就是数码管显示000000,然后每秒秒位加1 ,到9后,10秒位加1,秒位回0。10秒位到5后,即59秒 ,分钟加1,10秒位回0。依次类推,时钟最大的显示值为23小时59分59秒。这里只要确定了1秒的定时时间, 其他位均以此为基准往上累加。
star:
mov a,#00h ;把各个位全部清0
mov a_bit,a
mov b_bit,a
mov c_bit,a
mov d_bit,a
mov e_bit,a
mov f_bit,a
stlop: acall display ;程序的计算部分
inc a_bit ;秒位加1
mov a,a_bit ;送a
cjne a,#10,stlop;如果秒到10那么转到10秒处理
mov a_bit,#00h ;秒位清0
inc b_bit ;10秒位加1
mov a,b_bit ;送a
cjne a,#6,stlop ;如果10秒到了6那么到分处理
mov b_bit,#00h ; 10秒位清0
inc c_bit
mov a,c_bit
cjne a,#10,stlop
mov c_bit,#00h
inc d_bit
mov a,d_bit
cjne a,#6,stlop
mov d_bit,#00h
inc e_bit
mov a,e_bit
cjne a,#10,stlop
mov e_bit,#00h
inc f_bit
mov a,f_bit
cjne a,#3,stlop
mov f_bit,#00h
ajmp stlop ;重新开始计算
不知道这两段 代码的区别.
其代码如下:
主程序(MAIN),如下:
ORG 0000H
AJMP MAIN
ORG 000BH
AJMP TIME
ORG 0300H
MAIN: MOV 20H,#00H ;计时的0.1秒、秒、时和分单元清0
MOV 21H,#00H
MOV 22H,#00H
MOV 23H,#00H
MOV IP,#02H ;IP,IE初始化
MOV IE,#82H
MOV TMOD,#01H ;定时器的初始化
MOV TL0,#0B0H
MOV TH0,#3CH
SETB TR0 ;启动定时器工作
MOV SP,#40H ;堆栈指针设为40H
NEXT: LCALL DISP ;调用显示子程序
LCALL KEY ;调按键判断子程序
JZ NEXT ;无键按下转NEXT
LCALL ANKEY ;有键按下转按键处理子程序
SJMP NEXT ;按键处理完转NEXT
NOP
NOP
NOP
定时中断处理程序:
TIME: PUSH ACC ;现场保护
PUSH PSW
MOV TL0,#0B4H ;重置初值
MOV TH0,#3CH
INC 20H ;计时处理
MOV A,20H
CJNE A,#0AH,RETI1 ;这里应该是秒的个位不超过9
MOV 20H,#00H
MOV A,21H
ADD A,#01H
DA A
MOV 21H,A
CJNE A,#60H,RETI1 ;这里应该是秒的十位吧,他怎么写60H.应该是6h吧. MOV 21H,#00H
MOV A,22H
ADD A,#01H
DA A
MOV 22H,#00H
MOV A,23H
ADD A,#01H
DA A
MOV 23H,A
CJNE A,#24H,RETI1 ;这里他怎么把时的个位和十位连起来一起考虑了?? MOV 23H,#00H
RETI1: POP PSW ;恢复现场
POP ACC
RETI ;中断返回
NOP
NOP
显示子程序
DISP: ANL 2FH,#10H ;拆字,注意小数点的显示
MOV A,21H
ANL A,#0FH
ORL A,2FH
MOV 2FH,A
MOV A,21H
ANL A,#0F0H
SWAP A
MOV 2EH,A
ANL 2DH,#10H
MOV A,22H
ANL A,#0FH
ORL A,2DH
MOV 2DH,A
MOV A,22H
ANL A,#0F0H
SWAP A
MOV 2CH,A
ANL 2BH,#10H
MOV A,23H
ANL A,#0FH
ORL A,2BH
MOV 2BH,A
MOV A,23H
ANL A,#0F0H
SWAP A
MOV 2AH,A
MOV R0,#2FH
MOV R3,#06H
MOV DPTR,#TABLE
MOV A,#01H
LOOP1: MOV B,A ;送位控制字与段控制字
MOV P2,A
MOV A,@R0
MOVC A,@A+DPTR
MOV P0,A
MOV R2,#80H ;延时
DJNZ R2,$
DEC R0
MOV A,B
RL A
DJNZ R3,LOOP1
RET
TABLE: DB 0C0H,0F9H,0A4H,0B0H,99H,92H ;小数点不亮的代码
DB 82H,0F8H,80H,90H,00,00,00,00,00,00
DB 40H,79H,24H,30H,19H,12H,02H,78H ;小数点亮的显示代码
DB 00H,10H,00,00,00,00,00,00
NOP
NOP
按键判断程序
KEY: MOV P3,#0FFH ;读按键状态
MOV A,P3
CPL A
ANL A,#0FH
JZ RETX ;无键按下返回,有键按下延时去抖动
LCALL DISP
LCALL DISP
MOV A,P3
CPL A
ANL A,#0FH
JZ RETX ;是抖动则返回主程序,否则读按键状态存入R6及A中
MOV R6,A
LOOP2: LCALL DISP ;等待按键的释放
MOV A,P3
CPL A
ANL A,#0FH
JNZ LOOP2
MOV A,R6
RETX: RET
NOP
NOP
按键处理子程序
ANKEY: CLR EA ;关中断
LX: MOV A,R6
JB ACC.0,L1 ;是功能键转L1
JB ACC.1,L2 ;是确认键转L2
JB ACC.2,L3 ;是增1键转L3
JNB ACC.3,L12 ;不是减1键,转L12
JB 2BH.4,L6 ;判断使哪一位(时、分、秒)的值减1
JB 2DH.4,L8
JB 2FH.4,L9
L12: LCALL DISP
LCALL DISP
LCALL KEY
JZ L12
LJMP LX
L2: MOV 25H,#00H ;是确认键,处理完毕返回
CLR 2BH.4
CLR 2DH.4
CLR 2FH.4
SETB EA
RET
L3: JB 2BH.4,L61
JB 2DH.4,L81
JB 2FH.4,L91
AJMP L12
L1: MOV A,25H
JZ LB1
JB ACC.0,LB2
JB ACC.1,LB3
JNB ACC.2,L12
LB1: MOV 25H,#01H ;25H单元是标志位,(25H)=01H调节时单元的值
SETB 2BH.4
CLR 2DH.4
CLR 2FH.4
AJMP L12
LB3: MOV 25H,#04H ;(25H)=04H调节秒单元的值
SETB 2FH.4
CLR 2DH.4
CLR 2BH.4
AJMP L12
LB2: MOV 25H,#02H ;(25H)=02H,调节分单元的值
SETB 2DH.4
CLR 2BH.4
CLR 2FH.4
AJMP L12
L61: AJMP L611 ;调节时间时注意使用的是十进制,而且注意
L81: AJMP L811 ;分和秒都是60进制,时是24进制
L91: AJMP L911
L6: MOV A,23H
ADD A,#01H
DA A
MOV 23H,A
CJNE A,#24H,L15
L15: JC L112
MOV 23H,#00H
L112: AJMP L12
L8: MOV A,22H
ADD A,#01H
DA A
MOV 22H,A
CJNE A,#60H,L16
L16: JC L112
MOV 22H,#00H
AJMP L12
L9: MOV A,21H
ADD A,#01H
DA A
MOV 21H,A
CJNE A,#60H,L17
L17: JC L112
MOV 21H,#00H
AJMP L12
L611: MOV A,23H
ADD A,#99H
DA A
MOV 23H,A
CJNE A,#99H,L112
MOV 23H,#23H
AJMP L12
L811: MOV A,22H
ADD A,#99H
DA A
MOV 22H,A
CJNE A,#99H,L112
MOV 22H,#59H
AJMP L12
L911: MOV A,21H
ADD A,#99H
DA A
MOV 21H,A
CJNE A,#99H,L112
MOV 21H,#59H
AJMP L12
NOP
NOP
END
小弟不明白的地方 用颜色标出来了.我不明白他怎么把秒位的十.个位一起考虑了?
很多 方案都是分开考虑的.
时钟的基本显示原理应该是:时钟开始显示为0时0分0秒,也就是数码管显示000000,然后每秒秒位加1 ,到9后,10秒位加1,秒位回0。10秒位到5后,即59秒 ,分钟加1,10秒位回0。依次类推,时钟最大的显示值为23小时59分59秒。这里只要确定了1秒的定时时间, 其他位均以此为基准往上累加。
star:
mov a,#00h ;把各个位全部清0
mov a_bit,a
mov b_bit,a
mov c_bit,a
mov d_bit,a
mov e_bit,a
mov f_bit,a
stlop: acall display ;程序的计算部分
inc a_bit ;秒位加1
mov a,a_bit ;送a
cjne a,#10,stlop;如果秒到10那么转到10秒处理
mov a_bit,#00h ;秒位清0
inc b_bit ;10秒位加1
mov a,b_bit ;送a
cjne a,#6,stlop ;如果10秒到了6那么到分处理
mov b_bit,#00h ; 10秒位清0
inc c_bit
mov a,c_bit
cjne a,#10,stlop
mov c_bit,#00h
inc d_bit
mov a,d_bit
cjne a,#6,stlop
mov d_bit,#00h
inc e_bit
mov a,e_bit
cjne a,#10,stlop
mov e_bit,#00h
inc f_bit
mov a,f_bit
cjne a,#3,stlop
mov f_bit,#00h
ajmp stlop ;重新开始计算
不知道这两段 代码的区别.