国产精品乱码一区-性开放网站-少妇又紧又爽视频-西西大胆午夜人体视频-国产极品一区-欧美成人tv-四虎av在线-国产无遮挡无码视频免费软件-中文字幕亚洲乱码熟女一区二区-日产精品一区二区三区在线观看-亚洲国产亚综合在线区-五月婷婷综合色-亚洲日本视频在线观看-97精品人人妻人人-久久久久久一区二区三区四区别墅-www.免费av-波多野结衣绝顶大高潮-日本在线a一区视频高清视频-强美女免费网站在线视频-亚洲永久免费
機械社區
標題:
5-LED模擬交通燈單片機C語言程序設計實訓100例
[打印本頁]
作者:
2369353531
時間:
2018-6-21 09:06
標題:
5-LED模擬交通燈單片機C語言程序設計實訓100例
(, 下載次數: 45)
上傳
點擊文件名下載附件
下載積分: 威望 -10 點
(, 下載次數: 39)
上傳
點擊文件名下載附件
下載積分: 威望 -10 點
) q% k# s6 q8 e4 h: G
#include<reg51.h>
) U1 Z. r+ H- ?6 l
#define uchar unsigned char
$ b) c0 ~: } R7 H! \
#define uint unsigned int
& K; O; R+ S }& V: a, t
sbit RED_A=P0^0; //東西向燈
/ S. G# e4 h" U& _/ T9 d
sbit YELLOW_A=P0^1;
% T3 O7 [( v& @% t
sbit GREEN_A=P0^2;
3 l- o2 ^+ L- h9 L' W& q& O$ a/ e
sbit RED_B=P0^3; //南北向燈
d3 h4 D: N! j& v% M# O y( N
sbit YELLOW_B=P0^4;
4 U& d; Z" ^# k( E7 ]4 a
sbit GREEN_B=P0^5;
C) p, ]. v6 P" J
uchar Flash_Count=0,Operation_Type=1; //閃爍次數,操作類型變量
9 w3 m( c& a' B$ q- Z5 J I
1 w q2 d$ B: [ f4 F; @& C
//延時
& p" A5 E8 k% ?' Q! U
void DelayMS(uint x)
$ w1 Z6 g1 J& a
{
2 l" \- \6 @7 ]( Q6 y, ]8 A. y
uchar i;
* I/ {3 y6 k5 O8 m+ t2 u
while(x--) for(i=0;i<120;i++);
; ~) f/ d( o T9 T2 r V
}
1 B% p( ^# ?: [$ O& a
//交通燈切換
" y: D0 M8 K% m
void Traffic_Light()
3 {. b5 Z" g/ i; s) ~/ X' N+ V
{
3 }# L w$ F& V0 [/ B' r
switch(Operation_Type)
+ v9 J1 B! l5 |4 G* p
{
# z; j5 J6 b7 v0 N1 S$ Q
case 1: //東西向綠燈與南北向紅燈亮
2 z; k5 q5 i9 j J1 L
RED_A=1;YELLOW_A=1;GREEN_A=0;
Z# w! `' j, D0 l
RED_B=0;YELLOW_B=1;GREEN_B=1;
5 x7 A/ c( m; E$ ]: |, i
DelayMS(2000);
& @0 W) J9 I. N: [; |
Operation_Type=2;
, `) b& K+ f! F! b' `0 g u. x O
break;
5 {: W/ i/ Q8 t: \7 s7 \
case 2: //東西向黃燈閃爍,綠燈關閉
2 `0 p7 r% U" }4 N" W6 x1 F
DelayMS(300);
2 q$ @) f6 V: u* G5 B6 z$ t; T! t
YELLOW_A=~YELLOW_A;GREEN_A=1;
" T" n+ g/ |9 I0 d, T
if(++Flash_Count!=10) return; //閃爍 5 次
# ]4 T6 ~% ?$ }6 P4 Q3 n
Flash_Count=0;
) @6 p" J* D% ]; J7 ~* H4 H& o
Operation_Type=3;
% O3 u' ^/ `9 W5 H7 s. I) O' I
break;
) a3 `* M, D1 k- j
case 3: //東西向紅燈,南北向綠燈亮
% L& G% q Z- N. _4 Y$ i& H0 Q/ _
RED_A=0;YELLOW_A=1;GREEN_A=1;
' x! N/ C; F2 y+ v
RED_B=1;YELLOW_B=1;GREEN_B=0;
. C7 [0 `) r) J* X% G% u6 _: y2 `, E& D
DelayMS(2000);
, b5 G7 ~$ E8 j9 a4 r, n
Operation_Type=4;
' w3 H& s8 ~. ^1 `
break;
: |9 m- r8 F4 f7 i
case 4: //南北向黃燈閃爍 5 次
6 P) W+ \; W$ x8 Y6 A( t& a# ]
DelayMS(300);
0 `% A4 o% e. P2 d6 [8 H
YELLOW_B=~YELLOW_B;GREEN_B=1;
5 M1 W- u" i9 T& s. m( I8 |6 D2 t
if(++Flash_Count!=10) return;
6 ]% X* q" M" m; g) J4 q% b8 V7 i
Flash_Count=0;
( v3 ?0 g$ m, I% {6 U J& U+ G
Operation_Type=1;
# l1 F0 z2 T9 \' }1 q0 P
}
, d: R- {8 i, T+ j7 Q/ }
}
2 u6 l# B* K( O
//主程序
6 u% c7 ?7 }2 n
void main()
, H$ }% i0 t3 V' ?, ^
{
: _) `+ l- }% l( [. o& d7 v8 `
while(1) Traffic_Light();
$ j2 A7 M6 P4 W
}
' f$ r; w/ h, _- G" G; u
) U' s5 a1 R- q6 D
( M7 _) P* R! Q$ t8 v, Z
1 g& _6 g3 b' x" L0 u% B9 Z
歡迎光臨 機械社區 (http://m.whclglass.com.cn/)
Powered by Discuz! X3.5