"Enable" 1080 1920 "0xeae6e1" "ROOT/sounds/Code8digit.m4a" SoundVolume ; On open Var Timeout = 0 Var GetPayInfoFlag = 0 Var CodeChannel = 0 ;Var VendingQRCode = "ERROR" VendingQR ON Var QRCODE99 = "" CoinVending OFF Var ShowTextNumber = "Enable" Var ShowErrorText = "Invisible" 1000 ;Open "ROOT/xml/page_board.xml" Var Timeout = Timeout + 1 If Timeout > 30 Then VendingQR OFF Open menu_back_to_main EndIf TimerReset Refresh If CodeChannel = 1 Then SPLIT ECommerce "/" 5 VendingCode SPLIT ECommerce "/" 7 VendingCampaignRI3 SPLIT ECommerce "/" 8 VendingCampaign1 Var IntVendingCampaign = VendingCampaignRI3 INT IntVendingCampaign Var VendingREFID = SessionID If IntVendingCampaign > 0 Then Var QRChannel = 0 If IntVendingCampaign >= PayAmount Then Open "ROOT/taobin_project/xml/page_payment_cash.xml" EndIf Var SessionID2 = SelectSlot + ":" Var SessionID2 = SessionID2 + ExtendData Var CreditAmount1 = "" Var ServiceAmountFlow = "" Var TelephoneNumber = "0899999999" Var ServiceType = "coffee" Var ECommerce = "" Var ECommerce = ECommerce + PriceDrink Var ECommerce = ECommerce + "/" Var ECommerce = ECommerce + DiscountDrink Var ECommerce = ECommerce + "/" Var ECommerce = ECommerce + SessionID2 Var ECommerce = ECommerce + "/" Var ECommerce = ECommerce + SelectDrink Var ECommerce = ECommerce + "/" Var ECommerce = ECommerce + "KBA/" Var ECommerce = ECommerce + VendingCode Var ECommerce = ECommerce + ":" Var ECommerce = ECommerce + CodeNumber Var ECommerce = ECommerce + ":" Var ECommerce = ECommerce + VendingCampaignRI3 Var ServiceParameter = "max" Var ServiceCharge = 0 Var AccountType = "new" Var testservice = "kbank" Var tc = "" Var GetScore = "" Var OperatorName = "" Var SessionID = "" GetPayInfo TelephoneNumber ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc Var Timeout = 0 Var CodeChannel = 2 Else If VendingCode = "C13" Then ;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif" MakeDrinkV1 SelectDrink SelectSugarID Open "ROOT/taobin_project/xml/page_thankyou.xml" EndIf If VendingCode = "C24" Then ;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif" MakeDrinkV1 SelectDrink SelectSugarID Open "ROOT/taobin_project/xml/page_thankyou.xml" EndIf If VendingCode = "C25" Then ;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif" MakeDrinkV1 SelectDrink SelectSugarID Open "ROOT/taobin_project/xml/page_thankyou.xml" EndIf If VendingCode = "C30" Then ;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif" MakeDrinkV1 SelectDrink SelectSugarID Open "ROOT/taobin_project/xml/page_thankyou.xml" EndIf Var ShowErrorText = "Enable" EndIf Else Var CreditAmount = 0 Var QRCODE99 = SessionID Var QRCODE99 = QRCODE99 + Ext1a Var QRCODE99 = QRCODE99 + Ext21 Var QRCODETMP = QRCODE99 Var CodeChannel = 1 Open "ROOT/taobin_project/xml/page_payment_cash.xml" EndIf If CodeChannel = 1 Then Var TelephoneNumber = "" Var ShowErrorText = "Enable" Refresh EndIf If CodeChannel = 2 Then Var CodeChannel = 1 Var QRCODE99 = "" Var QRCODETMP = "" Open "ROOT/taobin_project/xml/page_payment_cash.xml" EndIf 333 1086 "ROOT/taobin_project/image/collectiing/bn_1.png" "ROOT/taobin_project/image/collectiing/bp_1.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var TelephoneNumber = TelephoneNumber + "1" Var ShowTextNumber = "Invisible" Trim TelephoneNumber 8 TimerReset Refresh StrLen TelephoneNumber TelNumLen If TelNumLen >= 8 Then Var Tel_Confirm_State = "Enable" EndIf 477 1086 "ROOT/taobin_project/image/collectiing/bn_2.png" "ROOT/taobin_project/image/collectiing/bp_2.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var TelephoneNumber = TelephoneNumber + "2" Var ShowTextNumber = "Invisible" Trim TelephoneNumber 8 TimerReset Refresh StrLen TelephoneNumber TelNumLen If TelNumLen >= 8 Then Var Tel_Confirm_State = "Enable" EndIf 620 1086 "ROOT/taobin_project/image/collectiing/bn_3.png" "ROOT/taobin_project/image/collectiing/bp_3.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var TelephoneNumber = TelephoneNumber + "3" Var ShowTextNumber = "Invisible" Trim TelephoneNumber 8 TimerReset Refresh StrLen TelephoneNumber TelNumLen If TelNumLen >= 8 Then Var Tel_Confirm_State = "Enable" EndIf 333 1230 "ROOT/taobin_project/image/collectiing/bn_4.png" "ROOT/taobin_project/image/collectiing/bp_4.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var TelephoneNumber = TelephoneNumber + "4" Var ShowTextNumber = "Invisible" Trim TelephoneNumber 8 TimerReset Refresh StrLen TelephoneNumber TelNumLen If TelNumLen >= 8 Then Var Tel_Confirm_State = "Enable" EndIf 477 1230 "ROOT/taobin_project/image/collectiing/bn_5.png" "ROOT/taobin_project/image/collectiing/bp_5.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var TelephoneNumber = TelephoneNumber + "5" Var ShowTextNumber = "Invisible" Trim TelephoneNumber 8 TimerReset Refresh StrLen TelephoneNumber TelNumLen If TelNumLen >= 8 Then Var Tel_Confirm_State = "Enable" EndIf 620 1230 "ROOT/taobin_project/image/collectiing/bn_6.png" "ROOT/taobin_project/image/collectiing/bp_6.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var TelephoneNumber = TelephoneNumber + "6" Var ShowTextNumber = "Invisible" Trim TelephoneNumber 8 TimerReset Refresh StrLen TelephoneNumber TelNumLen If TelNumLen >= 8 Then Var Tel_Confirm_State = "Enable" EndIf 333 1373 "ROOT/taobin_project/image/collectiing/bn_7.png" "ROOT/taobin_project/image/collectiing/bp_7.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var TelephoneNumber = TelephoneNumber + "7" Var ShowTextNumber = "Invisible" Trim TelephoneNumber 8 TimerReset Refresh StrLen TelephoneNumber TelNumLen If TelNumLen >= 8 Then Var Tel_Confirm_State = "Enable" EndIf 477 1373 "ROOT/taobin_project/image/collectiing/bn_8.png" "ROOT/taobin_project/image/collectiing/bp_8.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var TelephoneNumber = TelephoneNumber + "8" Var ShowTextNumber = "Invisible" Trim TelephoneNumber 8 TimerReset Refresh StrLen TelephoneNumber TelNumLen If TelNumLen >= 8 Then Var Tel_Confirm_State = "Enable" EndIf 620 1373 "ROOT/taobin_project/image/collectiing/bn_9.png" "ROOT/taobin_project/image/collectiing/bp_9.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var TelephoneNumber = TelephoneNumber + "9" Var ShowTextNumber = "Invisible" Trim TelephoneNumber 8 TimerReset Refresh StrLen TelephoneNumber TelNumLen If TelNumLen >= 8 Then Var Tel_Confirm_State = "Enable" EndIf 477 1517 "ROOT/taobin_project/image/collectiing/bn_0.png" "ROOT/taobin_project/image/collectiing/bp_0.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var TelephoneNumber = TelephoneNumber + "0" Trim TelephoneNumber 8 StrLen TelephoneNumber TelNumLen If TelNumLen >= 8 Then Var Tel_Confirm_State = "Enable" EndIf Var ShowTextNumber = "Invisible" TimerReset Refresh 620 1517 "ROOT/taobin_project/image/collectiing/bn_back-1.png" "ROOT/taobin_project/image/collectiing/bp_back-1.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Trim TelephoneNumber -1 Var Tel_Confirm_State = "Disable" StrLen TelephoneNumber TelNumLen If TelNumLen = 0 Then Var ShowTextNumber = "Enable" EndIf ;Var ShowErrorText = "Invisible" TimerReset Refresh 44 1783 "ROOT/taobin_project/image/enter_point/bn_cancel.png" "ROOT/taobin_project/image/enter_point/bp_cancel.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var PayState1 = "PressForever" Var PayState2 = "Enable" Var QRChannel = 0 Var CodeChannel = 0 Open "ROOT/taobin_project/xml/page_payment_cash.xml" 751 1783 Tel_Confirm_State "ROOT/taobin_project/image/enter_point/bn_confirm.png" "ROOT/taobin_project/image/enter_point/bp_confirm.png" "ROOT/taobin_project/image/enter_point/bn_confirm.png" "ROOT/sounds/codebuttom.wav" SoundVolume If RoadShow = "true" Then If TelephoneNumber = "00000000" Then Var ShowErrorText = "Enable" EndIf Else If TelephoneNumber = "00000000" Then Var ShowErrorText = "Enable" EndIf If TelephoneNumber = "99999999" Then Var ShowErrorText = "Enable" EndIf If GetPayInfoFlag = 0 Then VendingQR OFF Var CodeNumber = TelephoneNumber Var RemainAmount = 0 PrepareDrink SelectDrink SelectSugarID Var SessionID2 = SelectSlot + ":" Var SessionID2 = SessionID2 + sugarID Var SessionID2 = SessionID2 + "000" Var CreditAmount1 = "" Var ServiceAmountFlow = "" Var TelephoneNumber = "0899999999" Var ServiceType = "coffee" Var ECommerce = "" Var ECommerce = ECommerce + PriceDrink Var ECommerce = ECommerce + "/" Var ECommerce = ECommerce + DiscountDrink Var ECommerce = ECommerce + "/" Var ECommerce = ECommerce + SessionID2 Var ECommerce = ECommerce + "/" Var ECommerce = ECommerce + SelectDrink Var ECommerce = ECommerce + "/" Var ECommerce = ECommerce + "C00" Var ECommerce = ECommerce + "/" Var ECommerce = ECommerce + CodeNumber Var ServiceParameter = "max" Var ServiceCharge = 0 Var AccountType = "new" Var testservice = "kbank" Var tc = "" Var GetScore = "" Var OperatorName = "" Var SessionID = "" GetPayInfo TelephoneNumber ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc Var Timeout = 0 Var GetPayInfoFlag = 1 Var TelephoneNumber = CodeNumber Var CodeChannel = 1 EndIf EndIf SAVELOG ShowTextNumber Refresh 217 833 "ROOT/taobin_project/image/collectiing/img3.png" 378 874 ShowTextNumber "ROOT/taobin_project/image/enter_point/text3.png" 0 873 1080 Center 62 RobotoBlack 0x513C2F TelephoneNumber 240 606 "ROOT/taobin_project/image/enter_point/text2.png" 330 993 ShowErrorText "ROOT/taobin_project/image/collectiing/text_show_error.png" 0 0 "ROOT/taobin_project/image/ad_medium_2.png" Open "/media/bt/xml/security_alarm.xml"