Advertisement
illpastethat

Rsbot Invites

Mar 11th, 2011
363
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 2.88 KB | None | 0 0
  1. on *:kick:#rsbot: if ($me == $knick) /k $nick Kicking An Op!
  2. on *:text:*:#rsbot:{
  3.   if ($network == rizon) {
  4.     if ($me isop $chan) {
  5.       if (($1 == !kick) || ($1 == !k) && ($2 != $null) && ($nick !isreg $chan) && ($2 isreg $chan)) {
  6.         /k $2 $iif($3-,$nick $+ : $3-,Requested by $nick)
  7.       }
  8.       elseif (($1 == !ban || $1 == !b) && ($2 != $null) && ($nick !isreg $chan) && ($2 isreg $chan)) {
  9.         /b $2
  10.       }
  11.       elseif (($1 == !unban) || ($1 == !ub) && ($nick !isreg $chan)) {
  12.         /u $2
  13.       }
  14.       elseif (($1 == !kickban || $1 == !kb) && ($2 != $null) && ($nick !isreg $chan) && ($2 != $me) && ($2 isreg $chan)) {
  15.         /kb $2 $iif($3-,$nick $+ : $3-,Requested by $nick)
  16.       }
  17.     }
  18.     else {
  19.       if (($nick !ison #rsbot_help) && (!$istok(%DontInvite,$nick,44)) && ($nick isreg $chan)) {
  20.         set %i 1
  21.         while (%i <= $numtok($1-,32)) {
  22.           if ($istok($rsbothelp,$($+($,%i),2),44)) {
  23.             if ($($+(%,botflood.,$nick),2)) {
  24.               if ($($+(%,botflood.,$nick),2) >= 30) { ignore -u60 $address($nick,0) | msg $chan $+($nick,$chr(44)) You Have Been Put On Ignore For 60secs For Abusing The Bot. | halt }
  25.               elseif ($($+(%,botflood.,$nick),2) >= 20) { msg $chan $+($nick,$chr(44)) Please Do Not Abuse The Bot. | inc -z $+(%,botflood.,$nick) 20 | halt }
  26.               else { inc -z $+(%,botflood.,$nick) 180 }
  27.             }
  28.             else { inc -z $+(%,botflood.,$nick) 90 }
  29.             add $nick
  30.             bs say #rsbot_help 12[4AUTO12]10 Invite Sent to4 $nick $+ :10 $qt($replace($1-,$($+($,%i),2),4 $+ $($+($,%i),2) $+ 10))
  31.             halt
  32.           }
  33.           elseif ($istok($rsbothelp,$($+($($,0),%i,-,$calc(%i + 1)),2),44)) {
  34.             if ($($+(%,botflood.,$nick),2)) {
  35.               if ($($+(%,botflood.,$nick),2) >= 30) { ignore -u60 $address($nick,0) | msg $chan $+($nick,$chr(44)) You Have Been Put On Ignore For 60secs For Abusing The Bot. | halt }
  36.               elseif ($($+(%,botflood.,$nick),2) >= 20) { msg $chan $+($nick,$chr(44)) Please Do Not Abuse The Bot. | inc -z $+(%,botflood.,$nick) 20 | halt }
  37.               else { inc -z $+(%,botflood.,$nick) 180 }
  38.             }
  39.             else { inc -z $+(%,botflood.,$nick) 90 }
  40.             add $nick
  41.             bs say #rsbot_help 12[4AUTO12]10 Invite Sent to4 $nick $+ :10 $qt($replace($1-,$($+($($,0),%i,-,$calc(%i + 1)),2),4 $+ $($+($($,0),%i,-,$calc(%i + 1)),2) $+ 10))
  42.             halt
  43.           }
  44.           inc %i
  45.         }
  46.       }
  47.     }
  48.   }
  49. }
  50.  
  51.  
  52. raw 307:*: set -u3 $+(%,regnick,.,$2) identified
  53. off *:join:#rsbot: {
  54.   if ($istok(%onlineidents,$ial($nick,1).user,44)) {
  55.     noop
  56.   }
  57.   if ($istok(%voicethem,$nick,44)) {
  58.     /whois $nick
  59.     set -u3 %checknick $nick
  60.     timer 1 1 addvoice  
  61.   }
  62. }
  63.  
  64.  
  65. alias addvoice {
  66.   if ($($+(%,regnick,.,%checknick),2) == identified) {
  67.     mode #rsbot +v %checknick
  68.   }
  69. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement