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

This commit is contained in:
Pakin 2024-02-12 09:41:18 +07:00
commit d4eb035c23
212 changed files with 16328 additions and 781 deletions

View file

@ -0,0 +1,201 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Volume> SoundVolume </Volume>
;<Background> "0xeae6e1" </Background>
<EventOpen>
Var Timeout = 0
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/event/bad_valentine/display_point_en"
Else
Var DirImage = "ROOT/taobin_project/image/event/bad_valentine/display_point"
EndIf
Var couponList[0] = "glass"
Var couponList[1] = "dis50"
; Random coupon
Var randResult = 0
Random2 0 1 randResult
DEBUGVAR randResult
Var CodeType = ""
Var var2 = "X"
Var var3 = "X"
If Seeker.IsAlreadyHadGlass = 1 Then
Var CodeType = "123"
Else
Var UserCouponReward = couponList[randResult]
If UserCouponReward = "glass" then
Var CodeType = "124"
else
Var CodeType = "123"
EndIf
EndIf
AddData 38 TelephoneNumber CodeType var2 var3
If CodeType = "123" Then
Var CouponResultImage = DirImage + "/discount_50.png"
Else
If CodeType = "124" Then
Var CouponResultImage = DirImage + "/get_glass.png"
EndIf
EndIf
; pattern
Var patternList[0] = "/random_pattern_1.png"
Var patternList[1] = "/random_pattern_2.png"
Var patternList[2] = "/random_pattern_3.png"
If show_eng = "true" Then
Var patternList[0].X = 482
Var patternList[0].Y = 1130
Var patternList[1].X = 207
Var patternList[1].Y = 1239
Var patternList[2].X = 489
Var patternList[2].Y = 1213
Var patternList[0].Text1 = "Act like a lover,\nbut it's just casual chatter."
Var patternList[0].Text2 = "Get all the lover-fell functions. When I asked to be\nmy girlfriend, she said NO"
Var patternList[1].Text1 = "She went for a shower, BRB.\nThree months later, still no word."
Var patternList[1].Text2 = "She loves cleanliness, maybe too much for a reply."
Var patternList[2].Text1 = "Paid for it all, yet stuck in the friend zone."
Var patternList[2].Text2 = "Almost paid the price of life, but in the end, left alone.\nNo worries, keep your cash, invest in a new unknown."
Else
Var patternList[0].X = 125
Var patternList[0].Y = 1154
Var patternList[1].X = 126
Var patternList[1].Y = 1170
Var patternList[2].X = 277
Var patternList[2].Y = 1238
Var patternList[0].Text1 = "ทำทุกอย่างเหมือนแฟน\nแต่เป็นได้แค่คนคุย"
Var patternList[0].Text2 = "รับทุกฟังก์ชั่นแบบฟีลแฟน พอขอเป็นแฟนเธอบอกแคนนอท"
Var patternList[1].Text1 = "เธอขอไปอาบน้ำ เดี๋ยวมา\n3 เดือนผ่านมายังไม่ตอบเลย"
Var patternList[1].Text2 = "เราว่าเธอคงจะรักสะอาดจนไม่มีเวลาตอบ อาบน้ำตั้ง 3 เดือน ตัวคงเปื่อยน่าดูเลย"
Var patternList[2].Text1 = "เปย์เป็นแสน แขนไม่ได้จับ"
Var patternList[2].Text2 = "เปย์แทบตาย แต่สุดท้ายก็โดนทิ้ง ไม่เป็นไรนะ เก็บตังค์ไว้เปย์คนใหม่"
EndIf
; Random pattern
Var pattern = 0
Random2 0 2 pattern
Var PatternImg = patternList[pattern]
Var PatternImg.X = patternList[pattern].X
Var PatternImg.Y = patternList[pattern].Y
Var PatternImg.Text1 = patternList[pattern].Text1
Var PatternImg.Text2 = patternList[pattern].Text2
DEBUGVAR UserCouponReward
DEBUGVAR PatternImg
DEBUGVAR PatternImg.X
DEBUGVAR PatternImg.Y
DEBUGVAR PatternImg.Text1
DEBUGVAR PatternImg.Text2
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
DEBUGVAR Timeout
If Timeout > 5 Then
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Var Timeout = Timeout + 1
TimerReset
</EventTimeout>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
; Background
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/event/bad_valentine/display_point/bg.png" </Filename>
</Image>
<Image>
<X> 66 </X>
<Y> 464 </Y>
<Filename> CouponResultImage </Filename>
</Image>
<Image>
<X> PatternImg.X </X>
<Y> PatternImg.Y </Y>
<Filename> Var( DirImage + PatternImg) </Filename>
</Image>
<Text>
<X> 0 </X>
<Y> 1600 </Y>
<Width> 1080 </Width>
<Height> 200 </Height>
<Font> KanitSemiBoldTTF </Font>
<Size> 48 </Size>
<Color> 0x523D30 </Color>
<Align> center-vertical-horizontal </Align>
<Value> PatternImg.Text1 </Value>
</Text>
<Text>
<X> 0 </X>
<Y> 1760 </Y>
<Width> 1080 </Width>
<Height> 150 </Height>
<Font> KanitSemiBoldTTF </Font>
<Size> 32 </Size>
<Color> 0xFFFFFF </Color>
<Align> center-vertical-horizontal </Align>
<Value> PatternImg.Text2 </Value>
</Text>
<EventUnitTest1>
OpenInst 2 "ROOT/taobin_project/xml/page_lid_straw.xml"
</EventUnitTest1>
<EventUnitTest2>
Var show_eng = "false"
Open "ROOT/taobin_project/xml/event/bad_valentine/page_bad_valentine_random.xml"
</EventUnitTest2>
<EventUnitTest3>
Var show_eng = "true"
Open "ROOT/taobin_project/xml/event/bad_valentine/page_bad_valentine_random.xml"
</EventUnitTest3>
<EventUnitTest4>
Open "ROOT/taobin_project/xml/event/bad_valentine/page_bad_valentine_random.xml"
</EventUnitTest4>
</Popup>

View file

