752 lines
16 KiB
XML
752 lines
16 KiB
XML
<Popup>
|
|
<Cache> "Enable" </Cache>
|
|
<Width> 1080 </Width>
|
|
<Height> 1920 </Height>
|
|
<Background> "0xeae6e1" </Background>
|
|
<EventOpen>
|
|
; On open
|
|
;world-class
|
|
|
|
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_blank.xml"
|
|
|
|
|
|
;Open "ROOT/taobin_project/xml/page_display_ExclusiveGift.xml"
|
|
|
|
Var IndoQR = 0
|
|
|
|
|
|
|
|
Var GetPayInfoFlag = 0
|
|
Var SessionID2 = ""
|
|
Var testservice = "kbank"
|
|
Var QRCODE99 = ""
|
|
Var QRCODETMP = ""
|
|
|
|
Var QRChannel = 0
|
|
|
|
;Var PriceDrink = 2
|
|
|
|
Var DiscountDrink = 0
|
|
Var SelectSlot = "1"
|
|
|
|
SAVELOG BoxID
|
|
|
|
Var ServiceCharge = 0
|
|
|
|
Var AdultFlag = 0
|
|
|
|
If Only18 = "true" Then
|
|
DEBUGVAR AdultState1
|
|
DEBUGVAR AdultFlag
|
|
Else
|
|
If SelectDrink = "12-05-02-0028" Then
|
|
Var AdultFlag = 1
|
|
EndIf
|
|
If SelectDrink = "12-05-02-0029" Then
|
|
Var AdultFlag = 1
|
|
EndIf
|
|
If SelectDrink = "12-05-03-0028" Then
|
|
Var AdultFlag = 1
|
|
EndIf
|
|
If SelectDrink = "12-05-03-0029" Then
|
|
Var AdultFlag = 1
|
|
EndIf
|
|
If SelectDrink = "12-02-01-0017" Then
|
|
Var AdultFlag = 1
|
|
EndIf
|
|
If SelectDrink = "12-05-02-0027" Then
|
|
Var AdultFlag = 1
|
|
EndIf
|
|
If SelectDrink = "12-05-03-0027" Then
|
|
Var AdultFlag = 1
|
|
EndIf
|
|
EndIf
|
|
|
|
If CustomerFilterEnable = "YES" Then
|
|
Var AdultFlag = 1
|
|
|
|
DEBUGVAR CustomerFilterType
|
|
EndIf
|
|
|
|
If NightTime = 1 Then
|
|
If SelectDrink = "12-99-03-0066" Then
|
|
Var PriceDrink = 60
|
|
EndIf
|
|
EndIf
|
|
|
|
If From15THBPro = 1 Then
|
|
Var PriceDrink = OriginalPrice
|
|
EndIf
|
|
|
|
If FromRerunPro = 1 Then
|
|
Var PromoPriceDrink = PriceDrink
|
|
Var PriceDrink = OldPrice
|
|
EndIf
|
|
|
|
If FromMondayBananaPro = 1 Then
|
|
Var PriceDrink = OriginalPrice
|
|
EndIf
|
|
|
|
If FromWednesdayMelonPro = 1 Then
|
|
Var PriceDrink = OriginalPrice + TOPPING_PRICE
|
|
EndIf
|
|
|
|
If FromPowerUpPro = 1 Then
|
|
Var PriceDrink = OriginalPrice
|
|
EndIf
|
|
|
|
|
|
|
|
DEBUGVAR PriceDrink
|
|
DEBUGVAR PromotionPriceDrink
|
|
|
|
Var PriceFromCatalog = PromotionPriceDrink
|
|
|
|
;Var AdultFlag = 1
|
|
|
|
|
|
Var QRCODE1 = "A000000677010112"
|
|
Var QRCODE2 = "010755600066301"
|
|
Var QRCODE3 = "VDGN"
|
|
Var QRCODE4 = BoxID
|
|
Var QRCODE5 = SelectSlot
|
|
Var QRCODE6 = SelectDrink
|
|
Var QRCODE7 = PriceDrink
|
|
Var QRCODE8 = ""
|
|
|
|
Var CountStepPackPayment = 0
|
|
Var CountStepForCupFlagDelay = 0
|
|
|
|
Var VendingBank = "other"
|
|
Var ReqPayInfoFromCashOther = 0
|
|
|
|
|
|
|
|
|
|
Var Seeker.PromotionIDCurrentOrder = 0
|
|
|
|
Var Seeker.TxRef1 = ""
|
|
Var Seeker.OrderChanel = "Normal"
|
|
|
|
Var Seeker.CurrCreditAmount = 0
|
|
Var Seeker.CurrCreditUse = 0
|
|
Var Seeker.CurrCreditTelNum = ""
|
|
Var Seeker.CurrCreditPinNum = ""
|
|
|
|
|
|
Var Seeker.TaobinErrorNetwork = 0
|
|
|
|
Var Seeker.VendingCode = "C00"
|
|
Var Seeker.VendingCampaignRI3 = 0
|
|
Var Seeker.IntVendingCampaign = 0
|
|
Var Seeker.FreeVendingCampaign = 0
|
|
Var Seeker.CodeChannel = 0
|
|
Var CoinVendingOnFlag = 0
|
|
Var Seeker.CreditCard = 0
|
|
Var Seeker.CreditCardRef = ""
|
|
|
|
Var Seeker.UseCreditPayFullDrinkPrice = 0
|
|
|
|
Var Seeker.IntVendingCredit = 0
|
|
|
|
Var Seeker.StoreCreditFlag = 0
|
|
Var Seeker.pageStoreCredit0 = 0
|
|
Var Seeker.TNumberTaobinCredit = ""
|
|
Var Seeker.TNumberTaobinMember = ""
|
|
Var Seeker.CoffeePinNumber = ""
|
|
|
|
Var Seeker.VendingDiscount = 0
|
|
Var Seeker.VendingCampaign = 0
|
|
Var Seeker.VendingTSID = ""
|
|
|
|
Var Seeker.CreditNotEnoughRefID = ""
|
|
|
|
Var PayType = ""
|
|
Var CART_INDEX = 0
|
|
|
|
Var QRCODE99KBANK = ""
|
|
Var QRCODE99Shoppy = ""
|
|
Var LOADING_STATE = "Invisible"
|
|
Var QR_POPUP = "/img_popup2.png"
|
|
|
|
If show_eng = "true" Then
|
|
Var DirImage = "ROOT/taobin_project/image/page_payment_en/page_payment"
|
|
Var PlaySoundLag = "ROOT/taobin_project/sound_eng/How_would_you_like_to_pay.mp3"
|
|
Var PlaySoundCodeLang = "ROOT/taobin_project/sound_eng/Code8digit.mp3"
|
|
|
|
|
|
Else
|
|
Var DirImage = "ROOT/taobin_project/image/page_payment"
|
|
Var PlaySoundLag = "ROOT/taobin_project/sound_thai/payment.mp3"
|
|
|
|
; Play Sound #zone
|
|
If SoundBackToSchoolEnable = 1 Then
|
|
|
|
If SoundBackToSchoolType = 1 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/boy/"
|
|
EndIf
|
|
If SoundBackToSchoolType = 2 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/girl/"
|
|
EndIf
|
|
Var PlaySoundLag = RootPathSoundBackToSchool + "payment.wav"
|
|
EndIf
|
|
|
|
|
|
Var PlaySoundCodeLang = "ROOT/sounds/Code8digit.m4a"
|
|
EndIf
|
|
|
|
|
|
|
|
SAVELOG MachineStage
|
|
|
|
|
|
If AdultFlag = 1 Then
|
|
If CameraCount = 1 Then
|
|
CameraSetting "usbfront" "default" "Rotate=90,Resolution=1280x720,scaleX=1.0,scaleY=1.0"
|
|
EndIf
|
|
|
|
Var PlaySoundLag = ""
|
|
|
|
EndIf
|
|
|
|
|
|
READ_FILE "/mnt/sdcard/can_sell" ReadyForBrew
|
|
|
|
If ReadyForBrew = "false" Then
|
|
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
|
|
Var ReadyForBrew = "false"
|
|
EndIf
|
|
|
|
|
|
|
|
; Test
|
|
;Var MachineStage = "-"
|
|
|
|
Var PayReference = ""
|
|
Var Seeker.CreditReferenceTmp = ""
|
|
|
|
If web_app_prepar = "true" Then
|
|
Var web_app_prepar = "false"
|
|
__CMD "ui-load-playlist" 0 SelectDrink "-"
|
|
EndIf
|
|
|
|
|
|
|
|
|
|
Var ServiceAmount2 = PriceDrink
|
|
Var TelephoneNumber = "0899999999"
|
|
Var ServiceType = "coffee"
|
|
|
|
Var VendingCreditRemain = ""
|
|
|
|
|
|
|
|
DEBUGVAR Seeker.thankLidFlag
|
|
DEBUGVAR Seeker.thankStrawFlag
|
|
|
|
Var Seeker.PayWithQR = 0
|
|
Var Seeker.CampaignPayChanel = "cash"
|
|
Var Seeker.CampaignPCode = SelectDrink
|
|
Var Seeker.CampaignPPrice = PriceDrink
|
|
|
|
If CupChecking = "true" Then
|
|
Var StageShowAlias = "Invisible"
|
|
Var StageShowLoading = "Enable"
|
|
Else
|
|
Var StageShowAlias = "Enable"
|
|
Var StageShowLoading = "Invisible"
|
|
EndIf
|
|
|
|
|
|
Var Delay = 0
|
|
Var DelayCount = 0
|
|
|
|
DEBUGVAR SelectDrink
|
|
|
|
Var NOCashFlag = 0
|
|
|
|
DEBUGVAR SELLSTATUS
|
|
If SELLSTATUS = "SELLNOCASH" Then
|
|
Var NOCashFlag = 1
|
|
EndIf
|
|
|
|
|
|
;
|
|
|
|
|
|
DEBUGVAR PromotionIDCurrentOrder
|
|
|
|
|
|
Var RemainAmountStr = ""
|
|
|
|
If ModeFreeEnable = 1 Then
|
|
|
|
Var RemainAmountStr = "Free###size=150"
|
|
|
|
Var Seeker.VendingCode = "MKF"
|
|
Var Seeker.IntVendingCampaign = PriceDrink
|
|
Var Seeker.FreeVendingCampaign = 1
|
|
Var Seeker.CodeChannel = 1
|
|
Var Seeker.CodeNumber = IDNum
|
|
|
|
|
|
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
|
|
|
|
|
|
|
EndIf
|
|
|
|
DEBUGVAR PriceDrink
|
|
DEBUGVAR PriceDrinkTmp
|
|
DEBUGVAR OriginalPrice
|
|
DEBUGVAR TOPPING_PRICE
|
|
|
|
If FromMomCocoaPro = 1 Then
|
|
If DiscountMomCocoaPro > 0 Then
|
|
Var DiscountDrink = DiscountMomCocoaPro
|
|
Var Seeker.CampaignPPrice = PromotionPriceDrink
|
|
EndIf
|
|
EndIf
|
|
|
|
If FromCocoa77Pro = 1 Then
|
|
Var OriginalPriceWithTopping = OriginalPrice + TOPPING_PRICE
|
|
Var PriceDiff = OriginalPriceWithTopping - PromotionPriceDrink
|
|
Var DiscountDrink = PriceDiff
|
|
Var Seeker.CampaignPPrice = PromotionPriceDrink
|
|
EndIf
|
|
|
|
If FromPassionMintPro = 1 Then
|
|
Var OriginalPriceWithTopping = OriginalPrice + TOPPING_PRICE
|
|
Var PriceDiff = OriginalPriceWithTopping - PromotionPriceDrink
|
|
Var DiscountDrink = PriceDiff
|
|
Var Seeker.CampaignPPrice = PromotionPriceDrink
|
|
EndIf
|
|
|
|
If FromRerunPro = 1 Then
|
|
Var PriceDiff = PriceDrink - PromoPriceDrink
|
|
Var Seeker.VendingCode = RerunProCode
|
|
Var Seeker.IntVendingCampaign = PriceDiff
|
|
Var Seeker.FreeVendingCampaign = 0
|
|
Var Seeker.CodeChannel = 1
|
|
Var Seeker.CodeNumber = "00000000"
|
|
Var Seeker.VendingCampaignRI3 = PriceDiff
|
|
Var Seeker.CampaignPPrice = PromoPriceDrink
|
|
|
|
; reset
|
|
Var RerunProCode = ""
|
|
EndIf
|
|
|
|
If FromMondayBananaPro = 1 Then
|
|
Var PriceDiff = PriceDrink - PromotionPriceDrink
|
|
Var Seeker.VendingCode = "PMD10"
|
|
Var Seeker.IntVendingCampaign = PriceDiff
|
|
Var Seeker.FreeVendingCampaign = 0
|
|
Var Seeker.CodeChannel = 1
|
|
Var Seeker.CodeNumber = "00000000"
|
|
Var Seeker.VendingCampaignRI3 = PriceDiff
|
|
Var Seeker.CampaignPPrice = PromotionPriceDrink
|
|
EndIf
|
|
|
|
If FromWednesdayMelonPro = 1 Then
|
|
Var PriceDiff = PriceDrink - PromotionPriceDrink
|
|
Var Seeker.VendingCode = "PMD10"
|
|
Var Seeker.IntVendingCampaign = PriceDiff
|
|
Var Seeker.FreeVendingCampaign = 0
|
|
Var Seeker.CodeChannel = 1
|
|
Var Seeker.CodeNumber = "00000000"
|
|
Var Seeker.VendingCampaignRI3 = PriceDiff
|
|
Var Seeker.CampaignPPrice = PromotionPriceDrink
|
|
EndIf
|
|
|
|
If NightTime = 1 Then
|
|
If SelectDrink = "12-99-03-0066" Then
|
|
Var PriceDrink = 60
|
|
Var Seeker.VendingCode = "PMX5"
|
|
Var Seeker.IntVendingCampaign = 30
|
|
Var Seeker.FreeVendingCampaign = 0
|
|
Var Seeker.CodeChannel = 1
|
|
Var Seeker.CodeNumber = "00000000"
|
|
Var Seeker.VendingCampaignRI3 = 30
|
|
EndIf
|
|
EndIf
|
|
|
|
If From15THBPro = 1 Then
|
|
Var PriceDiff = OriginalPrice - 15
|
|
Var Seeker.VendingCode = "Fix15"
|
|
Var Seeker.IntVendingCampaign = PriceDiff
|
|
Var Seeker.FreeVendingCampaign = 0
|
|
Var Seeker.CodeChannel = 1
|
|
Var Seeker.CodeNumber = "00000000"
|
|
Var Seeker.VendingCampaignRI3 = PriceDiff
|
|
Var Seeker.CampaignPPrice = PriceDrink - PriceDiff
|
|
EndIf
|
|
|
|
If FromPowerUpPro = 1 Then
|
|
|
|
If FreeEnergyDrink = 1 Then
|
|
If SelectDrink = "12-05-02-0035" Then
|
|
Var PriceDiff = PriceDrink - PromotionPriceDrink
|
|
Var Seeker.VendingCode = "FIX1"
|
|
Var Seeker.IntVendingCampaign = PriceDiff
|
|
Var Seeker.FreeVendingCampaign = 0
|
|
Var Seeker.CodeChannel = 1
|
|
Var Seeker.CodeNumber = "00000000"
|
|
Var Seeker.VendingCampaignRI3 = PriceDiff
|
|
Var Seeker.CampaignPPrice = 1
|
|
Else
|
|
If SelectDrink = "12-05-02-0034" Then
|
|
Var PriceDiff = PriceDrink - PromotionPriceDrink
|
|
Var Seeker.VendingCode = "FIX1"
|
|
Var Seeker.IntVendingCampaign = PriceDiff
|
|
Var Seeker.FreeVendingCampaign = 0
|
|
Var Seeker.CodeChannel = 1
|
|
Var Seeker.CodeNumber = "00000000"
|
|
Var Seeker.VendingCampaignRI3 = PriceDiff
|
|
Var Seeker.CampaignPPrice = 1
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
If FromEnergyDrink1BathPro = 1 Then
|
|
Var PriceDiff = PriceDrink - 1
|
|
Var Seeker.VendingCode = "FIX1"
|
|
Var Seeker.IntVendingCampaign = PriceDiff
|
|
Var Seeker.FreeVendingCampaign = 0
|
|
Var Seeker.CodeChannel = 1
|
|
Var Seeker.CodeNumber = "00000000"
|
|
Var Seeker.VendingCampaignRI3 = PriceDiff
|
|
Var Seeker.CampaignPPrice = 1
|
|
EndIf
|
|
|
|
If ChildrenFree = 1 Then
|
|
|
|
Var RemainAmountStr = "Free###size=150"
|
|
|
|
Var Seeker.VendingCode = "MKFOO"
|
|
Var Seeker.IntVendingCampaign = PriceDrink
|
|
Var Seeker.FreeVendingCampaign = 1
|
|
Var Seeker.CodeChannel = 1
|
|
Var Seeker.CodeNumber = IDNum
|
|
|
|
DEBUGVAR IDNum
|
|
|
|
Var Seeker.TNumberTaobinMember = TelNumPromotion
|
|
|
|
;If Seeker = "curr" Then
|
|
;
|
|
; MakeDrinkV1 SelectDrink SelectSugarID
|
|
; Var TxRef1 = ""
|
|
; CreateTxRef1 TxRef1
|
|
;Else
|
|
; Var TxRef1 = ""
|
|
; CreateTxRef1 TxRef1
|
|
;
|
|
; Var DrinkPaid = SelectDrink
|
|
; Var PaidPaymentFromNextStage = 1
|
|
;
|
|
;EndIf
|
|
;Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
|
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
|
|
|
|
|
|
|
EndIf
|
|
|
|
; fruit_raya
|
|
If FromFruityRaya = 1 Then
|
|
Var Seeker.VendingCode = "RAYA"
|
|
Var Seeker.FreeVendingCampaign = 0
|
|
EndIf
|
|
|
|
; mys pro thai tea
|
|
If FromProThaiTea = 1 Then
|
|
Var Seeker.VendingCode = "TT1F1"
|
|
Var Seeker.FreeVendingCampaign = 0
|
|
EndIf
|
|
|
|
; mys pro yuzu
|
|
If FromProYuzu = 1 Then
|
|
Var Seeker.VendingCode = "YZ1F1"
|
|
Var Seeker.FreeVendingCampaign = 0
|
|
EndIf
|
|
|
|
; mys mode pay later
|
|
If EnablePayLaterMode = 1 Then
|
|
Var PriceDiff = PriceDrink
|
|
|
|
Var Seeker.VendingCode = "PL"
|
|
Var Seeker.IntVendingCampaign = PriceDiff
|
|
|
|
EndIf
|
|
|
|
; Oreo free
|
|
If PromotionIDOreoBuyTwoSaveMore = 1 Then
|
|
Var PromotionIDOreoBuyTwoSaveMore = 0
|
|
Var PromotionIDCurrentOrder = 2
|
|
EndIf
|
|
|
|
If PromotionIDCurrentOrder = 2 Then
|
|
SAVELOG "Promotion: Oreo Get 1 Free 1"
|
|
EndIf
|
|
|
|
If FromCoffeeDrink1BathPro = 1 Then
|
|
SAVELOG "From Coffee Drink 1 Bath pro"
|
|
Var PromotionIDCurrentOrder = 3
|
|
EndIf
|
|
|
|
DEBUGVAR PromotionIDCurrentOrder
|
|
|
|
Var CoundDownStillOnPage = 240
|
|
|
|
__CMD "CLEAR_TIME_BLINK_DISPLAY" 0 "-" "-"
|
|
|
|
;new payment coffee-payment
|
|
If New_Payment = 1 Then
|
|
SAVELOG "NEW-PAYMENT NEW-PAYMENT NEW-PAYMENT NEW-PAYMENT NEW-PAYMENT NEW-PAYMENT "
|
|
Var Seeker.ORDER_ID = ""
|
|
GenHashWithTimeStamp Seeker.ORDER_ID
|
|
EndIf
|
|
|
|
</EventOpen>
|
|
<Timeout> 900 </Timeout>
|
|
<EventTimeout>
|
|
|
|
If stop_now = "true" Then
|
|
SAVELOG "stop_now is true page_payment"
|
|
;include="ROOT/taobin_project/inc/return_condition.ev"
|
|
EndIf
|
|
|
|
If SELLSTATUS = "DEACTIVE" Then
|
|
SAVELOG "DEACTIVE in page_payment.xml"
|
|
;include="ROOT/taobin_project/inc/return_condition.ev"
|
|
EndIf
|
|
|
|
If SELLSTATUS = "DEACTIVE" Then
|
|
SAVELOG "DEACTIVE in page_payment.xml"
|
|
;include="ROOT/taobin_project/inc/return_condition.ev"
|
|
EndIf
|
|
|
|
If Seeker = "curr" Then
|
|
If web_ready = "false" Then
|
|
If Delay = 0 Then
|
|
If MachineStage = "remove-cup" Then
|
|
SAVELOG "MachineStage = remove-cup"
|
|
If HaveCup = "true" Then
|
|
Open "ROOT/taobin_project/xml/page_back_to_remove_cup.xml"
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
If CupChecking = "true" Then
|
|
If HaveCup = "true" Then
|
|
SAVELOG "Have cup"
|
|
Open "ROOT/taobin_project/xml/page_back_to_remove_cup.xml"
|
|
EndIf
|
|
EndIf
|
|
|
|
If DoorCupPosition = "bottom" Then
|
|
|
|
Else
|
|
SAVELOG "DoorCupPosition not bottom"
|
|
Open "ROOT/taobin_project/xml/page_back_to_remove_cup.xml"
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
Else
|
|
|
|
EndIf
|
|
|
|
|
|
If ReadyForBrew = "false" Then
|
|
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
|
|
Var ReadyForBrew = "false"
|
|
EndIf
|
|
|
|
If Seeker = "curr" Then
|
|
If MachineStage = "remove-cup" Then
|
|
SAVELOG "MachineStage = remove-cup 2"
|
|
Open "ROOT/taobin_project/xml/page_back_to_remove_cup.xml"
|
|
|
|
EndIf
|
|
EndIf
|
|
|
|
;If CupChecking = "false" Then
|
|
; Var CountStepPackPayment = CountStepPackPayment + 1
|
|
;EndIf
|
|
|
|
DEBUGVAR Seeker
|
|
DEBUGVAR HaveCup
|
|
;DEBUGVAR CupChecking
|
|
;DEBUGVAR CountStepPackPayment
|
|
;DEBUGVAR CountStepForCupFlagDelay
|
|
|
|
DEBUGVAR ToppingDetailCurr
|
|
DEBUGVAR ToppingDetailNext
|
|
|
|
|
|
If CountStepPackPayment = CountStepForCupFlagDelay Then
|
|
If Seeker = "curr" Then
|
|
Var Seeker.ExtendData = ExtendDataCurr
|
|
Var Seeker.PayDetail2 = ToppingDetailCurr
|
|
Else
|
|
Var Seeker.ExtendData = ExtendDataNext
|
|
Var Seeker.PayDetail2 = ToppingDetailNext
|
|
EndIf
|
|
DEBUGVAR Seeker
|
|
DEBUGVAR Seeker.ExtendData
|
|
|
|
If GetPayInfoFlag = 0 Then
|
|
SaveLog "RoadShow test"
|
|
If RoadShow = "false" Then
|
|
;CoinVending ON
|
|
|
|
|
|
If AdultFlag = 1 Then
|
|
Var CoinAmount = 0
|
|
Else
|
|
If NOCashFlag = 0 Then
|
|
SAVELOG "CoinVending XBILL from page_payment"
|
|
CoinVending XBILL
|
|
Else
|
|
Var CoinAmount = 0
|
|
EndIf
|
|
EndIf
|
|
;Var CoinAmount = 0
|
|
Var Delay = 1
|
|
Else
|
|
Var Delay = 1
|
|
EndIf
|
|
|
|
|
|
Var RemainAmount = 0
|
|
|
|
|
|
|
|
Var SessionID2 = SelectSlot + ":"
|
|
Var SessionID2 = SessionID2 + Seeker.ExtendData
|
|
|
|
EndIf
|
|
|
|
; Reset
|
|
Var MachineState_Result = 0
|
|
|
|
DEBUGVAR Seeker
|
|
DEBUGVAR Seeker.ExtendData
|
|
|
|
Var CountStepPackPayment = 1
|
|
EndIf
|
|
|
|
If Delay = 1 Then
|
|
Var DelayCount = DelayCount + 1
|
|
|
|
If DelayCount >= 2 Then
|
|
If web_readyOK = "true" Then
|
|
|
|
Var Seeker.OrderChanel = "WebApp"
|
|
|
|
Var Seeker.selected_a_drink = SelectDrink
|
|
Var Seeker.ServiceAmount2 = PriceDrink
|
|
Var PayAmount = PriceDrink
|
|
|
|
If web_payment = "CODE" Then
|
|
Open "ROOT/taobin_project/xml/page_payment_code.xml"
|
|
EndIf
|
|
|
|
If web_payment = "CREDIT" Then
|
|
Open "ROOT/taobin_project/xml/page_payment_credit.xml"
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
|
|
If Only18 = "true" Then
|
|
Var AdultFlag = 0
|
|
EndIf
|
|
|
|
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
|
|
TimerReset
|
|
Refresh
|
|
</EventTimeout>
|
|
|
|
|
|
<Video>
|
|
<X> 0 </X>
|
|
<Y> 0 </Y>
|
|
<Width> 1080</Width>
|
|
<Height> 380 </Height>
|
|
<Loop> "true" </Loop>
|
|
<Filename> video_menu_0 </Filename>
|
|
</Video>
|
|
|
|
|
|
|
|
<Image>
|
|
<State> StageShowAlias</State>
|
|
<X> 375 </X>
|
|
<Y> 623 </Y>
|
|
<Width> 331 </Width>
|
|
<Height> 435 </Height>
|
|
<Filename> PictureDrink </Filename>
|
|
</Image>
|
|
|
|
<Text>
|
|
<State> StageShowAlias</State>
|
|
<X> 0 </X>
|
|
<Y> 938 </Y>
|
|
<Width> 1080</Width>
|
|
<Align> Center </Align>
|
|
<Size> 66 </Size>
|
|
<Font> KanitMediumTTF </Font>
|
|
<Color> 0x513C2F </Color>
|
|
<Value> showname </Value>
|
|
</Text>
|
|
|
|
<Text>
|
|
<State> StageShowAlias</State>
|
|
<X> 0 </X>
|
|
<Y> 1022 </Y>
|
|
<Width> 1080</Width>
|
|
<Align> Center </Align>
|
|
<Size> 24 </Size>
|
|
<Font> KanitLightTTF </Font>
|
|
<Color> 0x6F5F51 </Color>
|
|
<Value> showdesc </Value>
|
|
</Text>
|
|
|
|
<GIF>
|
|
<X> 493 </X>
|
|
<Y> 968 </Y>
|
|
<State>StageShowLoading</State>
|
|
<Width> 94 </Width>
|
|
<Height> 94 </Height>
|
|
<Filename> Var( DirImage + "/loading.gif" )</Filename>
|
|
</GIF>
|
|
|
|
<Image>
|
|
<State>StageShowLoading</State>
|
|
<X> 267 </X>
|
|
<Y> 1065 </Y>
|
|
<Filename> Var( DirImage + "/loadingText.png" )</Filename>
|
|
</Image>
|
|
|
|
<Text>
|
|
<X> 0 </X>
|
|
<Y> 1041 </Y>
|
|
<Size> 144 </Size>
|
|
<Align> Center </Align>
|
|
<Width> 1080 </Width>
|
|
<Font> KanitRegularTTF </Font>
|
|
<State> "Enable" </State>
|
|
<Color> 0xDE794E </Color>
|
|
<Value> RemainAmountStr </Value>
|
|
</Text>
|
|
|
|
|
|
</Popup>
|