PtokaX forum

Archive => Archived 4.0 boards => Finished Lua 4 scripts => Topic started by: enema on 02 October, 2004, 15:54:36

Title: Rules reminder
Post by: enema on 02 October, 2004, 15:54:36
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!