Rules reminder

[enema]

This is my second script in my life, hope it will be more useful as first one (lol) Anyway the core is taken from phattys "write your own bot, lesson 1-9" but the idea is a litle bit difrient. Here it goes :

--## Rules Reminder by enema [english version] (fat-ass.no-ip.com:182)
---- Made in Riga, Latvia (October 2nd, year 2004) If you want Latvian version, just ask! :)
--## If the bot was made by someone else earlier, Im sorry
---- Everyone can add more rules, if they wannt
--## There could be a lot of spelling errors! Edit them, if u want
------------------------------------------------------------------------------------------------
--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~

Bot = "Reminder"

MessageTimer = 1

Sec = 1000
Min = 60* Sec
H = 60* Min

function Main() 
--frmHub:RegBot(Bot) 
	SetTimer(H)
	StartTimer()
end 

function OnTimer()
if MessageTimer == 1 then
randomtimer = random(6)
	if randomtimer == 1 then
		SendToAll(Bot,"- <>===================================================================================")
		SendToAll(Bot,"--Sharing instaled stuff is crime against DC world!!!                                --")
		SendToAll(Bot,"- <>===================================================================================")
	elseif randomtimer == 2 then
		SendToAll(Bot,"-----------------------------------------")
		SendToAll(Bot,"--      Underage Porno leads to jail!!!--")
		SendToAll(Bot,"-----------------------------------------")
	elseif randomtimer == 3 then
		SendToAll(Bot,"- <>=======================================================================================")
		SendToAll(Bot,"--Using CAPS LOCK is like virtual screaming. Some people may have very sensetive ears!   --")
		SendToAll(Bot,"- <>=======================================================================================")
	elseif randomtimer == 4 then
		SendToAll(Bot,"-------------------------------------------------------------------")
		SendToAll(Bot,"--      Upload speed limiting isint sharing! Share or get lost!!!--")
		SendToAll(Bot,"-------------------------------------------------------------------")
	elseif randomtimer == 5 then
		SendToAll(Bot,"- <>=======================================================================================")
		SendToAll(Bot,"--  OPs cant always be there when you need. If someone f*ks with you, report imediatly!  --")
		SendToAll(Bot,"- <>=======================================================================================")
	elseif randomtimer == 6 then
		SendToAll(Bot,"----------------------------------------------------------------")
		SendToAll(Bot,"--      Dont share bad mood or atitude!!! :)                  --")
		SendToAll(Bot,"----------------------------------------------------------------")

	end
end

end

Please post some replies! Your thoughts are very important to me right now!