THAI: correct the typo

This commit is contained in:
thanawat saiyota 2025-03-21 10:24:58 +07:00
parent 790887a5cd
commit 73e5a3214c
2 changed files with 411 additions and 2 deletions

409
inc/button_next.inc Normal file
View file

@ -0,0 +1,409 @@
;Var Seeker = "curr"
Var Timeout = 0
Var StatementCheckMenu = "ProductCodeCheck=" + UserSelectProductCode
__CMD "statement" 0 StatementCheckMenu "-"
DEBUGVAR PriceDrinkTmp
;Var Seeker.PriceDrink = PriceDrinkTmp
Var PriceDrink = PriceDrinkTmp
SAVELOG "USER press next ( topping ) - new"
If CustomSweetState[0] = "PressForever" Then
If ShiftSugarStep = 1 Then
Var topping1 = toppingID1index1
EndIf
EndIf
If CustomSweetState[1] = "PressForever" Then
If ShiftSugarStep = 1 Then
Var topping1 = toppingID1index2
EndIf
If ShiftSugarStep = 2 Then
Var topping1 = toppingID1index1
EndIf
EndIf
If CustomSweetState[2] = "PressForever" Then
If ShiftSugarStep = 1 Then
Var topping1 = toppingID1index3
EndIf
If ShiftSugarStep = 2 Then
Var topping1 = toppingID1index2
EndIf
If ShiftSugarStep = 3 Then
Var topping1 = toppingID1index1
EndIf
EndIf
If CustomSweetState[2] = "PressForever" Then
If ShiftSugarStep = 1 Then
Var topping1 = toppingID1index3
EndIf
If ShiftSugarStep = 2 Then
Var topping1 = toppingID1index2
EndIf
If ShiftSugarStep = 3 Then
Var topping1 = toppingID1index1
EndIf
EndIf
If CustomMilkState[0] = "PressForever" Then
Var topping11 = toppingID11index1
EndIf
If CustomMilkState[1] = "PressForever" Then
Var topping11 = toppingID11index2
EndIf
If CustomMilkState[2] = "PressForever" Then
Var topping11 = toppingID11index3
EndIf
If CustomSweetState[3] = "PressForever" Then
If ShiftSugarStep = 1 Then
Var topping1 = toppingID1index4
EndIf
If ShiftSugarStep = 2 Then
Var topping1 = toppingID1index3
EndIf
If ShiftSugarStep = 3 Then
Var topping1 = toppingID1index2
EndIf
EndIf
If CustomSweetState[4] = "PressForever" Then
If ShiftSugarStep = 1 Then
Var topping1 = toppingID1index5
EndIf
If ShiftSugarStep = 2 Then
Var topping1 = toppingID1index4
EndIf
If ShiftSugarStep = 3 Then
Var topping1 = toppingID1index3
EndIf
EndIf
If showCustomCoffee = "Enable" Then
If showCoffeeWater = "Enable" Then
If CustomCoffeeWaterState[0] = "PressForever" Then
Var topping7 = toppingID7index1
EndIf
If CustomCoffeeWaterState[1] = "PressForever" Then
Var topping7 = toppingID7index2
EndIf
If CustomCoffeeWaterState[2] = "PressForever" Then
Var topping7 = toppingID7index3
EndIf
If CustomCoffeeWaterState[3] = "PressForever" Then
Var topping7 = toppingID7index4
EndIf
If CustomCoffeeWaterState[4] = "PressForever" Then
Var topping7 = toppingID7index5
EndIf
Else
Var topping7 = 0
EndIf
If showCoffeeQuantity = "Enable" Then
If CustomCoffeeQuantityState[0] = "PressForever" Then
Var topping2 = toppingID2index1
EndIf
If CustomCoffeeQuantityState[1] = "PressForever" Then
Var topping2 = toppingID2index2
EndIf
If CustomCoffeeQuantityState[2] = "PressForever" Then
Var topping2 = toppingID2index3
EndIf
Else
If toppingID2index3 = "" Then
Else
Var topping2 = 0
EndIf
EndIf
If showCoffeeLevel = "Enable" Then
If CustomCoffeeLevelState[0] = "PressForever" Then
Var topping9 = toppingID9index1
EndIf
If CustomCoffeeLevelState[1] = "PressForever" Then
Var topping9 = toppingID9index2
EndIf
If CustomCoffeeLevelState[2] = "PressForever" Then
Var topping9 = toppingID9index3
EndIf
If CustomCoffeeLevelState[3] = "PressForever" Then
Var topping9 = toppingID9index4
EndIf
Else
Var topping9 = 0
EndIf
If showCoffeeTamping = "Enable" Then
If CustomCoffeeTampingState[0] = "PressForever" Then
Var topping8 = toppingID8index1
EndIf
If CustomCoffeeTampingState[1] = "PressForever" Then
Var topping8 = toppingID8index2
EndIf
If CustomCoffeeTampingState[2] = "PressForever" Then
Var topping8 = toppingID8index3
EndIf
Else
Var topping8 = 0
EndIf
Else
If toppingID2index3 = "" Then
Else
Var topping2 = 0
EndIf
Var topping7 = 0
Var topping8 = 0
Var topping9 = 0
Var topping10 = 0
EndIf
; Post Topping
If SugarZeroCalEnable = "true" Then
Var sugarToppingID = 1000
If SugarZeroCalCheck = "PressForever" Then
Var sugarToppingID = 1001
Else
Var sugarToppingID = 1000
EndIf
EndIf
If Seeker = "next" Then
SAVELOG "NEXT NEXT NEXT NEXT NEXT NEXT NEXT NEXT NEXT NEXT NEXT NEXT NEXT NEXT NEXT NEXT NEXT NEXT NEXT NEXT NEXT NEXT "
EndIf
Var Seeker.topping1 = topping1
Var Seeker.topping2 = topping2
Var Seeker.topping3 = topping3
Var Seeker.topping6 = topping6
Var Seeker.topping7 = topping7
Var Seeker.topping8 = topping8
Var Seeker.topping9 = topping9
Var Seeker.topping10 = topping10
Var Seeker.topping11 = topping11
Var Seeker.topping12 = topping12
Var Seeker.topping13 = topping13
Var Seeker.PostTopping1 = sugarToppingID
Var Seeker.get_a_straw = StrawState
Var Seeker.get_a_lid = LidState
DEBUGVAR Seeker.topping1
DEBUGVAR Seeker.topping2
DEBUGVAR Seeker.topping3
DEBUGVAR Seeker.topping6
DEBUGVAR Seeker.topping7
DEBUGVAR Seeker.topping8
DEBUGVAR Seeker.topping9
DEBUGVAR Seeker.topping10
DEBUGVAR Seeker.topping11
DEBUGVAR Seeker.topping12
DEBUGVAR Seeker.topping13
DEBUGVAR Seeker.get_a_straw
DEBUGVAR Seeker.get_a_lid
DEBUGVAR LidState
DEBUGVAR StrawState
DEBUGVAR UserSelectProductCode
If StrawState = "Press" Then
Machine StrawOrder
Var LedLidBlink = "true"
EndIf
If LidState = "Press" Then
Machine LidOrder
Var LedLidBlink = "true"
Var bg_lidProblem_ST = "Enable"
Else
If LidState = "Disable" Then
Var bg_lidProblem_ST = "Disable"
Else
Var bg_lidProblem_ST = "Invisible"
EndIf
EndIf
If SelectDrinkType = 0 Then
Else
Var StrawState = "Enable"
Var LidState = "Enable"
EndIf
;
If showOvaltineEnable = "Press" Then
;Var CustomOvaltineCheckState = "Press"
Var SelectToppingType = 1
EndIf
If showOreoAddEnable = "Press" Then
;Var CustomOreoCheckState = "Press"
Var SelectToppingType = 1
EndIf
If showCocoaEnable = "Press" Then
;Var CustomCocoaCheckState = "Press"
Var SelectToppingType = 1
EndIf
DEBUGVAR PromotionIDCurrentOrder
Var SelectDrink = UserSelectProductCode
Var Seeker.selected_a_drink = UserSelectProductCode
DEBUGVAR Seeker.selected_a_drink
; Set drink
If Seeker = "curr" Then
;include="ROOT/taobin_project/inc/select_drink_current.inc"
If SelectToppingType = 0 Then
Else
Topping "Select" UserSelectProductCode
Topping "ClearMultiTopping" "Test 4"
Topping "Multiply6-ID" strMulti6_1
Topping "Multiply6-ID" strMulti6_2
Topping "Multiply6-ID" strMulti6_3
Topping "Multiply6-ID" strMulti6_5
Topping "Multiply6-ID" strMulti6_6
Topping "Pack" ExtendDataCurr
EndIf
Else
Topping "SetNextOrder" UserSelectProductCode
Topping "__select" UserSelectProductCode
; Set option toppinng and pack
Topping "__select1-id" topping1
Topping "__select2-id" topping2
Topping "__select3-id" topping3
Topping "__select6-id" topping6
Topping "__select7-id" topping7
Topping "__select8-id" topping8
Topping "__select9-id" topping9
Topping "__select10-id" topping10
Topping "__select11-id" topping11
Topping "__select12-id" topping12
Topping "__select13-id" topping13
Topping "__posttopping1-ID" sugarToppingID
; Pack
Topping "__pack" ExtendDataNext
Var NextUserSelectDrinkFromPaid = UserSelectProductCode
Var NextUserSelecttopping1Paid = topping1
Var NextUserSelecttopping2Paid = topping2
Var NextUserSelecttopping3Paid = topping3
Var NextUserSelecttopping6Paid = topping6
Var NextUserSelecttopping7Paid = topping7
Var NextUserSelecttopping8Paid = topping8
Var NextUserSelecttopping9Paid = topping9
Var NextUserSelecttopping10Paid = topping10
Var NextUserSelecttopping11Paid = topping11
Var NextUserSelecttopping12Paid = topping12
Var NextUserSelecttopping13Paid = topping13
EndIf
DEBUGVAR Seeker
DEBUGVAR Seeker.ExtendData
Var Seeker.PictureDrink = PictureDrink
Var Seeker.showname = showname
DEBUGVAR MenuCautionImageStage0
DEBUGVAR CustomerFilterEnable
DEBUGVAR CustomerFilterType
GetLongTimeInMinute LastTimeClickOrder
If CART_COUNT = 0 Then
If UserSelectProductCode = "-" Then
Else
If SelectDrinkType = 1 Then
; Move to MenuReady
;OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_blank.xml"
;Open "ROOT/taobin_project/xml/page_payment.xml"
EndIf
EndIf
DEBUGVAR SelectToppingType
If SelectDrinkType = 0 Then
Var high_light_drink_type = "Enable"
Else
If SelectToppingType = 0 Then
If blend_button_state = "PressForever" Then
Var toppingSelectState = "Enable"
If toppingSelectState = "Enable" Then
Var CustomOreoState = "Enable"
Var CustomOvaltineState = "Enable"
Var CustomCocoaState = "Enable"
Var PopupToppingSelect = "Enable"
Var CustomOreoCheckState = "Enable"
Var CustomOvaltineCheckState = "Enable"
Var CustomCocoaCheckState = "Enable"
EndIf
EndIf
EndIf
EndIf
Else
If CART1_STATUS = "EMPTY" Then
Cart "AddMenuID" 1
Else
If CART2_STATUS = "EMPTY" Then
Cart "AddMenuID" 2
Else
If CART3_STATUS = "EMPTY" Then
Cart "AddMenuID" 3
EndIf
EndIf
EndIf
Var CartUpdate = "true"
Var ButtonNext = "true"
EndIf
Var LastTimeClickOrder = 0

View file

@ -8816,7 +8816,7 @@
If toppingID6index2Status = "Enable" Then
Var showOreoAddEnable = "Enable"
Else
Var showOreoAddEnable = "Disible"
Var showOreoAddEnable = "Disable"
EndIf
EndIf
EndIf
@ -8890,7 +8890,7 @@
If toppingID6index2Status = "Enable" Then
Var showOreoAddEnable = "Enable"
Else
Var showOreoAddEnable = "Disible"
Var showOreoAddEnable = "Disable"
EndIf
EndIf
EndIf