📄 demo_69p25.asm
字号:
BAZ FACE512
LDI LEVELRL_H,04H ;fire 2
LDI LEVELRH_H,06H ;100
LDI LEVELRL_L,08H
LDI LEVELRH_L,07H ;120
LDI WK0,0001B
EOR MK_CIKONG
BA0 FACE599
ANDIM MK_CIKONG,1110B
LDI WK0,01H
SUBM FIRE2RL,B1 ;FIRE2RL-1-->FIRE2RL
LDI WK0,00H
SBCM FIRE2RH,B1 ;FIRE2RH-0-CY-->FIRE2RH
JMP FACE599
;----------------------
FACE512:
LDA FIRE3RH,B1
OR FIRE3RL,B1
BAZ FACE513
LDI LEVELRL_H,00H ;fire 3
LDI LEVELRH_H,05H ;80
LDI LEVELRL_L,0CH
LDI LEVELRH_L,08H ;140
LDI WK0,0001B
EOR MK_CIKONG
BA0 FACE599
ANDIM MK_CIKONG,1110B ;CLR MK_CIKONG BIT 0
LDI WK0,01H
SUBM FIRE3RL,B1 ;FIRE3RL-1-->FIRE3RL
LDI WK0,00H
SBCM FIRE3RH,B1 ;FIRE3RH-0-CY-->FIRE3RH
JMP FACE599
FACE513:
;=======================================
LDI LEVELRL_H,08H ;fire 4
LDI LEVELRH_H,02H ;40
LDI LEVELRL_L,04H
LDI LEVELRH_L,0BH ;180
; JMP FACE599
FACE599:
;=============================================auto (RICE) FIRE CHANGE
FACE6:
CJNE4 AUTORH,02H,FACE699 ;IF AUTORH NOT EQU 09H THEN GOTO FACE699
LDI WK0,0011B
EOR MK_COOK,B0
BA0 FACE699 ;IF NOT WORKING THEN GOTO FACE699
BA1 FACE699
LDA MK_COOK,B0 ;IF NOT WORKING THEN GOTO FACE699
BA2 FACE699
LDA FIRE1RL,B1
OR FIRE1RH,B1
OR FIRE2RL,B1 ;IF FIRE END THEN GOTO FACE699
BAZ FACE699
LDA MK01H,B0
BA2 FACE699 ;500 MS
LDI WK0,01H
SUBM FIRE1RL,B1 ;FIRE1RL-1-->FIRE1RL
LDI WK0,00H
SBCM FIRE1RH,B1 ;FIRE1RH-1-CY-->FIRE1RH
LDI WK0,00H
SBCM FIRE2RL,B1 ;FIRE2RL-1-CY-->FIRE2RL
LDA FIRE1RL,B1
OR FIRE1RH,B1
OR FIRE2RL,B1
BNZ FACE699
;------------------------------
LDI LEVELRLBUF,00H ; WEI BO INITIAL
LDI LEVELRHBUF,00H ;WEI BO INITIAL
ANDIM MK_SY,1101B
ANDIM MK_CIKONG,1110B
ANDIM MK_DIS,0111B ;P50 ;50%
LDI LEVELRL_H,08H
LDI LEVELRH_H,07H ;120/100
LDI LEVELRL_L,04H
LDI LEVELRH_L,06H
FACE699:
;================================================PORRIDGE FIRE CHANGE END
FACE99:
JMP INTFACE_RET
;***************************************************************
@@DISPLAY:
;------------------------------------------------------------
LDA MK01L,B0
BA3 DIS99
;-------------------------------------------------------LOOKING TYPE
LDA LOOKR_TYPE,B1
BAZ LOOKCLOCK
LDA MK01H,B0
BA0 DIS_TYPE0
LDI WK0,01H
SUBM LOOKR_TYPE,B1
DIS_TYPE0:
LDA OPTIONR_SHAO,B1
BA0 DIS_TYPE1
CALL SYMBOL_E
LDI DISR3,0AH ;DISPLAY "E"
CALL BCD_R3
JMP DIS_TYPE2
DIS_TYPE1:
CALL SYMBOL_E
CALL SYMBOL_G ;DISPLAY "EG"
DIS_TYPE2:
CALL DOT_OFF
LDI WK0,1111B
EOR OPTIONR,B0
BA3 DIS_TYPE21
BA2 DIS_TYPE22
LDI DISR2,09H ;900W
JMP DIS_TYPE3
DIS_TYPE21:
LDI DISR2,08H ;800W
JMP DIS_TYPE3
DIS_TYPE22:
LDI DISR2,07H ;700W
DIS_TYPE3:
CALL BCD_R2
LDI DISR1,00H
CALL BCD_R1
DIS_TYPE99:
JMP DIS8
;===============================
SYMBOL_E:
LDI WK0,1001B
STA LEDR1H,B1
LDI WK0,1110B ;DISPLAY "E"
ORM LEDR1L,B1
RTNI
;================================
SYMBOL_G:
LDI WK1,1101B
STA LEDR2H,B1
LDI WK1,1100B
ORM LEDR2L,B1 ;DISPLAY "G"
LDI WK1,1101B
ANDM LEDR2L,B1
RTNI
;====================================
;-------------------------------------------------------yuyue seting display
LOOKCLOCK:
CJNE4 YUYUERL,00H,YUY_PART ;IF YUYUERL NOT EQU 00H THEN GOTO YUY_PART
LDI WK0,1000B
EOR MK_YUYUE,B0
BA3 DIS1
CALL DOT_FLASH
JMP YUY_PART11
YUY_PART:
CALL DOT_ON
YUY_PART11:
LDA MINRH_YU,B0
STA DISR4,B0
CALL BCD_R4
LDA MINRL_YU,B0
STA DISR3,B0
CALL BCD_R3
LDA SECRH_YU,B0
STA DISR2,B0
CALL BCD_R2
LDA SECRL_YU,B0
STA DISR1,B0
CALL BCD_R1
YUY99:
JMP DIS8
;-----------------------------------------------------cook fire seting display
DIS1:
;-----------------------------
CJE4 SUPR,00H,DIS2 ;IF SUPR EQU 00H THEN GOTO DIS2
LDA MK_DIS,B0
BA1 DIS11
LDA MK_COOK,B0 ;MK_COOK-->ACC
BA0 DIS11
BA1 DIS11
DIS10:
CJNE4 SUPR,01H,DIS101 ;IF SUPR NOT EQU 01H THEN GOTO DIS101
CALL SYMBOL_P
LDI DISR3,01H
CALL BCD_R3 ;DISPLAY DISR3
LDI DISR2,00H
CALL BCD_R2 ;DISPLAY DISR2
LDI DISR1,00H ;P100
CALL BCD_R1 ;DISPLAY DISR1
CALL DOT_OFF
JMP DIS199
DIS101:
CJNE4 SUPR,02H,DIS102 ;IF SUPR NOT EQU 02H THEN GOTO DIS102
CALL SYMBOL_P
LDI DISR3,0AH
CALL BCD_R3 ;DISPLAY DISR3
LDI DISR2,08H
CALL BCD_R2
LDI DISR1,00H ;P80
CALL BCD_R1
CALL DOT_OFF ;DOT NOT DISPLAY
JMP DIS199
DIS102:
CJNE4 SUPR,03H,DIS103 ;IF SUPR NOT EQU 03H THEN GOTO DIS103
CALL SYMBOL_P
LDI DISR3,0AH
CALL BCD_R3 ;DISPLAY DISR3
LDI DISR2,05H
CALL BCD_R2 ;DISPLAY DISR2
LDI DISR1,00H ;P50
CALL BCD_R1
CALL DOT_OFF ;DOT NOT DISPLAY
JMP DIS199
DIS103:
CJNE4 SUPR,04H,DIS104 ;IF SUPR NOT EQU 04H THEN GOTO DIS104
CALL SYMBOL_P
LDI DISR3,0AH
CALL BCD_R3 ;DISPLAY DISR3
LDI DISR2,03H
CALL BCD_R2 ;DISPLAY DISR2
LDI DISR1,00H ;P30
CALL BCD_R1
CALL DOT_OFF ;DOT NOT DISPLAY
JMP DIS199
DIS104:
CJNE4 SUPR,05H,DIS105 ;IF SUPR NOT EQU 05H THEN GOTO DIS105
CALL SYMBOL_P
LDI DISR3,0AH
CALL BCD_R3 ;DISPLAY DISR3
LDI DISR2,01H
CALL BCD_R2 ;DISPLAY DISR2
LDI DISR1,00H ;P10
CALL BCD_R1
CALL DOT_OFF ;DOT NOT DISPLAY
JMP DIS199
DIS105:
CJNE4 SUPR,06H,DIS106 ;IF SUPR NOT EQU 06H THEN GOTO DIS106
LDI DISR4,0AH
CALL BCD_R4 ;DISPLAY DISR4
LDI WK1,1101B
STA LEDR2H,B1
LDI WK1,1100B
ORM LEDR2L,B1 ;DISPLAY :G-1"
LDI WK1,1101B
ANDM LEDR2L,B1
CALL SYMBOL_HENG
LDI DISR1,01H ;G-1
CALL BCD_R1
CALL DOT_OFF
JMP DIS199
DIS106:
CJNE4 SUPR,07H,DIS107 ;IF SUPR NOT EQU 07H THEN GOTO DIS107
LDI DISR4,0AH
CALL BCD_R4 ;DISPLAY DISR4
CALL SYMBOL_C
CALL SYMBOL_HENG
LDI DISR1,01H ;C-1
CALL BCD_R1 ;DISPLAY "C-1"
CALL DOT_OFF
JMP DIS199
DIS107:
CJNE4 SUPR,08H,DIS108 ;IF SUPR NOT EQU 08H THEN GOTO DIS108
LDI DISR4,0AH
CALL BCD_R4 ;DISPLAY DISR4
CALL SYMBOL_C
CALL SYMBOL_HENG
LDI DISR1,02H ;C-2
CALL BCD_R1 ;DISPLAY "C-2"
CALL DOT_OFF
JMP DIS199
DIS108:
;----------------------------------------cook time down counter display
DIS11:
LDA LOOKR_COOK,B0
BNZ DIS12
DIS_DOWN_COUNTER:
LDA MINRH_COOK,B0
STA DISR4,B0
CALL BCD_R4 ;DISPLAY cook MINUTE H
LDA MINRL_COOK,B0
STA DISR3,B0
CALL BCD_R3
LDA SECRH_COOK,B0
STA DISR2,B0
CALL BCD_R2 ;DISPLAY cook SECOND H
LDA SECRL_COOK,B0
STA DISR1,B0
CALL BCD_R1 ;DISPLAY DISR1
LDA MK_COOK,B0
BA1 DIS112
DIS113:
CALL DOT_ON ;DOT DISPLAY
JMP DIS199
DIS112:
LDA MK01H,B0
BA3 DIS113
CALL DOT_OFF ;DOT NOT DISPLAY
JMP DIS199
;-----------------------------
DIS12:
LDA MK01H,B0
BA0 DIS121 ;LOOKING COOK fire display
DEC4 LOOKR_COOK
DIS121:
JMP DIS10
;---------------------------
DIS199:
JMP DIS8
;========================================================AUTO display
DIS2:
CJE4 AUTORH,00H,DIS3 ;IF AUTORH EQU 00H THEN GOTO DIS3
LDA MK_DIS,B0
BA0 DIS20
LDA MK_COOK,B0
BA0 DIS_DOWN_COUNTER
BA1 DIS_DOWN_COUNTER
JMP DIS299
;-----------------------------------------A-1 BEVERAGE
DIS20:
LDA MK_INCDEC,B0
BA0 DIS20A
BA1 DIS20B
CJNE4 AUTORH,01H,DIS202 ;IF AUTORH NOT EQU 01H THEN GOTO DIS202
CJNE4 AUTORL,01H,DIS2011 ;IF AUTORL NOT EQU 01H THEN GOTO DIS2011
LDI DISR4,0AH
CALL BCD_R4
LDI DISR3,02H
CALL BCD_R3 ;DISPLAY "200G"
LDI DISR2,00H
CALL BCD_R2 ;200 g
LDI DISR1,00H
CALL BCD_R1
CALL DOT_OFF ;DISPLAY "A-1"
JMP DIS299
DIS20A:
CALL SYMBOL_B1G
JMP DIS299
DIS20B:
CALL SYMBOL_SAL
JMP DIS299
;-----------------------------
DIS2011:
CJNE4 AUTORL,02H,DIS2012 ;IF AUTORL NOT EQU 02H THEN GOTO DIS2012
LDI DISR4,0AH
CALL BCD_R4
LDI DISR3,04H
CALL BCD_R3 ;DISPLAY "400G"
LDI DISR2,00H
CALL BCD_R2 ;400 g
LDI DISR1,00H
CALL BCD_R1
CALL DOT_OFF
JMP DIS299
DIS2012:
CJNE4 AUTORL,03H,DIS2013 ;IF AUTOROL NOT EQU 03H THEN GOTO DIS2013
LDI DISR4,0AH
CALL BCD_R4
LDI DISR3,06H
CALL BCD_R3 ;DISPLAY "600G"
LDI DISR2,00H
CALL BCD_R2 ;600 g
LDI DISR1,00H
CALL BCD_R1
CALL DOT_OFF
JMP DIS299
DIS2013:
;---------------------------------A-2
DIS202:
CJNE4 AUTORH,02H,DIS203 ;IF AUTOROH NOT EQU 01H THEN GOTO DIS203
CJNE4 AUTORL,01H,DIS2021 ;IF AUTOROL NOT EQU 01H THEN GOTO DIS2021
LDI DISR4,0AH
CALL BCD_R4
LDI DISR3,01H
CALL BCD_R3 ;DISPLAY "100G"
LDI DISR2,00H
CALL BCD_R2 ;100 g
LDI DISR1,00H
CALL BCD_R1
CALL DOT_OFF
JMP DIS299
DIS2021:
CJNE4 AUTORL,02H,DIS2022 ;IF AUTOROL NOT EQU 02H THEN GOTO DIS2022
LDI DISR4,0AH
CALL BCD_R4
LDI DISR3,01H
CALL BCD_R3 ;DISPLAY "150G"
LDI DISR2,05H
CALL BCD_R2 ;150 g
LDI DISR1,00H
CALL BCD_R1
CALL DOT_OFF
JMP DIS299
DIS2022:
CJNE4 AUTORL,03H,DIS2023 ;IF AUTOROL NOT EQU 03H THEN GOTO DIS2023
LDI DISR4,0AH
CALL BCD_R4
LDI DISR3,02H
CALL BCD_R3 ;DISPLAY "200"
LDI DISR2,00H
CALL BCD_R2 ;200 g
LDI DISR1,00H
CALL BCD_R1
CALL DOT_OFF
JMP DIS299
DIS2023:
CJNE4 AUTORL,04H,DIS2024 ;IF AUTOROL NOT EQU 04H THEN GOTO DIS2024
LDI DISR4,0AH
CALL BCD_R4
LDI DISR3,02H
CALL BCD_R3 ;250 g
LDI DISR2,05H
CALL BCD_R2
LDI DISR1,00H ;DISPLAY "250G"
CALL BCD_R1
CALL DOT_OFF
JMP DIS299
DIS2024:
CJNE4 AUTORL,05H,DIS2025 ;IF AUTOROL NOT EQU 04H THEN GOTO DIS2024
LDI DISR4,0AH
CALL BCD_R4
LDI DISR3,03H
CALL BCD_R3 ;300 g
LDI DISR2,00H
CALL BCD_R2
LDI DISR1,00H ;DISPLAY "300G"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -