51单片机温度控制高温低温报警 带proteus仿真和汇编源码

kinidrily

( Q% r* c3 D3 K* e7 [8 Q
7 E# F2 t: p  k- e" [1 c51单片机温度控制高温低温报警 带proteus仿真和汇编源码

# G; I* X. {5 O1 o4 @2 U) ]! W
" x  l+ V) i9 N4 B# N4 E; Yproteus仿真图


51单片机温度控制高温低温报警汇编语言源程序：
LED_0        EQU         30H
8 y* e. E2 W& L0 ?. F/ }0 NLED_1         EQU         31H
LED_2         EQU         32H
/ D  k4 c: r4 r& x  `ADC                EQU                35H
TCNTA        EQU                36H
' X7 z5 S4 f4 A6 R3 ?- G8 ^2 j1 g) |TCNTB        EQU                37H
" }6 R$ b& p) a" ]2 \H_TEMP        EQU                38H                                ;温度上限
( y, s. _5 \( K3 W$ O2 k  A% B" [  K" G! IL_TEMP        EQU                39H                                ;温度下限
! z% C1 @" K- [6 m. R3 sFLAG        BIT                00H
; ?% z  q: n" v. H  j7 `' m  E- XH_ALM        BIT                P3.0
. q# p1 \! [" X+ g* J4 M( `3 aL_ALM        BIT                P3.1
SOUND        BIT                P3.7
) i2 A' E1 h6 W9 S+ TCLOCK        BIT                P2.4
ST                 BIT         P2.5
/ N6 X, c% v9 A+ N" nEOC         BIT         P2.6
OE                 BIT         P2.7
                ORG         00H
                SJMP        START
                ORG                0BH
                LJMP        INT_T0
                ORG                1BH
                LJMP        INT_T1
) H4 U6 l# W3 j" L* k& G% d% Y& B! Q               
" P# p! {! d; {5 FSTART:        MOV                LED_0,#00H
! V4 V  k! R$ r0 ?3 d                MOV                LED_1,#00H
/ u0 V; X+ _. I( K6 p! I1 Y                MOV                LED_2,#00H
1 Q) z1 v  B% \6 Y% I                MOV                DPTR,#TABLE
                MOV                H_TEMP,#153
: q! e& C2 k% |) Q/ `) O                MOV                L_TEMP,#77
+ Q2 Y% d% T# \  ]                MOV                TMOD,#12H
                MOV                TH0,#245
                MOV                TL0,#0
9 L5 K/ _. H7 P, S/ |                MOV                TH1,#(65536-1000)/256
) r6 A9 p+ O) }2 k. D- ]1 d                MOV                TL1,#(65536-1000)MOD 256
+ Z& m) _& k' A- M- W7 T                MOV                IE,#8aH
                CLR                C
. Y, J1 S) n" K: Z% Z- s5 Z                SETB        TR0                                ;为ADC0808提供时钟
WAIT:        SETB        H_ALM
& T: v4 ]) j9 K/ S                SETB        L_ALM
                CLR         ST
                SETB         ST
                CLR         ST                                ;启动转换
                 JNB         EOC,$
0 ]" }; A( V, `' ~; t                SETB         OE
                MOV         ADC,P1                        ;读取AD转换结果
+ m* Z- r7 y: X# R  ?! }                CLR         OE
                MOV                A,ADC
                SUBB        A,#77                           ;判断是否低于下限
                JC                LALM
                MOV                A,H_TEMP
