Author Topic: Rules reminder  (Read 1340 times)

0 Members and 1 Guest are viewing this topic.

Offline enema

  • Lord
  • ***
  • Posts: 276
  • Karma: +1/-0
Rules reminder
« 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 :
Code: [Select]
--## 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!
8)  mitava.no-ip.org   8)

PtokaX forum

Rules reminder
« on: 02 October, 2004, 15:54:36 »