pakin/taobin_project
1
0
Fork 0
Code Issues Pull requests Projects 1 Releases 1 Packages Wiki Activity Actions

THAI: Added Halloween promotion

Browse source
This commit is contained in:
Kenta420 2024-10-08 12:49:38 +07:00
parent 8f878da088
commit c90edea31e
172 changed files with 30448 additions and 493 deletions
Download patch file Download diff file Expand all files Collapse all files

11722
xml/event/double_promotion_halloween_and_jemila.xml Normal file
View file

File diff suppressed because it is too large Load diff

80
xml/event/halloween/check_quota.xml Normal file
View file

@ -0,0 +1,80 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
Var Timeout = 0
Var MovieTicketUnavailable = 0
Var DiscountUnavailable = 0
Var AlreadyGetReward = 0
Var GameMemberPhoneNumber = TelephoneNumber
GETACCEXT GameMemberPhoneNumber 41
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 5 Then
SAVE "Check Quota timeout!!! skip game"
If luckyDrawAlredyGotReward = 1 Then
Open "ROOT/taobin_project/xml/page_collect_point_3_28.xml"
Else
Open "ROOT/taobin_project/xml/page_collect_point_3_28_lucky_draw_campaign.xml"
EndIf
EndIf
</EventTimeout>
<EventActionOk>
If Ext1a = "" Then
If luckyDrawAlredyGotReward = 1 Then
Open "ROOT/taobin_project/xml/page_collect_point_3_28.xml"
Else
Open "ROOT/taobin_project/xml/page_collect_point_3_28_lucky_draw_campaign.xml"
EndIf
Else
Var AlreadyGetReward = Ext1a
Var MovieTicketUnavailable = Ext1b
Var DiscountUnavailable = Ext1c
DEBUGVAR AlreadyGetReward
DEBUGVAR MovieTicketUnavailable
DEBUGVAR DiscountUnavailable
If AlreadyGetReward = 1 Then
If luckyDrawAlredyGotReward = 1 Then
Open "ROOT/taobin_project/xml/page_collect_point_3_28.xml"
Else
Open "ROOT/taobin_project/xml/page_collect_point_3_28_lucky_draw_campaign.xml"
EndIf
EndIf
If MovieTicketUnavailable = 1 Then
If DiscountUnavailable = 1 Then
If luckyDrawAlredyGotReward = 1 Then
Open "ROOT/taobin_project/xml/page_collect_point_3_28.xml"
Else
Open "ROOT/taobin_project/xml/page_collect_point_3_28_lucky_draw_campaign.xml"
EndIf
EndIf
EndIf
Open "ROOT/taobin_project/xml/event/halloween/page_starting_game.xml"
EndIf
</EventActionOk>
</Popup>

416
xml/event/halloween/game.xml Normal file
View file

@ -0,0 +1,416 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
Var MovieTicketIndex = 0
If MovieTicketUnavailable = 0 Then
Random2 1 14 MovieTicketIndex
EndIf
Var DiscountIndex = 0
If DiscountUnavailable = 0 Then
; for garantee not same index with movie
If MovieTicketIndex > 6 Then
Random2 1 6 DiscountIndex
Else
Random2 7 14 DiscountIndex
EndIf
EndIf
Var GhostSet = 0
Random2 1 5 GhostSet
Var DirImage = "ROOT/taobin_project/image/event/halloween/ghosts/"
Var DirGhostImage = DirImage + "set_"
Var DirGhostImage = DirGhostImage + GhostSet
If GhostSet = 1 Then
Var ghost1_X = 35
Var ghost1_Y = 972
Var ghost2_X = 729
Var ghost2_Y = 1268
Var ghost3_X = 38
Var ghost3_Y = 1645
Var ghost4_X = 430
Var ghost4_Y = 493
Var ghost5_X = 211
Var ghost5_Y = 733
Var ghost6_X = 800
Var ghost6_Y = 984
Var ghost7_X = 771
Var ghost7_Y = 1695
Var ghost8_X = 367
Var ghost8_Y = 911
Var ghost9_X = 386
Var ghost9_Y = 1466
Var ghost10_X = 674
Var ghost10_Y = 743
Var ghost11_X = 86
Var ghost11_Y = 472
Var ghost12_X = 859
Var ghost12_Y = 507
Var ghost13_X = 199
Var ghost13_Y = 1268
EndIf
If GhostSet = 2 Then
Var ghost1_X = 151
Var ghost1_Y = 1610
Var ghost2_X = 757
Var ghost2_Y = 1593
Var ghost3_X = 709
Var ghost3_Y = 1430
Var ghost4_X = 507
Var ghost4_Y = 1023
Var ghost5_X = 373
Var ghost5_Y = 458
Var ghost6_X = 206
Var ghost6_Y = 859
Var ghost7_X = 132
Var ghost7_Y = 1393
Var ghost8_X = 836
Var ghost8_Y = 784
Var ghost9_X = 746
Var ghost9_Y = 451
Var ghost10_X = 63
Var ghost10_Y = 510
Var ghost11_X = 384
Var ghost11_Y = 1303
Var ghost12_X = 54
Var ghost12_Y = 1095
Var ghost13_X = 744
Var ghost13_Y = 1101
EndIf
If GhostSet = 3 Then
Var ghost1_X = 70
Var ghost1_Y = 451
Var ghost2_X = 48
Var ghost2_Y = 1383
Var ghost3_X = 441
Var ghost3_Y = 1405
Var ghost4_X = 402
Var ghost4_Y = 932
Var ghost5_X = 308
Var ghost5_Y = 1162
Var ghost6_X = 735
Var ghost6_Y = 456
Var ghost7_X = 693
Var ghost7_Y = 1675
Var ghost8_X = 740
Var ghost8_Y = 822
Var ghost9_X = 615
Var ghost9_Y = 1117
Var ghost10_X = 811
Var ghost10_Y = 1389
Var ghost11_X = 346
Var ghost11_Y = 466
Var ghost12_X = 54
Var ghost12_Y = 1095
Var ghost13_X = 75
Var ghost13_Y = 788
EndIf
If GhostSet = 4 Then
Var ghost1_X = 380
Var ghost1_Y = 459
Var ghost2_X = 441
Var ghost2_Y = 1422
Var ghost3_X = 103
Var ghost3_Y = 1363
Var ghost4_X = 749
Var ghost4_Y = 491
Var ghost5_X = 87
Var ghost5_Y = 781
Var ghost6_X = 44
Var ghost6_Y = 1633
Var ghost7_X = 875
Var ghost7_Y = 1169
Var ghost8_X = 155
Var ghost8_Y = 1068
Var ghost9_X = 777
Var ghost9_Y = 760
Var ghost10_X = 385
Var ghost10_Y = 889
Var ghost11_X = 787
Var ghost11_Y = 1441
Var ghost12_X = 576
Var ghost12_Y = 1080
Var ghost13_X = 68
Var ghost13_Y = 454
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var GameTimeout = GameTimeout - 1
DEBUGVAR GameTimeout
If GameTimeout < 0 Then
If DiscountUnavailable = 0 Then
Var RewardType = "discount_timeout"
Open "ROOT/taobin_project/xml/event/halloween/page_get_reward.xml"
Else
Open "ROOT/taobin_project/xml/event/halloween/thank_you.xml"
EndIf
EndIf
TimerReset
Refresh
</EventTimeout>
;include="ROOT/taobin_project/inc/video.inc"
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> Var( DirImage + "game_bg.png" ) </Filename>
</Image>
; ============== Ghosts =====================
<Button>
<X> ghost1_X </X>
<Y> ghost1_Y </Y>
<Filename> Var( DirGhostImage + "/Ghost_1.png" ) </Filename>
<EventOnClick>
Var SelectedGhostNum = 1
Function 2
</EventOnClick>
</Button>
<Button>
<X> ghost2_X </X>
<Y> ghost2_Y </Y>
<Filename> Var( DirGhostImage + "/Ghost_2.png" ) </Filename>
<EventOnClick>
Var SelectedGhostNum = 2
Function 2
</EventOnClick>
</Button>
<Button>
<X> ghost3_X </X>
<Y> ghost3_Y </Y>
<Filename> Var( DirGhostImage + "/Ghost_3.png" ) </Filename>
<EventOnClick>
Var SelectedGhostNum = 3
Function 2
</EventOnClick>
</Button>
<Button>
<X> ghost4_X </X>
<Y> ghost4_Y </Y>
<Filename> Var( DirGhostImage + "/Ghost_4.png" ) </Filename>
<EventOnClick>
Var SelectedGhostNum = 4
Function 2
</EventOnClick>
</Button>
<Button>
<X> ghost5_X </X>
<Y> ghost5_Y </Y>
<Filename> Var( DirGhostImage + "/Ghost_5.png" ) </Filename>
<EventOnClick>
Var SelectedGhostNum = 5
Function 2
</EventOnClick>
</Button>
<Button>
<X> ghost6_X </X>
<Y> ghost6_Y </Y>
<Filename> Var( DirGhostImage + "/Ghost_6.png" ) </Filename>
<EventOnClick>
Var SelectedGhostNum = 6
Function 2
</EventOnClick>
</Button>
<Button>
<X> ghost7_X </X>
<Y> ghost7_Y </Y>
<Filename> Var( DirGhostImage + "/Ghost_7.png" ) </Filename>
<EventOnClick>
Var SelectedGhostNum = 7
Function 2
</EventOnClick>
</Button>
<Button>
<X> ghost8_X </X>
<Y> ghost8_Y </Y>
<Filename> Var( DirGhostImage + "/Ghost_8.png" ) </Filename>
<EventOnClick>
Var SelectedGhostNum = 8
Function 2
</EventOnClick>
</Button>
<Button>
<X> ghost9_X </X>
<Y> ghost9_Y </Y>
<Filename> Var( DirGhostImage + "/Ghost_9.png" ) </Filename>
<EventOnClick>
Var SelectedGhostNum = 9
Function 2
</EventOnClick>
</Button>
<Button>
<X> ghost10_X </X>
<Y> ghost10_Y </Y>
<Filename> Var( DirGhostImage + "/Ghost_10.png" ) </Filename>
<EventOnClick>
Var SelectedGhostNum = 10
Function 2
</EventOnClick>
</Button>
<Button>
<X> ghost11_X </X>
<Y> ghost11_Y </Y>
<Filename> Var( DirGhostImage + "/Ghost_11.png" ) </Filename>
<EventOnClick>
Var SelectedGhostNum = 11
Function 2
</EventOnClick>
</Button>
<Button>
<X> ghost12_X </X>
<Y> ghost12_Y </Y>
<Filename> Var( DirGhostImage + "/Ghost_12.png" ) </Filename>
<EventOnClick>
Var SelectedGhostNum = 12
Function 2
</EventOnClick>
</Button>
<Button>
<X> ghost13_X </X>
<Y> ghost13_Y </Y>
<Filename> Var( DirGhostImage + "/Ghost_13.png" ) </Filename>
<EventOnClick>
Var SelectedGhostNum = 13
Function 2
</EventOnClick>
</Button>
; ============== End Ghosts =================
<Function2>
SAVELOG "Press ghost!!!"
DEBUGVAR SelectedGhostNum
DEBUGVAR MovieTicketIndex
If SelectedGhostNum = MovieTicketIndex Then
Var RewardType = "movie_ticket"
Open "ROOT/taobin_project/xml/event/halloween/page_get_reward.xml"
Else
If SelectedGhostNum = DiscountIndex Then
Var RewardType = "discount"
Open "ROOT/taobin_project/xml/event/halloween/page_get_reward.xml"
EndIf
EndIf
If GameTimeout < 0 Then
If DiscountUnavailable = 0 Then
Var RewardType = "discount_timeout"
Open "ROOT/taobin_project/xml/event/halloween/page_get_reward.xml"
Else
Open "ROOT/taobin_project/xml/event/halloween/thank_you.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/event/halloween/page_try_again.xml"
EndIf
</Function2>
<Text>
<X> 914 </X>
<Y> 380 </Y>
<Width> 165 </Width>
<Height> 100 </Height>
<Font> KanitRegularTTF </Font>
<Size> 100 </Size>
<Color> 0xFFFFFF </Color>
<Align> center-vertical-horizontal </Align>
<Value> GameTimeout </Value>
</Text>
<EventUnitTest1>
Open "ROOT/taobin_project/xml/event/halloween/game.xml"
</EventUnitTest1>
</Popup>

81
xml/event/halloween/page_get_reward.xml Normal file
View file

@ -0,0 +1,81 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
Var Timeout = 0
DEBUGVAR RewardType
If RewardType = "movie_ticket" Then
If show_en = "true" Then
Var RewardImage = "ROOT/taobin_project/image/event/halloween/get_movie_ticket_en.png"
Else
Var RewardImage = "ROOT/taobin_project/image/event/halloween/get_movie_ticket_th.png"
EndIf
Var reward = "150"
EndIf
If RewardType = "discount" Then
If show_en = "true" Then
Var RewardImage = "ROOT/taobin_project/image/event/halloween/get_discount_en.png"
Else
Var RewardImage = "ROOT/taobin_project/image/event/halloween/get_discount_th.png"
EndIf
Var reward = "151"
EndIf
If RewardType = "discount_timeout" Then
Var RewardImage = "ROOT/taobin_project/image/event/halloween/thank_you_with_discount.png"
Var reward = "151"
EndIf
DEBUGVAR RewardImage
Var var2 = "X"
Var var3 = "X"
AddData 56 GameMemberPhoneNumber reward var2 var3
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
DEBUGVAR Timeout
If Timeout > 5 Then
If luckyDrawAlredyGotReward = 1 Then
Open "ROOT/taobin_project/xml/page_collect_point_3_28.xml"
Else
Open "ROOT/taobin_project/xml/page_collect_point_3_28_lucky_draw_campaign.xml"
EndIf
EndIf
TimerReset
</EventTimeout>
;include="ROOT/taobin_project/inc/video.inc"
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> RewardImage </Filename>
</Image>
<EventUnitTest1>
Open "ROOT/taobin_project/xml/event/halloween/page_get_reward.xml"
</EventUnitTest1>
</Popup>

