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

Songgran go on

Browse source
This commit is contained in:
kong 2023-03-28 14:44:43 +07:00
parent d8fef6b51e
commit 1c20abc0e9
30 changed files with 416 additions and 2482 deletions
Download patch file Download diff file Expand all files Collapse all files

54
xml/eventopen_menu.ev
View file

@ -1,55 +1 @@
; Original
;Var SoundThaiIndex = 0
; north
;Var SoundThaiIndex = 1
; northeast
;Var SoundThaiIndex = 2
; south
;Var SoundThaiIndex = 3
;Var SongkranEnable = 0
If BoxID = 173149 Then
Var SongkranEnable = 1
EndIf
If BoxID = 172527 Then
Var SongkranEnable = 1
EndIf
If BoxID = 172644 Then
Var SongkranEnable = 1
EndIf
If BoxID = 200001 Then
Var SongkranEnable = 1
EndIf
If SongkranEnable = 1 Then
If SoundThaiIndex = 0 Then
Var SoundThaiIndex = 1
Else
If SoundThaiIndex = 1 Then
Var SoundThaiIndex = 2
Else
If SoundThaiIndex = 2 Then
Var SoundThaiIndex = 3
Else
Var SoundThaiIndex = 0
EndIf
EndIf
EndIf
Else
Var SongkranEnable = 0
Var $12-01-02-0054.Button = "Inivisble"
Var $12-01-02-0053.Button = "Inivisble"
Var $12-02-02-0043.Button = "Inivisble"
Var $12-02-02-0044.Button = "Inivisble"
Var $12-03-02-0026.Button = "Inivisble"
Var $12-05-02-0055.Button = "Inivisble"
Var $12-05-02-0056.Button = "Inivisble"
EndIf
DEBUGVAR SongkranEnable
DEBUGVAR SoundThaiIndex