THAI: payment code with loading
This commit is contained in:
Kenta420
parent
de007de327
commit
44c0f852dc
15 changed files with 1755 additions and 1324 deletions
|
|
@ -26,6 +26,7 @@
|
|||
;CoinVending OFF
|
||||
VendingQR OFF
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var ShowErrorText = "Invisible"
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
|
|
@ -38,7 +39,7 @@
|
|||
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||
EndIf
|
||||
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_mmr/"
|
||||
EndIf
|
||||
|
||||
|
|
@ -113,23 +114,37 @@
|
|||
|
||||
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 30 Then
|
||||
;VendingQR OFF
|
||||
;Open menu_back_to_main
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 30 Then
|
||||
|
||||
Var PayState1 = "PressForever"
|
||||
Var PayState2 = "Enable"
|
||||
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
|
||||
If GetPayInfoFlag = 0 Then
|
||||
;VendingQR OFF
|
||||
;Open menu_back_to_main
|
||||
|
||||
Refresh
|
||||
EndIf
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Var PayState1 = "PressForever"
|
||||
Var PayState2 = "Enable"
|
||||
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
|
||||
|
||||
TimerReset
|
||||
</EventTimeout>
|
||||
|
|
@ -167,7 +182,10 @@
|
|||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
|
||||
|
||||
DEBUGVAR ECommerce
|
||||
SAVELOG ECommerce
|
||||
|
|
@ -405,7 +423,10 @@
|
|||
</EventActionOk>
|
||||
|
||||
<EventActionError>
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
Var TelephoneNumber = ""
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
|
|
@ -445,10 +466,10 @@
|
|||
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
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
|
@ -913,6 +934,7 @@
|
|||
|
||||
If GetPayInfoFlag = 0 Then
|
||||
Var GetPayInfoFlag = 1
|
||||
Var ShowLoadingText = "Enable"
|
||||
|
||||
VendingQR OFF
|
||||
|
||||
|
|
@ -1031,6 +1053,13 @@
|
|||
<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>
|
||||
|
|
|
|||
|
|
@ -13,29 +13,30 @@
|
|||
Var Seeker.FreeVendingCampaign = 0
|
||||
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
|
||||
;Var VendingQRCode = "ERROR"
|
||||
;VendingQR ON
|
||||
;Var QRCODE99 = ""
|
||||
|
||||
|
||||
;CoinVending OFF
|
||||
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var ShowErrorText = "Invisible"
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
Var ErrorCause = ""
|
||||
|
||||
|
||||
If show_eng = "true" Then
|
||||
|
||||
If show_eng = "true" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||
Else
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||
EndIf
|
||||
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_mmr/"
|
||||
EndIf
|
||||
|
||||
|
|
@ -43,24 +44,32 @@
|
|||
Var Mode# = 0
|
||||
Var Str# = ""
|
||||
Var TelephoneNumber# = ""
|
||||
|
||||
|
||||
</EventOpen>
|
||||
<Timeout> 1000 </Timeout>
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
|
||||
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 30 Then
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
Refresh
|
||||
EndIf
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 30 Then
|
||||
|
||||
If GetPayInfoFlag = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
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
|
||||
|
||||
TimerReset
|
||||
</EventTimeout>
|
||||
</EventTimeout>
|
||||
|
||||
<EventCoin>
|
||||
|
||||
|
|
@ -72,12 +81,14 @@
|
|||
|
||||
|
||||
<EventActionOk>
|
||||
|
||||
|
||||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
SAVELOG ECommerce
|
||||
|
||||
SPLIT ECommerce "/" 5 Seeker.VendingCode
|
||||
|
|
@ -85,19 +96,19 @@
|
|||
SPLIT ECommerce "/" 8 VendingCampaign1
|
||||
|
||||
If Seeker.VendingCode = "" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "KBA:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "AIR:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "TWN:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
SAVELOG Seeker.VendingCode
|
||||
|
|
@ -114,37 +125,37 @@
|
|||
|
||||
If IntVendingCampaign1 > 0 Then
|
||||
Var VendingCreditRemain = VendingCampaign1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
Var Seeker.IntVendingCampaign = Seeker.VendingCampaignRI3
|
||||
INT Seeker.IntVendingCampaign
|
||||
|
||||
|
||||
Var VendingREFID = SessionID
|
||||
|
||||
If Seeker.IntVendingCampaign > 0 Then
|
||||
Var QRChannel = 0
|
||||
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;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
|
||||
;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"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Else
|
||||
Var CART_INDEX = 0
|
||||
|
||||
If Seeker = "curr" Then
|
||||
If New_Payment = 1 Then
|
||||
If New_Payment = 1 Then
|
||||
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
|
||||
EndIf
|
||||
MakeDrinkV1 SelectDrink SelectSugarID
|
||||
|
|
@ -158,16 +169,16 @@
|
|||
Var DrinkPaid = SelectDrink
|
||||
Var PaidPaymentFromNextStage = 1
|
||||
EndIf
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
EndIf
|
||||
|
||||
|
||||
|
|
@ -182,10 +193,10 @@
|
|||
EndIf
|
||||
EndIf
|
||||
|
||||
Else
|
||||
Else
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
|
|
@ -193,8 +204,11 @@
|
|||
|
||||
<EventActionError>
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
Var TelephoneNumber = ""
|
||||
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
Var TelephoneNumber = ""
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
|
||||
SAVELOG ShowErrorText
|
||||
|
|
@ -253,7 +267,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "1"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -264,7 +278,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -278,7 +292,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "2"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -289,7 +303,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -303,7 +317,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "3"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -314,7 +328,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -328,7 +342,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_A.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "A"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -339,7 +353,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -353,7 +367,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "4"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -364,7 +378,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -378,7 +392,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "5"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -389,7 +403,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -403,7 +417,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "6"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -414,7 +428,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -428,7 +442,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_B.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "B"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -439,7 +453,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -453,7 +467,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "7"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -464,7 +478,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -478,7 +492,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "8"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -489,7 +503,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -503,7 +517,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "9"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -514,7 +528,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -528,7 +542,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_C.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "C"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -539,7 +553,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -553,7 +567,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "0"
|
||||
Trim TelephoneNumber 8
|
||||
|
|
@ -561,7 +575,7 @@
|
|||
Var TelephoneNumber# = Str# + TelephoneNumber
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -579,21 +593,21 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var Clear# = 0
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen = 0 Then
|
||||
If TelNumLen = 0 Then
|
||||
Var Clear# = 1
|
||||
EndIf
|
||||
|
||||
Trim TelephoneNumber -1
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
If Clear# = 1 Then
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var Mode# = 0
|
||||
|
|
@ -606,7 +620,7 @@
|
|||
;Var ShowErrorText = "Invisible"
|
||||
TimerReset
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -618,11 +632,11 @@
|
|||
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -631,28 +645,37 @@
|
|||
<X> 577 </X>
|
||||
<Y> 1673 </Y>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<State> Tel_Confirm_State </State>
|
||||
<State>
|
||||
eval(
|
||||
If ShowLoadingText = "Enable" Then
|
||||
Var return = "Press"
|
||||
Else
|
||||
Var return = Tel_Confirm_State
|
||||
EndIf
|
||||
)
|
||||
</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>
|
||||
<EventClick>
|
||||
|
||||
|
||||
|
||||
|
||||
If UnitTestType = "2" Then
|
||||
If TelephoneNumber = "00000001" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
Else
|
||||
|
||||
|
||||
If GetPayInfoFlag = 0 Then
|
||||
Var GetPayInfoFlag = 1
|
||||
Var ShowLoadingText = "Enable"
|
||||
|
||||
VendingQR OFF
|
||||
|
||||
|
||||
|
||||
Var Seeker.CodeNumber = TelephoneNumber
|
||||
Var RemainAmount = 0
|
||||
;PrepareDrink SelectDrink SelectSugarID
|
||||
|
|
@ -669,13 +692,13 @@
|
|||
|
||||
Var ECommerce = ECommerce + ":"
|
||||
Var ECommerce = ECommerce + TOPPING_PRICE
|
||||
|
||||
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
|
||||
|
||||
|
|
@ -685,13 +708,13 @@
|
|||
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"
|
||||
|
|
@ -704,17 +727,17 @@
|
|||
|
||||
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var TelephoneNumber = Seeker.CodeNumber
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
|
||||
SAVELOG ShowTextNumber
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -746,7 +769,7 @@
|
|||
</Text>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 188 </X>
|
||||
|
|
@ -754,6 +777,14 @@
|
|||
<Filename> Var( DirImage + "/text_46.png" )</Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 260 </X>
|
||||
<Y> 990 </Y>
|
||||
<State> ShowLoadingText </State>
|
||||
<Filename> Var( DirImage + "/loadingText.png") </Filename>
|
||||
</Image>
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 152 </X>
|
||||
<Y> 1001 </Y>
|
||||
|
|
@ -785,9 +816,9 @@
|
|||
</Video>
|
||||
|
||||
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
</EventSecurity>
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -13,29 +13,30 @@
|
|||
Var Seeker.FreeVendingCampaign = 0
|
||||
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
|
||||
;Var VendingQRCode = "ERROR"
|
||||
;VendingQR ON
|
||||
;Var QRCODE99 = ""
|
||||
|
||||
|
||||
;CoinVending OFF
|
||||
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var ShowErrorText = "Invisible"
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
Var ErrorCause = ""
|
||||
|
||||
|
||||
If show_eng = "true" Then
|
||||
|
||||
If show_eng = "true" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||
Else
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||
EndIf
|
||||
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_mmr/"
|
||||
EndIf
|
||||
|
||||
|
|
@ -43,24 +44,31 @@
|
|||
Var Mode# = 0
|
||||
Var Str# = ""
|
||||
Var TelephoneNumber# = ""
|
||||
|
||||
|
||||
</EventOpen>
|
||||
<Timeout> 1000 </Timeout>
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
|
||||
|
||||
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 30 Then
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
Refresh
|
||||
If GetPayInfoFlag = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
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
|
||||
|
||||
TimerReset
|
||||
</EventTimeout>
|
||||
</EventTimeout>
|
||||
|
||||
<EventCoin>
|
||||
|
||||
|
|
@ -72,12 +80,14 @@
|
|||
|
||||
|
||||
<EventActionOk>
|
||||
|
||||
|
||||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
SAVELOG ECommerce
|
||||
|
||||
SPLIT ECommerce "/" 5 Seeker.VendingCode
|
||||
|
|
@ -85,19 +95,19 @@
|
|||
SPLIT ECommerce "/" 8 VendingCampaign1
|
||||
|
||||
If Seeker.VendingCode = "" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "KBA:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "AIR:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "TWN:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
SAVELOG Seeker.VendingCode
|
||||
|
|
@ -114,37 +124,37 @@
|
|||
|
||||
If IntVendingCampaign1 > 0 Then
|
||||
Var VendingCreditRemain = VendingCampaign1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
Var Seeker.IntVendingCampaign = Seeker.VendingCampaignRI3
|
||||
INT Seeker.IntVendingCampaign
|
||||
|
||||
|
||||
Var VendingREFID = SessionID
|
||||
|
||||
If Seeker.IntVendingCampaign > 0 Then
|
||||
Var QRChannel = 0
|
||||
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;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
|
||||
;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"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Else
|
||||
Var CART_INDEX = 0
|
||||
|
||||
If Seeker = "curr" Then
|
||||
If New_Payment = 1 Then
|
||||
If New_Payment = 1 Then
|
||||
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
|
||||
EndIf
|
||||
MakeDrinkV1 SelectDrink SelectSugarID
|
||||
|
|
@ -155,16 +165,16 @@
|
|||
Var TxRef1 = ""
|
||||
CreateTxRef1 TxRef1
|
||||
EndIf
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
EndIf
|
||||
|
||||
|
||||
|
|
@ -179,10 +189,10 @@
|
|||
EndIf
|
||||
EndIf
|
||||
|
||||
Else
|
||||
Else
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
|
|
@ -190,8 +200,11 @@
|
|||
|
||||
<EventActionError>
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
Var TelephoneNumber = ""
|
||||
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
Var TelephoneNumber = ""
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
|
||||
SAVELOG ShowErrorText
|
||||
|
|
@ -250,7 +263,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "1"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -261,7 +274,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -275,7 +288,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "2"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -286,7 +299,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -300,7 +313,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "3"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -311,7 +324,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -325,7 +338,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_A.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "A"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -336,7 +349,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -350,7 +363,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "4"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -361,7 +374,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -375,7 +388,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "5"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -386,7 +399,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -400,7 +413,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "6"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -411,7 +424,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -425,7 +438,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_B.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "B"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -436,7 +449,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -450,7 +463,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "7"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -461,7 +474,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -475,7 +488,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "8"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -486,7 +499,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -500,7 +513,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "9"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -511,7 +524,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -526,7 +539,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_C.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "C"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -537,7 +550,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -551,7 +564,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "0"
|
||||
Trim TelephoneNumber 8
|
||||
|
|
@ -559,7 +572,7 @@
|
|||
Var TelephoneNumber# = Str# + TelephoneNumber
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -577,21 +590,21 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var Clear# = 0
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen = 0 Then
|
||||
If TelNumLen = 0 Then
|
||||
Var Clear# = 1
|
||||
EndIf
|
||||
|
||||
Trim TelephoneNumber -1
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
If Clear# = 1 Then
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var Mode# = 0
|
||||
|
|
@ -604,7 +617,7 @@
|
|||
;Var ShowErrorText = "Invisible"
|
||||
TimerReset
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -616,11 +629,11 @@
|
|||
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -629,28 +642,37 @@
|
|||
<X> 577 </X>
|
||||
<Y> 1673 </Y>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<State> Tel_Confirm_State </State>
|
||||
<State>
|
||||
eval(
|
||||
If ShowLoadingText = "Enable" Then
|
||||
Var return = "Press"
|
||||
Else
|
||||
Var return = Tel_Confirm_State
|
||||
EndIf
|
||||
)
|
||||
</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>
|
||||
<EventClick>
|
||||
|
||||
|
||||
|
||||
|
||||
If UnitTestType = "2" Then
|
||||
If TelephoneNumber = "00000001" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
Else
|
||||
|
||||
|
||||
If GetPayInfoFlag = 0 Then
|
||||
Var GetPayInfoFlag = 1
|
||||
Var ShowLoadingText = "Enable"
|
||||
|
||||
VendingQR OFF
|
||||
|
||||
|
||||
|
||||
Var Seeker.CodeNumber = TelephoneNumber
|
||||
Var RemainAmount = 0
|
||||
;PrepareDrink SelectDrink SelectSugarID
|
||||
|
|
@ -669,11 +691,11 @@
|
|||
Var ECommerce = ECommerce + TOPPING_PRICE
|
||||
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
|
||||
|
||||
|
|
@ -683,13 +705,13 @@
|
|||
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"
|
||||
|
|
@ -702,17 +724,17 @@
|
|||
|
||||
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var TelephoneNumber = Seeker.CodeNumber
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
|
||||
SAVELOG ShowTextNumber
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -744,7 +766,7 @@
|
|||
</Text>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 188 </X>
|
||||
|
|
@ -752,6 +774,15 @@
|
|||
<Filename> Var( DirImage + "/text_31.png" )</Filename>
|
||||
</Image>
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 260 </X>
|
||||
<Y> 990 </Y>
|
||||
<State> ShowLoadingText </State>
|
||||
<Filename> Var( DirImage + "/loadingText.png") </Filename>
|
||||
</Image>
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 152 </X>
|
||||
<Y> 1001 </Y>
|
||||
|
|
@ -783,9 +814,9 @@
|
|||
</Video>
|
||||
|
||||
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
</EventSecurity>
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -13,29 +13,30 @@
|
|||
Var Seeker.FreeVendingCampaign = 0
|
||||
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
|
||||
;Var VendingQRCode = "ERROR"
|
||||
;VendingQR ON
|
||||
;Var QRCODE99 = ""
|
||||
|
||||
|
||||
;CoinVending OFF
|
||||
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var ShowErrorText = "Invisible"
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
Var ErrorCause = ""
|
||||
|
||||
|
||||
If show_eng = "true" Then
|
||||
|
||||
If show_eng = "true" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||
Else
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||
EndIf
|
||||
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_mmr/"
|
||||
EndIf
|
||||
|
||||
|
|
@ -43,24 +44,31 @@
|
|||
Var Mode# = 0
|
||||
Var Str# = ""
|
||||
Var TelephoneNumber# = ""
|
||||
|
||||
|
||||
</EventOpen>
|
||||
<Timeout> 1000 </Timeout>
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
|
||||
|
||||
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 30 Then
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
Refresh
|
||||
If GetPayInfoFlag = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
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
|
||||
|
||||
TimerReset
|
||||
</EventTimeout>
|
||||
</EventTimeout>
|
||||
|
||||
<EventCoin>
|
||||
|
||||
|
|
@ -72,12 +80,14 @@
|
|||
|
||||
|
||||
<EventActionOk>
|
||||
|
||||
|
||||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
SAVELOG ECommerce
|
||||
|
||||
SPLIT ECommerce "/" 5 Seeker.VendingCode
|
||||
|
|
@ -85,19 +95,19 @@
|
|||
SPLIT ECommerce "/" 8 VendingCampaign1
|
||||
|
||||
If Seeker.VendingCode = "" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "KBA:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "AIR:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "TWN:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
SAVELOG Seeker.VendingCode
|
||||
|
|
@ -114,37 +124,37 @@
|
|||
|
||||
If IntVendingCampaign1 > 0 Then
|
||||
Var VendingCreditRemain = VendingCampaign1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
Var Seeker.IntVendingCampaign = Seeker.VendingCampaignRI3
|
||||
INT Seeker.IntVendingCampaign
|
||||
|
||||
|
||||
Var VendingREFID = SessionID
|
||||
|
||||
If Seeker.IntVendingCampaign > 0 Then
|
||||
Var QRChannel = 0
|
||||
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;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
|
||||
;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"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Else
|
||||
Var CART_INDEX = 0
|
||||
|
||||
If Seeker = "curr" Then
|
||||
If New_Payment = 1 Then
|
||||
If New_Payment = 1 Then
|
||||
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
|
||||
EndIf
|
||||
MakeDrinkV1 SelectDrink SelectSugarID
|
||||
|
|
@ -158,16 +168,16 @@
|
|||
Var DrinkPaid = SelectDrink
|
||||
Var PaidPaymentFromNextStage = 1
|
||||
EndIf
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
EndIf
|
||||
|
||||
|
||||
|
|
@ -182,10 +192,10 @@
|
|||
EndIf
|
||||
EndIf
|
||||
|
||||
Else
|
||||
Else
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
|
|
@ -193,8 +203,11 @@
|
|||
|
||||
<EventActionError>
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
Var TelephoneNumber = ""
|
||||
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
|
||||
SAVELOG ShowErrorText
|
||||
|
|
@ -253,7 +266,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "1"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -264,7 +277,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -278,7 +291,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "2"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -289,7 +302,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -303,7 +316,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "3"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -314,7 +327,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -328,7 +341,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_A.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "A"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -339,7 +352,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -353,7 +366,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "4"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -364,7 +377,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -378,7 +391,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "5"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -389,7 +402,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -403,7 +416,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "6"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -414,7 +427,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -428,7 +441,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_B.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "B"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -439,7 +452,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -453,7 +466,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "7"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -464,7 +477,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -478,7 +491,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "8"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -489,7 +502,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -503,7 +516,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "9"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -514,7 +527,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -528,7 +541,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_C.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "C"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -539,7 +552,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -553,7 +566,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "0"
|
||||
Trim TelephoneNumber 8
|
||||
|
|
@ -561,7 +574,7 @@
|
|||
Var TelephoneNumber# = Str# + TelephoneNumber
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -579,21 +592,21 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var Clear# = 0
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen = 0 Then
|
||||
If TelNumLen = 0 Then
|
||||
Var Clear# = 1
|
||||
EndIf
|
||||
|
||||
Trim TelephoneNumber -1
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
If Clear# = 1 Then
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var Mode# = 0
|
||||
|
|
@ -606,7 +619,7 @@
|
|||
;Var ShowErrorText = "Invisible"
|
||||
TimerReset
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -618,11 +631,11 @@
|
|||
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -631,28 +644,37 @@
|
|||
<X> 577 </X>
|
||||
<Y> 1673 </Y>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<State> Tel_Confirm_State </State>
|
||||
<State>
|
||||
eval(
|
||||
If ShowLoadingText = "Enable" Then
|
||||
Var return = "Press"
|
||||
Else
|
||||
Var return = Tel_Confirm_State
|
||||
EndIf
|
||||
)
|
||||
</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>
|
||||
<EventClick>
|
||||
|
||||
|
||||
|
||||
|
||||
If UnitTestType = "2" Then
|
||||
If TelephoneNumber = "00000001" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
Else
|
||||
|
||||
|
||||
If GetPayInfoFlag = 0 Then
|
||||
Var GetPayInfoFlag = 1
|
||||
Var ShowLoadingText = "Enable"
|
||||
|
||||
VendingQR OFF
|
||||
|
||||
|
||||
|
||||
Var Seeker.CodeNumber = TelephoneNumber
|
||||
Var RemainAmount = 0
|
||||
;PrepareDrink SelectDrink SelectSugarID
|
||||
|
|
@ -669,13 +691,13 @@
|
|||
|
||||
Var ECommerce = ECommerce + ":"
|
||||
Var ECommerce = ECommerce + TOPPING_PRICE
|
||||
|
||||
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
|
||||
|
||||
|
|
@ -685,13 +707,13 @@
|
|||
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"
|
||||
|
|
@ -704,17 +726,17 @@
|
|||
|
||||
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var TelephoneNumber = Seeker.CodeNumber
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
|
||||
SAVELOG ShowTextNumber
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -746,7 +768,7 @@
|
|||
</Text>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 188 </X>
|
||||
|
|
@ -754,6 +776,14 @@
|
|||
<Filename> Var( DirImage + "/text_34.png" )</Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 260 </X>
|
||||
<Y> 990 </Y>
|
||||
<State> ShowLoadingText </State>
|
||||
<Filename> Var( DirImage + "/loadingText.png") </Filename>
|
||||
</Image>
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 152 </X>
|
||||
<Y> 1001 </Y>
|
||||
|
|
@ -785,9 +815,9 @@
|
|||
</Video>
|
||||
|
||||
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
</EventSecurity>
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -13,53 +13,61 @@
|
|||
Var Seeker.FreeVendingCampaign = 0
|
||||
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
|
||||
;Var VendingQRCode = "ERROR"
|
||||
;VendingQR ON
|
||||
;Var QRCODE99 = ""
|
||||
|
||||
|
||||
;CoinVending OFF
|
||||
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var ShowErrorText = "Invisible"
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
Var ErrorCause = ""
|
||||
|
||||
|
||||
If show_eng = "true" Then
|
||||
|
||||
If show_eng = "true" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||
Else
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||
EndIf
|
||||
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_mmr/"
|
||||
EndIf
|
||||
|
||||
Var Mode# = 0
|
||||
Var Str# = ""
|
||||
Var TelephoneNumber# = ""
|
||||
|
||||
|
||||
</EventOpen>
|
||||
<Timeout> 1000 </Timeout>
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
|
||||
|
||||
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 30 Then
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
Refresh
|
||||
If GetPayInfoFlag = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
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
|
||||
|
||||
TimerReset
|
||||
</EventTimeout>
|
||||
</EventTimeout>
|
||||
|
||||
<EventCoin>
|
||||
|
||||
|
|
@ -71,12 +79,14 @@
|
|||
|
||||
|
||||
<EventActionOk>
|
||||
|
||||
|
||||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
SAVELOG ECommerce
|
||||
|
||||
SPLIT ECommerce "/" 5 Seeker.VendingCode
|
||||
|
|
@ -84,19 +94,19 @@
|
|||
SPLIT ECommerce "/" 8 VendingCampaign1
|
||||
|
||||
If Seeker.VendingCode = "" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "KBA:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "AIR:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "TWN:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
SAVELOG Seeker.VendingCode
|
||||
|
|
@ -113,37 +123,37 @@
|
|||
|
||||
If IntVendingCampaign1 > 0 Then
|
||||
Var VendingCreditRemain = VendingCampaign1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
Var Seeker.IntVendingCampaign = Seeker.VendingCampaignRI3
|
||||
INT Seeker.IntVendingCampaign
|
||||
|
||||
|
||||
Var VendingREFID = SessionID
|
||||
|
||||
If Seeker.IntVendingCampaign > 0 Then
|
||||
Var QRChannel = 0
|
||||
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;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
|
||||
;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"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Else
|
||||
Var CART_INDEX = 0
|
||||
|
||||
If Seeker = "curr" Then
|
||||
If New_Payment = 1 Then
|
||||
If New_Payment = 1 Then
|
||||
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
|
||||
EndIf
|
||||
MakeDrinkV1 SelectDrink SelectSugarID
|
||||
|
|
@ -157,16 +167,16 @@
|
|||
Var DrinkPaid = SelectDrink
|
||||
Var PaidPaymentFromNextStage = 1
|
||||
EndIf
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
EndIf
|
||||
|
||||
|
||||
|
|
@ -181,10 +191,10 @@
|
|||
EndIf
|
||||
EndIf
|
||||
|
||||
Else
|
||||
Else
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
|
|
@ -192,8 +202,11 @@
|
|||
|
||||
<EventActionError>
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
Var TelephoneNumber = ""
|
||||
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
|
||||
SAVELOG ShowErrorText
|
||||
|
|
@ -252,7 +265,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "1"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -263,7 +276,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -277,7 +290,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "2"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -288,7 +301,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -302,7 +315,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "3"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -313,7 +326,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -327,7 +340,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_A.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "A"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -338,7 +351,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -352,7 +365,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "4"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -363,7 +376,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -377,7 +390,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "5"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -388,7 +401,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -402,7 +415,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "6"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -413,7 +426,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -427,7 +440,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_B.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "B"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -438,7 +451,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -452,7 +465,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "7"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -463,7 +476,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -477,7 +490,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "8"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -488,7 +501,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -502,7 +515,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "9"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -513,7 +526,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -527,7 +540,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_C.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "C"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -538,7 +551,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -552,7 +565,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "0"
|
||||
Trim TelephoneNumber 8
|
||||
|
|
@ -560,7 +573,7 @@
|
|||
Var TelephoneNumber# = Str# + TelephoneNumber
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -578,21 +591,21 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var Clear# = 0
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen = 0 Then
|
||||
If TelNumLen = 0 Then
|
||||
Var Clear# = 1
|
||||
EndIf
|
||||
|
||||
Trim TelephoneNumber -1
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
If Clear# = 1 Then
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var Mode# = 0
|
||||
|
|
@ -605,7 +618,7 @@
|
|||
;Var ShowErrorText = "Invisible"
|
||||
TimerReset
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -617,11 +630,11 @@
|
|||
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -630,28 +643,37 @@
|
|||
<X> 577 </X>
|
||||
<Y> 1673 </Y>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<State> Tel_Confirm_State </State>
|
||||
<State>
|
||||
eval(
|
||||
If ShowLoadingText = "Enable" Then
|
||||
Var return = "Press"
|
||||
Else
|
||||
Var return = Tel_Confirm_State
|
||||
EndIf
|
||||
)
|
||||
</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>
|
||||
<EventClick>
|
||||
|
||||
|
||||
|
||||
|
||||
If UnitTestType = "2" Then
|
||||
If TelephoneNumber = "00000001" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
Else
|
||||
|
||||
|
||||
If GetPayInfoFlag = 0 Then
|
||||
Var GetPayInfoFlag = 1
|
||||
Var ShowLoadingText = "Enable"
|
||||
|
||||
VendingQR OFF
|
||||
|
||||
|
||||
|
||||
Var Seeker.CodeNumber = TelephoneNumber
|
||||
Var RemainAmount = 0
|
||||
;PrepareDrink SelectDrink SelectSugarID
|
||||
|
|
@ -668,13 +690,13 @@
|
|||
|
||||
Var ECommerce = ECommerce + ":"
|
||||
Var ECommerce = ECommerce + TOPPING_PRICE
|
||||
|
||||
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
|
||||
|
||||
|
|
@ -684,13 +706,13 @@
|
|||
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"
|
||||
|
|
@ -703,17 +725,17 @@
|
|||
|
||||
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var TelephoneNumber = Seeker.CodeNumber
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
|
||||
SAVELOG ShowTextNumber
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -745,7 +767,7 @@
|
|||
</Text>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 188 </X>
|
||||
|
|
@ -753,6 +775,13 @@
|
|||
<Filename> Var( DirImage + "/text_37.png" )</Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 260 </X>
|
||||
<Y> 990 </Y>
|
||||
<State> ShowLoadingText </State>
|
||||
<Filename> Var( DirImage + "/loadingText.png") </Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 152 </X>
|
||||
<Y> 1001 </Y>
|
||||
|
|
@ -784,9 +813,9 @@
|
|||
</Video>
|
||||
|
||||
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
</EventSecurity>
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -13,29 +13,30 @@
|
|||
Var Seeker.FreeVendingCampaign = 0
|
||||
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
|
||||
;Var VendingQRCode = "ERROR"
|
||||
;VendingQR ON
|
||||
;Var QRCODE99 = ""
|
||||
|
||||
|
||||
;CoinVending OFF
|
||||
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var ShowErrorText = "Invisible"
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
Var ErrorCause = ""
|
||||
|
||||
|
||||
If show_eng = "true" Then
|
||||
|
||||
If show_eng = "true" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||
Else
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||
EndIf
|
||||
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_mmr/"
|
||||
EndIf
|
||||
|
||||
|
|
@ -43,24 +44,31 @@
|
|||
Var Mode# = 0
|
||||
Var Str# = ""
|
||||
Var TelephoneNumber# = ""
|
||||
|
||||
|
||||
</EventOpen>
|
||||
<Timeout> 1000 </Timeout>
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
|
||||
|
||||
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 30 Then
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
Refresh
|
||||
If GetPayInfoFlag = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
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
|
||||
|
||||
TimerReset
|
||||
</EventTimeout>
|
||||
</EventTimeout>
|
||||
|
||||
<EventCoin>
|
||||
|
||||
|
|
@ -72,12 +80,14 @@
|
|||
|
||||
|
||||
<EventActionOk>
|
||||
|
||||
|
||||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
SAVELOG ECommerce
|
||||
|
||||
SPLIT ECommerce "/" 5 Seeker.VendingCode
|
||||
|
|
@ -85,19 +95,19 @@
|
|||
SPLIT ECommerce "/" 8 VendingCampaign1
|
||||
|
||||
If Seeker.VendingCode = "" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "KBA:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "AIR:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "TWN:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
SAVELOG Seeker.VendingCode
|
||||
|
|
@ -114,37 +124,37 @@
|
|||
|
||||
If IntVendingCampaign1 > 0 Then
|
||||
Var VendingCreditRemain = VendingCampaign1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
Var Seeker.IntVendingCampaign = Seeker.VendingCampaignRI3
|
||||
INT Seeker.IntVendingCampaign
|
||||
|
||||
|
||||
Var VendingREFID = SessionID
|
||||
|
||||
If Seeker.IntVendingCampaign > 0 Then
|
||||
Var QRChannel = 0
|
||||
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;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
|
||||
;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"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Else
|
||||
Var CART_INDEX = 0
|
||||
|
||||
If Seeker = "curr" Then
|
||||
If New_Payment = 1 Then
|
||||
If New_Payment = 1 Then
|
||||
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
|
||||
EndIf
|
||||
MakeDrinkV1 SelectDrink SelectSugarID
|
||||
|
|
@ -158,16 +168,16 @@
|
|||
Var DrinkPaid = SelectDrink
|
||||
Var PaidPaymentFromNextStage = 1
|
||||
EndIf
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
EndIf
|
||||
|
||||
|
||||
|
|
@ -182,10 +192,10 @@
|
|||
EndIf
|
||||
EndIf
|
||||
|
||||
Else
|
||||
Else
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
|
|
@ -193,8 +203,11 @@
|
|||
|
||||
<EventActionError>
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
Var TelephoneNumber = ""
|
||||
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
|
||||
SAVELOG ShowErrorText
|
||||
|
|
@ -253,7 +266,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "1"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -264,7 +277,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -278,7 +291,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "2"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -289,7 +302,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -303,7 +316,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "3"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -314,7 +327,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -328,7 +341,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_A.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "A"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -339,7 +352,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -353,7 +366,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "4"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -364,7 +377,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -378,7 +391,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "5"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -389,7 +402,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -403,7 +416,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "6"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -414,7 +427,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -428,7 +441,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_B.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "B"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -439,7 +452,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -453,7 +466,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "7"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -464,7 +477,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -478,7 +491,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "8"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -489,7 +502,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -503,7 +516,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "9"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -514,7 +527,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -528,7 +541,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_C.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "C"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -539,7 +552,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -553,7 +566,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "0"
|
||||
Trim TelephoneNumber 8
|
||||
|
|
@ -561,7 +574,7 @@
|
|||
Var TelephoneNumber# = Str# + TelephoneNumber
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -579,21 +592,21 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var Clear# = 0
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen = 0 Then
|
||||
If TelNumLen = 0 Then
|
||||
Var Clear# = 1
|
||||
EndIf
|
||||
|
||||
Trim TelephoneNumber -1
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
If Clear# = 1 Then
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var Mode# = 0
|
||||
|
|
@ -606,7 +619,7 @@
|
|||
;Var ShowErrorText = "Invisible"
|
||||
TimerReset
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -618,11 +631,11 @@
|
|||
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -631,28 +644,37 @@
|
|||
<X> 577 </X>
|
||||
<Y> 1673 </Y>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<State> Tel_Confirm_State </State>
|
||||
<State>
|
||||
eval(
|
||||
If ShowLoadingText = "Enable" Then
|
||||
Var return = "Press"
|
||||
Else
|
||||
Var return = Tel_Confirm_State
|
||||
EndIf
|
||||
)
|
||||
</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>
|
||||
<EventClick>
|
||||
|
||||
|
||||
|
||||
|
||||
If UnitTestType = "2" Then
|
||||
If TelephoneNumber = "00000001" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
Else
|
||||
|
||||
|
||||
If GetPayInfoFlag = 0 Then
|
||||
Var GetPayInfoFlag = 1
|
||||
Var ShowLoadingText = "Enable"
|
||||
|
||||
VendingQR OFF
|
||||
|
||||
|
||||
|
||||
Var Seeker.CodeNumber = TelephoneNumber
|
||||
Var RemainAmount = 0
|
||||
;PrepareDrink SelectDrink SelectSugarID
|
||||
|
|
@ -669,13 +691,13 @@
|
|||
|
||||
Var ECommerce = ECommerce + ":"
|
||||
Var ECommerce = ECommerce + TOPPING_PRICE
|
||||
|
||||
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
|
||||
|
||||
|
|
@ -685,13 +707,13 @@
|
|||
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"
|
||||
|
|
@ -704,17 +726,17 @@
|
|||
|
||||
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var TelephoneNumber = Seeker.CodeNumber
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
|
||||
SAVELOG ShowTextNumber
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -746,7 +768,7 @@
|
|||
</Text>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 188 </X>
|
||||
|
|
@ -754,6 +776,13 @@
|
|||
<Filename> Var( DirImage + "/text_43_2.png" )</Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 260 </X>
|
||||
<Y> 990 </Y>
|
||||
<State> ShowLoadingText </State>
|
||||
<Filename> Var( DirImage + "/loadingText.png") </Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 152 </X>
|
||||
<Y> 1001 </Y>
|
||||
|
|
@ -785,9 +814,9 @@
|
|||
</Video>
|
||||
|
||||
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
</EventSecurity>
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -13,23 +13,24 @@
|
|||
Var Seeker.FreeVendingCampaign = 0
|
||||
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
|
||||
;Var VendingQRCode = "ERROR"
|
||||
;VendingQR ON
|
||||
;Var QRCODE99 = ""
|
||||
|
||||
|
||||
;CoinVending OFF
|
||||
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var ShowErrorText = "Invisible"
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
Var ErrorCause = ""
|
||||
|
||||
|
||||
If show_eng = "true" Then
|
||||
|
||||
If show_eng = "true" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||
Else
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||
|
|
@ -39,24 +40,31 @@
|
|||
Var Mode# = 0
|
||||
Var Str# = ""
|
||||
Var TelephoneNumber# = ""
|
||||
|
||||
|
||||
</EventOpen>
|
||||
<Timeout> 1000 </Timeout>
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
|
||||
|
||||
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 30 Then
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
Refresh
|
||||
If GetPayInfoFlag = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
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
|
||||
|
||||
TimerReset
|
||||
</EventTimeout>
|
||||
</EventTimeout>
|
||||
|
||||
<EventCoin>
|
||||
|
||||
|
|
@ -68,12 +76,14 @@
|
|||
|
||||
|
||||
<EventActionOk>
|
||||
|
||||
|
||||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
SAVELOG ECommerce
|
||||
|
||||
SPLIT ECommerce "/" 5 Seeker.VendingCode
|
||||
|
|
@ -81,19 +91,19 @@
|
|||
SPLIT ECommerce "/" 8 VendingCampaign1
|
||||
|
||||
If Seeker.VendingCode = "" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "KBA:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "AIR:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "TWN:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
SAVELOG Seeker.VendingCode
|
||||
|
|
@ -110,37 +120,37 @@
|
|||
|
||||
If IntVendingCampaign1 > 0 Then
|
||||
Var VendingCreditRemain = VendingCampaign1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
Var Seeker.IntVendingCampaign = Seeker.VendingCampaignRI3
|
||||
INT Seeker.IntVendingCampaign
|
||||
|
||||
|
||||
Var VendingREFID = SessionID
|
||||
|
||||
If Seeker.IntVendingCampaign > 0 Then
|
||||
Var QRChannel = 0
|
||||
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;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
|
||||
;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"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Else
|
||||
Var CART_INDEX = 0
|
||||
|
||||
If Seeker = "curr" Then
|
||||
If New_Payment = 1 Then
|
||||
If New_Payment = 1 Then
|
||||
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
|
||||
EndIf
|
||||
MakeDrinkV1 SelectDrink SelectSugarID
|
||||
|
|
@ -154,16 +164,16 @@
|
|||
Var DrinkPaid = SelectDrink
|
||||
Var PaidPaymentFromNextStage = 1
|
||||
EndIf
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
EndIf
|
||||
|
||||
|
||||
|
|
@ -178,10 +188,10 @@
|
|||
EndIf
|
||||
EndIf
|
||||
|
||||
Else
|
||||
Else
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
|
|
@ -189,8 +199,10 @@
|
|||
|
||||
<EventActionError>
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
Var TelephoneNumber = ""
|
||||
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
|
||||
SAVELOG ShowErrorText
|
||||
|
|
@ -249,7 +261,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "1"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -260,7 +272,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -274,7 +286,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "2"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -285,7 +297,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -299,7 +311,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "3"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -310,7 +322,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -324,7 +336,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_A.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "A"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -335,7 +347,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -349,7 +361,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "4"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -360,7 +372,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -374,7 +386,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "5"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -385,7 +397,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -399,7 +411,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "6"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -410,7 +422,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -424,7 +436,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_B.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "B"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -435,7 +447,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -449,7 +461,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "7"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -460,7 +472,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -474,7 +486,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "8"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -485,7 +497,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -499,7 +511,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "9"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -510,7 +522,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -524,7 +536,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_C.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "C"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -535,7 +547,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -549,7 +561,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "0"
|
||||
Trim TelephoneNumber 8
|
||||
|
|
@ -557,7 +569,7 @@
|
|||
Var TelephoneNumber# = Str# + TelephoneNumber
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -575,21 +587,21 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var Clear# = 0
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen = 0 Then
|
||||
If TelNumLen = 0 Then
|
||||
Var Clear# = 1
|
||||
EndIf
|
||||
|
||||
Trim TelephoneNumber -1
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
If Clear# = 1 Then
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var Mode# = 0
|
||||
|
|
@ -602,7 +614,7 @@
|
|||
;Var ShowErrorText = "Invisible"
|
||||
TimerReset
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -614,11 +626,11 @@
|
|||
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -627,28 +639,37 @@
|
|||
<X> 577 </X>
|
||||
<Y> 1673 </Y>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<State> Tel_Confirm_State </State>
|
||||
<State>
|
||||
eval(
|
||||
If ShowLoadingText = "Enable" Then
|
||||
Var return = "Press"
|
||||
Else
|
||||
Var return = Tel_Confirm_State
|
||||
EndIf
|
||||
)
|
||||
</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>
|
||||
<EventClick>
|
||||
|
||||
|
||||
|
||||
|
||||
If UnitTestType = "2" Then
|
||||
If TelephoneNumber = "00000001" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
Else
|
||||
|
||||
|
||||
If GetPayInfoFlag = 0 Then
|
||||
Var GetPayInfoFlag = 1
|
||||
Var ShowLoadingText = "Enable"
|
||||
|
||||
VendingQR OFF
|
||||
|
||||
|
||||
|
||||
Var Seeker.CodeNumber = TelephoneNumber
|
||||
Var RemainAmount = 0
|
||||
;PrepareDrink SelectDrink SelectSugarID
|
||||
|
|
@ -667,11 +688,11 @@
|
|||
Var ECommerce = ECommerce + TOPPING_PRICE
|
||||
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
|
||||
|
||||
|
|
@ -681,13 +702,13 @@
|
|||
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"
|
||||
|
|
@ -700,17 +721,17 @@
|
|||
|
||||
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var TelephoneNumber = Seeker.CodeNumber
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
|
||||
SAVELOG ShowTextNumber
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -742,7 +763,7 @@
|
|||
</Text>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 188 </X>
|
||||
|
|
@ -750,6 +771,13 @@
|
|||
<Filename> Var( DirImage + "/text_42.png" )</Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 260 </X>
|
||||
<Y> 990 </Y>
|
||||
<State> ShowLoadingText </State>
|
||||
<Filename> Var( DirImage + "/loadingText.png") </Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 152 </X>
|
||||
<Y> 1001 </Y>
|
||||
|
|
@ -781,9 +809,9 @@
|
|||
</Video>
|
||||
|
||||
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
</EventSecurity>
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -13,53 +13,61 @@
|
|||
Var Seeker.FreeVendingCampaign = 0
|
||||
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
|
||||
;Var VendingQRCode = "ERROR"
|
||||
;VendingQR ON
|
||||
;Var QRCODE99 = ""
|
||||
|
||||
|
||||
;CoinVending OFF
|
||||
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var ShowErrorText = "Invisible"
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
Var ErrorCause = ""
|
||||
|
||||
|
||||
If show_eng = "true" Then
|
||||
|
||||
If show_eng = "true" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||
Else
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||
EndIf
|
||||
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_mmr/"
|
||||
EndIf
|
||||
|
||||
Var Mode# = 0
|
||||
Var Str# = ""
|
||||
Var TelephoneNumber# = ""
|
||||
|
||||
|
||||
</EventOpen>
|
||||
<Timeout> 1000 </Timeout>
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
|
||||
|
||||
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 30 Then
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
Refresh
|
||||
If GetPayInfoFlag = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
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
|
||||
|
||||
TimerReset
|
||||
</EventTimeout>
|
||||
</EventTimeout>
|
||||
|
||||
<EventCoin>
|
||||
|
||||
|
|
@ -71,12 +79,14 @@
|
|||
|
||||
|
||||
<EventActionOk>
|
||||
|
||||
|
||||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
SAVELOG ECommerce
|
||||
|
||||
SPLIT ECommerce "/" 5 Seeker.VendingCode
|
||||
|
|
@ -84,19 +94,19 @@
|
|||
SPLIT ECommerce "/" 8 VendingCampaign1
|
||||
|
||||
If Seeker.VendingCode = "" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "KBA:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "AIR:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "TWN:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
SAVELOG Seeker.VendingCode
|
||||
|
|
@ -113,37 +123,37 @@
|
|||
|
||||
If IntVendingCampaign1 > 0 Then
|
||||
Var VendingCreditRemain = VendingCampaign1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
Var Seeker.IntVendingCampaign = Seeker.VendingCampaignRI3
|
||||
INT Seeker.IntVendingCampaign
|
||||
|
||||
|
||||
Var VendingREFID = SessionID
|
||||
|
||||
If Seeker.IntVendingCampaign > 0 Then
|
||||
Var QRChannel = 0
|
||||
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;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
|
||||
;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"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Else
|
||||
Var CART_INDEX = 0
|
||||
|
||||
If Seeker = "curr" Then
|
||||
If New_Payment = 1 Then
|
||||
If New_Payment = 1 Then
|
||||
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
|
||||
EndIf
|
||||
MakeDrinkV1 SelectDrink SelectSugarID
|
||||
|
|
@ -154,16 +164,16 @@
|
|||
Var TxRef1 = ""
|
||||
CreateTxRef1 TxRef1
|
||||
EndIf
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
EndIf
|
||||
|
||||
|
||||
|
|
@ -178,10 +188,10 @@
|
|||
EndIf
|
||||
EndIf
|
||||
|
||||
Else
|
||||
Else
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
|
|
@ -189,8 +199,10 @@
|
|||
|
||||
<EventActionError>
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
Var TelephoneNumber = ""
|
||||
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
|
||||
SAVELOG ShowErrorText
|
||||
|
|
@ -249,7 +261,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "1"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -260,7 +272,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -274,7 +286,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "2"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -285,7 +297,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -299,7 +311,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "3"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -310,7 +322,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -324,7 +336,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_A.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "A"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -335,7 +347,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -349,7 +361,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "4"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -360,7 +372,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -374,7 +386,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "5"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -385,7 +397,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -399,7 +411,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "6"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -410,7 +422,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -424,7 +436,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_B.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "B"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -435,7 +447,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -449,7 +461,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "7"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -460,7 +472,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -474,7 +486,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "8"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -485,7 +497,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -499,7 +511,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "9"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -510,7 +522,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -524,7 +536,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_C.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "C"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -535,7 +547,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -549,7 +561,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "0"
|
||||
Trim TelephoneNumber 8
|
||||
|
|
@ -557,7 +569,7 @@
|
|||
Var TelephoneNumber# = Str# + TelephoneNumber
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -575,21 +587,21 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var Clear# = 0
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen = 0 Then
|
||||
If TelNumLen = 0 Then
|
||||
Var Clear# = 1
|
||||
EndIf
|
||||
|
||||
Trim TelephoneNumber -1
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
If Clear# = 1 Then
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var Mode# = 0
|
||||
|
|
@ -602,7 +614,7 @@
|
|||
;Var ShowErrorText = "Invisible"
|
||||
TimerReset
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -614,11 +626,11 @@
|
|||
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -627,28 +639,37 @@
|
|||
<X> 577 </X>
|
||||
<Y> 1673 </Y>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<State> Tel_Confirm_State </State>
|
||||
<State>
|
||||
eval(
|
||||
If ShowLoadingText = "Enable" Then
|
||||
Var return = "Press"
|
||||
Else
|
||||
Var return = Tel_Confirm_State
|
||||
EndIf
|
||||
)
|
||||
</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>
|
||||
<EventClick>
|
||||
|
||||
|
||||
|
||||
|
||||
If UnitTestType = "2" Then
|
||||
If TelephoneNumber = "00000001" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
Else
|
||||
|
||||
|
||||
If GetPayInfoFlag = 0 Then
|
||||
Var GetPayInfoFlag = 1
|
||||
Var ShowLoadingText = "Enable"
|
||||
|
||||
VendingQR OFF
|
||||
|
||||
|
||||
|
||||
Var Seeker.CodeNumber = TelephoneNumber
|
||||
Var RemainAmount = 0
|
||||
;PrepareDrink SelectDrink SelectSugarID
|
||||
|
|
@ -665,13 +686,13 @@
|
|||
|
||||
Var ECommerce = ECommerce + ":"
|
||||
Var ECommerce = ECommerce + TOPPING_PRICE
|
||||
|
||||
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
|
||||
|
||||
|
|
@ -681,13 +702,13 @@
|
|||
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"
|
||||
|
|
@ -700,17 +721,17 @@
|
|||
|
||||
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var TelephoneNumber = Seeker.CodeNumber
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
|
||||
SAVELOG ShowTextNumber
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -742,7 +763,7 @@
|
|||
</Text>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 188 </X>
|
||||
|
|
@ -750,6 +771,13 @@
|
|||
<Filename> Var( DirImage + "/text_39.png" )</Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 260 </X>
|
||||
<Y> 990 </Y>
|
||||
<State> ShowLoadingText </State>
|
||||
<Filename> Var( DirImage + "/loadingText.png") </Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 152 </X>
|
||||
<Y> 1001 </Y>
|
||||
|
|
@ -781,9 +809,9 @@
|
|||
</Video>
|
||||
|
||||
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
</EventSecurity>
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -13,23 +13,24 @@
|
|||
Var Seeker.FreeVendingCampaign = 0
|
||||
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
|
||||
;Var VendingQRCode = "ERROR"
|
||||
;VendingQR ON
|
||||
;Var QRCODE99 = ""
|
||||
|
||||
|
||||
;CoinVending OFF
|
||||
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var ShowErrorText = "Invisible"
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
Var ErrorCause = ""
|
||||
|
||||
|
||||
If show_eng = "true" Then
|
||||
|
||||
If show_eng = "true" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||
Else
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||
|
|
@ -39,24 +40,31 @@
|
|||
Var Mode# = 0
|
||||
Var Str# = ""
|
||||
Var TelephoneNumber# = ""
|
||||
|
||||
|
||||
</EventOpen>
|
||||
<Timeout> 1000 </Timeout>
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
|
||||
|
||||
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 30 Then
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
Refresh
|
||||
If GetPayInfoFlag = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
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
|
||||
|
||||
TimerReset
|
||||
</EventTimeout>
|
||||
</EventTimeout>
|
||||
|
||||
<EventCoin>
|
||||
|
||||
|
|
@ -68,12 +76,14 @@
|
|||
|
||||
|
||||
<EventActionOk>
|
||||
|
||||
|
||||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
SAVELOG ECommerce
|
||||
|
||||
SPLIT ECommerce "/" 5 Seeker.VendingCode
|
||||
|
|
@ -81,19 +91,19 @@
|
|||
SPLIT ECommerce "/" 8 VendingCampaign1
|
||||
|
||||
If Seeker.VendingCode = "" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "KBA:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "AIR:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "TWN:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
SAVELOG Seeker.VendingCode
|
||||
|
|
@ -110,37 +120,37 @@
|
|||
|
||||
If IntVendingCampaign1 > 0 Then
|
||||
Var VendingCreditRemain = VendingCampaign1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
Var Seeker.IntVendingCampaign = Seeker.VendingCampaignRI3
|
||||
INT Seeker.IntVendingCampaign
|
||||
|
||||
|
||||
Var VendingREFID = SessionID
|
||||
|
||||
If Seeker.IntVendingCampaign > 0 Then
|
||||
Var QRChannel = 0
|
||||
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;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
|
||||
;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"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Else
|
||||
Var CART_INDEX = 0
|
||||
|
||||
If Seeker = "curr" Then
|
||||
If New_Payment = 1 Then
|
||||
If New_Payment = 1 Then
|
||||
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
|
||||
EndIf
|
||||
MakeDrinkV1 SelectDrink SelectSugarID
|
||||
|
|
@ -151,16 +161,16 @@
|
|||
Var TxRef1 = ""
|
||||
CreateTxRef1 TxRef1
|
||||
EndIf
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
EndIf
|
||||
|
||||
|
||||
|
|
@ -175,10 +185,10 @@
|
|||
EndIf
|
||||
EndIf
|
||||
|
||||
Else
|
||||
Else
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
|
|
@ -186,8 +196,10 @@
|
|||
|
||||
<EventActionError>
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
Var TelephoneNumber = ""
|
||||
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
|
||||
SAVELOG ShowErrorText
|
||||
|
|
@ -246,7 +258,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "1"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -257,7 +269,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -271,7 +283,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "2"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -282,7 +294,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -296,7 +308,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "3"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -307,7 +319,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -321,7 +333,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_A.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "A"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -332,7 +344,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -346,7 +358,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "4"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -357,7 +369,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -371,7 +383,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "5"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -382,7 +394,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -396,7 +408,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "6"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -407,7 +419,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -421,7 +433,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_B.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "B"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -432,7 +444,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -446,7 +458,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "7"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -457,7 +469,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -471,7 +483,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "8"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -482,7 +494,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -496,7 +508,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "9"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -507,7 +519,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -521,7 +533,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_C.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "C"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -532,7 +544,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -546,7 +558,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "0"
|
||||
Trim TelephoneNumber 8
|
||||
|
|
@ -554,7 +566,7 @@
|
|||
Var TelephoneNumber# = Str# + TelephoneNumber
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -572,21 +584,21 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var Clear# = 0
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen = 0 Then
|
||||
If TelNumLen = 0 Then
|
||||
Var Clear# = 1
|
||||
EndIf
|
||||
|
||||
Trim TelephoneNumber -1
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
If Clear# = 1 Then
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var Mode# = 0
|
||||
|
|
@ -599,7 +611,7 @@
|
|||
;Var ShowErrorText = "Invisible"
|
||||
TimerReset
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -611,11 +623,11 @@
|
|||
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -624,28 +636,37 @@
|
|||
<X> 577 </X>
|
||||
<Y> 1673 </Y>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<State> Tel_Confirm_State </State>
|
||||
<State>
|
||||
eval(
|
||||
If ShowLoadingText = "Enable" Then
|
||||
Var return = "Press"
|
||||
Else
|
||||
Var return = Tel_Confirm_State
|
||||
EndIf
|
||||
)
|
||||
</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>
|
||||
<EventClick>
|
||||
|
||||
|
||||
|
||||
|
||||
If UnitTestType = "2" Then
|
||||
If TelephoneNumber = "00000001" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
Else
|
||||
|
||||
|
||||
If GetPayInfoFlag = 0 Then
|
||||
Var GetPayInfoFlag = 1
|
||||
Var ShowLoadingText = "Enable"
|
||||
|
||||
VendingQR OFF
|
||||
|
||||
|
||||
|
||||
Var Seeker.CodeNumber = TelephoneNumber
|
||||
Var RemainAmount = 0
|
||||
;PrepareDrink SelectDrink SelectSugarID
|
||||
|
|
@ -662,13 +683,13 @@
|
|||
|
||||
Var ECommerce = ECommerce + ":"
|
||||
Var ECommerce = ECommerce + TOPPING_PRICE
|
||||
|
||||
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
|
||||
|
||||
|
|
@ -678,13 +699,13 @@
|
|||
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"
|
||||
|
|
@ -697,17 +718,17 @@
|
|||
|
||||
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var TelephoneNumber = Seeker.CodeNumber
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
|
||||
SAVELOG ShowTextNumber
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -739,7 +760,7 @@
|
|||
</Text>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 188 </X>
|
||||
|
|
@ -747,6 +768,13 @@
|
|||
<Filename> Var( DirImage + "/text_38.png" )</Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 260 </X>
|
||||
<Y> 990 </Y>
|
||||
<State> ShowLoadingText </State>
|
||||
<Filename> Var( DirImage + "/loadingText.png") </Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 152 </X>
|
||||
<Y> 1001 </Y>
|
||||
|
|
@ -778,9 +806,9 @@
|
|||
</Video>
|
||||
|
||||
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
</EventSecurity>
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -13,23 +13,24 @@
|
|||
Var Seeker.FreeVendingCampaign = 0
|
||||
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
|
||||
;Var VendingQRCode = "ERROR"
|
||||
;VendingQR ON
|
||||
;Var QRCODE99 = ""
|
||||
|
||||
|
||||
;CoinVending OFF
|
||||
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var ShowErrorText = "Invisible"
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
Var ErrorCause = ""
|
||||
|
||||
|
||||
If show_eng = "true" Then
|
||||
|
||||
If show_eng = "true" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||
Else
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||
|
|
@ -39,24 +40,31 @@
|
|||
Var Mode# = 0
|
||||
Var Str# = ""
|
||||
Var TelephoneNumber# = ""
|
||||
|
||||
|
||||
</EventOpen>
|
||||
<Timeout> 1000 </Timeout>
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
|
||||
|
||||
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 30 Then
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
Refresh
|
||||
If GetPayInfoFlag = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
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
|
||||
|
||||
TimerReset
|
||||
</EventTimeout>
|
||||
</EventTimeout>
|
||||
|
||||
<EventCoin>
|
||||
|
||||
|
|
@ -68,12 +76,14 @@
|
|||
|
||||
|
||||
<EventActionOk>
|
||||
|
||||
|
||||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
SAVELOG ECommerce
|
||||
|
||||
SPLIT ECommerce "/" 5 Seeker.VendingCode
|
||||
|
|
@ -81,19 +91,19 @@
|
|||
SPLIT ECommerce "/" 8 VendingCampaign1
|
||||
|
||||
If Seeker.VendingCode = "" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "KBA:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "AIR:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "TWN:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
SAVELOG Seeker.VendingCode
|
||||
|
|
@ -110,37 +120,37 @@
|
|||
|
||||
If IntVendingCampaign1 > 0 Then
|
||||
Var VendingCreditRemain = VendingCampaign1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
Var Seeker.IntVendingCampaign = Seeker.VendingCampaignRI3
|
||||
INT Seeker.IntVendingCampaign
|
||||
|
||||
|
||||
Var VendingREFID = SessionID
|
||||
|
||||
If Seeker.IntVendingCampaign > 0 Then
|
||||
Var QRChannel = 0
|
||||
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;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
|
||||
;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"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Else
|
||||
Var CART_INDEX = 0
|
||||
|
||||
If Seeker = "curr" Then
|
||||
If New_Payment = 1 Then
|
||||
If New_Payment = 1 Then
|
||||
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
|
||||
EndIf
|
||||
MakeDrinkV1 SelectDrink SelectSugarID
|
||||
|
|
@ -154,16 +164,16 @@
|
|||
Var DrinkPaid = SelectDrink
|
||||
Var PaidPaymentFromNextStage = 1
|
||||
EndIf
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
EndIf
|
||||
|
||||
|
||||
|
|
@ -178,10 +188,10 @@
|
|||
EndIf
|
||||
EndIf
|
||||
|
||||
Else
|
||||
Else
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
|
|
@ -189,8 +199,10 @@
|
|||
|
||||
<EventActionError>
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
Var TelephoneNumber = ""
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
Var TelephoneNumber = ""
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
|
||||
SAVELOG ShowErrorText
|
||||
|
|
@ -249,7 +261,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "1"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -260,7 +272,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -274,7 +286,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "2"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -285,7 +297,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -299,7 +311,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "3"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -310,7 +322,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -324,7 +336,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_A.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "A"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -335,7 +347,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -349,7 +361,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "4"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -360,7 +372,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -374,7 +386,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "5"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -385,7 +397,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -399,7 +411,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "6"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -410,7 +422,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -424,7 +436,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_B.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "B"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -435,7 +447,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -449,7 +461,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "7"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -460,7 +472,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -474,7 +486,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "8"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -485,7 +497,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -499,7 +511,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "9"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -510,7 +522,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -524,7 +536,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_C.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "C"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -535,7 +547,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -549,7 +561,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "0"
|
||||
Trim TelephoneNumber 8
|
||||
|
|
@ -557,7 +569,7 @@
|
|||
Var TelephoneNumber# = Str# + TelephoneNumber
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -575,21 +587,21 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var Clear# = 0
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen = 0 Then
|
||||
If TelNumLen = 0 Then
|
||||
Var Clear# = 1
|
||||
EndIf
|
||||
|
||||
Trim TelephoneNumber -1
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
If Clear# = 1 Then
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var Mode# = 0
|
||||
|
|
@ -602,7 +614,7 @@
|
|||
;Var ShowErrorText = "Invisible"
|
||||
TimerReset
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -614,11 +626,11 @@
|
|||
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -627,28 +639,37 @@
|
|||
<X> 577 </X>
|
||||
<Y> 1673 </Y>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<State> Tel_Confirm_State </State>
|
||||
<State>
|
||||
eval(
|
||||
If ShowLoadingText = "Enable" Then
|
||||
Var return = "Press"
|
||||
Else
|
||||
Var return = Tel_Confirm_State
|
||||
EndIf
|
||||
)
|
||||
</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>
|
||||
<EventClick>
|
||||
|
||||
|
||||
|
||||
|
||||
If UnitTestType = "2" Then
|
||||
If TelephoneNumber = "00000001" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
Else
|
||||
|
||||
|
||||
If GetPayInfoFlag = 0 Then
|
||||
Var GetPayInfoFlag = 1
|
||||
Var ShowLoadingText = "Enable"
|
||||
|
||||
VendingQR OFF
|
||||
|
||||
|
||||
|
||||
Var Seeker.CodeNumber = TelephoneNumber
|
||||
Var RemainAmount = 0
|
||||
;PrepareDrink SelectDrink SelectSugarID
|
||||
|
|
@ -665,13 +686,13 @@
|
|||
|
||||
Var ECommerce = ECommerce + ":"
|
||||
Var ECommerce = ECommerce + TOPPING_PRICE
|
||||
|
||||
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
|
||||
|
||||
|
|
@ -681,13 +702,13 @@
|
|||
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"
|
||||
|
|
@ -700,17 +721,17 @@
|
|||
|
||||
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var TelephoneNumber = Seeker.CodeNumber
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
|
||||
SAVELOG ShowTextNumber
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -742,7 +763,7 @@
|
|||
</Text>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 188 </X>
|
||||
|
|
@ -750,6 +771,13 @@
|
|||
<Filename> Var( DirImage + "/text_32.png" )</Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 260 </X>
|
||||
<Y> 990 </Y>
|
||||
<State> ShowLoadingText </State>
|
||||
<Filename> Var( DirImage + "/loadingText.png") </Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 152 </X>
|
||||
<Y> 1001 </Y>
|
||||
|
|
@ -781,9 +809,9 @@
|
|||
</Video>
|
||||
|
||||
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
</EventSecurity>
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -13,53 +13,61 @@
|
|||
Var Seeker.FreeVendingCampaign = 0
|
||||
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
|
||||
;Var VendingQRCode = "ERROR"
|
||||
;VendingQR ON
|
||||
;Var QRCODE99 = ""
|
||||
|
||||
|
||||
;CoinVending OFF
|
||||
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var ShowErrorText = "Invisible"
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
Var ErrorCause = ""
|
||||
|
||||
|
||||
If show_eng = "true" Then
|
||||
|
||||
If show_eng = "true" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||
Else
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||
EndIf
|
||||
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_mmr/"
|
||||
EndIf
|
||||
|
||||
Var Mode# = 0
|
||||
Var Str# = ""
|
||||
Var TelephoneNumber# = ""
|
||||
|
||||
|
||||
</EventOpen>
|
||||
<Timeout> 1000 </Timeout>
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
|
||||
|
||||
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 30 Then
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
Refresh
|
||||
If GetPayInfoFlag = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
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
|
||||
|
||||
TimerReset
|
||||
</EventTimeout>
|
||||
</EventTimeout>
|
||||
|
||||
<EventCoin>
|
||||
|
||||
|
|
@ -71,12 +79,14 @@
|
|||
|
||||
|
||||
<EventActionOk>
|
||||
|
||||
|
||||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
SAVELOG ECommerce
|
||||
|
||||
SPLIT ECommerce "/" 5 Seeker.VendingCode
|
||||
|
|
@ -84,19 +94,19 @@
|
|||
SPLIT ECommerce "/" 8 VendingCampaign1
|
||||
|
||||
If Seeker.VendingCode = "" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "KBA:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "AIR:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "TWN:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
SAVELOG Seeker.VendingCode
|
||||
|
|
@ -113,37 +123,37 @@
|
|||
|
||||
If IntVendingCampaign1 > 0 Then
|
||||
Var VendingCreditRemain = VendingCampaign1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
Var Seeker.IntVendingCampaign = Seeker.VendingCampaignRI3
|
||||
INT Seeker.IntVendingCampaign
|
||||
|
||||
|
||||
Var VendingREFID = SessionID
|
||||
|
||||
If Seeker.IntVendingCampaign > 0 Then
|
||||
Var QRChannel = 0
|
||||
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;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
|
||||
;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"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Else
|
||||
Var CART_INDEX = 0
|
||||
|
||||
If Seeker = "curr" Then
|
||||
If New_Payment = 1 Then
|
||||
If New_Payment = 1 Then
|
||||
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
|
||||
EndIf
|
||||
MakeDrinkV1 SelectDrink SelectSugarID
|
||||
|
|
@ -157,16 +167,16 @@
|
|||
Var DrinkPaid = SelectDrink
|
||||
Var PaidPaymentFromNextStage = 1
|
||||
EndIf
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
EndIf
|
||||
|
||||
|
||||
|
|
@ -181,10 +191,10 @@
|
|||
EndIf
|
||||
EndIf
|
||||
|
||||
Else
|
||||
Else
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
|
|
@ -192,8 +202,10 @@
|
|||
|
||||
<EventActionError>
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
Var TelephoneNumber = ""
|
||||
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
|
||||
SAVELOG ShowErrorText
|
||||
|
|
@ -252,7 +264,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "1"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -263,7 +275,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -277,7 +289,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "2"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -288,7 +300,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -302,7 +314,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "3"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -313,7 +325,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -327,7 +339,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_A.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "A"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -338,7 +350,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -352,7 +364,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "4"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -363,7 +375,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -377,7 +389,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "5"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -388,7 +400,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -402,7 +414,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "6"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -413,7 +425,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -427,7 +439,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_B.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "B"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -438,7 +450,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -452,7 +464,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "7"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -463,7 +475,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -477,7 +489,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "8"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -488,7 +500,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -502,7 +514,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "9"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -513,7 +525,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -527,7 +539,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_C.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "C"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -538,7 +550,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -552,7 +564,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "0"
|
||||
Trim TelephoneNumber 8
|
||||
|
|
@ -560,7 +572,7 @@
|
|||
Var TelephoneNumber# = Str# + TelephoneNumber
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -578,21 +590,21 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var Clear# = 0
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen = 0 Then
|
||||
If TelNumLen = 0 Then
|
||||
Var Clear# = 1
|
||||
EndIf
|
||||
|
||||
Trim TelephoneNumber -1
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
If Clear# = 1 Then
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var Mode# = 0
|
||||
|
|
@ -605,7 +617,7 @@
|
|||
;Var ShowErrorText = "Invisible"
|
||||
TimerReset
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -617,11 +629,11 @@
|
|||
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -630,28 +642,37 @@
|
|||
<X> 577 </X>
|
||||
<Y> 1673 </Y>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<State> Tel_Confirm_State </State>
|
||||
<State>
|
||||
eval(
|
||||
If ShowLoadingText = "Enable" Then
|
||||
Var return = "Press"
|
||||
Else
|
||||
Var return = Tel_Confirm_State
|
||||
EndIf
|
||||
)
|
||||
</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>
|
||||
<EventClick>
|
||||
|
||||
|
||||
|
||||
|
||||
If UnitTestType = "2" Then
|
||||
If TelephoneNumber = "00000001" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
Else
|
||||
|
||||
|
||||
If GetPayInfoFlag = 0 Then
|
||||
Var GetPayInfoFlag = 1
|
||||
Var ShowLoadingText = "Enable"
|
||||
|
||||
VendingQR OFF
|
||||
|
||||
|
||||
|
||||
Var Seeker.CodeNumber = TelephoneNumber
|
||||
Var RemainAmount = 0
|
||||
;PrepareDrink SelectDrink SelectSugarID
|
||||
|
|
@ -668,13 +689,13 @@
|
|||
|
||||
Var ECommerce = ECommerce + ":"
|
||||
Var ECommerce = ECommerce + TOPPING_PRICE
|
||||
|
||||
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
|
||||
|
||||
|
|
@ -684,13 +705,13 @@
|
|||
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"
|
||||
|
|
@ -703,17 +724,17 @@
|
|||
|
||||
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var TelephoneNumber = Seeker.CodeNumber
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
|
||||
SAVELOG ShowTextNumber
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -745,7 +766,7 @@
|
|||
</Text>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 188 </X>
|
||||
|
|
@ -753,6 +774,13 @@
|
|||
<Filename> Var( DirImage + "/text_40.png" )</Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 260 </X>
|
||||
<Y> 990 </Y>
|
||||
<State> ShowLoadingText </State>
|
||||
<Filename> Var( DirImage + "/loadingText.png") </Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 152 </X>
|
||||
<Y> 1001 </Y>
|
||||
|
|
@ -784,9 +812,9 @@
|
|||
</Video>
|
||||
|
||||
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
</EventSecurity>
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -13,29 +13,30 @@
|
|||
Var Seeker.FreeVendingCampaign = 0
|
||||
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
|
||||
;Var VendingQRCode = "ERROR"
|
||||
;VendingQR ON
|
||||
;Var QRCODE99 = ""
|
||||
|
||||
|
||||
;CoinVending OFF
|
||||
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var ShowErrorText = "Invisible"
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
Var ErrorCause = ""
|
||||
|
||||
|
||||
If show_eng = "true" Then
|
||||
|
||||
If show_eng = "true" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||
Else
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||
EndIf
|
||||
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_mmr/"
|
||||
EndIf
|
||||
|
||||
|
|
@ -43,24 +44,31 @@
|
|||
Var Mode# = 0
|
||||
Var Str# = ""
|
||||
Var TelephoneNumber# = ""
|
||||
|
||||
|
||||
</EventOpen>
|
||||
<Timeout> 1000 </Timeout>
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
|
||||
|
||||
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 30 Then
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
Refresh
|
||||
If GetPayInfoFlag = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
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
|
||||
|
||||
TimerReset
|
||||
</EventTimeout>
|
||||
</EventTimeout>
|
||||
|
||||
<EventCoin>
|
||||
|
||||
|
|
@ -72,12 +80,14 @@
|
|||
|
||||
|
||||
<EventActionOk>
|
||||
|
||||
|
||||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
SAVELOG ECommerce
|
||||
|
||||
SPLIT ECommerce "/" 5 Seeker.VendingCode
|
||||
|
|
@ -85,19 +95,19 @@
|
|||
SPLIT ECommerce "/" 8 VendingCampaign1
|
||||
|
||||
If Seeker.VendingCode = "" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "KBA:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "AIR:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "TWN:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
SAVELOG Seeker.VendingCode
|
||||
|
|
@ -114,37 +124,37 @@
|
|||
|
||||
If IntVendingCampaign1 > 0 Then
|
||||
Var VendingCreditRemain = VendingCampaign1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
Var Seeker.IntVendingCampaign = Seeker.VendingCampaignRI3
|
||||
INT Seeker.IntVendingCampaign
|
||||
|
||||
|
||||
Var VendingREFID = SessionID
|
||||
|
||||
If Seeker.IntVendingCampaign > 0 Then
|
||||
Var QRChannel = 0
|
||||
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;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
|
||||
;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"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Else
|
||||
Var CART_INDEX = 0
|
||||
|
||||
If Seeker = "curr" Then
|
||||
If New_Payment = 1 Then
|
||||
If New_Payment = 1 Then
|
||||
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
|
||||
EndIf
|
||||
MakeDrinkV1 SelectDrink SelectSugarID
|
||||
|
|
@ -158,16 +168,16 @@
|
|||
Var DrinkPaid = SelectDrink
|
||||
Var PaidPaymentFromNextStage = 1
|
||||
EndIf
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
EndIf
|
||||
|
||||
|
||||
|
|
@ -182,10 +192,10 @@
|
|||
EndIf
|
||||
EndIf
|
||||
|
||||
Else
|
||||
Else
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
|
|
@ -193,8 +203,10 @@
|
|||
|
||||
<EventActionError>
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
Var TelephoneNumber = ""
|
||||
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
|
||||
SAVELOG ShowErrorText
|
||||
|
|
@ -253,7 +265,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "1"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -264,7 +276,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -278,7 +290,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "2"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -289,7 +301,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -303,7 +315,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "3"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -314,7 +326,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -328,7 +340,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_A.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "A"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -339,7 +351,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -353,7 +365,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "4"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -364,7 +376,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -378,7 +390,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "5"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -389,7 +401,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -403,7 +415,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "6"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -414,7 +426,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -428,7 +440,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_B.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "B"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -439,7 +451,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -453,7 +465,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "7"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -464,7 +476,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -478,7 +490,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "8"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -489,7 +501,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -503,7 +515,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "9"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -514,7 +526,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -528,7 +540,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_C.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "C"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -539,7 +551,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -553,7 +565,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "0"
|
||||
Trim TelephoneNumber 8
|
||||
|
|
@ -561,7 +573,7 @@
|
|||
Var TelephoneNumber# = Str# + TelephoneNumber
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -579,21 +591,21 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var Clear# = 0
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen = 0 Then
|
||||
If TelNumLen = 0 Then
|
||||
Var Clear# = 1
|
||||
EndIf
|
||||
|
||||
Trim TelephoneNumber -1
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
If Clear# = 1 Then
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var Mode# = 0
|
||||
|
|
@ -606,7 +618,7 @@
|
|||
;Var ShowErrorText = "Invisible"
|
||||
TimerReset
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -618,11 +630,11 @@
|
|||
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -631,28 +643,37 @@
|
|||
<X> 577 </X>
|
||||
<Y> 1673 </Y>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<State> Tel_Confirm_State </State>
|
||||
<State>
|
||||
eval(
|
||||
If ShowLoadingText = "Enable" Then
|
||||
Var return = "Press"
|
||||
Else
|
||||
Var return = Tel_Confirm_State
|
||||
EndIf
|
||||
)
|
||||
</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>
|
||||
<EventClick>
|
||||
|
||||
|
||||
|
||||
|
||||
If UnitTestType = "2" Then
|
||||
If TelephoneNumber = "00000001" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
Else
|
||||
|
||||
|
||||
If GetPayInfoFlag = 0 Then
|
||||
Var GetPayInfoFlag = 1
|
||||
Var ShowLoadingText = "Enable"
|
||||
|
||||
VendingQR OFF
|
||||
|
||||
|
||||
|
||||
Var Seeker.CodeNumber = TelephoneNumber
|
||||
Var RemainAmount = 0
|
||||
;PrepareDrink SelectDrink SelectSugarID
|
||||
|
|
@ -669,13 +690,13 @@
|
|||
|
||||
Var ECommerce = ECommerce + ":"
|
||||
Var ECommerce = ECommerce + TOPPING_PRICE
|
||||
|
||||
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
|
||||
|
||||
|
|
@ -685,13 +706,13 @@
|
|||
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"
|
||||
|
|
@ -704,17 +725,17 @@
|
|||
|
||||
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var TelephoneNumber = Seeker.CodeNumber
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
|
||||
SAVELOG ShowTextNumber
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -746,7 +767,7 @@
|
|||
</Text>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 188 </X>
|
||||
|
|
@ -754,6 +775,13 @@
|
|||
<Filename> Var( DirImage + "/text_41.png" )</Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 260 </X>
|
||||
<Y> 990 </Y>
|
||||
<State> ShowLoadingText </State>
|
||||
<Filename> Var( DirImage + "/loadingText.png") </Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 152 </X>
|
||||
<Y> 1001 </Y>
|
||||
|
|
@ -785,9 +813,9 @@
|
|||
</Video>
|
||||
|
||||
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
</EventSecurity>
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -13,23 +13,24 @@
|
|||
Var Seeker.FreeVendingCampaign = 0
|
||||
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
|
||||
;Var VendingQRCode = "ERROR"
|
||||
;VendingQR ON
|
||||
;Var QRCODE99 = ""
|
||||
|
||||
|
||||
;CoinVending OFF
|
||||
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var ShowErrorText = "Invisible"
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
Var ErrorCause = ""
|
||||
|
||||
|
||||
If show_eng = "true" Then
|
||||
|
||||
If show_eng = "true" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||
Else
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||
|
|
@ -39,24 +40,31 @@
|
|||
Var Mode# = 0
|
||||
Var Str# = ""
|
||||
Var TelephoneNumber# = ""
|
||||
|
||||
|
||||
</EventOpen>
|
||||
<Timeout> 1000 </Timeout>
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
|
||||
|
||||
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 30 Then
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
Refresh
|
||||
If GetPayInfoFlag = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
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
|
||||
|
||||
TimerReset
|
||||
</EventTimeout>
|
||||
</EventTimeout>
|
||||
|
||||
<EventCoin>
|
||||
|
||||
|
|
@ -68,12 +76,14 @@
|
|||
|
||||
|
||||
<EventActionOk>
|
||||
|
||||
|
||||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
SAVELOG ECommerce
|
||||
|
||||
SPLIT ECommerce "/" 5 Seeker.VendingCode
|
||||
|
|
@ -81,19 +91,19 @@
|
|||
SPLIT ECommerce "/" 8 VendingCampaign1
|
||||
|
||||
If Seeker.VendingCode = "" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "KBA:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "AIR:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "TWN:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
SAVELOG Seeker.VendingCode
|
||||
|
|
@ -110,37 +120,37 @@
|
|||
|
||||
If IntVendingCampaign1 > 0 Then
|
||||
Var VendingCreditRemain = VendingCampaign1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
Var Seeker.IntVendingCampaign = Seeker.VendingCampaignRI3
|
||||
INT Seeker.IntVendingCampaign
|
||||
|
||||
|
||||
Var VendingREFID = SessionID
|
||||
|
||||
If Seeker.IntVendingCampaign > 0 Then
|
||||
Var QRChannel = 0
|
||||
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;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
|
||||
;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"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Else
|
||||
Var CART_INDEX = 0
|
||||
|
||||
If Seeker = "curr" Then
|
||||
If New_Payment = 1 Then
|
||||
If New_Payment = 1 Then
|
||||
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
|
||||
EndIf
|
||||
MakeDrinkV1 SelectDrink SelectSugarID
|
||||
|
|
@ -154,16 +164,16 @@
|
|||
Var DrinkPaid = SelectDrink
|
||||
Var PaidPaymentFromNextStage = 1
|
||||
EndIf
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
EndIf
|
||||
|
||||
|
||||
|
|
@ -178,10 +188,10 @@
|
|||
EndIf
|
||||
EndIf
|
||||
|
||||
Else
|
||||
Else
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
|
|
@ -189,8 +199,10 @@
|
|||
|
||||
<EventActionError>
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
Var TelephoneNumber = ""
|
||||
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
|
||||
SAVELOG ShowErrorText
|
||||
|
|
@ -249,7 +261,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "1"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -260,7 +272,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -274,7 +286,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "2"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -285,7 +297,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -299,7 +311,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "3"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -310,7 +322,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -324,7 +336,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_A.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "A"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -335,7 +347,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -349,7 +361,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "4"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -360,7 +372,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -374,7 +386,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "5"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -385,7 +397,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -399,7 +411,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "6"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -410,7 +422,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -424,7 +436,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_B.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "B"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -435,7 +447,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -449,7 +461,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "7"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -460,7 +472,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -474,7 +486,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "8"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -485,7 +497,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -499,7 +511,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "9"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -510,7 +522,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -524,7 +536,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_C.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "C"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -535,7 +547,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -549,7 +561,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "0"
|
||||
Trim TelephoneNumber 8
|
||||
|
|
@ -557,7 +569,7 @@
|
|||
Var TelephoneNumber# = Str# + TelephoneNumber
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -575,21 +587,21 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var Clear# = 0
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen = 0 Then
|
||||
If TelNumLen = 0 Then
|
||||
Var Clear# = 1
|
||||
EndIf
|
||||
|
||||
Trim TelephoneNumber -1
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
If Clear# = 1 Then
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var Mode# = 0
|
||||
|
|
@ -602,7 +614,7 @@
|
|||
;Var ShowErrorText = "Invisible"
|
||||
TimerReset
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -614,11 +626,11 @@
|
|||
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -627,28 +639,37 @@
|
|||
<X> 577 </X>
|
||||
<Y> 1673 </Y>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<State> Tel_Confirm_State </State>
|
||||
<State>
|
||||
eval(
|
||||
If ShowLoadingText = "Enable" Then
|
||||
Var return = "Press"
|
||||
Else
|
||||
Var return = Tel_Confirm_State
|
||||
EndIf
|
||||
)
|
||||
</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>
|
||||
<EventClick>
|
||||
|
||||
|
||||
|
||||
|
||||
If UnitTestType = "2" Then
|
||||
If TelephoneNumber = "00000001" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
Else
|
||||
|
||||
|
||||
If GetPayInfoFlag = 0 Then
|
||||
Var GetPayInfoFlag = 1
|
||||
Var ShowLoadingText = "Enable"
|
||||
|
||||
VendingQR OFF
|
||||
|
||||
|
||||
|
||||
Var Seeker.CodeNumber = TelephoneNumber
|
||||
Var RemainAmount = 0
|
||||
;PrepareDrink SelectDrink SelectSugarID
|
||||
|
|
@ -665,13 +686,13 @@
|
|||
|
||||
Var ECommerce = ECommerce + ":"
|
||||
Var ECommerce = ECommerce + TOPPING_PRICE
|
||||
|
||||
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
|
||||
|
||||
|
|
@ -681,13 +702,13 @@
|
|||
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"
|
||||
|
|
@ -700,17 +721,17 @@
|
|||
|
||||
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var TelephoneNumber = Seeker.CodeNumber
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
|
||||
SAVELOG ShowTextNumber
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -742,7 +763,7 @@
|
|||
</Text>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 188 </X>
|
||||
|
|
@ -750,6 +771,13 @@
|
|||
<Filename> Var( DirImage + "/text_36.png" )</Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 260 </X>
|
||||
<Y> 990 </Y>
|
||||
<State> ShowLoadingText </State>
|
||||
<Filename> Var( DirImage + "/loadingText.png") </Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 152 </X>
|
||||
<Y> 1001 </Y>
|
||||
|
|
@ -781,9 +809,9 @@
|
|||
</Video>
|
||||
|
||||
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
</EventSecurity>
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -13,29 +13,30 @@
|
|||
Var Seeker.FreeVendingCampaign = 0
|
||||
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
|
||||
;Var VendingQRCode = "ERROR"
|
||||
;VendingQR ON
|
||||
;Var QRCODE99 = ""
|
||||
|
||||
|
||||
;CoinVending OFF
|
||||
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var ShowErrorText = "Invisible"
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
Var ErrorCause = ""
|
||||
|
||||
|
||||
If show_eng = "true" Then
|
||||
|
||||
If show_eng = "true" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||
Else
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||
EndIf
|
||||
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_mmr/"
|
||||
EndIf
|
||||
|
||||
|
|
@ -43,24 +44,31 @@
|
|||
Var Mode# = 0
|
||||
Var Str# = ""
|
||||
Var TelephoneNumber# = ""
|
||||
|
||||
|
||||
</EventOpen>
|
||||
<Timeout> 1000 </Timeout>
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
|
||||
|
||||
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 30 Then
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
Refresh
|
||||
If GetPayInfoFlag = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
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
|
||||
|
||||
TimerReset
|
||||
</EventTimeout>
|
||||
</EventTimeout>
|
||||
|
||||
<EventCoin>
|
||||
|
||||
|
|
@ -72,12 +80,14 @@
|
|||
|
||||
|
||||
<EventActionOk>
|
||||
|
||||
|
||||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
SAVELOG ECommerce
|
||||
|
||||
SPLIT ECommerce "/" 5 Seeker.VendingCode
|
||||
|
|
@ -85,19 +95,19 @@
|
|||
SPLIT ECommerce "/" 8 VendingCampaign1
|
||||
|
||||
If Seeker.VendingCode = "" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "KBA:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "AIR:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "TWN:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
SAVELOG Seeker.VendingCode
|
||||
|
|
@ -114,37 +124,37 @@
|
|||
|
||||
If IntVendingCampaign1 > 0 Then
|
||||
Var VendingCreditRemain = VendingCampaign1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
Var Seeker.IntVendingCampaign = Seeker.VendingCampaignRI3
|
||||
INT Seeker.IntVendingCampaign
|
||||
|
||||
|
||||
Var VendingREFID = SessionID
|
||||
|
||||
If Seeker.IntVendingCampaign > 0 Then
|
||||
Var QRChannel = 0
|
||||
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;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
|
||||
;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"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Else
|
||||
Var CART_INDEX = 0
|
||||
|
||||
If Seeker = "curr" Then
|
||||
If New_Payment = 1 Then
|
||||
If New_Payment = 1 Then
|
||||
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
|
||||
EndIf
|
||||
MakeDrinkV1 SelectDrink SelectSugarID
|
||||
|
|
@ -158,16 +168,16 @@
|
|||
Var DrinkPaid = SelectDrink
|
||||
Var PaidPaymentFromNextStage = 1
|
||||
EndIf
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
EndIf
|
||||
|
||||
|
||||
|
|
@ -182,10 +192,10 @@
|
|||
EndIf
|
||||
EndIf
|
||||
|
||||
Else
|
||||
Else
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
|
|
@ -193,8 +203,10 @@
|
|||
|
||||
<EventActionError>
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
Var TelephoneNumber = ""
|
||||
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
|
||||
SAVELOG ShowErrorText
|
||||
|
|
@ -253,7 +265,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "1"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -264,7 +276,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -278,7 +290,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "2"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -289,7 +301,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -303,7 +315,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "3"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -314,7 +326,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -328,7 +340,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_A.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "A"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -339,7 +351,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -353,7 +365,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "4"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -364,7 +376,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -378,7 +390,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "5"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -389,7 +401,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -403,7 +415,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "6"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -414,7 +426,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -428,7 +440,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_B.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "B"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -439,7 +451,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -453,7 +465,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "7"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -464,7 +476,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -478,7 +490,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "8"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -489,7 +501,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -503,7 +515,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "9"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -514,7 +526,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -528,7 +540,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_C.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "C"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -539,7 +551,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -553,7 +565,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "0"
|
||||
Trim TelephoneNumber 8
|
||||
|
|
@ -561,7 +573,7 @@
|
|||
Var TelephoneNumber# = Str# + TelephoneNumber
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -579,21 +591,21 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var Clear# = 0
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen = 0 Then
|
||||
If TelNumLen = 0 Then
|
||||
Var Clear# = 1
|
||||
EndIf
|
||||
|
||||
Trim TelephoneNumber -1
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
If Clear# = 1 Then
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var Mode# = 0
|
||||
|
|
@ -606,7 +618,7 @@
|
|||
;Var ShowErrorText = "Invisible"
|
||||
TimerReset
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -618,11 +630,11 @@
|
|||
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -631,28 +643,37 @@
|
|||
<X> 577 </X>
|
||||
<Y> 1673 </Y>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<State> Tel_Confirm_State </State>
|
||||
<State>
|
||||
eval(
|
||||
If ShowLoadingText = "Enable" Then
|
||||
Var return = "Press"
|
||||
Else
|
||||
Var return = Tel_Confirm_State
|
||||
EndIf
|
||||
)
|
||||
</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>
|
||||
<EventClick>
|
||||
|
||||
|
||||
|
||||
|
||||
If UnitTestType = "2" Then
|
||||
If TelephoneNumber = "00000001" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
Else
|
||||
|
||||
|
||||
If GetPayInfoFlag = 0 Then
|
||||
Var GetPayInfoFlag = 1
|
||||
Var ShowLoadingText = "Enable"
|
||||
|
||||
VendingQR OFF
|
||||
|
||||
|
||||
|
||||
Var Seeker.CodeNumber = TelephoneNumber
|
||||
Var RemainAmount = 0
|
||||
;PrepareDrink SelectDrink SelectSugarID
|
||||
|
|
@ -669,13 +690,13 @@
|
|||
|
||||
Var ECommerce = ECommerce + ":"
|
||||
Var ECommerce = ECommerce + TOPPING_PRICE
|
||||
|
||||
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
|
||||
|
||||
|
|
@ -685,13 +706,13 @@
|
|||
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"
|
||||
|
|
@ -704,17 +725,17 @@
|
|||
|
||||
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var TelephoneNumber = Seeker.CodeNumber
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
|
||||
SAVELOG ShowTextNumber
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -746,7 +767,7 @@
|
|||
</Text>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 188 </X>
|
||||
|
|
@ -754,6 +775,13 @@
|
|||
<Filename> Var( DirImage + "/text_33.png" )</Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 260 </X>
|
||||
<Y> 990 </Y>
|
||||
<State> ShowLoadingText </State>
|
||||
<Filename> Var( DirImage + "/loadingText.png") </Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 152 </X>
|
||||
<Y> 1001 </Y>
|
||||
|
|
@ -785,9 +813,9 @@
|
|||
</Video>
|
||||
|
||||
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
</EventSecurity>
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -13,29 +13,30 @@
|
|||
Var Seeker.FreeVendingCampaign = 0
|
||||
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
|
||||
;Var VendingQRCode = "ERROR"
|
||||
;VendingQR ON
|
||||
;Var QRCODE99 = ""
|
||||
|
||||
|
||||
;CoinVending OFF
|
||||
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var ShowErrorText = "Invisible"
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
Var ErrorCause = ""
|
||||
|
||||
|
||||
If show_eng = "true" Then
|
||||
|
||||
If show_eng = "true" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||
Else
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||
EndIf
|
||||
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
If LanguageShow = "MYANMAR" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_mmr/"
|
||||
EndIf
|
||||
|
||||
|
|
@ -43,24 +44,31 @@
|
|||
Var Mode# = 0
|
||||
Var Str# = ""
|
||||
Var TelephoneNumber# = ""
|
||||
|
||||
|
||||
</EventOpen>
|
||||
<Timeout> 1000 </Timeout>
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
|
||||
|
||||
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 30 Then
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
Refresh
|
||||
If GetPayInfoFlag = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
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
|
||||
|
||||
TimerReset
|
||||
</EventTimeout>
|
||||
</EventTimeout>
|
||||
|
||||
<EventCoin>
|
||||
|
||||
|
|
@ -72,12 +80,14 @@
|
|||
|
||||
|
||||
<EventActionOk>
|
||||
|
||||
|
||||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
SAVELOG ECommerce
|
||||
|
||||
SPLIT ECommerce "/" 5 Seeker.VendingCode
|
||||
|
|
@ -85,19 +95,19 @@
|
|||
SPLIT ECommerce "/" 8 VendingCampaign1
|
||||
|
||||
If Seeker.VendingCode = "" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "KBA:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "AIR:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "TWN:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
SAVELOG Seeker.VendingCode
|
||||
|
|
@ -114,37 +124,37 @@
|
|||
|
||||
If IntVendingCampaign1 > 0 Then
|
||||
Var VendingCreditRemain = VendingCampaign1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
Var Seeker.IntVendingCampaign = Seeker.VendingCampaignRI3
|
||||
INT Seeker.IntVendingCampaign
|
||||
|
||||
|
||||
Var VendingREFID = SessionID
|
||||
|
||||
If Seeker.IntVendingCampaign > 0 Then
|
||||
Var QRChannel = 0
|
||||
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
;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
|
||||
;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"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Else
|
||||
Var CART_INDEX = 0
|
||||
|
||||
If Seeker = "curr" Then
|
||||
If New_Payment = 1 Then
|
||||
If New_Payment = 1 Then
|
||||
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
|
||||
EndIf
|
||||
MakeDrinkV1 SelectDrink SelectSugarID
|
||||
|
|
@ -158,16 +168,16 @@
|
|||
Var DrinkPaid = SelectDrink
|
||||
Var PaidPaymentFromNextStage = 1
|
||||
EndIf
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
EndIf
|
||||
|
||||
|
||||
|
|
@ -182,10 +192,10 @@
|
|||
EndIf
|
||||
EndIf
|
||||
|
||||
Else
|
||||
Else
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
|
|
@ -193,8 +203,10 @@
|
|||
|
||||
<EventActionError>
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
Var TelephoneNumber = ""
|
||||
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
|
||||
SAVELOG ShowErrorText
|
||||
|
|
@ -253,7 +265,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "1"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -264,7 +276,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -278,7 +290,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "2"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -289,7 +301,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -303,7 +315,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "3"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -314,7 +326,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -328,7 +340,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_A.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "A"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -339,7 +351,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -353,7 +365,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "4"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -364,7 +376,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -378,7 +390,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "5"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -389,7 +401,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -403,7 +415,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "6"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -414,7 +426,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -428,7 +440,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_B.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "B"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -439,7 +451,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -453,7 +465,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "7"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -464,7 +476,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -478,7 +490,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "8"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -489,7 +501,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -503,7 +515,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "9"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -514,7 +526,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -528,7 +540,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_C.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "C"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -539,7 +551,7 @@
|
|||
TimerReset
|
||||
Refresh
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
|
|
@ -553,7 +565,7 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var TelephoneNumber = TelephoneNumber + "0"
|
||||
Trim TelephoneNumber 8
|
||||
|
|
@ -561,7 +573,7 @@
|
|||
Var TelephoneNumber# = Str# + TelephoneNumber
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen >= 8 Then
|
||||
If TelNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
|
@ -579,21 +591,21 @@
|
|||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var Clear# = 0
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
If TelNumLen = 0 Then
|
||||
If TelNumLen = 0 Then
|
||||
Var Clear# = 1
|
||||
EndIf
|
||||
|
||||
Trim TelephoneNumber -1
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
|
||||
|
||||
StrLen TelephoneNumber TelNumLen
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
|
||||
If TelNumLen = 0 Then
|
||||
If Clear# = 1 Then
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var Mode# = 0
|
||||
|
|
@ -606,7 +618,7 @@
|
|||
;Var ShowErrorText = "Invisible"
|
||||
TimerReset
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -618,11 +630,11 @@
|
|||
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
<EventClick>
|
||||
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -631,28 +643,37 @@
|
|||
<X> 577 </X>
|
||||
<Y> 1673 </Y>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<State> Tel_Confirm_State </State>
|
||||
<State>
|
||||
eval(
|
||||
If ShowLoadingText = "Enable" Then
|
||||
Var return = "Press"
|
||||
Else
|
||||
Var return = Tel_Confirm_State
|
||||
EndIf
|
||||
)
|
||||
</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>
|
||||
<EventClick>
|
||||
|
||||
|
||||
|
||||
|
||||
If UnitTestType = "2" Then
|
||||
If TelephoneNumber = "00000001" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
Else
|
||||
|
||||
|
||||
If GetPayInfoFlag = 0 Then
|
||||
Var GetPayInfoFlag = 1
|
||||
Var ShowLoadingText = "Enable"
|
||||
|
||||
VendingQR OFF
|
||||
|
||||
|
||||
|
||||
Var Seeker.CodeNumber = TelephoneNumber
|
||||
Var RemainAmount = 0
|
||||
;PrepareDrink SelectDrink SelectSugarID
|
||||
|
|
@ -669,13 +690,13 @@
|
|||
|
||||
Var ECommerce = ECommerce + ":"
|
||||
Var ECommerce = ECommerce + TOPPING_PRICE
|
||||
|
||||
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + DiscountDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + SessionID2
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + SelectDrink
|
||||
Var ECommerce = ECommerce + "/"
|
||||
|
||||
|
||||
|
|
@ -685,13 +706,13 @@
|
|||
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"
|
||||
|
|
@ -704,17 +725,17 @@
|
|||
|
||||
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||
Var Timeout = 0
|
||||
|
||||
|
||||
Var TelephoneNumber = Seeker.CodeNumber
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
|
||||
SAVELOG ShowTextNumber
|
||||
Refresh
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
|
@ -746,7 +767,7 @@
|
|||
</Text>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 188 </X>
|
||||
|
|
@ -754,6 +775,13 @@
|
|||
<Filename> Var( DirImage + "/text_35.png" )</Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 260 </X>
|
||||
<Y> 990 </Y>
|
||||
<State> ShowLoadingText </State>
|
||||
<Filename> Var( DirImage + "/loadingText.png") </Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 152 </X>
|
||||
<Y> 1001 </Y>
|
||||
|
|
@ -785,9 +813,9 @@
|
|||
</Video>
|
||||
|
||||
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
|
||||
<EventSecurity>
|
||||
Open "/media/bt/xml/security_alarm.xml"
|
||||
</EventSecurity>
|
||||
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue