taobin_project/xml/page_payment_code.xml

<Popup>

<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Sound> "ROOT/sounds/Code8digit.m4a" </Sound>
<Volume> SoundVolume </Volume>
<Refresh> "Partial" </Refresh>
<EventOpen>
	; On open
	Var FreeVendingCampaign = 0

	Var Timeout = 0
   
    Var GetPayInfoFlag = 0
    Var CodeChannel = 0

	;Var VendingQRCode = "ERROR"
	;VendingQR ON
	;Var QRCODE99 = ""
	
	;CoinVending OFF
	
	Var ShowTextNumber = "Enable"
	Var ShowErrorText = "Invisible"
	Var Tel_Confirm_State = "Invisible"

	
    If show_eng = "true" Then 
		Var DirImage = "ROOT/taobin_project/image/collectiing_en"
	Else
		Var DirImage = "ROOT/taobin_project/image/collectiing"
	EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout> 
	;Open "ROOT/xml/page_board.xml" 

	Var Timeout = Timeout + 1
	If Timeout > 30 Then
		;VendingQR OFF
        ;Open menu_back_to_main 

		Var PayState1 = "PressForever"
		Var PayState2 = "Enable"
		Var QRChannel = 0
		Var CodeChannel = 0
		Open "ROOT/taobin_project/xml/page_payment_cash.xml" 

		Refresh
	EndIf

	TimerReset
</EventTimeout> 

<EventIDCard>
	

	If IDCardStatus = "OK" Then
		If IDCardReady = "OK" Then
			If IDCardData = "START" Then
			CoinVending OFF
			Open "ROOT/taobin_project/xml/page_show_consent2.xml" 
			EndIf
		EndIf
	EndIf


	



</EventIDCard>

<EventCoin>

	If ViewBill > 0 Then
		CoinVending BILLREJECT
	EndIf

</EventCoin>


<EventActionOk>
	

    If CodeChannel = 1 Then

        SPLIT  ECommerce "/"  5  VendingCode
	    SPLIT  ECommerce "/"  7  VendingCampaignRI3
	    SPLIT  ECommerce "/"  8  VendingCampaign1

		If VendingCode = "" Then
			Var VendingCode = "C00" 
		EndIf

		If VendingCode = "C00" Then

		Else

			Var IntVendingCampaign = VendingCampaignRI3
			INT IntVendingCampaign
		
			Var VendingREFID = SessionID

			If  IntVendingCampaign > 0 Then
				Var QRChannel = 0

				If IntVendingCampaign >= PayAmount Then 
					;Open "ROOT/taobin_project/xml/page_payment_cash.xml" 
					Var VendingCampaign = PayAmount
					Var FreeVendingCampaign = 1
					CoinVending OFF
					;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif" 
					MakeDrinkV1  SelectDrink SelectSugarID
					Open "ROOT/taobin_project/xml/page_thankyou.xml" 
				EndIf


				
				

				Var SessionID2 = SelectSlot + ":"
				Var SessionID2 = SessionID2 + ExtendData

				Var CreditAmount1 = ""
				Var ServiceAmountFlow = ""
				Var TelephoneNumber2 = "0899999999"
				Var ServiceType = "coffee"
				Var ECommerce = ""
				Var ECommerce = ECommerce + PriceDrink
				Var ECommerce =	ECommerce + "/"
				Var ECommerce =	ECommerce + DiscountDrink 
				Var ECommerce =	ECommerce + "/"
				Var ECommerce =	ECommerce + SessionID2 
				Var ECommerce =	ECommerce + "/"
				Var ECommerce =	ECommerce + SelectDrink 
				Var ECommerce =	ECommerce + "/"
				Var ECommerce =	ECommerce + "KBA:2/"
				Var ECommerce =	ECommerce + VendingCode
				Var ECommerce =	ECommerce + ":"
				Var ECommerce =	ECommerce + CodeNumber
				Var ECommerce =	ECommerce + ":"
				Var ECommerce = ECommerce + VendingCampaignRI3
				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 CodeChannel = 2

			Else

				Var FreeVendingCampaign = 1
				

				

				If VendingCode = "C24" Then
					Var VendingCampaign = PayAmount
					CoinVending OFF
					;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif" 
					MakeDrinkV1  SelectDrink SelectSugarID
					Open "ROOT/taobin_project/xml/page_thankyou.xml" 
				EndIf

				If VendingCode = "C25" Then
					Var VendingCampaign = PayAmount
					CoinVending OFF
					;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif" 
					MakeDrinkV1  SelectDrink SelectSugarID
					Open "ROOT/taobin_project/xml/page_thankyou.xml" 
				EndIf

				If VendingCode = "C30" Then
					Var VendingCampaign = PayAmount
					CoinVending OFF
					;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif" 
					MakeDrinkV1  SelectDrink SelectSugarID
					Open "ROOT/taobin_project/xml/page_thankyou.xml" 
				EndIf

				If VendingCode = "C32" Then
					Var VendingCampaign = PayAmount
					CoinVending OFF
					;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif" 
					MakeDrinkV1  SelectDrink SelectSugarID
					Open "ROOT/taobin_project/xml/page_thankyou.xml" 
				EndIf

				If VendingCode = "C33" Then
					Var VendingCampaign = PayAmount
					CoinVending OFF
					;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif" 
					MakeDrinkV1  SelectDrink SelectSugarID
					Open "ROOT/taobin_project/xml/page_thankyou.xml" 
				EndIf

				If VendingCode = "C34" Then
					Var VendingCampaign = PayAmount
					CoinVending OFF
					;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif" 
					MakeDrinkV1  SelectDrink SelectSugarID
					Open "ROOT/taobin_project/xml/page_thankyou.xml" 
				EndIf

				If VendingCode = "C36" Then
					Var VendingCampaign = PayAmount
					CoinVending OFF
					;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif" 
					MakeDrinkV1  SelectDrink SelectSugarID
					Open "ROOT/taobin_project/xml/page_thankyou.xml" 
				EndIf

				If VendingCode = "C38" Then
					Var VendingCampaign = PayAmount
					CoinVending OFF
					;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif" 
					MakeDrinkV1  SelectDrink SelectSugarID
					Open "ROOT/taobin_project/xml/page_thankyou.xml" 
				EndIf

				If VendingCode = "C41" Then
					Var VendingCampaign = PayAmount
					CoinVending OFF
					;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif" 
					MakeDrinkV1  SelectDrink SelectSugarID
					Open "ROOT/taobin_project/xml/page_thankyou.xml" 
				EndIf


				Var ShowErrorText = "Enable"
				Var GetPayInfoFlag = 0
				Var CodeChannel = 0

			EndIf

		EndIf

	Else 
	
		Var CreditAmount = 0
		Var QRCODE99 = SessionID
		Var QRCODE99 = QRCODE99 + Ext1a
		Var QRCODE99 = QRCODE99 + Ext21
		Var QRCODETMP = QRCODE99
		Var CodeChannel = 1
		
		Open "ROOT/taobin_project/xml/page_payment_cash.xml" 
		

	EndIf

</EventActionOk>

<EventActionError>
    If CodeChannel = 1 Then
		Var TelephoneNumber = ""
		
		Var ShowErrorText = "Enable"

		SAVELOG ShowErrorText

		Var GetPayInfoFlag = 0
   		Var CodeChannel = 0
		Var Tel_Confirm_State = "Disable"
		Refresh
	EndIf

	If CodeChannel = 2 Then
		Var CodeChannel = 1
		Var QRCODE99 = ""
		Var QRCODETMP = ""
		Open "ROOT/taobin_project/xml/page_payment_cash.xml" 
	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> 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
	Var TelephoneNumber = TelephoneNumber + "1"
	Var ShowTextNumber = "Invisible"
	Trim TelephoneNumber 8
	TimerReset
	Refresh
	StrLen TelephoneNumber TelNumLen
	If TelNumLen >= 8 Then 
		Var Tel_Confirm_State = "Enable"
	EndIf
	Var ShowErrorText = "Invisible"
</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
	Var TelephoneNumber = TelephoneNumber + "2"
	Var ShowTextNumber = "Invisible"
	Trim TelephoneNumber 8
	TimerReset
	Refresh
	StrLen TelephoneNumber TelNumLen
	If TelNumLen >= 8 Then 
		Var Tel_Confirm_State = "Enable"
	EndIf
	Var ShowErrorText = "Invisible"
</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
	Var TelephoneNumber = TelephoneNumber + "3"
	Var ShowTextNumber = "Invisible"
	Trim TelephoneNumber 8
	TimerReset
	Refresh
	StrLen TelephoneNumber TelNumLen
	If TelNumLen >= 8 Then 
		Var Tel_Confirm_State = "Enable"
	EndIf
	Var ShowErrorText = "Invisible"
</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
	Var TelephoneNumber = TelephoneNumber + "4"
	Var ShowTextNumber = "Invisible"
	Trim TelephoneNumber 8
	TimerReset
	Refresh
	StrLen TelephoneNumber TelNumLen
	If TelNumLen >= 8 Then 
		Var Tel_Confirm_State = "Enable"
	EndIf
	Var ShowErrorText = "Invisible"
</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
	Var TelephoneNumber = TelephoneNumber + "5"
	Var ShowTextNumber = "Invisible"
	Trim TelephoneNumber 8
	TimerReset
	Refresh
	StrLen TelephoneNumber TelNumLen
	If TelNumLen >= 8 Then 
		Var Tel_Confirm_State = "Enable"
	EndIf
	Var ShowErrorText = "Invisible"
</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
	Var TelephoneNumber = TelephoneNumber + "6"
	Var ShowTextNumber = "Invisible"
	Trim TelephoneNumber 8
	TimerReset
	Refresh
	StrLen TelephoneNumber TelNumLen
	If TelNumLen >= 8 Then 
		Var Tel_Confirm_State = "Enable"
	EndIf
	Var ShowErrorText = "Invisible"
</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
	Var TelephoneNumber = TelephoneNumber + "7"
	Var ShowTextNumber = "Invisible"
	Trim TelephoneNumber 8
	TimerReset
	Refresh
	StrLen TelephoneNumber TelNumLen
	If TelNumLen >= 8 Then 
		Var Tel_Confirm_State = "Enable"
	EndIf
	Var ShowErrorText = "Invisible"
</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
	Var TelephoneNumber = TelephoneNumber + "8"
	Var ShowTextNumber = "Invisible"
	Trim TelephoneNumber 8
	TimerReset
	Refresh
	StrLen TelephoneNumber TelNumLen
	If TelNumLen >= 8 Then 
		Var Tel_Confirm_State = "Enable"
	EndIf
	Var ShowErrorText = "Invisible"
</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
	Var TelephoneNumber = TelephoneNumber + "9"
	Var ShowTextNumber = "Invisible"
	Trim TelephoneNumber 8
	TimerReset
	Refresh
	StrLen TelephoneNumber TelNumLen
	If TelNumLen >= 8 Then 
		Var Tel_Confirm_State = "Enable"
	EndIf
	Var ShowErrorText = "Invisible"
</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
	Var TelephoneNumber = TelephoneNumber + "0"
	Trim TelephoneNumber 8
	StrLen TelephoneNumber TelNumLen
	If TelNumLen >= 8 Then 
		Var Tel_Confirm_State = "Enable"
	EndIf
	Var ShowTextNumber = "Invisible"

	TimerReset
	Refresh
	Var ShowErrorText = "Invisible"
</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 TelephoneNumber  -1
	Var Tel_Confirm_State = "Disable"
	
	StrLen TelephoneNumber TelNumLen
	
	If TelNumLen = 0 Then 
		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> 
	Var PayState1 = "PressForever"
	Var PayState2 = "Enable"
	Var QRChannel = 0
	Var CodeChannel = 0
	Open "ROOT/taobin_project/xml/page_payment_cash.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> 

		

	If UnitTestType = "2" Then
		If TelephoneNumber = "00000000" Then
			Var ShowErrorText = "Enable"
		EndIf
	Else
		If TelephoneNumber = "00000000" Then
			Var ShowErrorText = "Enable"
		EndIf
		If TelephoneNumber = "99999999" Then
			Var ShowErrorText = "Enable"
		EndIf

		

	    If GetPayInfoFlag = 0 Then
			Var GetPayInfoFlag = 1

			VendingQR OFF

			
			Var CodeNumber = TelephoneNumber
			Var RemainAmount = 0
			PrepareDrink SelectDrink SelectSugarID

			Var SessionID2 = SelectSlot + ":"
			Var SessionID2 = SessionID2 + sugarID
			Var SessionID2 = SessionID2 + "000"

			Var CreditAmount1 = ""
			Var ServiceAmountFlow = ""
			Var TelephoneNumber2 = "0899999999"
			Var ServiceType = "coffee"
			Var ECommerce = ""
			Var ECommerce = ECommerce + PriceDrink
			Var ECommerce =	ECommerce + "/"
			Var ECommerce =	ECommerce + DiscountDrink 
			Var ECommerce =	ECommerce + "/"
			Var ECommerce =	ECommerce + SessionID2 
			Var ECommerce =	ECommerce + "/"
			Var ECommerce =	ECommerce + SelectDrink 
			Var ECommerce =	ECommerce + "/"
			Var ECommerce =	ECommerce + "C00"
	        Var ECommerce =	ECommerce + "/"
	        Var ECommerce =	ECommerce + CodeNumber
			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 TelephoneNumber = CodeNumber
	        Var 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> 817 </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> TelephoneNumber </Value>
</Text>


	

<Image>
<X> 188 </X>
<Y> 626 </Y>
<Filename> Var( DirImage + "/text_11.png" )</Filename>
</Image>

<Image>
<X> 330 </X>
<Y> 942 </Y>
<Refresh> "Enable" </Refresh>
<State> ShowErrorText </State>
<Filename> "ROOT/taobin_project/image/collectiing/text_show_error.png" </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>