求单片机汇编语言程序解释 5
SECGEEQU40HSECSHEQU41HMINGEEQU42HMINSHEQU43HHOUGEEQU44HHOUSHEQU45HINTCSEQU46HORG0000H...
SECGE EQU 40H
SECSH EQU 41H
MINGE EQU 42H
MINSH EQU 43H
HOUGE EQU 44H
HOUSH EQU 45H
INTCS EQU 46H
ORG 0000H
START: AJMP MAIN
ORG 000BH
LJMP PITO
ORG 0030H
MAIN: MOV SP, #50H
MOV PSW, #00H
MOV R0, #20H
MOV R6, #70H
MOV INTCS, #14H
CLR A
ML1: MOV @R0, A ;A的值送R0指向的地址的内容
INC R0
DJNZ R6, ML1
MOV TMOD, #01H
MOV TH0, #03CH
MOV TL0, #0B0H ;定时/计数器0置初值
CLR TR0
SETB EA
SETB ET0 ;ET0置1,开定时/计数器0中断
MOV 46H, #0BH
TSF: MOV 79H, #0BH
MOV 7AH, #0BH
MOV 7BH, #0BH
MOV 7CH, #0BH
MOV 7DH, #0BH
MOV 7EH, #0AH
SETB 20H.1
UU: LCALL DISP ;调显示子程序,显示"P.
LCALL KEY
JB ACC.0,UU
KSFSF: CLR 20H.1
LCALL DISP0
LCALL DISP
LCALL KEY
JB ACC.0,KSFSF
YUNXIN: SETB TR0
LCALL DISP0
LCALL DISP
LCALL KEY
JB ACC.0,YUNXIN
KEYSF: LCALL KEY
JZ SETCLK
LCALL DISP0
LCALL DISP
AJMP KEYSF
SETCLK: CLR TR0
LCALL DISP0
LCALL DISP
LCALL KEY
JZ SETCLK
JNB ACC.0, A1
KEYSF0: LCALL KEY
JZ YUNXIN
LCALL DISP0
LCALL DISP
SJMP KEYSF0
KEY:
MOV P1, #0FFH ;向P1口写入显示信息
MOV A, P1
CPL A
ANL A, #0FH
RET
A1: JB ACC.1, A2 ;不是B键,转A2
KEYSF1: LCALL KEY ;判B键释放?
JZ ADDHOUR ;B键释放,时加1
LCALL DISP0
LCALL DISP
AJMP KEYSF1
A2: JB ACC.2, A3 ;不是C键按下,转A3
KEYSF2: LCALL KEY ;判C键释放?
JZ ADDMIN ;C键释放,分加1
LCALL DISP0
LCALL DISP
AJMP KEYSF2
A3: JB ACC.3, A4 ;不是D键按下,转A4
KEYSF3: LCALL KEY ;判D键释放?
JZ ADDSEC ;D键释放,秒加1
LCALL DISP0
LCALL DISP
AJMP KEYSF3
A4: LJMP UU
ADDHOUR:MOV R0, #HOUSH ;取时的十位送R0
LCALL DADD1
MOV A, R2
XRL A, #24H ;时满了24吗?
JNZ ADD1 ;时未满24,转ADD1
LCALL CLR0 ;满24,时显示区清零 展开
SECSH EQU 41H
MINGE EQU 42H
MINSH EQU 43H
HOUGE EQU 44H
HOUSH EQU 45H
INTCS EQU 46H
ORG 0000H
START: AJMP MAIN
ORG 000BH
LJMP PITO
ORG 0030H
MAIN: MOV SP, #50H
MOV PSW, #00H
MOV R0, #20H
MOV R6, #70H
MOV INTCS, #14H
CLR A
ML1: MOV @R0, A ;A的值送R0指向的地址的内容
INC R0
DJNZ R6, ML1
MOV TMOD, #01H
MOV TH0, #03CH
MOV TL0, #0B0H ;定时/计数器0置初值
CLR TR0
SETB EA
SETB ET0 ;ET0置1,开定时/计数器0中断
MOV 46H, #0BH
TSF: MOV 79H, #0BH
MOV 7AH, #0BH
MOV 7BH, #0BH
MOV 7CH, #0BH
MOV 7DH, #0BH
MOV 7EH, #0AH
SETB 20H.1
UU: LCALL DISP ;调显示子程序,显示"P.
LCALL KEY
JB ACC.0,UU
KSFSF: CLR 20H.1
LCALL DISP0
LCALL DISP
LCALL KEY
JB ACC.0,KSFSF
YUNXIN: SETB TR0
LCALL DISP0
LCALL DISP
LCALL KEY
JB ACC.0,YUNXIN
KEYSF: LCALL KEY
JZ SETCLK
LCALL DISP0
LCALL DISP
AJMP KEYSF
SETCLK: CLR TR0
LCALL DISP0
LCALL DISP
LCALL KEY
JZ SETCLK
JNB ACC.0, A1
KEYSF0: LCALL KEY
JZ YUNXIN
LCALL DISP0
LCALL DISP
SJMP KEYSF0
KEY:
MOV P1, #0FFH ;向P1口写入显示信息
MOV A, P1
CPL A
ANL A, #0FH
RET
A1: JB ACC.1, A2 ;不是B键,转A2
KEYSF1: LCALL KEY ;判B键释放?
JZ ADDHOUR ;B键释放,时加1
LCALL DISP0
LCALL DISP
AJMP KEYSF1
A2: JB ACC.2, A3 ;不是C键按下,转A3
KEYSF2: LCALL KEY ;判C键释放?
JZ ADDMIN ;C键释放,分加1
LCALL DISP0
LCALL DISP
AJMP KEYSF2
A3: JB ACC.3, A4 ;不是D键按下,转A4
KEYSF3: LCALL KEY ;判D键释放?
JZ ADDSEC ;D键释放,秒加1
LCALL DISP0
LCALL DISP
AJMP KEYSF3
A4: LJMP UU
ADDHOUR:MOV R0, #HOUSH ;取时的十位送R0
LCALL DADD1
MOV A, R2
XRL A, #24H ;时满了24吗?
JNZ ADD1 ;时未满24,转ADD1
LCALL CLR0 ;满24,时显示区清零 展开
3个回答
展开全部
注释了一下,这个程序不全,编程也很不规范。
SECGE EQU 40H
SECSH EQU 41H
MINGE EQU 42H
MINSH EQU 43H
HOUGE EQU 44H
HOUSH EQU 45H
INTCS EQU 46H
ORG 0000H
START: AJMP MAIN
ORG 000BH
LJMP PITO
ORG 0030H
MAIN: MOV SP, #50H ;栈顶为50H
MOV PSW, #00H ;工作寄存器为0,各标志清零
MOV R0, #20H
MOV R6, #70H
MOV INTCS, #14H
CLR A
ML1: MOV @R0, A ;A的值送R0指向的地址的内容
INC R0
DJNZ R6, ML1 ;20H~8FH清零
MOV TMOD, #01H ;定时器0为16位定时器模式
MOV TH0, #03CH
MOV TL0, #0B0H ;定时/计数器0置初值,50ms中断一次
CLR TR0 ;关闭定时器0计数
SETB EA ;开中断
SETB ET0 ;ET0置1,开定时/计数器0中断
MOV 46H, #0BH
TSF: MOV 79H, #0BH
MOV 7AH, #0BH
MOV 7BH, #0BH
MOV 7CH, #0BH
MOV 7DH, #0BH
MOV 7EH, #0AH
SETB 20H.1
UU: LCALL DISP ;调显示子程序,显示"P.
LCALL KEY ;取键值
JB ACC.0,UU ;没有按键,循环等待
KSFSF: CLR 20H.1 ;有按键,清标志
LCALL DISP0 ;显示P0
LCALL DISP ;显示P
LCALL KEY ;取键值
JB ACC.0,KSFSF ;没有按键循环等待
YUNXIN: SETB TR0 ;有按键,开定时器0
LCALL DISP0 ;显示P0
LCALL DISP ;显示P
LCALL KEY ;取键值
JB ACC.0,YUNXIN ;没有按键循环等待
KEYSF: LCALL KEY ;有按键继续取键值
JZ SETCLK ;键值为0,调用SETCLK
LCALL DISP0 ;显示P0
LCALL DISP ;显示P
AJMP KEYSF ;循环
SETCLK: CLR TR0 ;关定时器0
LCALL DISP0 ;显示P0
LCALL DISP ;显示P
LCALL KEY ;取键值
JZ SETCLK ;为0循环等待
JNB ACC.0, A1 ;不为0且最低位为0转A1
KEYSF0: LCALL KEY ;否则重取键值
JZ YUNXIN ;键值为0调用YUNXIN
LCALL DISP0 ;显示P0
LCALL DISP ;显示P
SJMP KEYSF0 ;循环
KEY:
MOV P1, #0FFH ;向P1口写入显示信息
MOV A, P1
CPL A
ANL A, #0FH
RET
A1: JB ACC.1, A2 ;不是B键,转A2
KEYSF1: LCALL KEY ;判B键释放?
JZ ADDHOUR ;B键释放,时加1
LCALL DISP0
LCALL DISP
AJMP KEYSF1
A2: JB ACC.2, A3 ;不是C键按下,转A3
KEYSF2: LCALL KEY ;判C键释放?
JZ ADDMIN ;C键释放,分加1
LCALL DISP0
LCALL DISP
AJMP KEYSF2
A3: JB ACC.3, A4 ;不是D键按下,转A4
KEYSF3: LCALL KEY ;判D键释放?
JZ ADDSEC ;D键释放,秒加1
LCALL DISP0
LCALL DISP
AJMP KEYSF3
A4: LJMP UU
ADDHOUR:MOV R0, #HOUSH ;取时的十位送R0
LCALL DADD1
MOV A, R2
XRL A, #24H ;时满了24吗?
JNZ ADD1 ;时未满24,转ADD1
LCALL CLR0 ;满24,时显示区清零
SECGE EQU 40H
SECSH EQU 41H
MINGE EQU 42H
MINSH EQU 43H
HOUGE EQU 44H
HOUSH EQU 45H
INTCS EQU 46H
ORG 0000H
START: AJMP MAIN
ORG 000BH
LJMP PITO
ORG 0030H
MAIN: MOV SP, #50H ;栈顶为50H
MOV PSW, #00H ;工作寄存器为0,各标志清零
MOV R0, #20H
MOV R6, #70H
MOV INTCS, #14H
CLR A
ML1: MOV @R0, A ;A的值送R0指向的地址的内容
INC R0
DJNZ R6, ML1 ;20H~8FH清零
MOV TMOD, #01H ;定时器0为16位定时器模式
MOV TH0, #03CH
MOV TL0, #0B0H ;定时/计数器0置初值,50ms中断一次
CLR TR0 ;关闭定时器0计数
SETB EA ;开中断
SETB ET0 ;ET0置1,开定时/计数器0中断
MOV 46H, #0BH
TSF: MOV 79H, #0BH
MOV 7AH, #0BH
MOV 7BH, #0BH
MOV 7CH, #0BH
MOV 7DH, #0BH
MOV 7EH, #0AH
SETB 20H.1
UU: LCALL DISP ;调显示子程序,显示"P.
LCALL KEY ;取键值
JB ACC.0,UU ;没有按键,循环等待
KSFSF: CLR 20H.1 ;有按键,清标志
LCALL DISP0 ;显示P0
LCALL DISP ;显示P
LCALL KEY ;取键值
JB ACC.0,KSFSF ;没有按键循环等待
YUNXIN: SETB TR0 ;有按键,开定时器0
LCALL DISP0 ;显示P0
LCALL DISP ;显示P
LCALL KEY ;取键值
JB ACC.0,YUNXIN ;没有按键循环等待
KEYSF: LCALL KEY ;有按键继续取键值
JZ SETCLK ;键值为0,调用SETCLK
LCALL DISP0 ;显示P0
LCALL DISP ;显示P
AJMP KEYSF ;循环
SETCLK: CLR TR0 ;关定时器0
LCALL DISP0 ;显示P0
LCALL DISP ;显示P
LCALL KEY ;取键值
JZ SETCLK ;为0循环等待
JNB ACC.0, A1 ;不为0且最低位为0转A1
KEYSF0: LCALL KEY ;否则重取键值
JZ YUNXIN ;键值为0调用YUNXIN
LCALL DISP0 ;显示P0
LCALL DISP ;显示P
SJMP KEYSF0 ;循环
KEY:
MOV P1, #0FFH ;向P1口写入显示信息
MOV A, P1
CPL A
ANL A, #0FH
RET
A1: JB ACC.1, A2 ;不是B键,转A2
KEYSF1: LCALL KEY ;判B键释放?
JZ ADDHOUR ;B键释放,时加1
LCALL DISP0
LCALL DISP
AJMP KEYSF1
A2: JB ACC.2, A3 ;不是C键按下,转A3
KEYSF2: LCALL KEY ;判C键释放?
JZ ADDMIN ;C键释放,分加1
LCALL DISP0
LCALL DISP
AJMP KEYSF2
A3: JB ACC.3, A4 ;不是D键按下,转A4
KEYSF3: LCALL KEY ;判D键释放?
JZ ADDSEC ;D键释放,秒加1
LCALL DISP0
LCALL DISP
AJMP KEYSF3
A4: LJMP UU
ADDHOUR:MOV R0, #HOUSH ;取时的十位送R0
LCALL DADD1
MOV A, R2
XRL A, #24H ;时满了24吗?
JNZ ADD1 ;时未满24,转ADD1
LCALL CLR0 ;满24,时显示区清零
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询