@ -0,0 +1,391 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var Timeout = 0
SAVELOG UnitTestType
Var TaobinLevel = 0
Var Point2X = 0
Var Seeker.TaobinErrorNetwork = 0
DEBUGVAR show_eng
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png"
Else
Var DirImage = "ROOT/taobin_project/image/collectiing"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png"
EndIf
If PayOfflineMode = 1 Then
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember= TelephoneNumber
Var CollectPointError = "collect"
Open "ROOT/taobin_project/xml/event/bad_valentine/page_collect_point_pro_bad_valentine_error.xml"
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var ShowCountDownBrewing = CountDownBrewing
Var Timeout = Timeout + 1
If Timeout > 30 Then
Var TaobinLevel = 0
Var CoffeePoint = 1
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember= TelephoneNumber
Var CollectPointError = "collect"
Open "ROOT/taobin_project/xml/event/bad_valentine/page_collect_point_pro_bad_valentine_error.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventActionOk>
If Ext1a = "" Then
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember = TelephoneNumber
Var CollectPointError = "collect"
Open "ROOT/taobin_project/xml/event/bad_valentine/page_collect_point_pro_bad_valentine_error.xml"
Else
Var TaobinName = Ext1b
Var TelephoneNumber = TelephoneNumberX
Var TNumberTaobinMemberXXX = TelephoneNumber
Var Seeker.IsAlreadyHadGlass = Ext1c
Var Seeker.PointTaobinStr = ParamCP
Var Seeker.TNumberTaobinMember = TelephoneNumberX
Var PointState[0] = 0
Var PointState[1] = 0
Var PointState[2] = 0
Var PointState[3] = 0
Var PointState[4] = 0
Var PointState[5] = 0
Var PointState[6] = 0
Var PointState[7] = 0
Var PointState[8] = 0
DEBUGVAR Ext1a
SPLIT Ext1a "/" 1 PointState[0]
SPLIT Ext1a "/" 2 PointState[1]
SPLIT Ext1a "/" 3 PointState[2]
SPLIT Ext1a "/" 4 PointState[3]
SPLIT Ext1a "/" 5 PointState[4]
SPLIT Ext1a "/" 6 PointState[5]
SPLIT Ext1a "/" 7 PointState[6]
SPLIT Ext1a "/" 8 PointState[7]
SPLIT Ext1a "/" 9 PointState[8]
INT PointState[0]
INT PointState[1]
INT PointState[2]
INT PointState[3]
INT PointState[4]
INT PointState[5]
INT PointState[6]
INT PointState[7]
INT PointState[8]
DEBUGVAR PointState[0]
DEBUGVAR PointState[1]
DEBUGVAR PointState[2]
DEBUGVAR PointState[3]
DEBUGVAR PointState[4]
DEBUGVAR PointState[5]
DEBUGVAR PointState[6]
DEBUGVAR PointState[7]
DEBUGVAR PointState[8]
Var newPointIndex = ""
; Point 1
If Seeker.selected_a_drink = "12-01-02-0061" Then
If PointState[0] = 1 Then
Var newPointIndex = ""
Else
Var newPointIndex = 0
EndIf
Var PointState[0] = 1
EndIf
If Seeker.selected_a_drink = "12-01-03-0061" Then
If PointState[0] = 1 Then
Var newPointIndex = ""
Else
Var newPointIndex = 0
EndIf
Var PointState[0] = 1
EndIf
If Seeker.selected_a_drink = "12-21-02-0061" Then
If PointState[0] = 1 Then
Var newPointIndex = ""
Else
Var newPointIndex = 0
EndIf
Var PointState[0] = 1
EndIf
If Seeker.selected_a_drink = "12-21-03-0061" Then
If PointState[0] = 1 Then
Var newPointIndex = ""
Else
Var newPointIndex = 0
EndIf
Var PointState[0] = 1
EndIf
If Seeker.selected_a_drink = "12-21-02-0057" Then
If PointState[0] = 1 Then
Var newPointIndex = ""
Else
Var newPointIndex = 0
EndIf
Var PointState[0] = 1
EndIf
; Point 2
If Seeker.selected_a_drink = "12-01-02-0062" Then
If PointState[1] = 1 Then
Var newPointIndex = ""
Else
Var newPointIndex = 1
EndIf
Var PointState[1] = 1
EndIf
If Seeker.selected_a_drink = "12-21-02-0062" Then
If PointState[1] = 1 Then
Var newPointIndex = ""
Else
Var newPointIndex = 1
EndIf
Var PointState[1] = 1
EndIf
; Point 3
If Seeker.selected_a_drink = "12-03-03-0044" Then
If PointState[2] = 1 Then
Var newPointIndex = ""
Else
Var newPointIndex = 2
EndIf
Var PointState[2] = 1
EndIf
; Point 4
If Seeker.selected_a_drink = "12-03-03-0045" Then
If PointState[3] = 1 Then
Var newPointIndex = ""
Else
Var newPointIndex = 3
EndIf
Var PointState[3] = 1
EndIf
; Point 5
If Seeker.selected_a_drink = "12-03-03-0029" Then
If PointState[4] = 1 Then
Var newPointIndex = ""
Else
Var newPointIndex = 4
EndIf
Var PointState[4] = 1
EndIf
; Point 6
If Seeker.selected_a_drink = "12-02-02-0053" Then
If PointState[5] = 1 Then
Var newPointIndex = ""
Else
Var newPointIndex = 5
EndIf
Var PointState[5] = 1
EndIf
; Point 7
If Seeker.selected_a_drink = "12-02-02-0054" Then
If PointState[6] = 1 Then
Var newPointIndex = ""
Else
Var newPointIndex = 6
EndIf
Var PointState[6] = 1
EndIf
; Point 8
If Seeker.selected_a_drink = "12-02-02-0055" Then
If PointState[7] = 1 Then
Var newPointIndex = ""
Else
Var newPointIndex = 7
EndIf
Var PointState[7] = 1
EndIf
; Point 9
If Seeker.selected_a_drink = "12-05-02-0078" Then
If PointState[8] = 1 Then
Var newPointIndex = ""
Else
Var newPointIndex = 8
EndIf
Var PointState[8] = 1
EndIf
DEBUGVAR Seeker.selected_a_drink
DEBUGVAR newPointIndex
DEBUGVAR Seeker.PointTaobinStr
DEBUGVAR Seeker.TNumberTaobinMember
Open "ROOT/taobin_project/xml/event/bad_valentine/page_collect_point_pro_bad_valentine_3.xml"
EndIf
</EventActionOk>
<EventActionError>
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember= TelephoneNumber
Var CollectPointError = "collect"
Open "ROOT/taobin_project/xml/event/bad_valentine/page_collect_point_pro_bad_valentine_error.xml"
</EventActionError>
<EventMachine>
If MachineStage = "drink-success" Then
Var MachineState_Result = 1
EndIf
If MachineStage = "drink-failed" Then
Var MachineState_Result = 2
EndIf
</EventMachine>
<Image>
<X> 178 </X>
<Y> 680 </Y>
<Filename> Var( DirImage + "/text20.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>
<Text>
<X> 0 </X>
<Y> 873 </Y>
<Width> 1080 </Width>
<Align> Center </Align>
<Size> 62 </Size>
<Font> RobotoBlack </Font>
<Color> 0x513C2F </Color>
<Value> TelephoneNumber </Value>
<Format> Telnum-mask-1 </Format>
</Text>
;
<Image>
<X> 751 </X>
<Y> 413 </Y>
<Filename> IMG_CNT </Filename>
</Image>
;
<Text>
<X> XPosiShowCountDownBrew </X>
<Y> 470 </Y>
<Align> End </Align>
<Width> 153 </Width>
<Size> 88 </Size>
<Font> RobotoBold </Font>
<Color> 0x513C2F </Color>
<Value> ShowCountDownBrewing </Value>
</Text>
</Popup>

View file

@ -0,0 +1,681 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var Timeout = 0
;CoffeePoint
;Var CoffeePoint = 30
Var BmiYear = "0/0/0/0/0/0/0/0/0/1"
Var PointCrm = "pdpa1"
Var GetScore = ""
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember = TelephoneNumber
;AddData 4 TelephoneNumber BmiYear PointCrm GetScore
;Add after pay
Var PointMaskState = "Invisible"
Var showRandomBtnState = "Invisible"
Var CoffeePointStr = CoffeePoint
DEBUGVAR TelephoneNumber
DEBUGVAR TelephoneNumberX
Var ThaiTextState = "Invisible"
Var EngTextState = "Invisible"
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/event/bad_valentine/display_point_en"
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
Var EngTextState = "Enable"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png"
Else
Var DirImage = "ROOT/taobin_project/image/event/bad_valentine/display_point"
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
Var ThaiTextState = "Enable"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png"
EndIf
Var CheckCoupons = 0
Var MakeDrinkState = 0
Var taobinImgNewPoint = "/point_active_new.png"
Var taobinImgPoint[0] = "/point_deactive.png"
Var taobinImgPoint[1]= "/point_deactive.png"
Var taobinImgPoint[2]= "/point_deactive.png"
Var taobinImgPoint[3]= "/point_deactive.png"
Var taobinImgPoint[4]= "/point_deactive.png"
Var taobinImgPoint[5]= "/point_deactive.png"
Var taobinImgPoint[6]= "/point_deactive.png"
Var taobinImgPoint[7]= "/point_deactive.png"
Var taobinImgPoint[8]= "/point_deactive.png"
;Var taobinTextPointTH[0] = "รวยข้ามคืน ตื่นมารวย"
;Var taobinTextPointTH[1] = "รวยตาค้าง กระพริบตาบ้างก็ได้"
;Var taobinTextPointTH[2] = "รวยจนหน้าชา อาม่ายังงง"
;Var taobinTextPointTH[3] = "รวยจนช็อก! น็อคแล้วไหม"
;Var taobinTextPointTH[4] = "รวยไม่รู้ล้ม เอาผมลงไหมล่ะ"
;Var taobinTextPointTH[5] = "รวยนะคะรู้ยัง ถ้ายังก็รู้ซะ"
;Var taobinTextPointTH[6] = "รวยล้นฟ้า เทวดาซัปพอร์ต"
;Var taobinTextPointTH[7] = "รวยฟ้าผ่า เพราะลืมหลบฝน"
;Var taobinTextPointTH[8] = "แสร้งว่ารวย ค่าหวยไม่จ่าย"
;Var taobinTextPointEN[0] = "Mint Cafe Latte"
;Var taobinTextPointEN[1] = "Mintcano"
;Var taobinTextPointEN[2] = "Matcha Latte Mint"
;Var taobinTextPointEN[3] = "Cocoa Mint"
;Var taobinTextPointEN[4] = "Mint Milk"
;Var taobinTextPointEN[5] = "Strawberry Mint Milk"
;Var taobinTextPointEN[6] = "Mint Oreo Volcano"
;Var taobinTextPointEN[7] = "Mint Lime Soda"
;Var taobinTextPointEN[8] = "Strawberry Mint Soda"
;Var taobinTextColorPoint[0] = "0xFFFFFF"
;Var taobinTextColorPoint[1] = "0xFFFFFF"
;Var taobinTextColorPoint[2] = "0xFFFFFF"
;Var taobinTextColorPoint[3] = "0xFFFFFF"
;Var taobinTextColorPoint[4] = "0xFFFFFF"
;Var taobinTextColorPoint[5] = "0xFFFFFF"
;Var taobinTextColorPoint[6] = "0xFFFFFF"
;Var taobinTextColorPoint[7] = "0xFFFFFF"
;Var taobinTextColorPoint[8] = "0xFFFFFF"
Var PointCount = 0
DEBUGVAR PointState[0]
DEBUGVAR PointState[1]
DEBUGVAR PointState[2]
DEBUGVAR PointState[3]
DEBUGVAR PointState[4]
DEBUGVAR PointState[5]
DEBUGVAR PointState[6]
DEBUGVAR PointState[7]
DEBUGVAR PointState[8]
If PointState[0] = 1 Then
Var PointCount = PointCount + 1
Var taobinImgPoint[0] = "/point_active.png"
EndIf
If PointState[1] = 1 Then
Var PointCount = PointCount + 1
Var taobinImgPoint[1] = "/point_active.png"
EndIf
If PointState[2] = 1 Then
Var PointCount = PointCount + 1
Var taobinImgPoint[2] = "/point_active.png"
EndIf
If PointState[3] = 1 Then
Var PointCount = PointCount + 1
Var taobinImgPoint[3] = "/point_active.png"
EndIf
If PointState[4] = 1 Then
Var PointCount = PointCount + 1
Var taobinImgPoint[4] = "/point_active.png"
EndIf
If PointState[5] = 1 Then
Var PointCount = PointCount + 1
Var taobinImgPoint[5] = "/point_active.png"
EndIf
If PointState[6] = 1 Then
Var PointCount = PointCount + 1
Var taobinImgPoint[6] = "/point_active.png"
EndIf
If PointState[7] = 1 Then
Var PointCount = PointCount + 1
Var taobinImgPoint[7] = "/point_active.png"
EndIf
If PointState[8] = 1 Then
Var PointCount = PointCount + 1
Var taobinImgPoint[8] = "/point_active.png"
EndIf
If newPointIndex = "" Then
; Nothing
Else
If newPointIndex >= 0 Then
Var taobinImgPoint[newPointIndex] = "/point_active_new.png"
;Var taobinTextColorPoint[newPointIndex] = "0x2CDD69"
EndIf
EndIf
Var PointDiff = 9 - PointCount
If show_eng = "true" Then
Var TaobinLevelDesc1 = "You're just " + PointDiff
Var TaobinLevelDesc1 = TaobinLevelDesc1 + " menu item away from Ba(d)nana Valentine Series."
Var TaobinLevelDesc2 = "Collect all 9-heartbreaking menu items."
;Var MemberStatus_Y = 772
;Var MemberName_Y = 795
;Var MemeberPhone_Y = 845
;Var MemberPoint_Y = 920
Var subTitle_Y = 839
;Var TaobinLevelDesc1_X = 236
;Var TaobinLevelDesc1_Y = 990
;Var TaobinLevelDesc2_X = 236
;Var TaobinLevelDesc2_Y = 1020
Var text8_X = 224
Else
Var TaobinLevelDesc1 = "เหลืออีก " + PointDiff
Var TaobinLevelDesc1 = TaobinLevelDesc1 + " เมนูจะครบซีรีส์กล้วยชีช้ำ"
Var TaobinLevelDesc2 = "รีบสะสมให้ครบ 9 เมนูสุดช้ำตอนนี้เลย!"
;Var MemberStatus_Y = 772
;Var MemberName_Y = 795
;Var MemeberPhone_Y = 845
;Var MemberPoint_Y = 920
Var subTitle_Y = 853
;Var TaobinLevelDesc1_X = 236
;Var TaobinLevelDesc1_Y = 990
;Var TaobinLevelDesc2_X = 236
;Var TaobinLevelDesc2_Y = 1020
Var text8_X = 346
EndIf
If PointCount = 9 Then
Var showRandomBtnState = "Enable"
EndIf
Var CurrentPointSlot = newPointIndex + 1
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var ShowCountDownBrewing = CountDownBrewing
Var Timeout = Timeout + 1
If Timeout > 10 Then
Var CurrentPointCheck = "check"
Var val3 = "X"
AddData 37 TelephoneNumber CurrentPointSlot CurrentPointCheck val3
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventMachine>
If MachineStage = "drink-success" Then
Var MachineState_Result = 1
EndIf
If MachineStage = "drink-failed" Then
Var MachineState_Result = 2
EndIf
</EventMachine>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/display_point/alpha.png" </Filename>
</Image>
;
<Image>
<X> 158 </X>
<Y> 665 </Y>
<Filename> Var( DirImage + "/img_popup1.png" )</Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 665 </Y>
<Filename> Var( DirImage + "/img_popup3.png" )</Filename>
</Image>
<Image>
<X> 243 </X>
<Y> 731 </Y>
<Filename> Var( DirImage + "/text7.png" )</Filename>
</Image>
<Image>
<X> 243 </X>
<Y> subTitle_Y </Y>
<Filename> Var( DirImage + "/sub_title.png" )</Filename>
</Image>
<Image>
<X> 625 </X>
<Y> 732 </Y>
<Filename> Var( DirImage + "/ghost_broken_heart.png" )</Filename>
</Image>
;
<Image>
<X> 220 </X>
<Y> 1126 </Y>
<Filename> Var( DirImage + taobinImgPoint[0]) </Filename>
</Image>
<Image>
<X> 360 </X>
<Y> 1126 </Y>
<Filename> Var( DirImage + taobinImgPoint[1]) </Filename>
</Image>
<Image>
<X> 500 </X>
<Y> 1126 </Y>
<Filename> Var( DirImage + taobinImgPoint[2]) </Filename>
</Image>
<Image>
<X> 640 </X>
<Y> 1126 </Y>
<Filename> Var( DirImage + taobinImgPoint[3]) </Filename>
</Image>
<Image>
<X> 780 </X>
<Y> 1126 </Y>
<Filename> Var( DirImage + taobinImgPoint[4]) </Filename>
</Image>
<Image>
<X> 220 </X>
<Y> 1276 </Y>
<Filename> Var( DirImage + taobinImgPoint[5]) </Filename>
</Image>
<Image>
<X> 360 </X>
<Y> 1276 </Y>
<Filename> Var( DirImage + taobinImgPoint[6]) </Filename>
</Image>
<Image>
<X> 500 </X>
<Y> 1276 </Y>
<Filename> Var( DirImage + taobinImgPoint[7]) </Filename>
</Image>
<Image>
<X> 640 </X>
<Y> 1276 </Y>
<Filename> Var( DirImage + taobinImgPoint[8]) </Filename>
</Image>
<Button>
<X> 423 </X>
<Y> 1660 </Y>
<State> showRandomBtnState </State>
<Filename> Var( DirImage + "/bn_random.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_random.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
; goto lid straw
If SELLONLINE = 1 Then
Var CurrentPointCheck = ""
Else
Var CurrentPointCheck = "check"
EndIf
Var val3 = "X"
AddData 37 TelephoneNumber CurrentPointSlot CurrentPointCheck val3
Open "ROOT/taobin_project/xml/event/bad_valentine/page_bad_valentine_random.xml"
</EventClick>
</Button>
<Text>
<X> 243 </X>
<Y> 764 </Y>
<Size> 35 </Size>
<Width> 1000 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0x513C2F </Color>
<Value> TaobinName </Value>
</Text>
<Text>
<X> 243 </X>
<Y> 802 </Y>
<Size> 20 </Size>
<Width> 1000 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0x746253 </Color>
<Value> TNumberTaobinMemberXXX </Value>
<Format> Telnum-mask-1 </Format>
</Text>
; Header
<Text>
<X> 247 </X>
<Y> 911 </Y>
<Size> 48 </Size>
<Width> 120 </Width>
<Font> RobotoBold </Font>
<Color> 0xDE794E </Color>
<Value> PointCount </Value>
</Text>
<Text>
<X> 247 </X>
<Y> 967 </Y>
<Size> 25 </Size>
<Width> 1000 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0xDE794E </Color>
<Value> TaobinLevelDesc1 </Value>
</Text>
<Text>
<X> 247 </X>
<Y> 998 </Y>
<Size> 20 </Size>
<Width> 1000 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0x746253 </Color>
<Value> TaobinLevelDesc2 </Value>
</Text>
<Image>
<X> text8_X </X>
<Y> 1578 </Y>
<Filename> Var( DirImage + "/text8.png" )</Filename>
</Image>
;<Text>
;<X> 232 </X>
;<Y> 1240 </Y>
;<State> ThaiTextState </State>
;<Size> 12 </Size>
;<Width> 120 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> taobinTextColorPoint[0] </Color>
;<Value> taobinTextPointTH[0] </Value>
;</Text>
;
;<Text>
;<X> 243 </X>
;<Y> 1240 </Y>
;<State> EngTextState </State>
;<Size> 12 </Size>
;<Width> 100 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> taobinTextColorPoint[0] </Color>
;<Value> taobinTextPointEN[0] </Value>
;</Text>
;
;<Text>
;<X> 343 </X>
;<Y> 1240 </Y>
;<State> ThaiTextState </State>
;<Size> 12 </Size>
;<Width> 150 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> taobinTextColorPoint[1] </Color>
;<Value> taobinTextPointTH[1] </Value>
;</Text>
;
;<Text>
;<X> 388 </X>
;<Y> 1240 </Y>
;<State> EngTextState </State>
;<Size> 12 </Size>
;<Width> 100 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> taobinTextColorPoint[1] </Color>
;<Value> taobinTextPointEN[1] </Value>
;</Text>
;
;<Text>
;<X> 493 </X>
;<Y> 1240 </Y>
;<State> ThaiTextState </State>
;<Size> 12 </Size>
;<Width> 120 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> taobinTextColorPoint[2] </Color>
;<Value> taobinTextPointTH[2] </Value>
;</Text>
;
;<Text>
;<X> 497 </X>
;<Y> 1240 </Y>
;<State> EngTextState </State>
;<Size> 12 </Size>
;<Width> 150 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> taobinTextColorPoint[2] </Color>
;<Value> taobinTextPointEN[2] </Value>
;</Text>
;
;<Text>
;<X> 624 </X>
;<Y> 1240 </Y>
;<State> ThaiTextState </State>
;<Size> 12 </Size>
;<Width> 120 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> taobinTextColorPoint[3] </Color>
;<Value> taobinTextPointTH[3] </Value>
;</Text>
;
;<Text>
;<X> 645 </X>
;<Y> 1240 </Y>
;<State> EngTextState </State>
;<Size> 12 </Size>
;<Width> 100 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> taobinTextColorPoint[3] </Color>
;<Value> taobinTextPointEN[3] </Value>
;</Text>
;
;<Text>
;<X> 747 </X>
;<Y> 1240 </Y>
;<State> ThaiTextState </State>
;<Size> 12 </Size>
;<Width> 155 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> taobinTextColorPoint[4] </Color>
;<Value> taobinTextPointTH[4] </Value>
;</Text>
;
;<Text>
;<X> 782 </X>
;<Y> 1240 </Y>
;<State> EngTextState </State>
;<Size> 12 </Size>
;<Width> 100 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> taobinTextColorPoint[4] </Color>
;<Value> taobinTextPointEN[4] </Value>
;</Text>
;
;<Text>
;<X> 225 </X>
;<Y> 1388 </Y>
;<State> ThaiTextState </State>
;<Size> 12 </Size>
;<Width> 120 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> taobinTextColorPoint[5] </Color>
;<Value> taobinTextPointTH[5] </Value>
;</Text>
;
;<Text>
;<X> 230 </X>
;<Y> 1388 </Y>
;<State> EngTextState </State>
;<Size> 12 </Size>
;<Width> 200 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> taobinTextColorPoint[5] </Color>
;<Value> taobinTextPointEN[5] </Value>
;</Text>
;
;<Text>
;<X> 353 </X>
;<Y> 1388 </Y>
;<State> ThaiTextState </State>
;<Size> 12 </Size>
;<Width> 150 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> taobinTextColorPoint[6] </Color>
;<Value> taobinTextPointTH[6] </Value>
;</Text>
;
;<Text>
;<X> 366 </X>
;<Y> 1388 </Y>
;<State> EngTextState </State>
;<Size> 12 </Size>
;<Width> 100 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> taobinTextColorPoint[6] </Color>
;<Value> taobinTextPointEN[6] </Value>
;</Text>
;
;<Text>
;<X> 488 </X>
;<Y> 1388 </Y>
;<State> ThaiTextState </State>
;<Size> 12 </Size>
;<Width> 150 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> taobinTextColorPoint[7] </Color>
;<Value> taobinTextPointTH[7] </Value>
;</Text>
;
;<Text>
;<X> 506 </X>
;<Y> 1388 </Y>
;<State> EngTextState </State>
;<Size> 12 </Size>
;<Width> 100 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> taobinTextColorPoint[7] </Color>
;<Value> taobinTextPointEN[7] </Value>
;</Text>
;
;<Text>
;<X> 622 </X>
;<Y> 1388 </Y>
;<State> ThaiTextState </State>
;<Size> 12 </Size>
;<Width> 200 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> taobinTextColorPoint[8] </Color>
;<Value> taobinTextPointTH[8] </Value>
;</Text>
;
;<Text>
;<X> 616 </X>
;<Y> 1388 </Y>
;<State> EngTextState </State>
;<Size> 12 </Size>
;<Width> 200 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> taobinTextColorPoint[8] </Color>
;<Value> taobinTextPointEN[8] </Value>
;</Text>
;
<Image>
<X> 751 </X>
<Y> 413 </Y>
<Filename> IMG_CNT </Filename>
</Image>
;
<Text>
<X> XPosiShowCountDownBrew </X>
<Y> 470 </Y>
<Align> End </Align>
<Width> 153 </Width>
<Size> 88 </Size>
<Font> RobotoBold </Font>
<Color> 0x513C2F </Color>
<Value> ShowCountDownBrewing </Value>
</Text>
<EventUnitTest3>
Var PointState[0] = 1
Var PointState[1] = 1
Var PointState[2] = 1
Var PointState[3] = 1
Var PointState[4] = 1
Var PointState[5] = 1
Var PointState[6] = 1
Var PointState[7] = 1
Var PointState[8] = 1
Open "ROOT/taobin_project/xml/event/bad_valentine/page_collect_point_pro_bad_valentine_3.xml"
</EventUnitTest3>
<EventUnitTest4>
If show_eng = "true" Then
Var show_eng = "false"
Else
Var show_eng = "true"
EndIf
Open "ROOT/taobin_project/xml/event/bad_valentine/page_collect_point_pro_bad_valentine_3.xml"
</EventUnitTest4>
</Popup>

View file

@ -0,0 +1,273 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var Timeout = 0
SAVELOG show_eng
DEBUGVAR CollectPointError
If CollectPointError = "collect" Then
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/event/bad_valentine/error_en"
Var Title_X = 135
Var Title_Y = 623
Var Detail_X = 57
Var Detail_Y = 1356
Else
Var DirImage = "ROOT/taobin_project/image/event/bad_valentine/error"
Var Title_X = 250
Var Title_Y = 610
Var Detail_X = 252
Var Detail_Y = 1356
EndIf
Var ImgError = DirImage + "/img2.png"
Var ImgError_X = 230
Var ImgError_Y = 850
Var title_text_fail = DirImage + "/title_text_fail2.png"
Var text_fail = DirImage + "/text_fail2.png"
Var ConfirmBtn_X = 397
Var ConfirmBtn_Y = 1710
EndIf
If CollectPointError = "random" Then
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/event/bad_valentine/error_en"
Var Title_X = 240
Var Title_Y = 646
Var Detail_X = 140
Var Detail_Y = 1546
Else
Var DirImage = "ROOT/taobin_project/image/event/bad_valentine/error"
Var Title_X = 324
Var Title_Y = 630
Var Detail_X = 297
Var Detail_Y = 1541
EndIf
Var ImgError = DirImage + "/img.png"
Var ImgError_X = 287
Var ImgError_Y = 735
Var title_text_fail = DirImage + "/title_text_fail.png"
Var text_fail = DirImage + "/text_fail.png"
Var ConfirmBtn_X = 397
Var ConfirmBtn_Y = 1710
EndIf
Var newPointIndex = 0
; Point 1
If Seeker.selected_a_drink = "12-01-02-0061" Then
Var newPointIndex = 0
EndIf
If Seeker.selected_a_drink = "12-01-03-0061" Then
Var newPointIndex = 0
EndIf
If Seeker.selected_a_drink = "12-21-02-0061" Then
Var newPointIndex = 0
EndIf
If Seeker.selected_a_drink = "12-21-03-0061" Then
Var newPointIndex = 0
EndIf
; Point 2
If Seeker.selected_a_drink = "12-01-02-0062" Then
Var newPointIndex = 1
EndIf
If Seeker.selected_a_drink = "12-21-02-0062" Then
Var newPointIndex = 1
EndIf
; Point 3
If Seeker.selected_a_drink = "12-03-03-0044" Then
Var newPointIndex = 2
EndIf
; Point 4
If Seeker.selected_a_drink = "12-03-03-0045" Then
Var newPointIndex = 3
EndIf
; Point 5
If Seeker.selected_a_drink = "12-03-03-0029" Then
Var newPointIndex = 4
EndIf
; Point 6
If Seeker.selected_a_drink = "12-02-02-0053" Then
Var newPointIndex = 5
EndIf
; Point 7
If Seeker.selected_a_drink = "12-02-02-0054" Then
Var newPointIndex = 6
EndIf
; Point 8
If Seeker.selected_a_drink = "12-02-02-0055" Then
Var newPointIndex = 7
EndIf
; Point 9
If Seeker.selected_a_drink = "12-05-02-0078" Then
Var newPointIndex = 8
EndIf
DEBUGVAR ImgError
DEBUGVAR ImgError_X
DEBUGVAR ImgError_Y
Var CurrentPointSlot = newPointIndex + 1
Var CurrentPointCheck = "check"
Var val3 = "X"
AddData 37 TelephoneNumber CurrentPointSlot CurrentPointCheck val3
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var ShowCountDownBrewing = CountDownBrewing
Var Timeout = Timeout + 1
If Timeout > 5 Then
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<EventMachine>
If MachineStage = "drink-success" Then
Var MachineState_Result = 1
EndIf
If MachineStage = "drink-failed" Then
Var MachineState_Result = 2
EndIf
</EventMachine>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> Var( DirImage + "/bg.png" ) </Filename>
</Image>
<Image>
<X> Title_X </X>
<Y> Title_Y </Y>
<Filename> title_text_fail </Filename>
</Image>
<Image>
<X> ImgError_X </X>
<Y> ImgError_Y </Y>
<Filename> ImgError </Filename>
</Image>
<Image>
<X> Detail_X </X>
<Y> Detail_Y </Y>
<Filename> text_fail </Filename>
</Image>
<Button>
<X> ConfirmBtn_X </X>
<Y> ConfirmBtn_Y </Y>
<Filename> Var( DirImage + "/bn_confirm.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_confirm.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
; goto lid straw
If PromotionIDCurrentOrder > 1 Then
Open "ROOT/taobin_project/xml/page_display_Promo1Get1Free.xml"
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
</EventClick>
</Button>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
;
<Image>
<X> 751 </X>
<Y> 413 </Y>
<Filename> IMG_CNT </Filename>
</Image>
;
<Text>
<X> XPosiShowCountDownBrew </X>
<Y> 470 </Y>
<Align> End </Align>
<Width> 153 </Width>
<Size> 88 </Size>
<Font> RobotoBold </Font>
<Color> 0x513C2F </Color>
<Value> ShowCountDownBrewing </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventUnitTest1>
If show_eng = "true" Then
Var show_eng = "false"
Else
Var show_eng = "true"
EndIf
Open "ROOT/taobin_project/xml/event/bad_valentine/page_collect_point_pro_bad_valentine_error.xml"
</EventUnitTest1>
<EventUnitTest4>
If CollectPointError = "collect" then
Var CollectPointError = "random"
Else
Var CollectPointError = "collect"
EndIf
Open "ROOT/taobin_project/xml/event/bad_valentine/page_collect_point_pro_bad_valentine_error.xml"
</EventUnitTest4>
</Page>

View file

@ -1 +1 @@
/event/promotion_15THB.xml
/event/promotion_bad_valentine.xml

File diff suppressed because it is too large Load diff

View file

@ -1 +1 @@
Open "ROOT/taobin_project/xml/page_catalog_group_pro_15THB.xml"
Var BigButtonEnable = "Invisible"

View file

@ -2,8 +2,9 @@
<Button>
<X> 42 </X>
<Y> 520 </Y>
<State> BigButtonEnable </State>
<Filename>
<State> BigButtonEnable </State>
<Filename>
eval(
If show_eng = "true" Then
Var return = ###normal_eng
@ -15,26 +16,64 @@
<FilenamePress>
eval(
If show_eng = "true" Then
Var return = ###press_eng
Var return = ###normal_eng
Else
Var return = ###press_thai
Var return = ###normal_thai
EndIf
)
</FilenamePress>
<FilenameDisable>
eval(
If show_eng = "true" Then
Var return = ###disable_eng
Var return = ###normal_eng
Else
Var return = ###disable_thai
Var return = ###normal_thai
EndIf
)
</FilenameDisable>
<EventOnClick>
###EventOnClick
Open "ROOT/taobin_project/xml/page_catalog_group_pro_bad_valentine.xml"
</EventOnClick>
<Video>
<X> 42 </X>
<Y> 520 </Y>
<Width> 484 </Width>
<Height> 616 </Height>
<Loop> "true" </Loop>
<State>
eval(
If show_eng = "true" Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
)
</State>
<Filename> "ROOT/taobin_project/image/event/bad_valentine/bad_valentine_th.mp4" </Filename>
</Video>
<Video>
<X> 42 </X>
<Y> 520 </Y>
<Width> 484 </Width>
<Height> 616 </Height>
<State>
eval(
If show_eng = "true" Then
Var return = "Enable"
Else
Var return = "Invisible"
EndIf
)
</State>
<Loop> "true" </Loop>
<Filename> "ROOT/taobin_project/image/event/bad_valentine/bad_valentine_en.mp4" </Filename>
</Video>
</Button>
<EventUnitTest1>

View file

@ -16,15 +16,15 @@ Else
; zone promote
If OpenFromPageBoard = 1 Then
If ProPeachEnable = 1 Then
If ProBadValentineEnable = 1 Then
Var BigButtonEnable = "Enable"
OpenInst 2 "ROOT/taobin_project/xml/event/promotion_peach.xml"
OpenInst 2 "ROOT/taobin_project/xml/event/promotion_bad_valentine.xml"
Var OpenFromPageBoard = 0
Else
If RerunProEnable = 1 Then
If ProPeachEnable = 1 Then
Var BigButtonEnable = "Enable"
OpenInst 2 "ROOT/taobin_project/xml/event/promotion_rerun.xml"
OpenInst 2 "ROOT/taobin_project/xml/event/promotion_peach.xml"
Var OpenFromPageBoard = 0
Else
@ -33,17 +33,14 @@ Else
EndIf
EndIf
Else
If RerunProEnable = 1 Then
; Temporary debug
If ProBadValentineEnable = 1 Then
Var BigButtonEnable = "Enable"
Open "ROOT/taobin_project/xml/event/promotion_rerun.xml"
Open "ROOT/taobin_project/xml/event/promotion_bad_valentine.xml"
Else
If ProPeachEnable = 1 Then
Var BigButtonEnable = "Enable"
Open "ROOT/taobin_project/xml/event/promotion_peach.xml"
Else
Open "ROOT/taobin_project/xml/page_catalog_group_recommend.xml"
EndIf

View file

@ -60,8 +60,13 @@ Var FromRerunPro = 0
; Enable pro Peach, Feb 1 - 13
Var ProPeachEnable = 0
; Enable Bad valentine, Feb 14 - 29
Var ProBadValentineEnable = 0
Var NewCollectPoint = 1
Var NewFlowPaymentCode = 0
If SystemDateMonthInt = 10 Then
@ -114,16 +119,33 @@ If SystemDateMonthInt = 2 Then
EndIf
EndIf
If SystemDateDayInt >= 14 Then
Var ProBadValentineEnable = 1
EndIf
EndIf
If BoxID = 173149 Then
Var ProPeachEnable = 0
Var ProBadValentineEnable = 1
Var NewFlowPaymentCode = 1
EndIf
If BoxID = 200435 Then
Var ProPeachEnable = 1
Var NewFlowPaymentCode = 1
EndIf
If BoxID = 201316 Then
Var ProPeachEnable = 1
Var NewFlowPaymentCode = 1
EndIf
If BoxID = 105005 Then
Var ProPeachEnable = 1
Var ProBadValentineEnable = 1
Var NewFlowPaymentCode = 1
EndIf
If BoxID = 172644 Then
@ -131,6 +153,39 @@ If BoxID = 172644 Then
EndIf
; Exclusive Box
If BoxID = 174200 Then
Var ProPeachEnable = 0
Var ProBadValentineEnable = 1
EndIf
If BoxID = 175038 Then
Var ProPeachEnable = 0
Var ProBadValentineEnable = 1
EndIf
If BoxID = 174825 Then
Var ProPeachEnable = 0
Var ProBadValentineEnable = 1
EndIf
If BoxID = 200443 Then
Var ProPeachEnable = 0
Var ProBadValentineEnable = 1
EndIf
If BoxID = 173433 Then
Var ProPeachEnable = 0
Var ProBadValentineEnable = 1
EndIf
If BoxID = 200435 Then
Var ProPeachEnable = 0
Var ProBadValentineEnable = 1
EndIf
Var GameEnableFromTrickerEv = 1
@ -163,8 +218,21 @@ If InternationalEnable = 1 Then
Var PepweenEnable = 0
Var RerunProEnable = 0
Var ProPeachEnable = 0
Var ProBadValentineEnable = 0
EndIf
If BananaSyrupEnable = "true" Then
Else
Var ProBadValentineEnable = 0
EndIf
If PeachSyrupEnable = "true" Then
Else
Var ProPeachEnable = 0
EndIf

View file

@ -107,6 +107,12 @@
menu_white_color_catalog = True
else:
from_my_mint_promotion = False
if current_file_name == "page_catalog_group_pro_bad_valentine.skt":
from_bad_valentine = True
# menu_white_color_catalog = True
else:
from_bad_valentine = False
#print ("######################################################################################################")
idx_of_eng = 2
@ -386,6 +392,9 @@
if from_my_mint_promotion:
out_xml( '\t\tVar FromMyMintPro = 1 \r\n')
if from_bad_valentine:
out_xml( '\t\tVar FromBadValentinePro = 1 \r\n')
out_xml( '\t\t\r\n')
out_xml( '\t\t\r\n')
@ -904,6 +913,9 @@
if from_my_mint_promotion:
out_xml( '\t\tVar FromMyMintPro = 1 \r\n')
if from_bad_valentine:
out_xml( '\t\tVar FromBadValentinePro = 1 \r\n')
out_xml( '\t\t\r\n')
out_xml( '\t\t\r\n')
if "inter" in param:

View file

@ -14,7 +14,7 @@
<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
@ -23,33 +23,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -113,7 +118,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -6,4 +6,6 @@
Else
Var DirImage2 = "ROOT/taobin_project/image/drink_option/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
EndIf

View file

@ -158,6 +158,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -178,7 +180,7 @@
<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
@ -187,33 +189,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -277,7 +284,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -151,6 +151,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -170,7 +172,7 @@
<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
@ -179,33 +181,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -269,7 +276,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -159,6 +159,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -179,7 +181,7 @@
<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
@ -188,33 +190,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -278,7 +285,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -150,6 +150,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -170,7 +172,7 @@
<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
@ -179,33 +181,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -269,7 +276,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -149,6 +149,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -168,7 +170,7 @@
<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
@ -177,33 +179,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -267,7 +274,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -147,6 +147,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -166,7 +168,7 @@
<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
@ -175,33 +177,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -265,7 +272,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -150,6 +150,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -169,7 +171,7 @@
<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
@ -178,33 +180,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -268,7 +275,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -147,6 +147,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -166,7 +168,7 @@
<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
@ -175,33 +177,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -265,7 +272,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -169,6 +169,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -188,7 +190,7 @@
<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
@ -197,33 +199,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -287,7 +294,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -145,6 +145,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -164,7 +166,7 @@
<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
@ -173,33 +175,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -263,7 +270,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -147,6 +147,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -167,7 +169,7 @@
<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
@ -176,33 +178,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -266,7 +273,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -176,6 +176,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -195,7 +197,7 @@
<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
@ -204,33 +206,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -294,7 +301,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -149,6 +149,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -168,7 +170,7 @@
<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
@ -177,33 +179,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -267,7 +274,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -168,6 +168,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -187,7 +189,7 @@
<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
@ -196,33 +198,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -286,7 +293,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -147,6 +147,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -166,7 +168,7 @@
<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
@ -175,33 +177,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -265,7 +272,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -147,6 +147,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -166,7 +168,7 @@
<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
@ -175,33 +177,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -265,7 +272,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -150,6 +150,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -170,7 +172,7 @@
<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
@ -179,33 +181,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -269,7 +276,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
@ -554,7 +562,7 @@
Var block_index_override = 0
Var block_index_move = 0
</Script>
; menu_new_list 34
; menu_new_list 36
; ==================> Len = 12
; 12-02-01-0001 12-02-02-0001 12-02-03-0001
<Block>
@ -3382,6 +3390,520 @@ GINGER TEA" </Value>
<Value> text_unavailable </Value>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
; - - -
; ==================> Len = 12
; 12-02-01-0025 12-02-02-0025 12-02-03-0025
<Block>
<MarginLeft> 33 </MarginLeft>
<MarginTop> 22 </MarginTop>
<Width> 225 </Width>
<Height> 296 </Height>
<State> Flag( 12-02-01-0025.Button,12-02-02-0025.Button,12-02-03-0025.Button,$Sum120201002512020200251202030025) </State>
<Button>
<State> $Sum120201002512020200251202030025 </State>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_hot_taiwan_milk_tea.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_hot_taiwan_milk_tea.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_hot_taiwan_milk_tea.png" </FilenameDisable>
<OverlayImage> xmlpro( 12-02-01-0025, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var NameDrink = "TAIWANESE TEA"
Var NameDrinkTH = "ชานมไต้หวัน"
Var DrinkDescriptionTH = "ชาไต้หวัน และ นมอุ่น"
Var DrinkDescription = "Taiwanese Tea, Sugar, Milk"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_taiwan_milk_tea.png"
Var OpenFromXML = CurrentXMLFileName2
GetInstanceIDMenuTab OpenFromInstMenuTab
Var PriceD1 = $12-02-01-0025.Price
Var PriceD2 = $12-02-02-0025.Price
Var PriceD3 = $12-02-03-0025.Price
Var PD_CODE1 = "12-02-01-0025"
Var PD_CODE2 = "12-02-02-0025"
Var PD_CODE3 = "12-02-03-0025"
Var PD_STAGE_1 = $12-02-01-0025.Button
Var PD_STAGE_2 = $12-02-02-0025.Button
Var PD_STAGE_3 = $12-02-03-0025.Button
Var OverlayMenuFilter !assigned xmlpro( 12-02-01-0025, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_pic_%s_posi1.png")
DEBUGVAR OverlayMenuFilter
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "12-02-02-0025"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "12-02-01-0025"
Else
Topping "Load" "12-02-03-0025"
EndIf
EndIf
Var menu_name_eng_hot = $12-02-01-0025.NameE
Var menu_desc_eng_hot = $12-02-01-0025.descriptionE
Var menu_name_thai_hot = $12-02-01-0025.Name
Var menu_desc_thai_hot = $12-02-01-0025.description
Var menu_name_eng_cold = $12-02-02-0025.NameE
Var menu_desc_eng_cold = $12-02-02-0025.descriptionE
Var menu_name_thai_cold = $12-02-02-0025.Name
Var menu_desc_thai_cold = $12-02-02-0025.description
Var menu_name_eng_blender = $12-02-03-0025.NameE
Var menu_desc_eng_blender = $12-02-03-0025.descriptionE
Var menu_name_thai_blender = $12-02-03-0025.Name
Var menu_desc_thai_blender = $12-02-03-0025.description
DEBUGVAR PD_STAGE_1
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
TabMenuVisibleInst 99
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_topping_select5.xml"
</EventOnClick>
</Button>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 24 </Size>
<Width>220</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "ชานมไต้หวัน" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<State> showthaiText </State>
<Value> "ชาไต้หวัน และ นมอุ่น" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 22 </Size>
<Width>220</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showengText </State>
<Value> "TAIWANESE TEA" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<State> showengText </State>
<Value> "Taiwanese Tea, Sugar, Milk" </Value>
</Text>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "option_deactive.png" ) </Filename>
</Image>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<State> $12-02-01-0025.Button </State>
<Filename> Var( DirImage2 + "hot.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "hot_db.png" ) </FilenameDisable>
</Image>
<Text>
<X> 50 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-02-01-0025.Button </State>
<Value> StringFmt( $12-02-01-0025.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "cold.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "cold_db.png" ) </FilenameDisable>
<State> $12-02-02-0025.Button </State>
</Image>
<Text>
<X> 115 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-02-02-0025.Button </State>
<Value> StringFmt( $12-02-02-0025.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 146 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "blend.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "blend_db.png" ) </FilenameDisable>
<State> $12-02-03-0025.Button </State>
</Image>
<Text>
<X> 180 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitRegularTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-02-03-0025.Button </State>
<Value> StringFmt( $12-02-03-0025.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<State>
eval(
If ICE_PROCESS_STATUS = 2 Then
If $Sum120201002512020200251202030025 = "Disable" Then
Var ice_tab_process_show = "Disable"
Else
Var ice_tab_process_show = "Enable"
EndIf
Else
Var ice_tab_process_show = "Invisible"
EndIf
Var return = ice_tab_process_show
)
</State>
<Filename> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible.png" </Filename>
<FilenameDisable> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible_dis.png" </FilenameDisable>
</Image>
<Image>
<X> 49 </X>
<Y> 117 </Y>
<State>
eval(
If $Sum120201002512020200251202030025 = "Disable" Then
STRCONTAIN "ERR" $12-02-01-0025.TAG tag1_is_disable
STRCONTAIN "ERR" $12-02-02-0025.TAG tag2_is_disable
STRCONTAIN "ERR" $12-02-03-0025.TAG tag3_is_disable
Var return = "Invisible"
If tag1_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag2_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag3_is_disable = "true" Then
Var return = "Enable"
EndIf
Else
Var return = "Invisible"
EndIf
)
</State>
<Filename> "ROOT/taobin_project/image//img_menu_err2.png" </Filename>
</Image>
<Text>
<X> 84 </X>
<Y> 266 </Y>
<Size> 10 </Size>
<Font> OpunMediumTTF </Font>
<Color> 0xDE794E </Color>
<State> ice_tab_process_show </State>
<Value> ice_show_open </Value>
</Text>
<Text>
<X> 48 </X>
<Y> 116 </Y>
<Size> 32 </Size>
<Width>128</Width>
<Height>64</Height>
<Font> MITRegularTTF </Font>
<Color> 0x5A5A5A </Color>
<Mode> "disable-show" </Mode>
<State> $Sum120201002512020200251202030025 </State>
<Value> text_unavailable </Value>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
; - - -
; ==================> Len = 12
; 12-02-01-0003 12-02-02-0003 12-02-03-0003
<Block>
<MarginLeft> 33 </MarginLeft>
<MarginTop> 22 </MarginTop>
<Width> 225 </Width>
<Height> 296 </Height>
<State> Flag( 12-02-01-0003.Button,12-02-02-0003.Button,12-02-03-0003.Button,$Sum120201000312020200031202030003) </State>
<Button>
<State> $Sum120201000312020200031202030003 </State>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_hot_taiwan_milk_tea.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_hot_taiwan_milk_tea.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_hot_taiwan_milk_tea.png" </FilenameDisable>
<OverlayImage> xmlpro( 12-02-01-0003, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var NameDrink = "TAIWANESE TEA"
Var NameDrinkTH = "ชานมไต้หวัน"
Var DrinkDescriptionTH = "ชาไต้หวัน นม"
Var DrinkDescription = "Taiwan Tea, Milk, Sugar"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_taiwan_milk_tea.png"
Var OpenFromXML = CurrentXMLFileName2
GetInstanceIDMenuTab OpenFromInstMenuTab
Var PriceD1 = $12-02-01-0003.Price
Var PriceD2 = $12-02-02-0003.Price
Var PriceD3 = $12-02-03-0003.Price
Var PD_CODE1 = "12-02-01-0003"
Var PD_CODE2 = "12-02-02-0003"
Var PD_CODE3 = "12-02-03-0003"
Var PD_STAGE_1 = $12-02-01-0003.Button
Var PD_STAGE_2 = $12-02-02-0003.Button
Var PD_STAGE_3 = $12-02-03-0003.Button
Var OverlayMenuFilter !assigned xmlpro( 12-02-01-0003, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_pic_%s_posi1.png")
DEBUGVAR OverlayMenuFilter
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "12-02-02-0003"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "12-02-01-0003"
Else
Topping "Load" "12-02-03-0003"
EndIf
EndIf
Var menu_name_eng_hot = $12-02-01-0003.NameE
Var menu_desc_eng_hot = $12-02-01-0003.descriptionE
Var menu_name_thai_hot = $12-02-01-0003.Name
Var menu_desc_thai_hot = $12-02-01-0003.description
Var menu_name_eng_cold = $12-02-02-0003.NameE
Var menu_desc_eng_cold = $12-02-02-0003.descriptionE
Var menu_name_thai_cold = $12-02-02-0003.Name
Var menu_desc_thai_cold = $12-02-02-0003.description
Var menu_name_eng_blender = $12-02-03-0003.NameE
Var menu_desc_eng_blender = $12-02-03-0003.descriptionE
Var menu_name_thai_blender = $12-02-03-0003.Name
Var menu_desc_thai_blender = $12-02-03-0003.description
DEBUGVAR PD_STAGE_1
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
TabMenuVisibleInst 99
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_topping_select5.xml"
</EventOnClick>
</Button>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 24 </Size>
<Width>220</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "ชานมไต้หวัน" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<State> showthaiText </State>
<Value> "ชาไต้หวัน นม" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 22 </Size>
<Width>220</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showengText </State>
<Value> "TAIWANESE TEA" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<State> showengText </State>
<Value> "Taiwan Tea, Milk, Sugar" </Value>
</Text>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "option_deactive.png" ) </Filename>
</Image>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<State> $12-02-01-0003.Button </State>
<Filename> Var( DirImage2 + "hot.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "hot_db.png" ) </FilenameDisable>
</Image>
<Text>
<X> 50 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-02-01-0003.Button </State>
<Value> StringFmt( $12-02-01-0003.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "cold.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "cold_db.png" ) </FilenameDisable>
<State> $12-02-02-0003.Button </State>
</Image>
<Text>
<X> 115 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-02-02-0003.Button </State>
<Value> StringFmt( $12-02-02-0003.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 146 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "blend.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "blend_db.png" ) </FilenameDisable>
<State> $12-02-03-0003.Button </State>
</Image>
<Text>
<X> 180 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitRegularTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-02-03-0003.Button </State>
<Value> StringFmt( $12-02-03-0003.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<State>
eval(
If ICE_PROCESS_STATUS = 2 Then
If $Sum120201000312020200031202030003 = "Disable" Then
Var ice_tab_process_show = "Disable"
Else
Var ice_tab_process_show = "Enable"
EndIf
Else
Var ice_tab_process_show = "Invisible"
EndIf
Var return = ice_tab_process_show
)
</State>
<Filename> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible.png" </Filename>
<FilenameDisable> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible_dis.png" </FilenameDisable>
</Image>
<Image>
<X> 49 </X>
<Y> 117 </Y>
<State>
eval(
If $Sum120201000312020200031202030003 = "Disable" Then
STRCONTAIN "ERR" $12-02-01-0003.TAG tag1_is_disable
STRCONTAIN "ERR" $12-02-02-0003.TAG tag2_is_disable
STRCONTAIN "ERR" $12-02-03-0003.TAG tag3_is_disable
Var return = "Invisible"
If tag1_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag2_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag3_is_disable = "true" Then
Var return = "Enable"
EndIf
Else
Var return = "Invisible"
EndIf
)
</State>
<Filename> "ROOT/taobin_project/image//img_menu_err2.png" </Filename>
</Image>
<Text>
<X> 84 </X>
<Y> 266 </Y>
<Size> 10 </Size>
<Font> OpunMediumTTF </Font>
<Color> 0xDE794E </Color>
<State> ice_tab_process_show </State>
<Value> ice_show_open </Value>
</Text>
<Text>
<X> 48 </X>
<Y> 116 </Y>
<Size> 32 </Size>
<Width>128</Width>
<Height>64</Height>
<Font> MITRegularTTF </Font>
<Color> 0x5A5A5A </Color>
<Mode> "disable-show" </Mode>
<State> $Sum120201000312020200031202030003 </State>
<Value> text_unavailable </Value>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
; - - -
; ==================> Len = 17

View file

@ -155,6 +155,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -175,7 +177,7 @@
<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
@ -184,33 +186,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -274,7 +281,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -147,6 +147,8 @@
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
@ -166,7 +168,7 @@
<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
@ -175,33 +177,38 @@
EndIf
If RoutineSlientRefresh > 0 Then
If RoutineSlientRefresh = 2 Then
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
GetVisible inst_show
;DEBUGVAR inst_show
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
InstanceGetString SaveStringInst
;DEBUGVAR SaveStringInst
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
If inst_show = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
<EventUnitTest1>
SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
RefreshAll
</EventUnitTest1>
; under line
<Image>
@ -265,7 +272,8 @@
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR show_eng
DEBUGVAR SaveStringInst
RefreshAll
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

View file

@ -221,6 +221,9 @@
STRCONTAIN "1068" MaterialAvailable JasmineTeaEnable
STRCONTAIN "1210" MaterialAvailable MelonSyrupEnable
STRCONTAIN "1212" MaterialAvailable MintSyrupEnable
STRCONTAIN "1213" MaterialAvailable PeachSyrupEnable
STRCONTAIN "1211" MaterialAvailable BananaSyrupEnable
Var MenuKidEnable = "false"
@ -763,9 +766,6 @@
Var WebAppShow = "Invisible"
EnableLanguage "ENG"
;EnableLanguage "THAI"
;EnableLanguage "CHINA"
;EnableLanguage "JAPAN"
EnableLanguage "MALAY"
SetLanguage "MALAY"
LanguageControl "UpdateList" "-"
@ -1048,10 +1048,12 @@
Var ShowNetworkProblemText = ""
EndIf
</EventOpen>
<EventUnitTest1>
Var NoWaitMachineEnable = 1
Var XMLProfile = "AllPriceUp05"
Open CurrentXMLFileName0
</EventUnitTest1>
<EventUnitTest2>
@ -1080,17 +1082,13 @@
</EventUnitTest2>
<EventUnitTest3>
Var NoWaitMachineEnable = 0
Var XMLProfile = "AllPriceUp10"
Open CurrentXMLFileName0
</EventUnitTest3>
<EventUnitTest4>
STRCONTAIN "SugarBreak-y18IDCard" XMLProfile UnitTestProfile
If UnitTestProfile = "true" Then
Var XMLProfile = "standard"
Else
Var XMLProfile = "SugarBreak-y18IDCard"
EndIf
Var XMLProfile = "Discount50"
Open CurrentXMLFileName0
</EventUnitTest4>
<Timeout> 1000 </Timeout>
@ -1108,31 +1106,6 @@
If Discount50 = "true" Then
Var HalfPrice = "true"
If InvokeDiscountCMD = "" Then
__CMD "invoke-discount-50" "-" "-" "-"
Var InvokeDiscountCMD = "true"
Else
; DEBUGVAR InvokeDiscountCMD
EndIf
Else
Var HalfPrice = "false"
If InvokeDiscountCMD = "true" Then
__CMD "invoke-discount-disable" "-" "-" "-"
EndIf
; DEBUGVAR Discount50
EndIf
; DEBUGVAR EnableLiveness
; DEBUGVAR Only18
; DEBUGVAR NoSugarStepRight2
; DEBUGVAR HalfPrice
DEBUGVAR WebAppShow
If IgnoreNetCore = "true" Then
Else
@ -1291,7 +1264,7 @@
DEBUGVAR MachineStage
;DEBUGVAR MachineStage
;SAVELOG CountDownShowButton
;SAVELOG ShowButtonClickFull
@ -1316,13 +1289,7 @@
If CountDownPauseVideo = 1 Then
If InvokeDiscountCMD = "true" Then
If JXMLVersionInt > 451 Then
TapScreen 30 638
EndIf
EndIf
TapScreen 30 638
EndIf
If CountDownPauseVideo = 0 Then
@ -1375,13 +1342,27 @@
DEBUGVAR CountUpReloadAll
; Original value is 40
If CountUpReloadAll > 100 Then
Var NeedReboot = "false"
If EnableMultiInstance = "true" Then
Var StartUpExt = "-"
Var CountUpReloadAll = 0
If CountUpReloadAll > 300 Then
Var NeedReboot = "false"
Var StartUpExt = "-"
Var CountUpReloadAll = 0
ReloadAll
EndIf
Else
If CountUpReloadAll > 100 Then
Var NeedReboot = "false"
Var StartUpExt = "-"
Var CountUpReloadAll = 0
ReloadAll
EndIf
ReloadAll
EndIf
EndIf

View file

@ -223,6 +223,12 @@
EndIf
EndIf
If ProBadValentineEnable = 1 Then
If FromBadValentinePro = 1 Then
Var AddData = 0
EndIf
EndIf
If GetFreeFromError = 1 Then
;Var GetFreeFromError = 0
Var TelephoneNumberProblem = TelephoneNumberGOTFree
@ -499,10 +505,14 @@
Var LangString = "LANG: &#34TH&#34\r\n"
EndIf
Var BoxIDString !assigned SprintFmt("BOX_ID: &#34%s&#34\r\n", BoxID)
; reset
WRITE_FILE "/mnt/sdcard/taobingame_acc.yaml" ""
APPEND_FILE "/mnt/sdcard/taobingame_acc.yaml" ACCString
APPEND_FILE "/mnt/sdcard/taobingame_acc.yaml" LangString
APPEND_FILE "/mnt/sdcard/taobingame_acc.yaml" BoxIDString
;
Var Game01Enable = 1
@ -521,10 +531,14 @@
Var LangString = "LANG: &#34TH&#34\r\n"
EndIf
Var BoxIDString !assigned SprintFmt("BOX_ID: &#34%s&#34\r\n", BoxID)
; reset
WRITE_FILE "/mnt/sdcard/taobingame_acc.yaml" ""
APPEND_FILE "/mnt/sdcard/taobingame_acc.yaml" ACCString
APPEND_FILE "/mnt/sdcard/taobingame_acc.yaml" LangString
APPEND_FILE "/mnt/sdcard/taobingame_acc.yaml" BoxIDString
;
Var Game01Enable = 1

View file

@ -134,6 +134,12 @@
EndIf
EndIf
If ProBadValentineEnable = 1 Then
If FromBadValentinePro = 1 Then
Var AddData = 0
EndIf
EndIf
If LedLidBlink = "true" Then
Var LedLidBlink = "no"
LED LedDoorLid Blink 255 255 255 255

View file

@ -550,18 +550,18 @@
<State> Flag( 12-01-02-0061.Button,12-01-03-0061.Button,$Sum12010200611201030061) </State>
<Button>
<State> $Sum12010200611201030061 </State>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_hot_americano_peach.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_hot_americano_peach.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_hot_americano_peach.png" </FilenameDisable>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_iced_Mocha_Tokyobanana_smoothie.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_iced_Mocha_Tokyobanana_smoothie.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_iced_Mocha_Tokyobanana_smoothie.png" </FilenameDisable>
<OverlayImage> xmlpro( 12-01-03-0061, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var NameDrink = "Bad kid got smacked, good ones get ditched."
Var NameDrinkTH = "เป็นเด็กดื้อโดนตี เป็นเด็กดีโดนทิ้งตลอด"
Var NameDrink = "Bad kids smacked good ones ditched"
Var NameDrinkTH = "เป็นเด็กดื้อโดนตีเป็น เด็กดีโดนทิ้งตลอด"
Var DrinkDescriptionTH = "กาแฟ น้ำ นม โกโก้ และ น้ำเชื่อมกล้วย"
Var DrinkDescription = "Espresso, Banana Syrup, cocoa, Milk"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_americano_peach.png"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_Mocha_Tokyobanana_smoothie.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $-.Price
Var PriceD2 = $12-01-02-0061.Price
@ -616,6 +616,7 @@
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Var FromBadValentinePro = 1
Open "ROOT/taobin_project/xml/page_topping_select5.xml"
@ -631,7 +632,8 @@
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "เป็นเด็กดื้อโดนตี เป็นเด็กดีโดนทิ้งตลอด" </Value>
<Value> "เป็นเด็กดื้อโดนตีเป็น
เด็กดีโดนทิ้งตลอด" </Value>
</Text>
<Text>
<X> 16 </X>
@ -652,7 +654,8 @@
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showengText </State>
<Value> "Bad kid got smacked, good ones get ditched." </Value>
<Value> "Bad kids smacked
good ones ditched" </Value>
</Text>
<Text>
<X> 16 </X>
@ -791,7 +794,259 @@ cocoa, Milk" </Value>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
; - - -
; - 12-21-02-0061 12-21-03-0061
<Block>
<MarginLeft> 33 </MarginLeft>
<MarginTop> 22 </MarginTop>
<Width> 225 </Width>
<Height> 296 </Height>
<State> Flag( 12-21-02-0061.Button,12-21-03-0061.Button,$Sum12210200611221030061) </State>
<Button>
<State> $Sum12210200611221030061 </State>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_iced_Mocha_Tokyobanana_smoothie.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_iced_Mocha_Tokyobanana_smoothie.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_iced_Mocha_Tokyobanana_smoothie.png" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<OverlayImage> xmlpro( 12-21-03-0061, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<EventOnClick>
Var NameDrink = "Bad kids smacked good ones ditched"
Var NameDrinkTH = "เป็นเด็กดื้อโดนตีเป็น เด็กดีโดนทิ้งตลอด"
Var DrinkDescriptionTH = "กาแฟ น้ำ นม โกโก้ และ น้ำเชื่อมกล้วย"
Var DrinkDescription = "Espresso, Banana Syrup, cocoa, Milk"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_Mocha_Tokyobanana_smoothie.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $-.Price
Var PriceD2 = $12-21-02-0061.Price
Var PriceD3 = $12-21-03-0061.Price
Var PD_CODE1 = "##-##-##-####"
Var PD_CODE2 = "12-21-02-0061"
Var PD_CODE3 = "12-21-03-0061"
Var PD_STAGE_1 = "Disable2"
Var PD_STAGE_2 = $12-21-02-0061.Button
Var PD_STAGE_3 = $12-21-03-0061.Button
Var OverlayMenuFilter !assigned xmlpro( 12-21-03-0061, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_pic_%s_posi1.png")
DEBUGVAR OverlayMenuFilter
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "12-21-02-0061"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "-"
Else
Topping "Load" "12-21-03-0061"
EndIf
EndIf
Var menu_name_eng_hot = $##-##-##-####.NameE
Var menu_desc_eng_hot = $##-##-##-####.descriptionE
Var menu_name_thai_hot = $##-##-##-####.Name
Var menu_desc_thai_hot = $##-##-##-####.description
Var menu_name_eng_cold = $12-21-02-0061.NameE
Var menu_desc_eng_cold = $12-21-02-0061.descriptionE
Var menu_name_thai_cold = $12-21-02-0061.Name
Var menu_desc_thai_cold = $12-21-02-0061.description
Var menu_name_eng_blender = $12-21-03-0061.NameE
Var menu_desc_eng_blender = $12-21-03-0061.descriptionE
Var menu_name_thai_blender = $12-21-03-0061.Name
Var menu_desc_thai_blender = $12-21-03-0061.description
DEBUGVAR PD_STAGE_1
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Var FromBadValentinePro = 1
Open "ROOT/taobin_project/xml/page_topping_select5.xml"
</EventOnClick>
</Button>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 24 </Size>
<Width>220</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "เป็นเด็กดื้อโดนตีเป็น
เด็กดีโดนทิ้งตลอด" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<State> showthaiText </State>
<Value> "กาแฟ น้ำ นม โกโก้ และ น้ำเชื่อมกล้วย" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 22 </Size>
<Width>220</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showengText </State>
<Value> "Bad kids smacked
good ones ditched" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<State> showengText </State>
<Value> "Espresso, Banana Syrup,
cocoa, Milk" </Value>
</Text>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "option_deactive.png" ) </Filename>
</Image>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<State> "Invisible" </State>
<Filename> Var( DirImage2 + "hot.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "hot_db.png" ) </FilenameDisable>
</Image>
<Text>
<X> 50 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> "Invisible" </State>
<Value> StringFmt( $-.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "cold.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "cold_db.png" ) </FilenameDisable>
<State> $12-21-02-0061.Button </State>
</Image>
<Text>
<X> 115 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-21-02-0061.Button </State>
<Value> StringFmt( $12-21-02-0061.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 146 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "blend.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "blend_db.png" ) </FilenameDisable>
<State> $12-21-03-0061.Button </State>
</Image>
<Text>
<X> 183 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-21-03-0061.Button </State>
<Value> StringFmt( $12-21-03-0061.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<State>
eval(
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Invisible"
Else
Var ice_tab_process_show = "Invisible"
EndIf
Var return = ice_tab_process_show
)
</State>
<Filename> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible.png" </Filename>
<FilenameDisable> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible_dis.png" </FilenameDisable>
</Image>
<Image>
<X> 49 </X>
<Y> 117 </Y>
<State>
eval(
If $Sum12210200611221030061 = "Disable" Then
STRCONTAIN "ERR" $##-##-##-####.TAG tag1_is_disable
STRCONTAIN "ERR" $12-21-02-0061.TAG tag2_is_disable
STRCONTAIN "ERR" $12-21-03-0061.TAG tag3_is_disable
Var return = "Invisible"
If tag1_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag2_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag3_is_disable = "true" Then
Var return = "Enable"
EndIf
Else
Var return = "Invisible"
EndIf
)
</State>
<Filename> "ROOT/taobin_project/image//img_menu_err2.png" </Filename>
</Image>
<Text>
<X> 84 </X>
<Y> 266 </Y>
<Size> 10 </Size>
<Font> OpunMediumTTF </Font>
<Color> 0xDE794E </Color>
<State> ice_tab_process_show </State>
<Value> ice_show_open </Value>
</Text>
<Text>
<X> 48 </X>
<Y> 116 </Y>
<Size> 32 </Size>
<Width>128</Width>
<Height>64</Height>
<Font> MITRegularTTF </Font>
<Color> 0x5A5A5A </Color>
<Mode> "disable-show" </Mode>
<State> $Sum12210200611221030061 </State>
<Value> text_unavailable </Value>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
; ==================> Len = 12
; - 12-01-02-0062 -
<Block>
@ -802,18 +1057,18 @@ cocoa, Milk" </Value>
<State> Flag( 12-01-02-0062.Button,$Sum1201020062) </State>
<Button>
<State> $Sum1201020062 </State>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_hot_peach_latte.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_hot_peach_latte.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_hot_peach_latte.png" </FilenameDisable>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_iced_matcha_Latte_TokyoBanana.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_iced_matcha_Latte_TokyoBanana.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_iced_matcha_Latte_TokyoBanana.png" </FilenameDisable>
<OverlayImage> xmlpro( 12-01-02-0062, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var NameDrink = "Ghosted, sending a "night" means the convo's dead."
Var NameDrink = "Ghosted after night convo's dead"
Var NameDrinkTH = "ตัดบทบอกฝันดี = เขาไม่อยากคุย"
Var DrinkDescriptionTH = "กาแฟ น้ำ นม มัทฉะ และ น้ำเชื่อมกล้วย"
Var DrinkDescription = "Espresso, Banana Syrup, Matcha, Milk"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_peach_latte.png"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_matcha_Latte_TokyoBanana.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $-.Price
Var PriceD2 = $12-01-02-0062.Price
@ -868,6 +1123,7 @@ cocoa, Milk" </Value>
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Var FromBadValentinePro = 1
Open "ROOT/taobin_project/xml/page_topping_select5.xml"
@ -883,7 +1139,8 @@ cocoa, Milk" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "ตัดบทบอกฝันดี = เขาไม่อยากคุย" </Value>
<Value> "ตัดบทบอกฝันดี
= เขาไม่อยากคุย" </Value>
</Text>
<Text>
<X> 16 </X>
@ -904,7 +1161,8 @@ cocoa, Milk" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showengText </State>
<Value> "Ghosted, sending a "night" means the convo's dead." </Value>
<Value> "Ghosted after night
convo's dead" </Value>
</Text>
<Text>
<X> 16 </X>
@ -1043,7 +1301,259 @@ Matcha, Milk" </Value>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
; - - -
; - 12-21-02-0062 -
<Block>
<MarginLeft> 33 </MarginLeft>
<MarginTop> 22 </MarginTop>
<Width> 225 </Width>
<Height> 296 </Height>
<State> Flag( 12-21-02-0062.Button,$Sum1221020062) </State>
<Button>
<State> $Sum1221020062 </State>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_iced_matcha_Latte_TokyoBanana.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_iced_matcha_Latte_TokyoBanana.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_iced_matcha_Latte_TokyoBanana.png" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<OverlayImage> xmlpro( 12-21-02-0062, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<EventOnClick>
Var NameDrink = "Ghosted after night convo's dead"
Var NameDrinkTH = "ตัดบทบอกฝันดี = เขาไม่อยากคุย"
Var DrinkDescriptionTH = "กาแฟ น้ำ นม มัทฉะ และ น้ำเชื่อมกล้วย"
Var DrinkDescription = "Espresso, Banana Syrup, Matcha, Milk"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_matcha_Latte_TokyoBanana.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $-.Price
Var PriceD2 = $12-21-02-0062.Price
Var PriceD3 = $-.Price
Var PD_CODE1 = "##-##-##-####"
Var PD_CODE2 = "12-21-02-0062"
Var PD_CODE3 = "##-##-##-####"
Var PD_STAGE_1 = "Disable2"
Var PD_STAGE_2 = $12-21-02-0062.Button
Var PD_STAGE_3 = "Disable2"
Var OverlayMenuFilter !assigned xmlpro( 12-21-02-0062, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_pic_%s_posi1.png")
DEBUGVAR OverlayMenuFilter
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "12-21-02-0062"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "-"
Else
Topping "Load" "-"
EndIf
EndIf
Var menu_name_eng_hot = $##-##-##-####.NameE
Var menu_desc_eng_hot = $##-##-##-####.descriptionE
Var menu_name_thai_hot = $##-##-##-####.Name
Var menu_desc_thai_hot = $##-##-##-####.description
Var menu_name_eng_cold = $12-21-02-0062.NameE
Var menu_desc_eng_cold = $12-21-02-0062.descriptionE
Var menu_name_thai_cold = $12-21-02-0062.Name
Var menu_desc_thai_cold = $12-21-02-0062.description
Var menu_name_eng_blender = $##-##-##-####.NameE
Var menu_desc_eng_blender = $##-##-##-####.descriptionE
Var menu_name_thai_blender = $##-##-##-####.Name
Var menu_desc_thai_blender = $##-##-##-####.description
DEBUGVAR PD_STAGE_1
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Var FromBadValentinePro = 1
Open "ROOT/taobin_project/xml/page_topping_select5.xml"
</EventOnClick>
</Button>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 24 </Size>
<Width>220</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "ตัดบทบอกฝันดี
= เขาไม่อยากคุย" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<State> showthaiText </State>
<Value> "กาแฟ น้ำ นม มัทฉะ และ น้ำเชื่อมกล้วย" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 22 </Size>
<Width>220</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showengText </State>
<Value> "Ghosted after night
convo's dead" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<State> showengText </State>
<Value> "Espresso, Banana Syrup,
Matcha, Milk" </Value>
</Text>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "option_deactive.png" ) </Filename>
</Image>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<State> "Invisible" </State>
<Filename> Var( DirImage2 + "hot.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "hot_db.png" ) </FilenameDisable>
</Image>
<Text>
<X> 50 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> "Invisible" </State>
<Value> StringFmt( $-.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "cold.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "cold_db.png" ) </FilenameDisable>
<State> $12-21-02-0062.Button </State>
</Image>
<Text>
<X> 115 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-21-02-0062.Button </State>
<Value> StringFmt( $12-21-02-0062.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 146 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "blend.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "blend_db.png" ) </FilenameDisable>
<State> "Invisible" </State>
</Image>
<Text>
<X> 183 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> "Invisible" </State>
<Value> StringFmt( $-.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<State>
eval(
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Invisible"
Else
Var ice_tab_process_show = "Invisible"
EndIf
Var return = ice_tab_process_show
)
</State>
<Filename> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible.png" </Filename>
<FilenameDisable> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible_dis.png" </FilenameDisable>
</Image>
<Image>
<X> 49 </X>
<Y> 117 </Y>
<State>
eval(
If $Sum1221020062 = "Disable" Then
STRCONTAIN "ERR" $##-##-##-####.TAG tag1_is_disable
STRCONTAIN "ERR" $12-21-02-0062.TAG tag2_is_disable
STRCONTAIN "ERR" $##-##-##-####.TAG tag3_is_disable
Var return = "Invisible"
If tag1_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag2_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag3_is_disable = "true" Then
Var return = "Enable"
EndIf
Else
Var return = "Invisible"
EndIf
)
</State>
<Filename> "ROOT/taobin_project/image//img_menu_err2.png" </Filename>
</Image>
<Text>
<X> 84 </X>
<Y> 266 </Y>
<Size> 10 </Size>
<Font> OpunMediumTTF </Font>
<Color> 0xDE794E </Color>
<State> ice_tab_process_show </State>
<Value> ice_show_open </Value>
</Text>
<Text>
<X> 48 </X>
<Y> 116 </Y>
<Size> 32 </Size>
<Width>128</Width>
<Height>64</Height>
<Font> MITRegularTTF </Font>
<Color> 0x5A5A5A </Color>
<Mode> "disable-show" </Mode>
<State> $Sum1221020062 </State>
<Value> text_unavailable </Value>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
; ==================> Len = 12
; - - 12-03-03-0044
<Block>
@ -1054,18 +1564,18 @@ Matcha, Milk" </Value>
<State> Flag( 12-03-03-0044.Button,$Sum1203030044) </State>
<Button>
<State> $Sum1203030044 </State>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_hot_peach_tea.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_hot_peach_tea.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_hot_peach_tea.png" </FilenameDisable>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_Choco_straw_banana_smoothie.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_Choco_straw_banana_smoothie.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_Choco_straw_banana_smoothie.png" </FilenameDisable>
<OverlayImage> xmlpro( 12-03-03-0044, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var NameDrink = "He's the kindness fix, zero romance drama."
Var NameDrink = "Kindness fix, zero romance drama."
Var NameDrinkTH = "ที่ทำดีด้วยเขาไม่ได้มีใจ แต่เขามีเมตตา"
Var DrinkDescriptionTH = "น้ำเชื่อมกล้วย น้ำเชื่อมสตรอเบอร์รี่ นม และโกโก้"
Var DrinkDescription = "banana syrup, Strawberry syrup, Milk, cocoa"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_peach_tea.png"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_Choco_straw_banana_smoothie.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $-.Price
Var PriceD2 = $-.Price
@ -1120,6 +1630,7 @@ Matcha, Milk" </Value>
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Var FromBadValentinePro = 1
Open "ROOT/taobin_project/xml/page_topping_select5.xml"
@ -1135,7 +1646,8 @@ Matcha, Milk" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "ที่ทำดีด้วยเขาไม่ได้มีใจ แต่เขามีเมตตา" </Value>
<Value> "ที่ทำดีด้วยเขาไม่ได้มีใจ
แต่เขามีเมตตา" </Value>
</Text>
<Text>
<X> 16 </X>
@ -1156,7 +1668,8 @@ Matcha, Milk" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showengText </State>
<Value> "He's the kindness fix, zero romance drama." </Value>
<Value> "Kindness fix,
zero romance drama." </Value>
</Text>
<Text>
<X> 16 </X>
@ -1306,18 +1819,18 @@ Milk, cocoa" </Value>
<State> Flag( 12-03-03-0045.Button,$Sum1203030045) </State>
<Button>
<State> $Sum1203030045 </State>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_hot_peach_jasmine_tea.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_hot_peach_jasmine_tea.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_hot_peach_jasmine_tea.png" </FilenameDisable>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_iced_strawberry_Tokyobanana_smoothie.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_iced_strawberry_Tokyobanana_smoothie.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_iced_strawberry_Tokyobanana_smoothie.png" </FilenameDisable>
<OverlayImage> xmlpro( 12-03-03-0045, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var NameDrink = "Love's on mute, stuck in suspense."
Var NameDrinkTH = "ตกอยู่ในสถานะสแตนด์บาย"
Var NameDrink = "Love on mute, stuck in suspense."
Var NameDrinkTH = "ตกอยู่ในสถานะ สแตนด์บาย"
Var DrinkDescriptionTH = "น้ำเชื่อมกล้วย น้ำเชื่อมสตรอเบอร์รี่ และนม "
Var DrinkDescription = "banana syrup, Strawberry syrup, Milk"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_peach_jasmine_tea.png"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_strawberry_Tokyobanana_smoothie.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $-.Price
Var PriceD2 = $-.Price
@ -1372,6 +1885,7 @@ Milk, cocoa" </Value>
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Var FromBadValentinePro = 1
Open "ROOT/taobin_project/xml/page_topping_select5.xml"
@ -1387,7 +1901,8 @@ Milk, cocoa" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "ตกอยู่ในสถานะสแตนด์บาย" </Value>
<Value> "ตกอยู่ในสถานะ
สแตนด์บาย" </Value>
</Text>
<Text>
<X> 16 </X>
@ -1408,7 +1923,8 @@ Milk, cocoa" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showengText </State>
<Value> "Love's on mute, stuck in suspense." </Value>
<Value> "Love on mute,
stuck in suspense." </Value>
</Text>
<Text>
<X> 16 </X>
@ -1558,18 +2074,18 @@ Milk" </Value>
<State> Flag( 12-03-03-0029.Button,$Sum1203030029) </State>
<Button>
<State> $Sum1203030029 </State>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_peach_Milk.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_peach_Milk.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_peach_Milk.png" </FilenameDisable>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_BananaOreo_smoothie_bad_valentine.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_BananaOreo_smoothie_bad_valentine.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_BananaOreo_smoothie_bad_valentine.png" </FilenameDisable>
<OverlayImage> xmlpro( 12-03-03-0029, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var NameDrink = "Promised a chat, but poof, gone once you say "hey.""
Var NameDrinkTH = "บอกว่าคุยได้พอทักไปก็หาย"
Var NameDrink = "Promised a chat, but poof,gone after HEY."
Var NameDrinkTH = "บอกว่าคุยได้ พอทักไปก็หาย"
Var DrinkDescriptionTH = "น้ำเชื่อมกล้วย นม น้ำตาล Oreo"
Var DrinkDescription = "Banana Syrup, Milk, Sugar, Oreo"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_peach_Milk.png"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_BananaOreo_smoothie_bad_valentine.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $-.Price
Var PriceD2 = $-.Price
@ -1624,6 +2140,7 @@ Milk" </Value>
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Var FromBadValentinePro = 1
Open "ROOT/taobin_project/xml/page_topping_select5.xml"
@ -1639,7 +2156,8 @@ Milk" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "บอกว่าคุยได้พอทักไปก็หาย" </Value>
<Value> "บอกว่าคุยได้
พอทักไปก็หาย" </Value>
</Text>
<Text>
<X> 16 </X>
@ -1660,7 +2178,8 @@ Milk" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showengText </State>
<Value> "Promised a chat, but poof, gone once you say "hey."" </Value>
<Value> "Promised a chat, but
poof,gone after HEY." </Value>
</Text>
<Text>
<X> 16 </X>
@ -1810,18 +2329,18 @@ Sugar, Oreo" </Value>
<State> Flag( 12-02-02-0053.Button,$Sum1202020053) </State>
<Button>
<State> $Sum1202020053 </State>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_peach_Cocoa.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_peach_Cocoa.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_peach_Cocoa.png" </FilenameDisable>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_iced_Ginger_TokyoBanana.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_iced_Ginger_TokyoBanana.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_iced_Ginger_TokyoBanana.png" </FilenameDisable>
<OverlayImage> xmlpro( 12-02-02-0053, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var NameDrink = "Pops up when the rest bail on you."
Var NameDrinkTH = "เขาจะกลับมาก็ต่อเมื่อไม่เหลือใคร"
Var NameDrinkTH = "เขาจะกลับมาก็ต่อเมื่อ ไม่เหลือใคร"
Var DrinkDescriptionTH = "น้ำเชื่อมกล้วย ขิง และน้ำแข็ง"
Var DrinkDescription = "Banana Syrup, Ginger and Ice"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_peach_Cocoa.png"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_Ginger_TokyoBanana.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $-.Price
Var PriceD2 = $12-02-02-0053.Price
@ -1876,6 +2395,7 @@ Sugar, Oreo" </Value>
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Var FromBadValentinePro = 1
Open "ROOT/taobin_project/xml/page_topping_select5.xml"
@ -1891,7 +2411,8 @@ Sugar, Oreo" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "เขาจะกลับมาก็ต่อเมื่อไม่เหลือใคร" </Value>
<Value> "เขาจะกลับมาก็ต่อเมื่อ
ไม่เหลือใคร" </Value>
</Text>
<Text>
<X> 16 </X>
@ -1912,7 +2433,8 @@ Sugar, Oreo" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showengText </State>
<Value> "Pops up when the rest bail on you." </Value>
<Value> "Pops up when the
rest bail on you." </Value>
</Text>
<Text>
<X> 16 </X>
@ -2061,18 +2583,18 @@ Sugar, Oreo" </Value>
<State> Flag( 12-02-02-0054.Button,$Sum1202020054) </State>
<Button>
<State> $Sum1202020054 </State>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_peach_Oreo_smoothie.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_peach_Oreo_smoothie.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_peach_Oreo_smoothie.png" </FilenameDisable>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_iced_ThaiTea_TokyoBanana.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_iced_ThaiTea_TokyoBanana.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_iced_ThaiTea_TokyoBanana.png" </FilenameDisable>
<OverlayImage> xmlpro( 12-02-02-0054, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var NameDrink = "Love deep, broke hard, that's the real deal."
Var NameDrink = "Love deep, broke hardthe real deal."
Var NameDrinkTH = "รักหมดใจ เจ็บหมดตัวมีอยู่จริง"
Var DrinkDescriptionTH = "น้ำเชื่อมกล้วย ชาไทย นม และน้ำแข็ง"
Var DrinkDescription = "Banana Syrup, Thai tea, milk and Ice"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_peach_Oreo_smoothie.png"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_ThaiTea_TokyoBanana.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $-.Price
Var PriceD2 = $12-02-02-0054.Price
@ -2127,6 +2649,7 @@ Sugar, Oreo" </Value>
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Var FromBadValentinePro = 1
Open "ROOT/taobin_project/xml/page_topping_select5.xml"
@ -2142,7 +2665,8 @@ Sugar, Oreo" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "รักหมดใจ เจ็บหมดตัวมีอยู่จริง" </Value>
<Value> "รักหมดใจ
เจ็บหมดตัวมีอยู่จริง" </Value>
</Text>
<Text>
<X> 16 </X>
@ -2163,7 +2687,8 @@ Sugar, Oreo" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showengText </State>
<Value> "Love deep, broke hard, that's the real deal." </Value>
<Value> "Love deep, broke
hardthe real deal." </Value>
</Text>
<Text>
<X> 16 </X>
@ -2312,18 +2837,18 @@ Sugar, Oreo" </Value>
<State> Flag( 12-02-02-0055.Button,$Sum1202020055) </State>
<Button>
<State> $Sum1202020055 </State>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_iced_peach" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_iced_peach" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_iced_peach" </FilenameDisable>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_iced_matcha_TokyoBanana.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_iced_matcha_TokyoBanana.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_iced_matcha_TokyoBanana.png" </FilenameDisable>
<OverlayImage> xmlpro( 12-02-02-0055, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var NameDrink = "Forget love before winning, fine, we'll take the L."
Var NameDrink = "Forget love, take the L"
Var NameDrinkTH = "คนลืมก่อนชนะ โอเคเราแพ้"
Var DrinkDescriptionTH = "น้ำเชื่อมกล้วย มัทฉะ และน้ำแข็ง"
Var DrinkDescription = "Banana Syrup, Matcha and Ice"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_peach"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_matcha_TokyoBanana.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $-.Price
Var PriceD2 = $12-02-02-0055.Price
@ -2378,6 +2903,7 @@ Sugar, Oreo" </Value>
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Var FromBadValentinePro = 1
Open "ROOT/taobin_project/xml/page_topping_select5.xml"
@ -2393,7 +2919,8 @@ Sugar, Oreo" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "คนลืมก่อนชนะ โอเคเราแพ้" </Value>
<Value> "คนลืมก่อนชนะ
โอเคเราแพ้" </Value>
</Text>
<Text>
<X> 16 </X>
@ -2414,7 +2941,8 @@ Sugar, Oreo" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showengText </State>
<Value> "Forget love before winning, fine, we'll take the L." </Value>
<Value> "Forget love, take
the L" </Value>
</Text>
<Text>
<X> 16 </X>
@ -2563,18 +3091,18 @@ Sugar, Oreo" </Value>
<State> Flag( 12-05-02-0078.Button,$Sum1205020078) </State>
<Button>
<State> $Sum1205020078 </State>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_iced_peach_soda.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_iced_peach_soda.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_iced_peach_soda.png" </FilenameDisable>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_iced_energy_drink_Banana_soda.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_iced_energy_drink_Banana_soda.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_iced_energy_drink_Banana_soda.png" </FilenameDisable>
<OverlayImage> xmlpro( 12-05-02-0078, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var NameDrink = "Chatting's our sport, gold in the "No Reply" event."
Var NameDrinkTH = "ถ้าแชทหนักขวาเป็นกีฬา เราคงได้เหรียญทองไปแล้ว"
Var NameDrink = "Chat's our sport, gold in NO REPLY"
Var NameDrinkTH = "แชมป์โอลิมปิก สาขาชวนคุย"
Var DrinkDescriptionTH = "น้ำเชื่อมกล้วย เต่าทรงพลัง (มีคาเฟอีน) "
Var DrinkDescription = "Banana Syrup, Medicine drink, Soda and Ice"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_peach_soda.png"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_energy_drink_Banana_soda.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $-.Price
Var PriceD2 = $12-05-02-0078.Price
@ -2629,6 +3157,7 @@ Sugar, Oreo" </Value>
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Var FromBadValentinePro = 1
Open "ROOT/taobin_project/xml/page_topping_select5.xml"
@ -2644,7 +3173,8 @@ Sugar, Oreo" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "ถ้าแชทหนักขวาเป็นกีฬา เราคงได้เหรียญทองไปแล้ว" </Value>
<Value> "แชมป์โอลิมปิก
สาขาชวนคุย" </Value>
</Text>
<Text>
<X> 16 </X>
@ -2666,7 +3196,8 @@ Sugar, Oreo" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showengText </State>
<Value> "Chatting's our sport, gold in the "No Reply" event." </Value>
<Value> "Chat's our sport,
gold in NO REPLY" </Value>
</Text>
<Text>
<X> 16 </X>

View file

@ -795,7 +795,260 @@ Sugar, Water" </Value>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
; - - -
; 12-21-01-0059 12-21-02-0059 -
<Block>
<MarginLeft> 33 </MarginLeft>
<MarginTop> 22 </MarginTop>
<Width> 225 </Width>
<Height> 296 </Height>
<State> Flag( 12-21-01-0059.Button,12-21-02-0059.Button,$Sum12210100591221020059) </State>
<Button>
<State> $Sum12210100591221020059 </State>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_hot_americano_peach.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_hot_americano_peach.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_hot_americano_peach.png" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<OverlayImage> xmlpro( 12-21-01-0059, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<EventOnClick>
Var NameDrink = "PEACH Tell me love"
Var NameDrinkTH = "พีชเทลมีเลิฟ"
Var DrinkDescriptionTH = "กาแฟ น้ำ และ น้ำเชื่อมพีช"
Var DrinkDescription = "Espresso, Peach Syrup, Sugar, Water"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_americano_peach.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $12-21-01-0059.Price
Var PriceD2 = $12-21-02-0059.Price
Var PriceD3 = $-.Price
Var PD_CODE1 = "12-21-01-0059"
Var PD_CODE2 = "12-21-02-0059"
Var PD_CODE3 = "##-##-##-####"
Var PD_STAGE_1 = $12-21-01-0059.Button
Var PD_STAGE_2 = $12-21-02-0059.Button
Var PD_STAGE_3 = "Disable2"
Var OverlayMenuFilter !assigned xmlpro( 12-21-01-0059, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_pic_%s_posi1.png")
DEBUGVAR OverlayMenuFilter
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "12-21-02-0059"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "12-21-01-0059"
Else
Topping "Load" "-"
EndIf
EndIf
Var menu_name_eng_hot = $12-21-01-0059.NameE
Var menu_desc_eng_hot = $12-21-01-0059.descriptionE
Var menu_name_thai_hot = $12-21-01-0059.Name
Var menu_desc_thai_hot = $12-21-01-0059.description
Var menu_name_eng_cold = $12-21-02-0059.NameE
Var menu_desc_eng_cold = $12-21-02-0059.descriptionE
Var menu_name_thai_cold = $12-21-02-0059.Name
Var menu_desc_thai_cold = $12-21-02-0059.description
Var menu_name_eng_blender = $##-##-##-####.NameE
Var menu_desc_eng_blender = $##-##-##-####.descriptionE
Var menu_name_thai_blender = $##-##-##-####.Name
Var menu_desc_thai_blender = $##-##-##-####.description
DEBUGVAR PD_STAGE_1
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Open "ROOT/taobin_project/xml/page_topping_select5.xml"
</EventOnClick>
</Button>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 24 </Size>
<Width>220</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "พีชเทลมีเลิฟ" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<State> showthaiText </State>
<Value> "กาแฟ น้ำ และ น้ำเชื่อมพีช" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 22 </Size>
<Width>220</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showengText </State>
<Value> "PEACH Tell me love" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<State> showengText </State>
<Value> "Espresso, Peach Syrup,
Sugar, Water" </Value>
</Text>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "option_deactive.png" ) </Filename>
</Image>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<State> $12-21-01-0059.Button </State>
<Filename> Var( DirImage2 + "hot.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "hot_db.png" ) </FilenameDisable>
</Image>
<Text>
<X> 50 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-21-01-0059.Button </State>
<Value> StringFmt( $12-21-01-0059.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "cold.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "cold_db.png" ) </FilenameDisable>
<State> $12-21-02-0059.Button </State>
</Image>
<Text>
<X> 115 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-21-02-0059.Button </State>
<Value> StringFmt( $12-21-02-0059.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 146 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "blend.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "blend_db.png" ) </FilenameDisable>
<State> "Invisible" </State>
</Image>
<Text>
<X> 183 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> "Invisible" </State>
<Value> StringFmt( $-.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<State>
eval(
If ICE_PROCESS_STATUS = 2 Then
If $Sum12210100591221020059 = "Disable" Then
Var ice_tab_process_show = "Disable"
Else
Var ice_tab_process_show = "Enable"
EndIf
Else
Var ice_tab_process_show = "Invisible"
EndIf
Var return = ice_tab_process_show
)
</State>
<Filename> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible.png" </Filename>
<FilenameDisable> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible_dis.png" </FilenameDisable>
</Image>
<Image>
<X> 49 </X>
<Y> 117 </Y>
<State>
eval(
If $Sum12210100591221020059 = "Disable" Then
STRCONTAIN "ERR" $12-21-01-0059.TAG tag1_is_disable
STRCONTAIN "ERR" $12-21-02-0059.TAG tag2_is_disable
STRCONTAIN "ERR" $##-##-##-####.TAG tag3_is_disable
Var return = "Invisible"
If tag1_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag2_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag3_is_disable = "true" Then
Var return = "Enable"
EndIf
Else
Var return = "Invisible"
EndIf
)
</State>
<Filename> "ROOT/taobin_project/image//img_menu_err2.png" </Filename>
</Image>
<Text>
<X> 84 </X>
<Y> 266 </Y>
<Size> 10 </Size>
<Font> OpunMediumTTF </Font>
<Color> 0xDE794E </Color>
<State> ice_tab_process_show </State>
<Value> ice_show_open </Value>
</Text>
<Text>
<X> 48 </X>
<Y> 116 </Y>
<Size> 32 </Size>
<Width>128</Width>
<Height>64</Height>
<Font> MITRegularTTF </Font>
<Color> 0x5A5A5A </Color>
<Mode> "disable-show" </Mode>
<State> $Sum12210100591221020059 </State>
<Value> text_unavailable </Value>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
; ==================> Len = 12
; 12-01-01-0060 12-01-02-0060 12-01-03-0060
<Block>
@ -1052,7 +1305,261 @@ Sugar, Milk" </Value>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
; - - -
; 12-21-01-0060 12-21-02-0060 12-21-03-0060
<Block>
<MarginLeft> 33 </MarginLeft>
<MarginTop> 22 </MarginTop>
<Width> 225 </Width>
<Height> 296 </Height>
<State> Flag( 12-21-01-0060.Button,12-21-02-0060.Button,12-21-03-0060.Button,$Sum122101006012210200601221030060) </State>
<Button>
<State> $Sum122101006012210200601221030060 </State>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_hot_peach_latte.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_hot_peach_latte.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_hot_peach_latte.png" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<OverlayImage> xmlpro( 12-21-01-0060, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<EventOnClick>
Var NameDrink = "PEACH be my last love"
Var NameDrinkTH = "พีชบีมายด์ลาสท์เลิฟ"
Var DrinkDescriptionTH = "กาแฟ น้ำ นม และ น้ำเชื่อมพีช"
Var DrinkDescription = "Espresso, Peach Syrup, Sugar, Milk"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_peach_latte.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $12-21-01-0060.Price
Var PriceD2 = $12-21-02-0060.Price
Var PriceD3 = $12-21-03-0060.Price
Var PD_CODE1 = "12-21-01-0060"
Var PD_CODE2 = "12-21-02-0060"
Var PD_CODE3 = "12-21-03-0060"
Var PD_STAGE_1 = $12-21-01-0060.Button
Var PD_STAGE_2 = $12-21-02-0060.Button
Var PD_STAGE_3 = $12-21-03-0060.Button
Var OverlayMenuFilter !assigned xmlpro( 12-21-01-0060, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_pic_%s_posi1.png")
DEBUGVAR OverlayMenuFilter
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "12-21-02-0060"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "12-21-01-0060"
Else
Topping "Load" "12-21-03-0060"
EndIf
EndIf
Var menu_name_eng_hot = $12-21-01-0060.NameE
Var menu_desc_eng_hot = $12-21-01-0060.descriptionE
Var menu_name_thai_hot = $12-21-01-0060.Name
Var menu_desc_thai_hot = $12-21-01-0060.description
Var menu_name_eng_cold = $12-21-02-0060.NameE
Var menu_desc_eng_cold = $12-21-02-0060.descriptionE
Var menu_name_thai_cold = $12-21-02-0060.Name
Var menu_desc_thai_cold = $12-21-02-0060.description
Var menu_name_eng_blender = $12-21-03-0060.NameE
Var menu_desc_eng_blender = $12-21-03-0060.descriptionE
Var menu_name_thai_blender = $12-21-03-0060.Name
Var menu_desc_thai_blender = $12-21-03-0060.description
DEBUGVAR PD_STAGE_1
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Open "ROOT/taobin_project/xml/page_topping_select5.xml"
</EventOnClick>
</Button>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 24 </Size>
<Width>220</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "พีชบีมายด์ลาสท์เลิฟ" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<State> showthaiText </State>
<Value> "กาแฟ น้ำ นม และ น้ำเชื่อมพีช" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 22 </Size>
<Width>220</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showengText </State>
<Value> "PEACH be
my last love" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<State> showengText </State>
<Value> "Espresso, Peach Syrup,
Sugar, Milk" </Value>
</Text>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "option_deactive.png" ) </Filename>
</Image>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<State> $12-21-01-0060.Button </State>
<Filename> Var( DirImage2 + "hot.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "hot_db.png" ) </FilenameDisable>
</Image>
<Text>
<X> 50 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-21-01-0060.Button </State>
<Value> StringFmt( $12-21-01-0060.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "cold.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "cold_db.png" ) </FilenameDisable>
<State> $12-21-02-0060.Button </State>
</Image>
<Text>
<X> 115 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-21-02-0060.Button </State>
<Value> StringFmt( $12-21-02-0060.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 146 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "blend.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "blend_db.png" ) </FilenameDisable>
<State> $12-21-03-0060.Button </State>
</Image>
<Text>
<X> 183 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-21-03-0060.Button </State>
<Value> StringFmt( $12-21-03-0060.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<State>
eval(
If ICE_PROCESS_STATUS = 2 Then
If $Sum122101006012210200601221030060 = "Disable" Then
Var ice_tab_process_show = "Disable"
Else
Var ice_tab_process_show = "Enable"
EndIf
Else
Var ice_tab_process_show = "Invisible"
EndIf
Var return = ice_tab_process_show
)
</State>
<Filename> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible.png" </Filename>
<FilenameDisable> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible_dis.png" </FilenameDisable>
</Image>
<Image>
<X> 49 </X>
<Y> 117 </Y>
<State>
eval(
If $Sum122101006012210200601221030060 = "Disable" Then
STRCONTAIN "ERR" $12-21-01-0060.TAG tag1_is_disable
STRCONTAIN "ERR" $12-21-02-0060.TAG tag2_is_disable
STRCONTAIN "ERR" $12-21-03-0060.TAG tag3_is_disable
Var return = "Invisible"
If tag1_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag2_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag3_is_disable = "true" Then
Var return = "Enable"
EndIf
Else
Var return = "Invisible"
EndIf
)
</State>
<Filename> "ROOT/taobin_project/image//img_menu_err2.png" </Filename>
</Image>
<Text>
<X> 84 </X>
<Y> 266 </Y>
<Size> 10 </Size>
<Font> OpunMediumTTF </Font>
<Color> 0xDE794E </Color>
<State> ice_tab_process_show </State>
<Value> ice_show_open </Value>
</Text>
<Text>
<X> 48 </X>
<Y> 116 </Y>
<Size> 32 </Size>
<Width>128</Width>
<Height>64</Height>
<Font> MITRegularTTF </Font>
<Color> 0x5A5A5A </Color>
<Mode> "disable-show" </Mode>
<State> $Sum122101006012210200601221030060 </State>
<Value> text_unavailable </Value>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
; ==================> Len = 12
; 12-02-01-0051 12-02-02-0051 12-02-03-0051
<Block>

View file

@ -546,7 +546,7 @@
Var block_index_override = 0
Var block_index_move = 0
</Script>
; menu_new_list 34
; menu_new_list 36
; ==================> Len = 12
; 12-02-01-0001 12-02-02-0001 12-02-03-0001
<Block>
@ -3352,6 +3352,516 @@ GINGER TEA" </Value>
<Value> text_unavailable </Value>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
; - - -
; ==================> Len = 12
; 12-02-01-0025 12-02-02-0025 12-02-03-0025
<Block>
<MarginLeft> 33 </MarginLeft>
<MarginTop> 22 </MarginTop>
<Width> 225 </Width>
<Height> 296 </Height>
<State> Flag( 12-02-01-0025.Button,12-02-02-0025.Button,12-02-03-0025.Button,$Sum120201002512020200251202030025) </State>
<Button>
<State> $Sum120201002512020200251202030025 </State>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_hot_taiwan_milk_tea.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_hot_taiwan_milk_tea.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_hot_taiwan_milk_tea.png" </FilenameDisable>
<OverlayImage> xmlpro( 12-02-01-0025, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var NameDrink = "TAIWANESE TEA"
Var NameDrinkTH = "ชานมไต้หวัน"
Var DrinkDescriptionTH = "ชาไต้หวัน และ นมอุ่น"
Var DrinkDescription = "Taiwanese Tea, Sugar, Milk"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_taiwan_milk_tea.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $12-02-01-0025.Price
Var PriceD2 = $12-02-02-0025.Price
Var PriceD3 = $12-02-03-0025.Price
Var PD_CODE1 = "12-02-01-0025"
Var PD_CODE2 = "12-02-02-0025"
Var PD_CODE3 = "12-02-03-0025"
Var PD_STAGE_1 = $12-02-01-0025.Button
Var PD_STAGE_2 = $12-02-02-0025.Button
Var PD_STAGE_3 = $12-02-03-0025.Button
Var OverlayMenuFilter !assigned xmlpro( 12-02-01-0025, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_pic_%s_posi1.png")
DEBUGVAR OverlayMenuFilter
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "12-02-02-0025"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "12-02-01-0025"
Else
Topping "Load" "12-02-03-0025"
EndIf
EndIf
Var menu_name_eng_hot = $12-02-01-0025.NameE
Var menu_desc_eng_hot = $12-02-01-0025.descriptionE
Var menu_name_thai_hot = $12-02-01-0025.Name
Var menu_desc_thai_hot = $12-02-01-0025.description
Var menu_name_eng_cold = $12-02-02-0025.NameE
Var menu_desc_eng_cold = $12-02-02-0025.descriptionE
Var menu_name_thai_cold = $12-02-02-0025.Name
Var menu_desc_thai_cold = $12-02-02-0025.description
Var menu_name_eng_blender = $12-02-03-0025.NameE
Var menu_desc_eng_blender = $12-02-03-0025.descriptionE
Var menu_name_thai_blender = $12-02-03-0025.Name
Var menu_desc_thai_blender = $12-02-03-0025.description
DEBUGVAR PD_STAGE_1
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Open "ROOT/taobin_project/xml/page_topping_select5.xml"
</EventOnClick>
</Button>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 24 </Size>
<Width>220</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "ชานมไต้หวัน" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<State> showthaiText </State>
<Value> "ชาไต้หวัน และ นมอุ่น" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 22 </Size>
<Width>220</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showengText </State>
<Value> "TAIWANESE TEA" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<State> showengText </State>
<Value> "Taiwanese Tea, Sugar, Milk" </Value>
</Text>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "option_deactive.png" ) </Filename>
</Image>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<State> $12-02-01-0025.Button </State>
<Filename> Var( DirImage2 + "hot.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "hot_db.png" ) </FilenameDisable>
</Image>
<Text>
<X> 50 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-02-01-0025.Button </State>
<Value> StringFmt( $12-02-01-0025.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "cold.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "cold_db.png" ) </FilenameDisable>
<State> $12-02-02-0025.Button </State>
</Image>
<Text>
<X> 115 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-02-02-0025.Button </State>
<Value> StringFmt( $12-02-02-0025.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 146 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "blend.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "blend_db.png" ) </FilenameDisable>
<State> $12-02-03-0025.Button </State>
</Image>
<Text>
<X> 180 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitRegularTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-02-03-0025.Button </State>
<Value> StringFmt( $12-02-03-0025.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<State>
eval(
If ICE_PROCESS_STATUS = 2 Then
If $Sum120201002512020200251202030025 = "Disable" Then
Var ice_tab_process_show = "Disable"
Else
Var ice_tab_process_show = "Enable"
EndIf
Else
Var ice_tab_process_show = "Invisible"
EndIf
Var return = ice_tab_process_show
)
</State>
<Filename> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible.png" </Filename>
<FilenameDisable> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible_dis.png" </FilenameDisable>
</Image>
<Image>
<X> 49 </X>
<Y> 117 </Y>
<State>
eval(
If $Sum120201002512020200251202030025 = "Disable" Then
STRCONTAIN "ERR" $12-02-01-0025.TAG tag1_is_disable
STRCONTAIN "ERR" $12-02-02-0025.TAG tag2_is_disable
STRCONTAIN "ERR" $12-02-03-0025.TAG tag3_is_disable
Var return = "Invisible"
If tag1_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag2_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag3_is_disable = "true" Then
Var return = "Enable"
EndIf
Else
Var return = "Invisible"
EndIf
)
</State>
<Filename> "ROOT/taobin_project/image//img_menu_err2.png" </Filename>
</Image>
<Text>
<X> 84 </X>
<Y> 266 </Y>
<Size> 10 </Size>
<Font> OpunMediumTTF </Font>
<Color> 0xDE794E </Color>
<State> ice_tab_process_show </State>
<Value> ice_show_open </Value>
</Text>
<Text>
<X> 48 </X>
<Y> 116 </Y>
<Size> 32 </Size>
<Width>128</Width>
<Height>64</Height>
<Font> MITRegularTTF </Font>
<Color> 0x5A5A5A </Color>
<Mode> "disable-show" </Mode>
<State> $Sum120201002512020200251202030025 </State>
<Value> text_unavailable </Value>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
; - - -
; ==================> Len = 12
; 12-02-01-0003 12-02-02-0003 12-02-03-0003
<Block>
<MarginLeft> 33 </MarginLeft>
<MarginTop> 22 </MarginTop>
<Width> 225 </Width>
<Height> 296 </Height>
<State> Flag( 12-02-01-0003.Button,12-02-02-0003.Button,12-02-03-0003.Button,$Sum120201000312020200031202030003) </State>
<Button>
<State> $Sum120201000312020200031202030003 </State>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_hot_taiwan_milk_tea.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_hot_taiwan_milk_tea.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_hot_taiwan_milk_tea.png" </FilenameDisable>
<OverlayImage> xmlpro( 12-02-01-0003, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var NameDrink = "TAIWANESE TEA"
Var NameDrinkTH = "ชานมไต้หวัน"
Var DrinkDescriptionTH = "ชาไต้หวัน นม"
Var DrinkDescription = "Taiwan Tea, Milk, Sugar"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_taiwan_milk_tea.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $12-02-01-0003.Price
Var PriceD2 = $12-02-02-0003.Price
Var PriceD3 = $12-02-03-0003.Price
Var PD_CODE1 = "12-02-01-0003"
Var PD_CODE2 = "12-02-02-0003"
Var PD_CODE3 = "12-02-03-0003"
Var PD_STAGE_1 = $12-02-01-0003.Button
Var PD_STAGE_2 = $12-02-02-0003.Button
Var PD_STAGE_3 = $12-02-03-0003.Button
Var OverlayMenuFilter !assigned xmlpro( 12-02-01-0003, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_pic_%s_posi1.png")
DEBUGVAR OverlayMenuFilter
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "12-02-02-0003"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "12-02-01-0003"
Else
Topping "Load" "12-02-03-0003"
EndIf
EndIf
Var menu_name_eng_hot = $12-02-01-0003.NameE
Var menu_desc_eng_hot = $12-02-01-0003.descriptionE
Var menu_name_thai_hot = $12-02-01-0003.Name
Var menu_desc_thai_hot = $12-02-01-0003.description
Var menu_name_eng_cold = $12-02-02-0003.NameE
Var menu_desc_eng_cold = $12-02-02-0003.descriptionE
Var menu_name_thai_cold = $12-02-02-0003.Name
Var menu_desc_thai_cold = $12-02-02-0003.description
Var menu_name_eng_blender = $12-02-03-0003.NameE
Var menu_desc_eng_blender = $12-02-03-0003.descriptionE
Var menu_name_thai_blender = $12-02-03-0003.Name
Var menu_desc_thai_blender = $12-02-03-0003.description
DEBUGVAR PD_STAGE_1
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Open "ROOT/taobin_project/xml/page_topping_select5.xml"
</EventOnClick>
</Button>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 24 </Size>
<Width>220</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "ชานมไต้หวัน" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<State> showthaiText </State>
<Value> "ชาไต้หวัน นม" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 22 </Size>
<Width>220</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showengText </State>
<Value> "TAIWANESE TEA" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<State> showengText </State>
<Value> "Taiwan Tea, Milk, Sugar" </Value>
</Text>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "option_deactive.png" ) </Filename>
</Image>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<State> $12-02-01-0003.Button </State>
<Filename> Var( DirImage2 + "hot.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "hot_db.png" ) </FilenameDisable>
</Image>
<Text>
<X> 50 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-02-01-0003.Button </State>
<Value> StringFmt( $12-02-01-0003.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "cold.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "cold_db.png" ) </FilenameDisable>
<State> $12-02-02-0003.Button </State>
</Image>
<Text>
<X> 115 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-02-02-0003.Button </State>
<Value> StringFmt( $12-02-02-0003.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 146 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "blend.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "blend_db.png" ) </FilenameDisable>
<State> $12-02-03-0003.Button </State>
</Image>
<Text>
<X> 180 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitRegularTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-02-03-0003.Button </State>
<Value> StringFmt( $12-02-03-0003.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<State>
eval(
If ICE_PROCESS_STATUS = 2 Then
If $Sum120201000312020200031202030003 = "Disable" Then
Var ice_tab_process_show = "Disable"
Else
Var ice_tab_process_show = "Enable"
EndIf
Else
Var ice_tab_process_show = "Invisible"
EndIf
Var return = ice_tab_process_show
)
</State>
<Filename> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible.png" </Filename>
<FilenameDisable> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible_dis.png" </FilenameDisable>
</Image>
<Image>
<X> 49 </X>
<Y> 117 </Y>
<State>
eval(
If $Sum120201000312020200031202030003 = "Disable" Then
STRCONTAIN "ERR" $12-02-01-0003.TAG tag1_is_disable
STRCONTAIN "ERR" $12-02-02-0003.TAG tag2_is_disable
STRCONTAIN "ERR" $12-02-03-0003.TAG tag3_is_disable
Var return = "Invisible"
If tag1_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag2_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag3_is_disable = "true" Then
Var return = "Enable"
EndIf
Else
Var return = "Invisible"
EndIf
)
</State>
<Filename> "ROOT/taobin_project/image//img_menu_err2.png" </Filename>
</Image>
<Text>
<X> 84 </X>
<Y> 266 </Y>
<Size> 10 </Size>
<Font> OpunMediumTTF </Font>
<Color> 0xDE794E </Color>
<State> ice_tab_process_show </State>
<Value> ice_show_open </Value>
</Text>
<Text>
<X> 48 </X>
<Y> 116 </Y>
<Size> 32 </Size>
<Width>128</Width>
<Height>64</Height>
<Font> MITRegularTTF </Font>
<Color> 0x5A5A5A </Color>
<Mode> "disable-show" </Mode>
<State> $Sum120201000312020200031202030003 </State>
<Value> text_unavailable </Value>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
; - - -
; ==================> Len = 17

View file

@ -75,6 +75,7 @@
Var CoffeePoint1 = Ext1c
INT CoffeePoint1
Var CoffeePointOld = CoffeePoint1
DEBUGVAR CoffeePointOld
Var TaobinName = Ext1d
Var TaobinCoupons = Ext1g

View file

@ -323,7 +323,7 @@
Var FromCheckMemberPoint = 0
@ -486,6 +486,13 @@
If CouponTypeA = "113" Then
Var CouponNameA = "/imgCoupon113.png"
EndIf
If CouponTypeA = "120" Then
Var CouponNameA = "/imgCoupon120.png"
EndIf
If CouponTypeA = "121" Then
Var CouponNameA = "/imgCoupon121.png"
EndIf
INT CouponExireA_D
INT CouponExireA_Y
@ -598,6 +605,13 @@
Var CouponNameB = "/imgCoupon113.png"
EndIf
If CouponTypeB = "120" Then
Var CouponNameB = "/imgCoupon120.png"
EndIf
If CouponTypeB = "121" Then
Var CouponNameB = "/imgCoupon121.png"
EndIf
INT CouponExireB_D
INT CouponExireB_Y
Var CouponExireB_Y = CouponExireB_Y + 0
@ -715,6 +729,13 @@
Var CouponNameA = "/imgCoupon113.png"
EndIf
If CouponTypeA = "120" Then
Var CouponNameA = "/imgCoupon120.png"
EndIf
If CouponTypeA = "121" Then
Var CouponNameA = "/imgCoupon121.png"
EndIf
INT CouponExireA_D
INT CouponExireA_Y
Var CouponExireA_Y = CouponExireA_Y + 543
@ -825,6 +846,13 @@
Var CouponNameB = "/imgCoupon113.png"
EndIf
If CouponTypeB = "120" Then
Var CouponNameB = "/imgCoupon120.png"
EndIf
If CouponTypeB = "121" Then
Var CouponNameB = "/imgCoupon121.png"
EndIf
INT CouponExireB_D
INT CouponExireB_Y
Var CouponExireB_Y = CouponExireB_Y + 543
@ -906,6 +934,7 @@
Var text5Img = "/text5.png"
;inter-image
If CountryName = "Malaysia" Then
Var text5Img = "/text5-MYR.png"
EndIf
@ -1136,22 +1165,26 @@
</Text>
;<Button>
;<X> 156 </X>
;<Y> 1746 </Y>
;<Filename> Var( DirImage + "/bn_checkKradong.png" )</Filename>
;<FilenamePress> Var( DirImage + "/bp_checkKradong.png" )</FilenamePress>
;<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
;<Volume> SoundVolume </Volume>
;<EventClick>
; Open "ROOT/taobin_project/xml/page_check_member_point.xml"
;</EventClick>
;</Button>
<Button>
<X> 156 </X>
<Y> 1746 </Y>
<Filename> Var( DirImage + "/bn_checkKradong.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_checkKradong.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
GETACCEXT TNumberTaobinMemberXXX 14
Var CoffeePointOld = 0
Var CoffeePoint = 0
Open "ROOT/taobin_project/xml/page_check_member_point.xml"
</EventClick>
</Button>
<Button>
<X> 397 </X>
;<X> 630 </X>
;<X> 397 </X>
<X> 630 </X>
<Y> 1746 </Y>
<Filename> Var( DirImage + bn_exit )</Filename>
<FilenamePress> Var( DirImage + bp_exit )</FilenamePress>
@ -1210,7 +1243,7 @@
<Text>
<X> 372 </X>
<Y> 1370 </Y>
<Y> 1375 </Y>
<Size> 15 </Size>
<Width> 600 </Width>
<Font> KanitRegularTTF </Font>
@ -1243,7 +1276,7 @@
<Text>
<X> 372 </X>
<Y> 1613 </Y>
<Y> 1618 </Y>
<Size> 15 </Size>
<Width> 600 </Width>
<Font> KanitRegularTTF </Font>

View file

@ -666,12 +666,6 @@
<Timeout> 1000 </Timeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var ShowCountDownBrewing = CountDownBrewing
Var Timeout = Timeout + 1
If Timeout > 15 Then
@ -705,36 +699,24 @@
</EventSecurity>
<EventActionOk>
If CheckCoupons = 1 Then
Var MakeDrinkState = 1
Var CouponPage = 1
Var CouponInfo1 = Ext1a
Var CouponInfo2 = Ext1b
Var CouponInfo3 = Ext1c
Var CouponInfo4 = Ext1d
Var CouponInfo5 = Ext1e
Var CouponInfo6 = Ext1f
Var CouponInfo7 = Ext1g
Var CouponInfo8 = Ext1h
Var CouponInfo9 = Ext1i
Var CouponInfo10 = Ext1j
If Ext1a = "ok" Then
Var CoffeePoint1 = Ext1c
INT CoffeePoint1
Var CoffeePointOld = CoffeePoint1
Var CoffeePoint = CoffeePoint1
DEBUGVAR CoffeePointOld
Var TelephoneNumber = TelephoneNumberX
GETACCEXT TelephoneNumber 13
Var CheckCoupons = 2
Var TaobinName = Ext1d
Var TaobinCoupons = Ext1g
Var TaobinExpire = Ext1f
Var TaobinLevel = Ext1e
Else
Var CoffeePointRank = Ext1b
INT CoffeePointRank
Var CoffeePointRankTmp = CoffeePointRank
If CheckCoupons = 2 Then
Var TaobinCredit = Ext1b
Open "ROOT/taobin_project/xml/page_check_member2.xml"
EndIf
Open "ROOT/taobin_project/xml/page_check_member_point.xml"
EndIf
</EventActionOk>
@ -1176,25 +1158,6 @@
</Text>
;
<Image>
<X> 751 </X>
<Y> 413 </Y>
<Filename> IMG_CNT </Filename>
</Image>
;
<Text>
<X> XPosiShowCountDownBrew </X>
<Y> 470 </Y>
<Align> End </Align>
<Width> 153 </Width>
<Size> 88 </Size>
<Font> RobotoBold </Font>
<Color> 0x513C2F </Color>
<Value> ShowCountDownBrewing </Value>
</Text>
<EventUnitTest1>
Open "ROOT/taobin_project/xml/page_collect_point_3_28.xml"
</EventUnitTest1>

View file

@ -109,6 +109,9 @@
EndIf
DEBUGVAR PepweenCollectPoint
DEBUGVAR ProBadValentineEnable
DEBUGVAR FromBadValentinePro
If Seeker.TNumberTaobinCredit = "" Then
@ -160,6 +163,13 @@
EndIf
EndIf
If ProBadValentineEnable = 1 Then
If FromBadValentinePro = 1 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/bad_valentine/page_collect_point_pro_bad_valentine_2.xml"
EndIf
EndIf
GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
@ -198,6 +208,13 @@
EndIf
EndIf
If ProBadValentineEnable = 1 Then
If FromBadValentinePro = 1 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/bad_valentine/page_collect_point_pro_bad_valentine_2.xml"
EndIf
EndIf
If PepweenCollectPoint = 0 Then
GETACCEXT TelephoneNumber 31
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"
@ -681,6 +698,13 @@
EndIf
EndIf
If ProBadValentineEnable = 1 Then
If FromBadValentinePro = 1 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/bad_valentine/page_collect_point_pro_bad_valentine_2.xml"
EndIf
EndIf
If PepweenCollectPoint = 0 Then
GETACCEXT TelephoneNumber 31
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"

View file

@ -180,6 +180,7 @@
DEBUGVAR Seeker.TNumberTaobinMember
If TaobinPDPA = 0 Then
;inter-xml-open
If CountryName = "Malaysia" Then
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
EndIf
@ -192,6 +193,10 @@
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
EndIf
If CountryName = "Singapore" Then
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
EndIf
Open "ROOT/taobin_project/xml/page_show_consent.xml"
EndIf

View file

@ -648,6 +648,7 @@
EndIf
;inter-from-consent
If CountryName = "Malaysia" Then
Var Seeker.FromConsent = 0
EndIf

View file

@ -29,10 +29,15 @@
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 5 Then
; goto lid straw
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
If FromCheckMemberPoint = 1 Then
If Timeout > 10 Then
Open "ROOT/taobin_project/xml/page_check_member2.xml"
EndIf
Else
If Timeout > 5 Then
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
TimerReset
@ -110,8 +115,22 @@
<FilenameDisable2> Var( DirImage + "/disable2_get15discount.png" )</FilenameDisable2>
<EventClick>
; goto lid straw
Var Seeker.UseGet15Discount = 1
Var PreviousSeeker.UseGet15Discount = 1
DEBUGVAR FromCheckMemberPoint
If FromCheckMemberPoint = 1 Then
Var PointTaobinStr = "0/00-00-00-0000/cash"
Var PointCrm = "0"
Var GetScore = 1
Var Cid = 39
DEBUGVAR "AddData 39"
DEBUGVAR TNumberTaobinMemberXXX
AddData Cid TNumberTaobinMemberXXX PointTaobinStr PointCrm GetScore
Else
Var Seeker.UseGet15Discount = 1
Var PreviousSeeker.UseGet15Discount = 1
EndIf
Var PopUpState2 = "Invisible"
Var PopUpState1 = "Enable"
Var Timeout = 0
@ -129,7 +148,11 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
If FromCheckMemberPoint = 1 Then
Open "ROOT/taobin_project/xml/page_check_member2.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
</EventClick>
</Button>
@ -144,7 +167,11 @@
<EventClick>
; goto lid straw
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
If FromCheckMemberPoint = 1 Then
Open "ROOT/taobin_project/xml/page_check_member2.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
</EventClick>
</Button>

View file

@ -23,6 +23,13 @@
Var PopUpState1 = "Invisible"
Var PopUpState2 = "Invisible
EndIf
If FromCheckMemberPoint = 1 Then
Var PointTaobinStr = "0/00-00-00-0000/cash"
Var PointCrm = "0"
Var GetScore = "0"
AddData 40 TNumberTaobinMemberXXX PointTaobinStr PointCrm GetScore
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
@ -43,7 +50,7 @@
EndIf
Else
If FromCheckMemberPoint = 1 Then
Open "ROOT/taobin_project/xml/page_check_member3.xml"
Open "ROOT/taobin_project/xml/page_check_member2.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
@ -139,7 +146,7 @@
Refresh
Else
If FromCheckMemberPoint = 1 Then
Open "ROOT/taobin_project/xml/page_check_member3.xml"
Open "ROOT/taobin_project/xml/page_check_member2.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf

View file

@ -57,6 +57,7 @@
Var img_popup2 = "/img_popup2.png"
Var img_popup3 = "/img_popup3.png"
;inter-image
If CountryName = "Malaysia" Then
Var img_popup2 = "/img_popup2-MYR.png"
Var img_popup3 = "/img_popup3-MYR.png"
@ -84,6 +85,15 @@
Var MemberState3 = "Invisible"
EndIf
If CountryName = "Singapore" Then
Var img_popup2 = "/img_popup2-SGP.png"
Var img_popup3 = "/img_popup3-SGP.png"
Var MemberState1 = "Enable"
Var MemberState2 = "Invisible"
Var MemberState3 = "Invisible"
EndIf

View file

@ -63,13 +63,14 @@
EndIf
;inter-xml-open
If CountryName = "Malaysia" Then
Open "ROOT/taobin_project/xml/page_drinkfail5.xml"
Else
Open "ROOT/taobin_project/xml/page_drinkfail2-2.xml"
EndIf
Else
;inter-xml-open
If CountryName = "Malaysia" Then
Open "ROOT/taobin_project/xml/page_drinkfail5.xml"
Else
@ -163,6 +164,7 @@
Var MaxNumber = 10
;inter-max-number
If CountryName = "Malaysia" Then
Var MaxNumber = 11
EndIf
@ -170,6 +172,11 @@
If CountryName = "Indonesia" Then
Var MaxNumber = 12
EndIf
If CountryName = "Singapore" Then
Var MaxNumber = 10
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>

View file

@ -64,25 +64,16 @@
Var PictureBegin = "txt_"
Var PictureEnd = "_en.png"
If CountryName = "Australia" Then
Var VideoPath = "/mnt/sdcard/coffeevending/taobin_project/animation01/"
Var VideoFileBegin = "TaoBin2_draft02_art"
Var VideoFileEnd = ".mp4"
;inter-play-list
Var VideoPath = "/mnt/sdcard/coffeevending/taobin_project/animation01/"
Var VideoFileBegin = "TaoBin2_draft02_art"
Var VideoFileEnd = ".mp4"
Var PicturePath = "/mnt/sdcard/coffeevending/taobin_project/inter/aus/image/page_doing/"
Var PictureBegin = "txt_"
Var PictureEnd = "_en.png"
EndIf
Var PicturePath = CountryRootPath + "/image/page_doing/"
Var PictureBegin = "txt_"
Var PictureEnd = "_en.png"
If CountryName = "Malaysia" Then
Var VideoPath = "/mnt/sdcard/coffeevending/taobin_project/animation01/"
Var VideoFileBegin = "TaoBin2_draft02_art"
Var VideoFileEnd = ".mp4"
Var PicturePath = "/mnt/sdcard/coffeevending/taobin_project/inter/mys/image/page_doing/"
Var PictureBegin = "txt_"
Var PictureEnd = "_en.png"
EndIf
Else
Var VideoPath = "/mnt/sdcard/coffeevending/taobin_project/animation01/"
Var VideoFileBegin = "TaoBin2_draft02_art"

View file

@ -932,91 +932,95 @@
<Function2>
If NewFlowPaymentCode = 1 Then
Var ShowSentSmsText = "Invisible"
Var Timeout = 0
Var ShowSentSmsText = "Invisible"
Var Timeout = 0
If PinNumberUser = PinNumber Then
If PinNumberUser = PinNumber Then
Var SumCreditAmount = CoffeeCredit
Var SumCreditAmount = CoffeeCredit
If SumCreditAmount >= PayAmountSubDiscount Then
If SumCreditAmount >= PayAmountSubDiscount Then
Open "ROOT/taobin_project/xml/page_payment_credit3-0.xml"
Else
Var ShowNotEnoughText = "Enable"
Var Seeker.TNumberTaobinCredit = TelephoneNumber
Var Seeker.CoffeePinNumber = PinNumber
Open "ROOT/taobin_project/xml/page_payment_credit3-1.xml"
EndIf
Open "ROOT/taobin_project/xml/page_payment_credit3-0.xml"
Else
Var ShowNotEnoughText = "Enable"
Var Seeker.TNumberTaobinCredit = TelephoneNumber
Var Seeker.CoffeePinNumber = PinNumber
Open "ROOT/taobin_project/xml/page_payment_credit3-1.xml"
Var ShowErrorText = "Enable"
Var PinNumber = ""
Var ShowTextNumber1 = "Invisible"
Var ShowTextNumber2 = "Invisible"
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
EndIf
Var ReqFlag = 0
Refresh
Else
Var ShowSentSmsText = "Invisible"
Var Timeout = 0
Var ShowErrorText = "Enable"
Var PinNumber = ""
Var ShowTextNumber1 = "Invisible"
Var ShowTextNumber2 = "Invisible"
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
If PinNumberUser = PinNumber Then
Var SumCreditAmount = CoffeeCredit
If SumCreditAmount >= PayAmountSubDiscount Then
If ReqAdddata22 = 0 Then
;If Seeker = "next" Then
; Var Curr = "curr"
; If TelephoneNumber = Curr.CurrCreditTelNum Then
; Var SumCreditAmount = CoffeeCredit + Curr.CurrCreditAmount
; EndIf
;EndIf
Var useCreditAmount = PayAmountSubDiscount
Var BmiYear = useCreditAmount
Var GetScore = "useCredit"
AddData 22 TelephoneNumber BmiYear PointCrm GetScore
Var ReqAdddata22 = 1
EndIf
Else
Open "ROOT/taobin_project/xml/page_payment_credit3.xml"
EndIf
Else
Var ShowErrorText = "Enable"
Var PinNumber = ""
Var ShowTextNumber1 = "Invisible"
Var ShowTextNumber2 = "Invisible"
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
EndIf
;Var DataTmp = TelephoneNumber + "/"
;Var DataTmp = DataTmp + PinNumber
;GETACCEXT DataTmp 19
Var ReqFlag = 0
Refresh
EndIf
Var ReqFlag = 0
Refresh
</Function2>
<Function3>
Var ShowSentSmsText = "Invisible"
Var Timeout = 0
If PinNumberUser = PinNumber Then
Var SumCreditAmount = CoffeeCredit
If SumCreditAmount >= PayAmountSubDiscount Then
If ReqAdddata22 = 0 Then
;If Seeker = "next" Then
; Var Curr = "curr"
; If TelephoneNumber = Curr.CurrCreditTelNum Then
; Var SumCreditAmount = CoffeeCredit + Curr.CurrCreditAmount
; EndIf
;EndIf
Var useCreditAmount = PayAmountSubDiscount
Var BmiYear = useCreditAmount
Var GetScore = "useCredit"
AddData 22 TelephoneNumber BmiYear PointCrm GetScore
Var ReqAdddata22 = 1
EndIf
Else
Open "ROOT/taobin_project/xml/page_payment_credit3.xml"
EndIf
Else
Var ShowErrorText = "Enable"
Var PinNumber = ""
Var ShowTextNumber1 = "Invisible"
Var ShowTextNumber2 = "Invisible"
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
EndIf
;Var DataTmp = TelephoneNumber + "/"
;Var DataTmp = DataTmp + PinNumber
;GETACCEXT DataTmp 19
Var ReqFlag = 0
Refresh
</Function3>

View file

@ -22,7 +22,6 @@
Var GetCreditFlag = 0
Var posX = 400
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
@ -34,11 +33,9 @@
If show_eng = "true" Then
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
Var posX = 430
Else
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
@ -52,13 +49,39 @@
Var GetPayInfoFlag = 0
Var ReqPayWithCash = 0
Var TextWaiting = ""
GenHashWithTimeStamp PointCrm
Var text_44 = "/text_44.png"
Var text_show_amountInvalid = "/text_show_amountInvalid.png"
Var text_show_amountInvalid2 = "/text_show_amountInvalid2.png"
Var Min = PayAmountSubDiscount
If SumCreditAmount < PayAmountSubDiscount Then
Var Min = PayAmountSubDiscount - SumCreditAmount
If show_eng = "true" Then
Var Text_X = 170
Var posX = 250
Else
Var Text_X = 255
Var posX = 380
EndIf
Else
Var text_44 = "/text_45.png"
If show_eng = "true" Then
Var Text_X = 263
Var posX = 350
Else
Var Text_X = 246
Var posX = 380
EndIf
Var Min = PayAmountSubDiscount
EndIf
;Var Min = PayAmountSubDiscount
Var Max = 5000
;inter-image
@ -141,6 +164,16 @@ If ViewBill > 0 Then
Open "ROOT/taobin_project/xml/page_payment_credit3-TopupQR.xml"
EndIf
If ReqPayWithCash = 1 Then
Var Seeker.CreditReferenceTmp = "" + useCreditAmount
Var Seeker.CreditReferenceTmp = Seeker.CreditReferenceTmp + "/"
Var Seeker.CreditReferenceTmp = Seeker.CreditReferenceTmp + PointCrm
Var Seeker.StoreCreditFlag = 1
Var Seeker.CreditNotEnoughRefID = PointCrm
Open "ROOT/taobin_project/xml/page_payment_credit3-TopupCash.xml"
EndIf
Refresh
</EventActionOk>
@ -551,7 +584,14 @@ If ViewBill > 0 Then
Else
If PayCreditChannel = "cash" Then
Open "ROOT/taobin_project/xml/page_payment_credit3-TopupCash.xml"
If ReqPayWithCash = 0 Then
Var TelephoneNumber = Seeker.TNumberTaobinCredit
Var useCreditAmount = SumCreditAmount
Var BmiYear = useCreditAmount
Var GetScore = "useCredit"
AddData 22 TelephoneNumber BmiYear PointCrm GetScore
Var ReqPayWithCash = 1
EndIf
Else
@ -634,7 +674,7 @@ If ViewBill > 0 Then
<Width> 250 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0xDE794E </Color>
<Value> PayAmountSubDiscount </Value>
<Value> Min </Value>
</Text>
@ -648,8 +688,8 @@ If ViewBill > 0 Then
<Image>
<X> 188 </X>
<Y> 640 </Y>
<X> Text_X </X>
<Y> 650 </Y>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + text_44 )</Filename>
</Image>

View file

@ -170,6 +170,12 @@
If CancelFlag = 0 Then
SAVELOG "ButtonCancleAlpha2 > Timeout Order."
If ReqPayWithCash = 1 Then
Var BmiYear = useCreditAmount
Var GetScore = "useCredit"
AddData 24 TelephoneNumber BmiYear PointCrm GetScore
EndIf
Var CancelFlag = 1
Var CancelCounter = 0
Var RemainAmountStr = "คืนเงิน"
@ -497,6 +503,12 @@ TimerReset
If CancelFlag = 0 Then
SAVELOG "ButtonCancleAlpha2 > Cancle Order."
If ReqPayWithCash = 1 Then
Var BmiYear = useCreditAmount
Var GetScore = "useCredit"
AddData 24 TelephoneNumber BmiYear PointCrm GetScore
EndIf
Var CancelFlag = 1
Var CancelCounter = 0
If show_eng = "true" Then

View file

@ -56,14 +56,21 @@
If ReqAdddata42 = 1 Then
If Timeout = 3 Then
If ReqAdddata22 = 0 Then
GenHashWithTimeStamp PointCrm
Var useCreditAmount = PayAmountSubDiscount
Var BmiYear = useCreditAmount
Var GetScore = "useCredit"
AddData 22 TelephoneNumber BmiYear PointCrm GetScore
Var ReqAdddata22 = 1
Var Timeout = 0
Var SumCreditAndCouponAmount = IntAmoutCoupon + SumCreditAmount
If SumCreditAndCouponAmount < PayAmountSubDiscount Then
Var SumCreditAmount = SumCreditAndCouponAmount
Open "ROOT/taobin_project/xml/page_payment_credit3-1.xml"
Else
GenHashWithTimeStamp PointCrm
Var useCreditAmount = PayAmountSubDiscount
Var BmiYear = useCreditAmount
Var GetScore = "useCredit"
AddData 22 TelephoneNumber BmiYear PointCrm GetScore
Var ReqAdddata22 = 1
Var Timeout = 0
EndIf
EndIf
EndIf
EndIf

View file

@ -51,8 +51,7 @@
EndIf
Else
Var MachineErrorDetailAll = MachineErrorDetail + " / "
Var MachineErrorDetailAll = MachineErrorDetailAll + MachineErrorDetailEng
Var MachineErrorDetailAll = MachineErrorDetailEng
If textStep > 3 Then

View file

@ -143,7 +143,11 @@
Var show_video = 1
Var SaveTheWorldST = "Invisible"
Var video_file_name = "ROOT/taobin_project/video/" + video_name_to_play
If InternationalEnable = 1 Then
Var video_file_name = "ROOT/taobin_project/inter/common/video/" + video_name_to_play
Else
Var video_file_name = "ROOT/taobin_project/video/" + video_name_to_play
EndIf
Var video_file_name = video_file_name + video_id_to_ran
Var video_file_name = video_file_name + ".mp4"
@ -167,6 +171,7 @@
Var remainCredit = "/remainCredit.png"
;inter-image
If CountryName = "Malaysia" Then
Var remainCredit = "/remainCredit-MYR.png"
EndIf
@ -363,6 +368,7 @@
Var Seeker.CurrCreditPinNum = Seeker.CoffeePinNumber
DEBUGVAR Seeker.CurrCreditAmount
DEBUGVAR Seeker.CreditNotEnoughRefID
If Seeker.CreditNotEnoughRefID = "" Then
Var CurrAmount = Seeker.CurrCreditAmount
@ -375,7 +381,11 @@
Var ServiceAmountSupCampain = Seeker.ServiceAmount2 - Seeker.IntVendingCampaign
If CoinAmount >= ServiceAmountSupCampain Then
Var CurrAmount = Seeker.CurrCreditAmount
DEBUGVAR Seeker.IntVendingCredit
Var CurrAmount = Seeker.CurrCreditAmount - Seeker.IntVendingCredit
Var Seeker.IntVendingCredit = 0
Var RefID = "0/" + Seeker.CreditNotEnoughRefID
Var Seeker.CreditReferenceTmp = RefID
Else

View file

@ -25,9 +25,15 @@
STRCONTAIN "y20IDCard" XMLProfileFromJson Y20IDCARD_ENABLE
STRCONTAIN "SugarBreak" XMLProfileFromJson SugarBreakEnable
STRCONTAIN "Discount50" XMLProfileFromJson Discount50
STRCONTAIN "ClossMenu" XMLProfileFromJson ClossMenu
STRCONTAIN "AllPrice05" XMLProfile AllPrice05
STRCONTAIN "AllPrice10" XMLProfile AllPrice10
STRCONTAIN "AllPriceUp05" XMLProfile AllPriceUp05
STRCONTAIN "AllPriceUp10" XMLProfile AllPriceUp10
DEBUGVAR EnableLiveness
DEBUGVAR Only18
@ -65,13 +71,48 @@
Var NoSugarStepRight2 = "false"
EndIf
; flag for apply all menu.
Var price_apply = 0
If Discount50 = "true" Then
Var HalfPrice = "true"
Var InvokeDiscountCMD = "true"
DEBUGVAR InvokeDiscountCMD
Var price_apply = 1
__CMD "invoke-discount-50" "-" "-" "-"
Else
Var HalfPrice = "false"
DEBUGVAR Discount50
EndIf
If AllPrice05 = "true" Then
Var price_apply = 2
__CMD "invoke-all-price-5" "-" "-" "-"
EndIf
If AllPrice10 = "true" Then
Var price_apply = 3
__CMD "invoke-all-price-10" "-" "-" "-"
EndIf
If AllPriceUp05 = "true" Then
Var price_apply = 3
__CMD "invoke-all-up-price-5" "-" "-" "-"
EndIf
If AllPriceUp10 = "true" Then
Var price_apply = 4
__CMD "invoke-all-up-price-10" "-" "-" "-"
EndIf
If price_apply = 0 Then
Var HalfPrice = "false"
DEBUGVAR Discount50
__CMD "invoke-discount-disable" "-" "-" "-"
__CMD "cancel-override-price" "-" "-" "-"
EndIf

View file

@ -40,6 +40,11 @@
Var LanguageButtonEnable = "Invisible"
EndIf
If FirstTimeOpenFile = "" Then
Var Not#CountDownForMulti = 5
Var FirstTimeOpenFile = "done"
EndIf
IF Not#CountDownForMulti = "" Then
Var Not#CountDownForMulti = 99
EndIf
@ -125,6 +130,7 @@
EndIf
If Not#CountDownForMulti > 0 Then
DEBUGVAR Not#CountDownForMulti
Var Not#CountDownForMulti = Not#CountDownForMulti - 1
EndIf
EndIf
@ -134,6 +140,7 @@
If BrewCommand = "RefreshAll" Then
DEBUGVAR BrewCommand
Var BrewCommand = "-"
If EnableMultiInstance = "true" Then
InstanceOverSetString "RefreshNow" 5

View file

@ -728,10 +728,16 @@
Var LangString = "LANG: &#34EN&#34\r\n"
EndIf
Var BoxIDString !assigned SprintFmt("BOX_ID: &#34%s&#34\r\n", BoxID)
; reset
WRITE_FILE "/mnt/sdcard/taobingame_acc.yaml" ""
APPEND_FILE "/mnt/sdcard/taobingame_acc.yaml" ACCString
APPEND_FILE "/mnt/sdcard/taobingame_acc.yaml" LangString
APPEND_FILE "/mnt/sdcard/taobingame_acc.yaml" BoxIDString
DEBUGVAR LangString
@ -838,7 +844,7 @@
) </State>
<Value> "Enable CreditCard" </Value>
</Text>
;<QRCode>
;<X> 930 </X>