7 `9 a0 l3 m, S/ [                MOV                R0,ADC
                SUBB        A,R0                        ;判断是否高于上限
( X- j, q) V8 u0 W# d, |                JC                HALM
                CLR                TR1
                LJMP        PROC
LALM:                                                        ;低温报警
+ B0 h, e: Z1 M+ ?- g! h0 B                CLR                L_ALM
                SETB        TR1
                CLR                FLAG
                LJMP        PROC
) [% Q; p+ D4 S# K4 \, I' ^* U; XHALM:                                                           ;高温报警
                CLR                H_ALM
9 {& k9 W3 w, L2 S' O5 e2 V) @                SETB        TR1
                SETB        FLAG
                LJMP        PROC
PROC:        MOV         A,ADC                         ;数值转换
                MOV         B,#100
                DIV         AB
                MOV         LED_2,A
3 W( ?2 g4 O! C% Z                MOV         A,B
1 ~% D" W4 t$ e+ i9 H9 J$ ~' G                MOV         B,#10
& w. l) }3 L. q7 m+ G+ [                DIV         AB
2 m3 l6 B1 s8 B8 ]$ q( R                MOV         LED_1,A
                MOV         LED_0,B
" t% p- P0 s4 E. l+ @7 o1 X                LCALL        DISP
                SJMP         WAIT
. {, e$ `0 }0 {" X8 k- m$ l& fINT_T0:        CPL                CLOCK                           ;提供ADC0808时钟
                RETI
INT_T1:        MOV                TH1,#(65536-1000)/256
- H1 |" @9 k4 E7 B* z! P( X4 E; r                MOV                TL1,#(65536-1000)MOD 256
                CPL                SOUND
4 @0 f9 O( ], C, e* x$ y8 r( y; ~                INC                TCNTA
                MOV                A,TCNTA
4 |: ?, k' x( V2 W                JB                FLAG,I1                           ;判断是高温警报还是低温警报
                CJNE        A,#30,RETUNE        ;低温警报声
                SJMP        I2
        I1:        CJNE        A,#20,RETUNE        ;高温警报声
        I2:        MOV                TCNTA,#0
                INC                TCNTB
- I; k0 X6 N3 P* H# o1 Y                MOV                A,TCNTB
( F4 A& u+ _8 g                CJNE        A,#25,RETUNE
                MOV                TCNTA,#0
/ p* N1 k& C: M3 I; f" Q& r7 a                MOV                TCNTB,#0
                LCALL        DELAY2
1 d& j* |! F) ]% HRETUNE:        RETI
               
DISP:        MOV                A,LED_0                        ;数码显示子程序
                MOVC        A,@A+DPTR
; f; N' J1 t& {3 k                CLR                P2.3
" w. I3 H: X) M3 V* N                MOV                P0,A
                LCALL        DELAY
% ^5 \9 j! L) V5 G" T                SETB        P2.3
% ~6 J2 |3 _. T* ~+ P                MOV                A,LED_1
                MOVC        A,@A+DPTR
                CLR                P2.2
! x& I% F8 N  S5 R* k                MOV                P0,A
% x, n0 g9 N) c9 ?0 S                LCALL        DELAY
                SETB        P2.2
. Q' f5 M. ~1 y- y6 p8 R                MOV                A,LED_2
  M$ N  z% G9 P0 h% H# G: V& ^                MOVC        A,@A+DPTR
                CLR                P2.1
                MOV                P0,A
                LCALL        DELAY
                SETB        P2.1
* ^# z, E0 B% {9 W7 M                RET
: e9 b4 `$ m/ J. f3 B7 N) @! A5 hDELAY:        MOV                R6,#10
# }, o* A' ^2 i) v. }/ ?5 cD1:                MOV                R7,#250
                DJNZ        R7,$
                DJNZ        R6,D1
                RET
. N+ K* g5 }" c8 RDELAY2:        MOV                R5,#20
  `8 |( _7 t8 M, U6 qD2:                MOV                R6,#20
9 i3 G- e& v% B0 Y6 BD3:                MOV                R7,#250
                DJNZ        R7,$
                DJNZ        R6,D3
                DJNZ        R5,D2
' }: p& O) P  ~8 i( C7 x$ n                RET
TABLE:         DB                 3FH,06H,5BH,4FH,66H
                DB                 6DH,7DH,07H,7FH,6FH
+ l/ e, s: t" N, ^; \4 P$ K                END
+ ~7 W' }9 V6 n: y* u  e/ r
, M, q$ ]2 U% |6 `
5 o5 P# j6 \) |  W. ], v
51单片机温度控制高温低温报警仿真工程文件和汇编源码下载：
. j3 c  k1 d- S: A5 C1 k# k4 a

游客，如果您要查看本帖隐藏内容请回复

abcde1234

谢谢分享

Vault

666666666666666666666666666666666

frankjake

康康
& ^. P6 M9 C5 @$ C

yujie

康康