📄 action1.inc
字号:
[m_Tmax2]= 0FFH
[m_Tmax3]= 0FFH
[m_Tmax4]= 0FFH
[m_Tmax5]= 0FFH
[m_Tmax6]= 0FFH
[m_Tmax7]= 0FFH
LDM #00H,M_DefrostMin ;h
LDM #00H,M_CompSumMin
;LDM #00H,m_InDefrostSec ;h
LDM #00H,m_TpNodownSec
LDM #00H,m_pipeLow38Sec
;LDM #00H,m_PipeUp6Sec
ldm #00H,m_pipeupsec
CLB b_Pipeupflag
CLb b_defrostFlag
[m_Tmin] = 0FFH
;****************************************************************
if [Comp] == 1
seb Out_FanHigh
else
clb Out_FanHigh
endif
RTS
safe_cool:
if [b_sencerErrorGUAN] == 0 && [b_sencerErrorHUAN] == 0 ;20050913
if [M_PipeTemp] <= [TPipepot0] && [coolTemp] >= [m_Coolsave]
jsr Fun_CompStop
if [Comp] == 0 ; add 2002.2.26 for dry savecool LED flash
seb recool_flag
endif
endif
if [recool_flag]==1
if [CompStopSecond] >= 180 && [M_PipeTemp] >= [TPipepot10]
clb recool_flag
ldm #00h,coolTemp
endif
endif
endif
rts
;******************* heat mode ************************
; When M_RoomTemp <= Tset +3 , Comp on
; When M_RoomTemp >= Tset +5 , Comp off
;*******************************************************
CompIoff:
clb Heat
clb Out_FanHigh
clb L_fan
clb M_fan
clb H_fan
rts
;**************************************************************************
; if Troom <=Tset -1 4v=1 Comp=1 out_Fan=1 Fanroom = safe_Ltemp
; if Troom >= TSet+1 4v=1 Comp=0 Out_Fan=0 FanRoom = 0
; if TSet-1 < Troom < TSet+1 continue
;**************************************************************************
Fun_HeatMode:
if [b_onepulltwo] == 0 && [Comp]==1 ;ironepulltwo clear fundefrost_d and safecool9min 20050801
[CaseC2s] = 0
[Ltemp5D_flag] = 1
endif
LDM #00h,savepowertime
[heattempup] = 00h
[heattempdown]= 00h
[coolTemp] = 00h
CLB b_firstdry
if [b_hrp] == 1 && [ir1StrongMan] == 1 && [ir1_sleep] == 0 ;20050805
[settempval] = 30
endif
if [settempval] <= 0F8H
[heattempup]=[settempval]+4
else
[heattempup] = 0FFH
endif
[au_mode2] = RUN_HEAT ;2005-11-15 16:31
if [settempval] <= 0FCH
[heattempdown] = [settempval] + 2
else
[heattempdown]= 0FFH
ENDIF
CLb recool_flag
if [ice_flag] == 0
if [oldmode] == RUN_COOL|| [oldmode] == RUN_DRY
if [modetime] < 180 ;h
seb trun_mode
clb Heat
if [Comp] ==1
clb Comp
SEB b_CompStop
CLB b_savecoolflag
endif
clb Out_FanHigh
jsr off_fan
seb Ltemp_flag
jmp outheatrun
else
clb trun_mode
endif
endif
endif
if [Comp]==1
if [port0]& 11100000B != [mRoomFanold]
[bFanchangeflag] =1
[mFanChangetime] =0
;ldm #00h,mRoomActSec
endif
[mRoomFanold]= [port0]& 11100000B
if [ice_flag] == 0 && [Htemp_flag] == 0
jsr safe_Ltemp
endif
if [ice_flag] ==0
if [M_PipeTemp] >= [TPipepot56] || [Htemp_flag]==1 || [b_stopoutfan]==1
jsr safe_Htemp
endif
if [b_stopoutfan] == 0
jsr Fun_OutFan
endif
endif
else
CLB b_savecoolflag
clb Out_FanHigh
seb Ltemp_flag
[Ltemp5D_flag] = 0
[runfan_flag] = 0
[first43d_flag] = 0
[min3_flag] = 0
[Lfanrun] = 0
[CaseC2s] = 0
[Lfanrun5] = 0
[F_41D] = 0
[nofan3min] = 00h
[Lfanrunmin] = 00h
[Lfanrunmin1] = 00h
endif
if [Comp]==1
if [port0] & RoomFAN_Enable != 0
if [b_onepulltwo] == 1 ;2006-1-3 13:42
if [CaseC2s] >= 2
seb ice_flag
endif
endif
endif
endif
if [b_stopoutfan] == 0 ;wu fang gao wen
jsr Fun_Defrost
endif
if [ice_flag]==1 && [b_stopoutfan] == 1
jsr Fun_Defrost
clb b_stopoutfan
endif
if [ice_flag]==0 && [trun_mode]==0
if [M_RoomTempsel] > [heattempdown] && [M_RoomTemp] < [heattempup]
if [Comp] == 1 && [M_OCSecond] < 3
seb Four_valve
endif
if [Comp_Iflag] == 1 && [M_OCSecond] >= 3
clb Comp
clb Heat
clb Out_FanHigh
SEB b_CompStop
endif
if [Comp]==0
JSR heat2_off
CLB b_savecoolflag
endif
endif
if [M_RoomTempsel] <= [heattempdown]
;**********************************************2005-10-27 19:26
if [Comp]==0
JSR heat2_off
CLB b_savecoolflag
endif
;***********************************************2005-10-27 19:25
seb Four_valve
jsr heat_act
[re_mode] = RUN_HEAT
endif
if [M_RoomTempsel] >= [heattempup]
jsr Fun_CompStop
;if [Comp]==1
;if [Ltemp_flag] == 0
;jsr Fun_RoomFan
;SEB b_savecoolflag
;[runfan_flag] = 1
;endif
;else
if [Comp]==0
jsr heat2_off
CLB b_savecoolflag
endif
endif
if [Comp]==1
jsr Pvc_Control
else
CLB b_savecoolflag
clb Heat
endif
endif
outheatrun:
RTS
heat2_off:
clb Heat
clb Out_FanHigh
if [re_mode] == 00h
jsr off_fan
seb Ltemp_flag
else
if [CompStopSecond] < 60 && [m_FanAction] != 00H ; 2002/10/28
seb L_fan
clb M_fan
clb H_fan
else
ldm #00h,re_mode
jsr off_fan
seb Ltemp_flag
endif
endif
rts
heat_act:
jsr Fun_CompStart
if [Comp]==1
if [ice_flag] == 0 && [b_stopoutfan]==0 && [Comp_Iflag] == 0
jsr Fun_OutFan
endif
else
jsr off_fan
seb Ltemp_flag
[Ltemp5D_flag] = 0
[runfan_flag] = 0
[first43d_flag] = 0
[min3_flag] = 0
[Lfanrun] = 0
[CaseC2s] = 0
[Lfanrun5] = 0
[F_41D] = 0
endif
rts
; **************************************************************
; Low Room Temptue Start Heat:
; if [M_PipeTemp] <= [Tpot40] || [CompRunSecond] > 10 ; P4.4 =0
; if [M_PipeTemp] >= [Tpot40] || [CompRunSecond] > 20 ; P4.4 =1 add 2000.2.28
; Room Fan Power On
; else
; Romm Fan Stop
; **************************************************************
safe_Ltemp:
if [runfan_flag] == 0
jsr Infanglengfeng
else
jsr Fun_RoomFan
endif
rts
Infanglengfeng:
if [Ltemp5D_flag] == 0 && [CompOnminute] < 9 ;20050111
[mNowBuffer] = [M_RoomTemp1] + 5
if [m_Tpipetemp] <= [mNowBuffer]
jsr off_fan
seb Ltemp_flag
[Ltemp5D_flag] = 0
[Lfanrun] = 0 ;fang leng feng bu keyi kai dian jia re,ju ti hai yao kan feng ji shi ji you mei you yun xing
else
[Ltemp5D_flag] = 1
endif
else
[Ltemp5D_flag] = 1 ; 20041218
JSR NOCHECK5D ;
endif
rts
NOCHECK5D:
lif [Lfanrun] == 0 ;yi dan feng ji qidong bian bu zai fangleng feng er ting
lif [M_RoomTemp1] <= 23
if [min3_flag] == 0 ;shi ji wei 2min yan shi
if [m_Tpipetemp] <= 40
jsr off_fan
seb Ltemp_flag
else
if [m_Tpipetemp] > 41
[Lfanrun] = 1
clb Ltemp_flag
endif
if [Lfanrun5] == 0 ;20050721
if [m_Tpipetemp] > 42
jsr Fun_RoomFan
[runfan_flag] = 1
else
jsr fanL
endif
else
jsr Fun_RoomFan ;20050721
[runfan_flag] = 1 ;20050721
endif
endif
else
[Lfanrun] = 1
clb Ltemp_flag
if [Lfanrun5] == 0
if [m_Tpipetemp] > 42
jsr Fun_RoomFan
[runfan_flag] = 1
else
jsr fanL
endif
else
jsr Fun_RoomFan
[runfan_flag] = 1
endif
endif
else ;>=24
[Lfanrun] = 1 ;ji >=24d
clb Ltemp_flag
if [m_Tpipetemp] <= 42
if [Lfanrun5] == 0
jsr fanL
else
jsr Fun_RoomFan
[runfan_flag] = 1
endif
else
jsr Fun_RoomFan
[runfan_flag] = 1
endif
endif
else
clb Ltemp_flag
if [m_Tpipetemp] <= 42
if [Lfanrun5] == 0
jsr fanL
else
jsr Fun_RoomFan
[runfan_flag] = 1
endif
else
jsr Fun_RoomFan
[runfan_flag] = 1
endif
endif
RTS
fanL:
seb L_fan
clb M_fan
clb H_fan
[Lfanrun] = 1
rts
off_fan:
clb L_fan
clb M_fan
clb H_fan
rts
;**********************************************************************
; PVC Control:
; Power On: [M_PipeTemp] <= [Tpot49] && [M_RoomTemp] <= 23
; && [M_RoomTemp] <= [settempval]-2 && [Ltemp_flag]==0
; Stop:
; [M_PipeTemp] >= [Tpot57] || [M_RoomTemp] >= 26 ||[M_RoomTemp] >= [heatofftemp]
; After PVC Stoped 2 Minute,PVC can Power On
;**********************************************************************
Pvc_Control:
if [Ltemp_flag]==0 && [M_RoomTempsel] <= 25
if [heatoffsecond] >= 120 && [m_PVCLowTemp] > 8
if [port0] & 60H != 0
seb Heat
LDM #00h,heatoffsecond
endif
endif
endif
if [M_PipeTemp] >= [TPipepot54] || [M_RoomTempsel] >= 28
[m_PVCLowTemp]=0
clb Heat
endif
if [Ltemp_flag]==1
clb Heat
endif
if [L_fan] == 1
clb Heat
endif
if [port0] & RoomFAN_Enable == 0
clb Heat
endif
rts
safe_Htemp:
if [b_sencerErrorGUAN] == 0 && [b_sencerErrorHUAN] == 0 ;20050913
if [M_PipeTemp] >= [TPipepot56] && [Comp] == 1 && [Htemp] >= 4
seb b_stopoutfan
clb Out_FanHigh
endif
if [M_PipeTemp] <= [TPipepot53] && [b_stopoutfan]==1
clb b_stopoutfan
CLb HTout_flag ; Out room Pipe High Temp
endif
endif
; if [M_PipeTemp] >= [Pipe_T8] || [Htemp_flag]==1
; seb Htemp_flag
; [m_FanSave]=[M_RoomFan]
; clb L_fan
; clb M_fan
; SEB H_fan
; endif
; if [M_PipeTemp] <= [Pipe_T9] && [Htemp_flag]==1
; [M_RoomFan]=[m_FanSave]
; clb Htemp_flag
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -