taobin_project/xml/page_topup_credit3-TopupSuccess.xml

162 lines
No EOL
3.7 KiB
XML

<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
Var VendingCreditRemain = "" + SumCreditAmount
Var SumCreditAmountStr !assigned StringFmt( SumCreditAmount, DisplayFormat, PreScaleConvertShow )
Var text_4 = "/text_4.png"
;inter-image
If CountryName = "Malaysia" Then
Var PayState3 = "Invisible"
Var text_4 = "/text_4-MYR.png"
EndIf
;inter-image
If CountryName = "Indonesia" Then
Var text_4 = "/text_4-IDR.png"
EndIf
;inter-image
If LanguageShow = "MYANMAR" Then
Var text_4 = "/text_4-MMR.png"
EndIf
;inter-image
If LanguageShow = "MSC" Then
Var text_4 = "/text_4-MSC.png"
EndIf
Var PaymentSuccessX = 70
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
;inter-image
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/page_payment_mmr/page_payment"
Var DirImage2 = "ROOT/taobin_project/image/page_payment_cash_extend_mmr"
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing_mmr/img2_mmr.png"
Var PaymentSuccessX = 100
EndIf
If LanguageShow = "MSC" Then
Var DirImage = "ROOT/taobin_project/image/page_payment_msc/page_payment"
Var DirImage2 = "ROOT/taobin_project/image/page_payment_cash_extend_msc"
Var PaymentSuccessX = 100
EndIf
If show_eng = "true" Then
Var DirImage3 = "ROOT/taobin_project/image/collectiing_en"
Else
Var DirImage3 = "ROOT/taobin_project/image/collectiing"
EndIf
;inter-image
If LanguageShow = "MYANMAR" Then
Var DirImage3 = "ROOT/taobin_project/image/collectiing_mmr"
EndIf
If LanguageShow = "MSC" Then
Var DirImage3 = "ROOT/taobin_project/image/collectiing_msc"
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>
Var Timeout = Timeout + 1
If Timeout > 3 Then
;Open "ROOT/taobin_project/xml/page_catalog2.xml"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventActionOk>
</EventActionOk>
<EventActionError>
</EventActionError>
;include="ROOT/taobin_project/inc/video.inc"
<Image>
<X> PaymentSuccessX </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>