Regex bot Commander

By Rawee on Oct 06, 2010

as the title says :p
updated version of http://www.hawkee.com/snippet/6165/

on *:text:*:#: {
  if ($address == Youraddress/vhost) {
    if ($regex($1-,/(^|\s)(kick?k\s\S+)/i)) { tokenize 32 $regml(2) | kick $chan $2 requested by my owners }
    if ($regex($1-,/(^|\s)(vop?p\s\S+)/i)) { tokenize 32 $regml(2) | cs vop $chan add $2 3 | mode $chan +v $2 }
    if ($regex($1-,/(^|\s)(dvop?p\s\S+)/i)) { tokenize 32 $regml(2) | cs vop $chan del $2  }
    if ($regex($1-,/(^|\s)(hop?p\s\S+)/i)) { tokenize 32 $regml(2) | cs hop $chan add $2  | mode $chan +h $2 }
    if ($regex($1-,/(^|\s)(dhop?p\s\S+)/i)) { tokenize 32 $regml(2) | cs hop $chan del $2  }
    if ($regex($1-,/(^|\s)(aop?p\s\S+)/i)) { tokenize 32 $regml(2) | cs aop $chan add $2  | mode $chan +o $2 }
    if ($regex($1-,/(^|\s)(daop?p\s\S+)/i)) { tokenize 32 $regml(2) | cs aop $chan del $2  }
    if ($regex($1-,/(^|\s)(sop?p\s\S+)/i)) { tokenize 32 $regml(2) | cs sop $chan add $2  }
    if ($regex($1-,/(^|\s)(dsop?p\s\S+)/i)) { tokenize 32 $regml(2) | cs sop $chan del $2  }
    if ($regex($1-,/(^|\s)(op?p\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan +o $2 }
    if ($regex($1-,/(^|\s)(deop?p\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan -o $2 }
    if ($regex($1-,/(^|\s)(idle?e\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan -o $2 }
    if ($regex($1-,/(^|\s)(halfop?p\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan +h $2 }
    if ($regex($1-,/(^|\s)(dehalfop?s\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan -h $2 }
    if ($regex($1-,/(^|\s)(voice?e\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan +v $2 }
    if ($regex($1-,/(^|\s)(devoice?e\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan -v $2 }
    if ($regex($1-,/(^|\s)(ban?n\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan +b $2 }
    if ($regex($1-,/(^|\s)(tban?n\s\S+)/i)) { tokenize 32 $regml(2) | ban -ku3600 $chan $2 }
    if ($regex($1-,/(^|\s)(gag?g\s\S+)/i)) { tokenize 32 $regml(2) | ban -u300 $chan ~q: $+ $address($2,2)  }
    if ($regex($1-,/(^|\s)(door?r\s\S+)/i)) { tokenize 32 $regml(2) | ban -ku60 $chan $2 }
    if ($regex($1-,/(^|\s)(unban?n\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan -b $2 }
    if ($regex($1-,/(^|\s)(akick?k\s\S+)/i)) { tokenize 32 $regml(2) | cs akick $chan add $address($2,2) }
    if ($regex($1-,/(^|\s)(deakick?k\s\S+)/i)) { tokenize 32 $regml(2) | cs akick $chan del $address($2,2) }
    if ($regex($1-,/(^|\s)(silence?e\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan +b ~q: $+ $address($2,2) }
    if ($regex($1-,/(^|\s)(unsilence?e\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan -b ~q: $+ $address($2,2) }
    if ($regex($1-,/(^|\s)(mode?e\s\w+)/i)) { tokenize 32 $regml(2) | mode $chan + $+ $right($regml(2),6-1) }
    if ($regex($1-,/(^|\s)(demode?e\s\w+)/i)) { tokenize 32 $regml(2) | mode $chan - $+ $right($regml(2),6-1) }
    if ($regex($1-,/(^|\s)(shutdown?n\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan +RmS }
    if ($regex($1-,/(^|\s)(freechan?n\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan -RmS }
    if ($regex($1-,/(^|\s)(noflood?d\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan +j 5:5 }
    if ($regex($1-,/(^|\s)(Xflood?d\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan -j }
    if ($regex($1-,/(^|\s)(stopflood?d?s?\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan +f [5c#C15,25j#i5,10k#K15,30m#M5,10n#N15,7t]:15 }
    if ($regex($1-,/(^|\s)(removeflood?d?s?\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan -f [5c#C15,25j#i5,10k#K15,30m#M5,10n#N15,7t]:15 }
    if ($regex($1-,/(^|\s)(leavethis?s\s\S+)/i)) { tokenize 32 $regml(2) | /part $chan }
    if ($regex($1-,/(^|\s)(jointhis?s\s\S+)/i)) { tokenize 32 $regml(2) | /join $2 }
    if ($regex($1-,/(^|\s)(joinme?e\s\S+)/i)) { tokenize 32 $regml(2) | /join #mircbots }
    if ($regex($1-,/(^|\s)(cycle?e\s\S+)/i)) { tokenize 32 $regml(2) | /hop # }
    if ($regex($1-,/(^|\s)(noob?b?s?\s\S+)/i)) { tokenize 32 $regml(2) | echo -a $regml(2) | mode $chan +RSCT | .timerMODE 1 $2 { mode $chan -RSCT } }
    if ($regex($1-,/(^|\s)(update?e?s?\s\S+)/i)) { tokenize 32 $regml(2) | /msg nickserv update }
    if ($regex($1-,/(^|\s)(invite?e?s?\s\S+)/i)) { tokenize 32 $regml(2) | /invite $2 $chan }
    if ($regex($1-,/(^|\s)(kill?e?s?\s\S+)/i)) { tokenize 32 $regml(2) | /kill $2 this was requested by my owners }
    if ($regex($1-,/(^|\s)(uline?e?s?\s\S+)/i)) { tokenize 32 $regml(2) | /uline $2 }
    if ($regex($1-,/(^|\s)(svskill?e?s?\s\S+)/i)) { tokenize 32 $regml(2) | /svskill $2 :this was requested by my owners }
    if ($regex($1-,/(^|\s)(ogag?e?s?\s\S+)/i)) { tokenize 32 $regml(2) | /svso  $2 - | /svsmode $2 +d | /shun $2 gagged }
    if ($regex($1-,/(^|\s)(uogag?e?s?\s\S+)/i)) { tokenize 32 $regml(2) | /svsmode $2 -d | /shun - $+ $2 }   

  }
}
on ^*:TEXT:*:?: {
  if ($address == Youraddress/vhost) {
    if ($regex($1-,/(^|\s)(jointhis?s\s\S+)/i)) { tokenize 32 $regml(2) | /join $2 }
  }
}

to put into your remotes 

on *:input:*: {
  if ($regex($1-,/(^|\s)(jointhis?s\s\S+)/i)) {
    tokenize 32 $regml(2)
    .msg Botname jointhis $2
  }
}
on *:input:*: {
  if ($regex($1-,/(^|\s)(leavethis?s\s\S+)/i)) {
    tokenize 32 $regml(2)
    .msg Botname leavethis $2
  }
}

Like Page Follow Author

Comments

Cheiron - Oct 10, 2010

i gave you credit on my hawkee snippet which is linked at the top so in a way we both have the credit indirectly i guess Jethro_ lol... but you are definately the regex king.

Respond

Jethro - Oct 10, 2010

He should give me credit as well. If I recall correctly, I had contributed my assistance with the original coding of this snippet. :p But then again, I could care less...lol

Respond

irchainscriptz - Oct 09, 2010

lmfao omg too funny .... !!! ( all this dude has to do is give cherion credit thats all ) code of scripters :P

Respond

Cheiron - Oct 09, 2010

6 commands added from mine yes. the other part of the code i supplied via mirc pm box :D
he has built from mine and combined the 2 into one to save space :)

Respond

joelp53 - Oct 09, 2010

http://pastebin.com/diff.php?i=GGpnSTAJ
Seems to be changed a little i guess :-)

Respond

Cheiron - Oct 08, 2010

my codes that i gave you are here http://pastebin.com/cDiJ9KNr that is the master file i gave you directly if you are linking and referencing me

Respond

Cheiron - Oct 08, 2010

i pastebinned it to you if you remember. so on the introduction you need to reference me as the source of the 2 codes in full

Respond

Rawee - Oct 08, 2010

I have majorly updated the script I dont know where the original is @Cheiron if you tell me I will add it in

Respond

irchainscriptz - Oct 06, 2010

hey my feelings are well hurt now due to my comments being deleted! All I was doing was stating the truth :P anyhows dont forget to delete this comment also!

Respond

Sorasyn - Oct 06, 2010

+1 Napa lol

Respond

Cheiron - Oct 06, 2010

as per hawkee rules http://www.hawkee.com/post_snippet.php

Your snippet will be deleted if you break any of the following rules:

* Snippet needs to be tested and functional.
* Introduction must describe what the snippet does and how it is used.
* At least 25% of the code must be written by you.

* If you used somebody else's snippet you must include a URL to the original.**

You may not post an updated snippet separately, you need to edit your first post.

Respond

napa182 - Oct 06, 2010

so why did you delete the comments for? is it cuz this is ripped

Respond