taobin_project/inter/mys/xml/page_brewing3Conti.xml

<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>

	Var ActionOKCase = 0
	Var Seeker = "curr"

	If  PayCredit = 0 Then
		Var PayCredit = 1
		CoinBack
	EndIf

	;Var PayCredit = 0

	If show_eng = "true" Then
		Var DirImage = "ROOT/taobin_project/image/page_payment_en/page_payment"
		Var DirImage2 = "ROOT/taobin_project/image/topping2_en"
		Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png"
	Else
		Var DirImage = "ROOT/taobin_project/image/page_payment"
		Var DirImage2 = "ROOT/taobin_project/image/topping2"
		Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png"
	EndIf

	Var next_pic_bn = DirImage + "/bn_add_order.png"
	Var next_pic_bp = DirImage + "/bp_add_order.png"
	Var text_next_order = DirImage + "/text_next_order.png"

	Var topup_credit_bn = DirImage + "/bn_topup_credit.png"
	Var topup_credit_bp = DirImage + "/bp_topup_credit.png"

	Var EnableTopupCreditBetweenBrew = "Invisible"

	DEBUGVAR VendingCashlessMyNext
    If Seeker.CreditCard = 1 Then

            Var EnableSelectMenuBetweenBrew = "Invisible"
            DEBUGVAR VendingCashlessMyNext
            If FeatureReceiveCCardEnablerFromNC = "true" Then


          		If VendingCashlessMyNext = "" Then
          		    Var VendingCashlessMyNext = "DISABLE"
          		EndIf



                    ; case-v1
          		If VendingCashlessMyNext = "DISABLE" Then
          		    Var EnableSelectMenuBetweenBrew = "Invisible"
          		EndIf

          		; enable-by-v2-finexus
          		If VendingCashlessMyNext = "ENABLE" Then
          		    Var EnableSelectMenuBetweenBrew = "Enable"
          		EndIf

            EndIf

    EndIf



	If NextOrder = "true" Then
		Var EnableSelectMenuBetweenBrew = "Invisible"
	Else
		Var EnableSelectMenuBetweenBrew = "Enable"
	EndIf

	If GetFreeFromError = 1 Then
		Var EnableSelectMenuBetweenBrew = "Invisible"
		Var EnableTopupCreditBetweenBrew = "Invisible"
	EndIf

	If EnableSelectMenuBetweenBrew = "Enable" Then
		Var EnableSelectMenuBetweenBrewBlink = "Enable"
	Else
		Var EnableSelectMenuBetweenBrewBlink = "Invisible"
	EndIf

	; e-receipt
	If Seeker.e_receipt = "true" Then
		Var SelectMenuBetweenBrewEnable1Blink = "Invisible"
		Var SelectMenuBetweenBrewEnable1 = "Invisible"
		Var SelectMenuBetweenBrewEnable2Blink = "Invisible"
		Var SelectMenuBetweenBrewEnable2 = "Invisible"
	EndIf


	Var bg_strawlid = DirImage2 + "/bg_strawlidSmall.png"
	If Seeker.thankLidFlag = 1 Then
		Var bg_strawlid = DirImage2 + "/bg_strawSmall.png"
		Var LidStateX = "Invisible"
	EndIf

	Var TimeoutWaitPay = 10

    Var PayReference = ""
	Var PayType = "newpay"
	Var MachineState_Result = 0

	If LastMakeDrinkResult = "success" Then
		Var MachineState_Result = 1
	EndIf

	If LastMakeDrinkResult = "fail" Then
			Var MachineState_Result = 2
	EndIf


	Var ExtendData = Seeker.ExtendData
	Var SelectDrink = Seeker.selected_a_drink
	Var ServiceAmount2 = Seeker.ServiceAmount2

	DEBUGVAR Seeker
	DEBUGVAR Seeker.selected_a_drink
	DEBUGVAR Seeker.ServiceAmount2

	DEBUGVAR Seeker.CodeNumber

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


	; On open move from page_brewing3.xml
	Var countClick2 = 0

	Var Timeout = 0

	Var PrintCoinAmount = 0

	Var AddData = 0

	DEBUGVAR Seeker.TNumberTaobinMember
	DEBUGVAR Seeker.PointTaobinStr

	If Seeker.TNumberTaobinMember = "" Then

	Else
		If Seeker.PayWithQR = 1 Then
			Var VendingTSIDTmp1 = VendingTSIDTmp
		Else
			Var VendingTSIDTmp1 = ""
		EndIf


		Var BmiYear = Seeker.PointTaobinStr
		Var PointCrm = ""
		If Seeker.FromConsent = 1 Then
			Var PointCrm = "pdpa1"
		EndIf
		Var GetScore = VendingTSIDTmp1
		If Seeker.TaobinErrorNetwork = 0 Then
			Var Cid = 11
			Var AddData = 1
			;AddData Cid Seeker.TNumberTaobinMember  BmiYear PointCrm GetScore
		Else
			Var PointCrm = ""
			Var Cid = 14
			Var AddData = 1
			;AddData Cid Seeker.TNumberTaobinMember  BmiYear PointCrm GetScore
		EndIf

		Var VendingTSIDTmp1 = ""
	EndIf

	If Seeker.VendingCode = "MKFOO" Then
		Var AddData = 0
	EndIf

	If MyMintEnable = 1 Then
		If FromMyMintPro = 1 Then
			Var AddData = 0
		EndIf
	EndIf

	If ProBadValentineEnable = 1 Then
		If FromBadValentinePro = 1 Then
			Var AddData = 0
		EndIf
	EndIf

	If LipitPro = 1 Then
		If FromLipitPro = 1 Then
			If Seeker.CodeChannel = 1 Then
				If Seeker.CollectPointMain = 1 Then
				Else
					Var AddData = 0
				EndIf
			EndIf
		EndIf
	EndIf

	If LedLidBlink = "true" Then
		Var LedLidBlink = "no"
		LED LedDoorLid Blink 255 255 255 255
	EndIf


	Var CreditReference = Seeker.CreditReferenceTmp
	Var VendingDiscount = Seeker.VendingDiscount
	Var VendingCampaign = Seeker.VendingCampaign
	Var TxReference = Seeker.TxRef1
	DEBUGVAR TxReference


	Var DirImage = "ROOT/taobin_project/image/complete/"
	Var next_pic_bg = DirImage + "/Preparing.png"

	Var bg_strawlid_ST = "Invisible"
	Var bg_strawProblem_ST = "Invisible"
	Var StrawStateX = "Invisible"
	Var LidStateX = "Invisible"


	Var CreditCardVoid = 0

	DEBUGVAR ButtonGameCountDownState

</EventOpen>


;include="ROOT/taobin_project/inter/mys/xml/page_brewing3Conti_event.lxml"

<Video>
<X> 0 </X>
<Y> 380 </Y>
<Width> 1080</Width>
<Height> 840 </Height>
<Refresh> "Reload" </Refresh>
<Loop> "true" </Loop>
<Filename> VideoPlayFile </Filename>
</Video>

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


;<Image>
;<X> 0 </X>
;<Y> 0 </Y>
;<Filename> "ROOT/taobin_project/image/ad_medium_2.png" </Filename>
;</Image>





<Image>
<X> 60 </X>
<Y> 1290 </Y>
<Filename> PictureFile</Filename>
</Image>

;<Image>
;<X> 60 </X>
;<Y> 1649 </Y>
;<Filename> BottomText </Filename>
;</Image>

<Image>
<X> 0 </X>
<Y> 1655 </Y>
<State>EnableSelectMenuBetweenBrew</State>
<Filename> text_next_order </Filename>
<Image>

<Image>
<X> 835 </X>
<Y> 1735 </Y>
<State>EnableSelectMenuBetweenBrewBlink</State>
<Filename> "ROOT/taobin_project/image/page_payment/arrow_1.png" </Filename>
<Image>




;
<Image>
<X> 751 </X>
<Y> 413 </Y>
<Filename> IMG_CNT </Filename>
</Image>
;
<Text>
<X> XPosiShowCountDownBrew </X>
<Y> 470 </Y>
<Align> End </Align>
<Width> 153 </Width>
<Size> 88 </Size>
<Font> RobotoBold </Font>
<Color> 0x513C2F </Color>
<Value> ShowCountDownBrewing </Value>
</Text>

<Button>
<X> 792 </X>
<Y> 1787 </Y>
<State>EnableSelectMenuBetweenBrew</State>
<Filename> next_pic_bn </Filename>
<FilenamePress> next_pic_bp </FilenamePress>
<EventClick>
	If MachineState_Result = 0 Then

		SAVELOG "User click next button"

		Var Seeker = "next"
		Var MultiPayEnable = "false"
		CoinPause
		Var PayCredit = 0

		Open "ROOT/taobin_project/xml/page_catalog.xml"
	EndIf
</EventClick>
</Button>

<Button>
<X> 792 </X>
<Y> 1687 </Y>
<State>EnableTopupCreditBetweenBrew</State>
<Filename> topup_credit_bn </Filename>
<FilenamePress> topup_credit_bp </FilenamePress>
<EventClick>
	If MachineState_Result = 0 Then

		If NextOrder = "true" Then
			Var topupCreditWithCash = "Disable"

			Var SeekerTmp = "next"
			Var TelephoneNumber = SeekerTmp.TNumberTaobinCredit
		Else
			Var topupCreditWithCash = "Enable"

			Var SeekerTmp = "curr"
			Var TelephoneNumber = SeekerTmp.TNumberTaobinCredit
		EndIf

		SAVELOG "User click topup-credit button"
		Var Seeker = "topupCredit"
		CoinPause
		Var PayCredit = 0

		If TelephoneNumber = "" Then
			Open "ROOT/taobin_project/xml/page_topup_credit.xml"
		Else
			Open "ROOT/taobin_project/xml/page_topup_credit-ChooseNumber.xml"
		EndIf

	EndIf
</EventClick>
</Button>



<GIF>
<X> 526 </X>
<Y> 1680 </Y>
<Width> 241 </Width>
<Height> 204 </Height>
<State> ButtonGamePressToPlayState </State>
<Filename> "ROOT/taobin_project/app/game/TAMATIAN-01.gif" </Filename>
</GIF>

<Image>
<X> 526 </X>
<Y> 1680 </Y>
<Width> 241 </Width>
<Height> 204 </Height>
<State> ButtonGamePressToPlayState </State>
<EventClick>
	DEBUGVAR Game01Enable
	SAVELOG "Press play game conti"
	Var Game01Enable = 0
	Var ButtonGamePressToPlayState = "Invisible"
	RunApp "com.NDF.taobin"
</EventClick>
</Image>



<Button>
<X> 10 </X>
<Y> 500 </Y>
<State>bg_strawlid_ST</State>
<Filename> bg_strawlid </Filename>
<EventClick>

</EventClick>
</Button>

; straw left
<Button>
<X> 50 </X>
<Y> 572 </Y>
<State> StrawStateX </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping2/bn_straw.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping2/bp_straw.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/topping2/bd_straw.png" </FilenameDisable>
<EventClick>
	SAVELOG "Click straw cb"
	If StrawStateX = "Press" Then
		;Var StrawStateX = "Enable"
	Else
		Var StrawStateX = "Press"
		Var Seeker.strawAction = 1

	EndIf
	Refresh
</EventClick>
</Button>

<Button>
<X> 377 </X>
<Y> 579 </Y>
<State> StrawStateX </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping2/cb_notcheck.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping2/cb_checked.png" </FilenamePress>
<FilenameDisable> Var( DirImage + "/cb_checkdis.png" ) </FilenameDisable>
<EventClick>
	SAVELOG "Click straw cb"
	If StrawStateX = "Press" Then
		;Var StrawStateX = "Enable"
	Else
		Var StrawStateX = "Press"
		Var Seeker.strawAction = 1
	EndIf
	Refresh
</EventClick>
</Button>



; LID left
<Button>
<X> 50 </X>
<Y> 648 </Y>
<State> LidStateX </State>
<Mode> "No" </Mode>
<Filename>  "ROOT/taobin_project/image/topping2/bn_lid.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping2/bp_lid.png" </FilenamePress>
<FilenameDisable> Var( DirImage + "/bd_lid.png" ) </FilenameDisable>
<EventClick>

	If Seeker.thankLidFlag = 0 Then

		SAVELOG "Click LID pic"
		If LidStateX = "Press" Then
			;Var LidStateX = "Enable"
		Else
			Var LidStateX = "Press"
			Var Seeker.lidAction = 1
		EndIf


		DEBUGVAR SugarState1
		Refresh

	EndIf

</EventClick>
</Button>

<Button>
<X> 377 </X>
<Y> 655 </Y>
<State> LidStateX </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping2/cb_notcheck.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping2/cb_checked.png" </FilenamePress>
<FilenameDisable> Var( DirImage + "/cb_checkdis.png" ) </FilenameDisable>
<EventClick>

	If Seeker.thankLidFlag = 0 Then

		SAVELOG "Click LID cb"
		If LidStateX = "Press" Then
			;Var LidStateX = "Enable"
		Else
			Var LidStateX = "Press"
			Var Seeker.lidAction = 1
		EndIf
		Refresh

	EndIf

</EventClick>
</Button>


<Button>
<X> 526 </X>
<Y> 1787 </Y>
<State> ButtonGameCountDownState </State>
<Filename>  "ROOT/taobin_project/image/page_doing/bn_game_cnt_down.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_doing/bn_game_cnt_down.png" </FilenamePress>
<EventClick>

</EventClick>
<Text>
	<X> 0 </X>
	<Y> 0 </Y>
	<Size> 64 </Size>
	<Align> Center </Align>
	<Width> 240 </Width>
	<Font> KanitBoldTTF </Font>
	<Color> 0xFFFFFF </Color>
	<State> ButtonGameCountDownState </State>
	<Value> ButtonGameCountDown </Value>
</Text>
</Button>

<EventUnitTest5>
    DEBUGVAR "TestVoidCredit"
    ;TestSwitchApp "com.finexuscards.yippiepos.VOID" "true" "page_brewing3.lxml::EventUnitTest5"
    ;com.forthvending.newui
    ;TestSwitchApp "com.forthvending.newui" "true" "page_brewing3.lxml::EventUnitTest5"

    Open "ROOT/taobin_project/inter/mys/xml/page_void_credit_cardConti.lxml"


</EventUnitTest5>

</Popup>