PtokaX forum

Archive => Archived 4.0 boards => Finished Lua 4 scripts => Topic started by: plop on 21 December, 2003, 20:53:05

Title: crazy bot
Post by: plop on 21 December, 2003, 20:53:05
the most crazy bot on ptokax.
------------------------------------------------------------------------------------------------------------
-- crazy bot by plop   V:?736.way_nutty.865452.i'm_lost
-- marvelous string reverse function by lua guru rabidwombat
-- lot of folks are gonne need meditation if this bot releases it's powers
-- no i didn't have 2 much time, it was a great way 2 learn 2 manipulate strings
-- multiline fixed by chiller
------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------
-- keep the filename as it is, it has this name 2 try and make sure it is procest as last by ptokax
-- if you don't make sure it's executed as last it whill mess up all commands send to the other bot's
-- if you still get problems/conflicts with other bot's change the trigger 2 @crazy and it should work fine
-- if then you still encounter problems, blame the creator of the other bot(s), not me
------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------
-- warrenty: don't blame me if your users loose there mind.
-- if they do, there are some rooms availeble here in the institute
-- if they behave they'll get a painted window on the wall just like me
-- use it @ there own risk.
------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------



Bot = "crazy_bot"

-- nick's wich crazy bot uses 2 speak
NAME = "-OPChat-" ---"place_a_nick_here"
NAME2 = "-VIPChat-" ---"place_another_nick_here"

-- 1 = shows nick in the userlist, 0 = hiding
SHOW = 0

-- default mode wich is starts in
MODE = 1

-- put this on 1 to start it default in random mode, otherwise 0
RANDOM = 0

-- if you set this to 1 it will start the moment you launch the bot, better to keep it on 0  
CRAZY = 0

--command name  use @crazy for glory securitaz
TRIGGER = "!crazy"

-- bot can be controlled by:
-- 0 = icecube/testdrive all operators,
-- 1 = icecube/testdrive only operators given by nick in the table below, (NICKS)
-- 2 = icecube/testdrive only operators given by nick loaded from file. (FILE)
-- 3 = testdrive use profiles given in table below (LEVEL)
PTOKAX = 3

-- nicks of operators wich may controll crazy  aka PTOKAX mode 1
NICKSL = { "ploperator" , "needles", "nurse_betty", "pills", "even_more_pils" }

-- location/filenam of the text file with the operator nicks you wanne load wich may control crazy. aka PTOKAX mode 2
FILE = "op's.lst"

-- userlevel wich may control crazy (only for testdrive)  aka PTOKAX mode 3
LEVELL = { "master" , "operator" }

-- nick teaser mode on start 0 = yes, 1 = no
TEASER = 0

-- table for teased people best to keep this 1 empty
TEASED = {}

------------------------- end of setting   starting the real stuff, no need 2 edit anything below this line, unless you find a bug.



function Main()
   if PTOKAX == 1 then
      LoadOps1()
   elseif PTOKAX == 2 then
      LoadOps2()
   elseif PTOKAX == 3 then
      LoadOps3()
   end
   if SHOW == 1 then
      frmHub:RegBot(NAME)
   end
end


function DataArrival(user, data)
   sssst =0
   if PTOKAX == 0 then
      if user.bOperator ~= nil then
         Commands(user, data)
         if sssst ==1 then
            return 1
         end
      end
   elseif PTOKAX == 1 or PTOKAX == 2 then
      if NICKS[user.sName] then
         Commands(user, data)
         if sssst ==1 then
            return 1
         end
      end
   else
      local Level = GetProfileName(user.iProfile)
      if Level ~= nil then
         if LEVEL[strlower(Level)] then
            Commands(user, data)
            if sssst ==1 then
               return 1
            end
         end
      end
   end
   if CRAZY == 1 then
      if not strfind(data, "$.+") then
         if TEASER == 1 then
            if TEASED[user.sName] then
               MixModes(user, data)
               return 1
            end
         else
            MixModes(user, data)
            return 1
         end
      end
   end
end


function Commands(user, data)
   data = strsub(data, 1, (strlen(data)-1))
   s,e,cmd,onoff,who= strfind(data,"%b<>%s(%S+)%s(%S+)%s(.+)")
   if who == nil then
      s,e,cmd,onoff= strfind(data,"%b<>%s(%S+)%s(%S+)")
   end
   local found = 0
   if (cmd == TRIGGER) then
      if COMMANDS[onoff] then
         return call(COMMANDS[onoff], {user,data,who})
      else
         user:SendData(Bot, "Wrong syntax, take a look at "..TRIGGER.." help for more info |" )
         sssst =1
      end
   end
end


function MixModes(user, data)
   data = gsub (data, "\r\n", "$")
   if RANDOM == 1 then
      MODE = random(12)
   end
   if MODES[MODE] then  
      call (MODES[MODE], {user,data})
      return 1
   end
end


function strrev(str)
if(strlen(str) < 2) then
return str;
else
str = gsub(str, "^(.)(.*)(.)$", function(a, b, c) return c..strrev(b)..a; end, 1);
return str;
end
end


function DoSend1(m1)
m1 = gsub (m1, "$+","\r\n")
SendToAll(m1)
end


function DoSend2(m1, m2)
m1 = gsub (m1, "$+","\r\n")
m2 = gsub (m2, "$+","\r\n")
SendToAll(m1, m2)
end


function LoadOps1()
   NICKS= {}
   for i=1, getn(NICKSL) do
      NICKS[NICKSL[i]] = 1
   end
end


function LoadOps2()
   NICKS={}
   readfrom(FILE)
   while 1 do
   local line = read()
   if line ==  nil then
      break
   end
   NICKS[line] = 1
   end
   readfrom()
end


function LoadOps3()
   LEVEL = {}
   for i=1, getn(LEVELL) do
      LEVEL[LEVELL[i]] = 1
   end
end

STATS = {
   [1] = "reversing full lines",
   [2] = "reversing the message",
   [3] = "reversing the words",
   [4] = "flipping full lines",
   [5] = "flipping the nicks",
   [6] = "flipping the message",
   [7] = "reversing the nicks",
   [8] = "reversing the order of the words",
   [9] = "randomising the order of the words",
   [10] = "converting the nick to camel script",
   [11] = "converting full lines to camel script",
   [12] = "converting the message to camel script",
   [13] = "randomising the order of all the characters in the message",
   [14] = "randomising the nick"
}
plop
Title:
Post by: plop on 21 December, 2003, 20:54:25
part 2
COMMANDS = {
   on = function(user, data) CRAZY = 1   user:SendData(Bot, "Crazy mode enabled |" )  sssst =1  end ,
   off = function(user, data) CRAZY = 0   user:SendData(Bot, "Crazy mode disabled |" )  sssst =1  end ,
   full = function(user, data) MODE = 1    user:SendData(Bot, "Full lines will be reversed |" )  sssst =1  end ,
   msg = function(user, data) MODE = 2   user:SendData(Bot, "Only the message will be reversed |" )  sssst =1  end ,
   words = function(user, data) MODE = 3   user:SendData(Bot, "Single words will be reversed |" )  sssst =1  end ,
   flipfull = function(user, data) MODE = 4    user:SendData(Bot, "Full lines will be flipped |" )  sssst =1  end ,
   flipnick = function(user, data) MODE = 5   user:SendData(Bot, "Nicks will be flipped |" )  sssst =1  end ,
   flip = function(user, data) MODE = 6     user:SendData(Bot, "Only the message will be flipped |" )  sssst =1  end ,
   nick = function(user, data) MODE = 7    user:SendData(Bot, "Nicks will be reversed |" )  sssst =1  end ,
   order = function(user, data) MODE = 8    user:SendData(Bot, "Order of the words will be reversed |" ) sssst =1  end ,
   randomorder = function(user, data) MODE = 9   user:SendData(Bot, "Randomises the order of the words |" )  sssst =1  end ,
   camelnick = function(user, data) MODE = 10    user:SendData(Bot, "Changes the nick to camel script |" )  sssst =1  end ,
   camelfull = function(user, data) MODE = 11     user:SendData(Bot, "Changes the full line to camel script |" ) sssst =1  end ,
   camel = function(user, data) MODE = 12    user:SendData(Bot, "Changes the message to camel script |" ) sssst =1  end ,
   mental = function(user, data)  MODE = 13   user:SendData(Bot, "Randomises the order of all the characters in the message |" ) sssst =1  end ,
   randomnick = function(user, data)  MODE = 14   user:SendData(Bot, "Randomises the nick |" ) sssst =1  end ,
   help = function(user, data)   CrazyHelp(user) sssst =1  end ,
   show = function(user, data)   frmHub:RegBot(NAME) sssst =1  end ,
   hide = function(user,data)   frmHub:UnregBot(NAME) sssst =1  end ,
   status = function(user, data)
      if CRAZY == 0 then
         if TEASER == 0 then
            user:SendData(Bot, "I would start "..STATS[MODE].."|" )
            sssst =1
         else
            user:SendData(Bot, "I would start "..STATS[MODE].." and teasing the next people|" )
            for a,b in TEASED do
               user:SendData(Bot, a)
            end
            sssst =1
         end
      else
         if TEASER == 0 then
            user:SendData(Bot, "I'm running and "..STATS[MODE].."|" )
            sssst =1
         else
            user:SendData(Bot, "I'm running and "..STATS[MODE].." and teasing the next people|" )
            for a,b in TEASED do
               user:SendData(Bot, a)
            end
            sssst =1
         end
      end
   end ,
   random = function(user,data,who)
      if who == nil then
         user:SendData(Bot, "Wrong syntax, use "..TRIGGER.." random on/off |" )
         sssst =1  
      elseif who == "on" then
         RANDOM = 1
         user:SendData(Bot, "Get ready, random mode enabled |" )
         sssst =1  
      elseif who == "off" then
         RANDOM = 0
         user:SendData(Bot, "Order restored, random mode disabled |" )
         sssst =1  
      else
         user:SendData(Bot, "Wrong syntax, use "..TRIGGER.." random on/off |" )
         sssst =1  
      end
   end ,
   teaser = function(user,data,who)
      if who == nil then
         user:SendData(Bot, "Wrong syntax, use "..TRIGGER.." teaser on/off |" )
         sssst =1  
      elseif who == "on" then
         TEASER = 1
         user:SendData(Bot, "Nick teaser mode enabled |" )
         sssst =1  
      elseif who == "off" then
         TEASER = 0
         user:SendData(Bot, "Nick teaser mode disabled |" )
         sssst =1  
      else
         user:SendData(Bot, "Wrong syntax, use "..TRIGGER.." teaser on/off |" )
         sssst =1  
      end  
   end ,
   addnick = function(user,data,who)
      if who == nil then
         user:SendData(Bot, "Wrong syntax, use "..TRIGGER.." addnick |" )
         sssst =1  
      else
         if TEASED[who] then
            user:SendData(Bot, who.." is allready on the tease list |" )
            sssst =1  
         else
            TEASED[who]=1
            user:SendData(Bot, who.." will be teased |" )
            sssst =1  
         end
      end
   end ,
   delnick = function(user,data,who)
      if who == nil then
         user:SendData(Bot, "Wrong syntax, use "..TRIGGER.." delnick |" )
         sssst =1  
      else
         if TEASED[who] then
            TEASED[who] = nil
            user:SendData(Bot, who.." will not be teased anymore |" )
            sssst =1  
         else
            user:SendData(Bot, who.." was currently not teased |" )
            sssst =1  
         end
      end
   end ,
   shownicks = function(user,data,who)
      user:SendData(Bot, "Current teased users are |" )
      for a,b in TEASED do
         user:SendData(Bot, a)
      end
      sssst =1  
   end ,
   speak = function(user,data,who)
      if who == nil then
         user:SendData(Bot, "Wrong syntax, make me atleast say something |" )
         sssst =1  
      else
         who = gsub (who, "\r\n", "$")
         DoSend2(NAME, who)
         sssst =1  
      end
   end   ,
   zpeak = function(user,data,who)
      if who == nil then
         user:SendData(Bot, "Wrong syntax, make me atleast say something |" )
         sssst =1  
      else
         who = gsub (who, "\r\n", "$")
         DoSend2(NAME2, who)
         sssst =1  
      end
   end
}


MODES = {
   [1] = function(user, data)   data = strsub(data, 1, (strlen(data)-1))   msg2 = strrev(data)     DoSend1(msg2)     end  ,
   [2] = function(user, data)   data = strsub(data, 1, (strlen(data)-1))   s,e,msg= strfind(data,"%b<>%s(.+)")   DoSend2(user.sName, strrev(msg)) end  ,
   [3] = function(user, data)   data = strsub(data, 1, (strlen(data)-1))   s, e, msg = strfind(data, "%b<>%s(.+)")   local line = gsub(msg, "(%S+)", function(word) return strrev(word) end)   DoSend2(user.sName, line) end   ,
   [4] = function(user, data)   data = strsub(data, 1, (strlen(data)-1))   msg2 = gsub(data, "(.)(.)", "%2%1")   DoSend1(msg2)  end   ,
   [5] = function(user, data)   data = strsub(data, 1, (strlen(data)-1))   s,e,msg= strfind(data,"%b<>%s(.+)")   who = gsub(user.sName, "(.)(.)", "%2%1")   DoSend2(who, msg)  end   ,
   [6] = function(user, data)   data = strsub(data, 1, (strlen(data)-1))   s,e,msg= strfind(data,"%b<>%s(.+)")   msg2 = gsub(msg, "(.)(.)", "%2%1")   DoSend2(user.sName, msg2)  end   ,
   [7] = function(user, data)   data = strsub(data, 1, (strlen(data)-1))   s,e,msg= strfind(data,"%b<>%s(.+)")   who = strrev(user.sName)   DoSend2(who, msg)  end   ,
   [8] = function(user, data)
      data = strsub(data, 1, (strlen(data)-1))
      s,e,msg= strfind(data,"%b<>%s(.+)")
      _, count = gsub(msg, " ", " ")
      local line = ""
      for i=1,(count+1) do
         s,e,msg2,msg3 = strfind(msg,"(.+)%s(.+)")
         if msg3 == nil then
            line = (line.." "..msg)
         else
            line = (line.." "..msg3)
            msg = strsub(msg, 1, (strlen(msg2)))
         end
      end
      DoSend2(user.sName, line)
   end   ,
   [9] = function(user, data)
      data = strsub(data, 1, (strlen(data)-1))
      s,e,msg= strfind(data,"%b<>%s(.+)")
      _, count = gsub(msg, " ", " ")
      local lines = {}
      local line = ""
      count = count+1
      for i=1,(count) do
         s,e,msg2,msg3 = strfind(msg,"(.+)%s(.+)")
         if msg3 == nil then
            tinsert(lines, msg)
         else
            tinsert(lines, msg3)
            msg = strsub(msg, 1, (strlen(msg2)))
         end
      end
      for i=1,(count) do
         j = random(count)
         line = lines[j].." "..line
         tremove(lines,j)
         count = count -1
      end
      DoSend2(user.sName, line)
   end   ,
   [10] = function(user, data)
      data = strsub(data, 1, (strlen(data)-1))
      s,e,msg3= strfind(data,"%b<>%s(.+)")
      msg = tostring(user.sName)
      count = strlen(msg)
      local lines = {}
      local line = ""
      if updown == nil then
         updown = 0
      end
      for i=1,(count) do
         msg2 = strsub(msg, -1, (strlen(msg)))
         if strlen(msg) == 1 then
            tinsert(lines, msg)
         else
            tinsert(lines, msg2)
            msg = strsub(msg, 1, (strlen(msg)-1))
         end
      end
      for i=1,(count) do
         if updown == 0 then
            lines[i] = strupper(lines[i])
            updown = 1
         else
            lines[i] = strlower(lines[i])
            updown =0
         end
         line = lines[i]..line
      end
      DoSend2(line, msg3)
   end   ,
   [11] = function(user, data)
      data = strsub(data, 1, (strlen(data)-1))
      msg = data
      count = strlen(msg)
      local lines = {}
      local line = ""
      if updown == nil then
         updown = 0
      end
      for i=1,(count) do
         msg2 = strsub(msg, -1, (strlen(msg)))
         if strlen(msg) == 1 then
            tinsert(lines, msg)
         else
            tinsert(lines, msg2)
            msg = strsub(msg, 1, (strlen(msg)-1))
         end
      end
      for i=1,(count) do
         if updown == 0 then
            lines[i] = strupper(lines[i])
            updown = 1
         else
            lines[i] = strlower(lines[i])
            updown =0
         end
         line = lines[i]..line
      end
      DoSend1(line)
   end   ,
   [12] = function(user, data)
      data = strsub(data, 1, (strlen(data)-1))
      s,e,msg= strfind(data,"%b<>%s(.+)")
      count = strlen(msg)
      local lines = {}
      local line = ""
      if updown == nil then
         updown = 0
      end
      for i=1,(count) do
         msg2 = strsub(msg, -1, (strlen(msg)))
         if strlen(msg) == 1 then
            tinsert(lines, msg)
         else
            tinsert(lines, msg2)
            msg = strsub(msg, 1, (strlen(msg)-1))
         end
      end
      for i=1,(count) do
         if updown == 0 then
            lines[i] = strupper(lines[i])
            updown = 1
         else
            lines[i] = strlower(lines[i])
            updown =0
         end
         line = lines[i]..line
      end
      DoSend2(user.sName, line)
   end   ,
   [13] = function(user, data)
      data = strsub(data, 1, (strlen(data)-1))
      s,e,msg= strfind(data,"%b<>%s(.+)")
      count = strlen(msg)
      local lines = {}
      local line = ""
      for i=1,(count) do
         msg2 = strsub(msg, -1, (strlen(msg)))
         if strlen(msg) == 1 then
            tinsert(lines, msg)
         else
            tinsert(lines, msg2)
            msg = strsub(msg, 1, (strlen(msg)-1))
         end
      end
      for i=1,(count) do
         j = random(count)
         line = lines[j]..line
         tremove(lines,j)
         count = count -1
      end
      DoSend2(user.sName, line)
   end   ,
   [14] = function(user, data)
      data = strsub(data, 1, (strlen(data)-1))
      s,e,msg3= strfind(data,"%b<>%s(.+)")
      msg = tostring(user.sName)
      count = strlen(msg)
      local lines = {}
      local line = ""
      for i=1,(count) do
         msg2 = strsub(msg, -1, (strlen(msg)))
         if strlen(msg) == 1 then
            tinsert(lines, msg)
         else
            tinsert(lines, msg2)
            msg = strsub(msg, 1, (strlen(msg)-1))
         end
      end
      for i=1,(count) do
         j = random(count)
         line = lines[j]..line
         tremove(lines,j)
         count = count -1
      end
      DoSend2(line, msg3)
   end   ,
}
plop
Title:
Post by: plop on 21 December, 2003, 20:54:57
part 3

