Seeker Complete V.1

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

View file

@ -28,6 +28,7 @@
Var PayInfoCFlag = 0
Var ActionOKCase = 0
Var VendingCampaign = Seeker.IntVendingCampaign
Var Seeker.VendingCampaign = Seeker.IntVendingCampaign
Var PayAmount = PriceDrink
@ -393,6 +394,7 @@
MakeDrinkV1 SelectDrink SelectSugarID
EndIf
Var Seeker.PayWithQR = 1
Var Seeker.VendingTSID = VendingTSID
Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
@ -463,6 +465,8 @@
Var LOADING_STATE = "Invisible"
EndIf
EndIf
Else
Var PayInfoCFlag = 1
EndIf
Refresh
@ -666,18 +670,20 @@
Var SessionID2 = SelectDrink
Var ServiceCredit = "coffee"
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
;If NoGotoMenupage = "false" Then
;
; Open "ROOT/taobin_project/xml/page_catalog.xml"
;EndIf
Var PayCredit = 1
Var ActionOKCase = 1
If Seeker.IntVendingCampaign = 0 Then
If Seeker = "curr" Then
Open "ROOT/taobin_project/xml/page_catalog.xml"
Else
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
EndIf
If Seeker = "curr" Then
If Seeker.IntVendingCampaign = 0 Then
If Seeker = "curr" Then
Open "ROOT/taobin_project/xml/page_catalog.xml"
Else
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
EndIf
EndIf
Else
;wait ack
EndIf
EndIf
EndIf