Câu hỏi: Lập trình điều khiển đèn nháy: “VI ĐIỀU KHIỂN 89C51” ppt

Vũ Duy Khang - Điện A - CĐ 44 Page 1
Câu hỏi: Lập trình điều khiển đèn nháy: “VI ĐIỀU KHIỂN 89C51”
Dùng đèn led điều khiển đấu anốt chung, tại cổng p1,p2 theo yêu cầu sau:
1)Hiện từng chữ từ trái sang phải với tốc độ 1s/ chữ.
2)Sáng dần từng kí tự từ trái sang phải với tốc độ 0,1s/ 1 kí tự.
3)Sáng dồn từ trái sang phải với tốc độ 0,1s /1 kí tự.
4)Chớp tắt dòng chữ trên 3 lần với tốc độ 0,5 s/1 lần.
1) Hiện dần từng chữ từ trái sang phải với tốc độ 1 giây/1 chữ:
org 0h
mov tmod,#1
mov p1,#1
mov p2,#1
yeucau1:
mov p1,#11111100b
call delay1
mov p1,#11000000b
call delay1
mov p1,#00000000b
mov p2,#11111000b
lcall delay1
mov p2,#00000000b
Vũ Duy Khang - Điện A - CĐ 44 Page 2
call delay1
mov p1,#11111111b
mov p2,#11111111b
call delay1
jmp yeucau1
delay1: ;tao tre 1 giay
mov r7,#20
kt:
mov th0,#3ch

mov tl0,#0b0h
setb tr0
loop:
jnb tf0,loop
clr tr0
clr tf0
djnz r7,kt
ret
end
2) Hiện dần từng kí tự từ trái sang phải với tốc độ 0,1 giây/1 kí tự:
org 0h
mov tmod,#1
Vũ Duy Khang - Điện A - CĐ 44 Page 3
mov p2,#1
mov p1,#1
yeucau2:
mov p1,#11111110b
call delay01
mov p1,#11111100b
call delay01
mov p1,#11111000b
call delay01
mov p1,#11110000b
call delay01
mov p1,#11100000b
call delay01
mov p1,#11000000b
call delay01
mov p1,#10000000b
call delay01

mov p1,#00000000b
call delay01
mov p2,#11111110b
Vũ Duy Khang - Điện A - CĐ 44 Page 4
call delay01
mov p2,#11111100b
call delay01
mov p2,#11111000b
call delay01
mov p2,#11110000b
call delay01
mov p2,#11100000b
call delay01
mov p2,#11000000b
call delay01
mov p2,#10000000b
call delay01
mov p2,#00000000b
call delay01
mov p2,#11111111b
call delay01
mov p1,#1
jmp yeucau2
delay01:
mov r7,#2
Vũ Duy Khang - Điện A - CĐ 44 Page 5
kt:
mov th0,#3ch
mov tl0,#0b0h
setb tr0

loop:
jnb tf0,loop
clr tr0
clr tf0
djnz r7,kt
ret
end
3)Sáng dồn từ trái sang phải với tốc độ 0,1s /1 kí tự:
org 0h
mov p1,#1
mov p2,#1
mov tmod,#1
sangdon:
clr p2.7
call delay
Vũ Duy Khang - Điện A - CĐ 44 Page 6
setb p2.7
clr p2.6
call delay
setb p2.6
clr p2.5
call delay
setb p2.5
clr p2.4
call delay
setb p2.4
clr p2.3
call delay
setb p2.3
clr p2.2

call delay
setb p2.2
clr p2.1
call delay
setb p2.1
clr p2.0
call delay
Vũ Duy Khang - Điện A - CĐ 44 Page 7
setb p2.0
clr p1.7
call delay
setb p1.7
clr p1.6
call delay
setb p1.6
clr p1.5
call delay
setb p1.5
clr p1.4
call delay
setb p1.4
clr p1.3
call delay
setb p1.3
clr p1.2
call delay
setb p1.2
clr p1.1
call delay
Vũ Duy Khang - Điện A - CĐ 44 Page 8

setb p1.1
clr p1.0
call delay ;;;;;;;;;;;;;;;;;;;
clr p2.7
call delay
setb p2.7
clr p2.6
call delay
setb p2.6
clr p2.5
call delay
setb p2.5
clr p2.4
call delay
setb p2.4
clr p2.3
call delay
setb p2.3
clr p2.2
call delay
setb p2.2
Vũ Duy Khang - Điện A - CĐ 44 Page 9
clr p2.1
call delay
setb p2.1
clr p2.0
call delay
setb p2.0
clr p1.7
call delay

setb p1.7
clr p1.6
call delay
setb p1.6
clr p1.5
call delay
setb p1.5
clr p1.4
call delay
setb p1.4
clr p1.3
call delay
setb p1.3
Vũ Duy Khang - Điện A - CĐ 44 Page 10
clr p1.2
call delay
setb p1.2
clr p1.1
call delay ;;;;;;;;;;;;;;;;;;;;
clr p2.7
call delay
setb p2.7
clr p2.6
call delay
setb p2.6
clr p2.5
call delay
setb p2.5
clr p2.4
call delay

setb p2.4
clr p2.3
call delay
setb p2.3
clr p2.2
Vũ Duy Khang - Điện A - CĐ 44 Page 11
call delay
setb p2.2
clr p2.1
call delay
setb p2.1
clr p2.0
call delay
setb p2.0
clr p1.7
call delay
setb p1.7
clr p1.6
call delay
setb p1.6
clr p1.5
call delay
setb p1.5
clr p1.4
call delay
setb p1.4
clr p1.3
Vũ Duy Khang - Điện A - CĐ 44 Page 12
call delay
setb p1.3

