taobin_project/xml/page_member_topup3.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
    
	;inter-multi
	If show_eng = "true" Then 
		If LanguageShow = "MYANMAR" Then 
			SetLanguage "MYANMAR"
		Else 
			If LanguageShow = "MSC" Then
				SetLanguage "MSC"
			Else
				SetLanguage "ENG"
			EndIf
		EndIf
	Else
		SetLanguage "THAI"
	EndIf

	RootLayoutVisible 3 "show"

    Var PayState1 = "Enable"
    Var PayState3 = "Enable"
	Var alphaState2 = "Invisible"


    Var PayCreditChannel = "cash"

	If SELLSTATUS = "SELLNOCASH" Then
		Var PayState1 = "Disable"
	EndIf


	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

	INT TaobinCredit
	Var TaobinCreditStr !assigned StringFmt( TaobinCredit, DisplayFormat, PreScaleConvertShow )

	

</EventOpen>
<EventLanguageOnChange>
	DEBUGVAR LanguageShow
	DEBUGVAR InternationalEnable

	;inter-image
	If LanguageShow = "ENG" 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"
		Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
		Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
	EndIf
	If LanguageShow = "THAI" Then 
		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"
		Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
		Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
	EndIf
	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"
	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"
	EndIf
	
	SAVELOG "EventLanguageOnChange menu -list"

	If InternationalEnable = 1 Then
		If CountryName = "Thailand" Then
			Var show_eng_button_stage = "Invisible"
			Var LanguageButtonEnable = "Enable"
		EndIf
	Else
		Var LanguageButtonEnable = "Invisible"
		Var show_eng_button_stage = "Enable"
	EndIf
    
	DEBUGVAR LanguageButtonEnable
	DEBUGVAR show_eng_button_stage

    OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
    RefreshAll
</EventLanguageOnChange>

<Timeout> 1000 </Timeout>
<EventTimeout> 

	Var Timeout = Timeout + 1
	If Timeout > 30 Then

		If OpenTopupCredit = 1 Then
			Open "ROOT/taobin_project/xml/page_before_check_member.xml"
		EndIf

		Open "ROOT/taobin_project/xml/page_check_member2.xml"
	EndIf

	TimerReset
	Refresh
</EventTimeout> 




			
<EventSecurity> 
	Open "/media/bt/xml/security_alarm.xml" 
</EventSecurity>

<EventActionOk>
	
</EventActionOk>


<EventMachine>

</EventMachine>



;include="ROOT/taobin_project/inc/video.inc"














<Image>
<X> 70 </X>
<Y> 499 </Y>
<Width> 1080 </Width>
<Filename> Var( DirImage + "/text_3.png" )</Filename>
</Image>

<Image>
<X> 252 </X>
<Y> 1223 </Y>
<Filename> Var( DirImage + text_4 )</Filename>
</Image>


<Text>
<X> 0 </X>
<Y> 1280 </Y>
<Size> 120 </Size>
<Align> Center </Align>
<Width> 1080 </Width>
<Font> KanitRegularTTF </Font>

<Color> 0xDE794E </Color>
<Value> TaobinCreditStr </Value>
</Text>


<Button>
<X> 287 </X>
<Y> 670 </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> 

	Var TopupFromPage = "member"
    Open "ROOT/taobin_project/xml/page_topup_credit3_cash_warning.xml"
   
	
</EventClick>
</Button>

<Button>
<X> 287 </X>
<Y> 800 </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> 

    Var PayCreditChannel = "credit"
	Open "ROOT/taobin_project/xml/page_member_topupAmount.xml"

</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>
<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>


	If OpenTopupCredit = 1 Then
		Open "ROOT/taobin_project/xml/page_before_check_member.xml"
	EndIf

	Open "ROOT/taobin_project/xml/page_check_member2.xml"

</EventClick>
</Button>


<Button>
<X> 990 </X>
<Y> 416 </Y>
<State> show_eng_button_stage </State>
<Filename> show_btn </Filename>
<FilenamePress> show_btp  </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	; eng
	If show_eng = "true" Then 
		Var show_eng = "false"
	Else
		Var show_eng = "true"
	EndIf
	Open CurrentXMLFileName2
</EventClick>
</Button>
























</Popup>