diff --git a/image/event/nam_hom_coconut/display_point/bg_bottom.png b/image/event/nam_hom_coconut/display_point/bg_bottom.png new file mode 100644 index 00000000..ae5113db Binary files /dev/null and b/image/event/nam_hom_coconut/display_point/bg_bottom.png differ diff --git a/image/event/nam_hom_coconut/display_point/bg_top.png b/image/event/nam_hom_coconut/display_point/bg_top.png new file mode 100644 index 00000000..0f18d54a Binary files /dev/null and b/image/event/nam_hom_coconut/display_point/bg_top.png differ diff --git a/image/event/nam_hom_coconut/display_point/coconut_point.png b/image/event/nam_hom_coconut/display_point/coconut_point.png new file mode 100644 index 00000000..c920c74c Binary files /dev/null and b/image/event/nam_hom_coconut/display_point/coconut_point.png differ diff --git a/image/event/nam_hom_coconut/display_point/coconut_point_active.png b/image/event/nam_hom_coconut/display_point/coconut_point_active.png new file mode 100644 index 00000000..6ab5b014 Binary files /dev/null and b/image/event/nam_hom_coconut/display_point/coconut_point_active.png differ diff --git a/image/event/nam_hom_coconut/display_point/continue_btn.png b/image/event/nam_hom_coconut/display_point/continue_btn.png new file mode 100644 index 00000000..4bedc95a Binary files /dev/null and b/image/event/nam_hom_coconut/display_point/continue_btn.png differ diff --git a/image/event/nam_hom_coconut/display_point/continue_en_btn.png b/image/event/nam_hom_coconut/display_point/continue_en_btn.png new file mode 100644 index 00000000..5a6b4be8 Binary files /dev/null and b/image/event/nam_hom_coconut/display_point/continue_en_btn.png differ diff --git a/image/event/nam_hom_coconut/display_point/random_btn.png b/image/event/nam_hom_coconut/display_point/random_btn.png new file mode 100644 index 00000000..1e3bb71b Binary files /dev/null and b/image/event/nam_hom_coconut/display_point/random_btn.png differ diff --git a/image/event/nam_hom_coconut/display_point/random_btn_en.png b/image/event/nam_hom_coconut/display_point/random_btn_en.png new file mode 100644 index 00000000..f399d784 Binary files /dev/null and b/image/event/nam_hom_coconut/display_point/random_btn_en.png differ diff --git a/image/event/nam_hom_coconut/display_point/tao_drink_coconut.png b/image/event/nam_hom_coconut/display_point/tao_drink_coconut.png new file mode 100644 index 00000000..8c56be7e Binary files /dev/null and b/image/event/nam_hom_coconut/display_point/tao_drink_coconut.png differ diff --git a/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_2.xml b/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_2.xml new file mode 100644 index 00000000..63f25a27 --- /dev/null +++ b/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_2.xml @@ -0,0 +1,672 @@ + + "Enable" + 1080 + 1920 + "0xeae6e1" + SoundVolume + + + ; On open + + Var Timeout = 0 + SAVELOG UnitTestType + + 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 + + Var Seeker.IsLineMember = 0 + Var SuperSetOutOfStock = 0 + Var BalanceEssenceTonerOutOfStock = 0 + + 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/nam_hom_coconut/page_collect_point_nam_hom_coconut_error.xml" + EndIf + + + 1000 + + 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/nam_hom_coconut/page_collect_point_nam_hom_coconut_error.xml" + + EndIf + + TimerReset + Refresh + + + + + + + + Open "/media/bt/xml/security_alarm.xml" + + + + 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/nam_hom_coconut/page_collect_point_nam_hom_coconut_error.xml" + + Else + Var TaobinName = Ext1b + Var TelephoneNumber = TelephoneNumberX + Var TNumberTaobinMemberXXX = TelephoneNumber + Var Seeker.IsAlreadyGetReward = Ext1c + Var SuperSetOutOfStock = Ext1d + Var BalanceEssenceTonerOutOfStock = Ext1e + Var CleansingGalOutOfStock = Ext1f + Var ClearGalOutOfStock = Ext1g + + ;DEBUG + ;Var SuperSetOutOfStock = 1 + ;Var BalanceEssenceTonerOutOfStock = 1 + ;Var CleansingGalOutOfStock = 1 + ;Var ClearGalOutOfStock = Ext1g + + + DEBUGVAR SuperSetOutOfStock + DEBUGVAR BalanceEssenceTonerOutOfStock + DEBUGVAR CleansingGalOutOfStock + DEBUGVAR ClearGalOutOfStock + + If TaobinName = "" Then + Var Seeker.IsLineMember = 0 + Else + If TaobinName = "-" Then + Var Seeker.IsLineMember = 0 + Else + Var Seeker.IsLineMember = 1 + EndIf + EndIf + + + If Seeker.IsLineMember = 0 Then + SAVELOG "Not Line Member skip to normal collect point." + If Seeker.CodeChannel = 1 Then + If Seeker.CollectPointMain = 1 Then + GETACCEXT Param1 23 + Open "ROOT/taobin_project/xml/page_collect_point_2.xml" + Else + Open "ROOT/taobin_project/xml/page_lid_straw.xml" + EndIf + Else + GETACCEXT Param1 23 + Open "ROOT/taobin_project/xml/page_collect_point_2.xml" + EndIf + EndIf + + If Seeker.IsAlreadyGetReward = 1 Then + SAVELOG "Already get reward skip to normal collect point." + If Seeker.CodeChannel = 1 Then + If Seeker.CollectPointMain = 1 Then + GETACCEXT Param1 23 + Open "ROOT/taobin_project/xml/page_collect_point_2.xml" + Else + Open "ROOT/taobin_project/xml/page_lid_straw.xml" + EndIf + Else + GETACCEXT Param1 23 + Open "ROOT/taobin_project/xml/page_collect_point_2.xml" + EndIf + EndIf + + If SuperSetOutOfStock = 1 Then + If BalanceEssenceTonerOutOfStock = 1 Then + If CleansingGalOutOfStock = 1 Then + If ClearGalOutOfStock = 1 Then + SAVELOG "All reward out of stock skip to normal collect point." + + WRITE_FILE "/mnt/sdcard/nam_hom_coconut_reward_out_of_stock" "1" + + If Seeker.CodeChannel = 1 Then + If Seeker.CollectPointMain = 1 Then + GETACCEXT Param1 23 + Open "ROOT/taobin_project/xml/page_collect_point_2.xml" + Else + Open "ROOT/taobin_project/xml/page_lid_straw.xml" + EndIf + Else + GETACCEXT Param1 23 + Open "ROOT/taobin_project/xml/page_collect_point_2.xml" + EndIf + EndIf + EndIf + EndIf + EndIf + + + + 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 + Var PointState[9] = 0 + + If show_eng = "true" Then + Var MenuPointName[0] = "Hat Yai\nBeach coconut" + Var MenuPointName[1] = "Bangsaen\nBeach Coconut" + Var MenuPointName[2] = "Jomtien\nBeach Coconut" + Var MenuPointName[3] = "Nang Ram\nBeach Coconut" + Var MenuPointName[4] = "Glass Sand\nBeach Coconut" + Var MenuPointName[5] = "Mae Pim\nBeach Coconut" + Var MenuPointName[6] = "Moonlight\nBeach Coconut" + Var MenuPointName[7] = "Pattaya\nBeach Coconut" + Var MenuPointName[8] = "Suan Son\nBeach Coconut" + Var MenuPointName[9] = "Laem Sing\nBeach Coconut" + Var MenuPointName[10] = "Toem Rak\nBeach Coconut" + Var MenuPointName[11] = "Long\nBeach Coconut" + Var MenuPointName[12] = "Hat\nBeach Coconut" + Else + Var MenuPointName[0] = "มะพร้าวหาดใหญ่(มาก)" + Var MenuPointName[1] = "มะพร้าวหาดบางแสน\n(ห้า)" + Var MenuPointName[2] = "มะพร้าวหาดจอมเทียน\n(พรรษา)" + Var MenuPointName[3] = "มะพร้าวหาดนางรำ\n(สวย)" + Var MenuPointName[4] = "มะพร้าวหาดทรายแก้ว\n(มังกร)" + Var MenuPointName[5] = "มะพร้าวหาดแม่พิมพ์\n(ดีด)" + Var MenuPointName[6] = "มะพร้าวหาดแสงจันทร์\n(ไรอะ)" + Var MenuPointName[7] = "มะพร้าวหาดพัทยา\n(พารา)" + Var MenuPointName[8] = "มะพร้าวหาดสวนสน\n(ใจไหม)" + Var MenuPointName[9] = "มะพร้าวหาดแหลมสิง\n(หไกรภพ)" + Var MenuPointName[10] = "มะพร้าวหาดเติมรัก(ฉันทำไม)" + Var MenuPointName[11] = "มะพร้าวหาดยาว\n(ไปยาวไป)" + Var MenuPointName[12] = "มะพร้าวหาด(ใกล้ฉัน)" + EndIf + + + + DEBUGVAR Ext1a + + SPLIT Ext1a "/" 1 MenuPoint[0] + SPLIT Ext1a "/" 2 MenuPoint[1] + SPLIT Ext1a "/" 3 MenuPoint[2] + SPLIT Ext1a "/" 4 MenuPoint[3] + SPLIT Ext1a "/" 5 MenuPoint[4] + SPLIT Ext1a "/" 6 MenuPoint[5] + SPLIT Ext1a "/" 7 MenuPoint[6] + SPLIT Ext1a "/" 8 MenuPoint[7] + SPLIT Ext1a "/" 9 MenuPoint[8] + SPLIT Ext1a "/" 10 MenuPoint[9] + SPLIT Ext1a "/" 11 MenuPoint[10] + SPLIT Ext1a "/" 12 MenuPoint[11] + SPLIT Ext1a "/" 13 MenuPoint[12] + + INT MenuPoint[0] + INT MenuPoint[1] + INT MenuPoint[2] + INT MenuPoint[3] + INT MenuPoint[4] + INT MenuPoint[5] + INT MenuPoint[6] + INT MenuPoint[7] + INT MenuPoint[8] + INT MenuPoint[9] + INT MenuPoint[10] + INT MenuPoint[11] + INT MenuPoint[12] + + DEBUGVAR MenuPoint[0] + DEBUGVAR MenuPoint[1] + DEBUGVAR MenuPoint[2] + DEBUGVAR MenuPoint[3] + DEBUGVAR MenuPoint[4] + DEBUGVAR MenuPoint[5] + DEBUGVAR MenuPoint[6] + DEBUGVAR MenuPoint[7] + DEBUGVAR MenuPoint[8] + DEBUGVAR MenuPoint[9] + DEBUGVAR MenuPoint[10] + DEBUGVAR MenuPoint[11] + DEBUGVAR MenuPoint[12] + + Var CurrentIndexPoint = -1 + + If MenuPoint[0] = 1 Then + Var CurrentIndexPoint = CurrentIndexPoint + 1 + Var PointState[CurrentIndexPoint] = 1 + Var PointState[CurrentIndexPoint].name = MenuPointName[0] + EndIf + + If MenuPoint[1] = 1 Then + Var CurrentIndexPoint = CurrentIndexPoint + 1 + Var PointState[CurrentIndexPoint] = 1 + Var PointState[CurrentIndexPoint].name = MenuPointName[1] + EndIf + + If MenuPoint[2] = 1 Then + Var CurrentIndexPoint = CurrentIndexPoint + 1 + Var PointState[CurrentIndexPoint] = 1 + Var PointState[CurrentIndexPoint].name = MenuPointName[2] + EndIf + + If MenuPoint[3] = 1 Then + Var CurrentIndexPoint = CurrentIndexPoint + 1 + Var PointState[CurrentIndexPoint] = 1 + Var PointState[CurrentIndexPoint].name = MenuPointName[3] + EndIf + + If MenuPoint[4] = 1 Then + Var CurrentIndexPoint = CurrentIndexPoint + 1 + Var PointState[CurrentIndexPoint] = 1 + Var PointState[CurrentIndexPoint].name = MenuPointName[4] + EndIf + + If MenuPoint[5] = 1 Then + Var CurrentIndexPoint = CurrentIndexPoint + 1 + Var PointState[CurrentIndexPoint] = 1 + Var PointState[CurrentIndexPoint].name = MenuPointName[5] + EndIf + + If MenuPoint[6] = 1 Then + Var CurrentIndexPoint = CurrentIndexPoint + 1 + Var PointState[CurrentIndexPoint] = 1 + Var PointState[CurrentIndexPoint].name = MenuPointName[6] + EndIf + + If MenuPoint[7] = 1 Then + Var CurrentIndexPoint = CurrentIndexPoint + 1 + Var PointState[CurrentIndexPoint] = 1 + Var PointState[CurrentIndexPoint].name = MenuPointName[7] + EndIf + + If MenuPoint[8] = 1 Then + Var CurrentIndexPoint = CurrentIndexPoint + 1 + Var PointState[CurrentIndexPoint] = 1 + Var PointState[CurrentIndexPoint].name = MenuPointName[8] + EndIf + + If MenuPoint[9] = 1 Then + Var CurrentIndexPoint = CurrentIndexPoint + 1 + Var PointState[CurrentIndexPoint] = 1 + Var PointState[CurrentIndexPoint].name = MenuPointName[9] + EndIf + + If MenuPoint[10] = 1 Then + Var CurrentIndexPoint = CurrentIndexPoint + 1 + Var PointState[CurrentIndexPoint] = 1 + Var PointState[CurrentIndexPoint].name = MenuPointName[10] + EndIf + + If MenuPoint[11] = 1 Then + Var CurrentIndexPoint = CurrentIndexPoint + 1 + Var PointState[CurrentIndexPoint] = 1 + Var PointState[CurrentIndexPoint].name = MenuPointName[11] + EndIf + + If MenuPoint[12] = 1 Then + Var CurrentIndexPoint = CurrentIndexPoint + 1 + Var PointState[CurrentIndexPoint] = 1 + Var PointState[CurrentIndexPoint].name = MenuPointName[12] + EndIf + + ; Menu 1 + If Seeker.selected_a_drink = "12-01-02-0068" Then + If MenuPoint[0] = 1 then + + Else + Var MenuPoint[0] = 1 + Var newPointIndex = 0 + EndIf + EndIf + + If Seeker.selected_a_drink = "12-21-02-0068" Then + If MenuPoint[0] = 1 then + + Else + Var MenuPoint[0] = 1 + Var newPointIndex = 0 + EndIf + EndIf + + + ; Menu 2 + If Seeker.selected_a_drink = "12-05-03-0092" Then + If MenuPoint[1] = 1 then + + Else + Var MenuPoint[1] = 1 + Var newPointIndex = 1 + EndIf + EndIf + + + ; Menu 3 + If Seeker.selected_a_drink = "12-03-02-0058" Then + If MenuPoint[2] = 1 then + + Else + Var MenuPoint[2] = 1 + Var newPointIndex = 2 + EndIf + EndIf + + If Seeker.selected_a_drink = "12-03-03-0058" Then + If MenuPoint[2] = 1 then + + Else + Var MenuPoint[2] = 1 + Var newPointIndex = 2 + EndIf + EndIf + + + ; Menu 4 + If Seeker.selected_a_drink = "12-03-02-0059" Then + If MenuPoint[3] = 1 then + + Else + Var MenuPoint[3] = 1 + Var newPointIndex = 3 + EndIf + EndIf + + If Seeker.selected_a_drink = "12-03-03-0059" Then + If MenuPoint[3] = 1 then + + Else + Var MenuPoint[3] = 1 + Var newPointIndex = 3 + EndIf + EndIf + + + ; Menu 5 + If Seeker.selected_a_drink = "12-02-02-0060" Then + If MenuPoint[4] = 1 then + + Else + Var MenuPoint[4] = 1 + Var newPointIndex = 4 + EndIf + EndIf + + If Seeker.selected_a_drink = "12-02-03-0060" Then + If MenuPoint[4] = 1 then + + Else + Var MenuPoint[4] = 1 + Var newPointIndex = 4 + EndIf + EndIf + + + ; Menu 6 + If Seeker.selected_a_drink = "12-02-02-0061" Then + If MenuPoint[5] = 1 then + + Else + Var MenuPoint[5] = 1 + Var newPointIndex = 5 + EndIf + EndIf + + If Seeker.selected_a_drink = "12-02-03-0061" Then + If MenuPoint[5] = 1 then + + Else + Var MenuPoint[5] = 1 + Var newPointIndex = 5 + EndIf + EndIf + + + ; Menu 7 + If Seeker.selected_a_drink = "12-02-02-0062" Then + If MenuPoint[6] = 1 then + + Else + Var MenuPoint[6] = 1 + Var newPointIndex = 6 + EndIf + EndIf + + If Seeker.selected_a_drink = "12-02-03-0062" Then + If MenuPoint[6] = 1 then + + Else + Var MenuPoint[6] = 1 + Var newPointIndex = 6 + EndIf + EndIf + + + ; Menu 8 + If Seeker.selected_a_drink = "12-02-02-0063" Then + If MenuPoint[7] = 1 then + + Else + Var MenuPoint[7] = 1 + Var newPointIndex = 7 + EndIf + EndIf + + If Seeker.selected_a_drink = "12-02-03-0063" Then + If MenuPoint[7] = 1 then + + Else + Var MenuPoint[7] = 1 + Var newPointIndex = 7 + EndIf + EndIf + + + ; Menu 9 + If Seeker.selected_a_drink = "12-02-02-0064" Then + If MenuPoint[8] = 1 then + + Else + Var MenuPoint[8] = 1 + Var newPointIndex = 8 + EndIf + EndIf + + If Seeker.selected_a_drink = "12-02-03-0064" Then + If MenuPoint[8] = 1 then + + Else + Var MenuPoint[8] = 1 + Var newPointIndex = 8 + EndIf + EndIf + + + ; Menu 10 + If Seeker.selected_a_drink = "12-02-02-0065" Then + If MenuPoint[9] = 1 then + + Else + Var MenuPoint[9] = 1 + Var newPointIndex = 9 + EndIf + EndIf + + If Seeker.selected_a_drink = "12-02-03-0065" Then + If MenuPoint[9] = 1 then + + Else + Var MenuPoint[9] = 1 + Var newPointIndex = 9 + EndIf + EndIf + + + ; Menu 11 + If Seeker.selected_a_drink = "12-05-02-0090" Then + If MenuPoint[10] = 1 then + + Else + Var MenuPoint[10] = 1 + Var newPointIndex = 10 + EndIf + EndIf + + + ; Menu 12 + If Seeker.selected_a_drink = "12-05-02-0091" Then + If MenuPoint[11] = 1 then + + Else + Var MenuPoint[11] = 1 + Var newPointIndex = 11 + EndIf + EndIf + + If Seeker.selected_a_drink = "12-05-03-0091" Then + If MenuPoint[11] = 1 then + + Else + Var MenuPoint[11] = 1 + Var newPointIndex = 11 + EndIf + EndIf + + + ; Menu 13 + If Seeker.selected_a_drink = "12-05-02-0093" Then + If MenuPoint[12] = 1 then + + Else + Var MenuPoint[12] = 1 + Var newPointIndex = 12 + EndIf + EndIf + + DEBUGVAR Seeker.selected_a_drink + DEBUGVAR newPointIndex + + DEBUGVAR Seeker.PointTaobinStr + DEBUGVAR Seeker.TNumberTaobinMember + + Open "ROOT/taobin_project/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_3.xml" + EndIf + + + + + + Var Seeker.TaobinErrorNetwork = 1 + + Var Seeker.PointTaobinStr = ParamCP + Var TelephoneNumber = TelephoneNumberX + Var Seeker.TNumberTaobinMember= TelephoneNumber + Var CollectPointError = "collect" + Open "ROOT/taobin_project/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_error.xml" + + + + + + If MachineStage = "drink-success" Then + Var MachineState_Result = 1 + EndIf + + If MachineStage = "drink-failed" Then + Var MachineState_Result = 2 + EndIf + + + + + + 178 + 680 + Var( DirImage + "/text20.png" ) + + + +; +; 0 +; 0 +; "ROOT/taobin_project/image/ad_medium_2.png" +; + + + + + 0 + 873 + 1080 + Center + 62 + RobotoBlack + 0x513C2F + TelephoneNumber + Telnum-mask-1 + + + +; + + 751 + 413 + IMG_CNT + +; + + XPosiShowCountDownBrew + 470 + End + 153 + 88 + RobotoBold + 0x513C2F + ShowCountDownBrewing + + + + + \ No newline at end of file diff --git a/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_3.xml b/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_3.xml new file mode 100644 index 00000000..f3e0801d --- /dev/null +++ b/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_3.xml @@ -0,0 +1,633 @@ + + "Enable" + 1080 + 1920 + "0xeae6e1" + SoundVolume + + + ; On open + + Var Timeout = 0 + Var BmiYear = "0/0/0/0/0/0/0/0/0/1" + Var PointCrm = "pdpa1" + Var GetScore = "" + Var TelephoneNumber = TelephoneNumberX + Var Seeker.TNumberTaobinMember = TelephoneNumber + + Var PointMaskState = "Invisible" + Var showRandomBtnState = "Invisible" + Var showCloseBtnState = "Enable" + + Var CoffeePointStr = CoffeePoint + + DEBUGVAR TelephoneNumber + DEBUGVAR TelephoneNumberX + + Var DirImage = "ROOT/taobin_project/image/event/nam_hom_coconut/display_point" + + If show_eng = "true" Then + Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png" + Else + Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png" + EndIf + + Var CheckCoupons = 0 + Var MakeDrinkState = 0 + + Var taobinImgPoint[0] = "/coconut_point.png" + Var taobinImgPoint[1]= "/coconut_point.png" + Var taobinImgPoint[2]= "/coconut_point.png" + Var taobinImgPoint[3]= "/coconut_point.png" + Var taobinImgPoint[4]= "/coconut_point.png" + Var taobinImgPoint[5]= "/coconut_point.png" + Var taobinImgPoint[6]= "/coconut_point.png" + Var taobinImgPoint[7]= "/coconut_point.png" + Var taobinImgPoint[8]= "/coconut_point.png" + Var taobinImgPoint[9]= "/coconut_point.png" + + Var PointCount = 0 + + If show_eng = "true" Then + Var taobinTextPoint[0] = "Hat Yai\nBeach coconut" + Var taobinTextPoint[1] = "Bangsaen\nBeach Coconut" + Var taobinTextPoint[2] = "Jomtien\nBeach Coconut" + Var taobinTextPoint[3] = "Nang Ram\nBeach Coconut" + Var taobinTextPoint[4] = "Glass Sand\nBeach Coconut" + Var taobinTextPoint[5] = "Mae Pim\nBeach Coconut" + Var taobinTextPoint[6] = "Moonlight\nBeach Coconut" + Var taobinTextPoint[7] = "Pattaya\nBeach Coconut" + Var taobinTextPoint[8] = "Suan Son\nBeach Coconut" + Var taobinTextPoint[9] = "Laem Sing\nBeach Coconut" + Var taobinTextPoint[10] = "Toem Rak\nBeach Coconut" + Var taobinTextPoint[11] = "Long\nBeach Coconut" + Var taobinTextPoint[12] = "Hat\nBeach Coconut" + Else + Var taobinTextPoint[0] = "มะพร้าวหาดใหญ่(มาก)" + Var taobinTextPoint[1] = "มะพร้าวหาดบางแสน\n(ห้า)" + Var taobinTextPoint[2] = "มะพร้าวหาดจอมเทียน\n(พรรษา)" + Var taobinTextPoint[3] = "มะพร้าวหาดนางรำ\n(สวย)" + Var taobinTextPoint[4] = "มะพร้าวหาดทรายแก้ว\n(มังกร)" + Var taobinTextPoint[5] = "มะพร้าวหาดแม่พิมพ์\n(ดีด)" + Var taobinTextPoint[6] = "มะพร้าวหาดแสงจันทร์\n(ไรอะ)" + Var taobinTextPoint[7] = "มะพร้าวหาดพัทยา\n(พารา)" + Var taobinTextPoint[8] = "มะพร้าวหาดสวนสน\n(ใจไหม)" + Var taobinTextPoint[9] = "มะพร้าวหาดแหลมสิง\n(หไกรภพ)" + Var taobinTextPoint[10] = "มะพร้าวหาดเติมรัก(ฉันทำไม)" + Var taobinTextPoint[11] = "มะพร้าวหาดยาว\n(ไปยาวไป)" + Var taobinTextPoint[12] = "มะพร้าวหาด(ใกล้ฉัน)" + EndIf + + + + Var taobinTextColorPoint[0] = "0x000000" + Var taobinTextColorPoint[1] = "0x000000" + Var taobinTextColorPoint[2] = "0x000000" + Var taobinTextColorPoint[3] = "0x000000" + Var taobinTextColorPoint[4] = "0x000000" + Var taobinTextColorPoint[5] = "0x000000" + Var taobinTextColorPoint[6] = "0x000000" + Var taobinTextColorPoint[7] = "0x000000" + Var taobinTextColorPoint[8] = "0x000000" + Var taobinTextColorPoint[9] = "0x000000" + + 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] + DEBUGVAR PointState[9] + + Var PointRootDir = "ROOT/taobin_project/image/event/lipit/display_point" + + If PointState[0] = 1 Then + Var PointCount = PointCount + 1 + Var taobinImgPoint[0] = "/coconut_point_active.png" + EndIf + If PointState[1] = 1 Then + Var PointCount = PointCount + 1 + Var taobinImgPoint[1] = "/coconut_point_active.png" + EndIf + If PointState[2] = 1 Then + Var PointCount = PointCount + 1 + Var taobinImgPoint[2] = "/coconut_point_active.png" + EndIf + If PointState[3] = 1 Then + Var PointCount = PointCount + 1 + Var taobinImgPoint[3] = "/coconut_point_active.png" + EndIf + If PointState[4] = 1 Then + Var PointCount = PointCount + 1 + Var taobinImgPoint[4] = "/coconut_point_active.png" + EndIf + If PointState[5] = 1 Then + Var PointCount = PointCount + 1 + Var taobinImgPoint[5] = "/coconut_point_active.png" + EndIf + If PointState[6] = 1 Then + Var PointCount = PointCount + 1 + Var taobinImgPoint[6] = "/coconut_point_active.png" + EndIf + If PointState[7] = 1 Then + Var PointCount = PointCount + 1 + Var taobinImgPoint[7] = "/coconut_point_active.png" + EndIf + If PointState[8] = 1 Then + Var PointCount = PointCount + 1 + Var taobinImgPoint[8] = "/coconut_point_active.png" + EndIf + If PointState[9] = 1 Then + Var PointCount = PointCount + 1 + Var taobinImgPoint[9] = "/coconut_point_active.png" + EndIf + + Var PointDiff = 10 - PointCount + + If show_eng = "true" Then + Var MemberText = "สถานะสมาชิก" + Var MissionText = "ฝ่าไอร้อนพิชิตไอเท่มหน้าใส" + + Var TaobinLevelDesc1 = "You have " + PointDiff + Var TaobinLevelDesc1 = TaobinLevelDesc1 + " more fresh menus left to unlock CURA-MD" + Var TaobinLevelDesc2 = "Collect 10 menu items to receive an acne-free complexion prize." + + Var subTitle_Y = 839 + + Var text8_X = 224 + + Else + Var MemberText = "HELLO PAL, WANNA FELL FRESH?" + Var MissionText = "BEAT THE HEAT, GO!" + + Var TaobinLevelDesc1 = "เหลืออีก " + PointDiff + Var TaobinLevelDesc1 = TaobinLevelDesc1 + " เมนูที่จะได้กดสุ่มรางวัลจาก CURA-MD" + Var TaobinLevelDesc2 = "สะสมให้ครบ 10 เมนูมะพร้าวแสนแล้วมาลุ้นกัน!" + + Var subTitle_Y = 853 + + Var text8_X = 346 + + EndIf + + If PointCount = 10 Then + Var showRandomBtnState = "Enable" + Var showCloseBtnState = "Invisible" + EndIf + + Var CurrentPointSlot = newPointIndex + 1 + + Var UpdatePoint = 0 + + + 1000 + + + 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 + Var UpdatePoint = 1 + EndIf + + + + TimerReset + Refresh + + + + + + + + + + If UpdatePoint = 1 Then + If Seeker.CodeChannel = 1 Then + If Seeker.CollectPointMain = 1 Then + GETACCEXT Param1 23 + Open "ROOT/taobin_project/xml/page_collect_point_2.xml" + Else + Open "ROOT/taobin_project/xml/page_lid_straw.xml" + EndIf + Else + GETACCEXT Param1 23 + Open "ROOT/taobin_project/xml/page_collect_point_2.xml" + EndIf + EndIf + + + + + Open "/media/bt/xml/security_alarm.xml" + + + + + If MachineStage = "drink-success" Then + Var MachineState_Result = 1 + EndIf + + If MachineStage = "drink-failed" Then + Var MachineState_Result = 2 + EndIf + + + + + + 0 + 380 + "ROOT/taobin_project/image/display_point/alpha.png" + + + +; + + + + + + 158 + 665 + Var( PointRootDir + "/bg_top.png" ) + + + + 158 + 1085 + Var( PointRootDir + "/bg_bottom.png" ) + + + + 243 + 722 + 360 + 36 + 24 + KanitMediumTTF + MemberText + + + + + 243 + 850 + 360 + 48 + 32 + KanitMediumTTF + MissionText + + + + + 619 + 732 + Var( PointRootDir + "/tao_drink_coconut.png" ) + +; + + + + 243 + 758 + 36 + 480 + 42 + RobotoBold + 0x513C2F + TaobinName + + + + 243 + 800 + 14 + 90 + RobotoRegular + 0x746253 + TNumberTaobinMemberXXX + Telnum-mask-1 + + +; Header + + 247 + 902 + 48 + 56 + 56 + RobotoBold + 0xDE794E + PointCount + + + + 247 + 970 + 25 + 500 + 30 + RobotoBold + 0xDE794E + TaobinLevelDesc1 + + + + 247 + 1001 + 20 + 500 + 30 + KanitRegularTTF + 0x746253 + TaobinLevelDesc2 + + + + + 243 + 1147 + Var( PointRootDir + taobinImgPoint[0]) + + + + 378 + 1147 + Var( PointRootDir + taobinImgPoint[1]) + + + + 513 + 1147 + Var( PointRootDir + taobinImgPoint[2]) + + + + 647 + 1147 + Var( PointRootDir + taobinImgPoint[3]) + + + + 782 + 1147 + Var( PointRootDir + taobinImgPoint[4]) + + + + + 243 + 1338 + Var( PointRootDir + taobinImgPoint[5]) + + + + 378 + 1338 + Var( PointRootDir + taobinImgPoint[6]) + + + + 513 + 1338 + Var( PointRootDir + taobinImgPoint[7]) + + + + 647 + 1338 + Var( PointRootDir + taobinImgPoint[8]) + + + + 782 + 1338 + Var( PointRootDir + taobinImgPoint[9]) + + + + + 216 + 1256 + 12 + 123 + KanitRegularTTF + taobinTextColorPoint[0] + taobinTextPoint[0] + center-vertical-horizontal + + + + + 352 + 1256 + 12 + 123 + KanitRegularTTF + taobinTextColorPoint[1] + taobinTextPoint[1] + center-vertical-horizontal + + + + + 488 + 1256 + 12 + 123 + KanitRegularTTF + taobinTextColorPoint[2] + taobinTextPoint[2] + center-vertical-horizontal + + + + 624 + 1256 + 12 + 123 + KanitRegularTTF + taobinTextColorPoint[3] + taobinTextPoint[3] + center-vertical-horizontal + + + + + 760 + 1256 + 12 + 123 + KanitRegularTTF + taobinTextColorPoint[4] + taobinTextPoint[4] + center-vertical-horizontal + + + + + 216 + 1451 + 12 + 123 + KanitRegularTTF + taobinTextColorPoint[5] + taobinTextPoint[5] + center-vertical-horizontal + + + + + 352 + 1451 + 12 + 123 + KanitRegularTTF + taobinTextColorPoint[6] + taobinTextPoint[6] + center-vertical-horizontal + + + + 488 + 1451 + 12 + 123 + KanitRegularTTF + taobinTextColorPoint[7] + taobinTextPoint[7] + center-vertical-horizontal + + + + 624 + 1451 + 12 + 123 + KanitRegularTTF + taobinTextColorPoint[8] + taobinTextPoint[8] + center-vertical-horizontal + + + + 760 + 1451 + 12 + 123 + KanitRegularTTF + taobinTextColorPoint[9] + taobinTextPoint[9] + center-vertical-horizontal + + + + + + + + +; + + 751 + 413 + IMG_CNT + +; + + XPosiShowCountDownBrew + 470 + End + 153 + 88 + RobotoBold 0x513C2F + ShowCountDownBrewing + + + + 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 + Var PointState[9] = 1 + + Open "ROOT/taobin_project/xml/event/lipit/page_collect_point_pro_lipit_3.xml" + + + + If show_eng = "true" Then + Var show_eng = "false" + Else + Var show_eng = "true" + EndIf + Open "ROOT/taobin_project/xml/event/lipit/page_collect_point_pro_lipit_3.xml" + + + + + \ No newline at end of file diff --git a/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_error.xml b/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_error.xml new file mode 100644 index 00000000..95b9f04d --- /dev/null +++ b/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_error.xml @@ -0,0 +1,223 @@ + + "Enable" + 1080 + 1920 + "0xeae6e1" + SoundVolume + + + ; On open + + + Var Timeout = 0 + SAVELOG show_eng + + + DEBUGVAR CollectPointError + + Var DirImage = "ROOT/taobin_project/image/event/nam_hom_coconut/error" + + If CollectPointError = "collect" Then + + Var ImgError = DirImage + "/coconut.png" + Var ImgError_X = 253 + Var ImgError_Y = 888 + + If show_eng = "true" Then + Var text_fail = DirImage + "/text_en.png" + Else + Var text_fail = DirImage + "/text_th.png" + EndIf + EndIf + + If CollectPointError = "random" Then + + Var ImgError = DirImage + "/cura-md-bag.png" + Var ImgError_X = 294 + Var ImgError_Y = 768 + + If show_eng = "true" Then + Var text_fail = DirImage + "/text2_en.png" + Else + Var text_fail = DirImage + "/text2_th.png" + EndIf + EndIf + + Var newPointIndex = 0 + + ;; Point 1 + ;If Seeker.selected_a_drink = "12-03-03-0046" Then + ; Var newPointIndex = 0 + ;EndIf +; + ;; Point 2 + ;If Seeker.selected_a_drink = "12-03-03-0047" Then + ; Var newPointIndex = 1 + ;EndIf +; + ;; Point 3 + ;If Seeker.selected_a_drink = "12-99-05-0063" Then + ; Var newPointIndex = 2 + ;EndIf +; + ;; Point 4 + ;If Seeker.selected_a_drink = "12-03-02-0040" Then + ; Var newPointIndex = 3 + ;EndIf +; + ;; Point 5 + ;If Seeker.selected_a_drink = "12-05-03-0063" Then + ; Var newPointIndex = 4 + ;EndIf +; + ;; Point 6 + ;If Seeker.selected_a_drink = "12-05-02-0080" Then + ; Var newPointIndex = 5 + ;EndIf +; + ;; Point 7 + ;If Seeker.selected_a_drink = "12-02-03-0053" Then + ; Var newPointIndex = 6 + ;EndIf +; + ;; Point 8 + ;If Seeker.selected_a_drink = "12-03-02-0041" Then + ; Var newPointIndex = 7 + ;EndIf +; + ;; Point 9 + ;If Seeker.selected_a_drink = "12-02-02-0056" Then + ; Var newPointIndex = 8 + ;EndIf +; + ;; Point 10 + ;If Seeker.selected_a_drink = "12-05-03-0064" Then + ; Var newPointIndex = 9 + ;EndIf +; +; + ;Var CurrentPointSlot = newPointIndex + 1 + ;Var CurrentPointCheck = "check" + ;Var val3 = "X" + ;AddData 37 TelephoneNumber CurrentPointSlot CurrentPointCheck val3 + + + 1000 + + + 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 + + + + If MachineStage = "drink-success" Then + Var MachineState_Result = 1 + EndIf + + If MachineStage = "drink-failed" Then + Var MachineState_Result = 2 + EndIf + + + + + + 0 + 380 + Var( DirImage + "/bg.png" ) + + + + ImgError_X + ImgError_Y + ImgError + + + + 49 + 1490 + text_fail + + + + + + + + + + +; + + 751 + 413 + IMG_CNT + +; + + XPosiShowCountDownBrew + 470 + End + 153 + 88 + RobotoBold + 0x513C2F + ShowCountDownBrewing + + + + Open "/media/bt/xml/security_alarm.xml" + + + + If show_eng = "true" Then + Var show_eng = "false" + Else + Var show_eng = "true" + EndIf + Open "ROOT/taobin_project/xml/event/lipit/page_collect_point_nam_hom_coconut_error.xml.xml" + + + + If CollectPointError = "collect" then + Var CollectPointError = "random" + Else + Var CollectPointError = "collect" + EndIf + + Open "ROOT/taobin_project/xml/event/lipit/page_collect_point_nam_hom_coconut_error.xml.xml" + + +