1101 lines
22 KiB
Text
1101 lines
22 KiB
Text
<Popup>
|
|
<Cache> "Enable" </Cache>
|
|
<Width> 1080 </Width>
|
|
<Height> 1920 </Height>
|
|
;<Background> "0xeae6e1" </Background>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventOpen>
|
|
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
|
|
|
|
Machine WakeUp
|
|
|
|
Var BugFlag = 0
|
|
|
|
CRLFToSpace showname
|
|
CRLFToSpace showdesc
|
|
|
|
Var MachineEvent = 0
|
|
Var MatchineSpiralStage = "-"
|
|
|
|
Var NextButtonState = "Invisible"
|
|
|
|
;- Begin
|
|
Var PriceDrinkNoTop = PriceDrink
|
|
Var PriceDrinkTmp = PriceDrink
|
|
Var PriceDrinkTmpShow = charOfBaht + PriceDrinkTmp
|
|
Var Timeout = 0
|
|
|
|
;SAVELOG PriceDrinkTmp
|
|
;- End
|
|
|
|
If RoadShow = "true" Then
|
|
Var PriceDrinkTmp = "Free"
|
|
Var SaveSelectDrinkRoadShow = SelectDrink
|
|
EndIf
|
|
|
|
DEBUGVAR SaveSelectDrinkRoadShow
|
|
|
|
If ShowPrice = "Invisible" Then
|
|
Var PriceDrinkTmpShow = "Free"
|
|
EndIf
|
|
|
|
Var StateImgKeto = "Invisible"
|
|
|
|
|
|
Var ToppingGotoPayment = "true"
|
|
|
|
DEBUGVAR backGroundAddExtra
|
|
DEBUGVAR backGroundAddShotPremium
|
|
|
|
DEBUGVAR MultiPayEnable
|
|
DEBUGVAR CART_COUNT
|
|
Var btnAddCart = "Invisible"
|
|
If MultiPayEnable = "true" Then
|
|
Var btnAddCart = "Enable"
|
|
If CART_COUNT = 3 Then
|
|
Var btnAddCart = "Invisible"
|
|
EndIf
|
|
EndIf
|
|
|
|
Var LidDeactiveButton = "Invisible"
|
|
Var StrawDeactiveButton = "Invisible"
|
|
|
|
Machine DoorClose
|
|
Machine DoorLidClose
|
|
|
|
Var ButtonNext = "false"
|
|
|
|
Var NEW_MULTI = "Invisible"
|
|
|
|
Var high_light_drink_type = "Invisible"
|
|
|
|
Var text_hot_color = "0x84776F"
|
|
Var text_cold_color = "0x84776F"
|
|
Var text_blender_color = "0x84776F"
|
|
|
|
Var PriceDrinkTmpShow = "---"
|
|
|
|
Var show_select_type = "Enable"
|
|
|
|
Var hot_button_state = PD_STAGE_1
|
|
Var cold_button_state = PD_STAGE_2
|
|
Var blend_button_state = PD_STAGE_3
|
|
Var normal_button_state = "Invisible"
|
|
|
|
; Protect have product-code but menu disable or invalid.
|
|
If hot_button_state = "Invisible" Then
|
|
|
|
Var hot_button_state = "Disable2"
|
|
EndIf
|
|
If cold_button_state = "Invisible" Then
|
|
|
|
Var cold_button_state = "Disable2"
|
|
EndIf
|
|
If blend_button_state = "Invisible" Then
|
|
|
|
Var blend_button_state = "Disable2"
|
|
EndIf
|
|
|
|
|
|
Function 2
|
|
|
|
|
|
DEBUGVAR show_select_type
|
|
DEBUGVAR PriceD1
|
|
DEBUGVAR PriceD2
|
|
DEBUGVAR PriceD3
|
|
DEBUGVAR DisplayFormatFull
|
|
|
|
If hot_button_state = "Disable2" Then
|
|
Var text_price_d1 = ""
|
|
Else
|
|
Var text_price_d1 !assigned StringFmt( PriceD1 , DisplayFormatFull, PreScaleConvertShow)
|
|
EndIf
|
|
|
|
If cold_button_state = "Disable2" Then
|
|
Var text_price_d2 = ""
|
|
Else
|
|
Var text_price_d2 !assigned StringFmt( PriceD2 , DisplayFormatFull, PreScaleConvertShow)
|
|
EndIf
|
|
|
|
|
|
If blend_button_state = "Disable2" Then
|
|
Var text_price_d3 = ""
|
|
Else
|
|
Var text_price_d3 !assigned StringFmt( PriceD3 , DisplayFormatFull, PreScaleConvertShow)
|
|
EndIf
|
|
|
|
DEBUGVAR LanguageShowByIndex
|
|
DEBUGVAR NameLang[0][LanguageShowByIndex]
|
|
DEBUGVAR NameLang[1][LanguageShowByIndex]
|
|
DEBUGVAR NameLang[2][LanguageShowByIndex]
|
|
|
|
Var showname = aliasName[LanguageShowByIndex]
|
|
Var showdesc = aliasName[LanguageShowByIndex]
|
|
|
|
BackslashNToEnter showname
|
|
BackslashNToEnter showdesc
|
|
|
|
CRLFToSpace showname
|
|
CRLFToSpace showdesc
|
|
|
|
Var Seeker.PictureDrink = PictureDrink
|
|
Var Seeker.showname = showname
|
|
|
|
|
|
</EventOpen>
|
|
<Timeout> 1000 </Timeout>
|
|
<EventTimeout>
|
|
DEBUGVAR Timeout
|
|
|
|
|
|
Var Timeout = Timeout + 1
|
|
|
|
If Timeout > 40 Then
|
|
Var Timeout = 0
|
|
If Seeker = "next" Then
|
|
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_blank.xml"
|
|
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
|
|
Else
|
|
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
|
|
Open "ROOT/taobin_project/xml/page_catalog.xml"
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
If MultiPayEnable = "true" Then
|
|
If NEW_MULTI = "Invisible" Then
|
|
Var NEW_MULTI = "Enable"
|
|
Else
|
|
Var NEW_MULTI = "Invisible"
|
|
EndIf
|
|
EndIf
|
|
|
|
If Seeker = "curr" Then
|
|
If DoorCupPosition = "bottom" Then
|
|
; It normal
|
|
Var EmergencyStop = "false"
|
|
Else
|
|
Var EmergencyStop = "true"
|
|
|
|
|
|
EndIf
|
|
EndIf
|
|
|
|
If MachineEvent = 1 Then
|
|
If MatchineSpiralStage = "-" Then
|
|
|
|
Else
|
|
If MatchineSpiralStage = "spiral-valid" Then
|
|
Function 2
|
|
Var NextButtonState = "Enable"
|
|
Else
|
|
; Verify error
|
|
DEBUGVAR MachineSpiralErrorCode
|
|
Open "ROOT/taobin_project/xml/page_spiral_invalid_failed.xml"
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
Refresh
|
|
TimerReset
|
|
</EventTimeout>
|
|
|
|
<EventLanguageOnChange>
|
|
DEBUGVAR LanguageShow
|
|
DEBUGVAR InternationalEnable
|
|
|
|
SAVELOG "EventLanguageOnChange menu -list"
|
|
|
|
If InternationalEnable = 1 Then
|
|
If CountryName = "Thailand" Then
|
|
Var show_eng_button_stage = "Invisible"
|
|
Var LanguageButtonEnable = "Enable"
|
|
EndIf
|
|
If CountryName = "HongKong" Then
|
|
Var show_eng_button_stage = "Invisible"
|
|
Var LanguageButtonEnable = "Invisible"
|
|
Var BtnLangToggleIndex = "Enable"
|
|
EndIf
|
|
Else
|
|
Var LanguageButtonEnable = "Invisible"
|
|
Var show_eng_button_stage = "Enable"
|
|
EndIf
|
|
|
|
If LanguageShow = "ENG" Then
|
|
Var showname_max_size = 58
|
|
Var warning_image_x = 220
|
|
Var warning_image_y = 1333
|
|
Var warning_text_x = 20
|
|
Var warning_text_y = 1312
|
|
Var text_payment_next_x = 132
|
|
EndIf
|
|
|
|
If LanguageShow = "THAI" Then
|
|
Var showname_max_size = 68
|
|
Var warning_image_x = 335
|
|
Var warning_image_y = 1333
|
|
Var warning_text_x = 20
|
|
Var warning_text_y = 1312
|
|
Var text_payment_next_x = 142
|
|
EndIf
|
|
|
|
If LanguageShow = "MSC" Then
|
|
Var showname_max_size = 68
|
|
Var warning_image_x = 350
|
|
Var warning_image_y = 1333
|
|
Var warning_text_x = 20
|
|
Var warning_text_y = 1312
|
|
Var text_payment_next_x = 142
|
|
EndIf
|
|
|
|
If LanguageShow = "MYANMAR" Then
|
|
Var showname_max_size = 68
|
|
Var warning_image_x = 300
|
|
Var warning_image_y = 1333
|
|
Var warning_text_x = 10
|
|
Var warning_text_y = 1312
|
|
Var text_payment_next_x = 142
|
|
EndIf
|
|
|
|
;OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/page_topping_frozen_fruit_select.lxml"
|
|
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
|
|
RefreshAll
|
|
</EventLanguageOnChange>
|
|
|
|
;include="ROOT/taobin_project/inc/video.inc"
|
|
|
|
<Image>
|
|
<X> 0 </X>
|
|
<Y> 380 </Y>
|
|
<Width> 1080 </Width>
|
|
<Height> 1540 </Height>
|
|
<Color> "0xeae6e1" </Color>
|
|
</Image>
|
|
|
|
|
|
|
|
|
|
|
|
<LangSwitch>
|
|
<X> 1000 </X>
|
|
<Y> 381 </Y>
|
|
<Filename> show_btn </Filename>
|
|
<FilenamePress> show_btp </FilenamePress>
|
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
;
|
|
</EventClick>
|
|
</LangSwitch>
|
|
|
|
<EventLanguageOnChange>
|
|
DEBUGVAR LanguageShowByIndex
|
|
DEBUGVAR LanguageShow
|
|
|
|
|
|
If SelectDrinkType = 1 Then
|
|
Var showname = NameLang[IndexDrinktType][LanguageShowByIndex]
|
|
Var showdesc = DescLang[IndexDrinktType][LanguageShowByIndex]
|
|
|
|
Else
|
|
Var showname = aliasName[LanguageShowByIndex]
|
|
Var showdesc = aliasName[LanguageShowByIndex]
|
|
|
|
EndIf
|
|
|
|
BackslashNToEnter showname
|
|
BackslashNToEnter showdesc
|
|
CRLFToSpace showname
|
|
CRLFToSpace showdesc
|
|
Var Timeout = 0
|
|
</EventLanguageOnChange>
|
|
|
|
|
|
|
|
; 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
|
|
|
|
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
|
|
|
|
Open OpenFromXML
|
|
|
|
|
|
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<EventMachine>
|
|
If BugFlag = 1 Then
|
|
|
|
Else
|
|
|
|
Var MachineEvent = 1
|
|
DEBUGVAR LinkProductCodeAnotherMachine[0]
|
|
DEBUGVAR LinkProductCodeAnotherMachine[1]
|
|
DEBUGVAR LinkProductCodeAnotherMachine[2]
|
|
|
|
Var MatchineSpiralStage = "-"
|
|
|
|
GenHashWithTimeStamp SpiralRef
|
|
SPIRAL_VERIFY LinkProductCodeAnotherMachine[0] SpiralRef
|
|
|
|
EndIf
|
|
|
|
|
|
</EventMachine>
|
|
|
|
|
|
; same
|
|
<Image>
|
|
<X> 374 </X>
|
|
<Y> 752 </Y>
|
|
<Width> 331 </Width>
|
|
<Height> 436 </Height>
|
|
<Filename> PictureDrink </Filename>
|
|
</Image>
|
|
|
|
|
|
<Image>
|
|
<X> 374 </X>
|
|
<Y> 399 </Y>
|
|
<State> eval(
|
|
If IsSmoRet = "true" Then
|
|
Var return = "Enable"
|
|
Else
|
|
Var return = "Invisible"
|
|
EndIf
|
|
)
|
|
</State>
|
|
<Filename> "ROOT/taobin_project/image/topping2/blender_icon.png" </Filename>
|
|
</Image>
|
|
|
|
; same
|
|
; Text head
|
|
<Text>
|
|
<X> 0 </X>
|
|
<Y> 602 </Y>
|
|
<Width> 1080</Width>
|
|
<Align> Center </Align>
|
|
<MaxSize> showname_max_size </MaxSize>
|
|
<Size> Auto </Size>
|
|
<MaxLine> 2 </MaxLine>
|
|
<Font> KanitMediumTTF </Font>
|
|
<Color> 0x513C2F </Color>
|
|
<Value> showname </Value>
|
|
</Text>
|
|
|
|
<Text>
|
|
<X> 0 </X>
|
|
<Y> 1082 </Y>
|
|
<Width> 1080</Width>
|
|
<Align> Center </Align>
|
|
<Size> 68 </Size>
|
|
<Font> KanitMediumTTF </Font>
|
|
<Color> 0xEE8C62 </Color>
|
|
<Value> text_price_d3 </Value>
|
|
</Text>
|
|
|
|
; same
|
|
<Text>
|
|
<X> 25 </X>
|
|
<Y> 1232 </Y>
|
|
<Width> 1080</Width>
|
|
<Align> Center </Align>
|
|
<Size> 32 </Size>
|
|
<Font> KanitMediumTTF </Font>
|
|
<Color> 0x6F5F51 </Color>
|
|
<Value> showdesc </Value>
|
|
</Text>
|
|
|
|
; warning time
|
|
<Image>
|
|
<Refresh> "Enable" </Refresh>
|
|
<X> warning_image_x </X>
|
|
<Y> warning_image_y </Y>
|
|
<Filename> "ROOT/taobin_project/image/topping_inter/time.png" </Filename>
|
|
</Image>
|
|
|
|
<Text>
|
|
<Refresh> "Enable" </Refresh>
|
|
<X> warning_text_x </X>
|
|
<Y> warning_text_y </Y>
|
|
<Language>
|
|
<X> 0 </X>
|
|
<Y> 19 </Y>
|
|
<ID> 002290 </ID>
|
|
</Language>
|
|
</Text>
|
|
|
|
|
|
|
|
|
|
<EventSecurity>
|
|
Open "/media/bt/xml/security_alarm.xml"
|
|
</EventSecurity>
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
; add cart
|
|
<Button>
|
|
<State> btnAddCart </State>
|
|
<X> 285 </X>
|
|
<Y> 1785 </Y>
|
|
<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 StrawState
|
|
DEBUGVAR UserSelectProductCode
|
|
DEBUGVAR HAVE_UV_DOOR_LID
|
|
|
|
|
|
If StrawState = "Press" Then
|
|
Machine StrawOrder
|
|
Var LedLidBlink = "true"
|
|
EndIf
|
|
|
|
If LidState = "Press" Then
|
|
Machine LidOrder
|
|
Var LedLidBlink = "true"
|
|
EndIf
|
|
|
|
Var StrawState = "Enable"
|
|
Var LidState = "Enable"
|
|
;
|
|
|
|
|
|
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
|
|
|
|
Var Seeker.ExtendData = 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>
|
|
|
|
<Button>
|
|
<X> 277 </X>
|
|
<Y> 1772 </Y>
|
|
<State> NEW_MULTI </State>
|
|
;<Color> "0x00BDFF" </Color>
|
|
<Interval> 500 </Interval>
|
|
<Filename> Var( DirImage + "/new_multi.png" ) </Filename>
|
|
<EventClick>
|
|
</EventClick>
|
|
</Button>
|
|
|
|
; next
|
|
<Button>
|
|
<State> NextButtonState </State>
|
|
<X> 350 </X>
|
|
<Y> 1422 </Y>
|
|
<Filename> "ROOT/taobin_project/image/topping_inter/bn_next2.png" </Filename>
|
|
<FilenamePress> "ROOT/taobin_project/image/topping_inter/bp_next2.png" </FilenamePress>
|
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
|
|
<EventClick>
|
|
|
|
;Var Seeker = "curr"
|
|
|
|
|
|
DEBUGVAR PriceDrinkTmp
|
|
|
|
;Var Seeker.PriceDrink = PriceDrinkTmp
|
|
|
|
Var PriceDrink = PriceDrinkTmp
|
|
|
|
SAVELOG "USER press next ( topping ) - new"
|
|
|
|
If SugarState1 = "PressForever" Then
|
|
If ShiftSugarStep = 1 Then
|
|
Var topping1 = toppingID1index1
|
|
EndIf
|
|
EndIf
|
|
|
|
If SugarState2 = "PressForever" Then
|
|
If ShiftSugarStep = 1 Then
|
|
Var topping1 = toppingID1index2
|
|
EndIf
|
|
If ShiftSugarStep = 2 Then
|
|
Var topping1 = toppingID1index1
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
If SugarState3 = "PressForever" Then
|
|
If ShiftSugarStep = 1 Then
|
|
Var topping1 = toppingID1index3
|
|
EndIf
|
|
If ShiftSugarStep = 2 Then
|
|
Var topping1 = toppingID1index2
|
|
EndIf
|
|
If ShiftSugarStep = 3 Then
|
|
Var topping1 = toppingID1index1
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
If SugarState3 = "PressForever" Then
|
|
If ShiftSugarStep = 1 Then
|
|
Var topping1 = toppingID1index3
|
|
EndIf
|
|
If ShiftSugarStep = 2 Then
|
|
Var topping1 = toppingID1index2
|
|
EndIf
|
|
If ShiftSugarStep = 3 Then
|
|
Var topping1 = toppingID1index1
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
If SugarState4 = "PressForever" Then
|
|
If ShiftSugarStep = 1 Then
|
|
Var topping1 = toppingID1index4
|
|
EndIf
|
|
If ShiftSugarStep = 2 Then
|
|
Var topping1 = toppingID1index3
|
|
EndIf
|
|
If ShiftSugarStep = 3 Then
|
|
Var topping1 = toppingID1index2
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
If SugarState5 = "PressForever" Then
|
|
If ShiftSugarStep = 1 Then
|
|
Var topping1 = toppingID1index5
|
|
EndIf
|
|
If ShiftSugarStep = 2 Then
|
|
Var topping1 = toppingID1index4
|
|
EndIf
|
|
If ShiftSugarStep = 3 Then
|
|
Var topping1 = toppingID1index3
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
|
|
Var Seeker.topping1 = topping1
|
|
Var Seeker.topping2 = topping2
|
|
Var Seeker.topping3 = topping3
|
|
Var Seeker.topping6 = topping6
|
|
|
|
Var Seeker.get_a_straw = StrawState
|
|
Var Seeker.get_a_lid = LidState
|
|
|
|
|
|
DEBUGVAR Seeker.topping1
|
|
DEBUGVAR Seeker.topping2
|
|
DEBUGVAR Seeker.topping3
|
|
DEBUGVAR Seeker.topping6
|
|
DEBUGVAR Seeker.get_a_straw
|
|
DEBUGVAR Seeker.get_a_lid
|
|
|
|
DEBUGVAR LidState
|
|
DEBUGVAR StrawState
|
|
DEBUGVAR UserSelectProductCode
|
|
|
|
|
|
If StrawState = "Press" Then
|
|
Machine StrawOrder
|
|
Var LedLidBlink = "true"
|
|
EndIf
|
|
|
|
If LidState = "Press" Then
|
|
Machine LidOrder
|
|
Var LedLidBlink = "true"
|
|
Var bg_lidProblem_ST = "Enable"
|
|
Else
|
|
Var bg_lidProblem_ST = "Invisible"
|
|
EndIf
|
|
|
|
If SelectDrinkType = 0 Then
|
|
|
|
Else
|
|
Var StrawState = "Enable"
|
|
Var LidState = "Enable"
|
|
EndIf
|
|
;
|
|
|
|
|
|
Var SelectDrink = UserSelectProductCode
|
|
|
|
Var Seeker.selected_a_drink = UserSelectProductCode
|
|
DEBUGVAR Seeker.selected_a_drink
|
|
|
|
; Set drink
|
|
|
|
If Seeker = "curr" Then
|
|
Topping "Select" UserSelectProductCode
|
|
|
|
; Set option toppinng and pack
|
|
Topping "Select1-ID" topping1
|
|
Topping "Select2-ID" topping2
|
|
Topping "Select3-ID" topping3
|
|
Topping "Select6-ID" topping6
|
|
|
|
; Pack
|
|
Topping "Pack" ExtendDataCurr
|
|
|
|
Else
|
|
Topping "SetNextOrder" UserSelectProductCode
|
|
|
|
|
|
Topping "__select" UserSelectProductCode
|
|
; Set option toppinng and pack
|
|
Topping "__select1-id" topping1
|
|
Topping "__select2-id" topping2
|
|
Topping "__select3-id" topping3
|
|
Topping "__select6-id" topping6
|
|
; Pack
|
|
Topping "__pack" ExtendDataNext
|
|
|
|
Var NextUserSelectDrinkFromPaid = UserSelectProductCode
|
|
Var NextUserSelecttopping1Paid = topping1
|
|
Var NextUserSelecttopping2Paid = topping2
|
|
Var NextUserSelecttopping3Paid = topping3
|
|
Var NextUserSelecttopping6Paid = topping6
|
|
|
|
|
|
|
|
EndIf
|
|
DEBUGVAR Seeker
|
|
DEBUGVAR Seeker.ExtendData
|
|
|
|
Machine StrawOrder
|
|
Var Seeker.PictureDrink = PictureDrink
|
|
Var Seeker.showname = showname
|
|
|
|
DEBUGVAR MenuCautionImageStage0
|
|
DEBUGVAR CustomerFilterEnable
|
|
DEBUGVAR CustomerFilterType
|
|
|
|
|
|
If LanguageShow = "ENG" Then
|
|
Var show_eng = "true"
|
|
EndIf
|
|
If LanguageShow = "THAI" Then
|
|
Var show_eng = "false"
|
|
EndIf
|
|
|
|
|
|
|
|
GetLongTimeInMinute LastTimeClickOrder
|
|
|
|
If CART_COUNT = 0 Then
|
|
If UserSelectProductCode = "-" Then
|
|
|
|
Else
|
|
If SelectDrinkType = 1 Then
|
|
Var SmoothieToPayment = 1
|
|
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_blank.xml"
|
|
Open "ROOT/taobin_project/xml/page_payment.xml"
|
|
EndIf
|
|
EndIf
|
|
|
|
If SelectDrinkType = 0 Then
|
|
Var high_light_drink_type = "Enable"
|
|
EndIf
|
|
Else
|
|
|
|
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
|
|
|
|
Var LastTimeClickOrder = 0
|
|
|
|
|
|
|
|
</EventClick>
|
|
</Button>
|
|
<Text>
|
|
<X> 420 </X>
|
|
<Y> 1442 </Y>
|
|
<Width> 250 </Width>
|
|
<Height> 75 </Height>
|
|
<Language>
|
|
<ID> 002291 </ID>
|
|
</Language>
|
|
</Text>
|
|
|
|
|
|
|
|
|
|
|
|
<Function2>
|
|
|
|
Var img_cold_no_flag = 0
|
|
Var img_smth_no_flag = 0
|
|
|
|
If hot_button_state = "Disable2" Then
|
|
If blend_button_state = "Disable2" Then
|
|
Var img_cold_no_flag = 1
|
|
Else
|
|
Var img_cold_no_flag = 1
|
|
Var img_smth_no_flag = 2
|
|
EndIf
|
|
EndIf
|
|
|
|
If PriceD1 = PriceD2 Then
|
|
Var img_cold_no_flag = 1
|
|
EndIf
|
|
|
|
If hot_button_state = "Disable2" Then
|
|
If cold_button_state = "Disable2" Then
|
|
Var img_smth_no_flag = 1
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
If img_cold_no_flag = 1 Then
|
|
SAVELOG "Cold Image change."
|
|
Var img_cold = "/bt_cold_no.png"
|
|
Var img_cold_sel = "/bt_cold_selected_no.png"
|
|
Var img_cold_dis = "/bt_cold_disable_no.png"
|
|
Var img_cold_dis2 = "/bt_cold_disable2_no.png"
|
|
Else
|
|
Var img_cold = "/bt_cold.png"
|
|
Var img_cold_sel = "/bt_cold_selected.png"
|
|
Var img_cold_dis = "/bt_cold_disable.png"
|
|
Var img_cold_dis2 = "/bt_cold_disable2.png"
|
|
EndIf
|
|
|
|
If img_smth_no_flag = 1 Then
|
|
SAVELOG "Smoothies change img. 1"
|
|
Var img_smth = "/bt_smoothie_no.png"
|
|
Var img_smth_sel = "/bt_smoothie_selected_no.png"
|
|
Var img_smth_dis = "/bt_smoothie_disable_no.png"
|
|
Var img_smth_dis2 = "/bt_smoothie_disable2_no.png"
|
|
Else
|
|
If img_smth_no_flag = 2 Then
|
|
SAVELOG "Smoothies change img. 2"
|
|
Var img_smth = "/bt_smoothie_sub2.png"
|
|
Var img_smth_sel = "/bt_smoothie_selected_sub2.png"
|
|
Var img_smth_dis = "/bt_smoothie_disable_sub2.png"
|
|
Var img_smth_dis2 = "/bt_smoothie_disable2_sub2.png"
|
|
Else
|
|
|
|
Var img_smth = "/bt_smoothie.png"
|
|
Var img_smth_sel = "/bt_smoothie_selected.png"
|
|
Var img_smth_dis = "/bt_smoothie_disable.png"
|
|
Var img_smth_dis2 = "/bt_smoothie_disable2.png"
|
|
EndIf
|
|
EndIf
|
|
|
|
Var img_cold = "/bt_cold_no.png"
|
|
Var img_cold_sel = "/bt_cold_selected_no.png"
|
|
Var img_cold_dis = "/bt_cold_disable_no.png"
|
|
Var img_cold_dis2 = "/bt_cold_disable2_no.png"
|
|
|
|
Var img_smth = "/bt_smoothie_no.png"
|
|
Var img_smth_sel = "/bt_smoothie_selected_no.png"
|
|
Var img_smth_dis = "/bt_smoothie_disable_no.png"
|
|
Var img_smth_dis2 = "/bt_smoothie_disable2_no.png"
|
|
|
|
DEBUGVAR menu_name_thai_cold
|
|
SAVELOG "FUNCTION2"
|
|
|
|
|
|
Var TOPPING_PRICE = 0
|
|
|
|
Var SelectDrinkType = 0
|
|
|
|
; Set default
|
|
If SelectCountDrinkType = 1 Then
|
|
If DefaultDrinkType = 1 Then
|
|
Var hot_button_state = "PressForever"
|
|
Var IndexDrinktType = 0
|
|
EndIf
|
|
If DefaultDrinkType = 2 Then
|
|
Var cold_button_state = "PressForever"
|
|
|
|
If PD_CODE2 = "12-05-02-0016" Then
|
|
Var cold_button_state = "Invisible"
|
|
Var normal_button_state = "PressForever"
|
|
Var SelectDrinkType = 1
|
|
EndIf
|
|
|
|
If PD_CODE2 = "51-05-02-0016" Then
|
|
Var cold_button_state = "Invisible"
|
|
Var normal_button_state = "PressForever"
|
|
Var SelectDrinkType = 1
|
|
EndIf
|
|
|
|
Var IndexDrinktType = 1
|
|
EndIf
|
|
If DefaultDrinkType = 3 Then
|
|
Var blend_button_state = "PressForever"
|
|
Var IndexDrinktType = 2
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
If hot_button_state = "PressForever" Then
|
|
Var PriceDrinkNoTop = PriceD1
|
|
Var UserSelectProductCode = PD_CODE1
|
|
|
|
If showShotEnable = "Disable" Then
|
|
Var showShotEnable = "Enable"
|
|
EndIf
|
|
|
|
Var showText4 = "Invisible"
|
|
|
|
Var showname = NameLang[0][LanguageShowByIndex]
|
|
Var showdesc = DescLang[0][LanguageShowByIndex]
|
|
|
|
Var text_hot_color = "0xFFFFFF"
|
|
Var text_cold_color = "0x84776F"
|
|
Var text_blender_color = "0x84776F"
|
|
|
|
Var SelectDrinkType = 1
|
|
|
|
Machine PreparCup
|
|
EndIf
|
|
|
|
If cold_button_state = "PressForever" Then
|
|
Var PriceDrinkNoTop = PriceD2
|
|
Var UserSelectProductCode = PD_CODE2
|
|
|
|
If showShotEnable = "Disable" Then
|
|
Var showShotEnable = "Enable"
|
|
EndIf
|
|
Var showText4 = "Invisible"
|
|
|
|
Var showname = NameLang[1][LanguageShowByIndex]
|
|
Var showdesc = DescLang[1][LanguageShowByIndex]
|
|
|
|
Var text_hot_color = "0x84776F"
|
|
Var text_cold_color = "0xFFFFFF"
|
|
Var text_blender_color = "0x84776F"
|
|
|
|
Var SelectDrinkType = 1
|
|
|
|
Machine PreparCup
|
|
EndIf
|
|
|
|
If blend_button_state = "PressForever" Then
|
|
Var PriceDrinkNoTop = PriceD3
|
|
Var UserSelectProductCode = PD_CODE3
|
|
|
|
If showShotEnable = "Invisible" Then
|
|
|
|
Else
|
|
Var showShotEnable = "Disable"
|
|
EndIf
|
|
Var showText4 = "Enable"
|
|
|
|
Var showname = NameLang[2][LanguageShowByIndex]
|
|
Var showdesc = DescLang[2][LanguageShowByIndex]
|
|
|
|
Var text_hot_color = "0x84776F"
|
|
Var text_cold_color = "0x84776F"
|
|
Var text_blender_color = "0xFFFFFF"
|
|
|
|
Var SelectDrinkType = 1
|
|
|
|
Machine PreparCup
|
|
EndIf
|
|
|
|
BackslashNToEnter showname
|
|
BackslashNToEnter showdesc
|
|
CRLFToSpace showname
|
|
CRLFToSpace showdesc
|
|
|
|
|
|
DEBUGVAR PriceDrinkNoTop
|
|
DEBUGVAR PriceDiff
|
|
DEBUGVAR showShotEnable
|
|
Var TOPPING_PRICE = 0
|
|
|
|
If ShotCoffeePremium = "Press" Then
|
|
If blendedState = "Press" Then
|
|
Var PriceDrinkTmp = PriceDrinkNoTop
|
|
EndIf
|
|
|
|
Var blendedState = "Disable"
|
|
Var TOPPING_PRICE = 0
|
|
|
|
Var TOPPING_PRICE = TOPPING_PRICE + toppingID2price2
|
|
|
|
Var topping2 = toppingID2index2
|
|
|
|
Var DisableUsingCode = "true"
|
|
|
|
Var showText7 = "Enable"
|
|
|
|
SAVELOG "Select premi normal shot"
|
|
|
|
Else
|
|
|
|
If showShotEnable = "Press" Then
|
|
If blendedState = "Press" Then
|
|
Var PriceDrinkTmp = PriceDrinkNoTop
|
|
EndIf
|
|
|
|
Var blendedState = "Disable"
|
|
|
|
Var TOPPING_PRICE = 0
|
|
|
|
;Var PriceDrinkTmp = PriceDrinkNoTop + toppingID2price2
|
|
Var TOPPING_PRICE = TOPPING_PRICE + toppingID2price2
|
|
|
|
Var topping2 = toppingID2index2
|
|
|
|
Var DisableUsingCode = "true"
|
|
|
|
Var showText7 = "Enable"
|
|
|
|
SAVELOG "Select add normal shot"
|
|
Else
|
|
If blendedState = "Disable" Then
|
|
Var blendedState = "Enable"
|
|
EndIf
|
|
|
|
|
|
Var PriceDrinkTmp = PriceDrinkNoTop
|
|
Var topping2 = toppingID2index1
|
|
Var DisableUsingCode = "false"
|
|
SAVELOG "Deselect add normal shot"
|
|
|
|
Var showText7 = "Invisible"
|
|
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
|
|
DEBUGVAR showOreoAddEnable
|
|
DEBUGVAR TOPPING_PRICE
|
|
|
|
If showOreoAddEnable = "Press" Then
|
|
Var TOPPING_PRICE = TOPPING_PRICE + toppingID6price2
|
|
Var topping6 = toppingID6index2
|
|
Var DisableUsingCode = "true"
|
|
Else
|
|
|
|
;Var PriceDrinkTmp = PriceDrinkNoTop
|
|
|
|
Var topping6 = toppingID6index1
|
|
|
|
Var DisableUsingCode = "false"
|
|
|
|
EndIf
|
|
|
|
DEBUGVAR OatMilkEnable
|
|
DEBUGVAR MenuCodeName1
|
|
DEBUGVAR MenuCodeName1_State
|
|
|
|
If OatMilkEnable = "Press" Then
|
|
If MenuCodeName1 = "OatMilk" Then
|
|
If MenuCodeName1_State = "Enable" Then
|
|
Var TOPPING_PRICE = TOPPING_PRICE + OatMilkAddAmount
|
|
Var UserSelectProductCode = SubMenuProductCode1
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
DEBUGVAR SelectDrinkType
|
|
|
|
DEBUGVAR showShotEnable
|
|
DEBUGVAR PriceDrinkTmpShow
|
|
|
|
Var PriceDrinkTmp = PriceDrinkNoTop + TOPPING_PRICE
|
|
Var PriceDrinkTmpShow = charOfBaht + PriceDrinkTmp
|
|
|
|
If SelectDrinkType = 0 Then
|
|
Var PriceDrinkTmpShow = "---"
|
|
Else
|
|
Var PriceDrinkTmpShow !assigned StringFmt( PriceDrinkTmp , DisplayFormatFull, PreScaleConvertShow)
|
|
EndIf
|
|
SAVELOG PriceDrinkTmp
|
|
|
|
If RoadShow = "true" Then
|
|
|
|
Var PriceDrinkTmpShow = "Free"
|
|
|
|
DEBUGVAR SelectDrink2
|
|
DEBUGVAR PriceDrinkTmpShow
|
|
EndIf
|
|
|
|
CRLFToSpace showname
|
|
CRLFToSpace showdesc
|
|
DEBUGVAR showname
|
|
DEBUGVAR showdesc
|
|
|
|
|
|
Var Timeout = 0
|
|
|
|
RefreshAll
|
|
|
|
</Function2>
|
|
|
|
|
|
|
|
;
|
|
<EventUnitTest1>
|
|
OpenInst 2 "ROOT/taobin_project/inter/tha/xml/multi/page_catalog.lxml"
|
|
</EventUnitTest1>
|
|
|
|
</Page>
|