"Enable" 1080 1920 ; "0xeae6e1" SoundVolume ; On open Var Menu4Selected = "PressForever" SAVELOG PreviseXMLFileName2 Var Timeout = 0 DEBUGVAR SlientRefreshIndex If SlientRefreshIndex = 4 Then Var SlientRefreshIndex = 5 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_show4 ;DEBUGVAR inst_show4 If inst_show4 = 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 = 4 Then If inst_show4 = 0 Then GetXMLFileNameCurrentRunning CurrentOpenFile4 Open CurrentOpenFile4 Else Var SlientRefreshIndex = 5 EndIf EndIf TimerReset InstanceGetString SaveStringInst DEBUGVAR SaveStringInst DEBUGVAR show_eng DEBUGVAR EnabledBlockUpdateInst7 DEBUGVAR EnabledBlocksDrawInst7 If SaveStringInst = "RefreshNow" Then GetXMLFileNameCurrentRunning CurrentOpenFile Open CurrentOpenFile Else If EnabledBlocksDrawInst7 = EnabledBlockUpdateInst7 Then Var StatusRefresh = "NoRefresh" DEBUGVAR StatusRefresh Else Var StatusRefresh = "Refresh" DEBUGVAR StatusRefresh GetXMLFileNameCurrentRunning CurrentOpenFile2 Open CurrentOpenFile2 EndIf EndIf If show_eng = "true" Then If SaveStringInst = "ShowThai" Then InstanceSetString "ShowEng" GetXMLFileNameCurrentRunning CurrentOpenFile Open CurrentOpenFile EndIf Else If SaveStringInst = "ShowEng" Then InstanceSetString "ShowThai" GetXMLFileNameCurrentRunning CurrentOpenFile Open CurrentOpenFile EndIf EndIf RefreshAll