function CrazyHelp(user)
   user:SendPM(Bot, TRIGGER.." on \t\t  - enables crazy bot|" )
   user:SendPM(Bot, TRIGGER.." off \t\t  - disables crazy bot|" )
   user:SendPM(Bot, TRIGGER.." full \t\t  - Full lines will be reversed|" )
   user:SendPM(Bot, TRIGGER.." msg \t\t  - Only the message will be reversed|" )
   user:SendPM(Bot, TRIGGER.." words \t\t  - Single words will be reversed|" )
   user:SendPM(Bot, TRIGGER.." flipfull \t\t  - Full lines will be flipped|" )
   user:SendPM(Bot, TRIGGER.." flipnick \t\t  - Nicks will be flipped|" )
   user:SendPM(Bot, TRIGGER.." nick \t\t  - Message will be flipped|" )
   user:SendPM(Bot, TRIGGER.." flip \t\t  - Nicks will be reversed|" )
   user:SendPM(Bot, TRIGGER.." order \t\t  - Order of the words will be reversed|" )
   user:SendPM(Bot, TRIGGER.." camel \t\t  - Message will be in CaMeL ScRiPt|" )
   user:SendPM(Bot, TRIGGER.." camelnick \t\t  - Nick will be in CaMeL ScRiPt|" )
   user:SendPM(Bot, TRIGGER.." camelfull \t\t  - Full lines will be in CaMeL ScRiPt|" )
   user:SendPM(Bot, TRIGGER.." randomorder \t  - Randomises the order of the words|" )
   user:SendPM(Bot, TRIGGER.." randomnick \t  - Randomises the nick|" )
   user:SendPM(Bot, TRIGGER.." random on/off \t  - Picks on random from the above types|" )
   user:SendPM(Bot, TRIGGER.." mental \t\t  - Randomises the order of all the characters in the message|" )
   user:SendPM(Bot, TRIGGER.." teaser on/off \t  - Enables/disables the nick teaser|" )
   user:SendPM(Bot, TRIGGER.." addnick - Adds a nick to the tease list|" )
   user:SendPM(Bot, TRIGGER.." delnick  - Removes a nick to the tease list|" )
   user:SendPM(Bot, TRIGGER.." shownicks \t  - Shows the current nicks wich are on the tease list|" )
   user:SendPM(Bot, TRIGGER.." speak \t  - Makes crazy say the text |" )
   user:SendPM(Bot, TRIGGER.." zpeak \t  - Makes crazy say the text, now with the 2de nick |" )
   user:SendPM(Bot, TRIGGER.." show \t\t  - Makes the crazy nick show up in the userlist (as a operator/bot)|" )
   user:SendPM(Bot, TRIGGER.." hide \t\t  - Hides the crazy nick from the userlist|" )
   user:SendPM(Bot, TRIGGER.." status \t\t  - Shows the status crazy bot is in|" )
   user:SendPM(Bot, TRIGGER.." help \t\t  - What you are looking at now|" )
