单片机温湿度监控装置汇编语言源程序清单Word文件下载.docx
《单片机温湿度监控装置汇编语言源程序清单Word文件下载.docx》由会员分享，可在线阅读，更多相关《单片机温湿度监控装置汇编语言源程序清单Word文件下载.docx（32页珍藏版）》请在冰点文库上搜索。
U8checkdataEQU6CH
U8tempEQU6DH
tempEQU6EH
ORG0000H
AJMPINIT_0
ORG000BH
LJMPT0ZD
ORG001BH
LJMPT1ZD
ORG0023H
LJMPCYKZD
ORG0053H
LJMPRTCI
ORG0060H
DB0FCH
DB60H
DB0DAH
DB0F2H
DB66H
DB0B6H
DB0BEH
DB0E0H
DB0FEH
DB0F6H
DB1CH;
L
DB6EH;
H
DB00H;
消隐
DB00H
DB00H
DB1AH;
c
DB0BCH;
G
DB3AH;
o
DB7AH;
d
DB2EH;
h
DB9EH;
E
*************************************************
ORG0080H
INIT_0:
MOV22H,#03H
MOV25H,#00H
MOV2AH,#00H
MOV2DH,#00H
MOV2CH,#00H
MOV30H,#00H
MOV31H,#00H
MOV32H,#00H
MOV33H,#00H
MOV34H,#00H
MOV35H,#00H
MOV3DH,#35H
MOV42H,#09H
MOV43H,#01H
MOV45H,#00H
MOV46H,#00H
MOV47H,#00H
MOV48H,#00H
MOV49H,#00H
MOV4BH,#0FH
MOV4CH,#02H
MOV4DH,#0FH
MOV50H,#00H
MOV51H,#0BCH
MOV52H,#3AH
MOV53H,#3AH
MOV54H,#7AH
MOV55H,#00H
MOV5BH,#5
MOV5DH,#58H
MOVP0M1,#00H
MOVP0M2,#3DH
MOVP1M1,#20H
MOVP1M2,#03H
MOVP1,#0FFH
MOVTCON,#05H;
#55H
MOVTMOD,#11H
MOVSCON,#00H;
#10H
MOVTL0,#0B4H
MOVTH0,#3CH
MOVTL1,#88H
MOVTH1,#98H
MOVRTCL,#7FH
MOVRTCH,#70H
MOVRTCCON,#63H
MOVIEN0,#0DAH
INIT_2:
MOVAcc,WDCON
SETBAcc.2
MOVWDL,#0FFH
CLREA
MOVWDCON,Acc
MOVWFEED1,#0A5H
MOVWFEED2,#5AH
SETBEA
INIT_3:
MOV2EH,#00H
MOV2FH,#00H
MOVDPTR,#7F1H
LCALLRFLASH
MOV31H,RDAT
MOVDPTR,#7F2H
MOV32H,RDAT
MOVDPTR,#7F6H
MOV26H,RDAT
MAIN:
CLR2AH;
温度/湿度切换标志位
CLR58H;
控制信号“开”辅助位
CLR59H;
读取数据辅助位
SETB5AH;
FLASH读写辅助位
CLR5BH;
转换限制辅助位
CLR5CH;
中继数据保存辅助位
CLR5DH;
75ms中断延时辅助位
CLR5EH;
手控开/关辅助位
CLR7BH;
闪烁辅助位
CLRout;
SETBRead_P;
MOVR4,#00H
LCALLWDT_R
LJMPLOOP0
KSM00:
LJMPKSM0
LOOP0:
MOVR1,#53H;
#51H
MOVR2,#20H;
#01H
MOVR3,#04H
LOOP1:
MOVDPH,#00H
MOVDPL,#60H
MOVA,@R1
MOVCA,@A+DPTR
JNB6FH,LOOP2
ADDA,#01H
CLR6FH
LOOP2:
MOVSBUF,A
MOVA,P0
ANLA,#03H
ORLA,R2
JNB55H,SSCL
JB7BH,SSCL0
JNB50H,SSCL
SSCL0:
ANLA,7BH
SSCL:
MOVP0,A
MOVA,R2
RRA;
RLA
MOVR2,A
ANLA,#3CH
CJNEA,#04H,GPPP
SETB6FH
GPPP:
JNBAN1,KSM00
JNBAN2,KSM00
JNBAN3,KSM00
JNB72H,ABC
ANL2EH,#00H
CLR72H
ABC:
JB59H,DEF
JB60H,DEF
LCALLRead_WS
SETB59H
LCALLOperation
DEF:
NOP
LOOP3:
JNB55H,LOOP4
JB7BH,XY5
JNB50H,LOOP4
JB51H,XY1
JB52H,XY2
JB53H,XY3
JB54H,XY6
JB56H,XY6
LOOP4:
LCALLDELLY
JB50H,GPPPP
JB67H,GPPPP
JBACC.3,GPPPPP
GPPPP:
GPPPPP:
NOP
LOOP5:
JB28H,LOOP6
JB60H,LOOP7
JB65H,LOOP7
LOOP6:
JNB29H,LOOP7
NOP
LOOP7:
DECR1;
INCR1
DJNZR3,LOOP10
JNB72H,LOOP8
JB76H,JS
LOOP8:
JB28H,LOOP00
JB60H,LOOP00
JNB7DH,LOOP00
LOOP00:
LJMPLOOP0
LOOP10:
LJMPLOOP1
XY1:
MOV7BH,#0DFH
LJMPLOOP4
XY2:
MOV7BH,#0EFH
XY3:
MOV7BH,#0F7H
XY5:
MOV7BH,#0C3H
XY6:
MOV7BH,#0CFH
LJMPLOOP4
JS:
DJNZ5DH,LOOP00
JNB60H,LOOP00;
CLR76H
MOV5DH,#25H
LJMPLOOP0
LJMPLOOP7
KSM0:
JB75H,LOOP30
JB76H,LOOP30
JB77H,KSM1
MOVTL0,#0EBH
MOVTH0,#0E0H
MOV67H,#26H
MOV5DH,#55H
MOV48H,#00H
MOV49H,#00H
CLR2FH
SETBTCON.4
SETB75H
LOOP30:
LJMPLOOP3
KSM1:
JB72H,KSM2
JB76H,LOOP30
KSM2:
SETB70H
SETB73H
SETB76H
JNBAN1,KJSGN
JNBAN2,KJSYW0
JNBAN3,KJSZL0
LJMPLOOP3
KJSZL0:
LJMPKJSZL
KJSYW0:
LJMPKJSYW
LJMPINIT_3
KJSGN:
JB60H,KJSGN10
JB50H,KJSGN10
SETB7EH
DJNZ22H,LOOP33
CLR67H
CLR66H
SETB60H
CLR28H
MOV2AH,#03H
MOV2CH,#03H
MOVR4,#01H
MOV78H,31H
LCALLHEX_BCDBLOCK
MOV50H,#0AH
LOOP33:
KJSGN10:
LJMPKJSGN1
GN0:
LCALLBCD_HEXBLOCK
JB61H,WT1
JB62H,WT2
JB63H,SWTCH
ANL2CH,#3FH
WT1:
MOVA,#7DH;
#50H
CJNEA,5FH,WT11
WT110:
MOVA,#05H;
ADDA,5FH
CJNEA,32H,WT112
WT111:
MOV31H,5FH
CLR7AH
MOVWDAT,5FH;
#58H
LCALLWFLASH
LJMPGNJS
WT112:
JNCFMCL
LJMPWT111
WT11:
JCFMCL
MOVA,5FH
CJNEA,#00H,WT12
LJMPWT111
WT12:
LJMPWT110
WT2:
MOVA,#7DH;
CJNEA,5FH,WT21
LJMPWT211
WT21:
MOVA,#05H
ADDA,31H
CJNEA,5FH,WT22
MOVA,5FH
CJNEA,#00H,WT21
WT210:
CJNEA,5FH,WT212
WT211:
MOV32H,5FH
CLR7AH
WT212:
LJMPWT211
WT22:
JNCFMCL
SWTCH:
MOVDPTR,#7F6H
MOVWDAT,26H;
FMCL:
SETB7AH
GN00:
LJMPGN0
KJSGN1:
JB66H,GN00
JB67H,GN00
INCR4
GNJS:
CJNER4,#00H,GNL
LCALLOperation
MOV50H,#0FH
GNL:
CJNER4,#01H,GNH
MOV2CH,#03H
MOV50H,#0AH
MOV78H,31H
LCALLHEX_BCDBLOCK
GNH:
CJNER4,#02H,GNS
MOV2CH,#05H
MOV50H,#0BH
MOV78H,32H
GNS:
CJNER4,#03H,GNFW
MOV2AH,#41H
MOV2CH,#09H
MOV50H,#05H
JNB35H,GNSa
MOV51H,#0CH
MOV52H,#0FH
MOV53H,#11H
GNSa:
MOV52H,#0BH
MOV53H,#14H
LJMPLOOP3
GNFW:
MOVR4,#00H
MOV2CH,#00H
MOV2DH,#00H
MOV51H,R6
LJMPGNJS
KJSYW:
JB65H,LOOP35
JB67H,LOOP35
SETB66H
JB63H,KJSQH
JNB50H,KJSYW1
CLR28H
JB51H,YW1
JB52H,YW2
JB53H,YW3
KJSYW1:
CPL5EH
MOV2CH,#00H
JNB5EH,KJSYW2
SETBout
SETB7BH
MOV49H,#00H
KJSYW2:
MOV7BH,#0FFH
CLRout
CLR7BH
YW1:
MOV2AH,#05H
YW2:
MOV2AH,#09H
YW3:
LOOP35:
KJSQH:
CPL35H
JNB35H,KJSQH1
MOV53H,#11H
KJSQH1:
MOV53H,#14H
KJSZL:
JB63H,LOOP35
SETB66H;
67H
JB51H,GWDJ
JB52H,SWDJ
JB53H,BWDJ
LJMPRH_T
GWDJ:
INC53H
MOVA,53H
CJNEA,#0AH,LOOP35
MOV53H,#00H
SWDJ:
INC52H
MOVA,52H
MOV52H,#00H
BWDJ:
INC51H
MOVA,51H
CJNEA,#01H,B555
MOV51H,#01H
B555:
MOV51H,#00H
RH_T:
CPL2AH
LJMPLOOP3
DELLY:
MOVR7,#1FH
MS2:
MOVR6,#5FH
MS1:
DJNZR6,MS1
DJNZR7,MS2
RET
*************************************************
WDT_R:
CLREA
RET
T0ZD:
PUSHAcc
PUSHPSW
CLR75H
SETB77H
SETB72H
CLRTCON.4
FW0:
POPPSW
POPAcc
RETI
T1ZD:
PUSHPSW
CLRTCON.7
SETB5DH
MOVTH1,#00H
MOVTL1,#01H
CLRTCON.6
FW1:
RTCI:
ANLRTCCON,#63H
INC5BH
CPL55H
;
CLR59H
DJNZ67H,SZ0
MOV67H,#26H
CLR25H
CLR73H
SZ0:
INC45H
MOVA,45H
CJNEA,#03H,FWR
CLR59H
FWR:
RETI
CYKZD:
ANLSCON,#0FCH
写字节数据
WFLASH:
MOVFMCON,#LOAD
MOVFMADRH,DPH
MOVFMADRL,DPL
MOVFMDATA,WDAT;
MOVFMCON,#ERS_PROG;
MOVA,FMCON
ANLA,#0FH
SETB5AH
JZWFLASHF
CLR5AH
WFLASHF:
SETBEA
RET
读字节数据
RFLASH:
CLRA
MOVRDAT,A
采集温湿度数据
Read_WS:
--------------------------------
主机拉低总线,延时500us
CLRRead_P
MOVA,#1
LCALLDelay
LCALLDelay
LCALLDelay
SETBRead_P
延时40us
LCALLDelay_10us
检测从机是否响应，无响应则跳出
JBRead_P,RH_END
MOVFLAG,#0
LOOPA:
INCFLAG
MOVA,FLAG
JBRead_P,LOOPA_END;
为高电平则跳出
CJNEA,#0,LOOPA
LJMPRH_END
LOOPA_END:
LOOPB:
JNBRead_P,LOOPB_END;
为低电平则跳出
CJNEA,#0,LOOPB
LOOPB_END:
进入数据接收阶段
LCALLRead
MOVU8RH_data_H,U8comdata;
MOVU8RH_data_L,U8comdata;
MOVU8T_data_H,U8comdata;
MOVU8T_data_L,U8comdata;
升级会员 