This commit is contained in:
Wanlop Rungsiyangkul 2023-09-28 21:48:23 +07:00
commit 1320a5fd19
119 changed files with 11849 additions and 549 deletions

View file

@ -0,0 +1,307 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var Timeout = 0
SAVELOG UnitTestType
If UnitTestType = "1" Then
Var CoffeePoint = 10
Open "ROOT/taobin_project/xml/page_show_consent.xml"
EndIf
Var TaobinLevel = 0
Var Point2X = 0
Var Seeker.TaobinErrorNetwork = 0
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
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_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
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_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
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_error.xml"
Else
Var TaobinName = Ext1b
Var TelephoneNumber = TelephoneNumberX
Var TNumberTaobinMemberXXX = TelephoneNumber
Var Seeker.PointTaobinStr = ParamCP
Var Seeker.TNumberTaobinMember = TelephoneNumberX
Var PopweenPointState[0] = 0
Var PopweenPointState[1] = 0
Var PopweenPointState[2] = 0
Var PopweenPointState[3] = 0
Var PopweenPointState[4] = 0
Var PopweenPointState[5] = 0
Var PopweenPointState[6] = 0
Var PopweenPointState[7] = 0
Var PopweenPointState[8] = 0
Var PopweenPointState[9] = 0
Var PopweenPointState[10] = 0
Var PopweenPointState[11] = 0
Var PopweenPointState[12] = 0
DEBUGVAR Ext1a
SPLIT Ext1a "/" 1 PopweenPointState[0]
SPLIT Ext1a "/" 2 PopweenPointState[1]
SPLIT Ext1a "/" 3 PopweenPointState[2]
SPLIT Ext1a "/" 4 PopweenPointState[3]
SPLIT Ext1a "/" 5 PopweenPointState[4]
SPLIT Ext1a "/" 6 PopweenPointState[5]
SPLIT Ext1a "/" 7 PopweenPointState[6]
SPLIT Ext1a "/" 8 PopweenPointState[7]
SPLIT Ext1a "/" 9 PopweenPointState[8]
SPLIT Ext1a "/" 10 PopweenPointState[9]
SPLIT Ext1a "/" 11 PopweenPointState[10]
SPLIT Ext1a "/" 12 PopweenPointState[11]
SPLIT Ext1a "/" 13 PopweenPointState[12]
INT PopweenPointState[0]
INT PopweenPointState[1]
INT PopweenPointState[2]
INT PopweenPointState[3]
INT PopweenPointState[4]
INT PopweenPointState[5]
INT PopweenPointState[6]
INT PopweenPointState[7]
INT PopweenPointState[8]
INT PopweenPointState[9]
INT PopweenPointState[10]
INT PopweenPointState[11]
INT PopweenPointState[12]
DEBUGVAR PopweenPointState[0]
DEBUGVAR PopweenPointState[1]
DEBUGVAR PopweenPointState[2]
DEBUGVAR PopweenPointState[3]
DEBUGVAR PopweenPointState[4]
DEBUGVAR PopweenPointState[5]
DEBUGVAR PopweenPointState[6]
DEBUGVAR PopweenPointState[7]
DEBUGVAR PopweenPointState[8]
DEBUGVAR PopweenPointState[9]
DEBUGVAR PopweenPointState[10]
DEBUGVAR PopweenPointState[11]
DEBUGVAR PopweenPointState[12]
Var PopweenPointNewIndex = 0
If Seeker.ProductCode = "12-99-05-0053" Then
Var PopweenPointNewIndex = 0
EndIf
If Seeker.ProductCode = "12-99-05-0054" Then
Var PopweenPointNewIndex = 1
EndIf
If Seeker.ProductCode = "12-99-05-0055" Then
Var PopweenPointNewIndex = 2
EndIf
If Seeker.ProductCode = "12-99-05-0057" Then
Var PopweenPointNewIndex = 3
EndIf
If Seeker.ProductCode = "12-99-05-0058" Then
Var PopweenPointNewIndex = 4
EndIf
If Seeker.ProductCode = "12-99-05-0059" Then
Var PopweenPointNewIndex = 5
EndIf
If Seeker.ProductCode = "12-99-05-0060" Then
Var PopweenPointNewIndex = 6
EndIf
If Seeker.ProductCode = "12-99-05-0061" Then
Var PopweenPointNewIndex = 7
EndIf
If Seeker.ProductCode = "12-99-05-0062" Then
Var PopweenPointNewIndex = 8
EndIf
If Seeker.ProductCode = "12-99-05-0064" Then
Var PopweenPointNewIndex = 9
EndIf
If Seeker.ProductCode = "12-99-05-0065" Then
Var PopweenPointNewIndex = 10
EndIf
If Seeker.ProductCode = "12-99-05-0056" Then
Var PopweenPointNewIndex = 11
EndIf
If Seeker.ProductCode = "12-99-05-0066" Then
Var PopweenPointNewIndex = 11
EndIf
DEBUGVAR Seeker.PointTaobinStr
DEBUGVAR Seeker.TNumberTaobinMember
If TaobinPDPA = 0 Then
If CountryName = "Malaysia" Then
Open "ROOT/taobin_project/xml/page_collect_point_pro_pepween_3.xml"
EndIf
If CountryName = "Indonesia" Then
Open "ROOT/taobin_project/xml/page_collect_point_pro_pepween_3.xml"
EndIf
If CountryName = "Australia" Then
Open "ROOT/taobin_project/xml/page_collect_point_pro_pepween_3.xml"
EndIf
Open "ROOT/taobin_project/xml/page_show_consent.xml"
EndIf
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_3.xml"
EndIf
</EventActionOk>
<EventActionError>
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember= TelephoneNumber
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_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,734 @@
<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 CoffeePointStr = CoffeePoint
DEBUGVAR TelephoneNumber
DEBUGVAR TelephoneNumberX
Var EngTextState = "Invisible"
Var ThaiTextState = "Invisible"
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/event/pepween/display_point_en"
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png"
Var EngTextState = "Enable"
Else
Var DirImage = "ROOT/taobin_project/image/event/pepween/display_point"
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png"
Var ThaiTextState = "Enable"
EndIf
Var CoffeePointTmp = CoffeePoint
;If CoffeePoint > 12 Then
; Var Timeout = 18
; Var CoffeePointTmp = 13
;EndIf
If CoffeePoint < 17 Then
Var CoffeePointTmp = 1
Else
Var CoffeePointTmp = CoffeePoint - 17
EndIf
Var PointDiff = 13 - CoffeePointTmp
If show_eng = "true" Then
Var TaobinLevelDesc1 = "You're just " + PointDiff
Var TaobinLevelDesc1 = TaobinLevelDesc1 + " menu item away from unlocking a Secret graveyard prize."
Var TaobinLevelDesc2 = "Collect all 13 horrifying menus now!"
Else
Var TaobinLevelDesc1 = "เหลืออีก " + PointDiff
Var TaobinLevelDesc1 = TaobinLevelDesc1 + " เมนูที่จะเปิดล็อคความน่าสะพรึง"
Var TaobinLevelDesc2 = "สะสมให้ครบ 13 เมนูแสนอร่อยปนความสยองตอนนี้เลย!"
EndIf
Var CheckCoupons = 0
Var MakeDrinkState = 0
Var taobinP1 = "Invisible"
Var taobinP2 = "Invisible"
Var taobinP3 = "Invisible"
Var taobinP4 = "Invisible"
Var taobinP5 = "Invisible"
Var taobinP6 = "Invisible"
Var taobinP7 = "Invisible"
Var taobinP8 = "Invisible"
Var taobinP9 = "Invisible"
Var taobinP10 = "Invisible"
Var taobinP11 = "Invisible"
Var taobinP12 = "Invisible"
Var taobinP13 = "Invisible"
Var taobinImgPoint = "/skull_active_new.png"
Var taobinImgPoint[0] = "/skull_active.png"
Var taobinImgPoint[1]= "/skull_active.png"
Var taobinImgPoint[2]= "/skull_active.png"
Var taobinImgPoint[3]= "/skull_active.png"
Var taobinImgPoint[4]= "/skull_active.png"
Var taobinImgPoint[5]= "/skull_active.png"
Var taobinImgPoint[6]= "/skull_active.png"
Var taobinImgPoint[7]= "/skull_active.png"
Var taobinImgPoint[8]= "/skull_active.png"
Var taobinImgPoint[9] = "/skull_active.png"
Var taobinImgPoint[10] = "/skull_active.png"
Var taobinImgPoint[11] = "/skull_active.png"
Var taobinImgPoint[12] = "/skull_active.png"
Var taobinTextPoint[0].Thai = "พระจันทร์สีเลือด"
Var taobinTextPoint[1].Thai = "สุภาพสตรีสีขาว"
Var taobinTextPoint[2].Thai = "เสียงดนตรีตอนตี 3"
Var taobinTextPoint[3].Thai = "พยาบาทชาติที่แล้ว"
Var taobinTextPoint[4].Thai = "ท่านเคาท์เขย่าขวัญ"
Var taobinTextPoint[5].Thai = "ห้องเชือดหมายเลข 13"
Var taobinTextPoint[6].Thai = "ค่ำคืนคอยหลอน"
Var taobinTextPoint[7].Thai = "แม่ชีไร้หัว"
Var taobinTextPoint[8].Thai = "คุณยายท้ายหมู่บ้าน"
Var taobinTextPoint[9].Thai = "อาถรรพ์คืนวันพุธ"
Var taobinTextPoint[10].Thai = "ล้า ท้า หลอน"
Var taobinTextPoint[11].Thai = "หมอกควันแห่งความมืด"
Var taobinTextPoint[12].Thai = "ดิน 7 ป่าช้า"
Var taobinTextPoint[0].Eng = "Red Moon"
Var taobinTextPoint[1].Eng = "White Lady"
Var taobinTextPoint[2].Eng = "Mysterious music box"
Var taobinTextPoint[3].Eng = "Haunted Haze"
Var taobinTextPoint[4].Eng = "The dark lord"
Var taobinTextPoint[5].Eng = "Room no.13"
Var taobinTextPoint[6].Eng = "Haunted Harvest"
Var taobinTextPoint[7].Eng = "Cursed Coffee"
Var taobinTextPoint[8].Eng = "The Haunting Hag of village"
Var taobinTextPoint[9].Eng = "Midnight's Enigma"
Var taobinTextPoint[10].Eng = "Unbelievers' Demise"
Var taobinTextPoint[11].Eng = "Haunted Haze"
Var taobinTextPoint[12].Eng = "7 Haunted Woods"
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 taobinTextColorPoint[9] = "0xFFFFFF"
Var taobinTextColorPoint[10] = "0xFFFFFF"
Var taobinTextColorPoint[11] = "0xFFFFFF"
Var taobinTextColorPoint[12] = "0xFFFFFF"
If PopweenPointState[0] = 1 Then
Var taobinP1 = "Enable"
EndIf
If PopweenPointState[1] = 1 Then
Var taobinP2 = "Enable"
EndIf
If PopweenPointState[2] = 1 Then
Var taobinP3 = "Enable"
EndIf
If PopweenPointState[3] = 1 Then
Var taobinP4 = "Enable"
EndIf
If PopweenPointState[4] = 1 Then
Var taobinP5 = "Enable"
EndIf
If PopweenPointState[5] = 1 Then
Var taobinP6 = "Enable"
EndIf
If PopweenPointState[6] = 1 Then
Var taobinP7 = "Enable"
EndIf
If PopweenPointState[7] = 1 Then
Var taobinP8 = "Enable"
EndIf
If PopweenPointState[8] = 1 Then
Var taobinP9 = "Enable"
EndIf
If PopweenPointState[9] = 1 Then
Var taobinP10 = "Enable"
EndIf
If PopweenPointState[10] = 1 Then
Var taobinP11 = "Enable"
EndIf
If PopweenPointState[11] = 1 Then
Var taobinP12 = "Enable"
EndIf
If PopweenPointState[12] = 1 Then
Var taobinP13 = "Enable"
EndIf
If PopweenPointNewIndex >= 0 Then
Var taobinImgPoint[PopweenPointNewIndex] = "/skull_active_new.png"
Var taobinTextColorPoint[PopweenPointNewIndex] = "0xE97A13"
EndIf
If Seeker = "curr" Then
Var CheckCouponState = "Enable"
Else
Var CheckCouponState = "Disable"
EndIf
Var CurrentPointSlot = "10"
Var CurrentPointCheck = ""
Var val3 = "X"
AddData 35 TelephoneNumber CurrentPointSlot CurrentPointCheck val3
; Var CodeType = "114"
; Var val2 = "X"
; Var val3 = "X"
; AddData 36 TelephoneNumber CodeType val2 val3
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var ShowCountDownBrewing = CountDownBrewing
Var Timeout = Timeout + 1
If Timeout > 5 Then
; goto lid straw
If CoffeePoint > 29 Then
Open "ROOT/taobin_project/xml/page_display_get_free.xml"
Else
If Seeker.FromConsent = 1 Then
Open "ROOT/taobin_project/xml/page_display_get_free.xml"
Else
If PromotionIDCurrentOrder > 1 Then
Open "ROOT/taobin_project/xml/page_display_Promo1Get1Free.xml"
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
EndIf
TimerReset
Refresh
</EventTimeout>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</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
Var TelephoneNumber = TelephoneNumberX
GETACCEXT TelephoneNumber 13
Var CheckCoupons = 2
Else
If CheckCoupons = 2 Then
Var TaobinCredit = Ext1b
Open "ROOT/taobin_project/xml/page_check_member2.xml"
EndIf
EndIf
</EventActionOk>
<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>
;<Filename> "ROOT/taobin_project/image/event/pepween/display_point/img_popup1.png" </Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 665 </Y>
<Filename> Var( DirImage + "/img_popup3.png" )</Filename>
;<Filename> "ROOT/taobin_project/image/event/pepween/display_point/img_popup3.png" </Filename>
</Image>
<Image>
<X> 243 </X>
<Y> 722 </Y>
<Filename> Var( DirImage + "/text7.png" )</Filename>
</Image>
<Image>
<X> 243 </X>
<Y> 850 </Y>
<Filename> Var( DirImage + "/text4.png" )</Filename>
</Image>
<Image>
<X> 625 </X>
<Y> 734 </Y>
<Filename> Var( DirImage + "/ghost.png" )</Filename>
</Image>
;
<Image>
<X> 234 </X>
<Y> 1122 </Y>
<Filename> Var( DirImage + "/skulls_deactive.png" ) </Filename>
</Image>
<Button>
<X> 423 </X>
<Y> 1660 </Y>
<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
Open "ROOT/taobin_project/xml/event/pepween/page_pepween_random.xml"
</EventClick>
</Button>
<Text>
<X> 250 </X>
<Y> 745 </Y>
<Size> 35 </Size>
<Width> 1000 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0x513C2F </Color>
<Value> TaobinName </Value>
</Text>
<Text>
<X> 250 </X>
<Y> 790 </Y>
<Size> 20 </Size>
<Width> 1000 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0x746253 </Color>
<Value> TNumberTaobinMemberXXX </Value>
<Format> Telnum-mask-1 </Format>
</Text>
; Thai
<Text>
<X> 250 </X>
<Y> 890 </Y>
<State> ThaiTextState </State>
<Size> 50 </Size>
<Width> 120 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0xDE794E </Color>
<Value> CoffeePointRank </Value>
</Text>
<Text>
<X> 250 </X>
<Y> 990 </Y>
<State> ThaiTextState </State>
<Size> 25 </Size>
<Width> 1000 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0xDE794E </Color>
<Value> TaobinLevelDesc1 </Value>
</Text>
<Text>
<X> 250 </X>
<Y> 1020 </Y>
<State> ThaiTextState </State>
<Size> 20 </Size>
<Width> 1000 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0x746253 </Color>
<Value> TaobinLevelDesc2 </Value>
</Text>
; Eng
<Text>
<X> 250 </X>
<Y> 920 </Y>
<State> EngTextState </State>
<Size> 50 </Size>
<Width> 120 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0xDE794E </Color>
<Value> CoffeePointRank </Value>
</Text>
<Text>
<X> 250 </X>
<Y> 990 </Y>
<State> EngTextState </State>
<Size> 20 </Size>
<Width> 1000 </Width>
<Font> RobotoRegular </Font>
<Color> 0xDE794E </Color>
<Value> TaobinLevelDesc1 </Value>
</Text>
<Text>
<X> 250 </X>
<Y> 1020 </Y>
<State> EngTextState </State>
<Size> 20 </Size>
<Width> 1000 </Width>
<Font> RobotoRegular </Font>
<Color> 0x746253 </Color>
<Value> TaobinLevelDesc2 </Value>
</Text>
<Image>
<X> 218 </X>
<Y> 1578 </Y>
<Filename> Var( DirImage + "/text8.png" )</Filename>
</Image>
<Button>
<X> 234 </X>
<Y> 1122 </Y>
<State> taobinP1 </State>
<Filename> Var( DirImage + taobinImgPoint[0] )</Filename>
</Button>
<Button>
<X> 367 </X>
<Y> 1122 </Y>
<State> taobinP2 </State>
<Filename> Var( DirImage + taobinImgPoint[1] )</Filename>
</Button>
<Button>
<X> 500 </X>
<Y> 1122 </Y>
<State> taobinP3 </State>
<Filename> Var( DirImage + taobinImgPoint[2] )</Filename>
</Button>
<Button>
<X> 635 </X>
<Y> 1122 </Y>
<State> taobinP4 </State>
<Filename> Var( DirImage + taobinImgPoint[3] )</Filename>
</Button>
<Button>
<X> 767 </X>
<Y> 1122 </Y>
<State> taobinP5 </State>
<Filename> Var( DirImage + taobinImgPoint[4] )</Filename>
</Button>
<Button>
<X> 234 </X>
<Y> 1266 </Y>
<State> taobinP6 </State>
<Filename> Var( DirImage + taobinImgPoint[5] )</Filename>
</Button>
<Button>
<X> 367 </X>
<Y> 1266 </Y>
<State> taobinP7 </State>
<Filename> Var( DirImage + taobinImgPoint[6] )</Filename>
</Button>
<Button>
<X> 500 </X>
<Y> 1266 </Y>
<State> taobinP8 </State>
<Filename> Var( DirImage + taobinImgPoint[7] )</Filename>
</Button>
<Button>
<X> 635 </X>
<Y> 1266 </Y>
<State> taobinP9 </State>
<Filename> Var( DirImage + taobinImgPoint[8] )</Filename>
</Button>
<Button>
<X> 767 </X>
<Y> 1266 </Y>
<State> taobinP10 </State>
<Filename> Var( DirImage + taobinImgPoint[9] )</Filename>
</Button>
<Button>
<X> 234 </X>
<Y> 1409 </Y>
<State> taobinP11 </State>
<Filename> Var( DirImage + taobinImgPoint[10] )</Filename>
</Button>
<Button>
<X> 367 </X>
<Y> 1409 </Y>
<State> taobinP12 </State>
<Filename> Var( DirImage + taobinImgPoint[11] )</Filename>
</Button>
<Button>
<X> 500 </X>
<Y> 1409 </Y>
<State> taobinP13 </State>
<Filename> Var( DirImage + taobinImgPoint[12] )</Filename>
</Button>
<Text>
<X> 239 </X>
<Y> 1244 </Y>
<Size> 12 </Size>
<Width> 100 </Width>
<Font> KanitRegularTTF </Font>
<Color> taobinTextColorPoint[0] </Color>
<Value> taobinTextPoint[0] </Value>
</Text>
<Text>
<X> 374 </X>
<Y> 1244 </Y>
<Size> 12 </Size>
<Width> 100 </Width>
<Font> KanitRegularTTF </Font>
<Color> taobinTextColorPoint[1] </Color>
<Value> taobinTextPoint[1] </Value>
</Text>
<Text>
<X> 498 </X>
<Y> 1244 </Y>
<Size> 12 </Size>
<Width> 100 </Width>
<Font> KanitRegularTTF </Font>
<Color> taobinTextColorPoint[2] </Color>
<Value> taobinTextPoint[2] </Value>
</Text>
<Text>
<X> 635 </X>
<Y> 1244 </Y>
<Size> 12 </Size>
<Width> 100 </Width>
<Font> KanitRegularTTF </Font>
<Color> taobinTextColorPoint[3] </Color>
<Value> taobinTextPoint[3] </Value>
</Text>
<Text>
<X> 765 </X>
<Y> 1244 </Y>
<Size> 12 </Size>
<Width> 100 </Width>
<Font> KanitRegularTTF </Font>
<Color> taobinTextColorPoint[4] </Color>
<Value> taobinTextPoint[4] </Value>
</Text>
<Text>
<X> 227 </X>
<Y> 1388 </Y>
<Size> 12 </Size>
<Width> 105 </Width>
<Font> KanitRegularTTF </Font>
<Color> taobinTextColorPoint[5] </Color>
<Value> taobinTextPoint[5] </Value>
</Text>
<Text>
<X> 370 </X>
<Y> 1388 </Y>
<Size> 12 </Size>
<Width> 100 </Width>
<Font> KanitRegularTTF </Font>
<Color> taobinTextColorPoint[6] </Color>
<Value> taobinTextPoint[6] </Value>
</Text>
<Text>
<X> 521 </X>
<Y> 1388 </Y>
<Size> 12 </Size>
<Width> 100 </Width>
<Font> KanitRegularTTF </Font>
<Color> taobinTextColorPoint[7] </Color>
<Value> taobinTextPoint[7] </Value>
</Text>
<Text>
<X> 634 </X>
<Y> 1388 </Y>
<Size> 12 </Size>
<Width> 100 </Width>
<Font> KanitRegularTTF </Font>
<Color> taobinTextColorPoint[8] </Color>
<Value> taobinTextPoint[8] </Value>
</Text>
<Text>
<X> 769 </X>
<Y> 1388 </Y>
<Size> 12 </Size>
<Width> 100 </Width>
<Font> KanitRegularTTF </Font>
<Color> taobinTextColorPoint[9] </Color>
<Value> taobinTextPoint[9] </Value>
</Text>
<Text>
<X> 246 </X>
<Y> 1530 </Y>
<Size> 12 </Size>
<Width> 100 </Width>
<Font> KanitRegularTTF </Font>
<Color> taobinTextColorPoint[10] </Color>
<Value> taobinTextPoint[10] </Value>
</Text>
<Text>
<X> 355 </X>
<Y> 1530 </Y>
<Size> 12 </Size>
<Width> 110 </Width>
<Font> KanitRegularTTF </Font>
<Color> taobinTextColorPoint[11] </Color>
<Value> taobinTextPoint[11] </Value>
</Text>
<Text>
<X> 515 </X>
<Y> 1530 </Y>
<Size> 12 </Size>
<Width> 100 </Width>
<Font> KanitRegularTTF </Font>
<Color> taobinTextColorPoint[12] </Color>
<Value> taobinTextPoint[12] </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>
<EventUnitTest4>
If show_eng = "true" Then
Var show_eng = "false"
Else
Var show_eng = "true"
EndIf
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_3.xml"
</EventUnitTest4>
</Popup>

View file

@ -0,0 +1,165 @@
<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
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/event/pepween/error_en"
Var ShowThaiText = "Invisible"
Var ShowEngText = "Enable"
Else
Var DirImage = "ROOT/taobin_project/image/event/pepween/error"
Var ShowThaiText = "Enable"
Var ShowEngText = "Invisible"
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var ShowCountDownBrewing = CountDownBrewing
Var Timeout = Timeout + 1
If Timeout > 5 Then
; 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"
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> 282 </X>
<Y> 611 </Y>
<State> ShowThaiText </State>
<Filename> Var( DirImage + "/text01.png" )</Filename>
</Image>
<Image>
<X> 132 </X>
<Y> 611 </Y>
<State> ShowEngText </State>
<Filename> Var( DirImage + "/text01.png" )</Filename>
</Image>
<Image>
<X> 79 </X>
<Y> 688 </Y>
<Filename> Var( DirImage + "/skull.png" )</Filename>
</Image>
<Image>
<X> 279 </X>
<Y> 1539 </Y>
<State> ShowThaiText </State>
<Filename> Var( DirImage + "/text02.png" )</Filename>
</Image>
<Image>
<X> 67 </X>
<Y> 1530 </Y>
<State> ShowEngText </State>
<Filename> Var( DirImage + "/text02.png" )</Filename>
</Image>
<Button>
<X> 424 </X>
<Y> 1710 </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>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
;
<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>
<EventUnitTest4>
If show_eng = "true" Then
Var show_eng = "false"
Else
Var show_eng = "true"
EndIf
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_error.xml"
</EventUnitTest4>
</Page>

View file

@ -0,0 +1,107 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Volume> SoundVolume </Volume>
;<Background> "0xeae6e1" </Background>
<EventOpen>
Var Timeout = 0
DEBUGVAR Timeout
</EventOpen>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
; Show error
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Width> 1080 </Width>
<Height> 1540 </Height>
<Filename> "ROOT/taobin_project/image/event/pepween/page_offline_bg.png" </Filename>
</Image>
; Broken Coffin
<Image>
<X> 264 </X>
<Y> 724 </Y>
<Filename> "ROOT/taobin_project/image/event/pepween/page_offline_brokencoff.png" </Filename>
</Image>
; Text top thai
<Image>
<X> 165 </X>
<Y> 622 </Y>
<Filename> "ROOT/taobin_project/image/event/pepween/error/text_failed_coupon.png" </Filename>
<Width> 776 </Width>
<Height> 96 </Height>
<State>
eval(
If show_eng = "true" Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
)
</State>
</Image>
; Text top eng
<Image>
<X> 68 </X>
<Y> 626 </Y>
<Filename> "ROOT/taobin_project/image/event/pepween/error_en/text_failed_coupon.png" </Filename>
<Width> 921 </Width>
<Height> 75 </Height>
<State>
eval(
If show_eng = "true" Then
Var return = "Enable"
Else
Var return = "Invisible"
EndIf
)
</State>
</Image>
<Image>
<X> 25 </X>
<Y> 1535 </Y>
<Filename> eval(
If show_eng = "true" Then
Var return = "ROOT/taobin_project/image/event/pepween/error_en/text_failed_network_disrupt.png"
Else
Var return = "ROOT/taobin_project/image/event/pepween/error/text_failed_network_disrupt.png"
EndIf
) </Filename>
<Width> 1080 </Width>
<Height> 156 </Height>
</Image>
<Button>
<X> 424 </X>
<Y> 1710 </Y>
<Filename>
eval(
If show_eng = "true" Then
Var return = "ROOT/taobin_project/image/event/pepween/error_en/bn_confirm.png"
Else
Var return = "ROOT/taobin_project/image/event/pepween/error/bn_confirm.png"
EndIf
)
</Filename>
<EventOnClick>
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
</EventOnClick>
</Button>
</Popup>

View file

@ -0,0 +1,271 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Volume> SoundVolume </Volume>
;<Background> "0xeae6e1" </Background>
<EventOpen>
Var randResult = 0
Var isCoffinPress = "Enable"
; list of random items
Var dis30 = "dis30"
Var dis50 = "dis50"
Var dis100 = "dis100"
; rate 60%
Var couponList[0] = dis30
Var couponList[1] = dis30
Var couponList[2] = dis30
Var couponList[3] = dis30
Var couponList[4] = dis30
Var couponList[5] = dis30
Var couponList[6] = dis50
Var couponList[7] = dis50
Var couponList[8] = dis50
; rate 10%
Var couponList[9] = dis100
; Coffin btn
Var CoffinBtnDir = "ROOT/taobin_project/image/event/pepween/bn_pepween_"
DEBUGVAR CoffinBtnDir
</EventOpen>
<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>
<Width> 1080 </Width>
<Height> 1540 </Height>
<Filename> "ROOT/taobin_project/image/event/pepween/bg_pepween_random.png" </Filename>
</Image>
; back --- debug
;
; disable this later
<Button>
<X> 19 </X>
<Y> 381 </Y>
<Filename> "ROOT/taobin_project/image/page2/bn_back_arrow_2.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page2/bn_back_arrow_2.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If SpiralOnline = "true" Then
If Seeker = "curr" Then
Open "ROOT/taobin_project/xml/page_catalog_with_vending.xml"
Else
Open "ROOT/taobin_project/xml/page_catalog.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_catalog.xml"
EndIf
</EventClick>
</Button>
; Thai menu
<Image>
<X> 373 </X>
<Y> 444 </Y>
<Width> 334 </Width>
<Height> 75 </Height>
<Filename> "ROOT/taobin_project/image/event/pepween/let_ghost_show_u.png" </Filename>
<State>
eval(
If show_eng = "true" Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
)
</State>
</Image>
<Image>
<X> 79 </X>
<Y> 526 </Y>
<Width> 923 </Width>
<Height> 67 </Height>
<Filename> "ROOT/taobin_project/image/event/pepween/choose_your_ghost.png" </Filename>
<State>
eval(
If show_eng = "true" Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
)
</State>
</Image>
; Eng menu
<Image>
<X> 334 </X>
<Y> 444 </Y>
<Width> 412 </Width>
<Height> 75 </Height>
<Filename> "ROOT/taobin_project/image/event/pepween/let_ghost_show_u_en.png" </Filename>
<State>
eval(
If show_eng = "true" Then
Var return = "Enable"
Else
Var return = "Invisible"
EndIf
)
</State>
</Image>
<Image>
<X> 37 </X>
<Y> 532 </Y>
<Width> 1007 </Width>
<Height> 54 </Height>
<Filename> "ROOT/taobin_project/image/event/pepween/choose_your_ghost_en.png" </Filename>
<State>
eval(
If show_eng = "true" Then
Var return = "Enable"
Else
Var return = "Invisible"
EndIf
)
</State>
</Image>
; Button top left - Caroline
<Button>
<X> 25 </X>
<Y> 857 </Y>
<State> isCoffinPress </State>
<Filename> Var( CoffinBtnDir + "top_left.png" ) </Filename>
<EventOnClick>
; Random coupon
Random2 0 10 randResult
DEBUGVAR randResult
DEBUGVAR couponList[randResult]
Var UserCouponReward = couponList[randResult]
; Send to server
Open "ROOT/taobin_project/xml/event/pepween/page_pepween_result.xml"
</EventOnClick>
</Button>
; Button top mid - Jeremy
<Button>
<X> 386 </X>
<Y> 926 </Y>
<State> isCoffinPress </State>
<Filename> Var( CoffinBtnDir + "top_mid.png" ) </Filename>
<EventOnClick>
; Random coupon
Random2 0 10 randResult
DEBUGVAR randResult
DEBUGVAR couponList[randResult]
Var UserCouponReward = couponList[randResult]
; Send to server
Open "ROOT/taobin_project/xml/event/pepween/page_pepween_result.xml"
</EventOnClick>
</Button>
; Button top right - Rosalie
<Button>
<X> 722 </X>
<Y> 855 </Y>
<State> isCoffinPress </State>
<Filename> Var( CoffinBtnDir + "top_right.png" ) </Filename>
<EventOnClick>
; Random coupon
Random2 0 10 randResult
DEBUGVAR randResult
DEBUGVAR couponList[randResult]
Var UserCouponReward = couponList[randResult]
; Send to server
Open "ROOT/taobin_project/xml/event/pepween/page_pepween_result.xml"
</EventOnClick>
</Button>
; Button bottom left - Arnold
<Button>
<X> 140 </X>
<Y> 1317 </Y>
<State> isCoffinPress </State>
<Filename> Var( CoffinBtnDir + "bottom_left.png" ) </Filename>
<EventOnClick>
; Random coupon
Random2 0 10 randResult
DEBUGVAR randResult
DEBUGVAR couponList[randResult]
Var UserCouponReward = couponList[randResult]
; Send to server
Open "ROOT/taobin_project/xml/event/pepween/page_pepween_result.xml"
</EventOnClick>
</Button>
; Button bottom right - Alnwick
<Button>
<X> 605 </X>
<Y> 1317 </Y>
<State> isCoffinPress </State>
<Filename> Var( CoffinBtnDir + "bottom_right.png" ) </Filename>
<EventOnClick>
; Random coupon
Random2 0 10 randResult
DEBUGVAR randResult
DEBUGVAR couponList[randResult]
Var UserCouponReward = couponList[randResult]
; Send to server
Open "ROOT/taobin_project/xml/event/pepween/page_pepween_result.xml"
</EventOnClick>
</Button>
; accept button
; position y not matched in figma; nearly 1776, figma 1406
<Button>
<X> 408 </X>
<Y> 1776 </Y>
<Width> 286 </Width>
<Height> 92 </Height>
<Filename> "ROOT/taobin_project/image/page_payment/bn_drink.png" </Filename>
<EventOnClick>
; TODO: implement something
</EventOnClick>
</Button>
</Popup>

View file

@ -0,0 +1,85 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Volume> SoundVolume </Volume>
;<Background> "0xeae6e1" </Background>
<EventOpen>
Var Timeout = 0
Var ServerRespond = 0
Var RewardDisplayDir = "ROOT/taobin_project/image/event/pepween/"
If show_eng = "true" Then
Var RewardDisplay = UserCouponReward + "_en.png"
Else
Var RewardDisplay = UserCouponReward + "_th.png"
EndIf
DEBUGVAR UserCouponReward
DEBUGVAR RewardDisplay
Var RewardDisplay = RewardDisplayDir + RewardDisplay
DEBUGVAR RewardDisplay
Var isCoffinPress = "Disable"
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
DEBUGVAR Timeout
If PayOfflineMode = 1 Then
Var ServerRespond = 0
Var CouponResponeFailed = 1
EndIf
If Timeout > 60 Then
; Check and return Error
Var CouponResponeFailed = 1
Open "ROOT/taobin_project/xml/event/pepween/page_pepween_error.xml"
EndIf
Var Timeout = Timeout + 1
TimerReset
</EventTimeout>
<EventActionOk>
If CouponResponeFailed = 0 Then
; TODO:
;Open "ROOT/taobin_project/xml/event/pepween/page_pepween_error.xml"
EndIf
</EventActionOk>
<EventActionError>
; TODO: open coupon send error page
If CouponResponeFailed = 1 Then
Open "ROOT/taobin_project/xml/event/pepween/page_pepween_error.xml"
EndIf
</EventActionError>
<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>
<Width> 1080 </Width>
<Height> 1540 </Height>
<Filename> RewardDisplay </Filename>
</Image>
<EventUnitTest1>
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
</EventUnitTest1>
</Popup>

File diff suppressed because it is too large Load diff

View file

@ -1,3 +1,6 @@
DEBUGVAR NetworkStatus
DEBUGVAR SELLONLINE
DEBUGVAR PayOfflineMode
; zone promote
If OpenFromPageBoard = 1 Then
@ -13,12 +16,40 @@ If OpenFromPageBoard = 1 Then
EndIf
Else
If PepweenEnable = 1 Then
; Temporary debug
Var BigButtonEnable = "Enable"
Open "ROOT/taobin_project/xml/event/promotion_pepween.xml"
;If NetworkStatus = "DEACTIVE" Then
; Open "ROOT/taobin_project/xml/page_catalog_group_recommend.xml"
;Else
; If NetworkStatus = "DOWN" Then
; Open "ROOT/taobin_project/xml/page_catalog_group_recommend.xml"
;
; Else
; Var BigButtonEnable = "Enable"
; Open "ROOT/taobin_project/xml/event/promotion_pepween.xml"
; EndIf
;EndIf
If TamatianEnable = 1 Then
Var BigButtonEnable = "Enable"
Open "ROOT/taobin_project/xml/event/promotion_Tamatian.xml"
Else
Open "ROOT/taobin_project/xml/page_catalog_group_recommend.xml"
If TamatianEnable = 1 Then
Var BigButtonEnable = "Enable"
Open "ROOT/taobin_project/xml/event/promotion_Tamatian.xml"
Else
Open "ROOT/taobin_project/xml/page_catalog_group_recommend.xml"
EndIf
EndIf
EndIf
Var OpenFromPageBoard = 0

View file

@ -32,12 +32,16 @@ Var MomDayEnable = 0
; Enable app game
Var GameEnableFromTrickerEv = 0
; Enable pro Pepween
Var PepweenEnable = 1
; Enable pro Tamatian. 16-30 Sep
Var TamatianEnable = 0
; September 9 - 16
Var MayDayRunEnable = 0
If SystemDateMonthInt = 9 Then
If SystemDateDayInt > 5 Then
If SystemDateDayInt < 17 Then
@ -66,10 +70,25 @@ EndIf
If SystemDateMonthInt = 10 Then
Var GameEnableFromTrickerEv = 1
If SystemDateDayInt < 16 Then
Var GameEnableFromTrickerEv = 1
EndIf
If SystemDateDayInt > 15 Then
Var PepweenEnable = 1
EndIf
EndIf
DEBUGVAR PepweenEnable
If SystemDateMonthInt = 11 Then
Var PepweenEnable = 0
EndIf
If MelonSyrupEnable = "false" Then
Var MayDayRunEnable = 0
EndIf
@ -140,6 +159,9 @@ If BoxID = 200580 Then
Var MayDayRunEnable = 1
EndIf
If BoxID = 105005 Then
Var PepweenEnable = 1
EndIf
Var MayDayRunEnable = 0
@ -177,6 +199,7 @@ If InternationalEnable = 1 Then
Var PepsiPromoteVideo = 0
Var PepsiProCodeEnable = 0
Var MysteryProEnable = 0
Var PepweenEnable = 0
EndIf

View file

@ -75,6 +75,7 @@
Var RobotoBold = "ROOT/taobin_project/font/Roboto/Roboto-Bold.ttf"
Var RobotoBlack = "ROOT/taobin_project/font/Roboto/Roboto-Black.ttf"
Var RobotoRegular = "ROOT/taobin_project/font/Roboto/Roboto-Regular.ttf"
Var RobotoThin = "ROOT/taobin_project/font/Roboto/Roboto-Thin.ttf"
Var KanitMediumTTF = "ROOT/taobin_project/font/Kanit/Kanit-Regular.ttf"
Var KanitRegularTTF = "ROOT/taobin_project/font/Kanit/Kanit-Regular.ttf"

File diff suppressed because it is too large Load diff

View file

@ -103,8 +103,15 @@
;GetAccInfo TelephoneNumber OperatorTemp CreditAmount OperatorStatus AccountType GetScore tc
Var Param1 = TelephoneNumber + "/"
Var Param1 = Param1 + ParamCP
GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
If PepweenEnable = 1 Then
GETACCEXT TelephoneNumber 31
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"
Else
GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
EndIf
EndIf
Else
@ -130,8 +137,13 @@
;GetAccInfo TelephoneNumber OperatorTemp CreditAmount OperatorStatus AccountType GetScore tc
Var Param1 = TelephoneNumber + "/"
Var Param1 = Param1 + ParamCP
GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
If PepweenEnable = 1 Then
GETACCEXT TelephoneNumber 31
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"
Else
GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
EndIf
EndIf
@ -601,13 +613,15 @@
Var Param1 = TelephoneNumber + "/"
Var Param1 = Param1 + ParamCP
GETACCEXT Param1 23
;Open "ROOT/taobin_project/xml/page_catalog.xml"
If PepweenEnable = 1 Then
GETACCEXT TelephoneNumber 31
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"
Else
GETACCEXT Param1 23
;Open "ROOT/taobin_project/xml/page_catalog.xml"
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
EndIf
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
Else
If show_eng = "true" Then