DO blender and disable

This commit is contained in:
kong 2021-11-05 00:03:35 +07:00
parent a6ccab454d
commit e57e51e0b6
19 changed files with 394 additions and 182 deletions

View file

@ -49,8 +49,6 @@
Var ShotCoffeePremium = "Invisible"
Var StarwState = "Enable"
; On open
Var LidState = Lid1Status
@ -147,7 +145,9 @@
EndIf
EndIf
Var LidDeactiveButton = "Invisible"
Var StrawDeactiveButton = "Invisible"
Machine DoorClose
</EventOpen>
<Timeout> 2000 </Timeout>
@ -250,6 +250,8 @@
</Button>
<EventMachine>
DEBUGVAR MAT_ID_9701
DEBUGVAR MAT_ID_9601
DEBUGVAR SubMenuProductCode1
@ -322,7 +324,17 @@
Var blendedStateShow = "Enable"
Var PriceDiff = SubMenuPrice1 - PriceDrinkNoTop
DEBUGVAR IsSmoRet
If IsSmoRet = "true" Then
Var blendedState = "ForceSet"
Var blendedStateTxt = "Enable"
Function 1
Else
Var blendedStateTxt = "Invisible"
EndIf
EndIf
@ -330,25 +342,54 @@
Var IgnoreLidStraw = "false"
Var ShowLidStraw = "Invisible"
Var ShowLidOnly = "Invisible"
Var ShowStrawOnly = "Invisible"
Var ShowStrawOnly = "Invisible"
Else
If LidState = "Enable" Then
Var ShowLidStraw = "Enable"
Var ShowLidOnly = "Invisible"
Var ShowLidStraw = "Enable"
If MAT_ID_9701 = "Enable" Then
Var StrawState = MAT_ID_9701
Else
Var ShowLidStraw = "Invisible"
Var ShowStrawOnly = "Enable"
Var StrawState = MAT_ID_9701
EndIf
If MAT_ID_9601 = "Enable" Then
Var LidState = MAT_ID_9601
Else
Var LidState = MAT_ID_9601
EndIf
EndIf
; Override all
If Service_LidStraw = "Disable" Then
Var ShowLidStraw = "Invisible"
Var ShowLidOnly = "Invisible"
Var ShowStawOnly = "Invisible"
Var ShowLidStraw = "Enable"
;Var ShowLidOnly = "Invisible"
;Var ShowStawOnly = "Invisible"
Var StrawState = "Disable"
Var LidState = "Disable"
EndIf
If StrawState = "Enable" Then
Var StrawDeactiveButton = "Invisible"
Else
Var StrawDeactiveButton = "Enable"
EndIf
If LidState = "Enable" Then
Var LidDeactiveButton = "Invisible"
Else
Var LidDeactiveButton = "Enable"
EndIf
;PressForever
If TOPPING1 = "Sugar" Then
@ -564,6 +605,14 @@
DEBUGVAR TOPPING2
Refresh
EndIf
If TOPPING2 = "shot coffee 1008" Then
Var ShotCoffeePremium = "Enable"
Var showShotEnable = "Enable"
DEBUGVAR TOPPING2
Refresh
EndIf
;-END
If TOPPING3 = "Collagen" Then
@ -702,6 +751,7 @@
<Filename> Var( DirImage + "/bn_blended.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_blended.png" ) </FilenamePress>
<FilenameDisable> Var( DirImage + "/bd_blended.png" ) </FilenameDisable>
<FilenameForce> Var( DirImage + "/bp_blended.png" ) </FilenameForce>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
@ -732,6 +782,7 @@
<Filename> Var( DirImage + "/cb_notcheck.png" ) </Filename>
<FilenamePress> Var( DirImage + "/cb_checked.png" ) </FilenamePress>
<FilenameDisable> Var( DirImage + "/cb_checkdis.png" ) </FilenameDisable>
<FilenameForce> Var( DirImage + "/cb_force_checked.png" ) </FilenameForce>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
@ -758,6 +809,13 @@
<Filename> Var( DirImage + "/text7.png" ) </Filename>
</Image>
<Image>
<State> blendedStateTxt </Stage>
<X> 602 </X>
<Y> 64 </Y>
<Filename> Var( DirImage + "/text5.png" ) </Filename>
</Image>
</Block>
;- Begin topping1
@ -1040,7 +1098,7 @@
<Volume> SoundVolume </Volume>
<EventClick>
SAVELOG "premium shot press"
If showShotEnable = "Press" Then
Var showShotEnable = "Enable"
Var PriceDrinkTmp = PriceDrinkTmp - toppingID2price2
@ -1176,129 +1234,6 @@
;
;
;-BEGIN Collagen
;- END
;
;
;
;-BEGIN Lid only
<Block>
<Width> 987 </Width>
<Height> 188 </Height>
<MarginTop> 20 </MarginTop>
<State> ShowLidOnly </State>
<Image>
<State> "Enable" </State>
<Filename> bg_lid_only </Filename>
</Image>
; lid left
<Button>
<X> 40 </X>
<Y> 79 </Y>
<State> LidState </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping2/bn_lid.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping2/bp_lid.png" </FilenamePress>
<EventClick>
SAVELOG "Click lid only cb"
If LidState = "Press" Then
Var LidState = "Enable"
Else
Var LidState = "Press"
EndIf
Refresh
</EventClick>
</Button>
<Button>
<X> 896 </X>
<Y> 79 </Y>
<State> LidState </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping2/cb_notcheck.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping2/cb_checked.png" </FilenamePress>
<EventClick>
SAVELOG "Click lid only cb"
If LidState = "Press" Then
Var LidState = "Enable"
Else
Var LidState = "Press"
EndIf
Refresh
</EventClick>
</Button>
</Block>
;- END
;
;
;
;
;
;
;
;
;
;-BEGIN Straw only
<Block>
<Width> 987 </Width>
<Height> 188 </Height>
<MarginTop> 20 </MarginTop>
<State> ShowStrawOnly </State>
<Image>
<State> "Enable" </State>
<Filename> bg_straw_only </Filename>
</Image>
; straw left
<Button>
<X> 40 </X>
<Y> 72 </Y>
<State> StarwState </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping2/bn_straw.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping2/bp_straw.png" </FilenamePress>
<EventClick>
SAVELOG "Click straw cb"
If StarwState = "Press" Then
Var StarwState = "Enable"
Else
Var StarwState = "Press"
EndIf
Refresh
</EventClick>
</Button>
<Button>
<X> 896 </X>
<Y> 79 </Y>
<State> StarwState </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping2/cb_notcheck.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping2/cb_checked.png" </FilenamePress>
<EventClick>
SAVELOG "Click straw cb"
If StarwState = "Press" Then
Var StarwState = "Enable"
Else
Var StarwState = "Press"
EndIf
Refresh
</EventClick>
</Button>
</Block>
;- END
;
;
;
;
;
;
;
;
;
;-BEGIN Lid straw
<Block>
@ -1314,16 +1249,17 @@
<Button>
<X> 40 </X>
<Y> 72 </Y>
<State> StarwState </State>
<State> StrawState </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping2/bn_straw.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping2/bp_straw.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/topping2/bd_straw.png" </FilenameDisable>
<EventClick>
SAVELOG "Click straw cb"
If StarwState = "Press" Then
Var StarwState = "Enable"
If StrawState = "Press" Then
Var StrawState = "Enable"
Else
Var StarwState = "Press"
Var StrawState = "Press"
EndIf
Refresh
</EventClick>
@ -1332,21 +1268,24 @@
<Button>
<X> 896 </X>
<Y> 79 </Y>
<State> StarwState </State>
<State> StrawState </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping2/cb_notcheck.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping2/cb_checked.png" </FilenamePress>
<FilenameDisable> Var( DirImage + "/cb_checkdis.png" ) </FilenameDisable>
<EventClick>
SAVELOG "Click straw cb"
If StarwState = "Press" Then
Var StarwState = "Enable"
If StrawState = "Press" Then
Var StrawState = "Enable"
Else
Var StarwState = "Press"
Var StrawState = "Press"
EndIf
Refresh
</EventClick>
</Button>
; LID left
<Button>
<X> 40 </X>
@ -1355,6 +1294,7 @@
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping2/bn_lid.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping2/bp_lid.png" </FilenamePress>
<FilenameDisable> Var( DirImage + "/bd_lid.png" ) </FilenameDisable>
<EventClick>
SAVELOG "Click LID pic"
If LidState = "Press" Then
@ -1373,6 +1313,7 @@
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping2/cb_notcheck.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping2/cb_checked.png" </FilenamePress>
<FilenameDisable> Var( DirImage + "/cb_checkdis.png" ) </FilenameDisable>
<EventClick>
SAVELOG "Click LID cb"
If LidState = "Press" Then
@ -1383,7 +1324,25 @@
Refresh
</EventClick>
</Button>
<Image>
<State> StrawDeactiveButton </Stage>
<X> 602 </X>
<Y> 64 </Y>
<Filename> Var( DirImage + "/text20.png" ) </Filename>
</Image>
<Image>
<State> LidDeactiveButton </Stage>
<X> 602 </X>
<Y> 150 </Y>
<Filename> Var( DirImage + "/text21.png" ) </Filename>
</Image>
</Block>
;
;
;
@ -1435,13 +1394,13 @@
DEBUGVAR topping3
DEBUGVAR LidState
DEBUGVAR StarwState
DEBUGVAR StrawState
DEBUGVAR UserSelectProductCode
DEBUGVAR HAVE_UV_DOOR_LID
If HAVE_UV_DOOR_LID = "true" Then
If StarwState = "Press" Then
If StrawState = "Press" Then
Machine StrawOrder
Var LedLidBlink = "true"
EndIf
@ -1451,7 +1410,7 @@
Var LedLidBlink = "true"
EndIf
Var StarwState = "Enable"
Var StrawState = "Enable"
Var LidState = "Enable"
;
@ -1501,13 +1460,13 @@
DEBUGVAR topping3
DEBUGVAR LidState
DEBUGVAR StarwState
DEBUGVAR StrawState
DEBUGVAR UserSelectProductCode
DEBUGVAR HAVE_UV_DOOR_LID
If HAVE_UV_DOOR_LID = "true" Then
If StarwState = "Press" Then
If StrawState = "Press" Then
Machine StrawOrder
Var LedLidBlink = "true"
EndIf
@ -1517,7 +1476,7 @@
Var LedLidBlink = "true"
EndIf
Var StarwState = "Enable"
Var StrawState = "Enable"
Var LidState = "Enable"
;
@ -1550,21 +1509,29 @@
DEBUGVAR showShotEnable
DEBUGVAR blendedState
If blendedState = "Press" Then
If blendedState = "ForceSet" Then
Var TOPPING_PRICE = PriceDiff
Var UserSelectProductCode = SubMenuProductCode1
Var showShotEnable = "Disable"
Var showText4 = "Enable"
Else
Var UserSelectProductCode = SaveProductCodeSelect
If showShotEnable = "Disable" Then
Var showShotEnable = "Enable"
If blendedState = "Press" Then
Var TOPPING_PRICE = PriceDiff
Var UserSelectProductCode = SubMenuProductCode1
Var showShotEnable = "Disable"
Var showText4 = "Enable"
Else
Var UserSelectProductCode = SaveProductCodeSelect
If showShotEnable = "Disable" Then
Var showShotEnable = "Enable"
EndIf
Var showText4 = "Invisible"
EndIf
Var showText4 = "Invisible"
EndIf
DEBUGVAR UserSelectProductCode