pakin/taobin_project
1
0
Fork 0
Code Issues Pull requests Projects 1 Releases 1 Packages Wiki Activity Actions

Seeker Complete V.1

Browse source
This commit is contained in:
miggaze 2022-01-11 13:41:12 +07:00
parent 2c24414402
commit 6a5c13f5c2
18 changed files with 150 additions and 31 deletions
Download patch file Download diff file Expand all files Collapse all files

47
xml/page_brewing3.xml
View file

@ -40,9 +40,12 @@
Var VendingTSIDTmp = ""
Var VendingTSIDProblem = ""
Var CreditReference = ""
Var PayCredit = 0
If Seeker.PayWithQR = 1 Then
Var VendingTSIDTmp = VendingTSID
Var VendingTSIDTmp = Seeker.VendingTSID
If Seeker.TNumberTaobinCredit = "" Then
Var TelephoneNumber = "0899999999"
@ -62,6 +65,7 @@
Var SessionID2 = SelectDrink
Var ServiceCredit = "coffee"
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
Else
If Seeker.StoreCreditFlag = 1 Then
@ -71,6 +75,7 @@
Var SessionID2 = SelectDrink
Var ServiceCredit = "coffee"
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
EndIf
EndIf
@ -157,6 +162,23 @@
Var next_pic_bg = DirImage + "/bn_add_order.png"
If LastMakeDrinkResult = "success" Then
Var MachineState_Result = 1
EndIf
If LastMakeDrinkResult = "fail" Then
Var MachineState_Result = 2
EndIf
DEBUGVAR VendingCampaign
If MachineState_Result > 0 Then
Var EnableSelectMenuBetweenBrew = "Invisible"
EndIf
</EventOpen>
@ -280,6 +302,7 @@
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If MOVE_CUP_TO_DOOR = "true" Then
@ -515,6 +538,10 @@
EndIf
EndIf
If MachineState_Result = 1 Then
;Var MachineState_Result = 2
EndIf
If MachineState_Result = 1 Then
If waitAckPay = 0 Then
@ -554,7 +581,7 @@
Var PayDetail = PayDetail + NOBONUS
;Var PayDetail="1/S:0/500/1:430|1001:12|1002:15|1020:7|1042:5|1050:50|9501:1|9502:1|9701:1|9702:1"
Var PayDetail="1/S:0/500/1:430|1001:12|1002:15|1020:7|1042:5|1050:50|9501:1|9502:1|9701:1|9702:1"
If GetFreeFromError = 1 Then
Var Seeker.CodeChannel = 1
@ -737,6 +764,10 @@
EndIf
EndIf
If MachineState_Result > 0 Then
Var EnableSelectMenuBetweenBrew = "Invisible"
EndIf
DEBUGVAR CountUpBrewing
; animation video loop
If AnimationOn = "true" Then
@ -996,14 +1027,16 @@
<State>EnableSelectMenuBetweenBrew</State>
<Filename> next_pic_bg </Filename>
<EventClick>
If MachineState_Result = 0 Then
SAVELOG "User click next button"
SAVELOG "User click next button"
Var Seeker = "next"
Var MultiPayEnable = "false"
CoinPause
Var Seeker = "next"
Var MultiPayEnable = "false"
CoinPause
Open "ROOT/taobin_project/xml/page_catalog_choose_drink1.xml"
Open "ROOT/taobin_project/xml/page_catalog.xml"
EndIf
</EventClick>
</Button>