"Enable" 1080 1920 ; "0xeae6e1" SoundVolume ; On open If AppFastEnable = "true" Then Var Menu11Selected = "PressForever" Var Menu7Selected = "Invisible" Else Var Menu11Selected = "Invisible" Var Menu7Selected = "PressForever" EndIf SAVELOG PreviseXMLFileName2 Var Timeout = 0 If SlientRefreshIndex = 8 Then Var SlientRefreshIndex = 9 EndIf 1000 ;DEBUGVAR ICE_PROCESS_STATUS If ICE_PROCESS_STATUS = 2 Then Var ice_tab_process_show = "Enable" Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT Else Var ice_tab_process_show = "Invisible" EndIf GetVisible inst_show8 ;DEBUGVAR inst_show8 InstanceGetString SaveStringInst ;DEBUGVAR SaveStringInst If inst_show8 = 1 Then InstanceGetString SaveStringInst ;DEBUGVAR SaveStringInst If SaveStringInst = "RefreshNow" Then GetXMLFileNameCurrentRunning CurrentOpenFile Open CurrentOpenFile If show_eng = "true" Then InstanceSetString "ShowEng" Else InstanceSetString "ShowThai" EndIf EndIf EndIf ; setvarint SlientRefreshEnable 1 ;DEBUGVAR SlientRefreshEnable If SlientRefreshEnable = 1 Then If SaveStringInst = "RefreshNow" Then GetXMLFileNameCurrentRunning CurrentOpenFile Open CurrentOpenFile If show_eng = "true" Then InstanceSetString "ShowEng" Else InstanceSetString "ShowThai" EndIf EndIf EndIf If SlientRefreshIndex = 8 Then If inst_show8 = 0 Then GetXMLFileNameCurrentRunning CurrentOpenFile8 Open CurrentOpenFile8 Else Var SlientRefreshIndex = 9 EndIf EndIf TimerReset