LogON = false;
 
function OnCreate()
	this:RegisterCommand("loog", CommandChatType.CHAT_ALLY, CommandAccessLevel.ACCESS_ME);
end;
 
function OnCommand_loog(vCommandChatType, vNick, vCommandParam)
 
	if (LogON == false) then 
 LogON = true;
 ShowToClient("SYS ", "Log system ON"); 
	else
 LogON = false;
 ShowToClient("SYS ", "Log system OFF");
	end;
 
end;
 
function LogMessage(message)
	local file = io.open(GetDir() .. "\\MyLog.txt", "r");
	if (file == nil) then
 file = io.open(GetDir() .. "\\MyLog.txt", "w");
	end;
 file:close();
	file = io.open(GetDir() .. "\\MyLog.txt", "a+");
	file:write('['..os.date()..']'..message..'\n');
	file:close();
end;
 
function OnChatSystemMessage(id, msg)
	--Event called some system message show up on chat (id - integer, msg - string).
 
	if (LogON == true) then 
 LogMessage(id .. " - " .. msg);
	end;
 
end;