1152 lines
30 KiB
XML
1152 lines
30 KiB
XML
<Popup>
|
|
|
|
<Cache> "Enable" </Cache>
|
|
<Width> 1080 </Width>
|
|
<Height> 1920 </Height>
|
|
<Background> "0xeae6e1" </Background>
|
|
<Sound> PlaySoundCodeLang </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<Refresh> "Partial" </Refresh>
|
|
<EventOpen>
|
|
; On open
|
|
Var ECommerce = ""
|
|
Var CodeActionOK = 0
|
|
Var Seeker.FreeVendingCampaign = 0
|
|
|
|
Var Timeout = 0
|
|
|
|
Var GetPayInfoFlag = 0
|
|
Var Seeker.CodeChannel = 0
|
|
Var Seeker.CollectPointMain = 0
|
|
Var Seeker.CollectPointPromotion = 0
|
|
|
|
;Var VendingQRCode = "ERROR"
|
|
;VendingQR ON
|
|
;Var QRCODE99 = ""
|
|
|
|
;CoinVending OFF
|
|
VendingQR OFF
|
|
|
|
Var ShowLoadingText = "Invisible"
|
|
Var ShowTextNumber = "Enable"
|
|
Var ShowErrorText = "Invisible"
|
|
Var Tel_Confirm_State = "Invisible"
|
|
Var ErrorCause = ""
|
|
|
|
|
|
If show_eng = "true" Then
|
|
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
|
Else
|
|
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
|
EndIf
|
|
|
|
;inter-image
|
|
If LanguageShow = "MYANMAR" Then
|
|
Var DirImage = "ROOT/taobin_project/image/collectiing_mmr/"
|
|
EndIf
|
|
|
|
If CountryName = "HongKong" Then
|
|
If LanguageShow = "MSC" Then
|
|
Var DirImage = "ROOT/taobin_project/inter/hkg/image/collectiing_msc/"
|
|
EndIf
|
|
If LanguageShow = "MTC" Then
|
|
Var DirImage = "ROOT/taobin_project/inter/hkg/image/collectiing_mtc/"
|
|
EndIf
|
|
Else
|
|
If LanguageShow = "MSC" Then
|
|
Var DirImage = "ROOT/taobin_project/image/collectiing_msc/"
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
If web_readyOK = "true" Then
|
|
Var web_readyOK = "false"
|
|
|
|
If web_code = "" Then
|
|
Else
|
|
Var ShowTextNumber = "Invisible"
|
|
Var Tel_Confirm_State = "Enable"
|
|
|
|
Var GetPayInfoFlag = 1
|
|
|
|
VendingQR OFF
|
|
|
|
Var TelephoneNumber = web_code
|
|
|
|
Var Seeker.CodeNumber = TelephoneNumber
|
|
Var RemainAmount = 0
|
|
;PrepareDrink SelectDrink SelectSugarID
|
|
|
|
Var SessionID2 = SelectSlot + ":"
|
|
Var SessionID2 = SessionID2 + Seeker.ExtendData
|
|
|
|
Var CreditAmount1 = ""
|
|
Var ServiceAmountFlow = ""
|
|
Var TelephoneNumber2 = "0899999999"
|
|
Var ServiceType = "coffee"
|
|
Var ECommerce = ""
|
|
Var ECommerce = ECommerce + PriceDrink
|
|
|
|
Var ECommerce = ECommerce + ":"
|
|
Var ECommerce = ECommerce + TOPPING_PRICE
|
|
|
|
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 + Seeker.CodeNumber
|
|
Var ServiceParameter = "max"
|
|
Var ServiceCharge = 0
|
|
Var AccountType = "new"
|
|
Var testservice = "kbank"
|
|
Var tc = ""
|
|
Var GetScore = ""
|
|
Var OperatorName = ""
|
|
Var SessionID = ""
|
|
|
|
|
|
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
|
Var Timeout = 0
|
|
|
|
Var TelephoneNumber = Seeker.CodeNumber
|
|
Var Seeker.CodeChannel = 1
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
Var Mode# = 0
|
|
Var Str# = ""
|
|
Var TelephoneNumber# = ""
|
|
|
|
</EventOpen>
|
|
<Timeout> 1000 </Timeout>
|
|
<EventTimeout>
|
|
;Open "ROOT/xml/page_board.xml"
|
|
|
|
|
|
|
|
Var Timeout = Timeout + 1
|
|
If Timeout > 30 Then
|
|
|
|
If GetPayInfoFlag = 0 Then
|
|
;VendingQR OFF
|
|
;Open menu_back_to_main
|
|
|
|
Var ShowLoadingText = "Invisible"
|
|
Var QRChannel = 0
|
|
Var Seeker.CodeChannel = 0
|
|
If CART_COUNT >= 1 Then
|
|
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
|
Else
|
|
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
|
EndIf
|
|
|
|
Else
|
|
|
|
Var ShowLoadingText = "Invisible"
|
|
Var text_show_error = DirImage + "/text_show_error2.png"
|
|
Var GetPayInfoFlag = 0
|
|
Var Seeker.CodeChannel = 0
|
|
Var Timeout = 0
|
|
|
|
EndIf
|
|
|
|
|
|
Refresh
|
|
EndIf
|
|
|
|
If Seeker.CodeChannel = 1 Then
|
|
If CodeActionOK = 1 Then
|
|
|
|
DEBUGVAR CodeActionOK
|
|
DEBUGVAR ECommerce
|
|
|
|
If ECommerce = "" Then
|
|
|
|
Else
|
|
Var ShowLoadingText = "Invisible"
|
|
|
|
SPLIT ECommerce "/" 5 Seeker.VendingCode
|
|
SPLIT ECommerce "/" 7 Seeker.VendingCampaignRI3
|
|
SPLIT ECommerce "/" 8 VendingCampaign1
|
|
SPLIT ECommerce "/" 9 ShouldCollectPoint
|
|
SPLIT ECommerce "/" 10 PaymentButtonControl
|
|
|
|
DEBUGVAR PaymentButtonControl
|
|
|
|
If PaymentButtonControl = "" Then
|
|
Var PaymentEnableAll = "true"
|
|
Else
|
|
If PaymentButtonControl = "*" Then
|
|
Var PaymentEnableAll = "true"
|
|
Else
|
|
Var PaymentEnableAll = "false"
|
|
STRCONTAIN "TWN" PaymentButtonControl TWN_CashOtherEnable
|
|
STRCONTAIN "KBA" PaymentButtonControl KBA_CashOtherEnable
|
|
STRCONTAIN "LPY" PaymentButtonControl LPY_CashOtherEnable
|
|
STRCONTAIN "AIR" PaymentButtonControl AIR_CashOtherEnable
|
|
STRCONTAIN "MAX" PaymentButtonControl MAX_CashOtherEnable
|
|
STRCONTAIN "WEC" PaymentButtonControl WEC_CashOtherEnable
|
|
STRCONTAIN "ALP" PaymentButtonControl ALP_CashOtherEnable
|
|
STRCONTAIN "UNP" PaymentButtonControl UNP_CashOtherEnable
|
|
STRCONTAIN "ACU" PaymentButtonControl ACU_CashOtherEnable
|
|
STRCONTAIN "TAO" PaymentButtonControl TAO_CreditEnable
|
|
STRCONTAIN "CSH" PaymentButtonControl CSH_CashEnable
|
|
STRCONTAIN "CRD" PaymentButtonControl CRD_CreditCardEnable
|
|
|
|
If CSH_CashEnable = "true" Then
|
|
|
|
Else
|
|
CoinVending OFF
|
|
Var CPD_CouponCodeEnable = "true"
|
|
EndIf
|
|
|
|
If TWN_CashOtherEnable = "true" Then
|
|
Var E_WalletEnable = "true"
|
|
EndIf
|
|
|
|
If KBA_CashOtherEnable = "true" Then
|
|
Var E_WalletEnable = "true"
|
|
EndIf
|
|
|
|
If LPY_CashOtherEnable = "true" Then
|
|
Var E_WalletEnable = "true"
|
|
EndIf
|
|
|
|
If AIR_CashOtherEnable = "true" Then
|
|
Var E_WalletEnable = "true"
|
|
EndIf
|
|
|
|
If MAX_CashOtherEnable = "true" Then
|
|
Var E_WalletEnable = "true"
|
|
EndIf
|
|
|
|
If WEC_CashOtherEnable = "true" Then
|
|
Var E_WalletEnable = "true"
|
|
EndIf
|
|
|
|
If ALP_CashOtherEnable = "true" Then
|
|
Var E_WalletEnable = "true"
|
|
EndIf
|
|
|
|
If UNP_CashOtherEnable = "true" Then
|
|
Var E_WalletEnable = "true"
|
|
EndIf
|
|
|
|
If ACU_CashOtherEnable = "true" Then
|
|
Var E_WalletEnable = "true"
|
|
EndIf
|
|
|
|
|
|
DEBUGVAR CSH_CashEnable
|
|
DEBUGVAR TAO_CreditEnable
|
|
DEBUGVAR CPD_CouponCodeEnable
|
|
DEBUGVAR CRD_CreditCardEnable
|
|
DEBUGVAR E_WalletEnable
|
|
DEBUGVAR TWN_CashOtherEnable
|
|
DEBUGVAR KBA_CashOtherEnable
|
|
DEBUGVAR LPY_CashOtherEnable
|
|
DEBUGVAR AIR_CashOtherEnable
|
|
DEBUGVAR MAX_CashOtherEnable
|
|
DEBUGVAR WEC_CashOtherEnable
|
|
DEBUGVAR ALP_CashOtherEnable
|
|
DEBUGVAR UNP_CashOtherEnable
|
|
DEBUGVAR ACU_CashOtherEnable
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
If Seeker.VendingCode = "" Then
|
|
Var Seeker.VendingCode = "C00"
|
|
EndIf
|
|
|
|
If Seeker.VendingCode = "KBA:2" Then
|
|
Var Seeker.VendingCode = "C00"
|
|
EndIf
|
|
|
|
If Seeker.VendingCode = "AIR:2" Then
|
|
Var Seeker.VendingCode = "C00"
|
|
EndIf
|
|
|
|
If Seeker.VendingCode = "TWN:2" Then
|
|
Var Seeker.VendingCode = "C00"
|
|
EndIf
|
|
|
|
SAVELOG Seeker.VendingCode
|
|
SAVELOG Seeker.VendingCampaignRI3
|
|
|
|
SAVELOG ShouldCollectPoint
|
|
INT ShouldCollectPoint
|
|
|
|
If Seeker.VendingCode = "C00" Then
|
|
|
|
Else
|
|
Var VendingCreditRemain = ""
|
|
|
|
If VendingCampaign1 = "" Then
|
|
Var IntVendingCampaign1 = -1
|
|
Else
|
|
Var IntVendingCampaign1 = VendingCampaign1
|
|
INT IntVendingCampaign1
|
|
|
|
If IntVendingCampaign1 > 0 Then
|
|
Var VendingCreditRemain = VendingCampaign1
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
|
|
|
|
Var Seeker.IntVendingCampaign = Seeker.VendingCampaignRI3
|
|
INT Seeker.IntVendingCampaign
|
|
|
|
Var VendingREFID = SessionID
|
|
|
|
|
|
DEBUGVAR IntVendingCampaign1
|
|
DEBUGVAR PayAmount
|
|
DEBUGVAR Seeker.IntVendingCampaign
|
|
|
|
If Seeker.IntVendingCampaign > 0 Then
|
|
Var QRChannel = 0
|
|
|
|
If Seeker.IntVendingCampaign >= PayAmount Then
|
|
|
|
If ShouldCollectPoint = 1 Then
|
|
Var Seeker.CollectPointMain = 1
|
|
|
|
If PaymentCodeShouldCollectPromotionPoint = 1 Then
|
|
Var Seeker.CollectPointPromotion = 1
|
|
EndIf
|
|
EndIf
|
|
|
|
TRY "ROOT/taobin_project/xml/event/collect_promotion_point_condition.ev"
|
|
|
|
|
|
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
|
Var Seeker.VendingCampaign = PayAmount
|
|
Var Seeker.FreeVendingCampaign = 1
|
|
CoinVending OFF
|
|
;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
|
|
If CART_COUNT >= 1 Then
|
|
|
|
Cart "PreparID" 1
|
|
Var CART_INDEX = 1
|
|
Var PayReference = ""
|
|
GenHashWithTimeStamp PayReference
|
|
Cart "MakeID" CART_INDEX
|
|
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
|
Else
|
|
Var CART_INDEX = 0
|
|
|
|
;include="ROOT/taobin_project/xml/sometime/make_drink.xml"
|
|
EndIf
|
|
Else
|
|
If ShouldCollectPoint = 1 Then
|
|
Var Seeker.CollectPointMain = 1
|
|
EndIf
|
|
|
|
If PaymentCodeShouldCollectPromotionPoint = 1 Then
|
|
Var Seeker.CollectPointPromotion = 1
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
|
|
|
|
|
|
;Var SessionID2 = SelectSlot + ":"
|
|
;Var SessionID2 = SessionID2 + Seeker.ExtendData
|
|
|
|
;Var CreditAmount1 = ""
|
|
;Var ServiceAmountFlow = ""
|
|
;Var TelephoneNumber2 = "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:2/"
|
|
;Var ECommerce = ECommerce + Seeker.VendingCode
|
|
;Var ECommerce = ECommerce + ":"
|
|
;Var ECommerce = ECommerce + Seeker.CodeNumber
|
|
;Var ECommerce = ECommerce + ":"
|
|
;Var ECommerce = ECommerce + Seeker.VendingCampaignRI3
|
|
;Var ServiceParameter = "max"
|
|
;Var ServiceCharge = 0
|
|
;Var AccountType = "new"
|
|
;Var testservice = "kbank"
|
|
;Var tc = ""
|
|
;Var GetScore = ""
|
|
;Var OperatorName = ""
|
|
;Var SessionID = ""
|
|
|
|
|
|
;GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
|
;Var Timeout = 0
|
|
;Var Seeker.CodeChannel = 2
|
|
|
|
Var Seeker.CodeChannel = 1
|
|
|
|
If CART_COUNT >= 1 Then
|
|
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
|
Else
|
|
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
|
EndIf
|
|
Else
|
|
|
|
Var ShowErrorText = "Enable"
|
|
Var text_show_error = DirImage + "/text_show_error.png"
|
|
Var GetPayInfoFlag = 0
|
|
Var Seeker.CodeChannel = 0
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
TimerReset
|
|
</EventTimeout>
|
|
|
|
<EventIDCard>
|
|
|
|
|
|
If IDCardStatus = "OK" Then
|
|
If IDCardReady = "OK" Then
|
|
If IDCardData = "START" Then
|
|
CoinVending OFF
|
|
Open "ROOT/taobin_project/xml/page_show_consent2.xml"
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
|
|
|
|
|
|
|
|
</EventIDCard>
|
|
|
|
<EventCoin>
|
|
|
|
If ViewBill > 0 Then
|
|
CoinVending BILLREJECT
|
|
EndIf
|
|
|
|
</EventCoin>
|
|
|
|
|
|
<EventActionOk>
|
|
|
|
If Seeker.CodeChannel = 1 Then
|
|
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
|
Var CodeActionOK = 1
|
|
EndIf
|
|
|
|
|
|
</EventActionOk>
|
|
|
|
<EventActionError>
|
|
If Seeker.CodeChannel = 1 Then
|
|
|
|
Var ShowLoadingText = "Invisible"
|
|
|
|
Var TelephoneNumber = ""
|
|
|
|
Var ShowErrorText = "Enable"
|
|
|
|
SAVELOG ShowErrorText
|
|
|
|
Var text_show_error = DirImage + "/text_show_error2.png"
|
|
|
|
If ErrorCause = "failed_fromoper_0002" Then
|
|
Var text_show_error = DirImage + "/text_show_error.png"
|
|
EndIf
|
|
|
|
If ErrorCause = "failed_fromoper_0005" Then
|
|
Var text_show_error = DirImage + "/text_show_error3.png"
|
|
EndIf
|
|
|
|
If ErrorCause = "failed_fromoper_0006" Then
|
|
Var text_show_error = DirImage + "/text_show_error4.png"
|
|
EndIf
|
|
|
|
If ErrorCause = "failed_fromoper_0007" Then
|
|
Var text_show_error = DirImage + "/text_show_error7.png"
|
|
EndIf
|
|
|
|
If ErrorCause = "failed_fromoper_0008" Then
|
|
Var text_show_error = DirImage + "/text_show_error8.png"
|
|
EndIf
|
|
|
|
Var GetPayInfoFlag = 0
|
|
Var Seeker.CodeChannel = 0
|
|
Var Tel_Confirm_State = "Disable"
|
|
Refresh
|
|
EndIf
|
|
|
|
If Seeker.CodeChannel = 2 Then
|
|
Var Seeker.CodeChannel = 1
|
|
Var QRCODE99 = ""
|
|
Var QRCODETMP = ""
|
|
If CART_COUNT >= 1 Then
|
|
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
|
Else
|
|
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
</EventActionError>
|
|
|
|
|
|
|
|
<Image>
|
|
<X> 0 </X>
|
|
<Y> 380 </Y>
|
|
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
|
|
</Image>
|
|
|
|
|
|
<Image>
|
|
<X> 158 </X>
|
|
<Y> 601 </Y>
|
|
<Filename> "ROOT/taobin_project/image/collectiing/img_popup1.png" </Filename>
|
|
</Image>
|
|
|
|
|
|
<Button>
|
|
<X> 263 </X>
|
|
<Y> 1004 </Y>
|
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_1.png" </Filename>
|
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
|
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
Var Timeout = 0
|
|
Var TelephoneNumber = TelephoneNumber + "1"
|
|
Var ShowTextNumber = "Invisible"
|
|
Trim TelephoneNumber 8
|
|
|
|
Var TelephoneNumber# = Str# + TelephoneNumber
|
|
|
|
TimerReset
|
|
Refresh
|
|
StrLen TelephoneNumber TelNumLen
|
|
If TelNumLen >= 8 Then
|
|
Var Tel_Confirm_State = "Enable"
|
|
EndIf
|
|
Var ShowErrorText = "Invisible"
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 405 </X>
|
|
<Y> 1004 </Y>
|
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_2.png" </Filename>
|
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
|
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
Var Timeout = 0
|
|
Var TelephoneNumber = TelephoneNumber + "2"
|
|
Var ShowTextNumber = "Invisible"
|
|
Trim TelephoneNumber 8
|
|
|
|
Var TelephoneNumber# = Str# + TelephoneNumber
|
|
|
|
TimerReset
|
|
Refresh
|
|
StrLen TelephoneNumber TelNumLen
|
|
If TelNumLen >= 8 Then
|
|
Var Tel_Confirm_State = "Enable"
|
|
EndIf
|
|
Var ShowErrorText = "Invisible"
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 547 </X>
|
|
<Y> 1004 </Y>
|
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_3.png" </Filename>
|
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
|
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
Var Timeout = 0
|
|
Var TelephoneNumber = TelephoneNumber + "3"
|
|
Var ShowTextNumber = "Invisible"
|
|
Trim TelephoneNumber 8
|
|
|
|
Var TelephoneNumber# = Str# + TelephoneNumber
|
|
|
|
TimerReset
|
|
Refresh
|
|
StrLen TelephoneNumber TelNumLen
|
|
If TelNumLen >= 8 Then
|
|
Var Tel_Confirm_State = "Enable"
|
|
EndIf
|
|
Var ShowErrorText = "Invisible"
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 691 </X>
|
|
<Y> 1004 </Y>
|
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_A.png" </Filename>
|
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_A.png" </FilenamePress>
|
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
Var Timeout = 0
|
|
Var TelephoneNumber = TelephoneNumber + "A"
|
|
Var ShowTextNumber = "Invisible"
|
|
Trim TelephoneNumber 8
|
|
|
|
Var TelephoneNumber# = Str# + TelephoneNumber
|
|
|
|
TimerReset
|
|
Refresh
|
|
StrLen TelephoneNumber TelNumLen
|
|
If TelNumLen >= 8 Then
|
|
Var Tel_Confirm_State = "Enable"
|
|
EndIf
|
|
Var ShowErrorText = "Invisible"
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 263 </X>
|
|
<Y> 1148 </Y>
|
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_4.png" </Filename>
|
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
|
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
Var Timeout = 0
|
|
Var TelephoneNumber = TelephoneNumber + "4"
|
|
Var ShowTextNumber = "Invisible"
|
|
Trim TelephoneNumber 8
|
|
|
|
Var TelephoneNumber# = Str# + TelephoneNumber
|
|
|
|
TimerReset
|
|
Refresh
|
|
StrLen TelephoneNumber TelNumLen
|
|
If TelNumLen >= 8 Then
|
|
Var Tel_Confirm_State = "Enable"
|
|
EndIf
|
|
Var ShowErrorText = "Invisible"
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 405 </X>
|
|
<Y> 1148 </Y>
|
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_5.png" </Filename>
|
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
|
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
Var Timeout = 0
|
|
Var TelephoneNumber = TelephoneNumber + "5"
|
|
Var ShowTextNumber = "Invisible"
|
|
Trim TelephoneNumber 8
|
|
|
|
Var TelephoneNumber# = Str# + TelephoneNumber
|
|
|
|
TimerReset
|
|
Refresh
|
|
StrLen TelephoneNumber TelNumLen
|
|
If TelNumLen >= 8 Then
|
|
Var Tel_Confirm_State = "Enable"
|
|
EndIf
|
|
Var ShowErrorText = "Invisible"
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 547 </X>
|
|
<Y> 1148 </Y>
|
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_6.png" </Filename>
|
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
|
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
Var Timeout = 0
|
|
Var TelephoneNumber = TelephoneNumber + "6"
|
|
Var ShowTextNumber = "Invisible"
|
|
Trim TelephoneNumber 8
|
|
|
|
Var TelephoneNumber# = Str# + TelephoneNumber
|
|
|
|
TimerReset
|
|
Refresh
|
|
StrLen TelephoneNumber TelNumLen
|
|
If TelNumLen >= 8 Then
|
|
Var Tel_Confirm_State = "Enable"
|
|
EndIf
|
|
Var ShowErrorText = "Invisible"
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 691 </X>
|
|
<Y> 1148 </Y>
|
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_B.png" </Filename>
|
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_B.png" </FilenamePress>
|
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
Var Timeout = 0
|
|
Var TelephoneNumber = TelephoneNumber + "B"
|
|
Var ShowTextNumber = "Invisible"
|
|
Trim TelephoneNumber 8
|
|
|
|
Var TelephoneNumber# = Str# + TelephoneNumber
|
|
|
|
TimerReset
|
|
Refresh
|
|
StrLen TelephoneNumber TelNumLen
|
|
If TelNumLen >= 8 Then
|
|
Var Tel_Confirm_State = "Enable"
|
|
EndIf
|
|
Var ShowErrorText = "Invisible"
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 263 </X>
|
|
<Y> 1292 </Y>
|
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_7.png" </Filename>
|
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
|
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
Var Timeout = 0
|
|
Var TelephoneNumber = TelephoneNumber + "7"
|
|
Var ShowTextNumber = "Invisible"
|
|
Trim TelephoneNumber 8
|
|
|
|
Var TelephoneNumber# = Str# + TelephoneNumber
|
|
|
|
TimerReset
|
|
Refresh
|
|
StrLen TelephoneNumber TelNumLen
|
|
If TelNumLen >= 8 Then
|
|
Var Tel_Confirm_State = "Enable"
|
|
EndIf
|
|
Var ShowErrorText = "Invisible"
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 405 </X>
|
|
<Y> 1292 </Y>
|
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_8.png" </Filename>
|
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
|
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
Var Timeout = 0
|
|
Var TelephoneNumber = TelephoneNumber + "8"
|
|
Var ShowTextNumber = "Invisible"
|
|
Trim TelephoneNumber 8
|
|
|
|
Var TelephoneNumber# = Str# + TelephoneNumber
|
|
|
|
TimerReset
|
|
Refresh
|
|
StrLen TelephoneNumber TelNumLen
|
|
If TelNumLen >= 8 Then
|
|
Var Tel_Confirm_State = "Enable"
|
|
EndIf
|
|
Var ShowErrorText = "Invisible"
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 547 </X>
|
|
<Y> 1292 </Y>
|
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_9.png" </Filename>
|
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
|
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
Var Timeout = 0
|
|
Var TelephoneNumber = TelephoneNumber + "9"
|
|
Var ShowTextNumber = "Invisible"
|
|
Trim TelephoneNumber 8
|
|
|
|
Var TelephoneNumber# = Str# + TelephoneNumber
|
|
|
|
TimerReset
|
|
Refresh
|
|
StrLen TelephoneNumber TelNumLen
|
|
If TelNumLen >= 8 Then
|
|
Var Tel_Confirm_State = "Enable"
|
|
EndIf
|
|
Var ShowErrorText = "Invisible"
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 691 </X>
|
|
<Y> 1292 </Y>
|
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_C.png" </Filename>
|
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_C.png" </FilenamePress>
|
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
Var Timeout = 0
|
|
Var TelephoneNumber = TelephoneNumber + "C"
|
|
Var ShowTextNumber = "Invisible"
|
|
Trim TelephoneNumber 8
|
|
|
|
Var TelephoneNumber# = Str# + TelephoneNumber
|
|
|
|
TimerReset
|
|
Refresh
|
|
StrLen TelephoneNumber TelNumLen
|
|
If TelNumLen >= 8 Then
|
|
Var Tel_Confirm_State = "Enable"
|
|
EndIf
|
|
Var ShowErrorText = "Invisible"
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 405 </X>
|
|
<Y> 1432 </Y>
|
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_0.png" </Filename>
|
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
|
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
Var Timeout = 0
|
|
Var TelephoneNumber = TelephoneNumber + "0"
|
|
Trim TelephoneNumber 8
|
|
|
|
Var TelephoneNumber# = Str# + TelephoneNumber
|
|
|
|
StrLen TelephoneNumber TelNumLen
|
|
If TelNumLen >= 8 Then
|
|
Var Tel_Confirm_State = "Enable"
|
|
EndIf
|
|
Var ShowTextNumber = "Invisible"
|
|
|
|
TimerReset
|
|
Refresh
|
|
Var ShowErrorText = "Invisible"
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 263 </X>
|
|
<Y> 1432 </Y>
|
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_sh.png" </Filename>
|
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_sh.png" </FilenamePress>
|
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
Var Timeout = 0
|
|
;Var TelephoneNumber = TelephoneNumber + "0"
|
|
Trim TelephoneNumber 8
|
|
StrLen TelephoneNumber TelNumLen
|
|
If TelNumLen = 0 Then
|
|
Var ShowTextNumber = "Invisible"
|
|
Var Mode# = 1
|
|
Var Str# = "#"
|
|
|
|
Var TelephoneNumber# = Str# + TelephoneNumber
|
|
EndIf
|
|
|
|
TimerReset
|
|
Refresh
|
|
Var ShowErrorText = "Invisible"
|
|
</EventClick>
|
|
</Button>
|
|
|
|
|
|
<Button>
|
|
<X> 547 </X>
|
|
<Y> 1432 </Y>
|
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_back-1.png" </Filename>
|
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
|
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
Var Timeout = 0
|
|
Var Clear# = 0
|
|
|
|
StrLen TelephoneNumber TelNumLen
|
|
If TelNumLen = 0 Then
|
|
Var Clear# = 1
|
|
EndIf
|
|
|
|
Trim TelephoneNumber -1
|
|
Var Tel_Confirm_State = "Invisible"
|
|
|
|
StrLen TelephoneNumber TelNumLen
|
|
|
|
If TelNumLen = 0 Then
|
|
If Clear# = 1 Then
|
|
Var ShowTextNumber = "Enable"
|
|
Var Mode# = 0
|
|
Var Str# = ""
|
|
EndIf
|
|
EndIf
|
|
|
|
Var TelephoneNumber# = Str# + TelephoneNumber
|
|
|
|
;Var ShowErrorText = "Invisible"
|
|
TimerReset
|
|
Refresh
|
|
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 691 </X>
|
|
<Y> 1432 </Y>
|
|
<State>
|
|
eval(
|
|
If SwensenPro = 1 Then
|
|
If TelephoneNumber = "" Then
|
|
If Seeker.RedeemSwensenCouponDrinkPrice >= 20 Then
|
|
Var return = "Enable"
|
|
Else
|
|
Var return = "Invisible"
|
|
EndIf
|
|
Else
|
|
Var return = "Invisible"
|
|
EndIf
|
|
Else
|
|
Var return = "Invisible"
|
|
EndIf
|
|
)
|
|
</State>
|
|
<Refresh> "Enable" </Refresh>
|
|
<Filename> "ROOT/taobin_project/image/event/swensen/bn_swensen_pay_code.png" </Filename>
|
|
<FilenamePress> "ROOT/taobin_project/image/event/swensen/bn_swensen_pay_code.png" </FilenamePress>
|
|
<EventClick>
|
|
Var Seeker.RedeemSwensenCoupon = 1
|
|
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
|
</EventClick>
|
|
</Button>
|
|
|
|
|
|
<Button>
|
|
<X> 218 </X>
|
|
<Y> 1607 </Y>
|
|
<Filename> Var( DirImage + "/bn_back.png") </Filename>
|
|
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
|
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
Var QRChannel = 0
|
|
Var Seeker.CodeChannel = 0
|
|
If CART_COUNT >= 1 Then
|
|
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
|
Else
|
|
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
|
EndIf
|
|
</EventClick>
|
|
</Button>
|
|
|
|
|
|
<Button>
|
|
<X> 577 </X>
|
|
<Y> 1607 </Y>
|
|
<Refresh> "Enable" </Refresh>
|
|
<State> Tel_Confirm_State </State>
|
|
<Filename> Var( DirImage + "/bn_confirm.png" ) </Filename>
|
|
<FilenamePress> Var( DirImage + "/bp_confirm.png" )</FilenamePress>
|
|
<FilenameDisable> Var( DirImage + "/bp_confirm.png" )</FilenameDisable>
|
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
|
|
|
|
|
|
If UnitTestType = "2" Then
|
|
If TelephoneNumber = "00000001" Then
|
|
Var ShowErrorText = "Enable"
|
|
EndIf
|
|
Else
|
|
If TelephoneNumber = "00000002" Then
|
|
Var ShowErrorText = "Enable"
|
|
EndIf
|
|
If TelephoneNumber = "99999999" Then
|
|
Var ShowErrorText = "Enable"
|
|
EndIf
|
|
|
|
|
|
|
|
If GetPayInfoFlag = 0 Then
|
|
Var GetPayInfoFlag = 1
|
|
Var ShowLoadingText = "Enable"
|
|
|
|
VendingQR OFF
|
|
|
|
|
|
Var Seeker.CodeNumber = TelephoneNumber
|
|
Var RemainAmount = 0
|
|
;PrepareDrink SelectDrink SelectSugarID
|
|
|
|
Var SessionID2 = SelectSlot + ":"
|
|
Var SessionID2 = SessionID2 + Seeker.ExtendData
|
|
|
|
Var CreditAmount1 = ""
|
|
Var ServiceAmountFlow = ""
|
|
Var TelephoneNumber2 = "0899999999"
|
|
Var ServiceType = "coffee"
|
|
Var ECommerce = ""
|
|
Var ECommerce = ECommerce + PriceDrink
|
|
|
|
Var ECommerce = ECommerce + ":"
|
|
Var ECommerce = ECommerce + TOPPING_PRICE
|
|
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + DiscountDrink
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + SessionID2
|
|
|
|
If Seeker.UseFreeSugarZeroCalTopping = 1 Then
|
|
Var ECommerce = ECommerce + ":1"
|
|
Else
|
|
Var ECommerce = ECommerce + ":0"
|
|
EndIf
|
|
|
|
If Seeker.UseFreeCollagenTopping = 1 Then
|
|
Var ECommerce = ECommerce + "1"
|
|
Else
|
|
Var ECommerce = ECommerce + "0"
|
|
EndIf
|
|
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + SelectDrink
|
|
Var ECommerce = ECommerce + "/"
|
|
|
|
|
|
If Mode# = 1 Then
|
|
Var ECommerce = ECommerce + "S04"
|
|
Else
|
|
Var ECommerce = ECommerce + "C00"
|
|
EndIf
|
|
|
|
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + Seeker.CodeNumber
|
|
|
|
Var ECommerce = ECommerce + ":"
|
|
Var ECommerce = ECommerce + PromotionIDCurrentOrder
|
|
|
|
Var ServiceParameter = "max"
|
|
Var ServiceCharge = 0
|
|
Var AccountType = "new"
|
|
Var testservice = "kbank"
|
|
Var tc = ""
|
|
Var GetScore = ""
|
|
Var OperatorName = ""
|
|
Var SessionID = ""
|
|
|
|
|
|
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
|
Var Timeout = 0
|
|
|
|
Var TelephoneNumber = Seeker.CodeNumber
|
|
Var Seeker.CodeChannel = 1
|
|
Var CodeActionOK = 0
|
|
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
SAVELOG ShowTextNumber
|
|
Refresh
|
|
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Image>
|
|
<X> 217 </X>
|
|
<Y> 802 </Y>
|
|
<Filename> Var( DirImage + "/img3.png" ) </Filename>
|
|
</Image>
|
|
|
|
<Image>
|
|
<X> 244 </X>
|
|
<Y> 816 </Y>
|
|
<State> ShowTextNumber </State>
|
|
<Refresh> "Enable" </Refresh>
|
|
<Filename> Var( DirImage + "/text_12.png" )</Filename>
|
|
</Image>
|
|
|
|
|
|
<Text>
|
|
<X> 0 </X>
|
|
<Y> 817 </Y>
|
|
<Width> 1080 </Width>
|
|
<Align> Center </Align>
|
|
<Size> 62 </Size>
|
|
<Font> RobotoBlack </Font>
|
|
<Color> 0x513C2F </Color>
|
|
<Refresh> "Enable" </Refresh>
|
|
<Value> TelephoneNumber# </Value>
|
|
</Text>
|
|
|
|
|
|
|
|
|
|
<Image>
|
|
<X> 188 </X>
|
|
<Y> 636 </Y>
|
|
<Filename> Var( DirImage + "/text_11.png" )</Filename>
|
|
</Image>
|
|
|
|
<Image>
|
|
<X> 260 </X>
|
|
<Y> 920 </Y>
|
|
<State> ShowLoadingText </State>
|
|
<Filename> Var( DirImage + "/loadingText.png") </Filename>
|
|
</Image>
|
|
|
|
<Image>
|
|
<X> 152 </X>
|
|
<Y> 935 </Y>
|
|
<Refresh> "Enable" </Refresh>
|
|
<State> ShowErrorText </State>
|
|
<Filename> text_show_error </Filename>
|
|
</Image>
|
|
|
|
|
|
;<Image>
|
|
;<X> 0 </X>
|
|
;<Y> 0 </Y>
|
|
;<Filename> "ROOT/taobin_project/image/ad_medium_2.png" </Filename>
|
|
;</Image>
|
|
|
|
;include="ROOT/taobin_project/inc/video.inc"
|
|
|
|
|
|
|
|
<EventSecurity>
|
|
Open "/media/bt/xml/security_alarm.xml"
|
|
</EventSecurity>
|
|
|
|
|
|
|
|
|
|
|
|
</Popup>
|