1樓:匿名使用者
k1 bit p1.0
k2 bit p1.1
k3 bit p1.2
k4 bit p1.3
k5 bit p1.4
k6 bit p1.5
k7 bit p1.6
k8 bit p1.7
min equ 30h
sec equ 31h
sec100 equ 32h
dis_buf equ 33h
buf_min_h equ dis_buf
buf_min_l equ dis_buf+1
buf_sec_h equ dis_buf+2
buf_sec_l equ dis_buf+3
k_old equ 41h
k_new equ 42h
dis_digit equ 43h
dis_index equ 44h
k_old1 equ 45h
k_new1 equ 46h
flag equ 47h
convert equ 48h
org 0000h
jmp main
org 0003h
ljmp int_0
org 0000bh
ljmp timer0
org 0001bh
ljmp timer1
org 0030h
main:
mov sp,#60h
mov p0,#0ffh
mov p2,#0ffh
mov tmod,#011h
mov th0,#0fch
mov tl0,#017h
mov th1,#0dch
clr a
mov tl1,a
mov convert,#00h
mov convert+1 ,#00h
mov convert+2,#00h
mov convert+3 ,#00h
clr a
mov min,#20
mov sec,a
mov sec100,a
mov buf_min_h,#0a4h
mov buf_min_l,#0c0h
mov buf_sec_h,#0c0h
mov buf_sec_l,#0c0h
mov dis_buf+4,#0c0h
mov dis_buf+5,#0c0h
mov dis_buf+6,#0c0h
mov dis_buf+7,#0c0h
mov flag ,#00h
mov k_old,#00h
beep_bl00: mov r3,#10
mov r2,#200
main1100:
cpl p3.7
lcall delay500
lcall delay500
djnz r2,main1100
cpl p3.6
lcall delay500
lcall delay500
lcall delay500
mov r2,#200
main2100:
cpl p3.7
lcall delay500
djnz r2,main2100
djnz r3,main1100
ljmp start
delay500:
mov r7,#230
loop1:
djnz r7,loop1
retstart: mov dis_digit,#0feh
clr a
mov dis_index,a
setb ea
setb et0
setb tr0
setb it0
setb ex0
setb pt0
main_lp:
call key_prog
sjmp main_lp
key_prog:
call k_scan
mov a,k_new
cjne a,k_old,key_p1
jmp end_proc_key
key_p1:
mov r4,#15
key_p2:
mov r7,#10
call delayms
djnz r4,key_p2
call k_scan
mov a,k_new
cjne a,k_old,key_p3
jmp end_proc_key
key_p3:
jb acc.0,proc_k1
jb acc.1,proc_k2
jb acc.2,proc_k3
jb acc.3,proc_k4
ljmp end_proc_key
proc_k1:lcall beep_bl001
inc min
mov a,min ;
cjne a, #100,update_min21
mov min,#00h
update_min21:
mov a,min
mov b,#10
div ab ; a = min / 10
mov dptr,#dis_code
movc a,@a+dptr
mov buf_min_h,a
mov a,min
mov b,#10
div ab
mov a,b
movc a,@a+dptr
mov buf_min_l,a
sjmp end_proc_key
proc_k2:lcall beep_bl001
dec min
mov a,min
cjne a, #255, update_min1
mov min,#99
update_min1:
mov a,min
mov b,#10
div ab
mov dptr,#dis_code
movc a,@a+dptr
mov buf_min_h,a
mov a,min
mov b,#10
div ab
mov a,b
movc a,@a+dptr
mov buf_min_l,a
sjmp end_proc_key
proc_k3: lcall beep_bl001
push psw
inc flag
mov a ,flag
rrc a
jnc stop
clr p3.6
setb et1
setb tr1
pop psw
sjmp end_proc_key
stop:setb p3.6
clr et1
clr tr1
pop psw
sjmp end_proc_key
proc_k4: lcall beep_bl001
mov r3,convert+1
mov convert+1,convert+3
mov convert+3,r3
mov r3,convert
mov convert,convert+2
mov convert+2,r3
lcall conveter
end_proc_key:
ret; 鍵掃瞄子程式
k_scan:
mov p1,#0ffh
mov k_new,#00h
mov a,p1
cpl a
anl a,#0f0h
swap a
mov k_new,a
retusing 0
timer0:
; 定時器0中斷服程式, 用於數碼管的動態掃瞄
push acc
push psw
push ar0
mov th0,#0fch
mov tl0,#017h
mov p2,#0ffh
mov a,#dis_buf
add a,dis_index
mov r0,a
mov a,@r0
mov p0,a
mov p2,dis_digit
mov a,dis_digit
rl a
mov dis_digit,a
inc dis_index
mov r5 , dis_index
cjne r5,#08h,tt
mov dis_index ,#00h
mov dis_digit,#0feh
tt: pop ar0
pop psw
pop acc
reti
timer1:
; 定時器1中斷服務程式, 產生時基訊號10ms
push psw
push acc
push b
push dph
push dpl
mov th1,#0dch
mov tl1,#00h
inc sec100
mov a,sec100
cjne a, #100, end_timer1
mov sec100,#00h
lcall dec_sec
end_timer1:
pop dpl
pop dph
pop b
pop acc
pop psw
reti ;
dec_sec:
dec sec
mov a ,min
jnz obtain
cpl p3.6
mov a ,sec
jnz obtain
mov buf_sec_l,#0c0h
clr tr1
clr et1
beep_bl: mov r3,#10
mov r2,#200
main11:
cpl p3.7
lcall delay500
lcall delay500
djnz r2,main11
cpl p3.6
lcall delay500
lcall delay500
lcall delay500
mov r2,#200
main21:
cpl p3.7
lcall delay500
djnz r2,main21
djnz r3,main11
ljmp obtain
obtain:
mov a,sec
cjne a, #255,update_sec
mov sec,#59
lcall dec_min
update_sec:
mov a,sec
mov b,#10
div ab
mov dptr,#dis_code
movc a,@a+dptr
mov buf_sec_h,a
mov a,sec
mov b,#10
div ab
mov a,b
movc a,@a+dptr
mov buf_sec_l,a
retdec_min:
dec min
mov a,min
cjne a, #255, update_min
mov min,#00h
update_min:
mov a,min
mov b,#10
div ab ; a = min / 10
mov dptr,#dis_code
movc a,@a+dptr
mov buf_min_h,a
mov a,min
mov b,#10
div ab
mov a,b
movc a,@a+dptr
mov buf_min_l,a
retret
; 中斷int0服務程式
int_0:
push psw
push acc
push b
push dph
push dpl
jb k1,rkey1
mov r7,#30
lcall delayms
jb k1,rkey1
ljmp kp1
rkey1 :jb k2,rkey2
mov r7,#30
lcall delayms
jb k2,rkey2
ljmp kp2
rkey2 :jb k3,rkey3
mov r7,#30
lcall delayms
jb k3,rkey3
ljmp kp3
rkey3 : jb k4,rkey4
mov r7,#30
lcall delayms
jb k4,rkey4
ljmp kp4
rkey4: ljmp kp5
kp1: lcall beep_bl001
inc convert
mov a,convert
cjne a,#0ah,kp5
mov convert ,#00h
inc convert+1
mov a,convert+1
cjne a,#0ah,kp5
mov convert+1,#00h
ljmp kp5
kp2: lcall beep_bl001
dec convert
mov a,convert
cjne a,#255,kp5
mov convert,#09h
dec convert+1
mov a,convert+1
cjne a,#255,kp5
mov convert+1,#09h
ljmp kp5
kp3: lcall beep_bl001
inc convert+2
mov a,convert+2
cjne a,#0ah,kp5
mov convert+2 ,#00h
inc convert+3
mov a,convert+3
cjne a,#0ah,kp5
mov convert+3,#00h
ljmp kp5
kp4: lcall beep_bl001
dec convert+2
mov a,convert+2
cjne a,#255,kp5
mov convert+2 ,#09h
dec convert+3
mov a,convert+3
cjne a,#255,kp5
mov convert+3,#09h
ljmp kp5
kp5:lcall conveter
pop dpl
pop dph
pop b
pop acc
pop psw
reti
delayms:
; 延時子程式
dly_lp1:
mov r6,#185
dly_lp2:
nopnop
nopdjnz r6,dly_lp2
djnz r7,dly_lp1
end_dlyms:
ret;蜂鳴器響一聲子程式
beep_bl001: mov r3,#1
putoff: ;
mov r2,#30
main11001:
cpl p3.7
lcall delay500
lcall delay500
djnz r2,main11001
djnz r3,putoff
ret;顯示緩衝區**轉碼子程式
conveter:
mov a,convert
mov dptr,#dis_code
movc a,@a+dptr
mov dis_buf+7,a
mov a,convert+1
mov dptr,#dis_code
movc a,@a+dptr
mov dis_buf+6,a
mov a,convert+2
mov dptr,#dis_code
movc a,@a+dptr
mov dis_buf+5,a
mov a,convert+3
mov dptr,#dis_code
movc a,@a+dptr
mov dis_buf+4,a
ret;查表指令
dis_code:
db 0c0h
db 0f9h
db 0a4h
db 0b0h
db 099h
db 092h
db 082h
db 0f8h
db 080h
db 090h
db 0ffhend
你對c51微控制器的看法,C51微控制器。XX!你怎麼看?
我認為初學者還是要從51開始。雖然很多人建議說不要再學51了,退出時代了。這話就像說有了c語言就別學彙編了一樣。我一直在學51,現在開始學430,雖然剛開始學,但是對430學習還是很有信心的,而且遇到的困難可以很快的解決,這都歸於學習51的透徹吧。別人說我怎麼學51這麼久,我給自己定的目標是,如果5...
51微控制器C51語言的幾個問題,c51微控制器控制12864程式(c語言),顯示幾個字,或一些簡單的圖片就行!先謝謝了!
1.把psw中的第二位用乙個名字a來表示,只要後面使用到a,就是使用psw的第二位。2.sfr是用來給特殊暫存器區的乙個位址命名的,假設在特殊暫存器區有個位址0xac,將其命名為xaf暫存器,就用 sfr xaf 0xac。sbit是針對特殊暫存器區的位位址命名的。因此sbit和sfr都是針對特殊暫...
C51微控制器一鍵多功能
計數嘍,當沒按鍵時,計數為0,當按下按鍵時,計數自加即為1,然後進行判斷當滿足等於1時即p1.1閃爍並確保其他燈滅,當再次按下時,計數再自加即為2,然後進行判斷當滿足等於2時即p1.2閃爍並確保其他燈滅,以此類推。當到了p1.3時,即再次迴圈即可。 include define uchar unsi...