THAI: Added Jemila sound

This commit is contained in:
Kenta420 2024-09-22 00:27:03 +07:00
parent bfbaac6752
commit e454479817
25 changed files with 3461 additions and 2887 deletions

View file

@ -16,9 +16,9 @@
Var Seeker.TaobinErrorNetwork = 0
If show_eng = "true" Then
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"
@ -39,10 +39,10 @@
Var CollectPointError = "collect"
Open "ROOT/taobin_project/xml/event/jemila/page_collect_point_jemila_error.xml"
EndIf
</EventOpen>
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var ShowCountDownBrewing = CountDownBrewing
@ -50,52 +50,52 @@
Var Timeout = Timeout + 1
If Timeout > 30 Then
Var TaobinLevel = 0
Var CoffeePoint = 1
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/jemila/page_collect_point_jemila_error.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
</EventTimeout>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
<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/jemila/page_collect_point_jemila_error.xml"
Else
Var TaobinName = Ext1b
Var TelephoneNumber = TelephoneNumberX
Var TNumberTaobinMemberXXX = TelephoneNumber
Var Seeker.IsAlreadyGetReward = Ext1c
Var JemilaDewyglowOutOfStock = Ext1x4
Var ColorChangingBlushOutOfStock = Ext1x5
Var CuraMDRandomOutOfStock = Ext1x6
Var JemilaDewyglowOutOfStock = Ext1d
Var ColorChangingBlushOutOfStock = Ext1e
Var CuraMDRandomOutOfStock = Ext1f
DEBUGVAR JemilaDewyglowOutOfStock
@ -103,7 +103,7 @@
DEBUGVAR CuraMDRandomOutOfStock
If TaobinName = "" Then
Var Seeker.IsLineMember = 0
Var Seeker.IsLineMember = 0
Else
If TaobinName = "-" Then
Var Seeker.IsLineMember = 0
@ -123,7 +123,7 @@
If CuraMDRandomOutOfStock = 1 Then
SAVELOG "All reward is out of stock writing flag 1 -> jemila_reward_out_of_stock"
WRITE_FILE "/mnt/sdcard/coffeevending/jemila_reward_out_of_stock" "1"
SAVELOG "skip to normal collect point."
If Seeker.CodeChannel = 1 Then
If Seeker.CollectPointMain = 1 Then
@ -138,7 +138,7 @@
EndIf
EndIf
EndIf
EndIf
EndIf
;If Seeker.IsAlreadyGetReward = 1 Then
; SAVELOG "Already get reward skip to normal collect point."
@ -209,7 +209,7 @@
DEBUGVAR Ext1a
SPLIT Ext1a "/" 1 MenuPoint[0]
SPLIT Ext1a "/" 2 MenuPoint[1]
SPLIT Ext1a "/" 3 MenuPoint[2]
@ -247,7 +247,7 @@
; Menu 1
If Seeker.selected_a_drink = "12-03-02-0075" Then
If MenuPoint[0] = 1 then
Else
Var MenuPoint[0] = 1
Var newPointIndex = 0
@ -255,7 +255,7 @@
EndIf
If Seeker.selected_a_drink = "12-03-03-0075" Then
If MenuPoint[0] = 1 then
Else
Var MenuPoint[0] = 1
Var newPointIndex = 0
@ -264,17 +264,17 @@
; Menu 2
If Seeker.selected_a_drink = "12-05-02-0124" Then
If Seeker.selected_a_drink = "12-05-02-0124" Then
If MenuPoint[1] = 1 then
Else
Var MenuPoint[1] = 1
Var newPointIndex = 1
EndIf
EndIf
If Seeker.selected_a_drink = "12-05-03-0124" Then
If Seeker.selected_a_drink = "12-05-03-0124" Then
If MenuPoint[1] = 1 then
Else
Var MenuPoint[1] = 1
Var newPointIndex = 1
@ -283,17 +283,17 @@
; Menu 3
If Seeker.selected_a_drink = "12-02-02-0068" Then
If Seeker.selected_a_drink = "12-02-02-0068" Then
If MenuPoint[2] = 1 then
Else
Var MenuPoint[2] = 1
Var newPointIndex = 2
EndIf
EndIf
If Seeker.selected_a_drink = "12-02-03-0068" Then
If Seeker.selected_a_drink = "12-02-03-0068" Then
If MenuPoint[2] = 1 then
Else
Var MenuPoint[2] = 1
Var newPointIndex = 2
@ -302,9 +302,9 @@
; Menu 4
If Seeker.selected_a_drink = "12-05-02-0125" Then
If Seeker.selected_a_drink = "12-05-02-0125" Then
If MenuPoint[3] = 1 then
Else
Var MenuPoint[3] = 1
Var newPointIndex = 3
@ -313,17 +313,17 @@
; Menu 5
If Seeker.selected_a_drink = "12-01-02-0075" Then
If Seeker.selected_a_drink = "12-01-02-0075" Then
If MenuPoint[4] = 1 then
Else
Var MenuPoint[4] = 1
Var newPointIndex = 4
EndIf
EndIf
If Seeker.selected_a_drink = "12-21-02-0075" Then
If Seeker.selected_a_drink = "12-21-02-0075" Then
If MenuPoint[4] = 1 then
Else
Var MenuPoint[4] = 1
Var newPointIndex = 4
@ -332,17 +332,17 @@
; Menu 6
If Seeker.selected_a_drink = "12-03-02-0076" Then
If Seeker.selected_a_drink = "12-03-02-0076" Then
If MenuPoint[5] = 1 then
Else
Var MenuPoint[5] = 1
Var newPointIndex = 5
EndIf
EndIf
If Seeker.selected_a_drink = "12-03-03-0076" Then
If Seeker.selected_a_drink = "12-03-03-0076" Then
If MenuPoint[5] = 1 then
Else
Var MenuPoint[5] = 1
Var newPointIndex = 5
@ -351,17 +351,17 @@
; Menu 7
If Seeker.selected_a_drink = "12-02-02-0069" Then
If Seeker.selected_a_drink = "12-02-02-0069" Then
If MenuPoint[6] = 1 then
Else
Var MenuPoint[6] = 1
Var newPointIndex = 6
EndIf
EndIf
If Seeker.selected_a_drink = "12-02-03-0069" Then
If Seeker.selected_a_drink = "12-02-03-0069" Then
If MenuPoint[6] = 1 then
Else
Var MenuPoint[6] = 1
Var newPointIndex = 6
@ -370,17 +370,17 @@
; Menu 8
If Seeker.selected_a_drink = "12-05-02-0126" Then
If Seeker.selected_a_drink = "12-05-02-0126" Then
If MenuPoint[7] = 1 then
Else
Var MenuPoint[7] = 1
Var newPointIndex = 7
EndIf
EndIf
If Seeker.selected_a_drink = "12-05-03-0126" Then
If Seeker.selected_a_drink = "12-05-03-0126" Then
If MenuPoint[7] = 1 then
Else
Var MenuPoint[7] = 1
Var newPointIndex = 7
@ -389,17 +389,17 @@
; Menu 9
If Seeker.selected_a_drink = "12-05-02-0127" Then
If Seeker.selected_a_drink = "12-05-02-0127" Then
If MenuPoint[8] = 1 then
Else
Var MenuPoint[8] = 1
Var newPointIndex = 8
EndIf
EndIf
If Seeker.selected_a_drink = "12-05-03-0127" Then
If Seeker.selected_a_drink = "12-05-03-0127" Then
If MenuPoint[8] = 1 then
Else
Var MenuPoint[8] = 1
Var newPointIndex = 8
@ -408,17 +408,17 @@
; Menu 10
If Seeker.selected_a_drink = "12-02-02-0070" Then
If Seeker.selected_a_drink = "12-02-02-0070" Then
If MenuPoint[9] = 1 then
Else
Var MenuPoint[9] = 1
Var newPointIndex = 9
EndIf
EndIf
If Seeker.selected_a_drink = "12-02-03-0070" Then
If Seeker.selected_a_drink = "12-02-03-0070" Then
If MenuPoint[9] = 1 then
Else
Var MenuPoint[9] = 1
Var newPointIndex = 9
@ -431,109 +431,109 @@
If MenuPoint[0] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
PointName[CurrentIndexPoint] = MenuName[0]
Var PointName[CurrentIndexPoint] = MenuName[0]
If newPointIndex = 0 Then
Var PointImage[CurrentIndexPoint] = "/new_point.png"
Else
Else
Var PointImage[CurrentIndexPoint] = "/point.png"
EndIf
EndIf
If MenuPoint[1] = 1 Then
If MenuPoint[1] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
PointName[CurrentIndexPoint] = MenuName[1]
Var PointName[CurrentIndexPoint] = MenuName[1]
If newPointIndex = 1 Then
Var PointImage[CurrentIndexPoint] = "/new_point.png"
Else
Else
Var PointImage[CurrentIndexPoint] = "/point.png"
EndIf
EndIf
If MenuPoint[2] = 1 Then
If MenuPoint[2] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
PointName[CurrentIndexPoint] = MenuName[2]
Var PointName[CurrentIndexPoint] = MenuName[2]
If newPointIndex = 2 Then
Var PointImage[CurrentIndexPoint] = "/new_point.png"
Else
Else
Var PointImage[CurrentIndexPoint] = "/point.png"
EndIf
EndIf
If MenuPoint[3] = 1 Then
If MenuPoint[3] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
PointName[CurrentIndexPoint] = MenuName[3]
Var PointName[CurrentIndexPoint] = MenuName[3]
If newPointIndex = 3 Then
Var PointImage[CurrentIndexPoint] = "/new_point.png"
Else
Else
Var PointImage[CurrentIndexPoint] = "/point.png"
EndIf
EndIf
If MenuPoint[4] = 1 Then
If MenuPoint[4] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
PointName[CurrentIndexPoint] = MenuName[4]
Var PointName[CurrentIndexPoint] = MenuName[4]
If newPointIndex = 4 Then
Var PointImage[CurrentIndexPoint] = "/new_point.png"
Else
Else
Var PointImage[CurrentIndexPoint] = "/point.png"
EndIf
EndIf
If MenuPoint[5] = 1 Then
If MenuPoint[5] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
PointName[CurrentIndexPoint] = MenuName[5]
Var PointName[CurrentIndexPoint] = MenuName[5]
If newPointIndex = 5 Then
Var PointImage[CurrentIndexPoint] = "/new_point.png"
Else
Else
Var PointImage[CurrentIndexPoint] = "/point.png"
EndIf
EndIf
If MenuPoint[6] = 1 Then
If MenuPoint[6] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
PointName[CurrentIndexPoint] = MenuName[6]
Var PointName[CurrentIndexPoint] = MenuName[6]
If newPointIndex = 6 Then
Var PointImage[CurrentIndexPoint] = "/new_point.png"
Else
Else
Var PointImage[CurrentIndexPoint] = "/point.png"
EndIf
EndIf
If MenuPoint[7] = 1 Then
If MenuPoint[7] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
PointName[CurrentIndexPoint] = MenuName[7]
Var PointName[CurrentIndexPoint] = MenuName[7]
If newPointIndex = 7 Then
Var PointImage[CurrentIndexPoint] = "/new_point.png"
Else
Else
Var PointImage[CurrentIndexPoint] = "/point.png"
EndIf
EndIf
If MenuPoint[8] = 1 Then
If MenuPoint[8] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
PointName[CurrentIndexPoint] = MenuName[8]
Var PointName[CurrentIndexPoint] = MenuName[8]
If newPointIndex = 8 Then
Var PointImage[CurrentIndexPoint] = "/new_point.png"
Else
Else
Var PointImage[CurrentIndexPoint] = "/point.png"
EndIf
EndIf
If MenuPoint[9] = 1 Then
If MenuPoint[9] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
PointName[CurrentIndexPoint] = MenuName[9]
Var PointName[CurrentIndexPoint] = MenuName[9]
If newPointIndex = 9 Then
Var PointImage[CurrentIndexPoint] = "/new_point.png"
Else
Else
Var PointImage[CurrentIndexPoint] = "/point.png"
EndIf
EndIf
@ -546,23 +546,23 @@
DEBUGVAR Seeker.PointTaobinStr
DEBUGVAR Seeker.TNumberTaobinMember
Open "ROOT/taobin_project/xml/event/jemila/page_collect_point_jemila_3.xml"
Open "ROOT/taobin_project/xml/event/jemila/page_collect_point_jemila_3.xml"
EndIf
</EventActionOk>
<EventActionError>
<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/jemila/page_collect_point_jemila_error.xml"
</EventActionError>
</EventActionError>
<EventMachine>
If MachineStage = "drink-success" Then