91
xml/event/halloween/page_starting_game.xml Normal file
View file

@ -0,0 +1,91 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
Var Timeout = 0
; play time 10 sec
Var GameTimeout = 10
Var DirImage = "ROOT/taobin_project/image/event/halloween/"
If show_eng = "true" Then
Var startingGameTitle = DirImage + "starting_game_title_en.png"
Var Title_X = 73
Var TItle_Y = 431
Var bn_PlayGame = DirImage + "bn_play_en.png"
Var bp_PlayGame = DirImage + "bp_play_en.png"
Var bn_NotPlayGame = DirImage + "bn_not_play_en.png"
Var bp_NotPlayGame = DirImage + "bp_not_play_en.png"
Else
Var startingGameTitle = DirImage + "starting_game_title_th.png"
Var Title_X = 129
Var TItle_Y = 493
Var bn_PlayGame = DirImage + "bn_play_th.png"
Var bp_PlayGame = DirImage + "bp_play_th.png"
Var bn_NotPlayGame = DirImage + "bn_not_play_th.png"
Var bp_NotPlayGame = DirImage + "bp_not_play_th.png"
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 15 Then
If luckyDrawAlredyGotReward = 1 Then
Open "ROOT/taobin_project/xml/page_collect_point_3_28.xml"
Else
Open "ROOT/taobin_project/xml/page_collect_point_3_28_lucky_draw_campaign.xml"
EndIf
EndIf
TimerReset
Refresh
</EventTimeout>
;include="ROOT/taobin_project/inc/video.inc"
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> Var( DirImage + "starting_game_bg.png" ) </Filename>
</Image>
<Image>
<X> Title_X </X>
<Y> Title_Y </Y>
<Filename> startingGameTitle </Filename>
</Image>
<Button>
<X> 109 </X>
<Y> 1229 </Y>
<Filename> bn_PlayGame </Filename>
<FilenamePress> bp_PlayGame </FilenamePress>
<EventClick>
Open "ROOT/taobin_project/xml/event/halloween/game.xml"
</EventClick>
</Button>
<Button>
<X> 582 </X>
<Y> 1229 </Y>
<Filename> bn_NotPlayGame </Filename>
<FilenamePress> bp_NotPlayGame </FilenamePress>
<EventClick>
Open "ROOT/taobin_project/xml/event/halloween/game.xml"
</EventClick>
</Button>
</Popup>

98
xml/event/halloween/page_try_again.xml Normal file
View file

@ -0,0 +1,98 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
Var GameTimeout = GameTimeout - 1
Var DirImage = "ROOT/taobin_project/image/event/halloween/try_again/"
If show_eng = "true" Then
Var Title = DirImage + "try_again_title_en.png"
Var TryAgainBtn = DirImage + "try_again_btn_en.png"
Var CloseBtn = DirImage + "close_btn_en.png"
Else
Var Title = DirImage + "try_again_title_th.png"
Var TryAgainBtn = DirImage + "try_again_btn_th.png"
Var CloseBtn = DirImage + "close_btn_th.png"
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var GameTimeout = GameTimeout - 1
DEBUGVAR GameTimeout
If GameTimeout < 0 Then
If DiscountUnavailable = 0 Then
Var RewardType = "discount_timeout"
Open "ROOT/taobin_project/xml/event/halloween/page_get_reward.xml"
Else
Open "ROOT/taobin_project/xml/event/halloween/thank_you.xml"
EndIf
EndIf
TimerReset
Refresh
</EventTimeout>
;include="ROOT/taobin_project/inc/video.inc"
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> Var( DirImage + "try_again_bg.png" ) </Filename>
</Image>
<Image>
<X> 165 </X>
<Y> 442 </Y>
<Filename> Title </Filename>
</Image>
<Button>
<X> 209 </X>
<Y> 1719 </Y>
<Filename> TryAgainBtn </Filename>
<EventClick>
SAVE "Try Again!"
Open "ROOT/taobin_project/xml/event/halloween/game.xml"
</EventClick>
</Button>
<Button>
<X> 612 </X>
<Y> 1719 </Y>
<Filename> CloseBtn </Filename>
<EventClick>
SAVELOG "Close game"
If DiscountUnavailable = 0 Then
Var RewardType = "discount_timeout"
Open "ROOT/taobin_project/xml/event/halloween/page_get_reward.xml"
Else
Open "ROOT/taobin_project/xml/event/halloween/thank_you.xml"
EndIf
</EventClick>
</Button>
<Text>
<X> 914 </X>
<Y> 380 </Y>
<Width> 165 </Width>
<Height> 100 </Height>
<Font> KanitRegularTTF </Font>
<Size> 100 </Size>
<Color> 0xFFFFFF </Color>
<Align> center-vertical-horizontal </Align>
<Value> GameTimeout </Value>
</Text>
</Popup>

41
xml/event/halloween/thank_you.xml Normal file
View file

@ -0,0 +1,41 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
Var Timeout = 0
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
DEBUGVAR Timeout
If Timeout > 5 Then
If luckyDrawAlredyGotReward = 1 Then
Open "ROOT/taobin_project/xml/page_collect_point_3_28.xml"
Else
Open "ROOT/taobin_project/xml/page_collect_point_3_28_lucky_draw_campaign.xml"
EndIf
EndIf
TimerReset
</EventTimeout>
;include="ROOT/taobin_project/inc/video.inc"
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/event/halloween/thank_you.png" </Filename>
</Image>
</Popup>

0
xml/event/multi_promotion_config_cocoa77_nam_hom_coconut.json → xml/event/ignore_multi_promotion_config_cocoa77_nam_hom_coconut.json
View file

30
xml/event/ignore_multi_promotion_config_halloween_jemila.json Normal file
View file

@ -0,0 +1,30 @@
[
{
"name": "halloween",
"template": "/event/promotion_video_template.inc",
"config": {
"normal_eng": "ROOT/taobin_project/image/event/halloween/halloween.png",
"normal_thai": "ROOT/taobin_project/image/event/halloween/halloween.png",
"press_eng": "ROOT/taobin_project/image/event/halloween/halloween.png",
"press_thai": "ROOT/taobin_project/image/event/halloween/halloween.png",
"disable_eng": "ROOT/taobin_project/image/event/halloween/halloween.png",
"disable_thai": "ROOT/taobin_project/image/event/halloween/halloween.png",
"video_eng": "ROOT/taobin_project/image/event/halloween/halloween_en.mp4",
"video_thai": "ROOT/taobin_project/image/event/halloween/halloween_th.mp4",
"event_on_click": "ROOT/taobin_project/xml/page_catalog_group_pro_halloween.xml"
}
},
{
"name": "jemila",
"template": "/event/promotion_template.inc",
"config": {
"normal_eng": "ROOT/taobin_project/image/event/jemila/jemila.png",
"normal_thai": "ROOT/taobin_project/image/event/jemila/jemila.png",
"press_eng": "ROOT/taobin_project/image/event/jemila/jemila.png",
"press_thai": "ROOT/taobin_project/image/event/jemila/jemila.png",
"disable_eng": "ROOT/taobin_project/image/event/jemila/jemila.png",
"disable_thai": "ROOT/taobin_project/image/event/jemila/jemila.png",
"event_on_click": "ROOT/taobin_project/xml/page_catalog_group_pro_jemila.xml"
}
}
]

2
xml/event/out_put_file3.txt
View file

@ -1 +1 @@
/event/promotion_mom_cocoa.xml
/event/promotion_halloween.xml

13418
xml/event/promotion_halloween.xml Normal file
View file

File diff suppressed because it is too large Load diff

116
xml/event/promotion_template3.inc
View file

@ -1,89 +1,81 @@
<EventActionOk>
If GettingDiscountStatus = 1 Then
If Ext1a = "ok" Then
Else
EndIf
Open "ROOT/taobin_project/xml/page_catalog_group_pro_mom_cocoa.xml"
EndIf
</EventActionOk>
<Button>
<X> 42 </X>
<Y> 518 </Y>
<State> BigButtonEnable </State>
<Filename>
eval(
If show_eng = "true" Then
If SystemDateDayInt >= 13 Then
Var return = ###normal_eng + "13-16.png"
Else
Var return = ###normal_eng + "10-12.png"
EndIf
eval(
If show_eng = "true" Then
Var return = ###normal_eng
Else
If SystemDateDayInt >= 13 Then
Var return = ###normal_thai + "13-16.png"
Else
Var return = ###normal_thai + "10-12.png"
EndIf
Var return = ###normal_thai
EndIf
)
</Filename>
<FilenamePress>
eval(
If show_eng = "true" Then
If SystemDateDayInt >= 13 Then
Var return = ###normal_eng + "13-16.png"
Else
Var return = ###normal_eng + "10-12.png"
EndIf
<FilenamePress>
eval(
If show_eng = "true" Then
Var return = ###normal_eng
Else
If SystemDateDayInt >= 13 Then
Var return = ###normal_thai + "13-16.png"
Else
Var return = ###normal_thai + "10-12.png"
EndIf
Var return = ###normal_thai
EndIf
)
</FilenamePress>
<FilenameDisable>
eval(
If show_eng = "true" Then
If SystemDateDayInt >= 13 Then
Var return = ###normal_eng + "13-16.png"
Else
Var return = ###normal_eng + "10-12.png"
EndIf
<FilenameDisable>
eval(
If show_eng = "true" Then
Var return = ###normal_eng
Else
If SystemDateDayInt >= 13 Then
Var return = ###normal_thai + "13-16.png"
Else
Var return = ###normal_thai + "10-12.png"
EndIf
Var return = ###normal_thai
EndIf
)
</FilenameDisable>
<EventOnClick>
If MomCocoaProDiscountEnable = 1 Then
If GettingDiscountStatus = 0 Then
Var GettingDiscountStatus = 1
Var AC = "1/0899999999"
GETACCEXT AC 38
EndIf
Else
Open "ROOT/taobin_project/xml/page_catalog_group_pro_mom_cocoa.xml"
EndIf
<EventOnClick>
Open "ROOT/taobin_project/xml/page_catalog_group_pro_halloween.xml"
</EventOnClick>
<Video>
<X> 42 </X>
<Y> 518 </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/halloween/halloween_th.mp4" </Filename>
</Video>
<Video>
<X> 42 </X>
<Y> 518 </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/halloween/halloween_en.mp4" </Filename>
</Video>
</Button>
<EventUnitTest1>
Var BigButtonEnable = "Enable"
Var BigButtonEnable = "Enable"
Refresh
</EventUnitTest1>
<EventUnitTest2>

34
xml/event/script_common_for_open_promotion_xml.ev
View file

@ -4,9 +4,8 @@ DEBUGVAR PayOfflineMode
DEBUGVAR CocktailShow
DEBUGVAR OpenFromPageBoard
DEBUGVAR MomCocoaPro
DEBUGVAR RobinsonBeautyPro
DEBUGVAR JemilaPro
DEBUGVAR HallweenPro
Var PromotionState1 = "Invisible"
Var PromotionState2 = "Invisible"
@ -15,14 +14,14 @@ Var PromotionState3 = "Invisible"
If CocktailShow = "true" Then
If OpenFromPageBoard = 1 Then
OpenInst 2 "ROOT/taobin_project/xml/page_catalog_group_recommend.xml"
OpenInst 2 "ROOT/taobin_project/xml/page_catalog_group_recommend.xml"
Else
Open "ROOT/taobin_project/xml/page_catalog_group_recommend.xml"
Open "ROOT/taobin_project/xml/page_catalog_group_recommend.xml"
EndIf
Else
Var BigButtonEnable = "Enable"
Var CountEnablePromotion = 0
Var FileRecommendToOpen = "ROOT/taobin_project/xml/page_catalog_group_recommend.xml"
; zone promote
@ -31,13 +30,20 @@ Else
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/promotion_jemila.xml"
EndIf
If RobinsonBeautyPro = 1 Then
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/promotion_robinson_beauty.xml"
Else
If MomCocoaPro = 1 Then
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/promotion_mom_cocoa_ignore.xml"
EndIf
EndIf
If HalloweenPro = 1 Then
Var PromotionState1 = "Enable"
Var ProEnableCount = 1
If JemilaPro = 1 Then
Var PromotionState2 = "Enable"
Var ProEnableCount = ProEnableCount + 1
EndIf
If ProEnableCount > 1 Then
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/double_promotion_halloween_and_jemila.xml"
Else
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/promotion_halloween.xml"
EndIf
EndIf
If OpenFromPageBoard = 1 Then
DEBUGVAR FreeEnergyDrink
@ -45,9 +51,9 @@ Else
OpenInst 2 FileRecommendToOpen
Var OpenFromPageBoard = 0
Else
Open FileRecommendToOpen
EndIf

21
xml/event/tricker.ev
View file

@ -129,11 +129,15 @@ Var Seeker.BuyMomCocoaProFlag = 0
Var RobinsonBeautyPro = 0
Var FromRobinsonBeautyPro = 0
; Enable Jemila promotion, 1 - 18 Oct
; Enable Jemila promotion, 1 - 25 Oct
Var JemilaPro = 0
Var FromJemilaPro = 0
Var JemilaRewardOutOfStock = 0
; Halloween promotion, 21 Oct - 3 Nov
Var HalloweenPro = 0
Var FromHalloweenPro = 0
Var NewCollectPoint = 1
Var PayMentCodeShouldCollectPromotionPoint = 0
Var NotCollectPointPromotion = 0
@ -205,9 +209,13 @@ If SystemDateMonthInt = 9 Then
EndIf
If SystemDateMonthInt = 10 Then
If SystemDateDayInt <= 18 Then
If SystemDateDayInt <= 25 Then
Var JemilaPro = 1
EndIf
If SystemDateDayInt >= 21 Then
Var HalloweenPro = 1
EndIf
EndIf
@ -222,6 +230,7 @@ If BoxID = 105005 Then
Var MomCocoaProDiscountEnable = 0
Var RobinsonBeautyPro = 0
Var JemilaPro = 1
Var HalloweenPro = 1
EndIf
If BoxID = 172331 Then
@ -272,7 +281,6 @@ If BoxID = 173149 Then
Var RobinsonBeautyPro = 0
Var JemilaPro = 1
EndIf
DEBUGVAR JemilaPro
Var XMLLiveInfoEnable = 1
@ -349,6 +357,7 @@ If taobin_nopro = "true" Then
Var MomCocoaPro = 0
Var RobinsonBeautyPro = 0
Var JemilaPro = 0
Var HalloweenPro = 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"
@ -381,7 +390,11 @@ EndIf
If 7UpSyrupEnable = "true" Then
Else
Var 7UpLuckyDrawX2Pro = 0
If PepsiHighYSyrupEnable = "true" Then
Else
Var HalloweenPro = 0
EndIf
EndIf
If MintSyrupEnable = "true" Then

12
xml/menu_new_layout_gen.py
View file

@ -277,6 +277,12 @@
else:
from_jemila = False
if current_file_name == "page_catalog_group_pro_halloween.skt":
from_halloween = True
menu_white_color_catalog = True
else:
from_halloween = False
#print ("######################################################################################################")
idx_of_eng = 2
out_xml('<FrameScroll> \r\n')
@ -624,6 +630,9 @@
if from_jemila:
out_xml( '\t\tVar FromJemilaPro = 1 \r\n')
if from_halloween:
out_xml( '\t\tVar FromHalloweenPro = 1 \r\n')
out_xml( '\t\t\r\n')
out_xml( '\t\t'+ button_add_string +'\r\n')
@ -1269,6 +1278,9 @@
if from_jemila:
out_xml( '\t\tVar FromJemilaPro = 1 \r\n')
if from_halloween:
out_xml( '\t\tVar FromHalloweenPro = 1 \r\n')
out_xml( '\t\t\r\n')
out_xml( '\t\t\r\n')

1
xml/page_board.xml
View file

@ -215,6 +215,7 @@
STRCONTAIN "1216" MaterialAvailable CoconutSyrupEnable
STRCONTAIN "1042" MaterialAvailable CocoaPowderEnable
STRCONTAIN "1037" MaterialAvailable 7UpSyrupEnable
STRCONTAIN "1038" MaterialAvailable PepsiHighYSyrupEnable
STRCONTAIN "1052" MaterialAvailable CollagenPowderEnable
;Var AppFastEnable = "false"

54
xml/page_catalog_group_pro_halloween.skt Normal file
View file

@ -0,0 +1,54 @@
<?hurr
#include=menu_head.py
?>
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
;include="ROOT/taobin_project/xml/menu_catalog_default_init.xml"
Var FromHalloweenPro = 0
Var Timeout = 0
;include="ROOT/taobin_project/xml/menu_catalog_new_menu.xml"
</EventOpen>
;include="ROOT/taobin_project/xml/menu_catalog_new.xml"
<?hurr
#include=menu_new_layout_gen_v2.py
?>
<?hurr
#include=menu_new_layout_gen.py
?>
<Button>
<X> 780 </X>
<Y> 500 </Y>
<State> buttonRemoveCup </State>
;<Color> "0x00BDFF" </Color>
<Interval> 500 </Interval>
<Filename> "ROOT/taobin_project/image/main_page/bn_remove_cup.png" </Filename>
<Filename> "ROOT/taobin_project/image/main_page/bp_remove_cup.png" </Filename>
<EventClick>
Machine RemoveCup
Machine DoorLidOpen
Var buttonRemoveCup = "Invisible"
</EventClick>
</Button>
;BigLogoLayout
</Popup>

3881
xml/page_catalog_group_pro_halloween.xml Normal file
View file

File diff suppressed because it is too large Load diff

117
xml/page_collect_point_2.xml
View file

@ -10,7 +10,7 @@
Var Timeout = 0
SAVELOG UnitTestType
If UnitTestType = "1" Then
Var CoffeePoint = 10
Open "ROOT/taobin_project/xml/page_show_consent.xml"
@ -23,12 +23,12 @@
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"
@ -45,10 +45,10 @@
EndIf
Var GetLuckyDraw = 0
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var ShowCountDownBrewing = CountDownBrewing
@ -56,61 +56,61 @@
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
Open "ROOT/taobin_project/xml/page_collect_point_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 StepGetPoint = 0 Then
If PdpaAsk = 0 Then
Open "ROOT/taobin_project/xml/page_show_consent.xml"
Open "ROOT/taobin_project/xml/page_show_consent.xml"
Else
Var StepGetPoint = 1
Var TelephoneNumber = TelephoneNumberX
GETACCEXT TelephoneNumber 14
Var Ext1a = ""
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
EndIf
Else
If Ext1a = "" Then
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember = TelephoneNumber
Open "ROOT/taobin_project/xml/page_collect_point_error.xml"
Else
If GetLuckyDraw = 1 Then
@ -120,22 +120,28 @@
Var luckyDrawTicket = Ext1h
INT luckyDrawTicket
Var luckyDrawAlredyGotReward = Ext1i
If luckyDrawAlredyGotReward = 1 Then
Open "ROOT/taobin_project/xml/page_collect_point_3_28.xml"
If FromHalloweenPro = 1 Then
Open "ROOT/taobin_project/xml/event/halloween/check_quota.xml"
Else
Open "ROOT/taobin_project/xml/page_collect_point_3_28_lucky_draw_campaign.xml"
If luckyDrawAlredyGotReward = 1 Then
Open "ROOT/taobin_project/xml/page_collect_point_3_28.xml"
Else
Open "ROOT/taobin_project/xml/page_collect_point_3_28_lucky_draw_campaign.xml"
EndIf
EndIf
Else
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember = TelephoneNumber
Open "ROOT/taobin_project/xml/page_collect_point_error.xml"
EndIf
EndIf
If GetLuckyDraw = 0 Then
If Ext1a = "ok" Then
@ -162,13 +168,13 @@
Else
Var Seeker.IsLineMember = 1
EndIf
Var TelephoneNumber = TelephoneNumberX
Var TNumberTaobinMemberXXX = TelephoneNumber
;Var PointTaobinTmp = 4
Var PointTaobin = PointTaobinTmp
Var pTaobin = PointTaobin
@ -190,14 +196,14 @@
Var Seeker.PointTaobinStr = ParamCP
Var Seeker.TNumberTaobinMember = TelephoneNumberX
Var CoffeePointRank = Ext1b
INT CoffeePointRank
Var CoffeePoint1 = Ext1c
INT CoffeePoint1
Var CoffeePoint = PointTaobin + CoffeePoint1
Var CoffeePointOld = CoffeePoint1
@ -205,7 +211,7 @@
Var CoffeePointRank = CoffeePointRank + 0
Else
Var CoffeePointRank = CoffeePointRank + PointTaobin
EndIf
EndIf
Var CoffeePointRankTmp = CoffeePointRank
@ -216,13 +222,13 @@
;inter-xml-open
If CountryName = "Malaysia" Then
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
EndIf
;inter-xml-open
If CountryName = "Indonesia" Then
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
EndIf
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
EndIf
;inter-xml-open
If CountryName = "Australia" Then
@ -231,29 +237,29 @@
Var pageCollectPoint = CountryRootPath + "/xml/page_collect_point_3.lxml"
Open pageCollectPoint
Else
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
EndIf
EndIf
;inter-xml-open
If CountryName = "Singapore" Then
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
EndIf
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
EndIf
Open "ROOT/taobin_project/xml/page_show_consent.xml"
Open "ROOT/taobin_project/xml/page_show_consent.xml"
EndIf
If PayAmount >= 20 Then
If TaobinPromoX = "p2.no_otp" Then
Open "ROOT/taobin_project/xml/page_collect_point_extend1.xml"
Open "ROOT/taobin_project/xml/page_collect_point_extend1.xml"
EndIf
If TaobinPromoX = "p2.unused" Then
Open "ROOT/taobin_project/xml/page_collect_point_extend1.xml"
Open "ROOT/taobin_project/xml/page_collect_point_extend1.xml"
EndIf
EndIf
If NewCollectPoint = 1 Then
@ -264,14 +270,14 @@
Open "ROOT/taobin_project/xml/page_collect_point_3_28.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
EndIf
Else
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember = TelephoneNumber
@ -284,20 +290,20 @@
</EventActionOk>
<EventActionError>
<EventActionError>
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember= TelephoneNumber
Open "ROOT/taobin_project/xml/page_collect_point_error.xml"
</EventActionError>
</EventActionError>
<EventMachine>
If MachineStage = "drink-success" Then
@ -360,4 +366,3 @@
</Popup>

60
xml/page_get_yourchange.xml
View file

@ -7,8 +7,8 @@
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var Timeout = 0
Var Timeout = 0
Var LangButtonEnable = "Enable"
If CountryName = "Singapore" Then
@ -22,11 +22,11 @@
If CountryName = "UnitedArabEmirates Dubai" Then
Var LangButtonEnable = "Invisible"
EndIf
DEBUGVAR LangButtonEnable
If show_eng = "true" Then
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"
@ -36,11 +36,11 @@
EndIf
Var DirImage = "ROOT/taobin_project/image/page_thankyou_en"
Else
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
@ -49,19 +49,19 @@
Var show_btn = ""
EndIf
Var DirImage = "ROOT/taobin_project/image/page_thankyou"
EndIf
If show_eng = "true" Then
If show_eng = "true" Then
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Dont_forget_your_changes_below.mp3"
Else
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Dont_forget_your_changes_below.mp3"
EndIf
Var imgGetChange = "/imgGetChange.png"
;inter-image
If CountryName = "Malaysia" Then
Var imgGetChange = "/imgGetChange-MYR.png"
@ -70,7 +70,7 @@
;inter-image
If CountryName = "Indonesia" Then
Var imgGetChange = "/imgGetChange-IDR.png"
EndIf
EndIf
;inter-image
If CountryName = "Singapore" Then
@ -93,19 +93,19 @@
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
<EventTimeout>
If Timeout >= 2 Then
Var Timeout = Timeout + 1
If ChangeStatus = "payout-end" Then
If Timeout >= 2 Then
If ChangeStatus = "payout-end" Then
Var Timeout = 30
EndIf
If Seeker = "curr" Then
Var Timeout = 30
EndIf
EndIf
If Timeout >= 30 Then
@ -115,7 +115,7 @@
DEBUGVAR PayDetail
DEBUGVAR PayDetail2
UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
EndIf
If InternationalEnable = 1 Then
@ -124,9 +124,9 @@
If Seeker = "next" Then
;CoinBack
Open Brew3ConInter
Open Brew3ConInter
Else
Open Brew3Inter
Open Brew3Inter
EndIf
Else
@ -136,13 +136,13 @@
If Seeker = "next" Then
;CoinBack
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
Open "ROOT/taobin_project/xml/page_brewing3.xml"
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
EndIf
EndIf
;If New_Payment = 1 Then
; TRY "/mnt/sdcard/coffeevending/taobin_project/xml/process/payment.ev"
@ -150,20 +150,20 @@
;If Seeker = "next" Then
;CoinBack
; Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
; Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
;Else
; Open "ROOT/taobin_project/xml/page_brewing3.xml"
; Open "ROOT/taobin_project/xml/page_brewing3.xml"
;EndIf
EndIf
EndIf
Refresh
TimerReset
</EventTimeout>
</EventTimeout>
;include="ROOT/taobin_project/inc/video.inc"
@ -184,8 +184,8 @@
<FilenamePress> show_btp </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
</EventClick>
</Button>

92
xml/page_lid_straw.xml
View file

@ -6,9 +6,9 @@
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var CountUpBrewing = BrewTime - CountDownBrewing
;Var CountUpBrewing = 0
Var CountDownVideoTimeReload = AnimationVideoPlayTime
@ -18,33 +18,33 @@
Var Timeout = 0
If show_eng = "true" Then
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/page_lid_straw_en"
Var PictureEnd = "_en.png"
Var BottomText = PicturePath + "text_bottom_eng.png"
Var lid_straw_bg_iamge = DirImage + "/img4.png"
Var lid_straw_bg_iamge = DirImage + "/img4.png"
If LidState = "Enable" Then
Var lid_straw_bg_iamge = DirImage + "/img3.png"
Var lid_straw_bg_iamge = DirImage + "/img3.png"
EndIf
Else
Var DirImage = "ROOT/taobin_project/image/page_lid_straw"
Var PictureEnd = ".png"
Var BottomText = PicturePath + "text_bottom_thai2.png"
Var lid_straw_bg_iamge = DirImage + "/img4.png"
Var lid_straw_bg_iamge = DirImage + "/img4.png"
If LidState = "Enable" Then
Var lid_straw_bg_iamge = DirImage + "/img3.png"
Var lid_straw_bg_iamge = DirImage + "/img3.png"
EndIf
EndIf
If InternationalEnable = 1 Then
Var PicturePath = "/mnt/sdcard/coffeevending/taobin_project/image/page_doing/"
Var PictureBegin = "txt_"
Var PictureEnd = "_en.png"
@ -62,7 +62,7 @@
Var PicturePath = CountryRootPath + "/image/page_doing/"
Var PictureBegin = "txt_"
Var PictureEnd = "_en.png"
;inter-has-alter-anim
If CountryName = "UnitedArabEmirates Dubai" Then
;check LanguageShow
@ -93,7 +93,7 @@
Var PictureBegin = "txt_"
EndIf
Var VideoPlayFile = VideoPath
Var VideoPlayFile = VideoPlayFile + VideoFileBegin
@ -107,8 +107,8 @@
If Seeker.PayWithQR = 0 Then
If Seeker.TNumberTaobinCredit = "" Then
Var TelephoneNumber = "0899999999"
Var PayO2 = ""
@ -122,9 +122,9 @@
Var TelephoneNumber = Seeker.TNumberTaobinCredit
Var PayO2 = Seeker.CoffeePinNumber
EndIf
EndIf
If Seeker = "next" Then
;CoinBack
If ChangeFlag2 = 0 Then
@ -133,8 +133,8 @@
Var PayDetail2 = ToppingDetail
DEBUGVAR PayDetail
DEBUGVAR PayDetail2
UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
EndIf
If CountryName = "UnitedArabEmirates Dubai" Then
Var brewing3ContiInter = CountryRootPath + "/xml/page_brewing3Conti.lxml"
@ -145,8 +145,8 @@
If New_Payment = 1 Then
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/process/payment.ev"
EndIf
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
EndIf
Else
@ -159,12 +159,12 @@
Open "ROOT/taobin_project/xml/page_get_yourchange.xml"
EndIf
EndIf
Else
DEBUGVAR ChangeFlag2
If ChangeFlag2 = 0 Then
@ -174,7 +174,7 @@
DEBUGVAR PayDetail
DEBUGVAR PayDetail2
UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
EndIf
If InternationalEnable = 1 Then
@ -186,8 +186,8 @@
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/process/payment.ev"
EndIf
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
Else
If UsePepsiTheme = 1 Then
If CountryName = "Singapore" Then
@ -198,7 +198,7 @@
EndIf
EndIf
EndIf
Var LidState = Lid1Status
;Lid1Status
@ -209,15 +209,15 @@
Var LidState = "Invisible"
EndIf
STRCONTAIN "9701" BrewParam IgnoreLidStraw
STRCONTAIN "9701" BrewParam IgnoreLidStraw
DEBUGVAR BrewParam
DEBUGVAR IgnoreLidStraw
DEBUGVAR Service_LidStraw
If IgnoreLidStraw = "true" Then
Var IgnoreLidStraw = "false"
@ -226,8 +226,8 @@
Var Brew3Inter = CountryRootPath + "/xml/page_brewing3.lxml"
Open Brew3Inter
Else
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
EndIf
If Service_LidStraw = "Disable" Then
@ -236,8 +236,8 @@
Var Brew3Inter = CountryRootPath + "/xml/page_brewing3.lxml"
Open Brew3Inter
Else
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
EndIf
DEBUGVAR StrawAutoRelease1
@ -249,17 +249,17 @@
Var Brew3Inter = CountryRootPath + "/xml/page_brewing3.lxml"
Open Brew3Inter
Else
Open "ROOT/taobin_project/xml/page_brewing3.xml"
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
<EventTimeout>
If CountDownBrewing > 0 Then
Var CountDownBrewing = CountDownBrewing - 1
EndIf
Var ShowCountDownBrewing = BREW_CNT
@ -270,15 +270,15 @@
Var Brew3Inter = CountryRootPath + "/xml/page_brewing3.lxml"
Open Brew3Inter
Else
Open "ROOT/taobin_project/xml/page_brewing3.xml"
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
EndIf
Refresh
TimerReset
</EventTimeout>
; remove by kong ; optimize new step advertise
</EventTimeout>
; remove by kong ; optimize new step advertise
@ -302,7 +302,7 @@
<EventMachine>
If MachineStage = "drink-success" Then
Var MachineState_Result = 1
EndIf
@ -312,12 +312,12 @@
EndIf
</EventMachine>
<EventChangeStatus>
If ChangeStatus = "payout-end" Then
If ChangeStatus = "payout-end" Then
EndIf
</EventChangeStatus>

436
xml/page_payment_cash-AUS.xml
View file

File diff suppressed because it is too large Load diff

106
xml/page_thankyou.xml
View file

@ -30,7 +30,7 @@
Var FailedCount = 0
Var ChangeAmountSum = 0
Var Tel_Confirm_Flag = 0
Var TimeoutToNext = 3
@ -48,8 +48,8 @@
WRITE_FILE "/mnt/sdcard/coffeevending/log/drink-success" "--"
EndIf
If show_eng = "true" Then
Var ImageDoing = "ROOT/taobin_project/image/page_doing/img2_eng.png"
If show_eng = "true" Then
Var ImageDoing = "ROOT/taobin_project/image/page_doing/img2_eng.png"
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
@ -57,7 +57,7 @@
Var DirImage = "ROOT/taobin_project/image/page_thankyou_en"
Else
Var ImageDoing = "ROOT/taobin_project/image/page_doing/img2.png"
Var ImageDoing = "ROOT/taobin_project/image/page_doing/img2.png"
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
Var BottomText = PicturePath + "text_bottom_thai2.png"
@ -86,7 +86,7 @@
If Seeker = "next" Then
Var NextOrder = "true"
EndIf
If VendingCreditRemain = "" Then
Var RemainCreditST = "Invisible"
@ -114,25 +114,25 @@
DEBUGVAR SaveTheWorldCount
If SaveTheWorldCount = 2 Then
If LedLidBlink = "no" Then
Var SaveTheWorldST = "Enable"
EndIf
Var video_id_to_ran = 3
Var video_name_to_play = "taobin_save_world"
Random2 1 3 video_id_to_ran
Var ThankyouST = "Invisible"
Else
Var video_id_to_ran = 2
Var video_name_to_play = "taobin_thank"
Random2 1 2 video_id_to_ran
Var ThankyouST = "Enable"
EndIf
@ -140,14 +140,14 @@
DEBUGVAR video_id_to_ran
Var show_video = 1
Var SaveTheWorldST = "Invisible"
Var SaveTheWorldST = "Invisible"
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
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"
Var video_file_name = video_file_name + video_id_to_ran
Var video_file_name = video_file_name + ".mp4"
If SaveTheWorldCount < 2 Then
@ -158,11 +158,11 @@
TRY "/mnt/sdcard/coffeevending/taobin_project/video/script2.ev"
EndIf
EndIf
DEBUGVAR video_file_name
Var VideoFileNameStage = "Enable"
Var TimeoutToNext = 5
Var ThankyouST = "Invisible"
@ -177,7 +177,7 @@
;inter-image
If CountryName = "Indonesia" Then
Var remainCredit = "/remainCredit-IDR.png"
EndIf
EndIf
;inter-image
If CountryName = "Australia" Then
@ -198,22 +198,22 @@
DEBUGVAR Seeker.CreditCardRef
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/sometime/script_thankyou.ev"
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var Timeout = Timeout + 1
Var Timeout = Timeout + 1
If Timeout = TimeoutToNext Then
If CART_INDEX = 0 Then
If CART_INDEX = 0 Then
Else
;Cart "MakeID" CART_INDEX
EndIf
If Seeker.PayWithQR = 0 Then
If Seeker.FreeVendingCampaign = 0 Then
@ -221,10 +221,10 @@
If Seeker.CreditCard = 1 Then
DEBUGVAR CoinAmount
If CoinAmount > 0 Then
DEBUGVAR "Change Canout"
Change CoinAmount
Change CoinAmount
Var ChangeFlag2 = 1
EndIf
@ -237,19 +237,19 @@
Var DetectCoinAmount = 1
EndIf
Else
If Seeker.IntVendingCampaign < PayAmount Then
If Seeker.IntVendingCampaign < PayAmount Then
Var SumCoinAmount = CoinAmount + Seeker.IntVendingCampaign
Var SumCoinAmount = SumCoinAmount + Seeker.IntVendingCredit
If SumCoinAmount >= PayAmount Then
If SumCoinAmount >= PayAmount Then
Var Canout = SumCoinAmount - PayAmount
If Canout > 0 Then
;Change Canout
;Change Canout
;Var ChangeFlag2 = 1
Var GotoStoreCredit0 = 1
Var StoreCreditAmount = Canout
EndIf
EndIf
EndIf
@ -260,12 +260,12 @@
Else
Var Canout = CoinAmount
If Canout > 0 Then
;Change Canout
;Change Canout
;Var ChangeFlag2 = 1
Var GotoStoreCredit0 = 1
Var StoreCreditAmount = Canout
@ -276,7 +276,7 @@
Var Canout = CoinAmount
If Canout > 0 Then
;Change Canout
;Change Canout
;Var ChangeFlag2 = 1
Var GotoStoreCredit0 = 1
Var StoreCreditAmount = Canout
@ -285,14 +285,14 @@
EndIf
Var CountDownThankyou = 0
EndIf
; run test;
If CountDownThankyou = 0 Then
If IgnoreNetCore = "true" Then
If CountDownThankyou = 0 Then
If IgnoreNetCore = "true" Then
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
@ -304,8 +304,8 @@
EndIf
EndIf
If TestLoopMakeDrink = 1 Then
Open "ROOT/taobin_project/xml/page_brewing_test_loop.xml"
If TestLoopMakeDrink = 1 Then
Open "ROOT/taobin_project/xml/page_brewing_test_loop.xml"
EndIf
Var CountDownBrewing = BrewTime
@ -380,7 +380,7 @@
DEBUGVAR PayDetail
DEBUGVAR PayDetail2
UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
Else
DEBUGVAR TxRef1
@ -388,7 +388,7 @@
DEBUGVAR PayDetail
DEBUGVAR PayDetail2
UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
EndIf
EndIf
@ -396,13 +396,13 @@
If StoreCreditAmount > 0 Then
Change StoreCreditAmount
Change StoreCreditAmount
Var ChangeFlag2 = 1
EndIf
If CART_INDEX >= 2 Then
If CART_INDEX >= 2 Then
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
@ -460,7 +460,7 @@
If CoinAmount >= ServiceAmountSupCampain Then
DEBUGVAR Seeker.IntVendingCredit
Var CurrAmount = Seeker.CurrCreditAmount - Seeker.IntVendingCredit
Var Seeker.IntVendingCredit = 0
Var RefID = "0/" + Seeker.CreditNotEnoughRefID
@ -497,7 +497,7 @@
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
If CART_INDEX >= 2 Then
If CART_INDEX >= 2 Then
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
@ -506,7 +506,7 @@
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
EndIf
TRY "ROOT/taobin_project/xml/open_page_collect_point.ev"
@ -529,7 +529,7 @@
Open MemberPrompt
EndIf
Else
Open "ROOT/taobin_project/xml/page_payment_storeCredit0.xml"
Open "ROOT/taobin_project/xml/page_payment_storeCredit0.xml"
EndIf
Else
@ -557,7 +557,7 @@
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
If CART_INDEX >= 2 Then
If CART_INDEX >= 2 Then
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
@ -571,17 +571,17 @@
TRY "ROOT/taobin_project/xml/open_page_collect_point.ev"
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
Var ShowCountDownBrewing = CountDownBrewing
Refresh
TimerReset
</EventTimeout>
</EventTimeout>
;<Image>
;<X> 0 </X>
@ -655,8 +655,8 @@
;</Text>
<EventChangeStatus>
If ChangeStatus = "payout-end" Then
If ChangeStatus = "payout-end" Then
EndIf
</EventChangeStatus>

10
xml/process/discount_from_promotion.ev
View file

@ -19,6 +19,16 @@ If FromPassionMintPro = 1 Then
Var Seeker.CampaignPPrice = PromotionPriceDrink
EndIf
If BoxID = 105005 Then
If Seeker.selected_a_drink = "12-05-02-0045" Then
Var PriceDiff = PriceDrink - 25
Var DiscountDrink = PriceDiff
Var Seeker.CampaignPPrice = 25
Var PriceDrink = PriceDrink - PriceDiff
EndIf
EndIf
If ChildrenFree = 1 Then
Var RemainAmountStr = "Free###size=150"