taobin_project/xml/page_payment.xml

<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<EventOpen>
	; On open
	Var GetPayInfoFlag = 0
	Var SessionID2 = ""
	Var testservice = "kbank"
	Var QRCODE99 = ""
	Var QRCODETMP = ""

	Var QRChannel = 0
	Var HaveCup = "true"

	;Var PriceDrink = 5

	Var DiscountDrink = 0
	Var SelectSlot = "1"

	SAVELOG BoxID

	Var QRCODE1 = "A000000677010112"
    Var QRCODE2 = "010755600066301"
    Var QRCODE3 = "VDGN"
    Var QRCODE4 = BoxID
    Var QRCODE5 = SelectSlot
    Var QRCODE6 = SelectDrink                
    Var QRCODE7 = PriceDrink 
    Var QRCODE8 = ""
   
    Var CountStepPackPayment = 0

	Var Seeker.VendingCode = "C00"
	Var Seeker.VendingCampaignRI3 = 0
	Var Seeker.IntVendingCampaign = 0
	Var Seeker.FreeVendingCampaign = 0
	Var Seeker.CodeChannel = 0
	Var CoinVendingOnFlag = 0 

	Var Seeker.IntVendingCredit = 0
	
	Var Seeker.StoreCreditFlag = 0
	Var Seeker.pageStoreCredit0 = 0
	Var Seeker.TNumberTaobinCredit = ""
	Var Seeker.TNumberTaobinMember = ""
	Var Seeker.CoffeePinNumber = ""
	
	Var Seeker.VendingDiscount = 0
	Var Seeker.VendingCampaign = 0
	Var Seeker.VendingTSID = ""

	
	Var PayType = ""
	Var CART_INDEX = 0

	Var QRCODE99KBANK = ""
	Var QRCODE99Shoppy = ""
	Var LOADING_STATE = "Invisible"
	Var QR_POPUP = "/img_popup2.png"

	If show_eng = "true" Then 
		Var DirImage = "ROOT/taobin_project/image/page_payment_en/page_payment"
		Var PlaySoundLag = "ROOT/taobin_project/sound_eng/How_would_you_like_to_pay.mp3"

	Else
		Var DirImage = "ROOT/taobin_project/image/page_payment"
		Var PlaySoundLag = "ROOT/taobin_project/sound_thai/payment.mp3"
	EndIf

	SAVELOG MachineStage

	If ReadyForBrew = "false" Then
		Open "ROOT/taobin_project/xml/page_back_to_main.xml"
		Var ReadyForBrew = "false"
	EndIf

	If MachineStage = "remove-cup" Then
		SAVELOG "MachineStage = remove-cup"
		Open "ROOT/taobin_project/xml/page_back_to_remove_cup.xml"

	EndIf
	
	If CupChecking = "true" Then
		SAVELOG "CupChecking = true"
		Open "ROOT/taobin_project/xml/page_back_to_remove_cup.xml"
	EndIf

	Var MachineStage = "-"

	Var PayReference = ""
	Var	Seeker.CreditReferenceTmp = ""

	If web_app_prepar = "true" Then
		Var web_app_prepar = "false"
		__CMD "ui-load-playlist" 0 SelectDrink "-"
	EndIf




	Var ServiceAmount2 = PriceDrink
	Var TelephoneNumber = "0899999999"
	Var ServiceType = "coffee"
				
	
</EventOpen>
<Timeout> 900 </Timeout>
<EventTimeout> 
	
	If ReadyForBrew = "false" Then
		Open "ROOT/taobin_project/xml/page_back_to_main.xml"
		Var ReadyForBrew = "false"
	EndIf

	If MachineStage = "remove-cup" Then
		SAVELOG "MachineStage = remove-cup 2"
		Open "ROOT/taobin_project/xml/page_back_to_remove_cup.xml"

	EndIf

	Var CountStepPackPayment = CountStepPackPayment + 1
	If CountStepPackPayment = 1 Then

		

		SAVELOG ExtendData

		If GetPayInfoFlag = 0 Then
			If RoadShow = "false" Then
				;CoinVending ON
				CoinVending XBILL
			EndIf

			
			Var RemainAmount = 0



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

			;Var CreditAmount1 = ""
			;Var ServiceAmountFlow = ""
			;Var TelephoneNumberQR = "0899999999"
			;Var ServiceType = "coffee"
			;Var ECommerceQR = ""
			;Var ECommerceQR = ECommerceQR + PriceDrink
			;Var ECommerceQR =	ECommerceQR + "/"
			;Var ECommerceQR =	ECommerceQR + DiscountDrink 
			;Var ECommerceQR =	ECommerceQR + "/"
			;Var ECommerceQR =	ECommerceQR + SessionID2 
			;Var ECommerceQR =	ECommerceQR + "/"
			;Var ECommerceQR =	ECommerceQR + SelectDrink 
			;Var ECommerceQR =	ECommerceQR + "/"
			;Var ECommerceQR =	ECommerceQR + "KBA:2"
			;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

		EndIf

		; Reset
		Var MachineState_Result = 0


		DEBUGVAR ExtendData


		If web_readyOK = "true" Then
			If web_payment = "CODE" Then
				Open "ROOT/taobin_project/xml/page_payment_code.xml"
			EndIf

			If web_payment = "CREDIT" Then
				Open "ROOT/taobin_project/xml/page_payment_credit2.xml"
			EndIf

		EndIf

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

	TimerReset
	Refresh
</EventTimeout> 


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


<Image>
<X> 375 </X>
<Y> 623 </Y>
<Width> 331 </Width>
<Height> 435 </Height>
<Filename> PictureDrink </Filename>
</Image>

<Text>
<X> 0 </X>
<Y> 938 </Y>
<Width> 1080</Width>
<Align> Center </Align>
<Size> 72 </Size>
<Font> KanitMediumTTF </Font>
<Color> 0x513C2F </Color>
<Value> showname </Value>
</Text>

<Text>
<X> 0 </X>
<Y> 1022 </Y>
<Width> 1080</Width>
<Align> Center </Align>
<Size> 24 </Size>
<Font> KanitLightTTF </Font>
<Color> 0x6F5F51 </Color>
<Value> showdesc </Value>
</Text>

<Image>
<X> 144 </X>
<Y> 413 </Y>
<Filename> Var( DirImage + "/text_1.png" ) </Filename>
</Image>


</Popup>