📄 daa.asm
字号:
LR_sys_fst: sta copctl
BRSET FD_RUN,FLAG,BY_GZ1
LDA gzdy
cmp #!0
bne c_fst_0
BY_GZ1: LDA f_ys
cmp sp07
BLS c_fst_0
LDA GYJ_YS1
CMP #!0
BNE C_FST_0
BRSET FD_RUN,FLAG,FFDD2
BSET 4,K_QQ
brclr 0,K_yd,C_FST_0
FFDD2: brset 4,pta,c_fST_2
bset 4,pta
BSET 2,OUT1
LDA #!3
STA KYJ_YS1
C_FST_2: BSET COM_WORKING1,FDAN
lda GYJ_ys2
CMP #0
BNE C_FST_0
BRSET FD_RUN,FLAG,FFDD3
BSET 5,K_QQ
brclr 1,K_yd,C_FST_0
FFDD3: brset 3,ptA,c_fst_1
bset 3,ptA
BSET 5,OUT1
LDA #!3
STA KYJ_YS2
c_fst_1: BSET COM_WORKING2,FDAN
BSET COM_WORKING,FDAN
C_FST_0: RTS
lR_sys_SEC: sta copctl
BRSET FD_RUN,FLAG,BY_GZ2
LDA gzdy
cmp #!0
bne C_SEC_0
BY_GZ2: LDA f_ys
cmp sp07
bls c_SEC_0
LDA GYJ_ys2
cmp #!0
bne c_SEC_0
BRSET FD_RUN,FLAG,FFDD
BSET 5,K_QQ
BRCLR 1,K_YD,C_SEC_0
FFDD: brset 3,pta,c_SEC_2
bset 3,pta
BSET 5,OUT1
LDA #!3
STA KYJ_YS2
C_SEC_2: BSET COM_WORKING2,FDAN
LDA GYJ_ys1
CMP #!0
BNE c_SEC_0
BRSET FD_RUN,FLAG,FFDD1
BSET 4,K_QQ
brclr 0,K_yd,C_SEC_0
FFDD1: brset 4,pta,C_SEC_3
bset 4,pta
BSET 2,OUT1
LDA #!3
STA KYJ_YS1
;LDA #!0
;STA QID_YS1
C_SEC_3 BSET COM_WORKING1,FDAN
BSET COM_WORKING,FDAN
C_SEC_0: RTS
SR_FS: BRSET 2,PTC,SR_FSS
BSET 2,PTc
BSET 3,OUT2
SR_FSS: RTS
LR_SB: BRSET 7,PTa,LR_SB_0
BSET 7,PTa
BSET 0,OUT1
LR_SB_0: RTS
KWFJ: BRSET 1,PTC,WFJ_0
BSET 1,PTC
BSET 0,OUT1
LDA #!0
STA F_YS
WFJ_0: RTS
;***********************************
PAN_JR: ;LDA #!23
;STA T_COM1
LDA CS_COM1
CMP HF05
BHI PAN_JR_1
PAN_JR_4: LDA CS_COM2
CMP HF05
BHI PAN_JR_3
PAN_JR_0: RTS
PAN_JR_1:
LDA KYJ_YS1
CMP #!0
BNE PAN_JR_4
LDA HF08
CMP #!2
BLO PAN_JR_2
CMP #!10
BHI PAN_JR_2
LDA TEMP_WP1
ADD HF08
CMP TEMP_WP1C
BLS PAN_JR_2
JMP PAN_JR_4
RTS
PAN_JR_3: LDA KYJ_YS2
CMP #!0
BNE PAN_JR_0
LDA HF08
CMP #!2
BLO PAN_JR_2
CMP #!10
BHI PAN_JR_2
LDA TEMP_WP2
ADD HF08
CMP TEMP_WP2C
BLS PAN_JR_2
RTS
PAN_JR_2:
BSET 0,K_QQ
BSET 0,FLAG_CS
LDA #!40
STA T_15S
;LDA #!0
;STA COM_CON
LDA #!0
STA CS_COM1
LDA #!0
STA CS_COM2
BU_JR: RTS
;***********************************
;除霜过程
;***********************************
CS_GC: BRCLR 1,FLAG_CS,CS_GC_0
JMP CS_TUIC
CS_GC_0:BRCLR 4,K_YD,ZHAO
BRSET 4,FDAN2,TIAO_GYJ
BSET 4,FDAN2
BCLR 4,PTA ;COMP1
BCLR 2,OUT1
BCLR 3,PTA ;COMP2
BCLR 5,OUT1
BCLR 0,PTA ; FA1
BCLR 3,OUT1
BCLR 6,PTA ;FA2
BCLR 6,OUT1
BCLR 1,PTA
BCLR 7,OUT1
BCLR 1,PTC ;WFJ
bclr 1,out1
TIAO_GYJ: LDA T_15S
CMP #!10
BHI ZHAO
BSET 4,PTA
BSET 2,OUT1
CMP #!5
BHI ZHAO
BSET 3,PTA
BSET 5,OUT1
BCLR 0,K_QQ
BSET 1,K_QQ
LDA #!0
STA CS_COM1
LDA #!0
STA CS_COM2
BSET 1,FLAG_CS
LDA #0
STA TCS_8
BCLR 7,FDAN0
ZHAO: RTS
;**************************************
;除霜推出
;**************************************
CS_TUIC:BCLR 4,FDAN2
LDA TCS_8
CMP HF06
BHI cs_TUIC_2
BRSET 2,K2_165,cs_TUIC_1
BRSET 4,K2_165,cs_TUIC_5
BRSET 3,FGZDY,CCSS
LDA TEMP_WP1
CMP HF04
BHS CS_TUI_4
CCSS: BRSET 3,FGZDY,CS_TUI_6
LDA TEMP_WP2
CMP HF04
BHS CS_TUI_6
RTS
CS_TUI_4: BRSET 4,FGZDY,CS_TUIC_2
LDA TEMP_WP2
CMP HF04
BHS CS_TUIC_2
BSET 0,PTA
BSET 3,OUT1
BCLR 4,PTa
BCLR 2,OUT1
CS_TUI_81: RTS
CS_TUI_6:BRSET 3,FGZDY,CS_TUIC_2
LDA TEMP_WP1
CMP HF04
BHS CS_TUIC_2
BSET 6,PTA ;FA2
BSET 6,OUT1 ;COMP2
BCLR 5,OUT1
BCLR 3,PTA
CS_TUI_82: RTS
cs_TUIC_5: BRSET 2,K2_165,cs_TUIC_2
BSET 6,PTA
BSET 6,OUT1
BCLR 3,PTA ;COMP2
BCLR 5,OUT1
RTS
cs_TUIC_1: BRSET 4,K2_165,cs_TUIC_2
BSET 0,PTA
BSET 3,OUT1
BCLR 4,PTA ;COMP1
BCLR 2,OUT1
RTS
cs_TUIC_2: BRSET 7,FDAN0,CCSS_1
BSET 7,FDAN0
BSET 0,PTA ;FA1
BSET 3,OUT1
BSET 6,PTA
BSET 6,OUT1
BCLR 3,PTA
BCLR 5,OUT1
BCLR 4,PTA
BCLR 2,OUT1
BCLR 1,K_QQ
CCSS_1: BRSET 6,FDAN0,CS_TUI_FJ
BSET 6,FDAN0
LDA #!60
STA CS_YS
CS_TUI_FJ: LDA CS_YS
CMP #!0
BNE CS_EXIT
BSET 1,PTC ;WFJ
bset 1,out1
CS_TUI_8: BRSET 5,FDAN0,CS_TUI_3
BSET 5,FDAN0
LDA #!0
STA CS_WFJ_YS
CS_TUI_3: LDA CS_WFJ_YS
CMP SP07
BLO CS_EXIT
BSET 2,K_QQ
BRSET 2,FDAN0,CCSS_0
BSET 2,FDAN0
LDA #!5
STA QID_YS1
BSET 4,PTA ;COMP1
BSET 2,OUT1
CCSS_0: LDA QID_YS1
CMP #!0
BNE CS_EXIT
BSET 3,PTA ;;COMP2
BSET 5,OUT1
BRSET 6,K_YD,CS_EXIT
;LDA #!0
;STA COM_CON
LDA #0
STA TCS_8
LDA FLAG_CS
AND #%00100000
STA FLAG_CS
BCLR 5,FDAN0
BCLR 6,FDAN0
BCLR 7,FDAN0
BCLR 2,FDAN0
BCLR 6,FLAGG
BCLR 2,K_QQ
LDA #!0
STA CS_COM1
LDA #!0
STA CS_COM2
CS_EXIT: RTS
;********************************
;保护子程序
;********************************
BAOHU: sta copctl
LDA SB_20S
CMP #!0 ;ZZZ
BNE FDJ_BH
BRCLR 7,K2_165,FDJ_BH1 ;水流开关
BRSET 0,FDAN3,SL_KG
BSET 0,FDAN3
MOV #!0,SL_JC
SL_KG: LDA SL_JC
CMP EP08
BLO FDJ_BH
BCLR 0,FDAN3
LDA GZDY
CMP #0
BNE FDJ_BH
LDA GZDY
ORA #$35
STA GZDY
JMP FDJ_BH
FDJ_BH1: BRCLR 7,K_YD,FDJ_BH
BSET 3,K_QQ
LDA GZDY
AND #$CA
STA GZDY
;BCLR 0,FDAN2
;-----------------------------------
FDJ_BH: LDA TEMP_TO
CMP EP01 ;KKKK
BHS FDJ_BH_2
BRSET 1,FDAN3,FDJ_BH_0
BSET 1,FDAN3
LDA #!60
STA T_60S
FDJ_BH_0:LDA T_60S
CMP #!0
BNE ZL_FGZ
LDA GZDY
CMP #0
BNE ZL_FGZ
LDA GZDY
ORA #$17
STA GZDY
JMP ZL_FGZ
FDJ_BH_2:LDA EP01
ADD #!3
CMP TEMP_TO
BHI ZL_FGZ
BCLR 1,FDAN3
BRCLR 7,K_YD,ZL_FGZ
BSET 3,K_QQ
LDA GZDY
AND #$E8
STA GZDY
;------------------------------
ZL_FGZ: LDA TEMP_WP1 ;KKKKKKKKKK
CMP EP02
BHS ZL_FGZ_0
LDA TEMP_WP1
CMP #!50
BHI ZL_FGZ_TZ
BRCLR 7,K_YD,ZL_FGZ_T
BSET 3,K_QQ
LDA GZDY
AND #$EB
STA GZDY
BCLR 0,JFLAG
;BCLR 0,GZDY
jMP ZL_FGZ_T
ZL_FGZ_TZ: BRSET 0,JFLAG,ZL_FGZ_0
JMP ZL_FGZ_T
ZL_FGZ_0:LDA GZDY
CMP #0
BNE ZL_FGZ_T
LDA GZDY
ORA #$14
STA GZDY
BSET 0,JFLAG
;------------------------------------
ZL_FGZ_T:
LDA TEMP_WP2
CMP EP02 ;KKKKKKKK
BHS ZL_FGZ_T0
LDA TEMP_WP1
CMP #!50
BHI ZR_FCW
BRCLR 7,K_YD,ZR_FCW
BSET 3,K_QQ
LDA GZDY
AND #$EA
STA GZDY
JMP ZR_FCW
ZL_FGZ_T0:LDA GZDY
CMP #0
BNE ZR_FCW
LDA GZDY
ORA #$15
STA GZDY
; BCLR 3,PTA
;BCLR 5,OUT1
; LDA #!3
;STA GYJ_ys2
;---------------------------------
ZR_FCW: LDA TEMP_TO
CMP EP03 ; KKKKKKKKKK
BHS ZR_FCW_0
ADD #!4
CMP EP03
BHS XXX
BRCLR 7,K_YD,XXX
BSET 3,K_QQ
LDA GZDY
AND #$E7
STA GZDY
JMP XXX
ZR_FCW_0: ;;BRCLR COM_WORKING,FDAN,ZL_FGZ_T
BRCLR COM_WORKING,FDAN,BBHH_6
BRCLR COM_WORKING1,FDAN,BBHH5
BRCLR COM_WORKING2,FDAN,YJSX_3
LDHX T_COM1
CPHX T_COM2
BHI BBHH5
YJSX_3: JSR G_SEC_YJ2
JMP BBHH_6
BBHH5: JSR G_FST_YJ1
BBHH_6: SUB #!5
CMP EP03
BHS ZR_FCW_3
BRSET 2,FDAN3,ZR_FCW_2
BSET 2,FDAN3
LDA #!5
STA T_5M
ZR_FCW_2: LDA T_5M
CMP #!0
BNE XXX
ZR_FCW_3:LDA GZDY
CMP #0
BNE XXX
LDA GZDY
ORA #$18
STA GZDY
;LDA #!0
;STA KYJ_YS1
;LDA #!0
;STA KYJ_YS2
;JSR G_SEC_YJ2
;JSR G_WFJ
;----------------------------------
XXX: BRCLR 2,k2_165,PHBH_0 ;：高压保护BBBBBBBBB
JMP PH1
PHBH_0: BCLR 2,FLAG
BRCLR 7,K_YD,PLBH
BSET 3,K_QQ
LDA GZDY
AND #$DE
STA GZDY
;BCLR 0,GZDY
JMP PLBH
PH1: BRSET 2,FLAG,PHBH_1
BSET 2,FLAG
LDA #!1
STA PH_TIME
PHBH_1: LDA PH_TIME
CMP #!0
BNE PLBH
LDA GZDY
CMP #0
BNE PLBH
LDA GZDY
ORA #$21
STA GZDY
; BCLR 4,PTA
; BCLR 2,OUT1
; LDA #!3
; STA GYJ_ys1
;;BSET 0,GZDY
;------------------------------------------
PLBH: BRCLR 4,k2_165,PHBH_02 ;：高压保护BBBBBBBBBBBB
JMP PH12
PHBH_02:BCLR 3,FDAN3
;BRCLR 0,GZDY,PLBH3
;BCLR 0,GZDY
BRCLR 7,K_YD,PLBH3
BSET 3,K_QQ
LDA GZDY
AND #$DD
STA GZDY
JMP PLBH3
PH12: BRSET 3,FDAN3,PHBH_12
BSET 3,FDAN3
LDA #!1
STA PH2_TIME
PHBH_12:LDA PH2_TIME
CMP #!0
BNE PLBH3
LDA GZDY
CMP #0
BNE PLBH3
LDA GZDY
ORA #$22
STA GZDY
;BCLR 3,PTA
;BCLR 5,OUT1
;LDA #!3
; STA GYJ_ys2
;------------------------------------
PLBH3: BRSET 1,FLAG_CS,PLBH_0
BRCLR 3,k2_165,PLBH_0 ;BBBBBBBBBBBBBBBBBBBBBB
JMP PL1
PLBH_0: BCLR 3,FLAG
BRCLR 7,K_YD,GLBH
BSET 3,K_QQ
LDA GZDY
AND #$DB
STA GZDY
;BRCLR 1,GZDY,GLBH
;BCLR 1,GZDY
JMP GLBH
PL1: ;BRCLR 0,PTC,PLBH_0
BRSET 3,FLAG,PLBH_1
BSET 3,FLAG
LDA #!10
STA PL_TIME
PLBH_1: LDA PL_TIME
CMP #!0
BNE GLBH
PLBH_2: LDA GZDY
CMP #0
BNE GLBH
LDA GZDY
ORA #$24
STA GZDY
;---------------------------------------
GLBH: BRSET 1,FLAG_CS,PLBH_02
BRCLR 5,k2_165,PLBH_02
JMP PL12
PLBH_02:BCLR 4,FDAN3 ;BBBBBBBBBBBBBBBBBBB
BRCLR 7,K_YD,GLBH2
BSET 3,K_QQ
LDA GZDY
AND #$DA
STA GZDY
;BCLR 1,GZDY
JMP GLBH2
PL12: ;BRCLR 0,PTC,PLBH_02
BRSET 4,FDAN3,PLBH_12
BSET 4,FDAN3
LDA #!10
STA PL2_TIME
PLBH_12:LDA PL2_TIME
CMP #!0
BNE GLBH2
LDA GZDY
CMP #0
BNE GLBH2
LDA GZDY
ORA #$25
STA GZDY
;BCLR 3,PTA
;BCLR 5,OUT1
;LDA #!3
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -