taobin_project/xml/page_topping_select.xml

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

	Open "ROOT/taobin_project/xml/page_topping_select3.xml"
		
	DEBUGVAR BrewVersionInt
	If BrewVersionInt >= 419 Then
		If ConfigNumer >= 380 Then 
			Open "ROOT/taobin_project/xml/page_topping_select4.xml"
		EndIf
	EndIf
	If JXMLVersionInt > 356 Then
		If ConfigNumer >= 380 Then 
			Open "ROOT/taobin_project/xml/page_topping_select3.xml"
		EndIf
	EndIf
	If ConfigNumer > 360 Then
		SAVELOG "Recipe have smoothies"
		Open "ROOT/taobin_project/xml/page_topping_select2.xml"
	EndIf

	DEBUGVAR video_menu_0

	Var DisableUsingCode = "false"
	Var ShowLidStraw = "Invisible" 
	Var ShowLidOnly = "Invisible" 
	Var ShowCollagenOnly = "Invisible"

	; On open
	Var lidAndStrawOldPageIgnore = "true"
	Var SugarState1 = "Invisible"
	Var SugarState2 = "Invisible"
	Var SugarState3 = "Invisible"
	Var SugarState4 = "Invisible"
	Var SugarState5 = "Invisible"
	
	Var AddShotEnable = "Invisible"
	
	Var BGSugar = "Invisible"
	Var ShotCoffeeBG = "Invisible"
	Var showShotEnable = "Invisible"
	Var ShotCoffeePremium = "Invisible"


	Var StarwState = "Enable"

	; On open
	Var LidState = Lid1Status
	
	;SAVELOG PreviseXMLFileName2
	

	Var topping1 = "1"
	Var topping2 = "31"
	Var topping3 = "31"


	Var BugFlag = 0

	If show_eng = "true" Then 
		
		Var DirImage = "ROOT/taobin_project/image/topping_en"
		Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
		Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
		Var showname = NameDrink
		Var showdesc = DrinkDescription


		Var lid_straw_bg_iamge = DirImage + "/block_strawonly.png" 

	Else
	
		Var DirImage = "ROOT/taobin_project/image/topping"
		Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
		Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
		Var showname = NameDrinkTH
		Var showdesc = DrinkDescriptionTH


	EndIf

	; Move to catalog.
	;Machine DoorClose
	
	


	Var backGroundAddExtra = DirImage + "/img_ontop_shot.png"
	Var backGroundAddExtra2 = DirImage + "/img_ontop_shot2.png"
		
	CRLFToSpace showname
	CRLFToSpace showdesc
	
	;- Begin
	Var PriceDrinkNoTop = PriceDrink
	Var PriceDrinkTmp = PriceDrink
	Var PriceDrinkTmpShow = charOfBaht + PriceDrinkTmp
	Var Timeout = 0
	
	SAVELOG PriceDrinkTmp
	;- End

	If RoadShow = "true" Then
		Var PriceDrinkTmp = "Free"
	EndIf

	If ShowPrice = "Invisible" Then
		Var PriceDrinkTmpShow = "Free"
	EndIf

	STRCONTAIN "ID=1058" MaterialAvailable sugarKeto
	DEBUGVAR sugarKeto
	If sugarKeto = "true" Then
		Open "ROOT/taobin_project/xml/page_topping_select2.xml"  
	EndIf


	Var ToppingGotoPayment = "true"

	Var ButtonNext = "false"
	
</EventOpen>
<Timeout> 2000 </Timeout>
<EventTimeout> 
	DEBUGVAR Timeout
	Var Timeout = Timeout + 1
	
	If Timeout > 20 Then
		Var Timeout = 0
		Open "ROOT/taobin_project/xml/page_back_to_main.xml"  
	EndIf

	TimerReset
</EventTimeout> 


<Button>
<X> 990 </X>
<Y> 438 </Y>
<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

	If show_eng = "true" Then 
		
		Var DirImage = "ROOT/taobin_project/image/topping_en/"
		Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
		Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
		Var showname = NameDrink
		Var showdesc = DrinkDescription

	Else
		Var DirImage = "ROOT/taobin_project/image/topping/"
		Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
		Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
		Var showname = NameDrinkTH
		Var showdesc = DrinkDescriptionTH
	EndIf

	Var backGroundAddExtra = DirImage + "/img_ontop_shot.png"
	Var backGroundAddExtra2 = DirImage + "/img_ontop_shot2.png"
	
	CRLFToSpace showname
	CRLFToSpace showdesc
	
	If show_eng = "true" Then 
		Play "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Sweet.mp3"
	Else
		Play "/mnt/sdcard/coffeevending/taobin_project/sound_thai/select_level.mp3"
	EndIf
	
	RefreshAll
</EventClick>
</Button>

<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>

; back
<Button>
<X> 19 </X>
<Y> 420 </Y>
<Filename> "ROOT/taobin_project/image/page2/bn_back_arrow.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page2/bn_back_arrow.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	;Open PreviseXMLFileName2
	DEBUGVAR OpenFromXML
	Open OpenFromXML
	
</EventClick>
</Button>

<EventMachine>
	
	
	DEBUGVAR TOPPING1
	DEBUGVAR TOPPING2
	DEBUGVAR TOPPING3
	DEBUGVAR TOPPING4
	DEBUGVAR toppingID1index1
	DEBUGVAR toppingID1index2
	DEBUGVAR toppingID1index3
	DEBUGVAR toppingID1index4
	DEBUGVAR toppingID1index5
	DEBUGVAR toppingID1index6
	DEBUGVAR toppingID1index7
	DEBUGVAR toppingID1index8
	DEBUGVAR toppingID1index9
	
	DEBUGVAR toppingID2index1
	DEBUGVAR toppingID2index2
	DEBUGVAR toppingID2index3
	DEBUGVAR toppingID2index4
	DEBUGVAR toppingID2index5
		

	

	
	DEBUGVAR MenuCodeName
	DEBUGVAR toppingID1Default
	DEBUGVAR toppingID2Default
	DEBUGVAR toppingID3Default
	

	DEBUGVAR toppingID2price2
	DEBUGVAR toppingID3price2

	DEBUGVAR BrewParam
	
	If BugFlag = 1 Then

	Else
		STRCONTAIN "9701" BrewParam IgnoreLidStraw 

		DEBUGVAR BrewParam
		DEBUGVAR IgnoreLidStraw
		
		

		If IgnoreLidStraw = "true" Then
			Var IgnoreLidStraw = "false"
			Var ShowLidStraw = "Invisible" 
			Var ShowLidOnly = "Invisible" 
		
		Else
			If LidState = "Enable" Then
				Var ShowLidStraw = "Enable" 
				Var ShowLidOnly = "Invisible" 
			Else
				Var ShowLidStraw = "Invisible" 
				Var ShowLidOnly = "Enable" 
			EndIf
		EndIf
		
		If Service_LidStraw = "Disable" Then
			Var ShowLidStraw = "Invisible" 
			Var ShowLidOnly = "Invisible" 
		
		EndIf

		;PressForever
		If TOPPING1 = "Sugar" Then
			Var BGSugar = "Enable"
			Var ShiftSugarStep = 1
			Var SugarState1 = "Enable"
			Var SugarState2 = "Enable"
			Var SugarState3 = "Enable"
			Var SugarState4 = "Enable"
			Var SugarState5 = "Enable"

			If toppingID1index1 = toppingID1Default Then
				Var SugarState1 = "PressForever"
			EndIf
			
			If toppingID1index2 = toppingID1Default Then
				Var SugarState2 = "PressForever"
			EndIf
			
			If toppingID1index3 = toppingID1Default Then
				Var SugarState3 = "PressForever"
			EndIf

			If toppingID1index4 = toppingID1Default Then
				Var SugarState4 = "PressForever"
			EndIf

			If toppingID1index5 = toppingID1Default Then
				Var SugarState5 = "PressForever"
			EndIf

		EndIf
		
		If TOPPING1 = "Powder Sugar" Then
			Var BGSugar = "Enable"
			Var ShiftSugarStep = 1
			Var SugarState1 = "Enable"
			Var SugarState2 = "Enable"
			Var SugarState3 = "Enable"
			Var SugarState4 = "Enable"
			Var SugarState5 = "Enable"

			If toppingID1index1 = toppingID1Default Then
				Var SugarState1 = "PressForever"
			EndIf
			
			If toppingID1index2 = toppingID1Default Then
				Var SugarState2 = "PressForever"
			EndIf
			
			If toppingID1index3 = toppingID1Default Then
				Var SugarState3 = "PressForever"
			EndIf

			If toppingID1index4 = toppingID1Default Then
				Var SugarState4 = "PressForever"
			EndIf

			If toppingID1index5 = toppingID1Default Then
				Var SugarState5 = "PressForever"
			EndIf

		EndIf
		

		If TOPPING1 = "Sugar Premix 25" Then
			Var BGSugar = "Enable"
			Var ShiftSugarStep = 2
			Var SugarState2 = "Enable"
			Var SugarState3 = "Enable"
			Var SugarState4 = "Enable"
			Var SugarState5 = "Enable"
			
			If toppingID1index1 = toppingID1Default Then
				Var SugarState2 = "PressForever"
			EndIf
			
			If toppingID1index2 = toppingID1Default Then
				Var SugarState3 = "PressForever"
			EndIf

			If toppingID1index3 = toppingID1Default Then
				Var SugarState4 = "PressForever"
			EndIf

			If toppingID1index4 = toppingID1Default Then
				Var SugarState5 = "PressForever"
			EndIf
			
		EndIf

		If TOPPING1 = "Powder Sugar Premix 50" Then
			Var BGSugar = "Enable"
			Var ShiftSugarStep = 3
			Var SugarState3 = "Enable"
			Var SugarState4 = "Enable"
			Var SugarState5 = "Enable"
			
			If toppingID1index1 = toppingID1Default Then
				Var SugarState3 = "PressForever"
			EndIf

			If toppingID1index2 = toppingID1Default Then
				Var SugarState4 = "PressForever"
			EndIf

			If toppingID1index3 = toppingID1Default Then
				Var SugarState5 = "PressForever"
			EndIf
			
		EndIf

		If TOPPING1 = "Powder Sugar Premix 25" Then
			Var BGSugar = "Enable"
			Var ShiftSugarStep = 2
			Var SugarState2 = "Enable"
			Var SugarState3 = "Enable"
			Var SugarState4 = "Enable"
			Var SugarState5 = "Enable"
			
			If toppingID1index1 = toppingID1Default Then
				Var SugarState2 = "PressForever"
			EndIf
			
			If toppingID1index2 = toppingID1Default Then
				Var SugarState3 = "PressForever"
			EndIf

			If toppingID1index3 = toppingID1Default Then
				Var SugarState4 = "PressForever"
			EndIf

			If toppingID1index4 = toppingID1Default Then
				Var SugarState5 = "PressForever"
			EndIf
			
		EndIf



		Var ShowCollagenOnly = "Enable"

		Var BugFlag = 1
		
		Var topping1 = toppingID1Default

		Var ToppingGotoPayment = "false"
		
		If BGSugar = "Enable" Then
			If show_eng = "true" Then 
				Play "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Sweet.mp3"
			Else
				Play "/mnt/sdcard/coffeevending/taobin_project/sound_thai/select_level.mp3"
			EndIf
		EndIf
		Refresh
		
		Var collagenShow = "true"
;-BEGIN shot layout

		Var topping3 = toppingID3Default
		Var shot_h_layout = 218

		If TOPPING2 = "shot coffee" Then
	
			Var ShotCoffeeBG = "Enable"
			Var showShotEnable = "Enable"

			DEBUGVAR TOPPING3
			If TOPPING3 = "Collagen" Then

				Var ShowCollagenOnly = "Invisible"
				Var backGroundAddExtra = DirImage + "/img_ontop_shot_col.png"
				Var shot_h_layout = 310

			EndIf
			Refresh
		EndIf

		
		If TOPPING2 = "shot coffee termtem" Then
	
			Var ShotCoffeeBG = "Enable"
			Var showShotEnable = "Enable"

			DEBUGVAR TOPPING2
			Refresh
		EndIf

		If TOPPING2 = "shot coffee 1003" Then
	
			Var ShotCoffeePremium = "Enable"
			Var showShotEnable = "Enable"

			If TOPPING3 = "Collagen" Then

				Var ShowCollagenOnly = "Invisible"
				Var backGroundAddExtra = DirImage + "/img_ontop_shot_col.png"
				Var shot_h_layout = 310

			EndIf
			DEBUGVAR TOPPING2
			Refresh
		EndIf

		If TOPPING2 = "shot coffee 1007" Then
	
			Var ShotCoffeePremium = "Enable"
			Var showShotEnable = "Enable"

			If TOPPING3 = "Collagen" Then

				Var ShowCollagenOnly = "Invisible"
				Var backGroundAddExtra = DirImage + "/img_ontop_shot_col.png"
				Var shot_h_layout = 310

			EndIf
			DEBUGVAR TOPPING2
			Refresh
		EndIf
;-END
		If TOPPING3 = "Collagen" Then
			Var CollagenState = "Enable"
		Else
			Var CollagenState = "Invisible"
			Var ShowCollagenOnly = "Invisible"
		EndIf
		
		
		
		SAVELOG ToppingGotoPayment
		If ToppingGotoPayment = "true" Then
			Topping "Select" SelectDrink
			; Pack
			Topping "Pack" ExtendData
			Open "ROOT/taobin_project/xml/page_payment.xml"
		EndIf
	
		
		If RoadShow = "true" Then
			Var PriceShowValue = "Free"
		EndIf

		SAVELOG toppingID2price1
		SAVELOG toppingID2price2
		SAVELOG toppingID2price3
	EndIf


</EventMachine>

<EventCart>
		;Var BugFlag = 1
	If CartUpdate = "true" Then
		Var CartUpdate = "-"
		If CART_COUNT = 3 Then
			Open "ROOT/taobin_project/xml/page_payment_multi.xml"
		Else
			If ButtonNext = "true" Then
				Open "ROOT/taobin_project/xml/page_payment_multi.xml"
			Else
				Open "ROOT/taobin_project/xml/page_catalog.xml" 
			EndIf
		EndIf
	EndIf

</EventCart>




<Image>
<X> 374 </X>
<Y> 436 </Y>
<Width> 331 </Width>
<Height> 436 </Height>
<Filename> PictureDrink </Filename>
</Image>

<Text>
<X> 0 </X>
<Y> 752 </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> 836 </Y>
<Width> 1080</Width>
<Align> Center </Align>
<Size> 24 </Size>
<Font> KanitLightTTF </Font>
<Color> 0x6F5F51 </Color>
<Value> showdesc </Value>
</Text>

;<Text>
;<X> 0 </X>
;<Y> 880 </Y>
;<State> BGSugar </State>
;<Width> 1080</Width>
;<Align> Center </Align>
;<Size> 18 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xEE8C62 </Color>
;<Value> "*ห้ามดื่มเกินวันละ 2 แก้ว เพราะหัวใจสั่น นอนไม่หลับ เด็กและสตรีมีครรภ์ไม่ควรดื่ม ผู้ป่วยควรปรึกษาแพทย์ก่อน" </Value>
;</Text>




; back
<Button>
<X> 44 </X>
<Y> 1785 </Y>
<Filename> Var( DirImage + "/bp_cancel.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bn_cancel.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	Open "ROOT/taobin_project/xml/page_catalog.xml" 
	
</EventClick>
</Button>


; add backet
<Button>
<X> 285 </X>
<Y> 1785 </Y>
<State> BBasketState </State>
<Filename> Var( DirImage + "/bn_add.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_add.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 

	Var PriceDrink = PriceDrinkTmp
	SAVELOG "USER press next ( topping ) - new"
	DEBUGVAR topping1
	DEBUGVAR topping2
	DEBUGVAR topping3

	DEBUGVAR LidState
	DEBUGVAR StarwState
	DEBUGVAR UserSelectProductCode
	DEBUGVAR HAVE_UV_DOOR_LID

	If HAVE_UV_DOOR_LID = "true" Then

		If StarwState = "Press" Then
			Machine StrawOrder	
			Var LedLidBlink = "true"
		EndIf

		If LidState = "Press" Then
			Machine LidOrder	
			Var LedLidBlink = "true"
		EndIf

		Var StarwState = "Enable"
		Var LidState = "Enable"
		; 
		
	EndIf

	Var SelectDrink = UserSelectProductCode
	; Set drink 
	Topping "Select" UserSelectProductCode

	; Set option toppinng and pack 
	Topping "Select1-ID" topping1
	Topping "Select2-ID" topping2
	Topping "Select3-ID" topping3

	; Pack
	Topping "Pack" ExtendData

	If CART1_STATUS = "EMPTY" Then
		Cart "AddMenuID" 1
	Else
		If CART2_STATUS = "EMPTY" Then
			Cart "AddMenuID" 2
		Else
			If CART3_STATUS = "EMPTY" Then
				Cart "AddMenuID" 3
			EndIf
		EndIf
	EndIf
	
	Var CartUpdate = "true"
	
</EventClick>
</Button>

; next
<Button>
<X> 673 </X>
<Y> 1785 </Y>
<Filename> Var( DirImage + "/bn_next.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_next.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 

	If CART_COUNT  = 0 Then

		Var PriceDrink = PriceDrinkTmp
		SAVELOG "USER press next ( topping )"
		DEBUGVAR topping1
		DEBUGVAR topping2
		DEBUGVAR topping3

		DEBUGVAR LidState
		DEBUGVAR StarwState
		DEBUGVAR HAVE_UV_DOOR_LID

		If HAVE_UV_DOOR_LID = "true" Then

			If StarwState = "Press" Then
				Machine StrawOrder	
			EndIf

			If LidState = "Press" Then
				Machine LidOrder	
			EndIf

			Var StarwState = "Enable"
			Var LidState = "Enable"
			
		EndIf

		; Set drink 
		Topping "Select" SelectDrink

		; Set option toppinng and pack 
		Topping "Select1-ID" topping1
		Topping "Select2-ID" topping2
		Topping "Select3-ID" topping3

		; Pack
		Topping "Pack" ExtendData


		Open "ROOT/taobin_project/xml/page_payment.xml" 

	Else

		Var PriceDrink = PriceDrinkTmp
		SAVELOG "USER press next ( topping ) - new"
		DEBUGVAR topping1
		DEBUGVAR topping2
		DEBUGVAR topping3

		DEBUGVAR LidState
		DEBUGVAR StarwState
		DEBUGVAR UserSelectProductCode
		DEBUGVAR HAVE_UV_DOOR_LID

		If HAVE_UV_DOOR_LID = "true" Then

			If StarwState = "Press" Then
				Machine StrawOrder	
				Var LedLidBlink = "true"
			EndIf

			If LidState = "Press" Then
				Machine LidOrder	
				Var LedLidBlink = "true"
			EndIf

			Var StarwState = "Enable"
			Var LidState = "Enable"
			; 
			
		EndIf

		Var SelectDrink = UserSelectProductCode
		; Set drink 
		Topping "Select" UserSelectProductCode

		; Set option toppinng and pack 
		Topping "Select1-ID" topping1
		Topping "Select2-ID" topping2
		Topping "Select3-ID" topping3

		; Pack
		Topping "Pack" ExtendData

		If CART1_STATUS = "EMPTY" Then
			Cart "AddMenuID" 1
		Else
			If CART2_STATUS = "EMPTY" Then
				Cart "AddMenuID" 2
			Else
				If CART3_STATUS = "EMPTY" Then
					Cart "AddMenuID" 3
				EndIf
			EndIf
		EndIf
		
		Var CartUpdate = "true"
		Var ButtonNext = "true"
	EndIf
</EventClick>
</Button>


<Text>
<X> 924 </X>
<Y> 1804 </Y>
<Font> KanitTTF </Font>
<Size> 36 </Size>
<Width> 1080 </Width>
<Color> 0xFFFFFF </Color>
<Animation>
	<Style> "shake-text" </Style>
	<OnEvent> "OnValueChange" </OnEvent>
</Animation>
<Value> PriceDrinkTmpShow </Value>
</Text>

;- FRAME SCORELLL
<FrameScroll> 
<X> 44 </X>
<Y> y_topping_bg </Y>
<Width> 1080 </Width>
<ScrollHeight> "auto-all" </ScrollHeight>
<Scroll> "Vertical" </Scroll>
<Column> 1 </Column>


;- Begin topping1
<Block>
<Width> 986 </Width>
<Height> 210 </Height>
<MarginTop> 5 </MarginTop>
<State> BGSugar </State> 
; sugar layout
<Image>
<State> BGSugar </State>
<Filename> Var( DirImage + "/img_sugar.png" )</Filename>
</Image>

; sugar1
<Button>
<X> 137 </X>
<Y> 105 </Y>
<State> SugarState1 </Stage>
<Filename> Var( DirImage + "/bn_sugar1.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_sugar1.png" ) </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	If ShiftSugarStep = 1 Then
			
		Var SugarState1 = "PressForever"
		Var SugarState2 = "Enable"
		Var SugarState3 = "Enable"
		Var SugarState4 = "Enable"
		Var SugarState5 = "Enable"
		Var topping1 = toppingID1index1
	EndIf


	DEBUGVAR topping1
	Refresh
</EventClick>
</Button>

; sugar2
<Button>
<X> 300 </X>
<Y> 105 </Y>
<State> SugarState2 </Stage>
<Filename> Var( DirImage + "/bn_sugar2.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_sugar2.png" ) </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	If ShiftSugarStep = 1 Then
		Var SugarState1 = "Enable"
		Var SugarState2 = "PressForever"
		Var SugarState3 = "Enable"
		Var SugarState4 = "Enable"
		Var SugarState5 = "Enable"
		Var topping1 = toppingID1index2
	EndIf

	If ShiftSugarStep = 2 Then

		Var SugarState2 = "PressForever"
		Var SugarState3 = "Enable"
		Var SugarState4 = "Enable"
		Var SugarState5 = "Enable"
		Var topping1 = toppingID1index1
	EndIf

	DEBUGVAR topping1
	Refresh
</EventClick>
</Button>


; sugar3
<Button>
<X> 463 </X>
<Y> 105 </Y>
<State> SugarState3 </Stage>
<Filename> Var( DirImage + "/bn_sugar3.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_sugar3.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	If ShiftSugarStep = 1 Then
		Var SugarState1 = "Enable"
		Var SugarState2 = "Enable"
		Var SugarState3 = "PressForever"
		Var SugarState4 = "Enable"
		Var SugarState5 = "Enable"
		Var topping1 = toppingID1index3
	EndIf

	If ShiftSugarStep = 2 Then
		Var SugarState2 = "Enable"
		Var SugarState3 = "PressForever"
		Var SugarState4 = "Enable"
		Var SugarState5 = "Enable"
		Var topping1 = toppingID1index2
	EndIf

	If ShiftSugarStep = 3 Then

		Var SugarState3 = "PressForever"
		Var SugarState4 = "Enable"
		Var SugarState5 = "Enable"
		Var topping1 = toppingID1index1

	EndIf

	DEBUGVAR topping1
	Refresh
</EventClick>
</Button>

; sugar4
<Button>
<X> 626 </X>
<Y> 105 </Y>
<State> SugarState4 </Stage>
<Filename> Var( DirImage + "/bn_sugar4.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_sugar4.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	If ShiftSugarStep = 1 Then
		Var SugarState1 = "Enable"
		Var SugarState2 = "Enable"
		Var SugarState3 = "Enable"
		Var SugarState4 = "PressForever"
		Var SugarState5 = "Enable"
		Var topping1 = toppingID1index4
	EndIf

	If ShiftSugarStep = 2 Then
		Var SugarState2 = "Enable"
		Var SugarState3 = "Enable"
		Var SugarState4 = "PressForever"
		Var SugarState5 = "Enable"
		Var topping1 = toppingID1index3
	EndIf

	If ShiftSugarStep = 3 Then

		Var SugarState3 = "Enable"
		Var SugarState4 = "PressForever"
		Var SugarState5 = "Enable"
		Var topping1 = toppingID1index2
	EndIf


	DEBUGVAR topping1
	Refresh
</EventClick>
</Button>

; sugar5
<Button>
<X> 789 </X>
<Y> 105 </Y>
<State> SugarState5 </Stage>
<Filename> Var( DirImage + "/bn_sugar5.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_sugar5.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	If ShiftSugarStep = 1 Then
		Var SugarState1 = "Enable"
		Var SugarState2 = "Enable"
		Var SugarState3 = "Enable"
		Var SugarState4 = "Enable"
		Var SugarState5 = "PressForever"
		Var topping1 = toppingID1index5
	EndIf

	If ShiftSugarStep = 2 Then
		Var SugarState2 = "Enable"
		Var SugarState3 = "Enable"
		Var SugarState4 = "Enable"
		Var SugarState5 = "PressForever"
		Var topping1 = toppingID1index4
	EndIf

	If ShiftSugarStep = 3 Then

		Var SugarState3 = "Enable"
		Var SugarState4 = "Enable"
		Var SugarState5 = "PressForever"
		Var topping1 = toppingID1index3
	EndIf

	DEBUGVAR topping1
	Refresh
</EventClick>
</Button>
;- END topping1
</Block>
;
;
;
;
;
;
;
;
;
;-BEGIN shot layout
<Block>	
<Width> 986 </Width>
<Height> shot_h_layout </Height>
<MarginTop> 5 </MarginTop>
<State> ShotCoffeeBG </State>
<Image>
<Filename> backGroundAddExtra </Filename>
</Image>

; 
<Button>
<X> 48 </X>
<Y> 102 </Y>
<State> showShotEnable </Stage>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping/bn_shot_1.png"  </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping/bp_shot_1.png"  </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	SAVELOG "Press no shot 1"
	
	If showShotEnable = "Press" Then
		Var showShotEnable = "Enable"
		Var PriceDrinkTmp = PriceDrinkNoTop - toppingID2price2
		Var topping2 = toppingID2index1
		Var DisableUsingCode = "false"
	Else
		Var showShotEnable = "Press"
		Var PriceDrinkTmp = PriceDrinkNoTop + toppingID2price2
		Var topping2 = toppingID2index2
		Var DisableUsingCode = "true"
	EndIf

	Var PriceDrinkNoTop = PriceDrinkTmp
	Var PriceDrinkTmpShow = charOfBaht + PriceDrinkTmp

	If ShowPrice = "Invisible" Then
		Var PriceDrinkTmpShow = "Free"
	EndIf

	SAVELOG PriceDrinkTmp
	Refresh

</EventClick>
</Button>

; 
<Button>
<X> 881 </X>
<Y> 102 </Y>
<State> showShotEnable </Stage>
<Mode> "No" </Mode>
<Filename> Var( DirImage + "/cb_nch.png" ) </Filename>
<FilenamePress> Var( DirImage + "/cb_ch.png" ) </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	SAVELOG "Press add shot 1"
	
	If showShotEnable = "Press" Then
		Var showShotEnable = "Enable"	
		Var PriceDrinkTmp = PriceDrinkNoTop - toppingID2price2
		Var topping2 = toppingID2index1
		Var DisableUsingCode = "false"
	Else
		Var showShotEnable = "Press"
		Var PriceDrinkTmp = PriceDrinkNoTop + toppingID2price2

		Var topping2 = toppingID2index2
		Var DisableUsingCode = "true"
	EndIf

	Var PriceDrinkNoTop = PriceDrinkTmp

	Var PriceDrinkTmpShow = charOfBaht + PriceDrinkTmp
	
	If ShowPrice = "Invisible" Then
		Var PriceDrinkTmpShow = "Free"
	EndIf

	SAVELOG PriceDrinkTmp
	Refresh

</EventClick>
</Button>


; Collagen left
<Button>
<X> 48 </X>
<Y> 186 </Y>
<State> CollagenState </State>
<Mode> "No" </Mode>
<Filename>  "ROOT/taobin_project/image/topping/bn_img_collagen.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping/bp_img_collagen.png" </FilenamePress>
<EventClick> 
	SAVELOG CollagenState
	If CollagenState = "Press" Then
		Var CollagenState = "Enable"	
		Var PriceDrinkTmp = PriceDrinkNoTop - toppingID3price2
		Var topping3 = toppingID3index1
		Var DisableUsingCode = "false"
	Else
		Var CollagenState = "Press"
		Var PriceDrinkTmp = PriceDrinkNoTop + toppingID3price2
		Var topping3 = toppingID3index2
		Var DisableUsingCode = "true"
	EndIf
	Var PriceDrinkTmpShow = charOfBaht + PriceDrinkTmp
	
	If ShowPrice = "Invisible" Then
		Var PriceDrinkTmpShow = "Free"
	EndIf

	Var PriceDrinkNoTop = PriceDrinkTmp

	DEBUGVAR PriceDrinkTmp
	
	Refresh
</EventClick>
</Button>

<Button>
<X> 881 </X>
<Y> 189 </Y>
<State> CollagenState </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping/bn_checkbox.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping/bp_checkbox.png" </FilenamePress>
<EventClick> 
	SAVELOG CollagenState
	If CollagenState = "Press" Then
		Var CollagenState = "Enable"	
		Var PriceDrinkTmp = PriceDrinkNoTop - toppingID3price2
		Var topping3 = toppingID3index1
		Var DisableUsingCode = "false"
	Else
		Var CollagenState = "Press"
		Var PriceDrinkTmp = PriceDrinkNoTop + toppingID3price2
		Var topping3 = toppingID3index2
		Var DisableUsingCode = "true"
	EndIf
	Var PriceDrinkTmpShow = charOfBaht + PriceDrinkTmp
	
	If ShowPrice = "Invisible" Then
		Var PriceDrinkTmpShow = "Free"
	EndIf

	Var PriceDrinkNoTop = PriceDrinkTmp

	DEBUGVAR PriceDrinkTmp
	
	Refresh
</EventClick>
</Button>

</Block>
;-END
;
;
;
;
;
;
;
;
;
;-BEGIN shot layout
<Block>	
<Width> 986 </Width>
<Height> 224 </Height>
<MarginTop> 5 </MarginTop>
<State> ShotCoffeePremium </State>
<Image>
<Filename> backGroundAddExtra2 </Filename>
</Image>

; 
<Button>
<X> 48 </X>
<Y> 102 </Y>
<State> showShotEnable </Stage>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping/bn_shot_2.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping/bp_shot_2.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	SAVELOG "Press no shot 2"

	If showShotEnable = "Press" Then
		Var showShotEnable = "Enable"
		Var PriceDrinkTmp = PriceDrinkNoTop - toppingID2price2
		Var topping2 = toppingID2index1
		Var DisableUsingCode = "false"
	Else
		Var showShotEnable = "Press"
		Var PriceDrinkTmp = PriceDrinkNoTop + toppingID2price2
		Var topping2 = toppingID2index2
		Var DisableUsingCode = "true"
	EndIf

	Var PriceDrinkNoTop = PriceDrinkTmp

	Var PriceDrinkTmpShow = charOfBaht + PriceDrinkTmp

	If ShowPrice = "Invisible" Then
		Var PriceDrinkTmpShow = "Free"
	EndIf

	SAVELOG PriceDrinkTmp
	Refresh

</EventClick>
</Button>

; 
<Button>
<X> 881 </X>
<Y> 102 </Y>
<State> showShotEnable </Stage>
<Mode> "No" </Mode>
<Filename> Var( DirImage + "/cb_nch.png" ) </Filename>
<FilenamePress> Var( DirImage + "/cb_ch.png" ) </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	SAVELOG "Press add shot 2"

	If showShotEnable = "Press" Then
		Var showShotEnable = "Enable"	
		Var PriceDrinkTmp = PriceDrinkNoTop - toppingID2price2
		Var topping2 = toppingID2index1
		Var DisableUsingCode = "false"
	Else
		Var showShotEnable = "Press"
		Var PriceDrinkTmp = PriceDrinkNoTop + toppingID2price2
		Var topping2 = toppingID2index2
		Var DisableUsingCode = "true"
	EndIf

	Var PriceDrinkNoTop = PriceDrinkTmp

	Var PriceDrinkTmpShow = charOfBaht + PriceDrinkTmp
	
	If ShowPrice = "Invisible" Then
		Var PriceDrinkTmpShow = "Free"
	EndIf
	
	SAVELOG PriceDrinkTmp
	Refresh

</EventClick>
</Button>


; Collagen left
<Button>
<X> 48 </X>
<Y> 186 </Y>
<State> CollagenState </State>
<Mode> "No" </Mode>
<Filename>  "ROOT/taobin_project/image/topping/bn_img_collagen.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping/bp_img_collagen.png" </FilenamePress>
<EventClick> 
	SAVELOG CollagenState
	If CollagenState = "Press" Then
		Var CollagenState = "Enable"	
		Var PriceDrinkTmp = PriceDrinkNoTop - toppingID3price2
		Var topping3 = toppingID3index1
		Var DisableUsingCode = "false"
	Else
		Var CollagenState = "Press"
		Var PriceDrinkTmp = PriceDrinkNoTop + toppingID3price2
		Var topping3 = toppingID3index2
		Var DisableUsingCode = "true"
	EndIf
	Var PriceDrinkTmpShow = charOfBaht + PriceDrinkTmp
	
	If ShowPrice = "Invisible" Then
		Var PriceDrinkTmpShow = "Free"
	EndIf

	Var PriceDrinkNoTop = PriceDrinkTmp

	DEBUGVAR PriceDrinkTmp
	
	Refresh
</EventClick>
</Button>

<Button>
<X> 881 </X>
<Y> 189 </Y>
<State> CollagenState </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping/bn_checkbox.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping/bp_checkbox.png" </FilenamePress>
<EventClick> 
	SAVELOG CollagenState
	If CollagenState = "Press" Then
		Var CollagenState = "Enable"	
		Var PriceDrinkTmp = PriceDrinkNoTop - toppingID3price2
		Var topping3 = toppingID3index1
		Var DisableUsingCode = "false"
	Else
		Var CollagenState = "Press"
		Var PriceDrinkTmp = PriceDrinkNoTop + toppingID3price2
		Var topping3 = toppingID3index2
		Var DisableUsingCode = "true"
	EndIf
	Var PriceDrinkTmpShow = charOfBaht + PriceDrinkTmp
	
	If ShowPrice = "Invisible" Then
		Var PriceDrinkTmpShow = "Free"
	EndIf

	Var PriceDrinkNoTop = PriceDrinkTmp
	
	DEBUGVAR PriceDrinkTmp
	
	Refresh
</EventClick>
</Button>
</Block>
;-END
;
;
;
;
;
;
;
;
;	
;-BEGIN Collagen
<Block>
<Width> 986 </Width>
<Height> 242 </Height>
<MarginTop> 5 </MarginTop>
<State> ShowCollagenOnly </State> 
<Image>
<State> "Enable" </State>
<Filename> Var( DirImage + "/img_ontop_collagen.png" ) </Filename>
</Image>


; straw left
<Button>
<X> 48 </X>
<Y> 110 </Y>
<State> CollagenState </State>
<Mode> "No" </Mode>
<Filename>  "ROOT/taobin_project/image/topping/bn_img_collagen.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping/bp_img_collagen.png" </FilenamePress>
<EventClick> 
	SAVELOG CollagenState
	If CollagenState = "Press" Then
		Var CollagenState = "Enable"	
		Var PriceDrinkTmp = PriceDrinkNoTop
		Var topping3 = toppingID3index1
		Var DisableUsingCode = "false"
	Else
		Var CollagenState = "Press"
		Var PriceDrinkTmp = PriceDrinkNoTop + toppingID3price2
		Var topping3 = toppingID3index2
		Var DisableUsingCode = "true"
	EndIf
	Var PriceDrinkTmpShow = charOfBaht + PriceDrinkTmp
	
	If ShowPrice = "Invisible" Then
		Var PriceDrinkTmpShow = "Free"
	EndIf

	DEBUGVAR PriceDrinkTmp
	
	Refresh
</EventClick>
</Button>

<Button>
<X> 881 </X>
<Y> 105 </Y>
<State> CollagenState </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping/bn_checkbox.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping/bp_checkbox.png" </FilenamePress>
<EventClick> 
	SAVELOG CollagenState
	If CollagenState = "Press" Then
		Var CollagenState = "Enable"	
		Var PriceDrinkTmp = PriceDrinkNoTop
		Var topping3 = toppingID3index1
		Var DisableUsingCode = "false"
	Else
		Var CollagenState = "Press"
		Var PriceDrinkTmp = PriceDrinkNoTop + toppingID3price2
		Var topping3 = toppingID3index2
		Var DisableUsingCode = "true"
	EndIf
	Var PriceDrinkTmpShow = charOfBaht + PriceDrinkTmp
	
	If ShowPrice = "Invisible" Then
		Var PriceDrinkTmpShow = "Free"
	EndIf
	
	DEBUGVAR PriceDrinkTmp
	
	Refresh
</EventClick>
</Button>

</Block>
;- END
;
;
;
;-BEGIN Lid straw
<Block>
<Width> 986 </Width>
<Height> 232 </Height>
<MarginTop> 10 </MarginTop>
<State> ShowLidOnly </State> 
<Image>
<State> "Enable" </State>
<Filename> Var( DirImage + "/block_strawonly.png" ) </Filename>
</Image>


; straw left
<Button>
<X> 48 </X>
<Y> 95 </Y>
<State> StarwState </State>
<Mode> "No" </Mode>
<Filename>  "ROOT/taobin_project/image/topping/bnstraw.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping/bpstraw.png" </FilenamePress>
<EventClick> 
	SAVELOG StarwState
	If StarwState = "Press" Then
		Var StarwState = "Enable"	
	Else
		Var StarwState = "Press"
	EndIf
	Refresh
</EventClick>
</Button>

<Button>
<X> 881 </X>
<Y> 105 </Y>
<State> StarwState </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping/bn_checkbox.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping/bp_checkbox.png" </FilenamePress>
<EventClick> 
		SAVELOG StarwState
	If StarwState = "Press" Then
		Var StarwState = "Enable"	
	Else
		Var StarwState = "Press"
	EndIf
	Refresh
</EventClick>
</Button>

</Block>
;- END
;
;
;
;
;
;
;
;
;
		
;-BEGIN Lid straw
<Block>
<Width> 986 </Width>
<Height> 274 </Height>
<MarginTop> 10 </MarginTop>
<State> ShowLidStraw </State> 
<Image>
<Filename> Var( DirImage + "/block_strawlid.png" ) </Filename>
</Image>

; straw left
<Button>
<X> 48 </X>
<Y> 95 </Y>
<State> StarwState </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping/bnstraw.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping/bpstraw.png" </FilenamePress>
<EventClick> 
	SAVELOG "Click straw cb"
	If StarwState = "Press" Then
		Var StarwState = "Enable"	
	Else
		Var StarwState = "Press"
	EndIf
	Refresh
</EventClick>
</Button>

<Button>
<X> 881 </X>
<Y> 105 </Y>
<State> StarwState </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping/bn_checkbox.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping/bp_checkbox.png" </FilenamePress>
<EventClick> 
	SAVELOG "Click straw cb"
	If StarwState = "Press" Then
		Var StarwState = "Enable"	
	Else
		Var StarwState = "Press"
	EndIf
	Refresh
</EventClick>
</Button>

; LID left
<Button>
<X> 48 </X>
<Y> 175 </Y>
<State> LidState </State>
<Mode> "No" </Mode>
<Filename>  "ROOT/taobin_project/image/topping/bnlid.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping/bplid.png" </FilenamePress>
<EventClick> 
	SAVELOG "Click LID pic"
	If LidState = "Press" Then
		Var LidState = "Enable"	
	Else
		Var LidState = "Press"
	EndIf
	Refresh
</EventClick>
</Button>

<Button>
<X> 881 </X>
<Y> 185 </Y>
<State> LidState </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping/bn_checkbox.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping/bp_checkbox.png" </FilenamePress>
<EventClick> 
	SAVELOG "Click LID cb"
	If LidState = "Press" Then
		Var LidState = "Enable"	
	Else
		Var LidState = "Press"
	EndIf
	Refresh
</EventClick>
</Button>
</Block>
;
;
;
;
;
;
;
;
;
</FrameScroll>	

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


</Page>