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

单片机智能温度检测器 有原理图 PCB图 源程序及设计流程

  [复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2018-11-12 10:02 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

EDA365欢迎您登录!

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

x
单片机智能温度检测器 有原理图 PCB图 源程序及设计流程 ' o, |6 X0 ~0 @
单片机源程序如下:
, `. o6 y! t$ P/ N5 N
/ j; g; E  p1 ^
#include"hongwai.h"/ \* ?; }. E: d- N: c% e2 g0 H
#define        uchar unsigned char: K5 l' x; v/ r
#define uint unsigned int
0 ]3 y/ S9 c# A0 D" T: ^4 g& n8 T2 Z) l" C3 ]2 ^
void timer0init()         //256*(1/12)*12=0.256MS
7 T6 {) c: ?% g; j9 S* M{6 E0 B+ k3 z) [" @3 z  x7 {# K( o
        TMOD=0X02;
6 ^8 q1 N, R2 k" ^$ R        TH0=0X00;
) {0 d1 K+ N! u7 j2 s& F  U        TL0=0X00;" ^: y  S& z; C' L" D  f. a# [5 q
        ET0=1;0 H+ W  m" R: M6 v( t6 ?" H- S7 d1 a
        EA=1;
4 H7 Y/ S( P8 F        TR0=1;
2 R* u2 @, K1 D. W2 z7 O, ]3 b% U1 q: C; Z
}/ B2 L" u6 I3 Z1 S* h0 O( d$ N4 h' W

9 m0 S5 @: ], _- [# |void timer0() interrupt 1 using 1
0 F# u/ z! ?8 v4 n! @{8 C2 }1 v6 C3 j' J8 U
        irtime++;
! S$ S/ U6 I$ t2 ]  a
. Z8 r1 e1 R  o0 u% D; f5 u+ j}
6 O8 l. g1 }5 y- O5 l, k
  o/ `+ k' V1 P+ x" _3 Dvoid irpros()           //红外处理
* J: z6 Z% J2 y8 y{9 S- o7 t4 ]1 C8 J' o
        uchar num,k,i,j;
" @1 I; a6 z& M$ _* i# ^& o" P        k=1;( s* y0 u- D# d. C3 ]2 u; y, p
        for(j=0;j<4;j++)
9 _; e: C* T. |3 @        {
; ]& S  |/ v1 {, t* I$ `            for(i=0;i<8;i++)
# y3 q9 T! [* t) ]8 `            {, N* B0 @. a. \
                num=num>>1;* K  Y6 u7 X! G" L# X. x3 q# }$ A9 ^
                if(irdata[k]>6)
$ l- M+ b; @. s                {
& g% s) q/ u2 A- l' w" Z$ `                        num=num|0x80;
0 W! o5 y% _; v- z% T3 D% P& U                }- O8 r; n  M* n
                    k++;4 A- H/ s3 ^8 I- v0 m
            }: b5 \( x1 }6 ]7 s' u
            ircode[j]=num;. C$ f$ k* s; i" `' ~7 I2 L' i
        }$ m, ?: e  `% [( x. S) U) Y. N
        irprosok=1;
) L" L  p' c- \5 ]/ R8 `( A8 s: g}9 w9 @' A$ J( R/ }

" _- y  _) V$ xvoid irwork()           //红外马志转换
& Y  c# _5 W! M/ \! O{; l* g: D4 }+ p! P8 J
        switch(ircode[2])$ x( M- n2 b. c' N# d% s( P
        {
( J0 p8 w9 z, G: a' o* a8 O        case 0x0c:relay=!relay;break;
9 I# C8 l) H" \0 N        default:break;
$ K! U/ E, q- B$ i! m        }5 ^& {) p+ y1 j
        irprosok=0;/ @# h" o8 p4 S; @/ J$ z1 @  Q3 O
}" X' d8 c& U6 G: Z, ?
+ q6 |# m- j7 k
void int0() interrupt 0                 //中断服务9 b9 h3 n& e  x9 A& U& O3 G' u
{( L2 I: ]% Q  o1 ^
        if(startflag)2 q' ?4 f& q! d  l
        {
3 R' \% @5 e; E' B9 I4 B) j            if(irtime>32&&irtime<63) //8--16ms
; Y: l/ n, m- V' l                {
; W  F7 y, r2 I. X- e                bitnum=0;
% u1 \( o: ]) B. \( C& `1 I% \- o                }
4 {6 I" \; E4 p' R  `                irdata[bitnum]=irtime;/ ~3 p: Q4 @) o( E4 T% `
                irtime=0;8 v! y/ U- g% B" W* G% p0 `
                bitnum++;7 z4 [. O3 U5 f1 Q
                if(bitnum==33)* _( C- F% H+ K, c( `; t
                {
9 \3 w: \. _" Y4 u; s) v                        bitnum=0;7 I, x% z6 z7 v  @
                        irok=1;
4 K* T. Y. V' q! q                }' h3 l$ Y$ n0 l- V: X  w
        }! q/ Z3 H2 m* S; R
        else/ R3 j* D! {6 I  e$ Y; w
        {' p) ^1 o8 `3 u9 x+ n& W5 G  f/ D* B
                irtime=0;
) B# w' V4 ]7 R( y……………………! N' \( [$ `) |- z7 q# O# {0 |8 {! K

, J9 u& g% }  X3 }( R8 W( f6 A…………限于本文篇幅 余下代码请从论坛下载附件…………1 i& |% s% ~9 b$ C" @7 S) ^
' k0 g8 _# @  S2 I
游客,如果您要查看本帖隐藏内容请回复
8 p1 M, Q4 k3 y5 F

8 L, w( x) P3 T% |) K, F
您需要登录后才可以回帖 登录 | 注册

本版积分规则

关闭

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

EDA365公众号

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

GMT+8, 2025-8-24 20:24 , Processed in 0.125000 second(s), 26 queries , Gzip On.

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

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

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