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 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

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.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

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 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.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

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.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

call bat
call delay05
call tat
call delay05