end



-- ploppyrights reserved (copy as much as posible)
Title:
Post by: plop on 27 January, 2004, 00:57:53
well after deleting 9.000 email 2day i was up 2 some fun.
so i done a update on crazy bot.
so far 2 new modes are added, 1 i will tell as it has been requested here on the forum.
a simple but fun thing, replace all letter a's for i.
the other 1 i won't tell as it's extremely cool (hope the ppl who been in my hub 2day also don't say a word).
but if you think lunaticize from yhub is cool then prepare for something worse and 10x better.
before i'm gone release this updated version i'm gone add 1 more mode which works about the same, and add a idea which phatty came up with (also cool).
the most crazy bot managed 2 get even crazyer. lol.

plop
Title:
Post by: DJ Bert on 27 January, 2004, 13:30:19
Well, keep up the good work Plop  ;)











(http://www.danasoft.com/sig-dut.jpg)
Title:
Post by: plop on 27 January, 2004, 16:06:29
QuoteOriginally posted by DJ Bert
Well, keep up the good work Plop  ;)
sure will, but pray for me. lol
currently trying 2 get some info from a guy making a special msn version.
that would save me a lot of work on 1 of the modes i wanna add.

plop
Title:
Post by: DJ Bert on 27 January, 2004, 20:40:46
Oke m8
Will pray for you  :D











(http://www.danasoft.com/sig-dut.jpg)
Title:
Post by: gpl_racer on 28 January, 2004, 08:48:37
plop: Can you do the a to i thing so that the letters can also be changed by editing the script (variables)?

If you already have added that feature could you post the add-on script for it here too?
Title:
Post by: plop on 28 January, 2004, 15:32:45
QuoteOriginally posted by gpl_racer
plop: Can you do the a to i thing so that the letters can also be changed by editing the script (variables)?

If you already have added that feature could you post the add-on script for it here too?
ok, i'll move them 2 the config part.
can't post the script yet for a couple reasons.
i bet you wanne be able 2 use the new modes by giving commands. lol
the modes are working just the help menu and commands are still missing.
just had a new request so 1 more mode coming up. lol

plop
Title:
Post by: plop on 29 January, 2004, 00:17:26
new version ready.
pray that there are no bugs.
here you can get it (http://www.thegoldenangel.org/files/zcrazy4.0.zip)
i do suggest you compile it before using it, just 2 get some more speed.

new modes:
-- elite talk
-- old style elite talk
-- breezer talk
-- custom talk (posible 2 alter everything while running, this is your request gpl_racer)
-- typo mode (error level can be changed from the bot)
-- user level teaser mode (levels can be added/removed from the bot)

any1 more idea's??????

plop
Title:
Post by: pHaTTy on 29 January, 2004, 09:38:54
7hx p10p l473r m473, m3 60nn4 60 p14y f0r h0ur5
Title:
Post by: pHaTTy on 29 January, 2004, 11:48:42
i cant get this to work, it just tells me what it does,

!crazy elite

and i tryed

!crazy typo 4 and it said

Changes the message with typo's (error level: 3)

but it doesnt switch on :/
Title:
Post by: pHaTTy on 29 January, 2004, 12:45:15
WHAHAHAHAHAHA

-- if then you still encounter problems, blame the creator of the other bot(s), not me


hahahaha
Title:
Post by: pHaTTy on 29 January, 2004, 12:52:23
this is great but the typoo is wrong, it says typoo 1 for 1 typo yep? but it just randomises all the letters :s
Title:
Post by: plop on 29 January, 2004, 13:00:45
QuoteOriginally posted by (uk-kingdom)pH?tt?
i cant get this to work, it just tells me what it does,

!crazy elite

and i tryed

!crazy typo 4 and it said

Changes the message with typo's (error level: 3)

but it doesnt switch on :/
try changing the next lines.
-- teaser mode on start 0 = every1, 1 = user_names, 2 = level.
TEASER = 0
shame on me, comments were wrong. lol

plop
Title:
Post by: plop on 29 January, 2004, 13:02:53
QuoteOriginally posted by (uk-kingdom)pH?tt?
this is great but the typoo is wrong, it says typoo 1 for 1 typo yep? but it just randomises all the letters :s
no a random number between 0 and 1, if 0 it makes a typo.
-- typo error level. the higher you set this the less typo's will be made.
RD = 10
<-Bure-> Changes the message with typo's (error level: 10)
<[TGA-OP]plop> now fUr every line i tfpe there is fox every character a posebilety Nf 1 in 10 that it might be replaced by a typM

plop
Title:
Post by: pHaTTy on 29 January, 2004, 13:10:24
that is great, as for the own letter changer, cant this be set as a mode, because if i add my own letts to change, it continues the old mode, for example if i set I = 1 and its in camel mode, it still stays in camel, cant it go back to normal text with only ur letters changed or have i missed something???

but otherwise its great :D:D:D

6r34t w0rk p10p :))

k33p 8p 7h3 600D w0rK ;)
Title:
Post by: c h i l l a on 29 January, 2004, 13:10:55
ahah I make so many type errors, maybe it will invert my errors and correct them ;)
Title:
Post by: pHaTTy on 29 January, 2004, 13:14:25
btw i fixed my prob for not working by adding my profile number lol :)
Title:
Post by: plop on 29 January, 2004, 13:46:46
QuoteOriginally posted by (uk-kingdom)pH?tt?
that is great, as for the own letter changer, cant this be set as a mode, because if i add my own letts to change, it continues the old mode, for example if i set I = 1 and its in camel mode, it still stays in camel, cant it go back to normal text with only ur letters changed or have i missed something???

but otherwise its great :D:D:D

6r34t w0rk p10p :))

k33p 8p 7h3 600D w0rK ;)
the help menu explains that. lol
!crazy replace [char] [rchar]   - Replaces chars for your own set chars (no options to enable the mode, 1 option to remove from the table, 2 to add to the table)
!    ? ? [_[ 1 ?    ? @ ?    ]2 7 ]= ]\/]

plop
Title:
Post by: pHaTTy on 29 January, 2004, 13:52:09
hmmm still cant get it to work :/
Title:
Post by: gpl_racer on 29 January, 2004, 13:53:12
Thank you plop for making that letter replacement system ! Great work !  :))
Title:
Post by: plop on 29 January, 2004, 14:11:02
QuoteOriginally posted by (uk-kingdom)pH?tt?
hmmm still cant get it to work :/
maby gekko is fixing the typo's. lol
works great here, but i'll check some more later 2day.

QuoteOriginally posted by gpl_racer
Thank you plop for making that letter replacement system ! Great work !
yw, thx for the idea.

plop
Title:
Post by: pHaTTy on 29 January, 2004, 14:15:08
hmm i will disable my bot and try, if not, i dunno lol, but great work anyways :D

btw u = 8 ;)

also b = 8 ;)

it all depends on the word sometimes :))

thats all i want to change is a few letters from what it does already, but keep up great work, great bot :))
Title:
Post by: gpl_racer on 29 January, 2004, 16:39:42
The bot works great but there?s still one major defect in it. When the crazy bot is on any other commands I try to send to other bots are rejected (nothing happens when typing the commands).  It happens even when crazy bot doesn?t have to alter the commands I write. Is there a bug in the script or what causes this to happen? Or is it because Ptokax runs crazy bot first and then the other bots? (I did keep the file name as zcrazy.lua)
How about adding a new mode to crazy bot that would allow the commands of other bots to work (the lines starting with  + , - or !) ?
Title:
Post by: plop on 29 January, 2004, 21:31:15
QuoteOriginally posted by gpl_racer
The bot works great but there?s still one major defect in it. When the crazy bot is on any other commands I try to send to other bots are rejected (nothing happens when typing the commands).  It happens even when crazy bot doesn?t have to alter the commands I write. Is there a bug in the script or what causes this to happen? Or is it because Ptokax runs crazy bot first and then the other bots? (I did keep the file name as zcrazy.lua)
How about adding a new mode to crazy bot that would allow the commands of other bots to work (the lines starting with  + , - or !) ?
the filename is just 2 try 2 make ptokax proces crazy as last, if this doesn't happen it can indeed mess up commands from bot's who run after it.
i have been thinking of adding a array with commands it should let go undisturbed, but i never added it as it's fun 2 see the reactions from the users.
if crazy is procest as last bot it can only screw up ptokax commands and then only if the level/nick of the user is being teased.
just adding a bypase on lines starting with +, - or ! would make it 2 easy 2 cheat around crazy.
and if you use a good operator bot you can send all commands in pm 2 the bot so it bypases crazy without any problem.
maby i'm gone add it in the future but i personaly don't like it as it removes a bit from the crazyness from the bot.

plop
Title:
Post by: gpl_racer on 30 January, 2004, 05:59:53
I got the other commands working now. Just moved them out of the Scripts folder and then back again one by one with crazy bot?s script the last one. Apparently Ptokax processes them in the order the files are when they are moved to the Scripts directory.
Thanks again for this awesome (and crazy) bot.
Title:
Post by: plop on 30 January, 2004, 15:47:38
QuoteOriginally posted by gpl_racer
I got the other commands working now. Just moved them out of the Scripts folder and then back again one by one with crazy bot?s script the last one. Apparently Ptokax processes them in the order the files are when they are moved to the Scripts directory.
Thanks again for this awesome (and crazy) bot.
yw and thx for that info about how ptokax processes them.
definatly good 2 know.

plop
Title:
Post by: gpl_racer on 01 February, 2004, 08:32:25
I have a suggestion for a new mode to crazy bot:
how about if every other or every third letter would be replaced with a random or a predefined one.
example:
User writes: The crazy bot is very cool.
It will show as: T*e *r*z* b*t *s *e*y *o*l.
(or with random letter)

Another suggestion:
what if only some letters change places.
example:
User writes: The crazy bot is very cool.
It?ll show as: Thy craze bit os vory coel.
or two letters change places with each other:
Teh carzy obt si veyr ocol.
Title:
Post by: plop on 09 August, 2004, 14:41:42
just a teaser, haven't finished it fully (help menu is not done yet and some more small things).
but i had some kind of silly mood yesterday.
couple new modes for crazy bot 4.1.
- hexadecimal
- binairy
- morse code (... --- ...)
- morse code beeps (beepbeepbeep beeeepbeeeepbeeeep beepbeepbeep).

the request from gpl_racer was allready added in i believe 4.0, so called typo mode.

4.0 and 4.1 should appear on my website soon.

plop
Title:
Post by: UwV on 10 August, 2004, 19:15:28
can't wait ;0) .. i love crazybot ..
Title:
Post by: plop on 10 August, 2004, 22:02:23
QuoteOriginally posted by UwV
can't wait ;0) .. i love crazybot ..
the waiting is over.

also added a random nick mode.
on startup of this it grabs all registered nicks from all the profiles, while running it collects more.
if user x says something his nick is gone be replaced for another picked on random.
nice and confusing on who actualy says what.

plop
Title:
Post by: UwV on 10 August, 2004, 22:42:46
:D  
already laughing before i downloaded it ..
Title:
Post by: UwV on 14 August, 2004, 12:40:37
grreat .. still laughing ..  
 and i had a little idea ..

what about a "spam bacon spam spam spam bacon spam eggs sausage and spam"  thingy in there ..
as in a random word replace ..
 with the 'random' value for spam being much higher then all the other value's ? ..
Title:
Post by: plop on 14 August, 2004, 15:04:33
QuoteOriginally posted by UwV
what about a "spam bacon spam spam spam bacon spam eggs sausage and spam"  thingy in there ..
as in a random word replace ..
 with the 'random' value for spam being much higher then all the other value's ? ..
any more idea's ??
it's in 4.2 allready just need 2 fix the commands and help menu.
but before i release it i would like 2 add some more new features.

plop
Title:
Post by: UwV on 15 August, 2004, 02:42:05
for crazy bot .. not at the moment .. but..
iw ill get back on that as soon as i do  :D
Title:
Post by: UwV on 17 August, 2004, 21:44:46
abobut..
also added a random nick mode. ..

well the !help command shows me two !randomnick commands ..

1.  !crazy randomnick       - Replaces the nick for a random other nick (on the start it only uses registered nicks).
2. !crazy randomnick       - Randomises the nick.


so only the old randomnick trick works right now,.. guess there is actully a different command ? ..

that alles for now
Title:
Post by: plop on 18 August, 2004, 21:06:24
QuoteOriginally posted by UwV
abobut..
also added a random nick mode. ..

well the !help command shows me two !randomnick commands ..

1.  !crazy randomnick       - Replaces the nick for a random other nick (on the start it only uses registered nicks).
2. !crazy randomnick       - Randomises the nick.


so only the old randomnick trick works right now,.. guess there is actully a different command ? ..

that alles for now
no used that command double.
version 4.2 can be found on my site.
fixed and added the spam, bacon and eggs.

plop
Title:
Post by: UwV on 19 August, 2004, 02:39:59
Great  :)