This commit is contained in:
kong 2022-10-24 15:26:43 +07:00
parent e021565cdd
commit d75e903aa9
76 changed files with 778 additions and 151 deletions

View file

@ -92,6 +92,10 @@
EndIf
EndIf
;Var Menu22Selected = "Enable"
Var Menu22Selected = "Invisible"
If RecipeTag1 = "HealthTurnOn" Then
Var Menu22Selected = "Enable"
Else
Var Menu22Selected = "Invisible"
EndIf
;

View file

@ -178,11 +178,11 @@
DEBUGVAR AppFastEnable
DEBUGVAR MenuKidEnable
DEBUGVAR TaobinOnline
DEBUGVAR TermTemOnline
;DEBUGVAR TermTemOnline
DEBUGVAR WheyEnable
; Dtac.
DEBUGVAR ShowDtac1
Var CAMPAIGN1 = "false"

View file

@ -5,11 +5,19 @@
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
DEBUGVAR RecipeTag1
If RecipeTag1 = "HealthTurnOn" Then
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog2.xml"
EndIf
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
TopView "show"
; On open
DEBUGVAR ToppingNewShow
Var NextPage = "-"

View file

@ -10,6 +10,7 @@
TopView "show"
; On open
DEBUGVAR ToppingNewShow
Var NextPage = "-"
@ -32,7 +33,9 @@
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_tt_catalog.xml"
EndIf
;Machine DoorLidClose
If Seeker = "curr" Then
Machine DoorLidClose
EndIf
Var GetPayInfoFlag = 0
Var countDownRetrun = 30
@ -427,7 +430,7 @@
<Button>
<X> 564 </X>
<Y> 1532 </Y>
<State>"Press"</State>
<State> "Enable" </State>
<Filename> Var(DirImage + "/bn_HealthyOption.png") </Filename>
<FilenamePress> Var(DirImage + "/bp_HealthyOption.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>

View file

@ -102,9 +102,13 @@
EndIf
EndIf
;Var Menu22Selected = "Enable"
Var Menu22Selected = "Invisible"
If RecipeTag1 = "HealthTurnOn" Then
Var Menu22Selected = "Enable"
Else
Var Menu22Selected = "Invisible"
EndIf
;

View file

@ -102,9 +102,13 @@
EndIf
EndIf
;Var Menu22Selected = "Enable"
Var Menu22Selected = "Invisible"
If RecipeTag1 = "HealthTurnOn" Then
Var Menu22Selected = "Enable"
Else
Var Menu22Selected = "Invisible"
EndIf
;
; protein

View file

@ -102,9 +102,13 @@
EndIf
EndIf
;Var Menu22Selected = "Enable"
Var Menu22Selected = "Invisible"
If RecipeTag1 = "HealthTurnOn" Then
Var Menu22Selected = "Enable"
Else
Var Menu22Selected = "Invisible"
EndIf
;
Var Menu2Selected = "PressForever"

View file

@ -102,9 +102,13 @@
EndIf
EndIf
;Var Menu22Selected = "Enable"
Var Menu22Selected = "Invisible"
If RecipeTag1 = "HealthTurnOn" Then
Var Menu22Selected = "Enable"
Else
Var Menu22Selected = "Invisible"
EndIf
;
; protein

View file

@ -102,9 +102,13 @@
EndIf
EndIf
;Var Menu22Selected = "Enable"
Var Menu22Selected = "Invisible"
If RecipeTag1 = "HealthTurnOn" Then
Var Menu22Selected = "Enable"
Else
Var Menu22Selected = "Invisible"
EndIf
;
Var Menu22Selected = "PressForever"

View file

@ -102,9 +102,13 @@
EndIf
EndIf
;Var Menu22Selected = "Enable"
Var Menu22Selected = "Invisible"
If RecipeTag1 = "HealthTurnOn" Then
Var Menu22Selected = "Enable"
Else
Var Menu22Selected = "Invisible"
EndIf
;
Var Menu4Selected = "PressForever"

View file

@ -102,9 +102,13 @@
EndIf
EndIf
;Var Menu22Selected = "Enable"
Var Menu22Selected = "Invisible"
If RecipeTag1 = "HealthTurnOn" Then
Var Menu22Selected = "Enable"
Else
Var Menu22Selected = "Invisible"
EndIf
;
; soda and other

View file

@ -102,9 +102,13 @@
EndIf
EndIf
;Var Menu22Selected = "Enable"
Var Menu22Selected = "Invisible"
If RecipeTag1 = "HealthTurnOn" Then
Var Menu22Selected = "Enable"
Else
Var Menu22Selected = "Invisible"
EndIf
;
Var Menu1Selected = "PressForever"

View file

@ -102,9 +102,13 @@
EndIf
EndIf
;Var Menu22Selected = "Enable"
Var Menu22Selected = "Invisible"
If RecipeTag1 = "HealthTurnOn" Then
Var Menu22Selected = "Enable"
Else
Var Menu22Selected = "Invisible"
EndIf
;
Var Menu3Selected = "PressForever"

View file

@ -102,9 +102,13 @@
EndIf
EndIf
;Var Menu22Selected = "Enable"
Var Menu22Selected = "Invisible"
If RecipeTag1 = "HealthTurnOn" Then
Var Menu22Selected = "Enable"
Else
Var Menu22Selected = "Invisible"
EndIf
;
If AppFastEnable = "true" Then

View file

@ -8,6 +8,12 @@
TopView "show"
; On open
If RecipeTag1 = "HealthTurnOn" Then
Var MenuHealthyEnable = "Enable"
Else
Var MenuHealthyEnable = "Disable"
EndIf
If Seeker = "next" Then
Open "ROOT/taobin_project/xml/page_catalog.xml"
EndIf
@ -406,7 +412,7 @@
<Button>
<X> 736 </X>
<Y> 1532 </Y>
<State>"Pressforever"</State>
<State>MenuHealthyEnable</State>
<Filename> Var(DirImage + "/bn_HealthyOption.png") </Filename>
<FilenamePress> Var(DirImage + "/bp_HealthyOption.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>

View file

@ -680,6 +680,81 @@
Var sugar_default_flag = 0
; Suger 4 step cold
If TOPPING1 = "Suger 4 step cold" Then
Var BGSugar = "Invisible"
Var ShiftSugarStep = 1
Var SugarState1 = "Enable"
Var SugarState2 = "Enable"
Var SugarState3 = "Enable"
Var SugarState4 = "Enable"
If toppingID1index1 = toppingID1Default Then
Var SugarState1 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index2 = toppingID1Default Then
Var SugarState2 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index3 = toppingID1Default Then
Var SugarState3 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index4 = toppingID1Default Then
Var SugarState4 = "PressForever"
Var sugar_default_flag = 1
EndIf
If sugar_default_flag = 0 Then
Var SugarState1 = "PressForever"
EndIf
EndIf
; Suger 4 step hot
If TOPPING1 = "Suger 4 step hot" Then
Var BGSugar = "Invisible"
Var ShiftSugarStep = 1
Var SugarState1 = "Enable"
Var SugarState2 = "Enable"
Var SugarState3 = "Enable"
Var SugarState4 = "Enable"
If toppingID1index1 = toppingID1Default Then
Var SugarState1 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index2 = toppingID1Default Then
Var SugarState2 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index3 = toppingID1Default Then
Var SugarState3 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index4 = toppingID1Default Then
Var SugarState4 = "PressForever"
Var sugar_default_flag = 1
EndIf
If sugar_default_flag = 0 Then
Var SugarState1 = "PressForever"
EndIf
EndIf
;
If TOPPING1 = "Sugar" Then
If sugarKeto = "true" Then