温度监控系统

最新推荐文章于 2023-06-22 15:53:41 发布
最新推荐文章于 2023-06-22 15:53:41 发布
阅读量551 收藏
点赞数
分类专栏： unco 文章标签： delay command date c input buffer
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/xeqxerxe/article/details/7820487
版权

很可惜,当时用了记事本保存,导致现在的注释中文的都成了问号了,原来的文件早就被删除了,只留下了这么一个备份,已经一年多了啊,当初用了7279a,18b20,12864,8051等东西

CLK		EQU	P2.3 		;7279CLK //7279A?????
DATE	EQU	P2.4		;7279'S DATE
CS		EQU	P2.7 		;7279 ENBLE
KEY		EQU	INT0		;7279 INT
DAT		BIT	P1.3		;18B20'S DATE LINE
RS      EQU P1.0		;12864'S RS
STD     EQU P1.1 		;12864'S RW
SCLK    EQU P1.2		;12864 ENBLE
PSB     EQU P2.0		;12864 IT IS ALWAY BE 1
RES     BIT  P3.5		;12864 IT IS ALWAY BE 1

COMMAND			EQU	20H			;//???7279 ? 12864 ???????????
RECEIVE			EQU	22H	   		;//?7279?????????????
M_TIMES			EQU	23H			;//?????? 

TEMPER_L		EQU	25H			;//??????,????????
TEMPER_H		EQU	24H			;//??????,????????

M_FLAG			EQU	21H.0 		;//????,?????????????
M_FIRST			EQU	21H.1		;//???????????,??????
CU_HIGH			EQU	21H.2		;//??????????,??????
SET_HIGH		EQU	21H.3		;//??????????,??????
SUB_HIGH		EQU	21H.4		;//????????,??????
POINT_FLAG		EQU	21H.5		;//??????????
CALC_WRONG_FLAG	EQU	21H.6		;
FIRST_ENABLE_0	EQU	26H.0		;//???????0???
//?????????????,?????????????????????

SET_TEMPER_P		EQU	3DH		;//????????????8?
SET_TEMPER_I		EQU	3EH		;//????????????8?

HDATA			EQU  45H              ;//??/??????
LDATA			EQU  46H              ;//??/??????

TTT				EQU		47H

TMP				EQU	3FH			;//??????
TMP0			EQU	42H			;//??????

TMP_SET_TEMPER_P	EQU	41H		;
//????????????,????????,???????
TMP_SET_TEMPER_I	EQU	40H		;
//????????????,????????,???????

COUNT_SUB		EQU	43H	;USED TO COUNT		 ;//??????,???
SHOW_ADDR		EQU	44H	;USED TO RECORD WHICH ADDR TO SHOW

RESET7	EQU	10100100B
SHOW0	EQU	10000000B
SHOW1	EQU	10000001B
SHOW2	EQU	10000010B
SHOW3	EQU	10000011B
READ	EQU	00010101B

    ORG    0000H
		JMP		START
	ORG 0003H
		LJMP	INTERRUPT
ORG	500H
	DB  00H,00H,00H,0DH,0CH,0BH,0AH,00H
	DB  00H,00H,00H,0EH,09H,06H,03H,00H
	DB  00H,00H,00H,2EH,08H,05H,02H,00H
	DB  00H,00H,00H,00H,07H,04H,01H,00H	 	;//???
	;===========//12864????
		;MOV    TMP,#0F8H     ;//????(11111000)
		;MOV    COMMAND,#80H        ;//??????
 		;LCALL  LCDWRITE

		;MOV    TMP,#0FAH     ;//???    (11111010)
        ;MOV    COMMAND,#35H
        ;CALL   LCDWRITE        ;//??????
	;=================
START:
        MOV    SP,#50H
        CALL	SYSTEM_INIT
		
		MOV		36H,#00H
		MOV		37H,#02H
		MOV		38H,#07H
		MOV		39H,#2eH
		MOV		3AH,#03H
		MOV		3BH,#09H
		MOV		3CH,#09H   ;//???????
		CALL	MAIN	 ;//?????
;=======================
MAIN:
	JNB		M_FLAG,CONTINUE_MAIN
			CALL	MAIN_MODIFY
			JMP		MAIN
	CONTINUE_MAIN:
	CLR		EA
	CLR		CU_HIGH 
	CALL	GET_TEMPER 		//\/	??????????Flag+Intege+Point??
					//		????CU_HIGH+TEMPER_H+TEMPER_L


	MOV		COMMAND,#SHOW0
	CALL	SENT
	MOV		COMMAND,#5
	CALL	SENT
	CALL	LONG_LONG_DELAY

	
	CALL	CALC_INPUT		//\/	??????????Flag+Intege+Point??
	SETB	EA				//		?36H?????,???????SET_HIGH+SET_TEMPER_I+SET+TEMPER_P


	CALL	FORMAT_TEMPER	//\/	????????????Flag



	CALL	CALC_SUB		//\/	????????,?????????,??????
							//		????????SUB_HIGH+TMP_SET_TEMPER_I+TMP_SET_TEMPER_P
	CALL	CALC_CLARK
	CLR		EA
	CALL	DISPLAY_INFO	//\/	???????????????????
	SETB	EA

		CALL	LONG_LONG_DELAY
		JMP		MAIN
;====================================================
;==================================//????
DISPLAY_INFO:
		MOV		TMP0,TEMPER_H
		MOV		TMP,TEMPER_L
		MOV		TTT,#0F8H
		MOV		COMMAND,#80H
		LCALL	LCDWRITE

		MOV		TTT,#0FAH
		MOV		COMMAND,#0B5H
		CALL	LCDWRITE
		MOV		COMMAND,#0B1H
		CALL	LCDWRITE
		MOV		COMMAND,#0C7H
		CALL	LCDWRITE
		MOV		COMMAND,#0B0H
		CALL	LCDWRITE
		MOV		COMMAND,#0CEH
		CALL	LCDWRITE
		MOV		COMMAND,#0C2H
		CALL	LCDWRITE
		MOV		COMMAND,#0B6H
		CALL	LCDWRITE
		MOV		COMMAND,#0C8H
		CALL	LCDWRITE
		MOV		COMMAND,#03AH
		CALL	LCDWRITE

		CALL	WRITE_DATE_TO_DISPLAY
		JNB		CU_HIGH,DISPLAY_INFO_00
			  MOV		30H,#2DH
			  JMP		DISPLAY_INFO_0
		DISPLAY_INFO_00:
				MOV		30H,#0
		DISPLAY_INFO_0:
		CALL	SHOW_BUFFER

		MOV		TMP0,SET_TEMPER_I
		MOV		TMP,SET_TEMPER_P
		MOV		TTT,#0F8H
		MOV		COMMAND,#90H
		LCALL	LCDWRITE

		MOV		TTT,#0FAH
		MOV		COMMAND,#0C9H
		CALL	LCDWRITE
		MOV		COMMAND,#0E8H
		CALL	LCDWRITE
		MOV		COMMAND,#0B6H
		CALL	LCDWRITE
		MOV		COMMAND,#0A8H
		CALL	LCDWRITE
		MOV		COMMAND,#0CEH
		CALL	LCDWRITE
		MOV		COMMAND,#0C2H
		CALL	LCDWRITE
		MOV		COMMAND,#0B6H
		CALL	LCDWRITE
		MOV		COMMAND,#0C8H
		CALL	LCDWRITE
		MOV		COMMAND,#03AH
		CALL	LCDWRITE

		CALL	WRITE_DATE_TO_DISPLAY
		JB		SET_HIGH,DISPLAY_INFO_11	;//=1?????,???
			  MOV		30H,#2DH
			  JMP		DISPLAY_INFO_1
		DISPLAY_INFO_11:
				MOV		30H,#0
		DISPLAY_INFO_1:
		CALL	SHOW_BUFFER


		MOV		TMP0,TMP_SET_TEMPER_I
		MOV		TMP,TMP_SET_TEMPER_P
		MOV		TTT,#0F8H
		MOV		COMMAND,#88H
		LCALL	LCDWRITE

		MOV		TTT,#0FAH
		MOV		COMMAND,#0CEH
		CALL	LCDWRITE
		MOV		COMMAND,#0C2H
		CALL	LCDWRITE
		MOV		COMMAND,#0B6H
		CALL	LCDWRITE
		MOV		COMMAND,#0C8H
		CALL	LCDWRITE
		MOV		COMMAND,#0B2H
		CALL	LCDWRITE
		MOV		COMMAND,#0EEH
		CALL	LCDWRITE
		MOV		COMMAND,#0D6H
		CALL	LCDWRITE
		MOV		COMMAND,#0B5H
		CALL	LCDWRITE
		MOV		COMMAND,#03AH
		CALL	LCDWRITE

		CALL	WRITE_DATE_TO_DISPLAY
		JNB		SUB_HIGH,DISPLAY_INFO_22
			  MOV		30H,#2DH
			  JMP		DISPLAY_INFO_2
		DISPLAY_INFO_22:
				MOV		30H,#0
		DISPLAY_INFO_2:
		CALL	SHOW_BUFFER

		RET
;*****************************************
MAIN_MODIFY:
		JB		M_FIRST,FIRST_MODIFY
			JMP	NEXT0_MODIFY
		FIRST_MODIFY:
			MOV    TTT,#0F8H
			MOV		COMMAND,#01H
			CALL 	LCDWRITE
			CLR		M_FIRST
			CALL	LONG_LONG_DELAY

			MOV		COMMAND,#80H
			CALL	LCDWRITE

			MOV		TTT,#0FAH
			MOV		COMMAND,#0C3H
			CALL	LCDWRITE
			MOV		COMMAND,#0A0H
			CALL	LCDWRITE
			MOV		COMMAND,#0CEH
			CALL	LCDWRITE
			MOV		COMMAND,#0C2H
			CALL	LCDWRITE
			MOV		COMMAND,#0B6H
			CALL	LCDWRITE
			MOV		COMMAND,#0C8H
			CALL	LCDWRITE
			MOV		COMMAND,#0C9H
			CALL	LCDWRITE
			MOV		COMMAND,#0E8H
			CALL	LCDWRITE
			MOV		COMMAND,#0B6H
			CALL	LCDWRITE
			MOV		COMMAND,#0A8H
			CALL	LCDWRITE
			MOV		COMMAND,#0BDH
			CALL	LCDWRITE
			MOV		COMMAND,#0E7H
			CALL	LCDWRITE
			MOV		COMMAND,#0C3H
			CALL	LCDWRITE
			MOV		COMMAND,#0E6H
			CALL	LCDWRITE
			
			MOV		TTT,#0F8H
			MOV		COMMAND,#90H
			CALL	LCDWRITE
			MOV		TTT,#0FAH	
			MOV		36H,#00H
			MOV		37H,#00H
			MOV		38H,#00H
			MOV		39H,#00H
			MOV		3AH,#00H
			MOV		3BH,#00H
			MOV		3CH,#00H
		NEXT0_MODIFY:
		CLR		CY
		MOV		A,RECEIVE
		SUBB	A,#0FFH
		JZ		CON_NO_NUMBER  ;CHECK IF IN
		CLR		CY
		MOV		A,RECEIVE
		SUBB	A,#0AH
		JZ		CON_NO_NUMBER  ;CHECK IF IN
		CLR		CY
		MOV		A,RECEIVE
		SUBB	A,#0BH
		JZ		CON_END_MODIFY	;END INPUT
		JMP	NEXT2_MODIFY

		CON_END_MODIFY:
			JMP	END_MODIFY

		CON_NO_NUMBER:
			JMP	NO_NUMBER


		NEXT2_MODIFY:
		CLR		CY
		MOV		A,RECEIVE
		SUBB	A,#02EH
		JZ		IS_POINT
		CLR		CY
		MOV		A,RECEIVE
		SUBB	A,#0CH
		JZ		IS_UNDER0
			CALL	LONG_DELAY
			CALL	LONG_DELAY
			CALL	LONG_DELAY
			CALL	LONG_DELAY
			CLR		CY
			MOV		A,RECEIVE
			ADD		A,#30H
			MOV		COMMAND,A
			CALL	LCDWRITE
			JMP		NEXT1_MODIFY
		IS_POINT:
			MOV		A,M_TIMES
			JZ		NO_NUMBER
			JB		POINT_FLAG,NO_NUMBER
			SETB	POINT_FLAG
			CALL	LONG_DELAY
			CALL	LONG_DELAY
			CALL	LONG_DELAY
			CALL	LONG_DELAY
		    MOV		COMMAND,RECEIVE
			CALL	LCDWRITE
			JMP		NEXT1_MODIFY
		IS_UNDER0:
			MOV		A,M_TIMES
			JNZ		NO_NUMBER
			JB		SET_HIGH,NO_NUMBER
			SETB	SET_HIGH
			CALL	LONG_DELAY
			CALL	LONG_DELAY
			CALL	LONG_DELAY
			CALL	LONG_DELAY
		    MOV		COMMAND,#2DH
			CALL	LCDWRITE
			JMP		NEXT1_MODIFY
	   	NEXT1_MODIFY:
		CLR		CY
		MOV		A,M_TIMES
		ADD		A,#36H		
		MOV		R0,A
		MOV		@R0,RECEIVE	 ;record what input

		MOV		RECEIVE,#0FFH
		MOV		A,M_TIMES
		INC		A
		MOV		M_TIMES,A	;GET TIMES UP

		CLR		CY
		SUBB	A,#7H
		JZ		END_MODIFY	;IF FULL FOR MODIFY

		JMP		MAIN_MODIFY	

		END_MODIFY:
			CLR		M_FLAG
			SETB	M_FIRST
			CLR		POINT_FLAG

			MOV		M_TIMES,#0H
			MOV		RECEIVE,#0FFH

			MOV    TTT,#0F8H
			MOV		COMMAND,#01H
			CALL	LCDWRITE

			RET

		NO_NUMBER:
			MOV		RECEIVE,#0FFH
			CALL	LONG_DELAY
			JMP		MAIN_MODIFY
;===============================
;============//??????????,
SHOW_BUFFER:
		CLR		FIRST_ENABLE_0
		CLR		A
		MOV		A,30H
		SUBB	A,#2DH
		JNZ		SHOW_CONTINUE
			 MOV		COMMAND,#2DH
			 CALL   	LCDWRITE
		SHOW_CONTINUE:

		MOV		A,31H
		JZ		SHOW_NEXT0
				ADD		A,#30H
				MOV		COMMAND,A
				CALL	LCDWRITE
				SETB	FIRST_ENABLE_0	 //31h??0,?????
		SHOW_NEXT0:
		MOV		A,32H
		JZ		SHOW_NEXT1
				ADD		A,#30H
				MOV		COMMAND,A
				CALL	LCDWRITE
				SETB	FIRST_ENABLE_0
				JMP		SHOW_NEXT2
		SHOW_NEXT1:
		JNB		FIRST_ENABLE_0,SHOW_NEXT2	 //???0,?????0,????
				//????1,????
				MOV		A,32H
				ADD		A,#30H
				MOV		COMMAND,A
				CALL	LCDWRITE
				//33?????,????????

		SHOW_NEXT2:
		MOV		A,33H
		ADD		A,#30H
		MOV		COMMAND,A
		CALL	LCDWRITE		
		MOV		A,#2EH
		MOV		COMMAND,A
		CALL	LCDWRITE
		MOV		A,34H
		ADD		A,#30H
		MOV		COMMAND,A
		CALL   	LCDWRITE
		MOV		A,35H
		ADD		A,#30H
		MOV		COMMAND,A
		CALL   	LCDWRITE
		RET

;****************************************************
;========================//???12864
INIT12864:
    LCALL  DL1MS           ;//????????
    MOV    TTT,#0F8H     ;// ????(11111000)
	MOV    COMMAND,#30H        ;//???????
	LCALL  LCDWRITE
	MOV    COMMAND,#0CH
	LCALL  LCDWRITE        ;//????ON
	MOV    COMMAND,#01H        ;//??
	LCALL  LCDWRITE
	LCALL  DL1MS
	MOV    COMMAND,#06H        ;//????
	LCALL  LCDWRITE
	LCALL  DL1MS
	RET
;========================================================
LCDWRITE:                  ;//???????
	MOV    A,COMMAND           ;//???????A
	ANL    A,#0F0H         ;//???4?
	MOV    HDATA,A         ;//??4??HDATA??
	MOV    A,COMMAND           ;//??4?
	SWAP   A               ;//??4???
	ANL    A,#0F0H
	MOV    LDATA,A         ;//??4??LDATA??
	MOV    A,TTT         ;//?????
	LCALL  SENDBIT         ;//??
	LCALL  DL1MS           ;//??1ms
	MOV    A,HDATA
	LCALL  SENDBIT
	LCALL  DL1MS
	MOV    A,LDATA
	LCALL  SENDBIT
	LCALL  DL1MS
	RET

;=================ALL DELAY
LONG_DELAY:
	PUSH	30H
	MOV		30H,#25H
	DELAY_LP:
		DJNZ	30H,DELAY_LP
	POP		30H
	RET
LONG_LONG_DELAY:
	PUSH	30H
	PUSH	31H
	PUSH	32H
	MOV		30H,#08FH
	DELAY_LP0:
		MOV		31H,#0F0H
		DELAY_LP1:
			MOV		32H,#04H
			DELAY_LP2:
				DJNZ	32H,DELAY_LP2
			DJNZ	31H,DELAY_LP1
		DJNZ	30H,DELAY_LP0
	POP		32H
	POP		31H
	POP		30H
	RET
SHORT_DELAY:
	PUSH	30H
	MOV		30H,#10H
	SHORT_LP:
		DJNZ	30H,SHORT_LP
	POP		30H
	RET
DL1MS:                         ;//?????
        PUSH    00H            ;0.1MS
        PUSH    01H
        PUSH    02H
        MOV     R2,#01H
WA_PA:  MOV     R0,#0FH
WA_PB:  MOV     R1,#0FH
        DJNZ    R1,$
        DJNZ    R0,WA_PB
        DJNZ    R2,WA_PA
        POP     02H
        POP     01H
        POP     00H
        RET
        NOP
        RET
DL40MS:                        ;//?????
        PUSH    00H            ;40MS
        PUSH    01H
        PUSH    02H
        MOV     R2,#01H
DL_PA:  MOV     R0,#0FFH
DL_PB:  MOV     R1,#0FFH
        DJNZ    R1,$
        DJNZ    R0,DL_PB
        DJNZ    R2,DL_PA
        POP     02H
        POP     01H
        POP     00H
        RET
;********************************************
;======================
SENDBIT:                       ;//???????????
	MOV     R7,#08H        ;//??8?
SEND_1: RLC     A
        MOV     STD,C          ;//??????
	CLR     SCLK           ;//??????
	SETB    SCLK
	DJNZ    R7,SEND_1      ;//????8???
	RET
;==========================================
;**********************************************
;==============GET TEMPER
GET_TEMPER:
        LCALL   Set_18B20
        MOV     A,#0CCH         ;JMP ROM
        LCALL   WRITE_1820
        MOV     A,#44H          ;CHANGE TEMPER
        LCALL   WRITE_1820
        LCALL   LONG_LONG_DELAY
        LCALL   Set_18B20       ;INIT 18B20
        MOV     A,#0CCH         
        LCALL   WRITE_1820
        MOV     A,#0BEH        
        LCALL   WRITE_1820
        LCALL   READ_1820    
		CALL	CALC_TEMPER    	 ;CALC_TEMPER TO NUMBER
        RET
Set_18B20:
        SETB    DAT
        NOP
        CLR     DAT
        MOV     R2,#250         ;DELAY
        DJNZ    R2,$
        SETB    DAT             ;
        MOV     R2,#30
        DJNZ    R2,$         
        JNB     DAT,INIT1
        JMP     Set_18B20       
INIT1:  MOV     R2,#120
        DJNZ    R2,$            ;
        JB      DAT,INIT2       
        JMP     Set_18B20
INIT2:  MOV     R2,#240
        DJNZ    R2,$
        RET
;=====================WRITE DATE TO 1820
WRITE_1820:
        MOV     R2,#8           
WR0:    CLR     DAT
        MOV     R3,#6
        DJNZ    R3,$
        RRC     A
        MOV     DAT,C
        MOV     R3,#20
        DJNZ    R3,$
        SETB    DAT
        NOP
        NOP
        DJNZ    R2,WR0
        SETB    DAT
        RET
;======================READ FROM 1820
READ_1820:
        MOV     R4,#2           
        MOV     R1,#TEMPER_L  
RE0:    MOV     R2,#8
RE1:    SETB    DAT
        NOP
        NOP
        CLR     DAT
        NOP
        NOP
        SETB    DAT
        MOV     R3,#4
        DJNZ    R3,$
        MOV     C,DAT
        RRC     A
        MOV     R3,#30
        DJNZ    R3,$
        DJNZ    R2,RE1
        MOV     @R1,A
        DEC     R1            
        DJNZ    R4,RE0
        RET
;******************************
;==================7279's sent and receive
SENT:
	MOV		COUNT_SUB,#8
	CLR		CS
	CALL	LONG_DELAY
	SENT_LP:
		MOV		C,COMMAND.7
		MOV		DATE,C
		SETB	CLK
		MOV		A,COMMAND
		RL		A
		MOV		COMMAND,A
		CALL	SHORT_DELAY
		CLR		CLK
		CALL	SHORT_DELAY
		DJNZ	COUNT_SUB,SENT_LP
		CLR		DATE
	RET
;************************************
;================
RECEIVEDATE:
	MOV		COUNT_SUB,#8
	SETB	DATE
	CALL	LONG_DELAY
	RECEIVEDATE_LP:
		SETB	CLK
		CALL	SHORT_DELAY
		MOV		A,RECEIVE
		RL		A
		MOV		RECEIVE,A
		MOV		C,DATE
		MOV		RECEIVE.0,C
		CLR		CLK
		CALL	SHORT_DELAY
		DJNZ	COUNT_SUB,RECEIVEDATE_LP
		CLR		DATE  ;get keyborad

		MOV		DPTR,#500H			
		MOV		A,RECEIVE
		MOVC	A,@A+DPTR
		MOV		RECEIVE,A ;change to number
	RET
;================CALC_TEMPER TO FLAG+INTEGE+POINT STRUCT
CALC_TEMPER:
	MOV		C,TEMPER_H.3
	;JC		TEM_UNDER0
		JMP		TEM_CALC
	TEM_UNDER0:
		MOV		A,TEMPER_L
		CPL		A
		MOV		TEMPER_L,A
		MOV		A,TEMPER_H
		CPL		A
		INC		A
		MOV		TEMPER_H,A
		SETB	CU_HIGH
		JMP		TEM_CALC
	TEM_CALC:
	MOV		A,TEMPER_L
	ANL		A,#00001111B
	MOV		B,#0AH
	MUL		AB	
	MOV		B,#10H
	DIV		AB
	MOV		34H,A
	MOV		A,#0AH
	MUL		AB
	MOV		B,#10H
	DIV		AB
	MOV		35H,A	;GET PAST POINT
	
	MOV		A,#0H
	MOV		C,TEMPER_L.4
	RRC		A
	MOV		C,TEMPER_L.5
	RRC		A
	MOV		C,TEMPER_L.6
	RRC		A
	MOV		C,TEMPER_L.7
	RRC		A	  
	MOV		C,TEMPER_H.0
	RRC		A
	MOV		C,TEMPER_H.1
	RRC		A
	MOV		C,TEMPER_H.2
	RRC		A
	RRC		A	;GET INTERGA

	MOV		TMP0,A
	MOV		A,34H
	MOV		B,#10
	MUL		AB
	CLR		CY
	ADD		A,35H
	MOV		TMP,A
	MOV		TEMPER_L,TMP	;RECORD POINT
	MOV		TEMPER_H,TMP0	;RECORD INTERGE			

	RET
;***************************************
;===========format current and set temper from FLAG+INTEGE+POINT to Flag+Intege
;============and change the flag of set temper's flag because a-b=a+(-b)
FORMAT_TEMPER:	   ;//???????????,?????
	MOV		A,TEMPER_H
	MOV		B,#100
	MUL		AB
	MOV		TMP0,B
	MOV		TMP,A	  ;HIGH X 100
	

	ADD		A,TEMPER_L
	MOV		TEMPER_L,A
	MOV		A,B
	ADDC	A,#0H
	MOV		TEMPER_H,A
	;format current temper

	MOV		A,SET_TEMPER_I
	MOV		B,#100
	MUL		AB
	MOV		TMP0,B
	MOV		TMP,A

	ADD		A,SET_TEMPER_P
	MOV		SET_TEMPER_P,A
	MOV		A,B
	ADDC	A,#0H
	MOV		SET_TEMPER_I,A
	;format set temper
	RET
		
;========CALC INPUT TO NUMBER
;36~3CH
;get set temper and change it to Flag+Intege+Point struct
;IF NUNBER IS WRONG,DON'T change anything
CALC_INPUT:
	CLR		CALC_WRONG_FLAG	 ;//??????
	CLR		SET_HIGH	
	MOV		A,#00H
	MOV		A,36H

	CLR		CY
	SUBB	A,#0CH	;IS <0
	JNZ		C_I_OVER0
		SETB	SET_HIGH	;//?????????
		C_I_UNDER0:		
			 MOV	36H,#00H  ;//????,?36??
	C_I_OVER0:		;START FROM 36H,POINT CAN'T APPRE AT 39H
		CLR		OV
		CLR		CY
		MOV		A,37H
		SUBB	A,#2EH
		JNZ		P_NEXT0		
			P_37:
				MOV		40H,36H	;get intege
				;next get point
				MOV		A,38H
				MOV		B,#10
				MUL		AB
				ADD		A,39H	;get point
				MOV		41H,A 		;X.XXXXX
				JMP		OUT_CALC_SET
		P_NEXT0:
			MOV		A,36H
			MOV		B,#10
			MUL		AB
			ADD		A,37H
			MOV		TMP,A	;it is didn't >256

			CLR		CY
			MOV		A,38H
			SUBB	A,#2EH
			JNZ		P_NEXT1
				P_38:
					MOV		40H,TMP

					MOV		A,39H
					MOV		B,#10
					MUL		AB
					ADD		A,3AH
					MOV		41H,A	;XX.XXXX
					JMP		OUT_CALC_SET
		P_NEXT1:
			MOV		A,TMP
			MOV		B,#10
			MUL		AB
			JBC		OV,WRONG0	;if it >256
			ADD		A,38H
			JBC		CY,WRONG0	;get intege
			CJNE	A,#110,OVER100_0
			OVER100_0:
			JC		NEXT_0
				WRONG0:
				   	JMP		WRONG
			NEXT_0:
			MOV		TMP,A

			CLR		CY
			MOV		A,39H
			SUBB	A,#2EH
			JNZ		P_NEXT2
				P_39:
					MOV		40H,TMP

					MOV		A,3AH
					MOV		B,#10
					MUL		AB
					ADD		A,3BH
					MOV		41H,A	;XXX.XXX
					JMP		OUT_CALC_SET
		P_NEXT2:
			MOV		A,TMP
			MOV		B,#10
			MUL		AB
			JBC		OV,WRONG1
			ADD		A,39H
			JBC		CY,WRONG1
			CJNE	A,#110,OVER100_1
			OVER100_1:
			JC		NEXT_1
				WRONG1:
					JMP		WRONG
			NEXT_1:
			MOV		TMP,A

			CLR		CY
			MOV		A,3AH
			SUBB	A,#2EH
			JNZ		P_NEXT3
				P_3A:
					MOV		40H,TMP
					MOV		A,3BH
					MOV		B,#10
					MUL		AB
					ADD		A,3CH
					MOV		41H,A	;XXXX.XX
					JMP		OUT_CALC_SET
		P_NEXT3:
			MOV		A,TMP
			MOV		B,#10
			MUL		AB
			JBC		OV,WRONG2
			ADD		A,3AH
			JBC		CY,WRONG2
			CJNE	A,#110,OVER100_2
			OVER100_2:
			JC		NEXT_2
				WRONG2:
					JMP		WRONG
			NEXT_2:
			MOV		TMP,A

			CLR		CY
			MOV		A,3BH
			SUBB	A,#2EH
			JNZ		P_NEXT4
				P_3B:
					MOV		40H,TMP
					MOV		A,3CH
					MOV		B,#10
					MUL		AB
					MOV		41H,A
					JMP		OUT_CALC_SET
					;XXXXX.X
		P_NEXT4:
			MOV		A,TMP
			MOV		B,#10
			MUL		AB
			JBC		OV,WRONG3
			ADD		A,#3BH
			JBC		CY,WRONG3
			CJNE	A,#110,OVER100_3
			OVER100_3:
			JC		NEXT_3
				WRONG3:
					JMP		WRONG
			NEXT_3:
			MOV		40H,A
			MOV		41H,#00H

		OUT_CALC_SET:		;
//??????????????,???????????????
			MOV		SET_TEMPER_I,40H
			MOV		SET_TEMPER_P,41H
			JNB		SET_HIGH,OUT_OUT
				MOV	36H,#0CH  ;//?????,?????,????0c,?????
			OUT_OUT:
			CPL		SET_HIGH	;//?????,-??+
			RET

		WRONG:
			SETB	CALC_WRONG_FLAG
			CLR		SET_HIGH
			RET	
;=================================
;==============SYSTEM_INIT
SYSTEM_INIT:
	
	SETB	EA
	SETB	EX0
	SETB	PX0
	CLR	EA

	MOV		M_TIMES,#00H	;NO MODIFY
	CLR		M_FLAG			;NOT IN MODIFY
	MOV		RECEIVE,#0FFH	;NO PUTIN
	SETB	M_FIRST			;FIRST IN MODIFY

	MOV	31H,#99H
	INIT_LP:
		CALL	LONG_DELAY
		DJNZ	31H,INIT_LP
	MOV		COMMAND,#RESET7
	CALL	SENT
	SETB	CS		;INIT 7279A
	;999999999999999
	CALL	LONG_LONG_DELAY
	CLR    RES
    SETB   RES             ; // ???????VDD
    SETB   RS              ; // ???????VDD
    CLR    PSB             ; // ??????VSS
    CALL   INIT12864        ; // ???????
	RET
;================================================
;****************************************
;========//========r6,r7??,r3r4r5?BDC?
HB2:CLR	A//;BCD???? 
MOV		R3,A 
MOV		R4,A 
MOV		R5,A 
MOV		R2,#10H//;??????????? 
HB3:MOV		A,R7//;?????????????CY? 
RLC		A 
MOV		R7,A 
MOV		A,R6 
RLC		A 
MOV		R6,A 
MOV		A,R5//;BCD????????,????2 
ADDC		A,R5 
DA		A//;????? 
MOV	R5,A 
MOV	A,R4 
ADDC	A,R4 
DA	A 
MOV	R4,A 
MOV	A,R3 
ADDC	A,R3 
MOV	R3,A//;???????????????6,???? 
DJNZ	R2,HB3//;???16bit 
RET 
;************************************
;====================
;==================INTERRUPT
INTERRUPT:
  	PUSH	ACC
	PUSH	PSW

	MOV	COMMAND,#READ
	CALL	SENT
	CALL	RECEIVEDATE
	SETB	CS	  ;get keyborad

	JB		M_FLAG,IN_MODIFY 	;IN_MODIFY
		OUT_MODIFY:
			CLR		CY
			MOV		A,RECEIVE
			SUBB	A,#0AH
			JZ		CHANGE_STAA
			JMP		OUT_INT

		IN_MODIFY:	
			CLR		CY
			MOV		A,RECEIVE
			SUBB	A,#0AH
			JZ		OUT_INT
			MOV		A,RECEIVE
			SUBB	A,#0DH
			JZ		OUT_INT
			CLR		CY
			MOV		A,RECEIVE
			SUBB	A,#0EH
			JZ		OUT_INT

			JMP		OUT_INT
			;IF IT IS NOT A/B/C/D/E ,IT WILL JMP TO CHANGE
	CHANGE_STAA:
	SETB	M_FLAG
	MOV		RECEIVE,#0FFH
	CLR		SET_HIGH  		;clear set temper flag
	CLR		POINT_FLAG		;clear point flag,it's mean no point in
	OUT_INT:
	POP		PSW
	POP		ACC
	RETI 
	;==================================
;//==================????????????????
WRITE_DATE_TO_DISPLAY:
	  MOV		R6,TMP0	;//????TMP0?
	  MOV		R7,TMP	;//????TMP?
	  CALL		HB2
	  MOV		A,R3
	  MOV		31H,A

	  MOV		A,R4
	  ANL		A,#0F0H
	  SWAP		A
	  MOV		32H,A

	  MOV		A,R4
	  ANL		A,#0FH
	  MOV		33H,A

	  MOV		A,R5
	  ANL		A,#0F0H
	  SWAP		A
	  MOV		34H,A

	  MOV		A,R5
	  ANL		A,#0FH
	  MOV		35H,A
	  RET
;**********************************************
;=============//??????
CALC_CLARK:
		CLR	 	CY
		CLR		P1.7
		CLR		P1.5
		MOV		A,TMP_SET_TEMPER_I
		SUBB	A,#8
		JNC		CLARK	//????20,c??0,????
			RET
		CLARK:
			JB		SUB_HIGH,RED_CLARK	;//????
				   SETB	P1.7
				   RET

			RED_CLARK:
					SETB	P1.5
				RET
;=============================================================
;//????????,????????,????????????,
CALC_SUB:
			MOV	HDATA,SET_TEMPER_I
			MOV	LDATA,SET_TEMPER_P
	  JNB	SET_HIGH,SET_OVER0
		  MOV	A,SET_TEMPER_P
		  CPL	A
		  MOV	SET_TEMPER_P,A
		  MOV	A,SET_TEMPER_I
		  CPL	A
		  MOV	SET_TEMPER_I,A
		  CLR	CY
		  MOV	A,SET_TEMPER_P
		  ADD	A,#1
		  MOV	SET_TEMPER_P,A
		  MOV	A,#0H
		  ADDC	A,SET_TEMPER_I
		  MOV	SET_TEMPER_I,A	;//?????????
	  SET_OVER0:
	  JNB	CU_HIGH,CURRENT_OVER0
	  	  MOV		A,TEMPER_L
		  CPL		A
		  MOV	TEMPER_L,A
		  MOV	A,TEMPER_H
		  CPL	A
		  MOV	TEMPER_H,A
		  CLR	CY
		  MOV	A,TEMPER_L
		  ADD	A,#1
		  MOV	TEMPER_L,A
		  MOV	A,#0H
		  ADDC	A,TEMPER_H
		  MOV	TEMPER_H,A	;//?????????		
	  CURRENT_OVER0:

	  NEXT_CALC_SUBB:
	  		MOV		A,#0H
			MOV		A,TEMPER_H
			RL		A
			MOV		C,CU_HIGH
			RRC	 	A
			MOV		A,#0H
			MOV		A,SET_TEMPER_I
			RL		A
			MOV		C,SET_HIGH
			RRC		A

	  		CLR		CY
	  	  	MOV		A,TEMPER_L
		  	ADD	   	A,SET_TEMPER_P
			MOV		TMP_SET_TEMPER_P,A

			MOV		A,TEMPER_H
			ADDC	A,SET_TEMPER_I
			MOV		TMP_SET_TEMPER_I,A

			ANL		A,#80H
			JNZ		SUB_UNDER0	//????????,?????????
				MOV	SET_TEMPER_I,HDATA
				MOV	SET_TEMPER_P,LDATA
				CLR		SUB_HIGH
				RET
			SUB_UNDER0:
				SETB	SUB_HIGH
				CLR		CY
				MOV		A,TMP_SET_TEMPER_P
				SUBB	A,#1H
				CPL		A
				MOV		TMP_SET_TEMPER_P,A

				MOV		A,TMP_SET_TEMPER_I
				SUBB	A,#0H
				CPL		A
				MOV		TMP_SET_TEMPER_I,A
				MOV	SET_TEMPER_I,HDATA
				MOV	SET_TEMPER_P,LDATA
				SETB	SUB_HIGH
				RET
	
 ;************************************************
END


xeqxerxe
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
无线温度控制系统是如何解决传统温度监控系统存在的问题
w18103285972的博客
12-30 1123
引言 　　电力系统对安全性有很高的要求，电力系统设备在长时间的使用过程中会老化或出现过热现象，如果不能及时发现并加以解决，就可能导致严重的事故，须严格监视电力系统设备的工作状态，其中对高压开关柜触点的温度进行监测是非常重要的任务。温度可以间接反映电气设备的运行状态，许多故障都会导致温度异常，因此非常需要对电气设备进行温度监测。而在恶劣的生产条件下（例如发电机局部放电）很难使用常见的测量方法进行温度监测，因此开发可靠且实用的多点温度测量设备非常重要，无线技术可以用于克服现有有线温度监控系统的许多缺点。 　
基于物联网的多点温度监控系统（WeMOS D1 WIFI ESP8266 开发板）
qq_41830588的博客
03-12 4133
基于物联网的多点温度监控系统 一、设计任务与要求 1． 任务 设计制作基于物联网的多点温度监控系统。 2． 要求 1.实时获取3个被测对象温度，温度测量范围：－55℃ ～+125℃；测量精度：0.1℃。 2.实时获取的温度值通过WIFI传输至阿里云。 3.可以通过阿里云物联网平台实时查看各监测点的温度数据。 二、系统架构 （1）感知层 完成空气温度感知和收集。 （2）网络层 网络层通过WiFi接入互联网，将感知数据传至云端。 （3）应用层 应用层通过物联网平台对温度进行实时监测，以达到远程监测温度的目的。
基于单片机的温度监控报警系统设计
理论结合实践，开启你的电子学习新方案！
06-07 1590
本设计所介绍的数字温度计与传统的温度计相比，具有读数方便，测温范围广，测温准确，其输出温度采用数字显示，主要用于对测温比较准确的场所，或科研实验室使用，该设计控制器使用单片机AT89S51，测温传感器使用DS18B20，用3位共阳极LED数码管以串口传送数据,实现温度显示,能准确达到以上要求。
温湿度监控系统 设计
weixin_34387284的博客
04-19 1101
温湿度监控系统项目总结系统构想： DHT11采集数据，通过485总线（初期用串口）传递给上位机，上位机可控制其参数设置，控制其报警状态，读取当前温湿度值，读取当前下位机参数设置情况；下位机实现思想： 基础功能： 首先实现与上线位机通信的必备代码...
基于单片机设计的温度监控系统设计
嵌入式基地
09-28 3792
文末下载完整资料                     引言   随着“信息时代”的到来，作为获取信息的手段——传感器技术得到了显著的进步，其应用领域越来越广泛，对其要求越来越高，需求越来越迫切。传感器技术已成为衡量一个国家科学技术发展水平的重要标志之一。因此，了解并掌握各类传感器的基本结构、工作原理及特性是非常重要的。   由于传感器能将各种物理量、化学量和生物量等信号转变为电信号，使得人们可以利用计算机实现自动测量、信息处理和自动控制，但是它们都不同程度地存在温漂和非线性等影响因素。传感器主要用于测量
基于RT_thread的分布式无线温度监控系统
weixin_52694360的博客
06-02 569
基于RT_thread的分布式无线温度监控系统是一个可实现远程监控的智能家居DIY项目，其可适用于家庭、办公室、教室等小场所得多节点温度监控，最大支持六个节点的温度数据。六个点负责温度数据采集，由一个接收结点并作为网关，通过WIFI上传至云端，手机电脑实现远程监控，实用且有趣；发送节点 1.将 DS18B20 温度传感器对接 sensor 组件，正确读取 ds18b20 温度传感器数据； 2.使用 nRF24L01 软件包，将温度数据以无线方式传输给接收节点，由 nRF24L01 特性决定了发送节点最多支持
Labview布尔型的例子——一个简单温度监控系统的设计
Fo*(Bi)的博客
03-09 5360
步骤 步骤一 打开Labview→文件→新建一个VI→在前面板添加一个布尔型的指示灯和一个浮点型的数值显示控件。 步骤二 打开程序框图，“函数”选项板→“编程”→“结构”→While循环→将该结构添加到程序框图中→在“循环条件”端子单击鼠标右键选择“创建输入控件”（就是一个方框）。 在循环体内： 选择“编程”→数值→随机数（0-1） 选择“编程”→数值→乘，命令对随机数放大50倍，把计算得出的结果显示在数值显示控件内 选择“编程”→比较→大于？，把放大50倍的随机数与常量35进行大小比较。由于比较结果是
温度监控系统下位机温度超出警报 基于51单片机
yunsheng233的博客
06-22 856
温室监控系统下位机温度超出警报
RT-thread实战项目学习与总结 -- 基于RT-Thread的分布式无线温度监控系统
Eureka1024的博客
07-14 3143
一、内容概括 第一周：在线程中获取ds18b20温度数据 1、介绍 RT-Thread 的sensor组件 2、将ds18b20温度传感器对接RT-Thread的sensor组件，提高上层代码的可重用性 3、学习线程的使用，在线程中正确读取d18b20温度值 第二周：使用nrf24l01软件包发送与接收温度数据 1、介绍RT-Thread的软件包 2、简介nrf24l01软件包的使用，讲解如何使用...
单片机 温度监控系统的设计
06-11
单片机 温度监控系统的设计单片机 温度监控系统的设计单片机 温度监控系统的设计单片机 温度监控系统的设计单片机 温度监控系统的设计单片机 温度监控系统的设计单片机 温度监控系统的设计单片机 温度监控系统的设计...
LabVIEW温度监控系统
05-02
该示例使用LabVIEW实现温度数据实时监控，用户可自定义温度上下限数值，当检测温度高于上限设置或低于下限设置时，上位机提示相应报警。 程序设计上会复杂一些，主要包括4个功能模块。 1、UI消息循环功能：实现管理...
kechengsheji.zip_温度监控系统
09-19
此文件夹是课程设计的几个项目，里面又LCD12864时钟程序、基于数码管时钟程序、温度监控系统
多点温度监控系统的设计
07-31
目前许多场合都要对温度进行控制。如仓库，不同的储藏室储存物品的温度都不同；...该文研究的多点温度监控系统能够对多个位置的温度进行设置、检测，根据温度设置值与检测值来控制调温设备运转，调节温度。
基于单片机的温度监控系统的设计.doc
最新发布
07-28
基于单片机的温度监控系统的设计.doc 基于单片机的温度监控系统的设计.doc 基于单片机的温度监控系统的设计.doc 基于单片机的温度监控系统的设计.doc 基于单片机的温度监控系统的设计.doc 基于单片机的温度监控系统...
【智能家居 DIY 活动】基于 RT-Thread 的分布式无线温度监控系统 DIY 活动正式上线啦！！！
MRccCHEN的博客
07-12 698
基于 RT-Thread 的分布式无线温度监控系统 1. 项目简介 Hi~ 各位小伙伴们，还在为初学 RT-Thread 不知从何下手而感到烦恼吗？有没有想过利用 RT-Thread 来打造属于自己的一个智能家居系统？ 现在，基于 RT-Thread 的分布式无线温度监控系统 DIY 项目正式开启，大伙儿可以通过这个项目快速学习基于 RT-Thread 的项目开发，不再纠结无从下手！多篇连载文章...
中波调幅干扰实验
xeqxerxe的专栏
08-01 1681
前些日子上网看到一个帖子,作者用一个音频变压器、一个晶振、加上一根简易的天线做成了一个音频发射器，其晶振频率为1MHZ，距离约10m左右，使用收音机即可收到，下面是作者的图片 我觉得挺好玩的，便去买晶振想实验下，但是遗憾的是我买到的是1.84M的，而我国的中波调幅波段是540~1600KHZ，也就是我的收音机范围就是540~1600的，真悲催！ 但是我想知道用这么简单的东西能否
自己曾经做过的基于DSP的WAV播放器
xeqxerxe的专栏
08-01 1624
有个想法,自己弄个播放器多好玩啊,想了想,应该分为以下几个部分 1.得有个处理器,我有BF592 2.得有个音频解码器,我有SSM2603 3.得有个存储器,我有M25P16 当前的情况是这三个我都有 按照难度,先来存储器,U盘还是SD卡呢?思考下,还是SD好些,理由是因为DSP支持SPI,而SD可以直接使用SPI,确定了 正好我有手机卡,今天买朗琴X6
DSP上的贪吃蛇游戏
xeqxerxe的专栏
08-01 989
程序员是值得尊敬的，程序员的双手是魔术师的双手，他们把枯燥无味的代码变成了丰富多彩的软件…… 最近蛮无聊的，在实验室发现一个12864，哦哈哈，正好可以拿来写点小游戏玩，于是便萌生了用评估板写一些小游戏的想法，让我想想，神马贪吃蛇、拼图、坦克大战……，好多的说，昨天没事，就写了一个，虽然可能还有许多小问题，但是可以确定的是可以玩，…^-^ 首先来一张硬件连接的照片，拿手机照的，效果不大
labview温度监控系统
07-28
LabVIEW温度监控系统是一种利用LabVIEW编程设计的系统，用于采集、监测和处理温度数据。该系统可以通过使用LabVIEW中的各个子VI来实现数据的自动采集、处理、显示和存储等功能。\[1\]此外，该系统还可以根据设定的...

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值