"Enable" 1080 1920 ; "0xeae6e1" SoundVolume ; On open ; soda and other Var Menu6Selected = "PressForever" SAVELOG PreviseXMLFileName2 Var Timeout = 0 DEBUGVAR SlientRefreshIndex If SlientRefreshIndex = 7 Then Var SlientRefreshIndex = 8 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_show7 ;DEBUGVAR inst_show7 If inst_show7 = 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 = 7 Then If inst_show7 = 0 Then GetXMLFileNameCurrentRunning CurrentOpenFile7 Open CurrentOpenFile7 Else Var SlientRefreshIndex = 8 EndIf EndIf TimerReset InstanceGetString SaveStringInst DEBUGVAR SaveStringInst DEBUGVAR show_eng DEBUGVAR EnabledBlockUpdateInst10 DEBUGVAR EnabledBlocksDrawInst10 If SaveStringInst = "RefreshNow" Then GetXMLFileNameCurrentRunning CurrentOpenFile Open CurrentOpenFile Else If EnabledBlocksDrawInst10 = EnabledBlockUpdateInst10 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