View file

@ -24,14 +24,14 @@
Var PointRootDir = "ROOT/taobin_project/image/event/jemila"
If show_eng = "true" Then
If show_eng = "true" Then
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png"
Var CloseBtnImg = PointRootDir + "/continue_en_btn.png"
Else
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png"
Var CloseBtnImg = PointRootDir + "/continue_btn.png"
EndIf
Var CheckCoupons = 0
Var MakeDrinkState = 0
@ -108,7 +108,7 @@
Var subTitle_Y = 853
Var text8_X = 346
EndIf
If PointCount >= 7 Then
@ -121,13 +121,13 @@
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var ShowCountDownBrewing = CountDownBrewing
Var Timeout = Timeout + 1
If Timeout > 10 Then
@ -137,11 +137,11 @@
Var UpdatePoint = 1
EndIf
TimerReset
Refresh
</EventTimeout>
</EventTimeout>
<EventActionError>
@ -165,9 +165,9 @@
EndIf
</EventActionOk>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
@ -343,77 +343,77 @@
<Text>
<X> 192 </X>
<Y> 1354 </Y>
<Width> 270 </Width>
<Width> 170 </Width>
<Font> RobotoBold </Font>
<Size> 14 </Size>
<Color> 0x000000 </Color>
<Align> Center </Align>
<Align> center-vertical-horizontal </Align>
<Value> PointName[0] </Value>
</Text>
<Text>
<X> 367 </X>
<Y> 1354 </Y>
<Width> 270 </Width>
<Width> 170 </Width>
<Font> RobotoBold </Font>
<Size> 14 </Size>
<Color> 0x000000 </Color>
<Align> Center </Align>
<Align> center-vertical-horizontal </Align>
<Value> PointName[1] </Value>
</Text>
<Text>
<X> 542 </X>
<Y> 1354 </Y>
<Width> 270 </Width>
<Width> 170 </Width>
<Font> RobotoBold </Font>
<Size> 14 </Size>
<Color> 0x000000 </Color>
<Align> Center </Align>
<Align> center-vertical-horizontal </Align>
<Value> PointName[2] </Value>
</Text>
<Text>
<X> 717 </X>
<Y> 1354 </Y>
<Width> 270 </Width>
<Width> 170 </Width>
<Font> RobotoBold </Font>
<Size> 14 </Size>
<Color> 0x000000 </Color>
<Align> Center </Align>
<Align> center-vertical-horizontal </Align>
<Value> PointName[3] </Value>
</Text>
<Text>
<X> 281 </X>
<Y> 1612 </Y>
<Width> 270 </Width>
<Width> 170 </Width>
<Font> RobotoBold </Font>
<Size> 14 </Size>
<Color> 0x000000 </Color>
<Align> Center </Align>
<Align> center-vertical-horizontal </Align>
<Value> PointName[4] </Value>
</Text>
<Text>
<X> 456 </X>
<Y> 1612 </Y>
<Width> 270 </Width>
<Width> 170 </Width>
<Font> RobotoBold </Font>
<Size> 14 </Size>
<Color> 0x000000 </Color>
<Align> Center </Align>
<Align> center-vertical-horizontal </Align>
<Value> PointName[5] </Value>
</Text>
<Text>
<X> 631 </X>
<Y> 1612 </Y>
<Width> 270 </Width>
<Width> 170 </Width>
<Font> RobotoBold </Font>
<Size> 14 </Size>
<Color> 0x000000 </Color>
<Align> Center </Align>
<Align> center-vertical-horizontal </Align>
<Value> PointName[6] </Value>
</Text>
@ -424,7 +424,7 @@
<FilenamePress> CloseBtnImg </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
; goto lid straw
If PointCount >= 7 Then
If SELLONLINE = 1 Then
@ -455,14 +455,14 @@
</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>
<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>

View file

@ -18,6 +18,8 @@
Var SelectedState = "Invisible"
Var SelectedRandomImg = ""
Var SelectedRandomX = 0
Var SelectedRandomY = 0
If JemilaDewyglowOutOfStock = 0 Then
Var rewardList[MaxRandomIndex] = "jemila_dewyglow"
@ -226,7 +228,7 @@
Var MaxRandomIndex = MaxRandomIndex + 1
EndIf
</EventOpen>
@ -280,6 +282,8 @@
<Filename> Var( DirImage + "/random_select_img_1.png") </Filename>
<EventClick>
Var SelectedRandomImg = DirImage + "/random_open_img_1.png"
Var SelectedRandomX = 163
Var SelectedRandomY = 662
Function 2
</EventClick>
</Image>
@ -291,6 +295,8 @@
<Filename> Var( DirImage + "/random_select_img_2.png") </Filename>
<EventClick>
Var SelectedRandomImg = DirImage + "/random_open_img_2.png"
Var SelectedRandomX = 279
Var SelectedRandomY = 653
Function 2
</EventClick>
</Image>
@ -302,13 +308,15 @@
<Filename> Var( DirImage + "/random_select_img_3.png") </Filename>
<EventClick>
Var SelectedRandomImg = DirImage + "/random_open_img_3.png"
Var SelectedRandomX = 108
Var SelectedRandomY = 712
Function 2
</EventClick>
</Image>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<X> SelectedRandomX </X>
<Y> SelectedRandomY </Y>
<State> SelectedState </State>
<Filename> SelectedRandomImg </Filename>
</Image>
@ -321,8 +329,8 @@
DEBUGVAR MaxRandomIndex
Random2 0 MaxRandomIndex randResultInt
DEBUGVAR randResultInt
Var randResultStr = rewardList[randResultInt]
Var randResultStr = rewardList[randResultInt]
If randResultStr = "jemila_dewyglow" Then
Var CodeType = "147"
EndIf

View file

@ -6915,7 +6915,7 @@ Sugar, Biscof" </Value>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var NameDrink = "AMERICANO"
Var NameDrinkTH = "กาแฟดำ(อเมริกาโน)"
Var NameDrinkTH = "อเมริกาโน"
Var DrinkDescriptionTH = "กาแฟ และน้ำ "
Var DrinkDescription = "Espresso, Water"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_america_no.png"
@ -6988,7 +6988,7 @@ Sugar, Biscof" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "กาแฟดำ(อเมริกาโน)" </Value>
<Value> "อเมริกาโน" </Value>
</Text>
<Text>
<X> 16 </X>
@ -7170,7 +7170,7 @@ Sugar, Biscof" </Value>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var NameDrink = "AMERICANO"
Var NameDrinkTH = "กาแฟดำ(อเมริกาโน)"
Var NameDrinkTH = "อเมริกาโน"
Var DrinkDescriptionTH = "กาแฟ และน้ำ "
Var DrinkDescription = "Espresso, Water"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_america_no.png"
@ -7243,7 +7243,7 @@ Sugar, Biscof" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "กาแฟดำ(อเมริกาโน)" </Value>
<Value> "อเมริกาโน" </Value>
</Text>
<Text>
<X> 16 </X>

View file

@ -6915,7 +6915,7 @@ Sugar, Biscof" </Value>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var NameDrink = "AMERICANO"
Var NameDrinkTH = "กาแฟดำ(อเมริกาโน)"
Var NameDrinkTH = "อเมริกาโน"
Var DrinkDescriptionTH = "กาแฟ และน้ำ "
Var DrinkDescription = "Espresso, Water"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_america_no.png"
@ -6988,7 +6988,7 @@ Sugar, Biscof" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "กาแฟดำ(อเมริกาโน)" </Value>
<Value> "อเมริกาโน" </Value>
</Text>
<Text>
<X> 16 </X>
@ -7170,7 +7170,7 @@ Sugar, Biscof" </Value>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var NameDrink = "AMERICANO"
Var NameDrinkTH = "กาแฟดำ(อเมริกาโน)"
Var NameDrinkTH = "อเมริกาโน"
Var DrinkDescriptionTH = "กาแฟ และน้ำ "
Var DrinkDescription = "Espresso, Water"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_america_no.png"
@ -7243,7 +7243,7 @@ Sugar, Biscof" </Value>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "กาแฟดำ(อเมริกาโน)" </Value>
<Value> "อเมริกาโน" </Value>
</Text>
<Text>
<X> 16 </X>

View file

@ -29,7 +29,7 @@ Var Anniversary3VideoEnable = 0
Var MomDayEnable = 0
; September / Oct
; Enable app game
; Enable app game
Var GameEnableFromTrickerEv = 0
; Enable pro Pepween
@ -164,7 +164,7 @@ If SystemDateMonthInt = 7 Then
Var PassionMintPro = 1
EndIf
EndIf
If SystemDateDayInt >= 22 Then
Var 7UpLuckyDrawX2Pro = 1
EndIf
@ -218,7 +218,8 @@ If BoxID = 105005 Then
Var PassionMintPro = 0
Var MomCocoaPro = 0
Var MomCocoaProDiscountEnable = 0
Var RobinsonBeautyPro = 1
Var RobinsonBeautyPro = 0
Var JemilaPro = 1
EndIf
If BoxID = 172331 Then
@ -316,7 +317,7 @@ If taobin_nopro = "true" Then
Var MomCocoaPro = 0
Var RobinsonBeautyPro = 0
Var JemilaPro = 0
Var AdvertiseProfile = "00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00"
EndIf
@ -358,6 +359,12 @@ Else
EndIf
If CollagenPowderEnable = "true" Then
Else
Var JemilaPro = 0
EndIf
Var CurrentMainVideoTemp = 0
@ -365,8 +372,7 @@ DEBUGVAR FreePowerup
; Control collect promotion point behavior
; Control collect promotion point behavior
Var New_Payment = 0
Var NewFlowPaymentCode = 0