找回密码
 注册
关于网站域名变更的通知
查看: 387|回复: 2
打印 上一主题 下一主题

全自动相位触发电风扇源程序

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2019-1-8 13:44 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

EDA365欢迎您登录!

您需要 登录 才可以下载或查看,没有帐号?注册

x
全自动相位触发电风扇源程序
: B; [2 N# D: N( L2 @$ S& t5 u/ f4 f. i/ _. j5 D  j

8 p: N# K7 E7 f0 |//主程序
- i! J2 V9 p7 k7 P( c; [#include <reg52.h>  J, m9 ?: l: n8 ^
sbit LIGHT=P1^6;                      /* 风扇触发端 */! c2 T( D0 ]' D5 |4 D
void  Initialize(void);                /* 初始化单片机。   */
/ ~9 |  q3 V7 f1 bvoid wdcl(void);! q4 F6 r4 T/ ^# S$ ~& U5 n3 M
void main(void)
9 h4 o7 l- Y1 p- T" Q0 c" N8 z{
6 Q% Z  N8 F1 Q1 h9 R# W. [" z    Initialize();  Q% D: m6 F4 d7 Q$ u8 Q
    do
& x" }' v* j" h# y# k  k& H  j8 d, P    {8 @0 L2 e1 |5 q2 |/ H% T
           wdcl();% B  j1 N# ^2 S' {
       // Check();; Z! \9 ^) p: J
    }
0 s+ ?% j4 y2 [( D    while(1);
6 |. D5 Q, F) E! e; y}: k+ y3 L% C# |7 ], B" ~5 |
void ServiceTimer2() interrupt 5 using 1( ^0 y7 t$ S; G4 O9 ?
{: t( h( _8 U- {" l) k+ |
    LIGHT=0;        /* 触发电风扇晶闸管。*/& i' ]8 Z$ q9 O; _% b7 e
    TR2=0;
  ~' p& a! \3 d. O! Q    TF2=0;: c: i1 O4 B+ ~; R3 _$ `
}  ?- o( q" h; z/ F% t
ServiceINT1()  interrupt 2  using 1
  Z  D! L4 l& G{
8 Q/ T$ K* s" t  TR2=0;; m; J8 k' [5 m6 F5 W
  TH2=(65536-10000)/256;
5 j/ }9 X" |1 F. d' W  TL2=(65536-10000)*256;        //晶振为12M,若晶振为11.0592时为TL0=(65536-9216)。。。。。" m4 O- K5 @" h0 I5 r7 A
  TR2=1;
- f( D# ~5 E' F6 a* l3 @}
  \8 R  T3 |# b* ?9 qvoid Initialize(void)1 r0 [$ @; E6 q5 |9 x4 G
{0 Q( Z# X9 y2 o. z/ J
    T2CON=0x00;                            /* TIMER2.用于电风扇的驱动。 */9 M# U+ p* b8 C5 q8 ~% b
    PT0=1;( }4 }% B& o0 G4 Y' f" p
    IT1=1;$ O; A* ]+ N7 L9 N- \* f
    TR0=0;
; j, {, a4 P* y. T    TR2=0;
5 k" l. |. \# Z+ W/ O/ N    ET0=1;
# O- r! y$ ^$ z' s0 h    ET2=1;) \' ~% P% u7 a2 \5 k
    EX1=1;
$ S/ R. P6 Q+ o3 ^6 \0 t, m+ @7 r    EA=1;
, B' O# M! e* Z; b, I8 M    EX0=1;
5 Y" q6 ], @/ B+ f9 d; @5 ^3 e}
0 _7 J7 ^9 Z: o: w; y1 u. Z/ e# N( C; E' `1 K1 P4 I. V
  w+ K' m+ e* J/ o
游客,如果您要查看本帖隐藏内容请回复

5 s; f* W4 ~+ M0 B) i7 q+ a5 l8 X. l1 _) `; |

该用户从未签到

3#
发表于 2019-3-1 17:15 | 只看该作者
谢谢楼主分享
您需要登录后才可以回帖 登录 | 注册

本版积分规则

关闭

推荐内容上一条 /1 下一条

EDA365公众号

关于我们|手机版|EDA365电子论坛网 ( 粤ICP备18020198号-1 )

GMT+8, 2025-10-10 08:37 , Processed in 0.125000 second(s), 26 queries , Gzip On.

深圳市墨知创新科技有限公司

地址:深圳市南山区科技生态园2栋A座805 电话:19926409050

快速回复 返回顶部 返回列表