501 lines
No EOL
9.9 KiB
XML
501 lines
No EOL
9.9 KiB
XML
<Popup>
|
|
<Cache> "Enable" </Cache>
|
|
<Width> 1080 </Width>
|
|
<Height> 1920 </Height>
|
|
<Background> "0xeae6e1" </Background>
|
|
<Volume> SoundVolume </Volume>
|
|
|
|
<EventOpen>
|
|
; On open
|
|
|
|
Var Timeout = 0
|
|
|
|
|
|
|
|
|
|
Var SumCreditAmount = TaobinCredit
|
|
|
|
|
|
|
|
|
|
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 PayState1 = "Enable"
|
|
Var PayState3 = "Enable"
|
|
Var alphaState = "Invisible"
|
|
Var alphaState2 = "Enable"
|
|
|
|
Var alphaState3 = "Invisible"
|
|
|
|
Var confirmButtonState = "Invisible"
|
|
|
|
Var img_popup11 = "/img_popup11.png"
|
|
Var img_popup15 = "/img_popup15.png"
|
|
|
|
;inter-image
|
|
If CountryName = "Malaysia" Then
|
|
Var img_popup11 = "/img_popup11-MYR.png"
|
|
Var img_popup15 = "/img_popup15-MYR.png"
|
|
EndIf
|
|
|
|
;inter-image
|
|
If CountryName = "Indonesia" Then
|
|
Var img_popup11 = "/img_popup11-IDR.png"
|
|
Var img_popup15 = "/img_popup15-IDR.png"
|
|
EndIf
|
|
|
|
|
|
Var PayAmount = 0
|
|
Var RemainAmountStr !assigned StringFmt( PayAmount, DisplayFormat, PreScaleConvertShow )
|
|
If show_eng = "true" Then
|
|
Var RemainAmountStr = "Top-up " + RemainAmountStr
|
|
Var RemainAmountStr = RemainAmountStr + "###size=110"
|
|
Else
|
|
Var RemainAmountStr = "เติม " + RemainAmountStr
|
|
Var RemainAmountStr = RemainAmountStr + "###size=90"
|
|
EndIf
|
|
|
|
|
|
Var CoinInFlag = 0
|
|
Var CoinInOK = 0
|
|
Var ChangeOK = 0
|
|
Var PayOK = 0
|
|
Var CancelFlag = 0
|
|
Var ChangeFlag2 = 0
|
|
Var Seeker.StoreCreditFlag = 1
|
|
|
|
CoinVending XBILL
|
|
|
|
|
|
Var ChangeTimeout = 0
|
|
Var CancelCounter = 0
|
|
|
|
|
|
Var ServiceAmount2 = PayAmount
|
|
Var ServiceCharge = 0
|
|
Var Donate = ""
|
|
Var SuggestID = ""
|
|
|
|
|
|
|
|
|
|
</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."
|
|
CoinVending OFF
|
|
If CoinAmount = 0 Then
|
|
Var CancelFlag = 1
|
|
Var CancelCounter = 0
|
|
If show_eng = "true" Then
|
|
Var RemainAmountStr = "Cancelled"
|
|
Else
|
|
Var RemainAmountStr = "ยกเลิก"
|
|
EndIf
|
|
Else
|
|
Var CoinInOK = 1
|
|
Var CoinInCounter = 0
|
|
If show_eng = "true" Then
|
|
Var RemainAmountStr = "Keep credit"
|
|
Else
|
|
Var RemainAmountStr = "เก็บเครดิต"
|
|
EndIf
|
|
|
|
CoinVending BILLSTACKALL
|
|
EndIf
|
|
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
If ChangeOK = 1 Then
|
|
|
|
If CancelFlag = 0 Then
|
|
Var TxRef1 = ""
|
|
CreateTxRef1 TxRef1
|
|
|
|
Var PayAmount = CoinAmount
|
|
Open "ROOT/taobin_project/xml/page_member_topupSuccess.xml"
|
|
Else
|
|
|
|
Var TelephoneNumber = TelephoneNumber
|
|
Var PayO2 = PinNumber
|
|
|
|
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
|
|
|
|
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
|
|
|
|
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
|
|
If CoinAmount > 0 Then
|
|
Var ChangeOK = 1
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
If CancelFlag = 1 Then
|
|
|
|
Var CancelCounter = CancelCounter + 1
|
|
If CancelCounter = 2 Then
|
|
;Change CoinAmount
|
|
If CoinAmount > 0 Then
|
|
Var CancelFlag = 0
|
|
Var CancelCounter = 0
|
|
Var ChangeTimeout = 0
|
|
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>
|
|
|
|
|
|
<EventSecurity>
|
|
Open "/media/bt/xml/security_alarm.xml"
|
|
</EventSecurity>
|
|
|
|
<EventActionOk>
|
|
|
|
</EventActionOk>
|
|
|
|
|
|
<EventMachine>
|
|
|
|
</EventMachine>
|
|
|
|
<EventCoin>
|
|
TimerReset
|
|
|
|
Var CoinInFlag = 1
|
|
Var confirmButtonState = "Enable"
|
|
Var alphaState2 = "Invisible"
|
|
|
|
If ViewBill > 0 Then
|
|
|
|
CoinVending BILLSTACKALL
|
|
|
|
Var Timeout = 0
|
|
|
|
Var RemainAmountStr !assigned StringFmt( CoinAmount, DisplayFormat, PreScaleConvertShow )
|
|
If show_eng = "true" Then
|
|
Var RemainAmountStr = "Top-up " + RemainAmountStr
|
|
Var RemainAmountStr = RemainAmountStr + "###size=90"
|
|
Else
|
|
Var RemainAmountStr = "เติม " + RemainAmountStr
|
|
Var RemainAmountStr = RemainAmountStr + "###size=110"
|
|
EndIf
|
|
Var showRemaining = charOfBaht + RemainAmountStr
|
|
Else
|
|
|
|
|
|
If CoinInOK = 0 Then
|
|
|
|
If show_eng = "true" Then
|
|
Var RemainAmountStr !assigned StringFmt( CoinAmount, DisplayFormat, PreScaleConvertShow )
|
|
Var RemainAmountStr = "Top-up " + RemainAmountStr
|
|
Var RemainAmountStr = RemainAmountStr + "###size=90"
|
|
Else
|
|
Var RemainAmountStr !assigned StringFmt( CoinAmount, DisplayFormat, PreScaleConvertShow )
|
|
Var RemainAmountStr = "เติม " + RemainAmountStr
|
|
Var RemainAmountStr = RemainAmountStr + "###size=110"
|
|
EndIf
|
|
|
|
Var Timeout = 0
|
|
|
|
|
|
Var showRemaining = charOfBaht + RemainAmountStr
|
|
|
|
|
|
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
|
|
|
|
|
|
Refresh
|
|
</EventCoin>
|
|
<EventVDCancle>
|
|
If CoinInFlag = 1 Then
|
|
If CoinInOK = 0 Then
|
|
If CancelFlag = 0 Then
|
|
SAVELOG "VDCancle > Cancle Order."
|
|
CoinVending OFF
|
|
If CoinAmount = 0 Then
|
|
Var CancelFlag = 1
|
|
Var CancelCounter = 0
|
|
If show_eng = "true" Then
|
|
Var RemainAmountStr = "Cancelled"
|
|
Else
|
|
Var RemainAmountStr = "ยกเลิก"
|
|
EndIf
|
|
Else
|
|
Var ChangeOK = 1
|
|
If show_eng = "true" Then
|
|
Var RemainAmountStr = "Keep credit"
|
|
Else
|
|
Var RemainAmountStr = "เก็บเครดิต"
|
|
EndIf
|
|
|
|
CoinVending BILLSTACKALL
|
|
EndIf
|
|
|
|
Refresh
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
</EventVDCancle>
|
|
|
|
|
|
|
|
|
|
|
|
;include="ROOT/taobin_project/inc/video.inc"
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
<Image>
|
|
<X> 70 </X>
|
|
<Y> 499 </Y>
|
|
<Filename> Var( DirImage + "/text_3.png" )</Filename>
|
|
</Image>
|
|
|
|
<Image>
|
|
<X> 252 </X>
|
|
<Y> 1223 </Y>
|
|
<Filename> Var( DirImage + "/text_4.png" )</Filename>
|
|
</Image>
|
|
|
|
|
|
<Text>
|
|
<X> 0 </X>
|
|
<Y> 1280 </Y>
|
|
<Size> 144 </Size>
|
|
<Align> Center </Align>
|
|
<Width> 1080 </Width>
|
|
<Font> KanitRegularTTF </Font>
|
|
|
|
<Color> 0xDE794E </Color>
|
|
<Value> SumCreditAmount </Value>
|
|
</Text>
|
|
|
|
|
|
<Button>
|
|
<X> 287 </X>
|
|
<Y> 638 </Y>
|
|
<State> PayState1</State>
|
|
<Filename> Var( DirImage + "/bn_cashS.png") </Filename>
|
|
<FilenamePress> Var( DirImage + "/bp_cashS.png") </FilenamePress>
|
|
<FilenameDisable> Var( DirImage + "/bp_cashS.png") </FilenameDisable>
|
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 287 </X>
|
|
<Y> 819 </Y>
|
|
<State> PayState3</State>
|
|
<Filename> Var( DirImage + "/bn_prompt_payS.png") </Filename>
|
|
<FilenamePress> Var( DirImage + "/bp_prompt_payS.png") </FilenamePress>
|
|
<FilenameDisable> Var( DirImage + "/bp_prompt_payS.png") </FilenameDisable>
|
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 397 </X>
|
|
<Y> 1622 </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>
|
|
|
|
</EventClick>
|
|
</Button>
|
|
|
|
|
|
<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>
|
|
|
|
; QR popup
|
|
<Image>
|
|
<X> 0 </X>
|
|
<Y> 380 </Y>
|
|
<Filename> "ROOT/taobin_project/image/page_payment/alpha.png" </Filename>
|
|
</Image>
|
|
|
|
<Image>
|
|
<X> 182 </X>
|
|
<Y> 748 </Y>
|
|
<Filename> Var( DirImage2 + img_popup11 )</Filename>
|
|
</Image>
|
|
|
|
|
|
<Text>
|
|
<X> 253 </X>
|
|
<Y> 1041 </Y>
|
|
<Size> 144 </Size>
|
|
<Align> center-vertical-horizontal </Align>
|
|
<Width> 576 </Width>
|
|
<Height> 180 </Height>
|
|
<Font> KanitRegularTTF </Font>
|
|
<Color> 0xDE794E </Color>
|
|
<Value> RemainAmountStr </Value>
|
|
</Text>
|
|
|
|
|
|
|
|
|
|
<Button>
|
|
<X> 330 </X>
|
|
<Y> 1355 </Y>
|
|
<State> alphaState2 </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 CoinInOK = 0 Then
|
|
If CancelFlag = 0 Then
|
|
SAVELOG "ButtonCancleAlpha2 > Cancle Order."
|
|
CoinVending OFF
|
|
If CoinAmount = 0 Then
|
|
Var CancelCounter = 0
|
|
Var CancelFlag = 1
|
|
If show_eng = "true" Then
|
|
Var RemainAmountStr = "Cancelled"
|
|
Else
|
|
Var RemainAmountStr = "ยกเลิก"
|
|
EndIf
|
|
Else
|
|
Var ChangeOK = 1
|
|
If show_eng = "true" Then
|
|
Var RemainAmountStr = "Keep credit"
|
|
Else
|
|
Var RemainAmountStr = "เก็บเครดิต"
|
|
EndIf
|
|
|
|
CoinVending BILLSTACKALL
|
|
EndIf
|
|
|
|
|
|
|
|
Refresh
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
Refresh
|
|
|
|
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 330 </X>
|
|
<Y> 1355 </Y>
|
|
<State> confirmButtonState </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>
|
|
If CoinInOK = 0 Then
|
|
SAVELOG "ButtonConfirm"
|
|
CoinVending OFF
|
|
Var CoinInOK = 1
|
|
Var CoinInCounter = 0
|
|
EndIf
|
|
</EventClick>
|
|
</Button>
|
|
|
|
</Popup>
|
|
|