?? 模糊控制和經驗的水溫調節系統2.asm
字號:
;PWM R0,CASE_2,R2,R3,R4 全局變量
;;;;;;;;;;;;;;;;;;;;;;;
DATEX_1 EQU 30H ;用來計數
CASEX_3 EQU 27H ;緩沖
DATEX_2 EQU 31H ;用來存放占空比
DATEX_3 EQU 32H ;用來存放時鐘
DATEX_4 EQU 33H ;用來存放溫度 （沒用到）
OUT_PUT EQU P3.7 ;用來控制溫度PWM
IN0_PUT EQU P2.6 ;MOHU_NO
IN1_PUT EQU P2.7 ;MOHU_NO
IN2_PUT EQU P2.5 ;MOHU_NO
DATEX_5 EQU 35H ;NT十位溫度
DATEX_6 EQU 36H ;NT個位溫度
DATEX_7 EQU 37H ;NT小數溫度
DATEX_8 EQU 40H ;占存
DATEX_9 EQU 41H ;用來存放時鐘分鐘
DATEX_10 EQU 42H ;MOHU_NO采集時間控制
ST_1 EQU 43H ;設定溫度個位
ST_2 EQU 44H ;設定溫度十位
DATEX_11 EQU 45H ;用來存放ST溫度
DATEX_12 EQU 46H ;用來存放NT溫度
DATEX_13 EQU 47H ;(16)低位
DATEX_14 EQU 48H ;(16)高位
DATEX_15 EQU 49H ;(16)
COMPY_2 EQU 4AH ;比較(高位）
COMPY_1 EQU 4BH ;比較(低位）
MOHU_NO_5 EQU 4CH ;MOHU_NO抗干擾(高位）
MOHU_NO_4 EQU 4DH ;MOHU_NO (低位）
MOHU_NO EQU 4EH ;MOHU_NO 數據 (高位
MOHU_NO_L EQU 4FH ;MOHU_NO 數據 (低位）
EMPTY_2 EQU 50H ;用來存放占空時間(高位）
EMPTY_1 EQU 51H ;用來存放占空時間(低位）
ZHAN_KONG EQU 52H ;用來判斷保溫
ZHAN_TIME EQU 53H ;用來保溫計數
JISHU EQU 54H ;用來計數占空比
MOHU_NO_1 EQU 55H
MOHU_NO_2 EQU 56H
MOHU_NO_3 EQU 57H
A_E EQU 58H ;模糊控制偏差的變化量
M_E EQU 59H ;測得溫度與設定溫度的偏差E
SINGN_END EQU 24H.0 ;用來標志加熱結束
SINGN_R EQU 24H.1 ;確認鍵
SINGN_T EQU 24H.2 ;停止鍵 （沒用到）
SIGN_WEATHER EQU 24H.3 ;氣溫判斷
SIGN_ZHAN EQU 24H.4 ;保溫標志
SIGN_CASE EQU 24H.5 ;緩沖加熱
SIGN_PT EQU 24H.6 ;
SIGN_30 EQU 24H.7 ;30S結束
SIGN_FU EQU 25H.0 ;符號標志
SIGN_FU_E EQU 25H.1 ;符號標志
;;;;;;;;;;;;;;;;;;
ORG 00H
LJMP MAIN
ORG 00BH
LJMP TIME_0
ORG 50H
MAIN:MOV TL0,#0F3H
MOV TH0,#0D8H
MOV TMOD,#01H
SETB ET0
MOV DATEX_1,#00H
MOV DATEX_3,#00H
MOV DATEX_9,#00H
MOV DATEX_5,#00H
MOV DATEX_6,#00H
MOV DATEX_7,#00H
MOV DATEX_10,#00H
MOV DATEX_2,#10
MOV COMPY_1,#00H
MOV COMPY_2,#00H
MOV EMPTY_2,#00H
MOV EMPTY_1,#00H
MOV ZHAN_KONG,#00H
MOV ZHAN_TIME,#00H
MOV CASEX_3,#00H
CLR SINGN_END
CLR SINGN_T
CLR SINGN_R
CLR SIGN_WEATHER
CLR SIGN_ZHAN
CLR SIGN_CASE
CLR SIGN_PT
CLR SIGN_30
CLR SIGN_FU
CLR SIGN_FU_E
MOV ZHAN_KONG,#1EH
MOV R0,#55H
MOV CASE_2,#4EH
MOV MOHU_NO_4,#00H
MOV MOHU_NO_5,#00H
MOV MOHU_NO,#00H
MOV MOHU_NO_L,#00H
MOV CASEX_3,#00H
SETB OUT_PUT
MOV SP,#60H
START: MOV P1,#00001100B ;顯示開關控制-開顯示-光標開-字符閃爍
LCALL Ming_Lin_1 ;調用命令輸出子程序
MOV P1,#00111000B ;功能設置-8位數據接口-雙行顯示-5*7點陣
LCALL Ming_Lin_1 ;調用命令輸出子程序
MOV P1,#00000001B ;清屏
LCALL Ming_Lin_1 ;調用命令輸出子程序
MOV P1,#00000110B ;輸入方式設置，增量方式不移位
LCALL Ming_Lin_1
MOV P1,#84H
LCALL Ming_Lin_1
MOV P1,#54H
LCALL DADE
;==============
MOV P1,#85H
ACALL Ming_Lin
MOV P1,#69H
ACALL DADE
;=============
MOV P1,#86H
ACALL Ming_Lin
MOV P1,#6DH
ACALL DADE
;===========
MOV P1,#87H
ACALL Ming_Lin
MOV P1,#65H
ACALL DADE
;=========
MOV P1,#88H
ACALL Ming_Lin
MOV P1,#3AH
ACALL DADE
;==========
MOV P1,#8BH
ACALL Ming_Lin
MOV P1,#3AH
ACALL DADE
;========
MOV P1,#0C0H
ACALL Ming_Lin
MOV P1,#53H
ACALL DADE
;===========
MOV P1,#0C1H
ACALL Ming_Lin
MOV P1,#54H
ACALL DADE
;=============
MOV P1,#0C2H
ACALL Ming_Lin
MOV P1,#3AH
ACALL DADE
;==========
MOV P1,#0C5H
ACALL Ming_Lin
MOV P1,#63H
ACALL DADE
;==========
MOV P1,#0C7H
ACALL Ming_Lin
MOV P1,#4EH
ACALL DADE
;==========
MOV P1,#0C8H
ACALL Ming_Lin
MOV P1,#54H
ACALL DADE
;=========
MOV P1,#0C9H
ACALL Ming_Lin
MOV P1,#3AH
ACALL DADE
;=========
MOV P1,#0CCH
ACALL Ming_Lin
MOV P1,#2EH
ACALL DADE
;================
MOV P1,#0CEH
ACALL Ming_Lin
MOV P1,#63H
ACALL DADE
;*******************鍵盤掃描和數據處理
BEGIN: LCALL SCAN
LCALL DELAY1
LCALL DELAY1
LCALL IN_PUT
;SETB SINGN_R ;/
;SETB SIGN_WEATHER
;MOV ST_2,#5;/
;MOV ST_1,#0;/
;MOV DATEX_5,#2;/
;MOV DATEX_6,#7 ;/
MOV A,DATEX_5 ;BCD碼轉換成十六進制
MOV B,#10
MUL AB
MOV DATEX_12,A
MOV A,DATEX_6
ADD A,DATEX_12
MOV DATEX_12,A
JNB SIGN_WEATHER,BEGIN_1
;***************
MOV P1,#81H
ACALL Ming_Lin
MOV P1,#73H
ACALL DADE
;**************
BEGIN_1:LCALL LCM
JB SINGN_R,WORK_1
AJMP BEGIN
WORK_1: MOV A,ST_2 ;BCD碼轉換成十六進制
MOV B,#10
MUL AB
MOV DATEX_11,A
MOV A,ST_1
ADD A,DATEX_11
MOV DATEX_11,A
LCALL COOK_1 ;提供輸出量
SETB SIGN_30
SETB TR0
SETB EA
SETB OUT_PUT
WORK: ;MOV DATEX_5,#2;/
;MOV DATEX_6,# 7;/
LCALL DELAY1
LCALL LCM ;開始工作并加熱
AJMP WORK
;;;;=====================================
;***********************************************查表經驗值的占空比
;***********************************************
; 模糊控制
;**********************************************
;**********************************************
;A_E EQU 58H ;模糊控制偏差的變化量ΔE
;M_E EQU 59H ;測得溫度與設定溫度的偏差E
U_B EQU 5AH ;輸出為電熱絲加熱量U 大
U_M EQU 5BH ;輸出為電熱絲加熱量U 中
U_S EQU 5CH ;輸出為電熱絲加熱量U 小
CASE_2 EQU 5DH ;占存
;*************************************************
;***************************************************
MOHU_CONTROL:JB SIGN_FU_E,MOHU_CONTROL_1
MOV A,M_E ;B
CLR C
CJNE A,#25,MOHU_1
MOHU_1: JC MOHU_CONTROL_1
MOV A,A_E
CLR C
JB SIGN_FU,WUCHA_N
CJNE A,#1,E_1
E_1: JC WUCHA_N ;>0.2
MOV DATEX_2,U_B ;;U_B
CLR SIGN_FU
SETB SIGN_CASE ;PWM開始輸出
RET
WUCHA_N:CLR C ;<-0.2
JNB SIGN_FU,WUCHA_0
CJNE A,#1,E_2
E_2: JC WUCHA_0
MOV DATEX_2,U_M ;;U_M
CLR SIGN_FU
SETB SIGN_CASE ;PWM開始輸出
RET
WUCHA_0:
MOV DATEX_2,U_B ;-0.2~0.2 ;U_B
CLR SIGN_FU
SETB SIGN_CASE ;PWM開始輸出
RET
MOHU_CONTROL_1:JB SIGN_FU_E,MOHU_CONTROL_2
MOV A,M_E ;M
CLR C
CJNE A,#10,MOHU_2
MOHU_2: JC MOHU_CONTROL_2
MOV A,A_E
CLR C
JB SIGN_FU,WUCHAX_N
CJNE A,#1,EX_1
EX_1: JC WUCHAX_N ;>0.2
MOV DATEX_2,U_M ;;U_M
CLR SIGN_FU
SETB SIGN_CASE ;PWM開始輸出
RET
WUCHAX_N:CLR C ;<-0.2
JNB SIGN_FU,WUCHAX_0
CJNE A,#1,EX_2
EX_2: JC WUCHAX_0
MOV DATEX_2,U_M ;U_M
CLR SIGN_FU
SETB SIGN_CASE ;PWM開始輸出
RET
WUCHAX_0:MOV DATEX_2,U_B ;-0.2~0.2 ;;;U_B
CLR SIGN_FU
SETB SIGN_CASE ;PWM開始輸出
RET
MOHU_CONTROL_2:JB SIGN_FU_E,MOHU_CONTROL_3
MOV A,A_E ;S
CLR C
JB SIGN_FU,WUCHAY_N
CJNE A,#1,EY_1
EY_1: JC WUCHAY_N ;>0.2
MOV DATEX_2,U_S ;;U_S
CLR SIGN_FU
SETB SIGN_CASE ;PWM開始輸出
RET
WUCHAY_N:CLR C ;<-0.2
JNB SIGN_FU,WUCHAY_0
CJNE A,#1,EY_2
EY_2: JC WUCHAY_0
MOV DATEX_2,U_S ;;U_S;
CLR SIGN_FU
SETB SIGN_CASE ;PWM開始輸出
RET
WUCHAY_0:MOV DATEX_2,U_M ;-0.2~0.2 ;;U_M
CLR SIGN_FU
SETB SIGN_CASE ;PWM開始輸出
RET
MOHU_CONTROL_3:CLR SIGN_CASE ;PWM關閉輸出
CLR SIGN_ZHAN
SETB OUT_PUT ;關閉加熱
CLR SIGN_FU_E
RET
;***************************************
;***********************************************查表經驗值的占空比
;***********************************************
COOK_1:MOV A,DATEX_11
CLR C
CJNE A,#80,COOK_2
COOK_2:JC COOK_3 ;<80
NOP
RET
COOK_3:CLR C
CJNE A,#70,COOK_4
COOK_4:JC COOK_5
;>70
MOV U_B,#91 ;1000W
MOV U_M,#64 ;491W
MOV U_S,#23 ;63W
RET
COOK_5:CLR C
CJNE A,#60,COOK_6
COOK_6:JC COOK_7 ;>60
MOV U_B,#91 ;1000W
MOV U_M,#64 ;491W
MOV U_S,#23 ;63W
RET
COOK_7:CLR C
CJNE A,#50,COOK_8
COOK_8:JC COOK_9 ;>50
MOV U_B,#91 ;1000W
MOV U_M,#64 ;491W
MOV U_S,#16 ;30W
RET
COOK_9:CLR C
CJNE A,#40,COOK_10
COOK_10:JC COOK_11
MOV U_B,#91 ;1000W
MOV U_M,#64 ;491W
MOV U_S,#10 ;12W
RET
COOK_11:CLR C
CJNE A,#30,COOK_12
COOK_12:JC COOK_13
MOV U_B,#91 ;1000W
MOV U_M,#64 ;491W
MOV U_S,#10 ;12W
COOK_13:RET
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -