Top

puppet bot


mIRC Code
+ 0 likes
Please Register to submit score.
Bookmark and Share
Average Score  1.0 (of 1 scores)
Date Added  May 04, 2009
Last Updated  Jun 25, 2009
Tags  bot  puppet 

Description

well i would not have posted this, but i did not see one of them on here so... here it goes....

i made this a while back and thought it would be one of those stupid scripts that nobody liked right? well it turned out that everybody liked it! ppl who had my bot in my channel liked to be able to make the bot do/say whatever they wanted for some reason... so i figure i post it here if you guys want to make ppl happy w/ ur fail bot! :) commands are:

~say <what the bot to say here>
~do <what the bot to do here>

oh and if you dont want ppl to see who triggers the bot you can pm him....

/msg <bot name> ~say <chan to say in> <what to say>
/msg <bot name> ~do <chan to do in> <what to do>

Grab the Code

; puppet script by patx (patx@patxbot.tk) (http://www.patx.tk)
; the code it licensed under the patx license version 3!!!!!!!
; http://www.iolanguage.com/paste/p/07f3dc4a0.html << license.
 
alias -l antiflood { if (!$($+(%,antiflood,.,$1),2)) { set -u5 $+(%,antiflood,.,$1),2)) on } | else { halt } }
 
on *:text:~do*:?: { $antiflood($1)
describe $2 $3- }
on *:text:~say*:?: { $antiflood($1)
msg $2 $+(% ,$3-) }
on *:text:~do*:#: { $antiflood($1)
describe $chan $2- }
on *:text:~say*:#: { $antiflood($1)
msg $chan $+(''',$2-,''') }

Comments

  (19)  RSS
napa182
Comments: 1,692
 
mIRC Snippet:  puppet bot
Posted on May 4, 2009 4:57 pm
you should really think about adding a few checks to this as well as making sure not everyone can use this if the bot has +o in the chan cuz they can end up screwing up ur channel.
PATX
Comments: 387
 
mIRC Snippet:  puppet bot
Posted on May 4, 2009 5:42 pm
or i could use user levels....

edit: egh just added a anit flood. thata way all ppl can use it... tell me what ya think?
napa182
Comments: 1,692
 
mIRC Snippet:  puppet bot
Posted on May 4, 2009 6:05 pm
why use that antiflood from that bot Weasel posted?

you can do that like this as well

Code:
alias -l antiflood { if (!$($+(%,antiflood,.,$1),2)) { set -u5 $+(%,antiflood,.,$1),2)) on } | else { halt } }


then in ur code put $antiflood($1)

but only use the -l switch if you are going to use this alias along with the code in the same remote if not then remove the -l switch.
PATX
Comments: 387
 
mIRC Snippet:  puppet bot
Posted on May 4, 2009 6:32 pm
ok. the reason tho is i way too lazy to make one....
Kirbeh_Pr0nz
Comments: 150
 
mIRC Snippet:  puppet bot
Posted on May 4, 2009 6:33 pm
i made my version to where only certain pplz can use it, also mine works through query only. http://www.hawkee.com/snippet/5799/
nice patx
PATX
Comments: 387
 
mIRC Snippet:  puppet bot
Posted on May 4, 2009 6:59 pm
ty Kirbeh_Pr0nz.
napa182
Comments: 1,692
 
mIRC Snippet:  puppet bot
Posted on May 4, 2009 9:39 pm
PATX Said:
Quote:
and and by the way you need to have user level 5 to prevent spam.... to set this use

/auser 5 <NICK HERE>


You say that, but you didn't apply it to ur code. You should really have it place somthing in the front of the $2- like for ex:
Code:
on 5:text:~say *:#: { $antiflood | msg # $+(::,$2-,::) }

or
Code:
on 5:text:~say *:#: { $antiflood | msg # $+($chr(160),$2-) }

that way someone can't do ~say !op blah or w/e



Aucun50
Comments: 568
 
mIRC Snippet:  puppet bot
Posted on May 4, 2009 10:46 pm
I would go with the anti flood napa put here as it's easy to use and works great, are make a anti flood that doesn't turn off the script for everyone only the person who used it.

You could put this into one on text and have some checks. Also if you say something in your intro you should have that in your script, "/auser 5 <NICK HERE>" yet i don't see any functions in your script to support that.
PATX
Comments: 387
 
mIRC Snippet:  puppet bot
Posted on May 5, 2009 2:15 pm
k updated...

* changed the flood pro
* took out the user level info in da into seeing how it does not apply
* made it so there is a ''' in front of the stuff

tell me about any errors please?
napa182
Comments: 1,692
 
mIRC Snippet:  puppet bot
Posted on May 5, 2009 5:35 pm
when useing that antiflood alias i made you need to use $antiflood($1) the $1 = the trigger you use so you can use it in other on text triggers as well.
PATX
Comments: 387
 
mIRC Snippet:  puppet bot
Posted on May 5, 2009 5:40 pm
so just replace $antiflood($1) instaed of $antiflood?
napa182
Comments: 1,692
 
mIRC Snippet:  puppet bot
Posted on May 5, 2009 6:22 pm
yeah but i would still put somthing in front of the $2- so someone cant trigger a server command or w/e
ex:
Code:
on *:text:~do *:#: { $antiflood($1) | describe # $+($chr(160),$2-) }

PATX
Comments: 387
 
mIRC Snippet:  puppet bot
Posted on May 5, 2009 6:39 pm
ok. and i did....

$+(''',$2-,''') there a three ' in front and back. i did not do it for the dos cos you cannot trigger server commands with /me anywhere in it.
napa182
Comments: 1,692
 
mIRC Snippet:  puppet bot
Posted on May 5, 2009 7:25 pm
i used that as an example nothing more.
PATX
Comments: 387
 
mIRC Snippet:  puppet bot
Posted on May 6, 2009 2:01 pm
well it works....
Trev
Comments: 9
 
mIRC Snippet:  puppet bot
Posted on Jul 7, 2009 10:53 pm
You could use regex in the trigger to make it shorter:

Code:

On $*:TEXT:/^[~]*/Si:*: {
  if ($mid($1,1) == ~do) {
    $antiflood($1)
    $iif($query($nick),describe $2 $3-,describe # $2-)
  }
  Elseif ($mid($1,1) == ~say) {
    $antiflood($1)
    $iif($query($nick),msg $2 $+(% ,$3-),msg # $+(''',$2-,'''))
  }
}

PATX
Comments: 387
 
mIRC Snippet:  puppet bot
Posted on Jul 7, 2009 11:04 pm
does not seem shorter :/ :P
Trev
Comments: 9
 
mIRC Snippet:  puppet bot
Posted on Jul 7, 2009 11:08 pm
Meh, it's all in one text event :p
Ghost-writer
Comments: 353
 
mIRC Snippet:  puppet bot
Posted on Aug 31, 2009 4:08 pm
~do $ip :]

Commenting Options

Register or Login to Hawkee.com or use your Facebook or Twitter account by clicking the corresponding button below.

  

Bottom