Push button 1 : arah kanan
Push button 2 : arah kiri
Untuk lebih jelasnya , Lihat dibawah ini :
org 0h
CekP20: JB P2.0,CekP21
call RLeft
CekP21: JB P2.1,CekP20
call RRight
sjmp CekP20
;=========================
;
;=========================
RLeft: mov A,#01111111b
RLeft1: mov P0,A
Call delay
JB P2.1,RLeft2
sjmp EndRLeft
RLeft2: RL A
sjmp RLeft1
EndRleft: ret
;
;=========================
;
;=========================
RRight: mov A,#11111110b
RRight1: mov P0,A
call delay
JB P2.0,RRight2
sjmp EndRRight
RRight2: RR A
sjmp RRight1
EndRRight: ret
;=========================
;
;=========================
delay: mov r0,#5
del1: mov r1,#255
del2: mov r2,#255
djnz r2,$
djnz r1,Del2
djnz r0,Del1
ret
end
Selamat mencoba
Tidak ada komentar:
Posting Komentar