Merge branch 'master' of ssh://192.168.10.159:/1TBHDD/ikong/taobin_project

This commit is contained in:
miggaze 2022-05-24 14:09:50 +07:00
commit 130ac15301
162 changed files with 13291 additions and 2651 deletions

View file

@ -1,24 +1,48 @@
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Width> 1080 </Width>
<Height> 1540 </Height>
<Color> "0xeae6e1" </Color>
</Image>
<Timeout> 1000 </Timeout>
<EventTimeout>
;DEBUGVAR ICE_PROCESS_STATUS
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
If NextPage = "-" Then
Else
If CupOnArm = "true" Then
If Timeout > 9 Then
Open NextPage
If CupOnArm = "true" Then
If Timeout > 9 Then
SAVELOG "COA9"
Open NextPage
EndIf
Else
If Timeout > 30 Then
SAVELOG "COA30"
Open NextPage
EndIf
EndIf
Else
If Timeout > 30 Then
Open NextPage
EndIf
EndIf
EndIf
If Timeout > 60 Then
SAVELOG "Timeout"
If Seeker = "next" Then
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
SAVELOG "Back"
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
@ -64,14 +88,14 @@
;<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_1 </Filename>
</Video>
;<Video>
;<X> 0 </X>
;<Y> 0 </Y>
;<Width> 1080</Width>
;<Height> 380 </Height>
;<Loop> "true" </Loop>
;<Filename> video_menu_1 </Filename>
;</Video>
; under line
<Image>

View file

@ -1,3 +1,9 @@
Var NextPage = "-"
DEBUGVAR ICE_PROCESS_STATUS
DEBUGVAR ICE_PROCESS_TXT
If show_eng = "true" Then
Var showthaiText = "Invisible"
Var showengText = "Enable"
@ -5,6 +11,8 @@
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
Var ice_tab_text = "Ice will be ready at "
Else
Var showengText = "Invisible"
Var showthaiText = "Enable"
@ -12,8 +20,18 @@
Var DirImage = "ROOT/taobin_project/image/page3"
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
Var ice_tab_text = "น้ำแข็งจะพร้อมเวลา "
EndIf
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
; SpiralOnline
If SpiralOnline = "true" Then
Var Menu1Selected2 = "Enable"

View file

@ -1,5 +1,11 @@
if current_file_name == "page_catalog_group_recommend.skt":
touch_less_gen = True
else:
touch_less_gen = False
out_xml('<FrameScroll> \r\n')
if touch_less_gen == True:
out_xml('<Max> 16 </Max>\r\n')
out_xml('<X> 10 </X>\r\n')
out_xml('<Y> 497 </Y>\r\n')
out_xml('<Width> 1080 </Width>\r\n')
@ -10,10 +16,6 @@
print("current_file_name " + current_file_name)
if current_file_name == "page_catalog_group_recommend.skt":
touch_less_gen = True
else:
touch_less_gen = False
if touch_less_gen == False:
@ -92,6 +94,9 @@
str_con += spl[5] + '.Button,'
if spl[6] != '-':
str_con += spl[6] + '.Button,'
if touch_less_gen == True:
str_con += "Disable=Invisible"
out_xml( '\t<State> Flag( '+ str_con + ') </State> \r\n')
@ -112,6 +117,9 @@
if spl[6] == "-" or len(spl[6]) == 0:
pd_code_3 = pd_code_available
pd_stage3 = '"Disable2"'
out_xml( '\t<Button>\r\n')
out_xml( '\t<State> Flag( '+ str_con + ') </State> \r\n')
@ -144,15 +152,38 @@
out_xml( '\t\tVar PD_STAGE_2 = ' + pd_stage2 + '\r\n')
out_xml( '\t\tVar PD_STAGE_3 = ' + pd_stage3 + '\r\n')
out_xml( '\t\tVar SelectCountDrinkType = 0\r\n')
out_xml( '\t\tVar DefaultDrinkType = 0\r\n')
out_xml( '\t\tIf PD_STAGE_1 = "Enable" Then\r\n')
out_xml( '\t\t\tVar SelectCountDrinkType = SelectCountDrinkType + 1\r\n')
out_xml( '\t\t\tVar DefaultDrinkType = 1\r\n')
out_xml( '\t\tEndIf\r\n')
out_xml( '\t\tIf PD_STAGE_2 = "Enable" Then\r\n')
out_xml( '\t\t\tVar PD_STAGE_2 = "PressForever"\r\n')
out_xml( '\t\t\tVar SelectCountDrinkType = SelectCountDrinkType + 1\r\n')
out_xml( '\t\t\tVar DefaultDrinkType = 2\r\n')
out_xml( '\t\tEndIf\r\n')
out_xml( '\t\tIf PD_STAGE_3 = "Enable" Then\r\n')
out_xml( '\t\t\tVar SelectCountDrinkType = SelectCountDrinkType + 1\r\n')
out_xml( '\t\t\tVar DefaultDrinkType = 3\r\n')
out_xml( '\t\tEndIf\r\n')
out_xml( '\t\tIf PD_STAGE_2 = "Enable" Then\r\n')
#out_xml( '\t\t\tVar PD_STAGE_2 = "Enable"\r\n')
out_xml( '\t\t\tTopping "Load" "'+ spl[5] +'"\r\n')
out_xml( '\t\tElse\r\n')
out_xml( '\t\t\tIf PD_STAGE_1 = "Enable" Then\r\n')
out_xml( '\t\t\t\tVar PD_STAGE_1 = "PressForever"\r\n')
#out_xml( '\t\t\t\tVar PD_STAGE_1 = "Enable"\r\n')
out_xml( '\t\t\tTopping "Load" "'+ spl[4] +'"\r\n')
out_xml( '\t\t\tElse\r\n')
out_xml( '\t\t\t\tVar PD_STAGE_3 = "PressForever"\r\n')
#out_xml( '\t\t\t\tVar PD_STAGE_3 = "Enable"\r\n')
out_xml( '\t\t\tTopping "Load" "'+ spl[6] +'"\r\n')
out_xml( '\t\t\tEndIf\r\n')
out_xml( '\t\tEndIf\r\n')
@ -181,6 +212,7 @@
out_xml( '\t\tDEBUGVAR PD_STAGE_1\r\n')
out_xml( '\t\tDEBUGVAR PD_STAGE_2\r\n')
out_xml( '\t\tDEBUGVAR PD_STAGE_3\r\n')
out_xml( '\t\t\r\n')
out_xml( '\t\t\r\n')
out_xml( '\t\tOpen "ROOT/taobin_project/xml/page_topping_select4.xml"\r\n')
@ -246,12 +278,15 @@
out_xml( '\t<Filename> Var( DirImage2 + "option_deactive.png" ) </Filename>\r\n')
out_xml( '\t</Image>\r\n')
ice_tab_hot_show = True
shw = "$" + spl[4] + ".Button"
if spl[4] == "-" :
shw = '"Invisible"'
ice_tab_hot_show = False
if len(spl[4]) == 0 :
shw = '"Invisible"'
ice_tab_hot_show = False
out_xml( '\t<Image>\r\n')
out_xml( '\t<X> 16 </X>\r\n')
@ -274,12 +309,16 @@
out_xml( '\t<Value> Var( "฿" + $' + spl[4] + '.Price ) </Value>\r\n')
out_xml( '\t</Text>\r\n')
ice_tab_ice_show = True
shw = "$" + spl[5] + ".Button"
if spl[5] == "-" :
shw = '"Invisible"'
ice_tab_ice_show = False
if len(spl[5]) == 0 :
shw = '"Invisible"'
ice_tab_ice_show = False
out_xml( '\t<Image>\r\n')
out_xml( '\t<X> 81 </X>\r\n')
@ -301,12 +340,16 @@
out_xml( '\t<Value> Var( "฿" + $' + spl[5] + '.Price ) </Value>\r\n')
out_xml( '\t</Text>\r\n')
ice_tab_blend_show = True
shw = "$" + spl[6] + ".Button"
if spl[6] == "-" :
shw = '"Invisible"'
ice_tab_blend_show = False
if len(spl[6]) == 0 :
shw = '"Invisible"'
ice_tab_blend_show = False
out_xml( '\t<Image>\r\n')
out_xml( '\t<X> 146 </X>\r\n')
@ -327,7 +370,74 @@
out_xml( '\t<State> ' + shw + ' </State>\r\n')
out_xml( '\t<Value> Var( "฿" + $' + spl[6] + '.Price ) </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '\t<Image>\r\n')
out_xml( '\t<X> 81 </X>\r\n')
out_xml( '\t<Y> 264 </Y>\r\n')
out_xml( '\t<State> \r\n')
out_xml( '\t\teval( \r\n')
out_xml( '\t\tIf ICE_PROCESS_STATUS = 2 Then\r\n')
out_xml( '\t\t\r\n')
if ice_tab_hot_show == True:
out_xml( '\t\t\tSTRCONTAIN "LOW" $' + pd_code_1 + '.TAG tag_is_low\r\n')
out_xml( '\t\t\tIf tag_is_low = "true" Then\r\n')
out_xml( '\t\t\t\tVar ice_tab_process_show = "Disable"\r\n')
out_xml( '\t\t\rElse\n')
out_xml( '\t\t\t\tVar ice_tab_process_show = "Enable"\r\n')
out_xml( '\t\t\tEndIf\r\n')
else:
out_xml( '\t\t\tVar ice_tab_process_show = "Disable"\r\n')
out_xml( '\t\t\r\n')
out_xml( '\t\tElse\r\n')
out_xml( '\t\t\tVar ice_tab_process_show = "Invisible"\r\n')
out_xml( '\t\tEndIf\r\n')
out_xml( '\t\tVar return = ice_tab_process_show\r\n')
out_xml( '\t\t)\r\n')
out_xml( '\t</State>\r\n')
out_xml( '\t<Filename> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible.png" </Filename>\r\n')
out_xml( '\t<FilenameDisable> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible_dis.png" </FilenameDisable>\r\n')
out_xml( '\t</Image>\r\n')
#out_xml( '\t<Image>\r\n')
#out_xml( '\t<X> 49 </X>\r\n')
#out_xml( '\t<Y> 117 </Y>\r\n')
#out_xml( '\t<State> \r\n')
#out_xml( '\t\teval( \r\n')
#out_xml( '\t\t\tSTRCONTAIN "ERR" $' + pd_code_1 + '.TAG tag1_is_disable\r\n')
#out_xml( '\t\t\tSTRCONTAIN "ERR" $' + pd_code_2 + '.TAG tag2_is_disable\r\n')
#out_xml( '\t\t\tSTRCONTAIN "ERR" $' + pd_code_3 + '.TAG tag3_is_disable\r\n')
#out_xml( '\t\t\tDEBUGVAR $' + pd_code_1 + '.TAG\r\n')
#out_xml( '\t\t\tDEBUGVAR $' + pd_code_2 + '.TAG\r\n')
#out_xml( '\t\t\tDEBUGVAR $' + pd_code_3 + '.TAG\r\n')
#out_xml( '\t\t\tVar return = "Enable"\r\n')
#out_xml( '\t\t\tIf tag1_is_disable = "false" Then\r\n')
#out_xml( '\t\t\t\tVar return = "Invisible"\r\n')
#out_xml( '\t\t\tEndIf\r\n')
#out_xml( '\t\t\tIf tag2_is_disable = "false" Then\r\n')
#out_xml( '\t\t\t\tVar return = "Invisible"\r\n')
#out_xml( '\t\t\tEndIf\r\n')
#out_xml( '\t\t\tIf tag3_is_disable = "false" Then\r\n')
#out_xml( '\t\t\t\tVar return = "Invisible"\r\n')
#out_xml( '\t\t\tEndIf\r\n')
#out_xml( '\t\t)\r\n')
#out_xml( '\t</State>\r\n')
#out_xml( '\t<Filename> "ROOT/taobin_project/image//img_menu_err.png" </Filename>\r\n')
#out_xml( '\t</Image>\r\n')
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> 84 </X>\r\n')
out_xml( '\t<Y> 266 </Y>\r\n')
out_xml( '\t<Size> 10 </Size>\r\n')
out_xml( '\t<Font> OpunMediumTTF </Font>\r\n')
out_xml( '\t<Color> 0xDE794E </Color>\r\n')
out_xml( '\t<State> ice_tab_process_show </State>\r\n')
out_xml( '\t<Value> ice_show_open </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '</Block>\r\n')
count_test = count_test + 1
#if count_test > 8 :

View file

@ -1,4 +1,15 @@
<Page>
<Width> HeadScreenWidth </Width>
<Height> HeadScreenHeight </Height>
<Width> 1080</Width>
<Height> 380 </Height>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
</Page>

15
xml/page_advert2.xml Normal file
View file

@ -0,0 +1,15 @@
<Page>
<Width> 1080</Width>
<Height> 380 </Height>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_1 </Filename>
</Video>
</Page>

5
xml/page_blank.xml Normal file
View file

@ -0,0 +1,5 @@
<Page>
<Width> 1080</Width>
<Height> 380 </Height>
</Page>

View file

@ -67,6 +67,9 @@
Var KanitRegularTTF = "ROOT/taobin_project/font/Kanit/Kanit-Regular.ttf"
Var KanitThinTTF = "ROOT/taobin_project/font/Kanit/Kanit-Thin.ttf"
Var KanitLightTTF = "ROOT/taobin_project/font/Kanit/Kanit-Light.ttf"
Var OpunMediumTTF = "ROOT/taobin_project/font/Opun/Opun-Medium.ttf"
Var OpunThinTTF = "ROOT/taobin_project/font/Opun/Opun-Thin.ttf"
Var KanitSemiBoldTTF = "ROOT/taobin_project/font/Kanit/Kanit-Medium.ttf"
@ -113,13 +116,6 @@
Var TestLoopSuccess = 0
Var TestLoopFailed = 0
;Var IgnoreNetCore = "false"
;DEBUGVAR SaleProfile
;STRCONTAIN "whey" SaleProfile WheyShow
;STRCONTAIN "cocktail" SaleProfile CocktailShow
;STRCONTAIN "roadshow" SaleProfile RoadShow
Var cock_tail_str = ""
READ_FILE "/mnt/sdcard/cock_tail_enable" cock_tail_str
STRCONTAIN "1" cock_tail_str cock_tail_enable
@ -348,27 +344,27 @@
EndIf
If VideoAdvIndex = 0 Then
Var video_menu_1 = AdvTaobinMenu + AdvertiseProfile7
Var video_menu_1 = AdvTaobinMenu2 + AdvertiseProfile7
Var video_menu_1 = video_menu_1 + ".mp4"
EndIf
If VideoAdvIndex = 1 Then
Var video_menu_1 = AdvTaobinMenu + AdvertiseProfile8
Var video_menu_1 = AdvTaobinMenu2 + AdvertiseProfile8
Var video_menu_1 = video_menu_1 + ".mp4"
EndIf
If VideoAdvIndex = 2 Then
Var video_menu_1 = AdvTaobinMenu + AdvertiseProfile9
Var video_menu_1 = AdvTaobinMenu2 + AdvertiseProfile9
Var video_menu_1 = video_menu_1 + ".mp4"
EndIf
If VideoAdvIndex = 3 Then
Var video_menu_1 = AdvTaobinMenu + AdvertiseProfile10
Var video_menu_1 = AdvTaobinMenu2 + AdvertiseProfile10
Var video_menu_1 = video_menu_1 + ".mp4"
EndIf
If VideoAdvIndex = 4 Then
Var video_menu_1 = AdvTaobinMenu + AdvertiseProfile11
Var video_menu_1 = AdvTaobinMenu2 + AdvertiseProfile11
Var video_menu_1 = video_menu_1 + ".mp4"
EndIf
If VideoAdvIndex = 5 Then
Var video_menu_1 = AdvTaobinMenu + AdvertiseProfile12
Var video_menu_1 = AdvTaobinMenu2 + AdvertiseProfile12
Var video_menu_1 = video_menu_1 + ".mp4"
EndIf
@ -390,22 +386,8 @@
Machine CancelWepApp
;StrLen AdvertiseProfile AdvertiseProfileLen
;
;If AdvertiseProfileLen = 0 Then
; CacheVarStr "get" AdvertiseProfile
;Else
;
; STRCONTAIN "00/00" AdvertiseProfile advPro
;
; If advPro = "true" Then
; CacheVarStr "get" AdvertiseProfile
; Else
; CacheVarStr "put" AdvertiseProfile
; EndIf
;EndIf
DEBUGVAR AdvertiseProfile
StrLen AdvertiseProfile AdvertiseProfileLen
If XMLProfile = "taobin_notopup" Then
Var ButtontoTopupMenu = "Disable"
@ -422,11 +404,13 @@
READ_FILE "/mnt/sdcard/new_layout" new_layout
DEBUGVAR JXMLVersionInt
DEBUGVAR XMLPageVersionInt
If JXMLVersionInt > 389 Then
If XMLPageVersionInt > 640 Then
Var new_layout = "true"
Else
Var new_layout = "false"
EndIf
DEBUGVAR new_layout
@ -444,6 +428,22 @@
If NetworkStatus = "DEACTIVE" Then
Open "/ROOT/xml/offline.xml"
EndIf
If AdvertiseProfileLen = 0 Then
CacheVarStr "get" AdvertiseProfile
Else
STRCONTAIN "00/00" AdvertiseProfile advPro
If advPro = "true" Then
CacheVarStr "get" AdvertiseProfile
Else
CacheVarStr "put" AdvertiseProfile
EndIf
EndIf
DEBUGVAR AdvertiseProfile
</EventOpen>
<Timeout> 1000 </Timeout>
@ -695,7 +695,7 @@
;<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
;OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
If CocktailShow = "true" Then
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_cocktail.xml"
Else
@ -732,6 +732,8 @@
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_check_member.xml"
@ -752,6 +754,7 @@
<Volume> SoundVolume </Volume>
<EventClick>
Var PayDetail=""
Var NextPage = "-"
Open "ROOT/xml/service_menu.xml"
</EventClick>
</Button>
@ -766,6 +769,8 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
If SpiralOnline = "true" Then

View file

@ -21,7 +21,7 @@
If ActionOKCase = 1 Then
If CodeChannel = 1 Then
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -71,7 +71,7 @@
If ActionOKCase = 1 Then
If CodeChannel = 1 Then
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -185,7 +185,7 @@
If ChangeOK = 4 Then
If ActionOKCase = 0 Then
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
Var TelephoneNumber = "0899999999"

View file

@ -6,7 +6,7 @@
<Volume> SoundVolume </Volume>
<EventOpen>
SAVELOG "page_brewing3.xml"
DEBUGVAR MachineStage
Var StrawStateX = "Enable"
@ -21,11 +21,16 @@
EndIf
Var SelectDrink = Seeker.selected_a_drink
Var ExtendData = Seeker.ExtendData
Var ServiceAmount2 = Seeker.ServiceAmount2
DEBUGVAR Seeker
DEBUGVAR Seeker.selected_a_drink
DEBUGVAR Seeker.ServiceAmount2
DEBUGVAR Seeker.ServiceAmount2
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
; On open move from page_brewing3.xml
Var countClick2 = 0
@ -233,6 +238,9 @@
If Seeker.CodeChannel = 1 Then
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
DEBUGVAR SessionID2
DEBUGVAR SessionID2
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -294,6 +302,9 @@
If Seeker.CodeChannel = 1 Then
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
DEBUGVAR SessionID2
DEBUGVAR SessionID2
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -423,6 +434,7 @@
If Seeker.CodeChannel = 1 Then
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
DEBUGVAR SessionID2
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""

View file

@ -65,15 +65,16 @@
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.ServiceAmount2
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
; On open move from page_brewing3.xml
@ -145,6 +146,8 @@
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
DEBUGVAR SessionID2
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
Var TelephoneNumber = "0899999999"
@ -206,6 +209,8 @@
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
DEBUGVAR SessionID2
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
Var TelephoneNumber = "0899999999"
@ -324,6 +329,8 @@
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
DEBUGVAR SessionID2
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
Var TelephoneNumber = "0899999999"

View file

@ -12,7 +12,7 @@
Var ServiceAmount2 = CART1_PRICE
Var SelectDrink = CART1_PDCODE
Var ExtendData = CART1_ONTOP
Var Seeker.ExtendData = CART1_ONTOP
EndIf
@ -20,7 +20,7 @@
Var ServiceAmount2 = CART2_PRICE
Var SelectDrink = CART2_PDCODE
Var ExtendData = CART2_ONTOP
Var Seeker.ExtendData = CART2_ONTOP
EndIf
@ -28,13 +28,13 @@
Var ServiceAmount2 = CART3_PRICE
Var SelectDrink = CART3_PDCODE
Var ExtendData = CART3_ONTOP
Var Seeker.ExtendData = CART3_ONTOP
EndIf
Var SessionID2 = "" + CART_INDEX
Var SessionID2 = SessionID2 + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
@ -211,7 +211,7 @@
If ActionOKCase = 1 Then
If Seeker.CodeChannel = 1 Then
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -270,7 +270,7 @@
If ActionOKCase = 1 Then
If Seeker.CodeChannel = 1 Then
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -381,7 +381,7 @@
If Seeker.CodeChannel = 1 Then
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""

View file

@ -56,23 +56,31 @@
If Seeker = "curr" Then
SAVELOG "Call from thankyou Conti"
SAVELOG " cannot on curr"
Topping "Select" Seeker.selected_a_drink
;Topping "Select" Seeker.selected_a_drink
; Set option toppinng and pack
Topping "Select1-ID" Seeker.topping1
Topping "Select2-ID" Seeker.topping2
Topping "Select3-ID" Seeker.topping3
;Topping "Select1-ID" Seeker.topping1
;Topping "Select2-ID" Seeker.topping2
;Topping "Select3-ID" Seeker.topping3
; Pack
Topping "Pack" ExtendData
<<<<<<< HEAD
; no change
; Topping "Pack" ExtendData
=======
Topping "Pack" ExtendDataCurr
DEBUGVAR ExtendDataCurr
Var Seeker.ExtendData = ExtendDataCurr
>>>>>>> 5e5a37195320147236c6a59c0b98defb59901dcb
Var ExtendData = Seeker.ExtendData
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
DEBUGVAR SessionID2
Topping "ClearNextOrder" "-"
EndIf
@ -84,6 +92,8 @@
DEBUGVAR MachineStage
DEBUGVAR NextOrderStatus
DEBUGVAR error_code_stop_now
; page_brewing3.xml
DEBUGVAR MachineStage
@ -239,7 +249,7 @@
If ActionOKCase = 1 Then
If Seeker.CodeChannel = 1 Then
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -300,7 +310,7 @@
If ActionOKCase = 1 Then
If Seeker.CodeChannel = 1 Then
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -384,7 +394,7 @@
If Seeker.CodeChannel = 1 Then
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -444,6 +454,12 @@
If NextOrderStatus = "Disable" Then
Var PayDetail="1/F:1221/0/"
DEBUGVAR error_code_stop_now
If error_code_stop_now > 0 Then
Var PayDetail="1/F:" + error_code_stop_now
Var PayDetail = PayDetail + "/0/"
EndIf
Else
@ -498,6 +514,11 @@
If NextOrderStatus = "Disable" Then
Var PayDetail="1/F:1221/0/"
DEBUGVAR error_code_stop_now
If error_code_stop_now > 0 Then
Var PayDetail="1/F:" + error_code_stop_now
Var PayDetail = PayDetail + "/0/"
EndIf
Else
Var PayDetail = "1/" + HURR_FOREVER
@ -544,6 +565,11 @@
If NextOrderStatus = "Disable" Then
Var PayDetail="1/F:1221/0/"
DEBUGVAR error_code_stop_now
If error_code_stop_now > 0 Then
Var PayDetail="1/F:" + error_code_stop_now
Var PayDetail = PayDetail + "/0/"
EndIf
Else

View file

@ -2,12 +2,16 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
TopView "show"
; On open
Var NextPage = "-"
Var Seeker.thankLidFlag = 0
Var Seeker.thankStrawFlag = 0
@ -210,16 +214,25 @@
</EventWebApp>
<Video>
<Image>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
<Y> 380 </Y>
<Width> 1080 </Width>
<Height> 1540 </Height>
<Color> "0xeae6e1" </Color>
</Image>
</Video>
;<Video>
;<X> 0 </X>
;<Y> 0 </Y>
;<Width> 1080</Width>
;<Height> 380 </Height>
;<Loop> "true" </Loop>
;<Filename> video_menu_0 </Filename>
;
;</Video>
@ -278,6 +291,8 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
; eng
If new_layout = "true" Then
Open "ROOT/taobin_project/xml/page_catalog_group_recommend.xml"
@ -295,6 +310,7 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
If new_layout = "true" Then
Open "ROOT/taobin_project/xml/page_catalog_group_coffee.xml"
Else
@ -312,6 +328,7 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
If new_layout = "true" Then
Open "ROOT/taobin_project/xml/page_catalog_group_tea.xml"
Else
@ -328,6 +345,7 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
If new_layout = "true" Then
Open "ROOT/taobin_project/xml/page_catalog_group_milk.xml"
Else
@ -360,6 +378,7 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
If new_layout = "true" Then
Open "ROOT/taobin_project/xml/page_catalog_group_whey.xml"
Else
@ -377,6 +396,7 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
If new_layout = "true" Then
Open "ROOT/taobin_project/xml/page_catalog_group_appfast.xml"
Else
@ -394,6 +414,7 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
If new_layout = "true" Then
Open "ROOT/taobin_project/xml/page_catalog_group_other.xml"
Else

View file

@ -71,26 +71,50 @@
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Width> 1080 </Width>
<Height> 1540 </Height>
<Color> "0xeae6e1" </Color>
</Image>
<Timeout> 1000 </Timeout>
<EventTimeout>
;DEBUGVAR ICE_PROCESS_STATUS
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
If NextPage = "-" Then
Else
If CupOnArm = "true" Then
If Timeout > 9 Then
Open NextPage
If CupOnArm = "true" Then
If Timeout > 9 Then
SAVELOG "COA9"
Open NextPage
EndIf
Else
If Timeout > 30 Then
SAVELOG "COA30"
Open NextPage
EndIf
EndIf
Else
If Timeout > 30 Then
Open NextPage
EndIf
EndIf
EndIf
If Timeout > 60 Then
SAVELOG "Timeout"
If Seeker = "next" Then
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
SAVELOG "Back"
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
@ -136,14 +160,14 @@
;<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_1 </Filename>
</Video>
;<Video>
;<X> 0 </X>
;<Y> 0 </Y>
;<Width> 1080</Width>
;<Height> 380 </Height>
;<Loop> "true" </Loop>
;<Filename> video_menu_1 </Filename>
;</Video>
; under line
<Image>

View file

@ -30,7 +30,7 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open

View file

@ -6,17 +6,25 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
If show_eng = "true" Then
Var NextPage = "-"
DEBUGVAR ICE_PROCESS_STATUS
DEBUGVAR ICE_PROCESS_TXT
If show_eng = "true" Then
Var showthaiText = "Invisible"
Var showengText = "Enable"
Var DirImage = "ROOT/taobin_project/image/page3_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 ice_tab_text = "Ice will be ready at "
Else
Var showengText = "Invisible"
Var showthaiText = "Enable"
@ -24,8 +32,18 @@
Var DirImage = "ROOT/taobin_project/image/page3"
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
Var ice_tab_text = "น้ำแข็งจะพร้อมเวลา "
EndIf
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
; SpiralOnline
If SpiralOnline = "true" Then
Var Menu1Selected2 = "Enable"
@ -138,26 +156,50 @@
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Width> 1080 </Width>
<Height> 1540 </Height>
<Color> "0xeae6e1" </Color>
</Image>
<Timeout> 1000 </Timeout>
<EventTimeout>
;DEBUGVAR ICE_PROCESS_STATUS
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
If NextPage = "-" Then
Else
If CupOnArm = "true" Then
If Timeout > 9 Then
Open NextPage
If CupOnArm = "true" Then
If Timeout > 9 Then
SAVELOG "COA9"
Open NextPage
EndIf
Else
If Timeout > 30 Then
SAVELOG "COA30"
Open NextPage
EndIf
EndIf
Else
If Timeout > 30 Then
Open NextPage
EndIf
EndIf
EndIf
If Timeout > 60 Then
SAVELOG "Timeout"
If Seeker = "next" Then
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
SAVELOG "Back"
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
@ -203,14 +245,14 @@
;<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_1 </Filename>
</Video>
;<Video>
;<X> 0 </X>
;<Y> 0 </Y>
;<Width> 1080</Width>
;<Height> 380 </Height>
;<Loop> "true" </Loop>
;<Filename> video_menu_1 </Filename>
;</Video>
; under line
<Image>

View file

@ -21,7 +21,7 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open

View file

@ -5,20 +5,28 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
; On open
If show_eng = "true" Then
Var NextPage = "-"
DEBUGVAR ICE_PROCESS_STATUS
DEBUGVAR ICE_PROCESS_TXT
If show_eng = "true" Then
Var showthaiText = "Invisible"
Var showengText = "Enable"
Var DirImage = "ROOT/taobin_project/image/page3_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 ice_tab_text = "Ice will be ready at "
Else
Var showengText = "Invisible"
Var showthaiText = "Enable"
@ -26,8 +34,18 @@
Var DirImage = "ROOT/taobin_project/image/page3"
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
Var ice_tab_text = "น้ำแข็งจะพร้อมเวลา "
EndIf
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
; SpiralOnline
If SpiralOnline = "true" Then
Var Menu1Selected2 = "Enable"
@ -126,26 +144,50 @@
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Width> 1080 </Width>
<Height> 1540 </Height>
<Color> "0xeae6e1" </Color>
</Image>
<Timeout> 1000 </Timeout>
<EventTimeout>
;DEBUGVAR ICE_PROCESS_STATUS
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
If NextPage = "-" Then
Else
If CupOnArm = "true" Then
If Timeout > 9 Then
Open NextPage
If CupOnArm = "true" Then
If Timeout > 9 Then
SAVELOG "COA9"
Open NextPage
EndIf
Else
If Timeout > 30 Then
SAVELOG "COA30"
Open NextPage
EndIf
EndIf
Else
If Timeout > 30 Then
Open NextPage
EndIf
EndIf
EndIf
If Timeout > 60 Then
SAVELOG "Timeout"
If Seeker = "next" Then
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
SAVELOG "Back"
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
@ -191,14 +233,14 @@
;<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_1 </Filename>
</Video>
;<Video>
;<X> 0 </X>
;<Y> 0 </Y>
;<Width> 1080</Width>
;<Height> 380 </Height>
;<Loop> "true" </Loop>
;<Filename> video_menu_1 </Filename>
;</Video>
; under line
<Image>

View file

@ -93,7 +93,7 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open

View file

@ -6,18 +6,26 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
If show_eng = "true" Then
Var NextPage = "-"
DEBUGVAR ICE_PROCESS_STATUS
DEBUGVAR ICE_PROCESS_TXT
If show_eng = "true" Then
Var showthaiText = "Invisible"
Var showengText = "Enable"
Var DirImage = "ROOT/taobin_project/image/page3_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 ice_tab_text = "Ice will be ready at "
Else
Var showengText = "Invisible"
Var showthaiText = "Enable"
@ -25,8 +33,18 @@
Var DirImage = "ROOT/taobin_project/image/page3"
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
Var ice_tab_text = "น้ำแข็งจะพร้อมเวลา "
EndIf
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
; SpiralOnline
If SpiralOnline = "true" Then
Var Menu1Selected2 = "Enable"
@ -114,26 +132,50 @@
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Width> 1080 </Width>
<Height> 1540 </Height>
<Color> "0xeae6e1" </Color>
</Image>
<Timeout> 1000 </Timeout>
<EventTimeout>
;DEBUGVAR ICE_PROCESS_STATUS
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
If NextPage = "-" Then
Else
If CupOnArm = "true" Then
If Timeout > 9 Then
Open NextPage
If CupOnArm = "true" Then
If Timeout > 9 Then
SAVELOG "COA9"
Open NextPage
EndIf
Else
If Timeout > 30 Then
SAVELOG "COA30"
Open NextPage
EndIf
EndIf
Else
If Timeout > 30 Then
Open NextPage
EndIf
EndIf
EndIf
If Timeout > 60 Then
SAVELOG "Timeout"
If Seeker = "next" Then
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
SAVELOG "Back"
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
@ -179,14 +221,14 @@
;<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_1 </Filename>
</Video>
;<Video>
;<X> 0 </X>
;<Y> 0 </Y>
;<Width> 1080</Width>
;<Height> 380 </Height>
;<Loop> "true" </Loop>
;<Filename> video_menu_1 </Filename>
;</Video>
; under line
<Image>

View file

@ -76,7 +76,7 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open

View file

@ -5,19 +5,27 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
If show_eng = "true" Then
Var NextPage = "-"
DEBUGVAR ICE_PROCESS_STATUS
DEBUGVAR ICE_PROCESS_TXT
If show_eng = "true" Then
Var showthaiText = "Invisible"
Var showengText = "Enable"
Var DirImage = "ROOT/taobin_project/image/page3_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 ice_tab_text = "Ice will be ready at "
Else
Var showengText = "Invisible"
Var showthaiText = "Enable"
@ -25,8 +33,18 @@
Var DirImage = "ROOT/taobin_project/image/page3"
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
Var ice_tab_text = "น้ำแข็งจะพร้อมเวลา "
EndIf
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
; SpiralOnline
If SpiralOnline = "true" Then
Var Menu1Selected2 = "Enable"
@ -113,26 +131,50 @@
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Width> 1080 </Width>
<Height> 1540 </Height>
<Color> "0xeae6e1" </Color>
</Image>
<Timeout> 1000 </Timeout>
<EventTimeout>
;DEBUGVAR ICE_PROCESS_STATUS
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
If NextPage = "-" Then
Else
If CupOnArm = "true" Then
If Timeout > 9 Then
Open NextPage
If CupOnArm = "true" Then
If Timeout > 9 Then
SAVELOG "COA9"
Open NextPage
EndIf
Else
If Timeout > 30 Then
SAVELOG "COA30"
Open NextPage
EndIf
EndIf
Else
If Timeout > 30 Then
Open NextPage
EndIf
EndIf
EndIf
If Timeout > 60 Then
SAVELOG "Timeout"
If Seeker = "next" Then
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
SAVELOG "Back"
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
@ -178,14 +220,14 @@
;<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_1 </Filename>
</Video>
;<Video>
;<X> 0 </X>
;<Y> 0 </Y>
;<Width> 1080</Width>
;<Height> 380 </Height>
;<Loop> "true" </Loop>
;<Filename> video_menu_1 </Filename>
;</Video>
; under line
<Image>

View file

@ -34,7 +34,7 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open

View file

@ -5,17 +5,25 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
If show_eng = "true" Then
Var NextPage = "-"
DEBUGVAR ICE_PROCESS_STATUS
DEBUGVAR ICE_PROCESS_TXT
If show_eng = "true" Then
Var showthaiText = "Invisible"
Var showengText = "Enable"
Var DirImage = "ROOT/taobin_project/image/page3_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 ice_tab_text = "Ice will be ready at "
Else
Var showengText = "Invisible"
Var showthaiText = "Enable"
@ -23,8 +31,18 @@
Var DirImage = "ROOT/taobin_project/image/page3"
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
Var ice_tab_text = "น้ำแข็งจะพร้อมเวลา "
EndIf
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
; SpiralOnline
If SpiralOnline = "true" Then
Var Menu1Selected2 = "Enable"
@ -111,26 +129,50 @@
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Width> 1080 </Width>
<Height> 1540 </Height>
<Color> "0xeae6e1" </Color>
</Image>
<Timeout> 1000 </Timeout>
<EventTimeout>
;DEBUGVAR ICE_PROCESS_STATUS
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
If NextPage = "-" Then
Else
If CupOnArm = "true" Then
If Timeout > 9 Then
Open NextPage
If CupOnArm = "true" Then
If Timeout > 9 Then
SAVELOG "COA9"
Open NextPage
EndIf
Else
If Timeout > 30 Then
SAVELOG "COA30"
Open NextPage
EndIf
EndIf
Else
If Timeout > 30 Then
Open NextPage
EndIf
EndIf
EndIf
If Timeout > 60 Then
SAVELOG "Timeout"
If Seeker = "next" Then
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
SAVELOG "Back"
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
@ -176,14 +218,14 @@
;<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_1 </Filename>
</Video>
;<Video>
;<X> 0 </X>
;<Y> 0 </Y>
;<Width> 1080</Width>
;<Height> 380 </Height>
;<Loop> "true" </Loop>
;<Filename> video_menu_1 </Filename>
;</Video>
; under line
<Image>

View file

@ -23,7 +23,7 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open

View file

@ -5,18 +5,26 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
If show_eng = "true" Then
Var NextPage = "-"
DEBUGVAR ICE_PROCESS_STATUS
DEBUGVAR ICE_PROCESS_TXT
If show_eng = "true" Then
Var showthaiText = "Invisible"
Var showengText = "Enable"
Var DirImage = "ROOT/taobin_project/image/page3_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 ice_tab_text = "Ice will be ready at "
Else
Var showengText = "Invisible"
Var showthaiText = "Enable"
@ -24,8 +32,18 @@
Var DirImage = "ROOT/taobin_project/image/page3"
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
Var ice_tab_text = "น้ำแข็งจะพร้อมเวลา "
EndIf
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
; SpiralOnline
If SpiralOnline = "true" Then
Var Menu1Selected2 = "Enable"
@ -104,26 +122,50 @@
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Width> 1080 </Width>
<Height> 1540 </Height>
<Color> "0xeae6e1" </Color>
</Image>
<Timeout> 1000 </Timeout>
<EventTimeout>
;DEBUGVAR ICE_PROCESS_STATUS
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
If NextPage = "-" Then
Else
If CupOnArm = "true" Then
If Timeout > 9 Then
Open NextPage
If CupOnArm = "true" Then
If Timeout > 9 Then
SAVELOG "COA9"
Open NextPage
EndIf
Else
If Timeout > 30 Then
SAVELOG "COA30"
Open NextPage
EndIf
EndIf
Else
If Timeout > 30 Then
Open NextPage
EndIf
EndIf
EndIf
If Timeout > 60 Then
SAVELOG "Timeout"
If Seeker = "next" Then
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
SAVELOG "Back"
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
@ -169,14 +211,14 @@
;<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_1 </Filename>
</Video>
;<Video>
;<X> 0 </X>
;<Y> 0 </Y>
;<Width> 1080</Width>
;<Height> 380 </Height>
;<Loop> "true" </Loop>
;<Filename> video_menu_1 </Filename>
;</Video>
; under line
<Image>

View file

@ -69,7 +69,7 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open

View file

@ -5,18 +5,26 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
If show_eng = "true" Then
Var NextPage = "-"
DEBUGVAR ICE_PROCESS_STATUS
DEBUGVAR ICE_PROCESS_TXT
If show_eng = "true" Then
Var showthaiText = "Invisible"
Var showengText = "Enable"
Var DirImage = "ROOT/taobin_project/image/page3_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 ice_tab_text = "Ice will be ready at "
Else
Var showengText = "Invisible"
Var showthaiText = "Enable"
@ -24,8 +32,18 @@
Var DirImage = "ROOT/taobin_project/image/page3"
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
Var ice_tab_text = "น้ำแข็งจะพร้อมเวลา "
EndIf
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
; SpiralOnline
If SpiralOnline = "true" Then
Var Menu1Selected2 = "Enable"
@ -110,26 +128,50 @@
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Width> 1080 </Width>
<Height> 1540 </Height>
<Color> "0xeae6e1" </Color>
</Image>
<Timeout> 1000 </Timeout>
<EventTimeout>
;DEBUGVAR ICE_PROCESS_STATUS
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
If NextPage = "-" Then
Else
If CupOnArm = "true" Then
If Timeout > 9 Then
Open NextPage
If CupOnArm = "true" Then
If Timeout > 9 Then
SAVELOG "COA9"
Open NextPage
EndIf
Else
If Timeout > 30 Then
SAVELOG "COA30"
Open NextPage
EndIf
EndIf
Else
If Timeout > 30 Then
Open NextPage
EndIf
EndIf
EndIf
If Timeout > 60 Then
SAVELOG "Timeout"
If Seeker = "next" Then
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
SAVELOG "Back"
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
@ -175,14 +217,14 @@
;<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_1 </Filename>
</Video>
;<Video>
;<X> 0 </X>
;<Y> 0 </Y>
;<Width> 1080</Width>
;<Height> 380 </Height>
;<Loop> "true" </Loop>
;<Filename> video_menu_1 </Filename>
;</Video>
; under line
<Image>

View file

@ -30,7 +30,7 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open

View file

@ -5,18 +5,26 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
If show_eng = "true" Then
Var NextPage = "-"
DEBUGVAR ICE_PROCESS_STATUS
DEBUGVAR ICE_PROCESS_TXT
If show_eng = "true" Then
Var showthaiText = "Invisible"
Var showengText = "Enable"
Var DirImage = "ROOT/taobin_project/image/page3_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 ice_tab_text = "Ice will be ready at "
Else
Var showengText = "Invisible"
Var showthaiText = "Enable"
@ -24,8 +32,18 @@
Var DirImage = "ROOT/taobin_project/image/page3"
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
Var ice_tab_text = "น้ำแข็งจะพร้อมเวลา "
EndIf
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
; SpiralOnline
If SpiralOnline = "true" Then
Var Menu1Selected2 = "Enable"
@ -126,26 +144,50 @@
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Width> 1080 </Width>
<Height> 1540 </Height>
<Color> "0xeae6e1" </Color>
</Image>
<Timeout> 1000 </Timeout>
<EventTimeout>
;DEBUGVAR ICE_PROCESS_STATUS
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
If NextPage = "-" Then
Else
If CupOnArm = "true" Then
If Timeout > 9 Then
Open NextPage
If CupOnArm = "true" Then
If Timeout > 9 Then
SAVELOG "COA9"
Open NextPage
EndIf
Else
If Timeout > 30 Then
SAVELOG "COA30"
Open NextPage
EndIf
EndIf
Else
If Timeout > 30 Then
Open NextPage
EndIf
EndIf
EndIf
If Timeout > 60 Then
SAVELOG "Timeout"
If Seeker = "next" Then
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
SAVELOG "Back"
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
@ -191,14 +233,14 @@
;<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_1 </Filename>
</Video>
;<Video>
;<X> 0 </X>
;<Y> 0 </Y>
;<Width> 1080</Width>
;<Height> 380 </Height>
;<Loop> "true" </Loop>
;<Filename> video_menu_1 </Filename>
;</Video>
; under line
<Image>

View file

@ -27,7 +27,7 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
@ -37,7 +37,12 @@
?>
; fuck!
Var Menu8Selected = "PressForever"
Var Timeout = 0
</EventOpen>

View file

@ -5,18 +5,26 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
If show_eng = "true" Then
Var NextPage = "-"
DEBUGVAR ICE_PROCESS_STATUS
DEBUGVAR ICE_PROCESS_TXT
If show_eng = "true" Then
Var showthaiText = "Invisible"
Var showengText = "Enable"
Var DirImage = "ROOT/taobin_project/image/page3_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 ice_tab_text = "Ice will be ready at "
Else
Var showengText = "Invisible"
Var showthaiText = "Enable"
@ -24,8 +32,18 @@
Var DirImage = "ROOT/taobin_project/image/page3"
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
Var ice_tab_text = "น้ำแข็งจะพร้อมเวลา "
EndIf
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
; SpiralOnline
If SpiralOnline = "true" Then
Var Menu1Selected2 = "Enable"
@ -100,32 +118,61 @@
; fuck!
Var Menu8Selected = "PressForever"
Var Timeout = 0
</EventOpen>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Width> 1080 </Width>
<Height> 1540 </Height>
<Color> "0xeae6e1" </Color>
</Image>
<Timeout> 1000 </Timeout>
<EventTimeout>
;DEBUGVAR ICE_PROCESS_STATUS
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
If NextPage = "-" Then
Else
If CupOnArm = "true" Then
If Timeout > 9 Then
Open NextPage
If CupOnArm = "true" Then
If Timeout > 9 Then
SAVELOG "COA9"
Open NextPage
EndIf
Else
If Timeout > 30 Then
SAVELOG "COA30"
Open NextPage
EndIf
EndIf
Else
If Timeout > 30 Then
Open NextPage
EndIf
EndIf
EndIf
If Timeout > 60 Then
SAVELOG "Timeout"
If Seeker = "next" Then
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
SAVELOG "Back"
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
@ -171,14 +218,14 @@
;<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_1 </Filename>
</Video>
;<Video>
;<X> 0 </X>
;<Y> 0 </Y>
;<Width> 1080</Width>
;<Height> 380 </Height>
;<Loop> "true" </Loop>
;<Filename> video_menu_1 </Filename>
;</Video>
; under line
<Image>

View file

@ -6,7 +6,7 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
@ -49,25 +49,13 @@
</EventOpen>
<?hurr
#include=menu_catalog.xml
?>
<Button>
<X> 780 </X>
<Y> 500 </Y>
<State> buttonRemoveCup </State>
;<Color> "0x00BDFF" </Color>
<Interval> 500 </Interval>
<Filename> "ROOT/taobin_project/image/main_page/bn_remove_cup.png" </Filename>
<Filename> "ROOT/taobin_project/image/main_page/bp_remove_cup.png" </Filename>
<EventClick>
Machine RemoveCup
Machine DoorLidOpen
</EventClick>
</Button>

View file

@ -6,7 +6,7 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open

File diff suppressed because it is too large Load diff

View file

@ -6,7 +6,7 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open

File diff suppressed because it is too large Load diff

View file

@ -6,7 +6,7 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open

File diff suppressed because it is too large Load diff

View file

@ -6,7 +6,7 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open

File diff suppressed because it is too large Load diff

View file

@ -7,7 +7,7 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
@ -36,28 +36,13 @@
</EventOpen>
<?hurr
#include=menu_catalog.xml
?>
<Button>
<X> 780 </X>
<Y> 500 </Y>
<State> buttonRemoveCup </State>
;<Color> "0x00BDFF" </Color>
<Interval> 500 </Interval>
<Filename> "ROOT/taobin_project/image/main_page/bn_remove_cup.png" </Filename>
<Filename> "ROOT/taobin_project/image/main_page/bp_remove_cup.png" </Filename>
<EventClick>
Machine RemoveCup
Machine DoorLidOpen
</EventClick>
</Button>
<?hurr
#include=menu_new_layout_gen.py
?>

File diff suppressed because it is too large Load diff

View file

@ -7,7 +7,7 @@
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
@ -49,27 +49,13 @@
</EventOpen>
<?hurr
#include=menu_catalog.xml
?>
<Button>
<X> 780 </X>
<Y> 500 </Y>
<State> buttonRemoveCup </State>
;<Color> "0x00BDFF" </Color>
<Interval> 500 </Interval>
<Filename> "ROOT/taobin_project/image/main_page/bn_remove_cup.png" </Filename>
<Filename> "ROOT/taobin_project/image/main_page/bp_remove_cup.png" </Filename>
<EventClick>
Machine RemoveCup
Machine DoorLidOpen
</EventClick>
</Button>
<?hurr
#include=menu_new_layout_gen.py

File diff suppressed because it is too large Load diff

View file

@ -8,6 +8,8 @@
TopView "show"
; On open
Var NextPage = "-"
Var Seeker.thankLidFlag = 0
Var Seeker.thankStrawFlag = 0
@ -256,6 +258,8 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
; eng
If new_layout = "true" Then
Open "ROOT/taobin_project/xml/page_catalog_group_recommend.xml"
@ -288,6 +292,7 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
If new_layout = "true" Then
Open "ROOT/taobin_project/xml/page_catalog_group_coffee.xml"
Else
@ -305,6 +310,7 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
If new_layout = "true" Then
Open "ROOT/taobin_project/xml/page_catalog_group_tea.xml"
Else
@ -321,6 +327,7 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
If new_layout = "true" Then
Open "ROOT/taobin_project/xml/page_catalog_group_milk.xml"
Else
@ -341,6 +348,7 @@
<Volume> SoundVolume </Volume>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
If new_layout = "true" Then
Open "ROOT/taobin_project/xml/page_catalog_group_whey.xml"
Else
@ -358,6 +366,7 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
If new_layout = "true" Then
Open "ROOT/taobin_project/xml/page_catalog_group_appfast.xml"
Else
@ -375,6 +384,7 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
If new_layout = "true" Then
Open "ROOT/taobin_project/xml/page_catalog_group_other.xml"
Else

View file

@ -14,6 +14,8 @@
Var TelephoneNumber = ""
Var TelephoneNumberX = ""
Var TimeOutPlay = 0
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collect_point1_en"
Play "ROOT/taobin_project/sound_eng/Reward_final.mp3"
@ -86,20 +88,27 @@
Var CountDownBrewing = BREW_CNT
; run test;
;If CountDownBrewing = 40 Then
; Open "ROOT/taobin_project/xml/page_drinkok.xml"
;EndIf
;If CountDownBrewing = 0 Then
; Open "ROOT/taobin_project/xml/page_drinkok.xml"
;EndIf
Var ShowCountDownBrewing = CountDownBrewing
StrLen TelephoneNumber TelNumLen
If TelNumLen > 0 Then
Var ShowTextNumber = "Invisible"
Else
; Add
Var TimeOutPlay = TimeOutPlay + 1
If TimeOutPlay > 10 Then
Var TimeOutPlay = 0
If show_eng = "true" Then
Play "ROOT/taobin_project/sound_eng/Reward_final.mp3"
Else
Play "ROOT/taobin_project/sound_thai/dontforget_number.mp3"
EndIf
EndIf
;
EndIf
DEBUGVAR Timeout

View file

@ -626,7 +626,7 @@
Var Timeout = Timeout + 1
If Timeout > 60 Then
If Timeout > 5 Then

View file

@ -60,7 +60,7 @@
Var Timeout = Timeout + 1
If Timeout > 60 Then
If Timeout > 5 Then
; goto lid straw
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf

View file

@ -34,17 +34,21 @@
Var Timeout = Timeout + 1
;If Timeout > 10 Then
If Timeout > 240 Then
If NextOrder = "true" Then
Var NextOrder = "false"
If NextOrder = "true" Then
TransferVar "next" "curr"
Var Seeker = "curr"
Open "ROOT/taobin_project/xml/page_thankyouConti.xml"
Else
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
Else
If Timeout > 240 Then
If NextOrder = "true" Then
SAVELOG "TIME OUT 240"
Var NextOrder = "false"
TransferVar "next" "curr"
Var Seeker = "curr"
Open "ROOT/taobin_project/xml/page_thankyouConti.xml"
Else
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
EndIf
@ -65,6 +69,8 @@
TransferVar "next" "curr"
Var Seeker = "curr"
SAVELOG "Remove cup"
Open "ROOT/taobin_project/xml/page_thankyouConti.xml"
Else
@ -72,6 +78,7 @@
EndIf
EndIf
; must remove cup.
If HaveCup = "true" Then
Else
@ -80,6 +87,8 @@
TransferVar "next" "curr"
Var Seeker = "curr"
SAVELOG "Have Cup"
Open "ROOT/taobin_project/xml/page_thankyouConti.xml"
Else

View file

@ -9,7 +9,8 @@
DEBUGVAR StarwState
DEBUGVAR LidState
Var buttonRemoveCup = "Invisible"
If show_eng = "true" Then
Var DirImage2 = "ROOT/taobin_project/image/topping2_en"
Else
@ -41,15 +42,8 @@
Machine Lid
EndIf
;If StarwState = "Press" Then
; Machine Straw
; LED LedDoorLid Blink 255 255 255 255
;EndIf
;If LidState = "Press" Then
; Machine Lid
; LED LedDoorLid Blink 255 255 255 255
;EndIf
Var ExtendData = Seeker.ExtendData
; On open
Var LidState = "Enable"
@ -172,6 +166,8 @@
Var DelayButton = 0
</EventOpen>
<Timeout> 500 </Timeout>
<EventTimeout>
@ -183,8 +179,33 @@
DEBUGVAR buttonRemoveCup
DEBUGVAR CART_COUNT
DEBUGVAR HaveCup
DEBUGVAR CHECKCUP
DEBUGVAR CupChecking
DEBUGVAR MaybeHaveCup
DEBUGVAR NextOrder
DEBUGVAR DoorCupPosition
Var Timeout = Timeout + 1
; Timeout 10*60*2
If Timeout > 1200 Then
SAVELOG "Timeout 1200"
If NextOrder = "true" Then
Var NextOrder = "false"
TransferVar "next" "curr"
Var Seeker = "curr"
SAVELOG "Make next order by take-cup with close-maintenance"
Open "ROOT/taobin_project/xml/page_cannotConti.xml"
Else
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
If Timeout > 30 Then
Var MultiGo = 1
EndIf
@ -245,12 +266,6 @@
EndIf
EndIf
DEBUGVAR HaveCup
DEBUGVAR CHECKCUP
DEBUGVAR CupChecking
DEBUGVAR MaybeHaveCup
DEBUGVAR NextOrder
DEBUGVAR DoorCupPosition
; Do not change
;
@ -269,16 +284,34 @@
EndIf
Else
If HaveCup = "true" Then
If CupChecking = "true" Then
Else
Var buttonRemoveCup = "Enable"
If DoorCupPosition = "bottom" Then
If HaveCup = "true" Then
If MaybeHaveCup = "true" Then
Else
If CupChecking = "true" Then
Else
Var buttonRemoveCup = "Enable"
Var txtDrinkOKState = "Enable"
EndIf
EndIf
EndIf
EndIf
If CupOnArm = "true" Then
Var buttonRemoveCup = "Enable"
If CupOnArm = "true" Then
If MaybeHaveCup = "true" Then
Else
If CupChecking = "true" Then
Else
Var buttonRemoveCup = "Enable"
Var txtDrinkOKState = "Enable"
EndIf
EndIf
EndIf
Else
Var buttonRemoveCup = "Invisible"
EndIf
EndIf
@ -286,18 +319,35 @@
Else
If sendPayMultiFlag = 1 Then
Var buttonRemoveCup = "Invisible"
If HaveCup = "true" Then
If CupChecking = "true" Then
Else
Var buttonRemoveCup = "Enable"
If DoorCupPosition = "bottom" Then
If HaveCup = "true" Then
If MaybeHaveCup = "true" Then
Else
If CupChecking = "true" Then
Else
Var buttonRemoveCup = "Enable"
Var txtDrinkOKState = "Enable"
EndIf
EndIf
EndIf
EndIf
If CupOnArm = "true" Then
Var buttonRemoveCup = "Enable"
If CupOnArm = "true" Then
If MaybeHaveCup = "true" Then
Else
If CupChecking = "true" Then
Else
Var buttonRemoveCup = "Enable"
Var txtDrinkOKState = "Enable"
EndIf
EndIf
EndIf
Else
Var buttonRemoveCup = "Invisible"
EndIf
Var Seeker.TNumberTaobinMember = ""
@ -308,7 +358,6 @@
If NextOrder = "true" Then
; next order set. Havecup and checkup value must false. Certain cup not on any arm.
If HaveCup = "false" Then
If MaybeHaveCup = "true" Then
@ -320,16 +369,17 @@
If CupOnArm = "false" Then
If DoorCupPosition = "bottom" Then
; BEGIN
Var NextOrder = "false"
TransferVar "next" "curr"
Var Seeker = "curr"
SAVELOG "Make next order by take-cup"
Open "ROOT/taobin_project/xml/page_thankyouConti.xml"
; END
Else
Machine DoorLidClose
Machine DoorClose
EndIf
EndIf
EndIf
@ -353,6 +403,7 @@
Open "ROOT/taobin_project/xml/page_back_to_remove_cup.xml"
Else
Var buttonRemoveCup = "Enable"
Var txtDrinkOKState = "Enable"
Var Timeout2 = Timeout2 + 1
@ -365,6 +416,7 @@
Else
Var buttonRemoveCup = "Enable"
Var txtDrinkOKState = "Enable"
Var Timeout2 = Timeout2 + 1
@ -386,11 +438,6 @@
EndIf
EndIf
If CupChecking = "true" Then
Var DelayButton = DelayButton + 1
EndIf
If MachineStage = "close-maintenance" Then
@ -410,15 +457,7 @@
EndIf
EndIf
If DelayButton > 1 Then
Var DelayButton = DelayButton + 1
If DelayButton > 8 Then
Var buttonRemoveCup = "Enable"
EndIf
EndIf
TimerReset
Refresh
@ -551,8 +590,10 @@
<Filename> Var( DirImage + "/bn_open_door.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_open_door.png" ) </FilenamePress>
<EventClick>
Var buttonRemoveCup = "Invisible"
Machine RemoveCup
Machine DoorLidOpen
Refresh
</EventClick>
</Button>

View file

@ -128,7 +128,8 @@
EndIf
Var Delay = 0
Var DelayCount = 0
</EventOpen>
@ -153,6 +154,7 @@
EndIf
EndIf
EndIf
Else
EndIf
@ -190,15 +192,22 @@
If CountStepPackPayment = CountStepForCupFlagDelay Then
SAVELOG ExtendData
If CountStepPackPayment >= CountStepForCupFlagDelay Then
If Seeker = "curr" Then
Var Seeker.ExtendData = ExtendDataCurr
Else
Var Seeker.ExtendData = ExtendDataNext
EndIf
DEBUGVAR Seeker
DEBUGVAR Seeker.ExtendData
If GetPayInfoFlag = 0 Then
SaveLog "RoadShow test"
If RoadShow = "false" Then
;CoinVending ON
CoinVending XBILL
;Var CoinAmount = 0
Var Delay = 1
EndIf
@ -207,7 +216,7 @@
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
;Var CreditAmount1 = ""
;Var ServiceAmountFlow = ""
@ -243,28 +252,34 @@
; Reset
Var MachineState_Result = 0
DEBUGVAR ExtendData
DEBUGVAR Seeker
DEBUGVAR Seeker.ExtendData
If web_readyOK = "true" Then
EndIf
Var Seeker.selected_a_drink = SelectDrink
Var Seeker.ServiceAmount2 = PriceDrink
Var PayAmount = PriceDrink
If Delay = 1 Then
Var DelayCount = DelayCount + 1
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_credit.xml"
If DelayCount >= 2 Then
If web_readyOK = "true" Then
Var Seeker.selected_a_drink = SelectDrink
Var Seeker.ServiceAmount2 = PriceDrink
Var PayAmount = PriceDrink
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_credit.xml"
EndIf
EndIf
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
EndIf
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
EndIf

View file

@ -103,6 +103,8 @@
Var Seeker.CodeChannel = 0
EndIf
Var ExtendData = Seeker.ExtendData
DEBUGVAR QRCODE99KBANK
If RoadShow = "true" Then
@ -336,7 +338,7 @@
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -397,7 +399,7 @@
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -577,6 +579,7 @@
<Timeout> 1000 </Timeout>
<EventTimeout>
If ReadyForBrew = "false" Then
SAVELOG "Back to main1"
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
@ -612,7 +615,7 @@
If PayInfoCFlag = 1 Then
If Seeker.CodeChannel = 1 Then
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -1131,7 +1134,7 @@
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -1267,7 +1270,7 @@
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -1347,7 +1350,7 @@
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""

View file

@ -528,7 +528,7 @@
If PayInfoCFlag = 1 Then
If Seeker.CodeChannel = 1 Then
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -1113,7 +1113,7 @@
EndIf
If Seeker.CodeChannel = 1 Then
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -1372,7 +1372,7 @@
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -1440,7 +1440,7 @@
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -2003,7 +2003,7 @@ EndIf
;Var MachineStage = "make-drink"
; make drink
MakeDrinkV1 SelectDrink ExtendData
MakeDrinkV1 SelectDrink Seeker.ExtendData
Open "ROOT/taobin_project/xml/page_thankyou.xml"
;Var UnitTestType = "1"

View file

@ -54,7 +54,7 @@
;PrepareDrink SelectDrink SelectSugarID
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
@ -238,7 +238,7 @@
;Var SessionID2 = SelectSlot + ":"
;Var SessionID2 = SessionID2 + ExtendData
;Var SessionID2 = SessionID2 + Seeker.ExtendData
;Var CreditAmount1 = ""
;Var ServiceAmountFlow = ""
@ -742,7 +742,7 @@
;PrepareDrink SelectDrink SelectSugarID
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""

View file

@ -553,7 +553,7 @@
;PrepareDrink SelectDrink SelectSugarID
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""

View file

@ -0,0 +1,684 @@
<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 ECommerce = ""
Var Seeker.FreeVendingCampaign = 0
Var Timeout = 0
Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0
;Var VendingQRCode = "ERROR"
;VendingQR ON
;Var QRCODE99 = ""
;CoinVending OFF
Var ShowTextNumber = "Enable"
Var ShowErrorText = "Invisible"
Var Tel_Confirm_State = "Invisible"
Var ErrorCause = ""
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
Else
Var DirImage = "ROOT/taobin_project/image/collectiing"
EndIf
Var Mode# = 0
Var Str# = ""
Var TelephoneNumber# = ""
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;Open "ROOT/xml/page_board.xml"
Var Timeout = Timeout + 1
If Timeout > 30 Then
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
Refresh
EndIf
TimerReset
</EventTimeout>
<EventCoin>
If ViewBill > 0 Then
CoinVending BILLREJECT
EndIf
</EventCoin>
<EventActionOk>
If Seeker.CodeChannel = 1 Then
SAVELOG "Seeker.CodeChannel 1 > ActOK."
SAVELOG ECommerce
SPLIT ECommerce "/" 5 Seeker.VendingCode
SPLIT ECommerce "/" 7 Seeker.VendingCampaignRI3
SPLIT ECommerce "/" 8 VendingCampaign1
If Seeker.VendingCode = "" Then
Var Seeker.VendingCode = "C00"
EndIf
If Seeker.VendingCode = "KBA:2" Then
Var Seeker.VendingCode = "C00"
EndIf
If Seeker.VendingCode = "AIR:2" Then
Var Seeker.VendingCode = "C00"
EndIf
If Seeker.VendingCode = "TWN:2" Then
Var Seeker.VendingCode = "C00"
EndIf
SAVELOG Seeker.VendingCode
SAVELOG Seeker.VendingCampaignRI3
If Seeker.VendingCode = "C00" Then
Else
Var VendingCreditRemain = ""
Var IntVendingCampaign1 = VendingCampaign1
INT IntVendingCampaign1
If IntVendingCampaign1 > 0 Then
Var VendingCreditRemain = VendingCampaign1
EndIf
Var Seeker.IntVendingCampaign = Seeker.VendingCampaignRI3
INT Seeker.IntVendingCampaign
Var VendingREFID = SessionID
If Seeker.IntVendingCampaign > 0 Then
Var QRChannel = 0
If Seeker.IntVendingCampaign >= PayAmount Then
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
Var Seeker.VendingCampaign = PayAmount
Var Seeker.FreeVendingCampaign = 1
CoinVending OFF
;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
If CART_COUNT >= 1 Then
Cart "PreparID" 1
Var CART_INDEX = 1
Var PayReference = ""
GenHashWithTimeStamp PayReference
Cart "MakeID" CART_INDEX
Open "ROOT/taobin_project/xml/page_thankyou.xml"
Else
Var CART_INDEX = 0
If Seeker = "curr" Then
MakeDrinkV1 SelectDrink SelectSugarID
Else
DEBUGVAR Seeker
EndIf
Open "ROOT/taobin_project/xml/page_thankyou.xml"
EndIf
EndIf
Var Seeker.CodeChannel = 1
If CART_COUNT >= 1 Then
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
Else
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
EndIf
Else
Var ShowErrorText = "Enable"
Var text_show_error = DirImage + "/text_show_error.png"
Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0
EndIf
EndIf
Else
EndIf
</EventActionOk>
<EventActionError>
If Seeker.CodeChannel = 1 Then
Var TelephoneNumber = ""
Var ShowErrorText = "Enable"
SAVELOG ShowErrorText
Var text_show_error = DirImage + "/text_show_error2.png"
If ErrorCause = "failed_fromoper_0002" Then
Var text_show_error = DirImage + "/text_show_error.png"
EndIf
Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0
Var Tel_Confirm_State = "Disable"
Refresh
EndIf
</EventActionError>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 667 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/img_popup1.png" </Filename>
</Image>
<Button>
<X> 333 </X>
<Y> 1070 </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
Var TelephoneNumber# = Str# + TelephoneNumber
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> 1070 </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
Var TelephoneNumber# = Str# + TelephoneNumber
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> 1070 </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
Var TelephoneNumber# = Str# + TelephoneNumber
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> 1214 </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
Var TelephoneNumber# = Str# + TelephoneNumber
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> 1214 </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
Var TelephoneNumber# = Str# + TelephoneNumber
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> 1214 </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
Var TelephoneNumber# = Str# + TelephoneNumber
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> 1358 </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
Var TelephoneNumber# = Str# + TelephoneNumber
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> 1358 </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
Var TelephoneNumber# = Str# + TelephoneNumber
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> 1358 </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
Var TelephoneNumber# = Str# + TelephoneNumber
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> 1498 </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
Var TelephoneNumber# = Str# + TelephoneNumber
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> 1498 </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
Var Clear# = 0
StrLen TelephoneNumber TelNumLen
If TelNumLen = 0 Then
Var Clear# = 1
EndIf
Trim TelephoneNumber -1
Var Tel_Confirm_State = "Invisible"
StrLen TelephoneNumber TelNumLen
If TelNumLen = 0 Then
If Clear# = 1 Then
Var ShowTextNumber = "Enable"
Var Mode# = 0
Var Str# = ""
EndIf
EndIf
Var TelephoneNumber# = Str# + TelephoneNumber
;Var ShowErrorText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 218 </X>
<Y> 1673 </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>
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
</EventClick>
</Button>
<Button>
<X> 577 </X>
<Y> 1673 </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 + "/bp_confirm.png" )</FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If UnitTestType = "2" Then
If TelephoneNumber = "00000001" Then
Var ShowErrorText = "Enable"
EndIf
Else
If GetPayInfoFlag = 0 Then
Var GetPayInfoFlag = 1
VendingQR OFF
Var Seeker.CodeNumber = TelephoneNumber
Var RemainAmount = 0
;PrepareDrink SelectDrink SelectSugarID
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + Seeker.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 + "/"
If Mode# = 1 Then
Var ECommerce = ECommerce + "S04"
Else
Var ECommerce = ECommerce + "C00"
EndIf
Var ECommerce = ECommerce + "/"
Var ECommerce = ECommerce + Seeker.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 = Seeker.CodeNumber
Var Seeker.CodeChannel = 1
EndIf
EndIf
SAVELOG ShowTextNumber
Refresh
</EventClick>
</Button>
<Image>
<X> 217 </X>
<Y> 868 </Y>
<Filename> Var( DirImage + "/img3.png" ) </Filename>
</Image>
<Image>
<X> 244 </X>
<Y> 882 </Y>
<State> ShowTextNumber </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_12.png" )</Filename>
</Image>
<Text>
<X> 0 </X>
<Y> 883 </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> 760 </Y>
<Filename> Var( DirImage + "/text_34.png" )</Filename>
</Image>
<Image>
<X> 152 </X>
<Y> 1001 </Y>
<Refresh> "Enable" </Refresh>
<State> ShowErrorText </State>
<Filename> text_show_error </Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 513 </Y>
<Filename> Var( DirImage + "/img_popupDtac.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>

View file

@ -553,7 +553,7 @@
;PrepareDrink SelectDrink SelectSugarID
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""

View file

@ -88,14 +88,14 @@
<Image>
<X> 158 </X>
<Y> 804 </Y>
<Y> 712 </Y>
<Filename> Var( DirImage + "/img_popup16.png") </Filename>
</Image>
<Button>
<X> 209 </X>
<Y> 1005 </Y>
<Y> 888 </Y>
<State> "Enable" </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeThe1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_codeThe1.png" </FilenamePress>
@ -112,7 +112,7 @@
<Button>
<X> 441 </X>
<Y> 1005 </Y>
<Y> 888 </Y>
<State> "Enable" </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeLotus.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_codeLotus.png" </FilenamePress>
@ -129,7 +129,7 @@
<Button>
<X> 673 </X>
<Y> 1005 </Y>
<Y> 888 </Y>
<State> "Enable" </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeAIS.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_codeAIS.png" </FilenamePress>
@ -140,12 +140,60 @@
Open "ROOT/taobin_project/xml/page_payment_codeAIS.xml"
</EventClick>
</Button>
<Button>
<X> 209 </X>
<Y> 1112 </Y>
<State> "Enable" </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeDtac.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_codeDtac.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/collectiing/bd_pay_with_codeDtac.png" </FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_payment_codeDtac.xml"
</EventClick>
</Button>
<Button>
<X> 441 </X>
<Y> 1112 </Y>
<State> "Enable" </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" </FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 673 </X>
<Y> 1112 </Y>
<State> "Enable" </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" </FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 397 </X>
<Y> 1264 </Y>
<Y> 1365 </Y>
<Filename> Var( DirImage + "/bn_cancel2.png") </Filename>
<FilenamePress> Var( DirImage + "/bn_cancel2.png") </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>

View file

@ -553,7 +553,7 @@
;PrepareDrink SelectDrink SelectSugarID
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""

View file

@ -255,7 +255,7 @@
SAVELOG ExtendData
SAVELOG Seeker.ExtendData
If GetPayInfoFlag = 0 Then
If RoadShow = "false" Then

View file

@ -17,14 +17,14 @@
Var show_error_normal = "Invisible"
Var show_error_sp1 = "Enable"
If EmergencyStop = "true" Then
Var stop_now = "true"
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_en/"
Else
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
EndIf
;If EmergencyStop = "true" Then
; Var stop_now = "true"
; If show_eng = "true" Then
; Var DirImage = "ROOT/taobin_project/image/vending_error_en/"
; Else
; Var DirImage = "ROOT/taobin_project/image/vending_error"
; EndIf
;EndIf
If MachineStage = "mcu-upgrade" Then
If show_eng = "true" Then
@ -89,7 +89,16 @@
EndIf
EndIf
EndIf
If NETCORE_LOST_CNT > 0 Then
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_en/"
Else
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
EndIf
StopLongPlay
@ -126,6 +135,8 @@
DEBUGVAR DoorCupPosition
DEBUGVAR MachineStage
Var EmergencyStop = "-"
If EmergencyStop = "true" Then
If DoorCupPosition = "bottom" Then
; It normal
@ -140,7 +151,9 @@
Var MachineErrorDetailAll = MachineErrorDetailAll + MachineErrorDetailEng
DEBUGVAR MachineStage
If NETCORE_LOST_CNT = 0 Then
If NETCORE_LOST_CNT > 0 Then
Else
If MachineStage = "show-menu" Then
Var LEDSet = "false"
@ -254,7 +267,7 @@
EndIf
If countClick = 5 Then
If countClick = 10 Then
Var countClick = 0
MainMenu
EndIf
@ -272,40 +285,10 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var countClick2 = countClick2 + 1
If countClick2 = 3 Then
EndIf
If countClick2 = 5 Then
Var MachineStage = "show-menu"
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_board.xml"
EndIf
Refresh
</EventClick>
</Button>
;<Text>
;<X> 0 </X>
;<Y> 1860 </Y>
;<Size> 20 </Size>
;<Width> 1080</Width>
;<Align> Start </Align>
;<Font> RobotoBlack </Font>
;<Color> 0x513C2F </Color>
;<Value> countClick </Value>
;</Text>
;<Text>
;<X> 0 </X>
;<Y> 1876 </Y>
;<Size> 20 </Size>
;<Width> 1080</Width>
;<Align> end </Align>
;<Font> RobotoBlack </Font>
;<Color> 0x513C2F </Color>
;<Value> countClick2 </Value>
;</Text>
<Text>
<X> 5 </X>

View file

@ -301,14 +301,14 @@
;<Video>
;<X> 0 </X>
;<Y> 392 </Y>
;<Width> 1080</Width>
;<Height> 1528 </Height>
;<State>VideoFileNameStage</State>
;<Filename> video_file_name </Filename>
;</Video>
<Video>
<X> 0 </X>
<Y> 392 </Y>
<Width> 1080</Width>
<Height> 1528 </Height>
<State>VideoFileNameStage</State>
<Filename> video_file_name </Filename>
</Video>

View file

@ -93,73 +93,136 @@
Topping "Select3-ID" Seeker.topping3
; Pack
Topping "Pack" ExtendData
Topping "Pack" ExtendDataCurr
Var MachineStage = "NextOrder"
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
;Var Seeker.ExtendData = ExtendData ; because save in Seeker.
;Var MachineStage = "NextOrder"
;Var SessionID2 = SelectSlot + ":"
;Var SessionID2 = SessionID2 + ExtendData
;DEBUGVAR SessionID2
Topping "ClearNextOrder" "-"
EndIf
If SaveTheWorldCount = 2 Then
If LedLidBlink = "no" Then
Var SaveTheWorldST = "Enable"
EndIf
Var video_id_to_ran = 3
Var video_name_to_play = "taobin_save_world"
Random video_id_to_ran
Var ThankyouST = "Invisible"
Else
Var video_id_to_ran = 2
Var video_name_to_play = "taobin_thank"
Random video_id_to_ran
Var ThankyouST = "Enable"
EndIf
If new_layout = "true" Then
DEBUGVAR video_id_to_ran
Var show_video = 1
Var SaveTheWorldST = "Invisible"
Var video_file_name = "ROOT/taobin_project/video/" + video_name_to_play
Var video_file_name = video_file_name + video_id_to_ran
Var video_file_name = video_file_name + ".mp4"
DEBUGVAR video_file_name
Var VideoFileNameStage = "Enable"
Var TimeoutToNext = 5
Var ThankyouST = "Invisible"
Else
Var show_video = 0
Var VideoFileNameStage = "Invisible"
Var TimeoutToNext = 3
EndIf
DEBUGVAR LastMakeDrinkResult
DEBUGVAR MachineStage
DEBUGVAR NextOrderStatus
; Show text and button for remove CUP.
If show_eng = "true" Then
Var DirImage2 = "ROOT/taobin_project/image/complete_en/"
Else
Var DirImage2 = "ROOT/taobin_project/image/complete/"
EndIf
Var txtDrinkOKState = "Invisible"
Var buttonRemoveCup = "Invisible"
Var CountUpDoorCupOpen = 0
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var CountDownBrewing = CountDownBrewing - 1
Var CountDownThankyou = CountDownThankyou - 1
;Var CountDownThankyou = CountDownThankyou - 1
Var Timeout = Timeout + 1
If Timeout = 1 Then
DEBUGVAR MachineStage
DEBUGVAR stop_now
DEBUGVAR CupOnArm
DEBUGVAR buttonRemoveCup
DEBUGVAR CART_COUNT
DEBUGVAR HaveCup
DEBUGVAR CHECKCUP
DEBUGVAR CupChecking
DEBUGVAR MaybeHaveCup
DEBUGVAR NextOrder
DEBUGVAR DoorCupPosition
If MachineStage = "close-maintenance" Then
If stop_now = "true" Then
Open "ROOT/taobin_project/xml/page_cannotConti.xml"
EndIf
EndIf
If HaveCup = "true" Then
Var Timeout = 0
Else
If CupOnArm = "true" Then
Var Timeout = 0
Else
If MaybeHaveCup = "true" Then
Var Timeout = 0
Else
Var Timeout = Timeout + 1
EndIf
EndIf
EndIf
; detect cup
If DoorCupPosition = "bottom" Then
If HaveCup = "true" Then
If MaybeHaveCup = "true" Then
Else
If CupChecking = "true" Then
Else
Var buttonRemoveCup = "Enable"
Var txtDrinkOKState = "Enable"
EndIf
EndIf
EndIf
If CupOnArm = "true" Then
If MaybeHaveCup = "true" Then
Else
If CupChecking = "true" Then
Else
Var buttonRemoveCup = "Enable"
Var txtDrinkOKState = "Enable"
EndIf
EndIf
EndIf
Else
Var buttonRemoveCup = "Invisible"
Var CountUpDoorCupOpen = CountUpDoorCupOpen + 1
If CountUpDoorCupOpen > 80 Then
Var CountUpDoorCupOpen = 60
Machine DoorClose
EndIf
EndIf
If MachineStage = "close-maintenance" Then
If stop_now = "true" Then
If NextOrder = "true" Then
Var NextOrder = "false"
TransferVar "next" "curr"
Var Seeker = "curr"
SAVELOG "Make next order by take-cup with close-maintenance"
Open "ROOT/taobin_project/xml/page_cannotConti.xml"
Else
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
EndIf
If Timeout = 2 Then
Var VideoPlayFile = VideoPath
@ -178,7 +241,7 @@
Var LastMakeDrinkResult = "fail"
Else
MakeDrinkV1 Seeker.selected_a_drink SelectSugarID
Var CountDownThankyou = 0
EndIf
Else
;Cart "MakeID" CART_INDEX
@ -192,6 +255,7 @@
; run test;
If CountDownThankyou = 0 Then
; reset all var
DEBUGVAR MachineStage
Var CountDownBrewing = BrewTime
@ -199,9 +263,11 @@
SAVELOG BrewTime
Var ShowCountDownBrewing = CountDownBrewing
Var MachineState_Result = 0
Open "ROOT/taobin_project/xml/page_brewing3.xml"
If MachineStage = "show-menu" Then
MakeDrinkV1 Seeker.selected_a_drink SelectSugarID
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
EndIf
@ -252,4 +318,28 @@
</EventChangeStatus>
<Image>
<X> 77 </X>
<Y> 1378 </Y>
<State> txtDrinkOKState </State>
<Filename> Var( DirImage2 + "/txtDrinkOK.png" ) </Filename>
</Image>
<Button>
<X> 160 </X>
<Y> 1673 </Y>
<State> buttonRemoveCup </State>
;<Color> "0x00BDFF" </Color>
<Interval> 500 </Interval>
<Filename> Var( DirImage2 + "/bn_open_door.png" ) </Filename>
<FilenamePress> Var( DirImage2 + "/bp_open_door.png" ) </FilenamePress>
<EventClick>
Var buttonRemoveCup = "Invisible"
Machine RemoveCup
Machine DoorLidOpen
Refresh
</EventClick>
</Button>
</Popup>

View file

@ -280,7 +280,7 @@
If ToppingGotoPayment = "true" Then
Topping "Select" SelectDrink
; Pack
Topping "Pack" ExtendData
Topping "Pack" Seeker.ExtendData
Open "ROOT/taobin_project/xml/page_payment.xml"
EndIf
@ -372,7 +372,7 @@
Topping "Select3-ID" topping3
; Pack
Topping "Pack" ExtendData
Topping "Pack" Seeker.ExtendData
Open "ROOT/taobin_project/xml/page_payment.xml"

View file

@ -282,7 +282,7 @@
Topping "Select3-ID" topping3
; Pack
Topping "Pack" ExtendData
Topping "Pack" Seeker.ExtendData
Open "ROOT/taobin_project/xml/page_payment.xml"

View file

@ -319,7 +319,7 @@
Topping "Select3-ID" topping3
; Pack
Topping "Pack" ExtendData
Topping "Pack" Seeker.ExtendData
Open "ROOT/taobin_project/xml/page_payment.xml"

View file

@ -252,7 +252,7 @@
Topping "Select3-ID" topping3
; Pack
Topping "Pack" ExtendData
Topping "Pack" Seeker.ExtendData
Open "ROOT/taobin_project/xml/page_payment.xml"

View file

@ -587,7 +587,7 @@
If ToppingGotoPayment = "true" Then
Topping "Select" SelectDrink
; Pack
Topping "Pack" ExtendData
Topping "Pack" Seeker.ExtendData
Open "ROOT/taobin_project/xml/page_payment.xml"
EndIf
@ -1487,7 +1487,7 @@
Topping "Select3-ID" topping3
; Pack
Topping "Pack" ExtendData
Topping "Pack" Seeker.ExtendData
If CART1_STATUS = "EMPTY" Then
Cart "AddMenuID" 1
@ -1553,7 +1553,7 @@
Topping "Select3-ID" topping3
; Pack
Topping "Pack" ExtendData
Topping "Pack" Seeker.ExtendData
If CART_COUNT = 0 Then
Open "ROOT/taobin_project/xml/page_payment.xml"

View file

@ -682,7 +682,7 @@
If ToppingGotoPayment = "true" Then
Topping "Select" SelectDrink
; Pack
Topping "Pack" ExtendData
Topping "Pack" Seeker.ExtendData
Open "ROOT/taobin_project/xml/page_payment.xml"
EndIf
@ -1511,7 +1511,7 @@
Topping "Select3-ID" topping3
; Pack
Topping "Pack" ExtendData
Topping "Pack" Seeker.ExtendData
If CART1_STATUS = "EMPTY" Then
Cart "AddMenuID" 1
@ -1591,7 +1591,7 @@
Topping "Select3-ID" topping3
; Pack
Topping "Pack" ExtendData
Topping "Pack" Seeker.ExtendData
If CART_COUNT = 0 Then
Open "ROOT/taobin_project/xml/page_payment.xml"

File diff suppressed because it is too large Load diff

View file

@ -717,7 +717,7 @@
If ToppingGotoPayment = "true" Then
Topping "Select" SelectDrink
; Pack
Topping "Pack" ExtendData
Topping "Pack" Seeker.ExtendData
Open "ROOT/taobin_project/xml/page_payment.xml"
EndIf
@ -1599,7 +1599,7 @@
Topping "Select3-ID" topping3
; Pack
Topping "Pack" ExtendData
Topping "Pack" Seeker.ExtendData
If CART1_STATUS = "EMPTY" Then
Cart "AddMenuID" 1
@ -1701,7 +1701,7 @@
Topping "Select3-ID" topping3
; Pack
Topping "Pack" ExtendData
Topping "Pack" Seeker.ExtendData
Else
Topping "SetNextOrder" UserSelectProductCode
EndIf

View file

@ -244,7 +244,7 @@
Topping "Select3-ID" topping3
; Pack
Topping "Pack" ExtendData
Topping "Pack" Seeker.ExtendData
Open "ROOT/taobin_project/xml/page_payment.xml"

View file

@ -384,7 +384,7 @@
DEBUGVAR topping2
DEBUGVAR topping3
; Below this. Process get ExtendData 1:_____ len 5
; Below this. Process get Seeker.ExtendData 1:_____ len 5
; Set drink
Topping "Select" SelectDrink
@ -395,7 +395,7 @@
Topping "Select3-ID" topping3
; Pack
Topping "Pack" ExtendData
Topping "Pack" Seeker.ExtendData
Open "ROOT/taobin_project/xml/page_payment.xml"