crazy bot
 

News:

29 December 2022 - PtokaX 0.5.3.0 (20th anniversary edition) released...
11 April 2017 - PtokaX 0.5.2.2 released...
8 April 2015 Anti child and anti pedo pr0n scripts are not allowed anymore on this board!
28 September 2015 - PtokaX 0.5.2.1 for Windows 10 IoT released...
3 September 2015 - PtokaX 0.5.2.1 released...
16 August 2015 - PtokaX 0.5.2.0 released...
1 August 2015 - Crowdfunding for ADC protocol support in PtokaX ended. Clearly nobody want ADC support...
30 June 2015 - PtokaX 0.5.1.0 released...
30 April 2015 Crowdfunding for ADC protocol support in PtokaX
26 April 2015 New support hub!
20 February 2015 - PtokaX 0.5.0.3 released...
13 April 2014 - PtokaX 0.5.0.2 released...
23 March 2014 - PtokaX testing version 0.5.0.1 build 454 is available.
04 March 2014 - PtokaX.org sites were temporary down because of DDOS attacks and issues with hosting service provider.

Main Menu

crazy bot

Started by plop, 21 December, 2003, 20:53:05

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

plop

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
http://www.plop.nl lua scripts/howto\'s.
http://www.thegoldenangel.net
http://www.vikingshub.com
http://www.lua.org

>>----> he who fights hatred with hatred, drives the spreading of hatred <----<<

plop

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
http://www.plop.nl lua scripts/howto\'s.
http://www.thegoldenangel.net
http://www.vikingshub.com
http://www.lua.org

>>----> he who fights hatred with hatred, drives the spreading of hatred <----<<

plop

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)
http://www.plop.nl lua scripts/howto\'s.
http://www.thegoldenangel.net
http://www.vikingshub.com
http://www.lua.org

>>----> he who fights hatred with hatred, drives the spreading of hatred <----<<

plop

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
http://www.plop.nl lua scripts/howto\'s.
http://www.thegoldenangel.net
http://www.vikingshub.com
http://www.lua.org

>>----> he who fights hatred with hatred, drives the spreading of hatred <----<<

DJ Bert

Well, keep up the good work Plop  ;)












plop

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
http://www.plop.nl lua scripts/howto\'s.
http://www.thegoldenangel.net
http://www.vikingshub.com
http://www.lua.org

>>----> he who fights hatred with hatred, drives the spreading of hatred <----<<

DJ Bert

Oke m8
Will pray for you  :D












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?
_____________________________________
The 5th fastest under 18-year-old Finn in GPL
_____________________________________

plop

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
http://www.plop.nl lua scripts/howto\'s.
http://www.thegoldenangel.net
http://www.vikingshub.com
http://www.lua.org

>>----> he who fights hatred with hatred, drives the spreading of hatred <----<<

plop

new version ready.
pray that there are no bugs.
here you can get it
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
http://www.plop.nl lua scripts/howto\'s.
http://www.thegoldenangel.net
http://www.vikingshub.com
http://www.lua.org

>>----> he who fights hatred with hatred, drives the spreading of hatred <----<<

pHaTTy

7hx p10p l473r m473, m3 60nn4 60 p14y f0r h0ur5
Resistance is futile!

pHaTTy

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 :/
Resistance is futile!

pHaTTy

WHAHAHAHAHAHA

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


hahahaha
Resistance is futile!

pHaTTy

this is great but the typoo is wrong, it says typoo 1 for 1 typo yep? but it just randomises all the letters :s
Resistance is futile!

plop

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
http://www.plop.nl lua scripts/howto\'s.
http://www.thegoldenangel.net
http://www.vikingshub.com
http://www.lua.org

>>----> he who fights hatred with hatred, drives the spreading of hatred <----<<

plop

#15
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
http://www.plop.nl lua scripts/howto\'s.
http://www.thegoldenangel.net
http://www.vikingshub.com
http://www.lua.org

>>----> he who fights hatred with hatred, drives the spreading of hatred <----<<

pHaTTy

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 ;)
Resistance is futile!

c h i l l a

ahah I make so many type errors, maybe it will invert my errors and correct them ;)

pHaTTy

btw i fixed my prob for not working by adding my profile number lol :)
Resistance is futile!

plop

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
http://www.plop.nl lua scripts/howto\'s.
http://www.thegoldenangel.net
http://www.vikingshub.com
http://www.lua.org

>>----> he who fights hatred with hatred, drives the spreading of hatred <----<<

pHaTTy

hmmm still cant get it to work :/
Resistance is futile!

gpl_racer

Thank you plop for making that letter replacement system ! Great work !  :))
_____________________________________
The 5th fastest under 18-year-old Finn in GPL
_____________________________________

plop

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
http://www.plop.nl lua scripts/howto\'s.
http://www.thegoldenangel.net
http://www.vikingshub.com
http://www.lua.org

>>----> he who fights hatred with hatred, drives the spreading of hatred <----<<

pHaTTy

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 :))
Resistance is futile!

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 5th fastest under 18-year-old Finn in GPL
_____________________________________

SMF spam blocked by CleanTalk