credit new version
This commit is contained in:
miggaze
Kenta420
parent
21205660e0
commit
5ec00902ef
46 changed files with 2112 additions and 3 deletions
BIN
image/collectiing/bn_cancel4.png
Normal file
BIN
image/collectiing/bn_cancel4.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 3.9 KiB |
BIN
image/collectiing/bn_cancel5.png
Normal file
BIN
image/collectiing/bn_cancel5.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 4 KiB |
BIN
image/collectiing/bn_topup_with_cash.png
Normal file
BIN
image/collectiing/bn_topup_with_cash.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 6.2 KiB |
BIN
image/collectiing/bn_topup_with_code.png
Normal file
BIN
image/collectiing/bn_topup_with_code.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 6.1 KiB |
BIN
image/collectiing/bn_topup_with_qr.png
Normal file
BIN
image/collectiing/bn_topup_with_qr.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 5.5 KiB |
BIN
image/collectiing/bn_useCredit2.png
Normal file
BIN
image/collectiing/bn_useCredit2.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 4.8 KiB |
BIN
image/collectiing/bn_useCredit3.png
Normal file
BIN
image/collectiing/bn_useCredit3.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 6.9 KiB |
BIN
image/collectiing/bp_cancel4.png
Normal file
BIN
image/collectiing/bp_cancel4.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 3.8 KiB |
BIN
image/collectiing/bp_cancel5.png
Normal file
BIN
image/collectiing/bp_cancel5.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 3.9 KiB |
BIN
image/collectiing/bp_topup_with_cash.png
Normal file
BIN
image/collectiing/bp_topup_with_cash.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 5.9 KiB |
BIN
image/collectiing/bp_topup_with_code.png
Normal file
BIN
image/collectiing/bp_topup_with_code.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 5.7 KiB |
BIN
image/collectiing/bp_topup_with_qr.png
Normal file
BIN
image/collectiing/bp_topup_with_qr.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 4.9 KiB |
BIN
image/collectiing/bp_useCredit2.png
Normal file
BIN
image/collectiing/bp_useCredit2.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 4.8 KiB |
BIN
image/collectiing/bp_useCredit3.png
Normal file
BIN
image/collectiing/bp_useCredit3.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 6.7 KiB |
BIN
image/collectiing/img_popup18.png
Normal file
BIN
image/collectiing/img_popup18.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 12 KiB |
BIN
image/collectiing/img_popup19.png
Normal file
BIN
image/collectiing/img_popup19.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 18 KiB |
BIN
image/collectiing/img_popup20-Failed.png
Normal file
BIN
image/collectiing/img_popup20-Failed.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 43 KiB |
BIN
image/collectiing/img_popup20.png
Normal file
BIN
image/collectiing/img_popup20.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 15 KiB |
BIN
image/collectiing/text_44.png
Normal file
BIN
image/collectiing/text_44.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 13 KiB |
BIN
image/collectiing/text_show_notEnough2.png
Normal file
BIN
image/collectiing/text_show_notEnough2.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 6.8 KiB |
BIN
image/collectiing/text_show_notOperate.png
Normal file
BIN
image/collectiing/text_show_notOperate.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 9.9 KiB |
BIN
image/collectiing_en/bn_cancel4.png
Normal file
BIN
image/collectiing_en/bn_cancel4.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 4.4 KiB |
BIN
image/collectiing_en/bn_topup_with_cash.png
Normal file
BIN
image/collectiing_en/bn_topup_with_cash.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 6.4 KiB |
BIN
image/collectiing_en/bn_topup_with_code.png
Normal file
BIN
image/collectiing_en/bn_topup_with_code.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 6.5 KiB |
BIN
image/collectiing_en/bn_topup_with_qr.png
Normal file
BIN
image/collectiing_en/bn_topup_with_qr.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 5.7 KiB |
BIN
image/collectiing_en/bn_useCredit2.png
Normal file
BIN
image/collectiing_en/bn_useCredit2.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 4.6 KiB |
BIN
image/collectiing_en/bn_useCredit3.png
Normal file
BIN
image/collectiing_en/bn_useCredit3.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 5.9 KiB |
BIN
image/collectiing_en/bp_cancel4.png
Normal file
BIN
image/collectiing_en/bp_cancel4.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 4.3 KiB |
BIN
image/collectiing_en/bp_topup_with_cash.png
Normal file
BIN
image/collectiing_en/bp_topup_with_cash.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 5.8 KiB |
BIN
image/collectiing_en/bp_topup_with_code.png
Normal file
BIN
image/collectiing_en/bp_topup_with_code.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 5.7 KiB |
BIN
image/collectiing_en/bp_topup_with_qr.png
Normal file
BIN
image/collectiing_en/bp_topup_with_qr.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 5.2 KiB |
BIN
image/collectiing_en/bp_useCredit2.png
Normal file
BIN
image/collectiing_en/bp_useCredit2.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 4.5 KiB |
BIN
image/collectiing_en/bp_useCredit3.png
Normal file
BIN
image/collectiing_en/bp_useCredit3.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 5.6 KiB |
BIN
image/collectiing_en/img_popup18.png
Normal file
BIN
image/collectiing_en/img_popup18.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 14 KiB |
BIN
image/collectiing_en/img_popup19.png
Normal file
BIN
image/collectiing_en/img_popup19.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 19 KiB |
BIN
image/collectiing_en/img_popup20-Failed.png
Normal file
BIN
image/collectiing_en/img_popup20-Failed.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 42 KiB |
BIN
image/collectiing_en/img_popup20.png
Normal file
BIN
image/collectiing_en/img_popup20.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 16 KiB |
BIN
image/collectiing_en/text_44.png
Normal file
BIN
image/collectiing_en/text_44.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 10 KiB |
BIN
image/collectiing_en/text_show_notEnough2.png
Normal file
BIN
image/collectiing_en/text_show_notEnough2.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 8 KiB |
|
|
@ -936,6 +936,43 @@
|
||||||
Var ShowSentSmsText = "Invisible"
|
Var ShowSentSmsText = "Invisible"
|
||||||
Var Timeout = 0
|
Var Timeout = 0
|
||||||
|
|
||||||
|
If PinNumberUser = PinNumber Then
|
||||||
|
|
||||||
|
Var SumCreditAmount = CoffeeCredit
|
||||||
|
|
||||||
|
|
||||||
|
If SumCreditAmount >= PayAmountSubDiscount Then
|
||||||
|
|
||||||
|
Open "ROOT/taobin_project/xml/page_payment_credit3-0.xml"
|
||||||
|
Else
|
||||||
|
Var ShowNotEnoughText = "Enable"
|
||||||
|
Var Seeker.TNumberTaobinCredit = TelephoneNumber
|
||||||
|
Var Seeker.CoffeePinNumber = PinNumber
|
||||||
|
Open "ROOT/taobin_project/xml/page_payment_credit3-1.xml"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
Else
|
||||||
|
|
||||||
|
Var ShowErrorText = "Enable"
|
||||||
|
Var PinNumber = ""
|
||||||
|
Var ShowTextNumber1 = "Invisible"
|
||||||
|
Var ShowTextNumber2 = "Invisible"
|
||||||
|
Var ShowTextNumber3 = "Invisible"
|
||||||
|
Var ShowTextNumber4 = "Invisible"
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
Var ReqFlag = 0
|
||||||
|
Refresh
|
||||||
|
|
||||||
|
|
||||||
|
</Function2>
|
||||||
|
|
||||||
|
<Function3>
|
||||||
|
|
||||||
|
Var ShowSentSmsText = "Invisible"
|
||||||
|
Var Timeout = 0
|
||||||
|
|
||||||
If PinNumberUser = PinNumber Then
|
If PinNumberUser = PinNumber Then
|
||||||
|
|
||||||
Var SumCreditAmount = CoffeeCredit
|
Var SumCreditAmount = CoffeeCredit
|
||||||
|
|
@ -982,9 +1019,7 @@
|
||||||
Refresh
|
Refresh
|
||||||
|
|
||||||
|
|
||||||
</Function2>
|
</Function3>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
|
||||||
243
xml/page_payment_credit3-0.xml
Normal file
243
xml/page_payment_credit3-0.xml
Normal file
|
|
@ -0,0 +1,243 @@
|
||||||
|
<Popup>
|
||||||
|
|
||||||
|
<Cache> "Enable" </Cache>
|
||||||
|
<Width> 1080 </Width>
|
||||||
|
<Height> 1920 </Height>
|
||||||
|
<Background> "0xeae6e1" </Background>
|
||||||
|
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
|
||||||
|
<EventOpen>
|
||||||
|
; On open
|
||||||
|
|
||||||
|
Var Timeout = 0
|
||||||
|
|
||||||
|
If show_eng = "true" Then
|
||||||
|
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||||
|
Else
|
||||||
|
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
Var img_popup11 = "/img_popup18.png"
|
||||||
|
|
||||||
|
If CountryName = "Malaysia" Then
|
||||||
|
Var img_popup11 = "/img_popup18.png"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
If CountryName = "Indonesia" Then
|
||||||
|
Var img_popup11 = "/img_popup18.png"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
Var showRemaining !assigned StringFmt( SumCreditAmount, DisplayFormat, PreScaleConvertShow )
|
||||||
|
|
||||||
|
Var ShowErrorText = "Invisible"
|
||||||
|
Var ReqAdddata22 = 0
|
||||||
|
Var timeout_Adddata22 = 0
|
||||||
|
GenHashWithTimeStamp PointCrm
|
||||||
|
|
||||||
|
Var Seeker.TNumberTaobinCredit = TelephoneNumber
|
||||||
|
Var Seeker.CoffeePinNumber = PinNumber
|
||||||
|
|
||||||
|
|
||||||
|
</EventOpen>
|
||||||
|
<Timeout> 1000 </Timeout>
|
||||||
|
<EventTimeout>
|
||||||
|
|
||||||
|
Var Timeout = Timeout + 1
|
||||||
|
|
||||||
|
If Timeout > 60 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
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
Refresh
|
||||||
|
TimerReset
|
||||||
|
</EventTimeout>
|
||||||
|
|
||||||
|
|
||||||
|
<EventActionOk>
|
||||||
|
If ReqAdddata22 = 1 Then
|
||||||
|
|
||||||
|
Var Seeker.CreditReferenceTmp = "" + useCreditAmount
|
||||||
|
Var Seeker.CreditReferenceTmp = Seeker.CreditReferenceTmp + "/"
|
||||||
|
Var Seeker.CreditReferenceTmp = Seeker.CreditReferenceTmp + PointCrm
|
||||||
|
|
||||||
|
CoinVending OFF
|
||||||
|
|
||||||
|
Var Seeker.TNumberTaobinCredit = TelephoneNumber
|
||||||
|
Var Seeker.CoffeePinNumber = PinNumber
|
||||||
|
|
||||||
|
Var Seeker.StoreCreditFlag = 1
|
||||||
|
Var SumCreditAmount = SumCreditAmount - PayAmountSubDiscount
|
||||||
|
Var VendingCreditRemain = "" + SumCreditAmount
|
||||||
|
|
||||||
|
If CART_COUNT >= 1 Then
|
||||||
|
|
||||||
|
Cart "PreparID" 1
|
||||||
|
Var CART_INDEX = 1
|
||||||
|
Var PayReference = ""
|
||||||
|
GenHashWithTimeStamp PayReference
|
||||||
|
Cart "MakeID" CART_INDEX
|
||||||
|
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||||
|
Else
|
||||||
|
Var CART_INDEX = 0
|
||||||
|
|
||||||
|
If Seeker = "curr" Then
|
||||||
|
MakeDrinkV1 SelectDrink SelectSugarID
|
||||||
|
Var TxRef1 = ""
|
||||||
|
CreateTxRef1 TxRef1
|
||||||
|
|
||||||
|
Else
|
||||||
|
DEBUGVAR Seeker
|
||||||
|
Var TxRef1 = ""
|
||||||
|
CreateTxRef1 TxRef1
|
||||||
|
|
||||||
|
Var DrinkPaid = SelectDrink
|
||||||
|
Var PaidPaymentFromNextStage = 1
|
||||||
|
EndIf
|
||||||
|
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
Var ReqAdddata22 = 0
|
||||||
|
EndIf
|
||||||
|
</EventActionOk>
|
||||||
|
|
||||||
|
<EventActionError>
|
||||||
|
|
||||||
|
Var ShowErrorText = "Enable"
|
||||||
|
Refresh
|
||||||
|
|
||||||
|
If ReqAdddata22 = 1 Then
|
||||||
|
Var ReqAdddata22 = 0
|
||||||
|
EndIf
|
||||||
|
</EventActionError>
|
||||||
|
|
||||||
|
|
||||||
|
<EventCoin>
|
||||||
|
|
||||||
|
If ViewBill > 0 Then
|
||||||
|
CoinVending BILLREJECT
|
||||||
|
Else
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
</EventCoin>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 0 </X>
|
||||||
|
<Y> 380 </Y>
|
||||||
|
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 181 </X>
|
||||||
|
<Y> 647 </Y>
|
||||||
|
<Filename> Var( DirImage + img_popup11 ) </Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
<Text>
|
||||||
|
<X> 0 </X>
|
||||||
|
<Y> 845 </Y>
|
||||||
|
<Size> 144 </Size>
|
||||||
|
<Align> Center </Align>
|
||||||
|
<Width> 1080 </Width>
|
||||||
|
<Font> KanitRegularTTF </Font>
|
||||||
|
|
||||||
|
<Color> 0xDE794E </Color>
|
||||||
|
<Value> showRemaining </Value>
|
||||||
|
</Text>
|
||||||
|
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 287 </X>
|
||||||
|
<Y> 1426 </Y>
|
||||||
|
<Filename> Var( DirImage + "/bn_cancel4.png") </Filename>
|
||||||
|
<FilenamePress> Var( DirImage + "/bp_cancel4.png") </FilenamePress>
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
Var PayState1 = "PressForever"
|
||||||
|
Var PayState2 = "Enable"
|
||||||
|
Var QRChannel = 0
|
||||||
|
Var Seeker.CodeChannel = 0
|
||||||
|
SAVELOG "payment_credit3-p121."
|
||||||
|
If CART_COUNT >= 1 Then
|
||||||
|
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||||
|
Else
|
||||||
|
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||||
|
EndIf
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 287 </X>
|
||||||
|
<Y> 1140 </Y>
|
||||||
|
<Filename> Var( DirImage + "/bn_useCredit2.png" ) </Filename>
|
||||||
|
<FilenamePress> Var( DirImage + "/bp_useCredit2.png" )</FilenamePress>
|
||||||
|
<FilenameDisable> Var( DirImage + "/bp_useCredit2.png" )</FilenameDisable>
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
|
||||||
|
If ReqAdddata22 = 0 Then
|
||||||
|
Var useCreditAmount = PayAmountSubDiscount
|
||||||
|
Var BmiYear = useCreditAmount
|
||||||
|
Var GetScore = "useCredit"
|
||||||
|
AddData 22 TelephoneNumber BmiYear PointCrm GetScore
|
||||||
|
Var ReqAdddata22 = 1
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 287 </X>
|
||||||
|
<Y> 1283 </Y>
|
||||||
|
<Filename> Var( DirImage + "/bn_useCredit3.png" ) </Filename>
|
||||||
|
<FilenamePress> Var( DirImage + "/bp_useCredit3.png" )</FilenamePress>
|
||||||
|
<FilenameDisable> Var( DirImage + "/bp_useCredit3.png" )</FilenameDisable>
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
|
||||||
|
Var ShowNotEnoughText = "Invisible"
|
||||||
|
Open "ROOT/taobin_project/xml/page_payment_credit3-1.xml"
|
||||||
|
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 156 </X>
|
||||||
|
<Y> 1050 </Y>
|
||||||
|
<Refresh> "Enable" </Refresh>
|
||||||
|
<State> ShowErrorText </State>
|
||||||
|
<Filename> Var( DirImage + "/text_show_notOperate.png") </Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
<Video>
|
||||||
|
<X> 0 </X>
|
||||||
|
<Y> 0 </Y>
|
||||||
|
<Width> 1080</Width>
|
||||||
|
<Height> 380 </Height>
|
||||||
|
<Loop> "true" </Loop>
|
||||||
|
<Filename> video_menu_0 </Filename>
|
||||||
|
</Video>
|
||||||
|
|
||||||
|
<EventSecurity>
|
||||||
|
Open "/media/bt/xml/security_alarm.xml"
|
||||||
|
</EventSecurity>
|
||||||
|
|
||||||
|
</Popup>
|
||||||
198
xml/page_payment_credit3-1.xml
Normal file
198
xml/page_payment_credit3-1.xml
Normal file
|
|
@ -0,0 +1,198 @@
|
||||||
|
<Popup>
|
||||||
|
|
||||||
|
<Cache> "Enable" </Cache>
|
||||||
|
<Width> 1080 </Width>
|
||||||
|
<Height> 1920 </Height>
|
||||||
|
<Background> "0xeae6e1" </Background>
|
||||||
|
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
|
||||||
|
<EventOpen>
|
||||||
|
; On open
|
||||||
|
|
||||||
|
Var Timeout = 0
|
||||||
|
|
||||||
|
If show_eng = "true" Then
|
||||||
|
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||||
|
Else
|
||||||
|
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
Var img_popup11 = "/img_popup19.png"
|
||||||
|
|
||||||
|
If CountryName = "Malaysia" Then
|
||||||
|
Var img_popup11 = "/img_popup19.png"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
If CountryName = "Indonesia" Then
|
||||||
|
Var img_popup11 = "/img_popup19.png"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
Var showRemaining !assigned StringFmt( SumCreditAmount, DisplayFormat, PreScaleConvertShow )
|
||||||
|
|
||||||
|
Var ShowErrorText = "Enable"
|
||||||
|
Var ReqAdddata22 = 0
|
||||||
|
Var timeout_Adddata22 = 0
|
||||||
|
GenHashWithTimeStamp PointCrm
|
||||||
|
|
||||||
|
|
||||||
|
</EventOpen>
|
||||||
|
<Timeout> 1000 </Timeout>
|
||||||
|
<EventTimeout>
|
||||||
|
|
||||||
|
Var Timeout = Timeout + 1
|
||||||
|
|
||||||
|
If Timeout > 60 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
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
Refresh
|
||||||
|
TimerReset
|
||||||
|
</EventTimeout>
|
||||||
|
|
||||||
|
|
||||||
|
<EventActionOk>
|
||||||
|
</EventActionOk>
|
||||||
|
|
||||||
|
<EventActionError>
|
||||||
|
</EventActionError>
|
||||||
|
|
||||||
|
|
||||||
|
<EventCoin>
|
||||||
|
|
||||||
|
If ViewBill > 0 Then
|
||||||
|
CoinVending BILLREJECT
|
||||||
|
Else
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
</EventCoin>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 0 </X>
|
||||||
|
<Y> 380 </Y>
|
||||||
|
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 181 </X>
|
||||||
|
<Y> 672 </Y>
|
||||||
|
<Filename> Var( DirImage + img_popup11 ) </Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 181 </X>
|
||||||
|
<Y> 1044 </Y>
|
||||||
|
<State> ShowNotEnoughText </State>
|
||||||
|
<Filename> Var( DirImage + "/text_show_notEnough2.png") </Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
<Text>
|
||||||
|
<X> 0 </X>
|
||||||
|
<Y> 845 </Y>
|
||||||
|
<Size> 144 </Size>
|
||||||
|
<Align> Center </Align>
|
||||||
|
<Width> 1080 </Width>
|
||||||
|
<Font> KanitRegularTTF </Font>
|
||||||
|
|
||||||
|
<Color> 0xDE794E </Color>
|
||||||
|
<Value> showRemaining </Value>
|
||||||
|
</Text>
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 218 </X>
|
||||||
|
<Y> 1225 </Y>
|
||||||
|
<Filename> Var( DirImage + "/bn_topup_with_cash.png" ) </Filename>
|
||||||
|
<FilenamePress> Var( DirImage + "/bp_topup_with_cash.png" )</FilenamePress>
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
|
||||||
|
Var PayCreditChannel = "cash"
|
||||||
|
Open "ROOT/taobin_project/xml/page_payment_credit3-Topup.xml"
|
||||||
|
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 440 </X>
|
||||||
|
<Y> 1225 </Y>
|
||||||
|
<Filename> Var( DirImage + "/bn_topup_with_qr.png" ) </Filename>
|
||||||
|
<FilenamePress> Var( DirImage + "/bp_topup_with_qr.png" )</FilenamePress>
|
||||||
|
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
|
||||||
|
Var PayCreditChannel = "qr"
|
||||||
|
Open "ROOT/taobin_project/xml/page_payment_credit3-Topup.xml"
|
||||||
|
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 664 </X>
|
||||||
|
<Y> 1225 </Y>
|
||||||
|
<Filename> Var( DirImage + "/bn_topup_with_code.png" ) </Filename>
|
||||||
|
<FilenamePress> Var( DirImage + "/bp_topup_with_code.png" )</FilenamePress>
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 397 </X>
|
||||||
|
<Y> 1485 </Y>
|
||||||
|
<Filename> Var( DirImage + "/bn_cancel2.png") </Filename>
|
||||||
|
<FilenamePress> Var( DirImage + "/bp_cancel2.png") </FilenamePress>
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
Var PayState1 = "PressForever"
|
||||||
|
Var PayState2 = "Enable"
|
||||||
|
Var QRChannel = 0
|
||||||
|
Var Seeker.CodeChannel = 0
|
||||||
|
SAVELOG "payment_credit3-p121."
|
||||||
|
If CART_COUNT >= 1 Then
|
||||||
|
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||||
|
Else
|
||||||
|
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||||
|
EndIf
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
<Video>
|
||||||
|
<X> 0 </X>
|
||||||
|
<Y> 0 </Y>
|
||||||
|
<Width> 1080</Width>
|
||||||
|
<Height> 380 </Height>
|
||||||
|
<Loop> "true" </Loop>
|
||||||
|
<Filename> video_menu_0 </Filename>
|
||||||
|
</Video>
|
||||||
|
|
||||||
|
<EventSecurity>
|
||||||
|
Open "/media/bt/xml/security_alarm.xml"
|
||||||
|
</EventSecurity>
|
||||||
|
|
||||||
|
</Popup>
|
||||||
704
xml/page_payment_credit3-Topup.xml
Normal file
704
xml/page_payment_credit3-Topup.xml
Normal file
|
|
@ -0,0 +1,704 @@
|
||||||
|
<Popup>
|
||||||
|
|
||||||
|
<Cache> "Enable" </Cache>
|
||||||
|
<Width> 1080 </Width>
|
||||||
|
<Height> 1920 </Height>
|
||||||
|
<Background> "0xeae6e1" </Background>
|
||||||
|
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<Refresh> "Partial" </Refresh>
|
||||||
|
<EventOpen>
|
||||||
|
; On open
|
||||||
|
|
||||||
|
VendingQR OFF
|
||||||
|
|
||||||
|
Var Timeout = 0
|
||||||
|
|
||||||
|
Var AmountNumber = ""
|
||||||
|
|
||||||
|
Var ShowTextNumber = "Enable"
|
||||||
|
Var ShowErrorText = "Invisible"
|
||||||
|
Var Tel_Confirm_State = "Invisible"
|
||||||
|
|
||||||
|
Var GetCreditFlag = 0
|
||||||
|
|
||||||
|
If show_eng = "true" Then
|
||||||
|
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||||
|
Else
|
||||||
|
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
If show_eng = "true" Then
|
||||||
|
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
|
||||||
|
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
|
||||||
|
|
||||||
|
|
||||||
|
Else
|
||||||
|
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
|
||||||
|
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
Var Ext1a = ""
|
||||||
|
|
||||||
|
Var GetAccFlag = 0
|
||||||
|
|
||||||
|
Var GetPayInfoFlag = 0
|
||||||
|
|
||||||
|
Var TextWaiting = ""
|
||||||
|
|
||||||
|
Var text_44 = "/text_44.png"
|
||||||
|
Var text_show_amountInvalid = "/text_show_amountInvalid.png"
|
||||||
|
Var text_show_amountInvalid2 = "/text_show_amountInvalid2.png"
|
||||||
|
|
||||||
|
Var Min = PayAmountSubDiscount
|
||||||
|
Var Max = 5000
|
||||||
|
|
||||||
|
If CountryName = "Malaysia" Then
|
||||||
|
Var text_44 = "/text_44-MYR.png"
|
||||||
|
Var text_show_amountInvalid = "/text_show_amountInvalid-MYR.png"
|
||||||
|
Var text_show_amountInvalid2 = "/text_show_amountInvalid2-MYR.png"
|
||||||
|
|
||||||
|
;Var Min = 2
|
||||||
|
Var Max = 500
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
If CountryName = "Indonesia" Then
|
||||||
|
Var text_44 = "/text_44-IDR.png"
|
||||||
|
Var text_show_amountInvalid = "/text_show_amountInvalid-IDR.png"
|
||||||
|
Var text_show_amountInvalid2 = "/text_show_amountInvalid2-IDR.png"
|
||||||
|
|
||||||
|
;Var Min = 9000
|
||||||
|
Var Max = 2000000
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
</EventOpen>
|
||||||
|
<Timeout> 1000 </Timeout>
|
||||||
|
<EventTimeout>
|
||||||
|
|
||||||
|
Var Timeout = Timeout + 1
|
||||||
|
If Timeout > 60 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
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
TimerReset
|
||||||
|
</EventTimeout>
|
||||||
|
|
||||||
|
<EventIDCard>
|
||||||
|
</EventIDCard>
|
||||||
|
|
||||||
|
<EventCoin>
|
||||||
|
</EventCoin>
|
||||||
|
|
||||||
|
|
||||||
|
<EventActionOk>
|
||||||
|
|
||||||
|
If GetPayInfoFlag = 1 Then
|
||||||
|
Var VendingQRCode = "OK"
|
||||||
|
Var CashTextWarning = ""
|
||||||
|
Var QRErrorState = "Invisible"
|
||||||
|
Var QRCODE99 = SessionID
|
||||||
|
Var QRCODE99 = QRCODE99 + Ext1a
|
||||||
|
Var QRCODE99 = QRCODE99 + Ext21
|
||||||
|
Var QRCODETMP = QRCODE99
|
||||||
|
Var ReqPayInfoFlag = 0
|
||||||
|
Var VendingExtResult = ""
|
||||||
|
Open "ROOT/taobin_project/xml/page_payment_credit3-TopupQR.xml"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
Refresh
|
||||||
|
</EventActionOk>
|
||||||
|
|
||||||
|
<EventActionError>
|
||||||
|
If GetPayInfoFlag = 1 Then
|
||||||
|
Var QRCODE99 = ""
|
||||||
|
If show_eng = "true" Then
|
||||||
|
Var TextWaiting = "Unable to use QR, please try again later."
|
||||||
|
Else
|
||||||
|
Var TextWaiting = "ระบบ QR ขัดข้อง โปรดใช้ใหม่ภายหลัง."
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
Var AmountNumber = ""
|
||||||
|
Var Tel_Confirm_State = "Invisible"
|
||||||
|
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
Refresh
|
||||||
|
</EventActionError>
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 990 </X>
|
||||||
|
<Y> 416 </Y>
|
||||||
|
<Filename> show_btn </Filename>
|
||||||
|
<FilenamePress> show_btp </FilenamePress>
|
||||||
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 0 </X>
|
||||||
|
<Y> 380 </Y>
|
||||||
|
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 158 </X>
|
||||||
|
<Y> 601 </Y>
|
||||||
|
<Filename> "ROOT/taobin_project/image/collectiing/img_popup1.png" </Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 333 </X>
|
||||||
|
<Y> 1004 </Y>
|
||||||
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_1.png" </Filename>
|
||||||
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
Var Timeout = 0
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen < 10 Then
|
||||||
|
Var AmountNumber = AmountNumber + "1"
|
||||||
|
Var ShowTextNumber = "Invisible"
|
||||||
|
Trim AmountNumber 10
|
||||||
|
TimerReset
|
||||||
|
Refresh
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen >= 1 Then
|
||||||
|
Var Tel_Confirm_State = "Enable"
|
||||||
|
EndIf
|
||||||
|
Var ShowErrorText = "Invisible"
|
||||||
|
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 477 </X>
|
||||||
|
<Y> 1004 </Y>
|
||||||
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_2.png" </Filename>
|
||||||
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
Var Timeout = 0
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen < 10 Then
|
||||||
|
Var AmountNumber = AmountNumber + "2"
|
||||||
|
Var ShowTextNumber = "Invisible"
|
||||||
|
Trim AmountNumber 10
|
||||||
|
TimerReset
|
||||||
|
Refresh
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen >= 1 Then
|
||||||
|
Var Tel_Confirm_State = "Enable"
|
||||||
|
EndIf
|
||||||
|
Var ShowErrorText = "Invisible"
|
||||||
|
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 620 </X>
|
||||||
|
<Y> 1004 </Y>
|
||||||
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_3.png" </Filename>
|
||||||
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
Var Timeout = 0
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen < 10 Then
|
||||||
|
Var AmountNumber = AmountNumber + "3"
|
||||||
|
Var ShowTextNumber = "Invisible"
|
||||||
|
Trim AmountNumber 10
|
||||||
|
TimerReset
|
||||||
|
Refresh
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen >= 1 Then
|
||||||
|
Var Tel_Confirm_State = "Enable"
|
||||||
|
EndIf
|
||||||
|
Var ShowErrorText = "Invisible"
|
||||||
|
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 333 </X>
|
||||||
|
<Y> 1148 </Y>
|
||||||
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_4.png" </Filename>
|
||||||
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
Var Timeout = 0
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen < 10 Then
|
||||||
|
Var AmountNumber = AmountNumber + "4"
|
||||||
|
Var ShowTextNumber = "Invisible"
|
||||||
|
Trim AmountNumber 10
|
||||||
|
TimerReset
|
||||||
|
Refresh
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen >= 1 Then
|
||||||
|
Var Tel_Confirm_State = "Enable"
|
||||||
|
EndIf
|
||||||
|
Var ShowErrorText = "Invisible"
|
||||||
|
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 477 </X>
|
||||||
|
<Y> 1148 </Y>
|
||||||
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_5.png" </Filename>
|
||||||
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
Var Timeout = 0
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen < 10 Then
|
||||||
|
Var AmountNumber = AmountNumber + "5"
|
||||||
|
Var ShowTextNumber = "Invisible"
|
||||||
|
Trim AmountNumber 10
|
||||||
|
TimerReset
|
||||||
|
Refresh
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen >= 1 Then
|
||||||
|
Var Tel_Confirm_State = "Enable"
|
||||||
|
EndIf
|
||||||
|
Var ShowErrorText = "Invisible"
|
||||||
|
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 620 </X>
|
||||||
|
<Y> 1148 </Y>
|
||||||
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_6.png" </Filename>
|
||||||
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
Var Timeout = 0
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen < 10 Then
|
||||||
|
Var AmountNumber = AmountNumber + "6"
|
||||||
|
Var ShowTextNumber = "Invisible"
|
||||||
|
Trim AmountNumber 10
|
||||||
|
TimerReset
|
||||||
|
Refresh
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen >= 1 Then
|
||||||
|
Var Tel_Confirm_State = "Enable"
|
||||||
|
EndIf
|
||||||
|
Var ShowErrorText = "Invisible"
|
||||||
|
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 333 </X>
|
||||||
|
<Y> 1292 </Y>
|
||||||
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_7.png" </Filename>
|
||||||
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
Var Timeout = 0
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen < 10 Then
|
||||||
|
Var AmountNumber = AmountNumber + "7"
|
||||||
|
Var ShowTextNumber = "Invisible"
|
||||||
|
Trim AmountNumber 10
|
||||||
|
TimerReset
|
||||||
|
Refresh
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen >= 1 Then
|
||||||
|
Var Tel_Confirm_State = "Enable"
|
||||||
|
EndIf
|
||||||
|
Var ShowErrorText = "Invisible"
|
||||||
|
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 477 </X>
|
||||||
|
<Y> 1292 </Y>
|
||||||
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_8.png" </Filename>
|
||||||
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
Var Timeout = 0
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen < 10 Then
|
||||||
|
Var AmountNumber = AmountNumber + "8"
|
||||||
|
Var ShowTextNumber = "Invisible"
|
||||||
|
Trim AmountNumber 10
|
||||||
|
TimerReset
|
||||||
|
Refresh
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen >= 1 Then
|
||||||
|
Var Tel_Confirm_State = "Enable"
|
||||||
|
EndIf
|
||||||
|
Var ShowErrorText = "Invisible"
|
||||||
|
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 620 </X>
|
||||||
|
<Y> 1292 </Y>
|
||||||
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_9.png" </Filename>
|
||||||
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
Var Timeout = 0
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen < 10 Then
|
||||||
|
Var AmountNumber = AmountNumber + "9"
|
||||||
|
Var ShowTextNumber = "Invisible"
|
||||||
|
Trim AmountNumber 10
|
||||||
|
TimerReset
|
||||||
|
Refresh
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen >= 1 Then
|
||||||
|
Var Tel_Confirm_State = "Enable"
|
||||||
|
EndIf
|
||||||
|
Var ShowErrorText = "Invisible"
|
||||||
|
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 477 </X>
|
||||||
|
<Y> 1432 </Y>
|
||||||
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_0.png" </Filename>
|
||||||
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
Var Timeout = 0
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
|
||||||
|
If TelNumLen > 0 Then
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
If TelNumLen < 10 Then
|
||||||
|
Var AmountNumber = AmountNumber + "0"
|
||||||
|
Trim AmountNumber 10
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
If TelNumLen >= 1 Then
|
||||||
|
Var Tel_Confirm_State = "Enable"
|
||||||
|
EndIf
|
||||||
|
Var ShowTextNumber = "Invisible"
|
||||||
|
|
||||||
|
TimerReset
|
||||||
|
Refresh
|
||||||
|
Var ShowErrorText = "Invisible"
|
||||||
|
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
EndIf
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 620 </X>
|
||||||
|
<Y> 1432 </Y>
|
||||||
|
<Filename> "ROOT/taobin_project/image/collectiing/bn_back-1.png" </Filename>
|
||||||
|
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
Var Timeout = 0
|
||||||
|
Trim AmountNumber -1
|
||||||
|
;Var Tel_Confirm_State = "Invisible"
|
||||||
|
|
||||||
|
StrLen AmountNumber TelNumLen
|
||||||
|
|
||||||
|
If TelNumLen = 0 Then
|
||||||
|
Var ShowTextNumber = "Enable"
|
||||||
|
Var Tel_Confirm_State = "Invisible"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
Var ShowErrorText = "Invisible"
|
||||||
|
TimerReset
|
||||||
|
Refresh
|
||||||
|
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 218 </X>
|
||||||
|
<Y> 1607 </Y>
|
||||||
|
|
||||||
|
<Filename> Var( DirImage + "/bn_cancel2.png" )</Filename>
|
||||||
|
<FilenamePress> Var( DirImage + "/bp_cancel2.png" )</FilenamePress>
|
||||||
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
|
||||||
|
Open "ROOT/taobin_project/xml/page_payment_credit3-1.xml"
|
||||||
|
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 577 </X>
|
||||||
|
<Y> 1607 </Y>
|
||||||
|
<Refresh> "Enable" </Refresh>
|
||||||
|
<State> Tel_Confirm_State </State>
|
||||||
|
<Filename> Var( DirImage + "/bn_confirm.png" ) </Filename>
|
||||||
|
<FilenamePress> Var( DirImage + "/bp_confirm.png" )</FilenamePress>
|
||||||
|
<FilenameDisable> Var( DirImage + "/bn_confirm.png" )</FilenameDisable>
|
||||||
|
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
|
||||||
|
|
||||||
|
Var Amount = AmountNumber
|
||||||
|
INT Amount
|
||||||
|
If Amount < Min Then
|
||||||
|
|
||||||
|
Var ShowErrorText = "Enable"
|
||||||
|
Var AmountNumber = ""
|
||||||
|
Var Tel_Confirm_State = "Invisible"
|
||||||
|
Var text_show_error = text_show_amountInvalid
|
||||||
|
|
||||||
|
Refresh
|
||||||
|
|
||||||
|
Else
|
||||||
|
|
||||||
|
If Amount > Max Then
|
||||||
|
|
||||||
|
Var ShowErrorText = "Enable"
|
||||||
|
Var AmountNumber = ""
|
||||||
|
Var Tel_Confirm_State = "Invisible"
|
||||||
|
Var text_show_error = text_show_amountInvalid2
|
||||||
|
|
||||||
|
Refresh
|
||||||
|
|
||||||
|
Else
|
||||||
|
If PayCreditChannel = "cash" Then
|
||||||
|
|
||||||
|
Open "ROOT/taobin_project/xml/page_payment_credit3-TopupCash.xml"
|
||||||
|
|
||||||
|
Else
|
||||||
|
|
||||||
|
|
||||||
|
If GetPayInfoFlag = 0 Then
|
||||||
|
|
||||||
|
Var CreditAmount = AmountNumber
|
||||||
|
Var DiscountDrink = 0
|
||||||
|
Var SelectSlot = "1"
|
||||||
|
|
||||||
|
Var QRCODE1 = "A000000677010112"
|
||||||
|
Var QRCODE2 = "010755600066301"
|
||||||
|
Var QRCODE3 = "VDGN"
|
||||||
|
Var QRCODE4 = BoxID
|
||||||
|
Var QRCODE5 = SelectSlot
|
||||||
|
Var QRCODE6 = "00-00-00-0000"
|
||||||
|
Var QRCODE7 = CreditAmount
|
||||||
|
Var QRCODE8 = ""
|
||||||
|
|
||||||
|
Var RemainAmount = 0
|
||||||
|
|
||||||
|
Var SessionID2 = "00" + ":"
|
||||||
|
Var SessionID2 = SessionID2 + ""
|
||||||
|
|
||||||
|
Var CreditAmount1 = ""
|
||||||
|
Var ServiceAmountFlow = ""
|
||||||
|
Var TelephoneNumberQR = "0899999999"
|
||||||
|
Var ServiceType = "coffee"
|
||||||
|
Var ECommerceQR = ""
|
||||||
|
Var ECommerceQR = ECommerceQR + CreditAmount
|
||||||
|
Var ECommerceQR = ECommerceQR + "/"
|
||||||
|
Var ECommerceQR = ECommerceQR + DiscountDrink
|
||||||
|
Var ECommerceQR = ECommerceQR + "/"
|
||||||
|
Var ECommerceQR = ECommerceQR + SessionID2
|
||||||
|
Var ECommerceQR = ECommerceQR + "/"
|
||||||
|
Var ECommerceQR = ECommerceQR + "00-00-00-0000"
|
||||||
|
Var ECommerceQR = ECommerceQR + "/"
|
||||||
|
Var ECommerceQR = ECommerceQR + "KBA:2/"
|
||||||
|
Var ECommerceQR = ECommerceQR + "CRX"
|
||||||
|
Var ECommerceQR = ECommerceQR + ":"
|
||||||
|
Var ECommerceQR = ECommerceQR + Seeker.TNumberTaobinCredit
|
||||||
|
Var ECommerceQR = ECommerceQR + ":0"
|
||||||
|
Var ServiceParameter = "max"
|
||||||
|
Var ServiceCharge = 0
|
||||||
|
Var AccountType = "new"
|
||||||
|
Var testservice = "kbank"
|
||||||
|
Var tc = ""
|
||||||
|
Var GetScore = ""
|
||||||
|
Var OperatorName = ""
|
||||||
|
Var SessionID = ""
|
||||||
|
|
||||||
|
|
||||||
|
GetPayInfo TelephoneNumberQR ECommerceQR ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||||
|
Var Timeout = 0
|
||||||
|
Var GetPayInfoFlag = 1
|
||||||
|
Var ReqPayInfoFlag = 1
|
||||||
|
|
||||||
|
If show_eng = "true" Then
|
||||||
|
Var TextWaiting = "Please wait..."
|
||||||
|
Else
|
||||||
|
Var TextWaiting = "กรุณารอซักครู่..."
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
Refresh
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
EndIf
|
||||||
|
EndIf
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
<Text>
|
||||||
|
<X> 400 </X>
|
||||||
|
<Y> 680 </Y>
|
||||||
|
<Size> 60 </Size>
|
||||||
|
<Align> Right </Align>
|
||||||
|
<Width> 250 </Width>
|
||||||
|
<Font> KanitRegularTTF </Font>
|
||||||
|
<Color> 0xDE794E </Color>
|
||||||
|
<Value> PayAmountSubDiscount </Value>
|
||||||
|
</Text>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 217 </X>
|
||||||
|
<Y> 802 </Y>
|
||||||
|
<Filename> Var( DirImage + "/img3.png" ) </Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 188 </X>
|
||||||
|
<Y> 640 </Y>
|
||||||
|
<Refresh> "Enable" </Refresh>
|
||||||
|
<Filename> Var( DirImage + text_44 )</Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
|
||||||
|
<Text>
|
||||||
|
<X> 0 </X>
|
||||||
|
<Y> 817 </Y>
|
||||||
|
<Width> 1080 </Width>
|
||||||
|
<Align> Center </Align>
|
||||||
|
<Size> 62 </Size>
|
||||||
|
<Font> RobotoBlack </Font>
|
||||||
|
<Color> 0x513C2F </Color>
|
||||||
|
<Refresh> "Enable" </Refresh>
|
||||||
|
<Value> AmountNumber </Value>
|
||||||
|
</Text>
|
||||||
|
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 145 </X>
|
||||||
|
<Y> 820 </Y>
|
||||||
|
<State> ShowErrorText </State>
|
||||||
|
<Refresh> "Enable" </Refresh>
|
||||||
|
<Filename> Var( DirImage + text_show_error ) </Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
;<Image>
|
||||||
|
;<X> 0 </X>
|
||||||
|
;<Y> 0 </Y>
|
||||||
|
;<Filename> "ROOT/taobin_project/image/ad_medium_2.png" </Filename>
|
||||||
|
;</Image>
|
||||||
|
|
||||||
|
<Video>
|
||||||
|
<X> 0 </X>
|
||||||
|
<Y> 0 </Y>
|
||||||
|
<Width> 1080</Width>
|
||||||
|
<Height> 380 </Height>
|
||||||
|
<Loop> "true" </Loop>
|
||||||
|
<Filename> video_menu_0 </Filename>
|
||||||
|
</Video>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
<Text>
|
||||||
|
<X> 5 </X>
|
||||||
|
<Y> 940 </Y>
|
||||||
|
<Refresh> "Enable" </Refresh>
|
||||||
|
<Size> 30 </Size>
|
||||||
|
<Align> Center </Align>
|
||||||
|
<Width> 1080 </Width>
|
||||||
|
<Font> RobotoRegular </Font>
|
||||||
|
<Color> 0xFF0000 </Color>
|
||||||
|
<Value> TextWaiting </Value>
|
||||||
|
</Text>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
<EventSecurity>
|
||||||
|
Open "/media/bt/xml/security_alarm.xml"
|
||||||
|
</EventSecurity>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
</Popup>
|
||||||
548
xml/page_payment_credit3-TopupCash.xml
Normal file
548
xml/page_payment_credit3-TopupCash.xml
Normal file
|
|
@ -0,0 +1,548 @@
|
||||||
|
<Popup>
|
||||||
|
|
||||||
|
<Cache> "Enable" </Cache>
|
||||||
|
<Width> 1080 </Width>
|
||||||
|
<Height> 1920 </Height>
|
||||||
|
<Background> "0xeae6e1" </Background>
|
||||||
|
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventOpen>
|
||||||
|
; On open
|
||||||
|
|
||||||
|
Var Timeout = 0
|
||||||
|
|
||||||
|
If show_eng = "true" Then
|
||||||
|
Var DirImage = "ROOT/taobin_project/image/page_payment_en/page_payment"
|
||||||
|
Var DirImage2 = "ROOT/taobin_project/image/page_payment_cash_extend_en"
|
||||||
|
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
|
||||||
|
|
||||||
|
Else
|
||||||
|
Var DirImage = "ROOT/taobin_project/image/page_payment"
|
||||||
|
Var DirImage2 = "ROOT/taobin_project/image/page_payment_cash_extend"
|
||||||
|
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
If show_eng = "true" Then
|
||||||
|
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
|
||||||
|
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
|
||||||
|
|
||||||
|
|
||||||
|
Else
|
||||||
|
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
|
||||||
|
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
Var alphaState = "Invisible"
|
||||||
|
Var alphaState2 = "Enable"
|
||||||
|
|
||||||
|
Var alphaState3 = "Invisible"
|
||||||
|
|
||||||
|
|
||||||
|
INT AmountNumber
|
||||||
|
|
||||||
|
Var img_popup11 = "/img_popup11.png"
|
||||||
|
Var img_popup15 = "/img_popup15.png"
|
||||||
|
|
||||||
|
If CountryName = "Malaysia" Then
|
||||||
|
Var img_popup11 = "/img_popup11-MYR.png"
|
||||||
|
Var img_popup15 = "/img_popup15-MYR.png"
|
||||||
|
Var AmountNumber = AmountNumber * 100
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
If CountryName = "Indonesia" Then
|
||||||
|
Var img_popup11 = "/img_popup11-IDR.png"
|
||||||
|
Var img_popup15 = "/img_popup15-IDR.png"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
Var CreditAmount = AmountNumber
|
||||||
|
Var RemainAmount = CreditAmount
|
||||||
|
Var RemainAmountStr = "" + RemainAmount
|
||||||
|
|
||||||
|
Var RemainAmountStr !assigned StringFmt( RemainAmount, DisplayFormat, PreScaleConvertShow )
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
Var CoinInFlag = 0
|
||||||
|
Var CoinInOK = 0
|
||||||
|
Var ChangeOK = 0
|
||||||
|
Var PayOK = 0
|
||||||
|
Var CancelFlag = 0
|
||||||
|
Var ChangeFlag2 = 0
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
Var ChangeTimeout = 0
|
||||||
|
Var CancelCounter = 0
|
||||||
|
|
||||||
|
|
||||||
|
Var ServiceAmount2 = CreditAmount
|
||||||
|
Var ServiceCharge = 0
|
||||||
|
Var Donate = ""
|
||||||
|
Var SuggestID = ""
|
||||||
|
|
||||||
|
Var Seeker.StoreCreditFlag = 0
|
||||||
|
|
||||||
|
Var DrinkAmountStr !assigned StringFmt( PayAmountSubDiscount, DisplayFormat, PreScaleConvertShow )
|
||||||
|
|
||||||
|
Var NamePriceShow = showname + " "
|
||||||
|
Var NamePriceShow = NamePriceShow + DrinkAmountStr
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
</EventOpen>
|
||||||
|
<Timeout> 1000 </Timeout>
|
||||||
|
<EventTimeout>
|
||||||
|
|
||||||
|
Var Timeout = Timeout + 1
|
||||||
|
If Timeout > 180 Then
|
||||||
|
If CoinInOK = 0 Then
|
||||||
|
If CancelFlag = 0 Then
|
||||||
|
SAVELOG "ButtonCancleAlpha2 > Timeout Order."
|
||||||
|
|
||||||
|
Var CancelFlag = 1
|
||||||
|
Var CancelCounter = 0
|
||||||
|
Var RemainAmountStr = "คืนเงิน"
|
||||||
|
If CoinAmount = 0 Then
|
||||||
|
Var RemainAmountStr = "ยกเลิก"
|
||||||
|
Else
|
||||||
|
CoinVending OFF
|
||||||
|
EndIf
|
||||||
|
If Seeker.StoreCreditFlag = 1 Then
|
||||||
|
Var RemainAmountStr = "เก็บเครดิต"
|
||||||
|
EndIf
|
||||||
|
If ViewBill > 0 Then
|
||||||
|
CoinVending BILLREJECT
|
||||||
|
EndIf
|
||||||
|
EndIf
|
||||||
|
EndIf
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
If ChangeOK = 1 Then
|
||||||
|
|
||||||
|
If CancelFlag = 0 Then
|
||||||
|
Open "ROOT/taobin_project/xml/page_payment_credit3-TopupSuccess.xml"
|
||||||
|
Else
|
||||||
|
|
||||||
|
If CoinAmount > 0 Then
|
||||||
|
|
||||||
|
Var TelephoneNumber = Seeker.TNumberTaobinCredit
|
||||||
|
Var PayO2 = Var Seeker.CoffeePinNumber
|
||||||
|
|
||||||
|
Var VendingDiscount = 0
|
||||||
|
Var VendingCampaign = 0
|
||||||
|
Var ServiceType = "credit"
|
||||||
|
Var SessionID2 = "00-00-00-0000"
|
||||||
|
Var ServiceCredit = "coffee"
|
||||||
|
|
||||||
|
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
||||||
|
Var PayCredit = 1
|
||||||
|
|
||||||
|
If Seeker = "curr" Then
|
||||||
|
Open "ROOT/taobin_project/xml/page_catalog.xml"
|
||||||
|
Else
|
||||||
|
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
|
||||||
|
EndIf
|
||||||
|
Else
|
||||||
|
|
||||||
|
Open "ROOT/taobin_project/xml/page_payment_credit3-1.xml"
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
Else
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
If PayOK = 1 Then
|
||||||
|
Var ChangeTimeout = ChangeTimeout + 1
|
||||||
|
If ChangeTimeout > 30 Then
|
||||||
|
Var ChangeOK = 1
|
||||||
|
EndIf
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
If CoinInOK = 1 Then
|
||||||
|
Var CoinInCounter = CoinInCounter + 1
|
||||||
|
If CoinInCounter = 1 Then
|
||||||
|
Var PayOK = 1
|
||||||
|
|
||||||
|
Var SumCoinAmount = CoinAmount
|
||||||
|
If SumCoinAmount >= CreditAmount Then
|
||||||
|
Var Canout = SumCoinAmount - CreditAmount
|
||||||
|
If Canout > 0 Then
|
||||||
|
If Seeker.StoreCreditFlag = 0 Then
|
||||||
|
Change Canout
|
||||||
|
Var ChangeFlag2 = 1
|
||||||
|
Else
|
||||||
|
Var ChangeOK = 1
|
||||||
|
EndIf
|
||||||
|
Else
|
||||||
|
Var ChangeOK = 1
|
||||||
|
EndIf
|
||||||
|
EndIf
|
||||||
|
EndIf
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
If CancelFlag = 1 Then
|
||||||
|
|
||||||
|
Var CancelCounter = CancelCounter + 1
|
||||||
|
If CancelCounter = 2 Then
|
||||||
|
|
||||||
|
If CoinAmount > 0 Then
|
||||||
|
If Seeker.StoreCreditFlag = 0 Then
|
||||||
|
Change CoinAmount
|
||||||
|
Var ChangeFlag2 = 1
|
||||||
|
Else
|
||||||
|
Var ChangeOK = 1
|
||||||
|
EndIf
|
||||||
|
Else
|
||||||
|
Var ChangeOK = 1
|
||||||
|
EndIf
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
Var ChangeTimeout = ChangeTimeout + 1
|
||||||
|
If ChangeTimeout > 30 Then
|
||||||
|
Var ChangeOK = 1
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
TimerReset
|
||||||
|
Refresh
|
||||||
|
</EventTimeout>
|
||||||
|
|
||||||
|
<EventChangeStatus>
|
||||||
|
If ChangeStatus = "payout-end" Then
|
||||||
|
If ChangeFlag2 = 1 Then
|
||||||
|
Var ChangeOK = 1
|
||||||
|
EndIf
|
||||||
|
EndIf
|
||||||
|
</EventChangeStatus>
|
||||||
|
|
||||||
|
<EventCoin>
|
||||||
|
TimerReset
|
||||||
|
|
||||||
|
Var CoinInFlag = 1
|
||||||
|
|
||||||
|
DEBUGVAR ViewBill
|
||||||
|
|
||||||
|
|
||||||
|
If ViewBill > 0 Then
|
||||||
|
|
||||||
|
Var RemainAmount = CreditAmount - CoinAmount
|
||||||
|
|
||||||
|
|
||||||
|
If ViewBill > RemainAmount Then
|
||||||
|
Var RemainAmountKeep = ViewBill - RemainAmount
|
||||||
|
Var RemainAmountKeepStr !assigned StringFmt( RemainAmountKeep, DisplayFormat, PreScaleConvertShow )
|
||||||
|
Var alphaState3 = "Enable"
|
||||||
|
Var alphaState2 = "Disable"
|
||||||
|
Else
|
||||||
|
;CoinVending BILLSTACKALL
|
||||||
|
If ViewBill = RemainAmount Then
|
||||||
|
CoinVending BILLSTACKALL
|
||||||
|
Else
|
||||||
|
Var RemainAmountKeep = 0
|
||||||
|
Var RemainAmountKeepStr !assigned StringFmt( RemainAmountKeep, DisplayFormat, PreScaleConvertShow )
|
||||||
|
Var alphaState3 = "Enable"
|
||||||
|
Var alphaState2 = "Disable"
|
||||||
|
EndIf
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
Var Timeout = 0
|
||||||
|
Var RemainAmountStr = "" + RemainAmount
|
||||||
|
Var showRemaining = charOfBaht + RemainAmountStr
|
||||||
|
|
||||||
|
Var RemainAmountStr !assigned StringFmt( RemainAmount, DisplayFormat, PreScaleConvertShow )
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
Else
|
||||||
|
|
||||||
|
|
||||||
|
Var alphaState2 = "Enable"
|
||||||
|
|
||||||
|
|
||||||
|
If CoinInOK = 0 Then
|
||||||
|
|
||||||
|
Var RemainAmount = CreditAmount - CoinAmount
|
||||||
|
|
||||||
|
|
||||||
|
Var SumCoinAmount = CoinAmount
|
||||||
|
|
||||||
|
If SumCoinAmount >= CreditAmount Then
|
||||||
|
CoinVending OFF
|
||||||
|
Var Canout = SumCoinAmount - CreditAmount
|
||||||
|
If Canout = 0 Then
|
||||||
|
Var RemainAmountStr = 0
|
||||||
|
Var RemainAmountStr !assigned StringFmt( 0, DisplayFormat, PreScaleConvertShow )
|
||||||
|
Else
|
||||||
|
If show_eng = "true" Then
|
||||||
|
Var RemainAmountStr !assigned StringFmt( Canout, DisplayFormat, PreScaleConvertShow )
|
||||||
|
Var RemainAmountStr = "Change " + RemainAmountStr
|
||||||
|
Var RemainAmountStr = RemainAmountStr + "###size=90"
|
||||||
|
Else
|
||||||
|
Var RemainAmountStr = "ทอน " + Canout
|
||||||
|
EndIf
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
If Seeker.StoreCreditFlag = 1 Then
|
||||||
|
Var RemainAmountStr = 0
|
||||||
|
Var RemainAmountStr !assigned StringFmt( 0, DisplayFormat, PreScaleConvertShow )
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
Var CancleState = "Disable"
|
||||||
|
Var CoinInOK = 1
|
||||||
|
Var CoinInCounter = 0
|
||||||
|
|
||||||
|
Var TxRef1 = ""
|
||||||
|
CreateTxRef1 TxRef1
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
Else
|
||||||
|
Var RemainAmountStr = "" + RemainAmount
|
||||||
|
Var RemainAmountStr !assigned StringFmt( RemainAmount, DisplayFormat, PreScaleConvertShow )
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
Var Timeout = 0
|
||||||
|
|
||||||
|
|
||||||
|
Var showRemaining = charOfBaht + RemainAmountStr
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
Refresh
|
||||||
|
</EventCoin>
|
||||||
|
|
||||||
|
|
||||||
|
<EventActionOk>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
Refresh
|
||||||
|
</EventActionOk>
|
||||||
|
|
||||||
|
<EventActionError>
|
||||||
|
|
||||||
|
Refresh
|
||||||
|
</EventActionError>
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 990 </X>
|
||||||
|
<Y> 416 </Y>
|
||||||
|
<Filename> show_btn </Filename>
|
||||||
|
<FilenamePress> show_btp </FilenamePress>
|
||||||
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 0 </X>
|
||||||
|
<Y> 380 </Y>
|
||||||
|
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 182 </X>
|
||||||
|
<Y> 748 </Y>
|
||||||
|
<Filename> Var( DirImage2 + img_popup11 )</Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
<Text>
|
||||||
|
<X> 0 </X>
|
||||||
|
<Y> 1041 </Y>
|
||||||
|
<Size> 144 </Size>
|
||||||
|
<Align> Center </Align>
|
||||||
|
<Width> 1080 </Width>
|
||||||
|
<Font> KanitRegularTTF </Font>
|
||||||
|
<State> alphaState2 </State>
|
||||||
|
<Color> 0xDE794E </Color>
|
||||||
|
<Value> RemainAmountStr </Value>
|
||||||
|
</Text>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
<Text>
|
||||||
|
<X> 253 </X>
|
||||||
|
<Y> 1271 </Y>
|
||||||
|
<Size> 25 </Size>
|
||||||
|
<Align> Right </Align>
|
||||||
|
<Width> 500 </Width>
|
||||||
|
<Font> KanitRegularTTF </Font>
|
||||||
|
<State> alphaState2 </State>
|
||||||
|
<Color> 0x746253 </Color>
|
||||||
|
<Value> NamePriceShow </Value>
|
||||||
|
</Text>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 397 </X>
|
||||||
|
<Y> 1380 </Y>
|
||||||
|
|
||||||
|
<Filename> Var( DirImage + "/bn_cancel2.png" )</Filename>
|
||||||
|
<FilenamePress> Var( DirImage + "/bn_cancel2.png" )</FilenamePress>
|
||||||
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
|
||||||
|
If CoinInOK = 0 Then
|
||||||
|
If CancelFlag = 0 Then
|
||||||
|
SAVELOG "ButtonCancleAlpha2 > Cancle Order."
|
||||||
|
|
||||||
|
Var CancelFlag = 1
|
||||||
|
Var CancelCounter = 0
|
||||||
|
If show_eng = "true" Then
|
||||||
|
Var RemainAmountStr = "Refund"
|
||||||
|
Else
|
||||||
|
Var RemainAmountStr = "คืนเงิน"
|
||||||
|
EndIf
|
||||||
|
If CoinAmount = 0 Then
|
||||||
|
If show_eng = "true" Then
|
||||||
|
Var RemainAmountStr = "Cancelled"
|
||||||
|
Else
|
||||||
|
Var RemainAmountStr = "ยกเลิก"
|
||||||
|
EndIf
|
||||||
|
Else
|
||||||
|
CoinVending OFF
|
||||||
|
EndIf
|
||||||
|
If Seeker.StoreCreditFlag = 1 Then
|
||||||
|
If show_eng = "true" Then
|
||||||
|
Var RemainAmountStr = "Keep credit"
|
||||||
|
Else
|
||||||
|
Var RemainAmountStr = "เก็บเครดิต"
|
||||||
|
EndIf
|
||||||
|
EndIf
|
||||||
|
If ViewBill > 0 Then
|
||||||
|
CoinVending BILLREJECT
|
||||||
|
EndIf
|
||||||
|
EndIf
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
Refresh
|
||||||
|
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 181 </X>
|
||||||
|
<Y> 658 </Y>
|
||||||
|
<State> alphaState3 </State>
|
||||||
|
<Filename> Var( DirImage2 + img_popup15 )</Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
<Text>
|
||||||
|
<X> 0 </X>
|
||||||
|
<Y> 1010 </Y>
|
||||||
|
<Size> 120 </Size>
|
||||||
|
<Align> Center </Align>
|
||||||
|
<Width> 1080 </Width>
|
||||||
|
<Font> KanitRegularTTF </Font>
|
||||||
|
<State> alphaState3 </State>
|
||||||
|
<Color> 0xDE794E </Color>
|
||||||
|
<Value> RemainAmountKeepStr </Value>
|
||||||
|
</Text>
|
||||||
|
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 330 </X>
|
||||||
|
<Y> 1303 </Y>
|
||||||
|
<State> alphaState3 </State>
|
||||||
|
<Filename> Var( DirImage + "/bn_confirm2.png" )</Filename>
|
||||||
|
<FilenamePress> Var( DirImage + "/bp_confirm2.png" )</FilenamePress>
|
||||||
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
|
||||||
|
CoinVending BILLSTACKALL
|
||||||
|
Var Seeker.StoreCreditFlag = 1
|
||||||
|
|
||||||
|
Var alphaState3 = "Invisible"
|
||||||
|
|
||||||
|
Refresh
|
||||||
|
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 330 </X>
|
||||||
|
<Y> 1419 </Y>
|
||||||
|
<State> alphaState3 </State>
|
||||||
|
<Filename> Var( DirImage + "/bn_cancel3.png" )</Filename>
|
||||||
|
<FilenamePress> Var( DirImage + "/bp_cancel3.png" )</FilenamePress>
|
||||||
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
|
||||||
|
If ViewBill > 0 Then
|
||||||
|
CoinVending BILLREJECT
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
Var alphaState3 = "Invisible"
|
||||||
|
|
||||||
|
Refresh
|
||||||
|
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 145 </X>
|
||||||
|
<Y> 820 </Y>
|
||||||
|
<State> ShowErrorText </State>
|
||||||
|
<Refresh> "Enable" </Refresh>
|
||||||
|
<Filename> Var( DirImage + text_show_error ) </Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
<Video>
|
||||||
|
<X> 0 </X>
|
||||||
|
<Y> 0 </Y>
|
||||||
|
<Width> 1080</Width>
|
||||||
|
<Height> 380 </Height>
|
||||||
|
<Loop> "true" </Loop>
|
||||||
|
<Filename> video_menu_0 </Filename>
|
||||||
|
</Video>
|
||||||
|
|
||||||
|
<EventSecurity>
|
||||||
|
Open "/media/bt/xml/security_alarm.xml"
|
||||||
|
</EventSecurity>
|
||||||
|
|
||||||
|
</Popup>
|
||||||
221
xml/page_payment_credit3-TopupQR.xml
Normal file
221
xml/page_payment_credit3-TopupQR.xml
Normal file
|
|
@ -0,0 +1,221 @@
|
||||||
|
<Popup>
|
||||||
|
|
||||||
|
<Cache> "Enable" </Cache>
|
||||||
|
<Width> 1080 </Width>
|
||||||
|
<Height> 1920 </Height>
|
||||||
|
<Background> "0xeae6e1" </Background>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventOpen>
|
||||||
|
; On open
|
||||||
|
|
||||||
|
Var Timeout = 0
|
||||||
|
|
||||||
|
If show_eng = "true" Then
|
||||||
|
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||||
|
Else
|
||||||
|
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
If show_eng = "true" Then
|
||||||
|
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
|
||||||
|
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
|
||||||
|
|
||||||
|
Else
|
||||||
|
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
|
||||||
|
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
Var alphaState = "Enable"
|
||||||
|
Var ReqAdddata22 = 0
|
||||||
|
Var PayCreditOK = 0
|
||||||
|
|
||||||
|
Var ReqAdddata22_Error = 0
|
||||||
|
Var Timeout_Error = 0
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
DEBUGVAR Seeker
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
</EventOpen>
|
||||||
|
<Timeout> 1000 </Timeout>
|
||||||
|
<EventTimeout>
|
||||||
|
|
||||||
|
Var Timeout = Timeout + 1
|
||||||
|
If Timeout > 60 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
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
If ReqAdddata22_Error = 1 Then
|
||||||
|
|
||||||
|
Var Timeout_Error = Timeout_Error + 1
|
||||||
|
If Timeout_Error >= 5 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
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
TimerReset
|
||||||
|
</EventTimeout>
|
||||||
|
|
||||||
|
<EventIDCard>
|
||||||
|
</EventIDCard>
|
||||||
|
|
||||||
|
<EventCoin>
|
||||||
|
</EventCoin>
|
||||||
|
|
||||||
|
|
||||||
|
<EventActionOk>
|
||||||
|
|
||||||
|
If VendingExtResult = "" Then
|
||||||
|
Else
|
||||||
|
Var VendingExtResult = ""
|
||||||
|
|
||||||
|
If ReqAdddata22 = 0 Then
|
||||||
|
GenHashWithTimeStamp PointCrm
|
||||||
|
Var useCreditAmount = PayAmountSubDiscount
|
||||||
|
Var BmiYear = useCreditAmount
|
||||||
|
Var GetScore = "useCredit"
|
||||||
|
AddData 22 TelephoneNumber BmiYear PointCrm GetScore
|
||||||
|
Var ReqAdddata22 = 1
|
||||||
|
Var Timeout = 0
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
If ReqAdddata22 = 1 Then
|
||||||
|
|
||||||
|
Var Seeker.CreditReferenceTmp = "" + useCreditAmount
|
||||||
|
Var Seeker.CreditReferenceTmp = Seeker.CreditReferenceTmp + "/"
|
||||||
|
Var Seeker.CreditReferenceTmp = Seeker.CreditReferenceTmp + PointCrm
|
||||||
|
|
||||||
|
CoinVending OFF
|
||||||
|
Open "ROOT/taobin_project/xml/page_payment_credit3-TopupSuccess.xml"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
Refresh
|
||||||
|
</EventActionOk>
|
||||||
|
|
||||||
|
<EventActionError>
|
||||||
|
|
||||||
|
If ReqAdddata22 = 1 Then
|
||||||
|
Var ShowErrorText = "Enable"
|
||||||
|
Var ReqAdddata22_Error = 1
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
Refresh
|
||||||
|
</EventActionError>
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 990 </X>
|
||||||
|
<Y> 416 </Y>
|
||||||
|
<Filename> show_btn </Filename>
|
||||||
|
<FilenamePress> show_btp </FilenamePress>
|
||||||
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 0 </X>
|
||||||
|
<Y> 380 </Y>
|
||||||
|
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 249 </X>
|
||||||
|
<Y> 748 </Y>
|
||||||
|
<Filename> Var( DirImage + "/img_popup20.png") </Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
<Button>
|
||||||
|
<X> 438 </X>
|
||||||
|
<Y> 1345 </Y>
|
||||||
|
|
||||||
|
<Filename> Var( DirImage + "/bn_cancel3.png" )</Filename>
|
||||||
|
<FilenamePress> Var( DirImage + "/bp_cancel3.png" )</FilenamePress>
|
||||||
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
<EventClick>
|
||||||
|
|
||||||
|
|
||||||
|
Open "ROOT/taobin_project/xml/page_payment_credit3-1.xml"
|
||||||
|
|
||||||
|
|
||||||
|
</EventClick>
|
||||||
|
</Button>
|
||||||
|
|
||||||
|
|
||||||
|
<QRCode>
|
||||||
|
<X> 445 </X>
|
||||||
|
<Y> 958 </Y>
|
||||||
|
<Width> 200 </Width>
|
||||||
|
<Height> 200 </Height>
|
||||||
|
<State> alphaState </State>
|
||||||
|
<Service> testservice </Service>
|
||||||
|
</QRCode>
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 181 </X>
|
||||||
|
<Y> 758 </Y>
|
||||||
|
<State> ShowErrorText </State>
|
||||||
|
<Filename> Var( DirImage + "/img_popup20-Failed.png" ) </Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
<Video>
|
||||||
|
<X> 0 </X>
|
||||||
|
<Y> 0 </Y>
|
||||||
|
<Width> 1080</Width>
|
||||||
|
<Height> 380 </Height>
|
||||||
|
<Loop> "true" </Loop>
|
||||||
|
<Filename> video_menu_0 </Filename>
|
||||||
|
</Video>
|
||||||
|
|
||||||
|
<EventSecurity>
|
||||||
|
Open "/media/bt/xml/security_alarm.xml"
|
||||||
|
</EventSecurity>
|
||||||
|
|
||||||
|
</Popup>
|
||||||
160
xml/page_payment_credit3-TopupSuccess.xml
Normal file
160
xml/page_payment_credit3-TopupSuccess.xml
Normal file
|
|
@ -0,0 +1,160 @@
|
||||||
|
<Popup>
|
||||||
|
<Cache> "Enable" </Cache>
|
||||||
|
<Width> 1080 </Width>
|
||||||
|
<Height> 1920 </Height>
|
||||||
|
<Background> "0xeae6e1" </Background>
|
||||||
|
<Volume> SoundVolume </Volume>
|
||||||
|
|
||||||
|
<EventOpen>
|
||||||
|
; On open
|
||||||
|
|
||||||
|
Var Timeout = 0
|
||||||
|
|
||||||
|
If PayCreditChannel = "cash" Then
|
||||||
|
Var SumCreditAmount = SumCreditAmount + CoinAmount
|
||||||
|
Else
|
||||||
|
INT CreditAmount
|
||||||
|
Var SumCreditAmount = SumCreditAmount + CreditAmount
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
Var SumCreditAmount = SumCreditAmount - PayAmountSubDiscount
|
||||||
|
Var VendingCreditRemain = "" + SumCreditAmount
|
||||||
|
Var SumCreditAmountStr !assigned StringFmt( SumCreditAmount, DisplayFormat, PreScaleConvertShow )
|
||||||
|
|
||||||
|
Var text_4 = "/text_4.png"
|
||||||
|
|
||||||
|
If CountryName = "Malaysia" Then
|
||||||
|
Var PayState3 = "Invisible"
|
||||||
|
Var text_4 = "/text_4-MYR.png"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
If CountryName = "Indonesia" Then
|
||||||
|
Var text_4 = "/text_4-IDR.png"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
If show_eng = "true" Then
|
||||||
|
Var DirImage = "ROOT/taobin_project/image/page_payment_en/page_payment"
|
||||||
|
Var DirImage2 = "ROOT/taobin_project/image/page_payment_cash_extend_en"
|
||||||
|
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
|
||||||
|
|
||||||
|
Else
|
||||||
|
Var DirImage = "ROOT/taobin_project/image/page_payment"
|
||||||
|
Var DirImage2 = "ROOT/taobin_project/image/page_payment_cash_extend"
|
||||||
|
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
If show_eng = "true" Then
|
||||||
|
Var DirImage3 = "ROOT/taobin_project/image/collectiing_en"
|
||||||
|
Else
|
||||||
|
Var DirImage3 = "ROOT/taobin_project/image/collectiing"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
If show_eng = "true" Then
|
||||||
|
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
|
||||||
|
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
|
||||||
|
|
||||||
|
|
||||||
|
Else
|
||||||
|
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
|
||||||
|
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
Var FlagPayCredit = 1
|
||||||
|
|
||||||
|
|
||||||
|
</EventOpen>
|
||||||
|
<Timeout> 1000 </Timeout>
|
||||||
|
<EventTimeout>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
If FlagPayCredit = 1 Then
|
||||||
|
Var FlagPayCredit = 0
|
||||||
|
|
||||||
|
If Seeker = "curr" Then
|
||||||
|
|
||||||
|
DEBUGVAR "MakeDrinkV1"
|
||||||
|
|
||||||
|
MakeDrinkV1 SelectDrink SelectSugarID
|
||||||
|
Var TxRef1 = ""
|
||||||
|
CreateTxRef1 TxRef1
|
||||||
|
Else
|
||||||
|
Var TxRef1 = ""
|
||||||
|
CreateTxRef1 TxRef1
|
||||||
|
Var DrinkPaid = SelectDrink
|
||||||
|
Var PaidPaymentFromNextStage = 1
|
||||||
|
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
Var Seeker.StoreCreditFlag = 1
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
Var Timeout = Timeout + 1
|
||||||
|
If Timeout > 3 Then
|
||||||
|
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||||
|
EndIf
|
||||||
|
|
||||||
|
TimerReset
|
||||||
|
Refresh
|
||||||
|
</EventTimeout>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
<EventSecurity>
|
||||||
|
Open "/media/bt/xml/security_alarm.xml"
|
||||||
|
</EventSecurity>
|
||||||
|
|
||||||
|
<EventActionOk>
|
||||||
|
</EventActionOk>
|
||||||
|
|
||||||
|
<EventActionError>
|
||||||
|
</EventActionError>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
<Video>
|
||||||
|
<X> 0 </X>
|
||||||
|
<Y> 0 </Y>
|
||||||
|
<Width> 1080</Width>
|
||||||
|
<Height> 380 </Height>
|
||||||
|
<Loop> "true" </Loop>
|
||||||
|
<Filename> video_menu_0 </Filename>
|
||||||
|
</Video>
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 70 </X>
|
||||||
|
<Y> 741 </Y>
|
||||||
|
<Filename> Var( DirImage + "/PaymentSuccess.png" )</Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
<Image>
|
||||||
|
<X> 252 </X>
|
||||||
|
<Y> 1053 </Y>
|
||||||
|
<Filename> Var( DirImage + text_4 )</Filename>
|
||||||
|
</Image>
|
||||||
|
|
||||||
|
|
||||||
|
<Text>
|
||||||
|
<X> 0 </X>
|
||||||
|
<Y> 1123 </Y>
|
||||||
|
<Size> 120 </Size>
|
||||||
|
<Align> Center </Align>
|
||||||
|
<Width> 1080 </Width>
|
||||||
|
<Font> KanitRegularTTF </Font>
|
||||||
|
<Color> 0xDE794E </Color>
|
||||||
|
<Value> SumCreditAmountStr </Value>
|
||||||
|
</Text>
|
||||||
|
|
||||||
|
</Popup>
|
||||||
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue