Add support_langs for inter, MYS: change video & fix profile price auto change (still bug)

inter/aus/support_langs

@@ -0,0 +1 @@
+ENG

inter/hkg/support_langs

@@ -0,0 +1 @@
+ENG

inter/mys/support_langs

@@ -1 +1 @@
-ENG,THAI,CHINA,JAPAN,MALAY
+ENG,-,CHINA,JAPAN,MALAY

inter/mys/xml/event/event_profile.ev

@@ -5,6 +5,49 @@ DEBUGVAR XMLProfile
 STRCONTAIN "PromoYuzu250" XMLProfile HasProYuzu250Concat
 STRCONTAIN "PromoReduced" XMLProfile IsProfileReduce
 
+Var refresh_str = "-RefreshProf"
+STRCONTAIN refresh_str XMLProfile HasRefreshProf
+
+DEBUGVAR HasRefreshProf
+DEBUGVAR NeedRefreshProfile
+
+; refresh-profile-after-promo-end
+If NeedRefreshProfile = 1 Then
+
+    READ_FILE "/mnt/sdcard/coffeevending/profile/price/profile_MYS_slot_3.json" ProfileSlot3MYS
+    READ_FILE "/mnt/sdcard/coffeevending/profile/price/profile_MYS_slot_4.json" ProfileSlot4MYS
+
+    STRCONTAIN "Drop" ProfileSlot3MYS PromoYuzuDrop
+    STRCONTAIN "Drop" ProfileSlot4MYS PromoYuzuDis50Drop
+
+    DEBUGVAR PromoYuzuDrop
+    DEBUGVAR PromoYuzuDis50Drop
+
+    If HasRefreshProf = "true" Then
+
+        DEBUGVAR "case already refresh"
+
+        ; restore-profile
+        CacheVarStr "get" XMLProfilePreEvent
+        Var XMLProfile = XMLProfilePreEvent
+        Var NeedRefreshProfile = 0
+    Else
+        ; save-current-as-pre
+        CacheVarStr "put" XMLProfilePreEvent
+
+        If PromoYuzuDrop = "true" Then
+            DEBUGVAR "case yuzu drop --> refresh"
+            Var XMLProfile = XMLProfile + refresh_str
+        Else
+            If PromoYuzuDis50Drop = "true" Then
+                DEBUGVAR "case yuzu drop discount 50% --> refresh"
+                Var XMLProfile = XMLProfile + refresh_str
+            EndIf
+        EndIf
+
+    EndIf
+Else
+
     DEBUGVAR HasProYuzu250Concat
     DEBUGVAR ProReducedPriceEnable
     DEBUGVAR IgnoreProfileFromRunEV
@@ -77,3 +120,6 @@ EndIf
     If IgnoreProfileFromRunEV = 1 Then
         Var ToggleAfterEventProfileOff = 1
     EndIf
+
+
+EndIf

inter/mys/xml/event/tricker.ev

@@ -58,8 +58,25 @@ If SystemDateMonthInt = 9 Then
 	EndIf
 EndIf
 
+If SystemDateMonthInt = 10 Then
+
+    Var IgnoreProfileFromRunEV = 0
+
+EndIf
+
+If SystemDateMonthInt = 11 Then
+
+    Var IgnoreProfileFromRunEV = 0
+EndIf
+
+If SystemDateMonthInt = 12 Then
+    Var IgnoreProfileFromRunEV = 0
+
+EndIf
+
 If SystemDateMonthInt < 10 Then
     Var ProReducedPriceEnable = 0
+    Var IgnoreProfileFromRunEV = 0
 EndIf
 
 If ProReducedPriceEnable = 0 Then
@@ -69,6 +86,23 @@ If ProReducedPriceEnable = 0 Then
     EndIf
 EndIf
 
+
+; zone-refresh-once
+
+READ_FILE "/mnt/sdcard/coffeevending/need_refresh_file" NeedRefreshStr
+STRCONTAIN "1" NeedRefreshStr need_refresh
+
+If need_refresh = "true" Then
+
+    Var NeedRefreshProfile = 1
+    WRITE_FILE "/mnt/sdcard/coffeevending/need_refresh_file" "0"
+
+Else
+    Var NeedRefreshProfile = 0
+EndIf
+
+
+
 If BoxID = 177746 Then
 	Var ProThaiTeaEnable = 1
 	Var ProYuzuEnable = 1

inter/sgp/support_langs

@@ -0,0 +1 @@
+ENG

xml/page_board.xml

@@ -667,6 +667,7 @@
 	Var UsePepsiTheme = 0
 
 	Var NoTrickPriceProfile = 0
+	Var NeedRefreshProfile = 0
 
 	OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/sold_cup_count.xml"
 
@@ -1502,7 +1503,7 @@ PRICE "Reset" "-"
  </EventUnitTest7>
 
  <EventUnitTest8>
-	Var XMLProfile = "Discount50"
+	Var XMLProfile = "General"
 	Var TimeProfilePrice = 0
 
  </EventUnitTest8>
@@ -2188,5 +2189,46 @@ PRICE "Reset" "-"
 <Value> ShowNetworkProblemText </Value>
 </Text>
 
+<Button>
+<X> 0 </X>
+<Y> 1870 </Y>
+<State> eval(
+    If LangProcess = "LoadConfig" Then
+        Var return = "Enable"
+    Else
+        Var return = "Invisible"
+    EndIf
+) </State>
+<Color> "0xFFFF00" </Color>
+<Width> 1080 </Width>
+<Height> 60 </Height>
+<EventClick>
+</EventClick>
+</Button>
+
+<Text>
+<State> eval(
+    If LangProcess = "LoadConfig" Then
+        Var return = "Enable"
+    Else
+        Var return = "Invisible"
+    EndIf
+) </State>
+<X> 5 </X>
+<Y> 1880 </Y>
+<Size> 24 </Size>
+<Align> Center </Align>
+<Width> 1080 </Width>
+<Font> RobotoRegular </Font>
+<Color> 0x000000 </Color>
+<Value> eval(
+    If LangProcess = "LoadConfig" Then
+        Var return = "Loading ..."
+    Else
+        Var return = ""
+    EndIf
+) </Value>
+</Text>
+
 
 </Page>