--PC Uptime 1.0 
--by Mutor The Ugly 
--Impossible without plop ...thx 8-)
-- 
--Send uptime to main chat 
-- 

BotName = "[UpTime]" 
UpTimeComm = "+ut" 

function Main() 
frmHub:RegBot(BotName) 
end 

function DataArrival(curUser, Data) 
if strfind(Data, UpTimeComm) and curUser.bOperator then 
execute("uptime > uptime1.lst") 
local serverup = "" 
if readfrom("uptime1.lst") then 
readfrom("uptime1.lst") 
serverup = read("*a") 
serverup = gsub(serverup,"|",strchar(166)) 
serverup = gsub(serverup,"\n","\r\n") 
writeto() 
remove("uptime1.lst") 
end 
SendToAll(BotName, "\r\n---<>------------------------------------------------------------------------------------------------------------------------<>---\r\n"..serverup.."---<>------------------------------------------------------------------------------------------------------------------------<>---")
--curUser:SendData(BotName, serverup)
--curUser:SendData(BotName, "\r\n---<>------------------------------------------------------------------------------------------------------------------------<>---\r\n"..serverup.."---<>------------------------------------------------------------------------------------------------------------------------<>---")
return 1 
end 
end