Merge branch 'new_flow_payment' into masterpiece
This commit is contained in:
Kenta420
commit
88964df4ca
61 changed files with 3609 additions and 80 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 |
BIN
image/page_payment/bn_codeS.png
Normal file
BIN
image/page_payment/bn_codeS.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 6.5 KiB |
BIN
image/page_payment/bp_codeS.png
Normal file
BIN
image/page_payment/bp_codeS.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 6.8 KiB |
BIN
image/page_payment_en/page_payment/bn_codeS.png
Normal file
BIN
image/page_payment_en/page_payment/bn_codeS.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 6.8 KiB |
BIN
image/page_payment_en/page_payment/bp_codeS.png
Normal file
BIN
image/page_payment_en/page_payment/bp_codeS.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 7.2 KiB |
|
|
@ -22,7 +22,7 @@
|
|||
Open "ROOT/taobin_project/xml/page_brewing3Multi.xml"
|
||||
Else
|
||||
Var PayReference = ""
|
||||
Var PayType = ""
|
||||
Var PayType = "newpay"
|
||||
EndIf
|
||||
|
||||
Var SelectDrink = Seeker.selected_a_drink
|
||||
|
|
|
|||
|
|
@ -56,7 +56,7 @@
|
|||
Var TimeoutWaitPay = 10
|
||||
|
||||
Var PayReference = ""
|
||||
Var PayType = ""
|
||||
Var PayType = "newpay"
|
||||
Var MachineState_Result = 0
|
||||
|
||||
If LastMakeDrinkResult = "success" Then
|
||||
|
|
|
|||
|
|
@ -174,6 +174,23 @@
|
|||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 287 </X>
|
||||
<Y> 930 </Y>
|
||||
<State> PayState3</State>
|
||||
<Filename> Var( DirImage + "/bn_codeS.png") </Filename>
|
||||
<FilenamePress> Var( DirImage + "/bp_codeS.png") </FilenamePress>
|
||||
<FilenameDisable> Var( DirImage + "/bp_codeS.png") </FilenameDisable>
|
||||
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
|
||||
Var PayCreditChannel = "credit"
|
||||
Open "ROOT/taobin_project/xml/page_member_topupCode.xml"
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 397 </X>
|
||||
<Y> 1622 </Y>
|
||||
|
|
|
|||
675
xml/page_member_topupCode.xml
Normal file
675
xml/page_member_topupCode.xml
Normal file
|
|
@ -0,0 +1,675 @@
|
|||
<Popup>
|
||||
|
||||
<Cache> "Enable" </Cache>
|
||||
<Width> 1080 </Width>
|
||||
<Height> 1920 </Height>
|
||||
<Background> "0xeae6e1" </Background>
|
||||
<Sound> PlaySoundCodeLang </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<Refresh> "Partial" </Refresh>
|
||||
<EventOpen>
|
||||
; On open
|
||||
Var ECommerce = ""
|
||||
Var Seeker.FreeVendingCampaign = 0
|
||||
|
||||
Var Timeout = 0
|
||||
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
|
||||
;Var VendingQRCode = "ERROR"
|
||||
;VendingQR ON
|
||||
;Var QRCODE99 = ""
|
||||
|
||||
;CoinVending OFF
|
||||
VendingQR OFF
|
||||
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var ShowErrorText = "Invisible"
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
Var ErrorCause = ""
|
||||
|
||||
|
||||
If show_eng = "true" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||
Else
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||
EndIf
|
||||
|
||||
Var CouponNumber = ""
|
||||
</EventOpen>
|
||||
<Timeout> 1000 </Timeout>
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
|
||||
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 180 Then
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_member_topup3.xml"
|
||||
|
||||
EndIf
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
</EventTimeout>
|
||||
|
||||
<EventActionOk>
|
||||
|
||||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
|
||||
DEBUGVAR ECommerce
|
||||
SAVELOG ECommerce
|
||||
|
||||
SPLIT ECommerce "/" 5 CampaignID
|
||||
SPLIT ECommerce "/" 6 CampaignCode
|
||||
SPLIT ECommerce "/" 7 AmoutCoupon
|
||||
|
||||
Var IntAmoutCoupon = AmoutCoupon
|
||||
INT IntAmoutCoupon
|
||||
|
||||
If IntAmoutCoupon > 0 Then
|
||||
DEBUGVAR AmoutCoupon
|
||||
DEBUGVAR CampaignID
|
||||
DEBUGVAR CampaignCode
|
||||
Var PayAmount = AmoutCoupon
|
||||
DEBUGVAR PayAmount
|
||||
|
||||
AddData 42 TelephoneNumber CampaignCode CampaignID AmoutCoupon
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_member_topupSuccess.xml"
|
||||
Else
|
||||
Var ShowErrorText = "Enable"
|
||||
Var text_show_error = DirImage + "/text_show_error.png"
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
</EventActionOk>
|
||||
|
||||
<EventActionError>
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
Var CouponNumber = ""
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
|
||||
SAVELOG ShowErrorText
|
||||
|
||||
Var text_show_error = DirImage + "/text_show_error2.png"
|
||||
|
||||
If ErrorCause = "failed_fromoper_0002" Then
|
||||
Var text_show_error = DirImage + "/text_show_error.png"
|
||||
EndIf
|
||||
|
||||
If ErrorCause = "failed_fromoper_0005" Then
|
||||
Var text_show_error = DirImage + "/text_show_error3.png"
|
||||
EndIf
|
||||
|
||||
If ErrorCause = "failed_fromoper_0006" Then
|
||||
Var text_show_error = DirImage + "/text_show_error4.png"
|
||||
EndIf
|
||||
|
||||
If ErrorCause = "failed_fromoper_0007" Then
|
||||
Var text_show_error = DirImage + "/text_show_error7.png"
|
||||
EndIf
|
||||
|
||||
If ErrorCause = "failed_fromoper_0008" Then
|
||||
Var text_show_error = DirImage + "/text_show_error8.png"
|
||||
EndIf
|
||||
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
Var Tel_Confirm_State = "Disable"
|
||||
Refresh
|
||||
EndIf
|
||||
|
||||
</EventActionError>
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 0 </X>
|
||||
<Y> 380 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
|
||||
</Image>
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 158 </X>
|
||||
<Y> 601 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/img_popup1.png" </Filename>
|
||||
</Image>
|
||||
|
||||
|
||||
<Button>
|
||||
<X> 263 </X>
|
||||
<Y> 1004 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_1.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "1"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 405 </X>
|
||||
<Y> 1004 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_2.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "2"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 547 </X>
|
||||
<Y> 1004 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_3.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "3"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 691 </X>
|
||||
<Y> 1004 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_A.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_A.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "A"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 263 </X>
|
||||
<Y> 1148 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_4.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "4"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 405 </X>
|
||||
<Y> 1148 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_5.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "5"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 547 </X>
|
||||
<Y> 1148 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_6.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "6"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 691 </X>
|
||||
<Y> 1148 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_B.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_B.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "B"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 263 </X>
|
||||
<Y> 1292 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_7.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "7"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 405 </X>
|
||||
<Y> 1292 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_8.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "8"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 547 </X>
|
||||
<Y> 1292 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_9.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "9"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 691 </X>
|
||||
<Y> 1292 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_C.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_C.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "C"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 405 </X>
|
||||
<Y> 1432 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_0.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "0"
|
||||
Trim CouponNumber 8
|
||||
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 263 </X>
|
||||
<Y> 1432 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_sh.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_sh.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
;Var CouponNumber = CouponNumber + "0"
|
||||
Trim CouponNumber 8
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen = 0 Then
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Var Mode# = 1
|
||||
Var Str# = "#"
|
||||
|
||||
EndIf
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
||||
<Button>
|
||||
<X> 547 </X>
|
||||
<Y> 1432 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_back-1.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen > 0 Then
|
||||
Trim CouponNumber -1
|
||||
If CodeNumLen = 1 Then
|
||||
Var ShowTextNumber = "Enable"
|
||||
EndIf
|
||||
Else
|
||||
Var ShowTextNumber = "Enable"
|
||||
EndIf
|
||||
|
||||
;Var ShowErrorText = "Invisible"
|
||||
TimerReset
|
||||
Refresh
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
||||
<Button>
|
||||
<X> 218 </X>
|
||||
<Y> 1607 </Y>
|
||||
<Filename> Var( DirImage + "/bn_back.png") </Filename>
|
||||
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Open "ROOT/taobin_project/xml/page_member_topup3.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 + "/bp_confirm.png" )</FilenameDisable>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
|
||||
|
||||
|
||||
If UnitTestType = "2" Then
|
||||
If CouponNumber = "00000001" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
Else
|
||||
If CouponNumber = "00000002" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
If CouponNumber = "99999999" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
If GetPayInfoFlag = 0 Then
|
||||
Var GetPayInfoFlag = 1
|
||||
|
||||
VendingQR OFF
|
||||
|
||||
Var RemainAmount = 0
|
||||
;PrepareDrink SelectDrink SelectSugarID
|
||||
|
||||
Var SessionID2 = SelectSlot + ":"
|
||||
Var SessionID2 = SessionID2 + Seeker.ExtendData
|
||||
|
||||
Var CreditAmount1 = ""
|
||||
Var ServiceAmountFlow = ""
|
||||
Var TelephoneNumber2 = "0899999999"
|
||||
Var ServiceType = "coffee"
|
||||
Var ECommerce = ""
|
||||
Var ECommerce = ECommerce + "0"
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + "0"
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + "1"
|
||||
Var ECommerce = ECommerce + ":"
|
||||
Var ECommerce = ECommerce + "000001"
|
||||
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + "00-00-00-0000"
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + "C00"
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + CouponNumber
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + "A"
|
||||
|
||||
Var ServiceParameter = "max"
|
||||
Var ServiceCharge = 0
|
||||
Var AccountType = "new"
|
||||
Var testservice = "kbank"
|
||||
Var tc = ""
|
||||
Var GetScore = ""
|
||||
Var OperatorName = ""
|
||||
Var SessionID = ""
|
||||
|
||||
|
||||
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||
Var Timeout = 0
|
||||
|
||||
Var Seeker.CodeChannel = 1
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
SAVELOG ShowTextNumber
|
||||
Refresh
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Image>
|
||||
<X> 217 </X>
|
||||
<Y> 802 </Y>
|
||||
<Filename> Var( DirImage + "/img3.png" ) </Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 244 </X>
|
||||
<Y> 816 </Y>
|
||||
<State> ShowTextNumber </State>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<Filename> Var( DirImage + "/text_12.png" )</Filename>
|
||||
</Image>
|
||||
|
||||
|
||||
<Text>
|
||||
<X> 0 </X>
|
||||
<Y> 817 </Y>
|
||||
<Width> 1080 </Width>
|
||||
<Align> Center </Align>
|
||||
<Size> 62 </Size>
|
||||
<Font> RobotoBlack </Font>
|
||||
<Color> 0x513C2F </Color>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<Value> CouponNumber </Value>
|
||||
</Text>
|
||||
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 188 </X>
|
||||
<Y> 636 </Y>
|
||||
<Filename> Var( DirImage + "/text_11.png" )</Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 152 </X>
|
||||
<Y> 935 </Y>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<State> ShowErrorText </State>
|
||||
<Filename> text_show_error </Filename>
|
||||
</Image>
|
||||
|
||||
|
||||
;<Image>
|
||||
;<X> 0 </X>
|
||||
;<Y> 0 </Y>
|
||||
;<Filename> "ROOT/taobin_project/image/ad_medium_2.png" </Filename>
|
||||
;</Image>
|
||||
|
||||
<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>
|
||||
|
||||
<EventUnitTest4>
|
||||
Open "ROOT/taobin_project/xml/page_member_topupCode.xml"
|
||||
</EventUnitTest4>
|
||||
|
||||
|
||||
|
||||
</Popup>
|
||||
|
|
@ -139,6 +139,7 @@
|
|||
Var Seeker.VendingCampaign = 0
|
||||
Var Seeker.VendingTSID = ""
|
||||
|
||||
Var Seeker.CreditNotEnoughRefID = ""
|
||||
|
||||
Var PayType = ""
|
||||
Var CART_INDEX = 0
|
||||
|
|
|
|||
|
|
@ -127,21 +127,6 @@
|
|||
|
||||
|
||||
DEBUGVAR PinNumberUser
|
||||
|
||||
If Seeker = "next" Then
|
||||
Var Curr = "curr"
|
||||
|
||||
DEBUGVAR CoffeeCredit
|
||||
DEBUGVAR Curr.CurrCreditUse
|
||||
|
||||
If TelephoneNumber = Curr.CurrCreditTelNum Then
|
||||
|
||||
Var CoffeeCredit = CoffeeCredit - Curr.CurrCreditUse
|
||||
If CoffeeCredit < 0 Then
|
||||
Var CoffeeCredit = 0
|
||||
EndIf
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_credit2.xml"
|
||||
Else
|
||||
|
|
@ -151,7 +136,7 @@
|
|||
DEBUGVAR Curr.CurrCreditTelNum
|
||||
|
||||
If Seeker = "next" Then
|
||||
If Ext1a = "new customer" Then
|
||||
If Ext1a = "new customer" Then
|
||||
Var Curr = "curr"
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -936,6 +936,43 @@
|
|||
Var ShowSentSmsText = "Invisible"
|
||||
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
|
||||
|
||||
Var SumCreditAmount = CoffeeCredit
|
||||
|
|
@ -944,12 +981,12 @@
|
|||
|
||||
If ReqAdddata22 = 0 Then
|
||||
|
||||
If Seeker = "next" Then
|
||||
Var Curr = "curr"
|
||||
If TelephoneNumber = Curr.CurrCreditTelNum Then
|
||||
Var SumCreditAmount = CoffeeCredit + Curr.CurrCreditAmount
|
||||
EndIf
|
||||
EndIf
|
||||
;If Seeker = "next" Then
|
||||
; Var Curr = "curr"
|
||||
; If TelephoneNumber = Curr.CurrCreditTelNum Then
|
||||
; Var SumCreditAmount = CoffeeCredit + Curr.CurrCreditAmount
|
||||
; EndIf
|
||||
;EndIf
|
||||
|
||||
Var useCreditAmount = PayAmountSubDiscount
|
||||
Var BmiYear = useCreditAmount
|
||||
|
|
@ -960,31 +997,7 @@
|
|||
|
||||
|
||||
Else
|
||||
If Seeker = "next" Then
|
||||
Var Curr = "curr"
|
||||
If TelephoneNumber = Curr.CurrCreditTelNum Then
|
||||
|
||||
Var SumCreditAmount = CoffeeCredit + Curr.CurrCreditAmount
|
||||
If SumCreditAmount >= PayAmountSubDiscount Then
|
||||
If ReqAdddata22 = 0 Then
|
||||
|
||||
Var useCreditTemp = PayAmountSubDiscount - CoffeeCredit
|
||||
|
||||
Var useCreditAmount = CoffeeCredit
|
||||
Var BmiYear = useCreditAmount
|
||||
Var GetScore = "useCredit"
|
||||
AddData 22 TelephoneNumber BmiYear PointCrm GetScore
|
||||
Var ReqAdddata22 = 1
|
||||
EndIf
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_credit3.xml"
|
||||
EndIf
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_credit3.xml"
|
||||
EndIf
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_credit3.xml"
|
||||
EndIf
|
||||
Open "ROOT/taobin_project/xml/page_payment_credit3.xml"
|
||||
EndIf
|
||||
|
||||
Else
|
||||
|
|
@ -1006,9 +1019,7 @@
|
|||
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>
|
||||
199
xml/page_payment_credit3-1.xml
Normal file
199
xml/page_payment_credit3-1.xml
Normal file
|
|
@ -0,0 +1,199 @@
|
|||
<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>
|
||||
|
||||
Var PayCreditChannel = "code"
|
||||
Open "ROOT/taobin_project/xml/page_payment_credit3-TopupCode.xml"
|
||||
|
||||
</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>
|
||||
712
xml/page_payment_credit3-Topup.xml
Normal file
712
xml/page_payment_credit3-Topup.xml
Normal file
|
|
@ -0,0 +1,712 @@
|
|||
<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
|
||||
|
||||
Var posX = 400
|
||||
|
||||
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"
|
||||
|
||||
Var posX = 430
|
||||
|
||||
|
||||
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>
|
||||
|
||||
If ViewBill > 0 Then
|
||||
CoinVending BILLREJECT
|
||||
EndIf
|
||||
</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> posX </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>
|
||||
614
xml/page_payment_credit3-TopupCash.xml
Normal file
614
xml/page_payment_credit3-TopupCash.xml
Normal file
|
|
@ -0,0 +1,614 @@
|
|||
<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 - CoinAmount
|
||||
|
||||
|
||||
|
||||
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
|
||||
|
||||
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
|
||||
|
||||
|
||||
|
||||
|
||||
</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
|
||||
|
||||
Var payCreditFlag = 0
|
||||
If CoinAmount > 0 Then
|
||||
Var payCreditFlag = 1
|
||||
EndIf
|
||||
If ChangeFlag2 = 1 Then
|
||||
Var payCreditFlag = 1
|
||||
EndIf
|
||||
|
||||
If payCreditFlag = 1 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>
|
||||
671
xml/page_payment_credit3-TopupCode.xml
Normal file
671
xml/page_payment_credit3-TopupCode.xml
Normal file
|
|
@ -0,0 +1,671 @@
|
|||
<Popup>
|
||||
|
||||
<Cache> "Enable" </Cache>
|
||||
<Width> 1080 </Width>
|
||||
<Height> 1920 </Height>
|
||||
<Background> "0xeae6e1" </Background>
|
||||
<Sound> PlaySoundCodeLang </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<Refresh> "Partial" </Refresh>
|
||||
<EventOpen>
|
||||
; On open
|
||||
Var ECommerce = ""
|
||||
Var Seeker.FreeVendingCampaign = 0
|
||||
|
||||
Var Timeout = 0
|
||||
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
|
||||
;Var VendingQRCode = "ERROR"
|
||||
;VendingQR ON
|
||||
;Var QRCODE99 = ""
|
||||
|
||||
;CoinVending OFF
|
||||
VendingQR OFF
|
||||
|
||||
Var ShowTextNumber = "Enable"
|
||||
Var ShowErrorText = "Invisible"
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
Var ErrorCause = ""
|
||||
|
||||
|
||||
If show_eng = "true" Then
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
|
||||
Else
|
||||
Var DirImage = "ROOT/taobin_project/image/collectiing"
|
||||
EndIf
|
||||
|
||||
Var CouponNumber = ""
|
||||
</EventOpen>
|
||||
<Timeout> 1000 </Timeout>
|
||||
<EventTimeout>
|
||||
;Open "ROOT/xml/page_board.xml"
|
||||
|
||||
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
If Timeout > 120 Then
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_credit3-1.xml"
|
||||
|
||||
EndIf
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
</EventTimeout>
|
||||
|
||||
<EventActionOk>
|
||||
|
||||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
|
||||
DEBUGVAR ECommerce
|
||||
SAVELOG ECommerce
|
||||
|
||||
SPLIT ECommerce "/" 5 CampaignID
|
||||
SPLIT ECommerce "/" 6 CampaignCode
|
||||
SPLIT ECommerce "/" 7 AmoutCoupon
|
||||
|
||||
Var IntAmoutCoupon = AmoutCoupon
|
||||
INT IntAmoutCoupon
|
||||
|
||||
If IntAmoutCoupon > 0 Then
|
||||
DEBUGVAR AmoutCoupon
|
||||
DEBUGVAR CampaignID
|
||||
DEBUGVAR CampaignCode
|
||||
Var PayAmount = AmoutCoupon
|
||||
Var CreditAmount = AmoutCoupon
|
||||
DEBUGVAR CreditAmount
|
||||
|
||||
AddData 42 TelephoneNumber CampaignCode CampaignID AmoutCoupon
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_payment_credit3-TopupSuccess.xml"
|
||||
Else
|
||||
Var ShowErrorText = "Enable"
|
||||
Var text_show_error = DirImage + "/text_show_error.png"
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
</EventActionOk>
|
||||
|
||||
<EventActionError>
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
Var CouponNumber = ""
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
|
||||
SAVELOG ShowErrorText
|
||||
|
||||
Var text_show_error = DirImage + "/text_show_error2.png"
|
||||
|
||||
If ErrorCause = "failed_fromoper_0002" Then
|
||||
Var text_show_error = DirImage + "/text_show_error.png"
|
||||
EndIf
|
||||
|
||||
If ErrorCause = "failed_fromoper_0005" Then
|
||||
Var text_show_error = DirImage + "/text_show_error3.png"
|
||||
EndIf
|
||||
|
||||
If ErrorCause = "failed_fromoper_0006" Then
|
||||
Var text_show_error = DirImage + "/text_show_error4.png"
|
||||
EndIf
|
||||
|
||||
If ErrorCause = "failed_fromoper_0007" Then
|
||||
Var text_show_error = DirImage + "/text_show_error7.png"
|
||||
EndIf
|
||||
|
||||
If ErrorCause = "failed_fromoper_0008" Then
|
||||
Var text_show_error = DirImage + "/text_show_error8.png"
|
||||
EndIf
|
||||
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
Var Tel_Confirm_State = "Disable"
|
||||
Refresh
|
||||
EndIf
|
||||
|
||||
</EventActionError>
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 0 </X>
|
||||
<Y> 380 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
|
||||
</Image>
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 158 </X>
|
||||
<Y> 601 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/img_popup1.png" </Filename>
|
||||
</Image>
|
||||
|
||||
|
||||
<Button>
|
||||
<X> 263 </X>
|
||||
<Y> 1004 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_1.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "1"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 405 </X>
|
||||
<Y> 1004 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_2.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "2"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 547 </X>
|
||||
<Y> 1004 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_3.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "3"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 691 </X>
|
||||
<Y> 1004 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_A.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_A.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "A"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 263 </X>
|
||||
<Y> 1148 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_4.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "4"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 405 </X>
|
||||
<Y> 1148 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_5.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "5"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 547 </X>
|
||||
<Y> 1148 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_6.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "6"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 691 </X>
|
||||
<Y> 1148 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_B.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_B.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "B"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 263 </X>
|
||||
<Y> 1292 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_7.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "7"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 405 </X>
|
||||
<Y> 1292 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_8.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "8"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 547 </X>
|
||||
<Y> 1292 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_9.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "9"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 691 </X>
|
||||
<Y> 1292 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_C.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_C.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "C"
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Trim CouponNumber 8
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 405 </X>
|
||||
<Y> 1432 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_0.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
Var CouponNumber = CouponNumber + "0"
|
||||
Trim CouponNumber 8
|
||||
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen >= 8 Then
|
||||
Var Tel_Confirm_State = "Enable"
|
||||
EndIf
|
||||
Var ShowTextNumber = "Invisible"
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Button>
|
||||
<X> 263 </X>
|
||||
<Y> 1432 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_sh.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_sh.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
;Var CouponNumber = CouponNumber + "0"
|
||||
Trim CouponNumber 8
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen = 0 Then
|
||||
Var ShowTextNumber = "Invisible"
|
||||
Var Mode# = 1
|
||||
Var Str# = "#"
|
||||
|
||||
EndIf
|
||||
|
||||
TimerReset
|
||||
Refresh
|
||||
Var ShowErrorText = "Invisible"
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
||||
<Button>
|
||||
<X> 547 </X>
|
||||
<Y> 1432 </Y>
|
||||
<Filename> "ROOT/taobin_project/image/collectiing/bn_back-1.png" </Filename>
|
||||
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
Var Timeout = 0
|
||||
|
||||
Var Tel_Confirm_State = "Invisible"
|
||||
|
||||
StrLen CouponNumber CodeNumLen
|
||||
If CodeNumLen > 0 Then
|
||||
Trim CouponNumber -1
|
||||
If CodeNumLen = 1 Then
|
||||
Var ShowTextNumber = "Enable"
|
||||
EndIf
|
||||
Else
|
||||
Var ShowTextNumber = "Enable"
|
||||
EndIf
|
||||
|
||||
;Var ShowErrorText = "Invisible"
|
||||
TimerReset
|
||||
Refresh
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
||||
<Button>
|
||||
<X> 218 </X>
|
||||
<Y> 1607 </Y>
|
||||
<Filename> Var( DirImage + "/bn_back.png") </Filename>
|
||||
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
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 + "/bp_confirm.png" )</FilenameDisable>
|
||||
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
|
||||
|
||||
|
||||
If UnitTestType = "2" Then
|
||||
If CouponNumber = "00000001" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
Else
|
||||
If CouponNumber = "00000002" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
If CouponNumber = "99999999" Then
|
||||
Var ShowErrorText = "Enable"
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
If GetPayInfoFlag = 0 Then
|
||||
Var GetPayInfoFlag = 1
|
||||
|
||||
VendingQR OFF
|
||||
|
||||
Var RemainAmount = 0
|
||||
;PrepareDrink SelectDrink SelectSugarID
|
||||
|
||||
Var SessionID2 = SelectSlot + ":"
|
||||
Var SessionID2 = SessionID2 + Seeker.ExtendData
|
||||
|
||||
Var CreditAmount1 = ""
|
||||
Var ServiceAmountFlow = ""
|
||||
Var TelephoneNumber2 = "0899999999"
|
||||
Var ServiceType = "coffee"
|
||||
Var ECommerce = ""
|
||||
Var ECommerce = ECommerce + "0"
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + "0"
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + "1"
|
||||
Var ECommerce = ECommerce + ":"
|
||||
Var ECommerce = ECommerce + "000001"
|
||||
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + "00-00-00-0000"
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + "C00"
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + CouponNumber
|
||||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + "A"
|
||||
|
||||
Var ServiceParameter = "max"
|
||||
Var ServiceCharge = 0
|
||||
Var AccountType = "new"
|
||||
Var testservice = "kbank"
|
||||
Var tc = ""
|
||||
Var GetScore = ""
|
||||
Var OperatorName = ""
|
||||
Var SessionID = ""
|
||||
|
||||
|
||||
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||
Var Timeout = 0
|
||||
|
||||
Var Seeker.CodeChannel = 1
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
SAVELOG ShowTextNumber
|
||||
Refresh
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
<Image>
|
||||
<X> 217 </X>
|
||||
<Y> 802 </Y>
|
||||
<Filename> Var( DirImage + "/img3.png" ) </Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 244 </X>
|
||||
<Y> 816 </Y>
|
||||
<State> ShowTextNumber </State>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<Filename> Var( DirImage + "/text_12.png" )</Filename>
|
||||
</Image>
|
||||
|
||||
|
||||
<Text>
|
||||
<X> 0 </X>
|
||||
<Y> 817 </Y>
|
||||
<Width> 1080 </Width>
|
||||
<Align> Center </Align>
|
||||
<Size> 62 </Size>
|
||||
<Font> RobotoBlack </Font>
|
||||
<Color> 0x513C2F </Color>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<Value> CouponNumber </Value>
|
||||
</Text>
|
||||
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 188 </X>
|
||||
<Y> 636 </Y>
|
||||
<Filename> Var( DirImage + "/text_11.png" )</Filename>
|
||||
</Image>
|
||||
|
||||
<Image>
|
||||
<X> 152 </X>
|
||||
<Y> 935 </Y>
|
||||
<Refresh> "Enable" </Refresh>
|
||||
<State> ShowErrorText </State>
|
||||
<Filename> text_show_error </Filename>
|
||||
</Image>
|
||||
|
||||
|
||||
;<Image>
|
||||
;<X> 0 </X>
|
||||
;<Y> 0 </Y>
|
||||
;<Filename> "ROOT/taobin_project/image/ad_medium_2.png" </Filename>
|
||||
;</Image>
|
||||
|
||||
<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>
|
||||
227
xml/page_payment_credit3-TopupQR.xml
Normal file
227
xml/page_payment_credit3-TopupQR.xml
Normal file
|
|
@ -0,0 +1,227 @@
|
|||
<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
|
||||
|
||||
|
||||
|
||||
If ViewBill > 0 Then
|
||||
CoinVending BILLREJECT
|
||||
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
|
||||
|
||||
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>
|
||||
|
||||
If ViewBill > 0 Then
|
||||
CoinVending BILLREJECT
|
||||
EndIf
|
||||
</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
|
||||
DEBUGVAR SumCreditAmount
|
||||
If PayCreditChannel = "cash" Then
|
||||
Var SumCreditAmount = SumCreditAmount + CoinAmount
|
||||
Else
|
||||
INT CreditAmount
|
||||
DEBUGVAR 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>
|
||||
|
||||
|
|
@ -46,12 +46,12 @@
|
|||
|
||||
Var AcceptAuto = "false"
|
||||
|
||||
If Seeker = "next" Then
|
||||
Var Curr = "curr"
|
||||
If TelephoneNumber = Curr.CurrCreditTelNum Then
|
||||
Var SumCreditAmount2 = SumCreditAmount + Curr.CurrCreditAmount
|
||||
EndIf
|
||||
EndIf
|
||||
;If Seeker = "next" Then
|
||||
; Var Curr = "curr"
|
||||
; If TelephoneNumber = Curr.CurrCreditTelNum Then
|
||||
; Var SumCreditAmount2 = SumCreditAmount + Curr.CurrCreditAmount
|
||||
; EndIf
|
||||
;EndIf
|
||||
|
||||
|
||||
If show_eng = "true" Then
|
||||
|
|
@ -215,6 +215,7 @@
|
|||
Var Seeker.CreditReferenceTmp = Seeker.CreditReferenceTmp + "/"
|
||||
Var Seeker.CreditReferenceTmp = Seeker.CreditReferenceTmp + PointCrm
|
||||
|
||||
Var Seeker.CreditNotEnoughRefID = PointCrm
|
||||
|
||||
Var Seeker.StoreCreditFlag = 1
|
||||
|
||||
|
|
|
|||
|
|
@ -100,27 +100,6 @@
|
|||
INT CoffeeCredit
|
||||
Var Seeker.CoffeePinNumber = Ext1c
|
||||
|
||||
|
||||
If Seeker = "next" Then
|
||||
Var Curr = "curr"
|
||||
|
||||
DEBUGVAR CoffeeCredit
|
||||
DEBUGVAR Curr.CurrCreditAmount
|
||||
|
||||
If TelephoneNumber = Curr.CurrCreditTelNum Then
|
||||
|
||||
Var CoffeeCredit = CoffeeCredit + Curr.CurrCreditAmount
|
||||
|
||||
If Curr.CurrCreditUse > 0 Then
|
||||
Var CoffeeCredit = CoffeeCredit - Curr.CurrCreditUse
|
||||
If CoffeeCredit < 0 Then
|
||||
Var CoffeeCredit = 0
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Var Seeker.TNumberTaobinCredit = TelephoneNumber
|
||||
|
||||
If Seeker.pageStoreCredit0 = 1 Then
|
||||
|
|
|
|||
|
|
@ -58,7 +58,13 @@
|
|||
Var Seeker.CurrCreditPinNum = Seeker.CoffeePinNumber
|
||||
|
||||
DEBUGVAR Seeker.CurrCreditAmount
|
||||
|
||||
|
||||
Var CurrAmount = Seeker.CurrCreditAmount
|
||||
Var CurrTelePhoneNum = Seeker.CurrCreditTelNum
|
||||
Var CurrPinNum = Seeker.CurrCreditPinNum
|
||||
Var RefID = ""
|
||||
|
||||
AddData 41 CurrTelePhoneNum CurrAmount CurrPinNum RefID
|
||||
|
||||
If Seeker.FreeVendingCampaign = 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
|
||||
|
|
|
|||
|
|
@ -360,6 +360,34 @@
|
|||
|
||||
DEBUGVAR Seeker.CurrCreditAmount
|
||||
|
||||
If Seeker.CreditNotEnoughRefID = "" Then
|
||||
Var CurrAmount = Seeker.CurrCreditAmount
|
||||
Var CurrTelePhoneNum = Seeker.CurrCreditTelNum
|
||||
Var CurrPinNum = Seeker.CurrCreditPinNum
|
||||
Var RefID = ""
|
||||
AddData 41 CurrTelePhoneNum CurrAmount CurrPinNum RefID
|
||||
Else
|
||||
|
||||
Var ServiceAmountSupCampain = Seeker.ServiceAmount2 - Seeker.IntVendingCampaign
|
||||
|
||||
If CoinAmount >= ServiceAmountSupCampain Then
|
||||
Var CurrAmount = Seeker.CurrCreditAmount
|
||||
Var RefID = "0/" + Seeker.CreditNotEnoughRefID
|
||||
Var Seeker.CreditReferenceTmp = RefID
|
||||
Else
|
||||
Var CurrAmount = CoinAmount
|
||||
Var RefID = "" + ServiceAmountSupCampain
|
||||
Var RefID = RefID + "/"
|
||||
Var RefID = RefID + Seeker.CreditNotEnoughRefID
|
||||
Var Seeker.CreditReferenceTmp = RefID
|
||||
EndIf
|
||||
|
||||
Var CurrTelePhoneNum = Seeker.CurrCreditTelNum
|
||||
Var CurrPinNum = Seeker.CurrCreditPinNum
|
||||
|
||||
AddData 41 CurrTelePhoneNum CurrAmount CurrPinNum RefID
|
||||
EndIf
|
||||
|
||||
If Seeker.FreeVendingCampaign = 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
|
||||
Else
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue