所有的财富值都给你们!!!求单片机高手帮忙编写一个用定时器进行中断的秒表程序并仿真。仿真成功后把程
答案:2 悬赏:60
解决时间 2021-01-04 16:58
- 提问者网友:恋你成殇
- 2021-01-04 04:35
有的财富值都给你们!求单片机高手帮忙编写一个用定时器进行中断的秒表程序并仿真。仿真成功后把程序源代码和仿真文件发给我,万分感谢!!!!
最佳答案
- 二级知识专家网友:不服输就别哭
- 2021-01-04 05:35
CLK CJNE A,#2;": MOV R0,A INC SCANLED MOV A,@R0 MOVC A,@A+DPTR JNB DOT,T1DIS1 ORL A;0" 00H DB 60H ;"3" 03H DB 66H ;8" 08H DB 0F6H ;"9",#DAT MOV A,SCANLED ADD A,R0 MOV R0,A MOV A,SCANLED JNZ T101 MOV P2,#01H SETB DOT SJMP T1DIST101: DEC A JNZ T102 MOV P2;A" 0AH DB 3EH ;"B" 0BH DB 9CH ;"C" 0CH DB 7AH ;"D" 0DH DB 9EH ;"E" 0EH DB 8EH ;"F" 0FH DB 00H ;" " 10HEND; 07H DB 0FEH ,EXT00EXT00,#04H SETB DOT SJMP T1DIST103;"",#0ECH MOV TL1,KEYVALLOOP1: JNZ LOOP2 ;启动 SETB TR0 SJMP LOOPLOOP2: DEC A JNZ LOOP3 ;暂停 CLR TR0 SJMP LOOPLOOP3: POP ACC RETIT0ISR: DEC A JNZ LOOP ;清零 MOV 36H,T0ISRE MOV CLK,#0 INC 36H MOV A,T1END MOV SCANLED; 05H DB 0BEH ,#0T1END: POP ACC RETILEDTAB;",#0ECH MOV TL1;" 02H DB 0F2H ,#0 SETB IT0 SETB EX0 CLR TR0 SETB ET0 MOV R2,#0 SETB TR1 SETB ET1 SETB EALOOP: MOV A;1" 01H DB 0DAH ;"2",#078H MOV KEYVAL,#2 MOV 33H,34H CJNE A,#6; 09H DB 0EEH ,#08H CLR DOTT1DIS: MOV A: JC EXT01 MOV KEYVAL,#0EXT01,T0ISRE MOV 35H,#0 INC 34H MOV A,#78H SETB TR1 MOV DPTR,#LEDTABT100,#10H MOV 34H,#10H MOV 35H: DB 0FCH ,#0 MOV 33H,#0 SJMP LOOPEXTINT0,#01HT1DIS1,#3CH MOV TL0,#0B0H SETB TR0 INC CLK MOV A,36H CJNE A,#10,T0ISRE MOV 36H,T0ISRE MOV 34H,#0 INC 33H MOV A,#0T0ISRE,#10H MOV 36H,#10H MOV CLK,SCANLED CJNE A,#4: CPL A MOV P0;6" 06H DB 0E0H ;"7",#10;4" 04H DB 0B6H ;"5",#0 MOV 35H,#0 MOV 34H,#0 INC 35H MOV A,35H CJNE A: PUSH ACC CLR TR1 MOV TH1;": PUSH ACC INC KEYVAL MOV A,KEYVAL CJNE A,#3,33H CJNE A,#10,T0ISRE MOV 33HKEYVAL EQU 30HDAT EQU 33HSCANLED EQU 39HCLK EQU 77HSEC EQU 78HSEC1 EQU 79HSEC2 EQU 7AHDOT BIT 00HORG 0000HLJMP MAINORG 0003HLJMP EXTINT0ORG 000BHLJMP T0ISR : MOV P2,#0B0H MOV TH1,#03CH MOV TL0: POP ACC RETIT1ISR,#02H CLR DOT SJMP T1DIST102: DEC A JNZ T103 MOV P2;50ms定时ORG 001BHLJMP T1ISR ;扫描显示ORG 0030HMAIN: MOV SP,#5FH MOV TMOD,#11H MOV TH0: PUSH ACC CLR TR0 MOV TH0
全部回答
- 1楼网友:情战凌云蔡小葵
- 2021-01-04 06:10
keyval equ 30h
dat equ 33h
scanled equ 39h
clk equ 77h
sec equ 78h
sec1 equ 79h
sec2 equ 7ah
dot bit 00h
org 0000h
ljmp main
org 0003h
ljmp extint0
org 000bh
ljmp t0isr ;50ms定时
org 001bh
ljmp t1isr ;扫描显示
org 0030h
main:
mov sp,#5fh
mov tmod,#11h
mov th0,#03ch
mov tl0,#0b0h
mov th1,#0ech
mov tl1,#078h
mov keyval,#2
mov 33h,#10h
mov 34h,#10h
mov 35h,#10h
mov 36h,#10h
mov clk,#0
setb it0
setb ex0
clr tr0
setb et0
mov r2,#0
setb tr1
setb et1
setb ea
loop:
mov a,keyval
loop1:
jnz loop2 ;启动
setb tr0
sjmp loop
loop2:
dec a
jnz loop3 ;暂停
clr tr0
sjmp loop
loop3:
dec a
jnz loop ;清零
mov 36h,#0
mov 35h,#0
mov 34h,#0
mov 33h,#0
sjmp loop
extint0:
push acc
inc keyval
mov a,keyval
cjne a,#3,ext00
ext00:
jc ext01
mov keyval,#0
ext01:
pop acc
reti
t0isr:
push acc
clr tr0
mov th0,#3ch
mov tl0,#0b0h
setb tr0
inc clk
mov a,clk
cjne a,#2,t0isre
mov clk,#0
inc 36h
mov a,36h
cjne a,#10,t0isre
mov 36h,#0
inc 35h
mov a,35h
cjne a,#10,t0isre
mov 35h,#0
inc 34h
mov a,34h
cjne a,#6,t0isre
mov 34h,#0
inc 33h
mov a,33h
cjne a,#10,t0isre
mov 33h,#0
t0isre:
pop acc
reti
t1isr:
push acc
clr tr1
mov th1,#0ech
mov tl1,#78h
setb tr1
mov dptr,#ledtab
t100:
mov r0,#dat
mov a,scanled
add a,r0
mov r0,a
mov a,scanled
jnz t101
mov p2,#01h
setb dot
sjmp t1dis
t101:
dec a
jnz t102
mov p2,#02h
clr dot
sjmp t1dis
t102:
dec a
jnz t103
mov p2,#04h
setb dot
sjmp t1dis
t103:
mov p2,#08h
clr dot
t1dis:
mov a,@r0
movc a,@a+dptr
jnb dot,t1dis1
orl a,#01h
t1dis1:
cpl a
mov p0,a
inc scanled
mov a,scanled
cjne a,#4,t1end
mov scanled,#0
t1end:
pop acc
reti
ledtab: db 0fch ;"0" 00h
db 60h ;"1" 01h
db 0dah ;"2" 02h
db 0f2h ;"3" 03h
db 66h ;"4" 04h
db 0b6h ;"5" 05h
db 0beh ;"6" 06h
db 0e0h ;"7" 07h
db 0feh ;"8" 08h
db 0f6h ;"9" 09h
db 0eeh ;"a" 0ah
db 3eh ;"b" 0bh
db 9ch ;"c" 0ch
db 7ah ;"d" 0dh
db 9eh ;"e" 0eh
db 8eh ;"f" 0fh
db 00h ;" " 10h
end
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