clr p1.2
call delay ;;;;;;;;;;;;;;
clr p2.7
call delay
setb p2.7
clr p2.6
call delay
setb p2.6
clr p2.5
call delay
setb p2.5
clr p2.4
call delay
setb p2.4
clr p2.3
call delay
setb p2.3
clr p2.2
call delay
Vũ Duy Khang - Điện A - CĐ 44 Page 13
setb p2.2
clr p2.1
call delay
setb p2.1
clr p2.0
call delay
setb p2.0
clr p1.7
call delay
setb p1.7

clr p1.6
call delay
setb p1.6
clr p1.5
call delay
setb p1.5
clr p1.4
call delay
setb p1.4
clr p1.3
call delay ;;;;;;;;;;;;
Vũ Duy Khang - Điện A - CĐ 44 Page 14
clr p2.7
call delay
setb p2.7
clr p2.6
call delay
setb p2.6
clr p2.5
call delay
setb p2.5
clr p2.4
call delay
setb p2.4
clr p2.3
call delay
setb p2.3
clr p2.2
call delay
setb p2.2

clr p2.1
call delay
setb p2.1
Vũ Duy Khang - Điện A - CĐ 44 Page 15
clr p2.0
call delay
setb p2.0
clr p1.7
call delay
setb p1.7
clr p1.6
call delay
setb p1.6
clr p1.5
call delay
setb p1.5
clr p1.4
call delay ;;;;
clr p2.7
call delay
setb p2.7
clr p2.6
call delay
setb p2.6
clr p2.5
Vũ Duy Khang - Điện A - CĐ 44 Page 16
call delay
setb p2.5
clr p2.4
call delay

setb p2.4
clr p2.3
call delay
setb p2.3
clr p2.2
call delay
setb p2.2
clr p2.1
call delay
setb p2.1
clr p2.0
call delay
setb p2.0
clr p1.7
call delay
setb p1.7
clr p1.6
Vũ Duy Khang - Điện A - CĐ 44 Page 17
call delay
setb p1.6
clr p1.5
call delay ;;;;;;;;;;;
clr p2.7
call delay
setb p2.7
clr p2.6
call delay
setb p2.6
clr p2.5
call delay

setb p2.5
clr p2.4
call delay
setb p2.4
clr p2.3
call delay
setb p2.3
clr p2.2
call delay
Vũ Duy Khang - Điện A - CĐ 44 Page 18
setb p2.2
clr p2.1
call delay
setb p2.1
clr p2.0
call delay
setb p2.0
clr p1.7
call delay
setb p1.7
clr p1.6
call delay ;;;;;;;;;;;;;;;;;
clr p2.7
call delay
setb p2.7
clr p2.6
call delay
setb p2.6
clr p2.5
call delay

setb p2.5
Vũ Duy Khang - Điện A - CĐ 44 Page 19
clr p2.4
call delay
setb p2.4
clr p2.3
call delay
setb p2.3
clr p2.2
call delay
setb p2.2
clr p2.1
call delay
setb p2.1
clr p2.0
call delay
setb p2.0
clr p1.7
call delay ;;;;;;;;;;;;;
clr p2.7
call delay
setb p2.7
clr p2.6
Vũ Duy Khang - Điện A - CĐ 44 Page 20
call delay
setb p2.6
clr p2.5
call delay
setb p2.5
clr p2.4

call delay
setb p2.4
clr p2.3
call delay
setb p2.3
clr p2.2
call delay
setb p2.2
clr p2.1
call delay
setb p2.1
clr p2.0
call delay ;;;
clr p2.7
call delay
Vũ Duy Khang - Điện A - CĐ 44 Page 21
setb p2.7
clr p2.6
call delay
setb p2.6
clr p2.5
call delay
setb p2.5
clr p2.4
call delay
setb p2.4
clr p2.3
call delay
setb p2.3
clr p2.2

call delay
setb p2.2
clr p2.1
call delay ;;;;;;;;;;
clr p2.7
call delay
setb p2.7
Vũ Duy Khang - Điện A - CĐ 44 Page 22
clr p2.6
call delay
setb p2.6
clr p2.5
call delay
setb p2.5
clr p2.4
call delay
setb p2.4
clr p2.3
call delay
setb p2.3
clr p2.2
call delay ;;;;;;;;;
clr p2.7
call delay
setb p2.7
clr p2.6
call delay
setb p2.6
clr p2.5
Vũ Duy Khang - Điện A - CĐ 44 Page 23

call delay
setb p2.5
clr p2.4
call delay
setb p2.4
clr p2.3
call delay ;;;;;
clr p2.7
call delay
setb p2.7
clr p2.6
call delay
setb p2.6
clr p2.5
call delay
setb p2.5
clr p2.4
call delay ;;;;;;;;;
clr p2.7
call delay
setb p2.7
Vũ Duy Khang - Điện A - CĐ 44 Page 24
clr p2.6
call delay
setb p2.6
clr p2.5
call delay ;;;;;;;;;;
clr p2.7
call delay
setb p2.7

clr p2.6
call delay ;;;;;;;;;;;
clr p2.7
call delay
mov p2,#1
mov p1,#1
jmp sangdon
delay: ;tao tre 0,1 giay
mov r7,#2
kt:
mov th0,#3ch
mov tl0,#0b0h
setb tr0
Vũ Duy Khang - Điện A - CĐ 44 Page 25
loop:
jnb tf0,loop
clr tr0
clr tf0
djnz r7,kt
ret
end
4)Chớp tắt dòng chữ trên 3 lần với tốc độ 0,5 s/1 lần:
org 0h
mov tmod,#1
mov p1,#1
mov p2,#1
yeucau4:
choptat:
call tat
call delay05

call bat
call delay05
call tat
call delay05