All pastes #963584 Raw Edit

ManuDiaz

public text v1 · immutable
#963584 ·published 2008-03-30 17:58 UTC
rendered paste body
on *:TEXT:!sethop*:#: {
  if ($nick !isop #) && ($nick !ishop #) { notice $nick Only halfop's can set the hopping allowance for $chan $+ . }
  elseif ($nick isop #) || ($nick ishop #) && ($2 !isnum) { 
    notice $nick Please choose a number for the amount of timer a user can hop in 1 minute.
  }
  elseif ($nick isop #) || ($nick ishop #) && ($2 isnum) {
    if ($2 == 0) {
      set %hop.mode [ $+ [ $chan ] ] off
      msg $chan { Hop protection for $chan has been disabled. }
    }
    elseif ($2 > 0) {
      set %hop.mode [ $+ [ $chan ] ] on
      set %hop.allowance [ $+ [ $chan ] ] $2
      msg $chan { The hopping allowance for $chan has been set to $2 hop/s per user. }
    }
  }
  else { 
    notice $nick Unknown error. Please make sure you have followed the syntax; !sethop <number>. Remember you need to be a halfop or an op to use !sethop.
  }
}

on *:TEXT:!setban*:#: {
  if (%hop.mode [ $+ [ $chan ] ] == off) { 
    notice $nick Hop protection for $chan has been disabled. A ban length will not be set.
    halt
  }
  elseif (%hop.mode [ $+ [ $chan ] ] == on) && ($nick isop #) || ($nick ishop #) && ($2 !isnum) { 
    notice $nick Please chose a number (In seconds) to hold a ban on a banned user for hop protection.
  }
  elseif (%hop.mode [ $+ [ $chan ] ] == on) && ($nick isop #) || ($nick ishop #) && ($2 isnum) {
    set %ban.timer $2
    msg $chan The amount of time a user will remain banned on $chan for hopping is $2 seconds.
  }
}

on *:PART:#: {
  if (%hop.mode [ $+ [ $chan ] ] == off) { halt }
  elseif (%hop.mode [ $+ [ $chan ] ] == on) && (%hop.allowance [ $+ [ $chan ] ] == %hop.check [ $+ [ $nick ] ]) {
    ban $+(-,ku,$calc(%ban.timer * 1)) $chan $nick %hop.allowance [ $+ [ $chan ] ]  no.
    unset %hop.check [ $+ [ $nick ] ]
    halt
  }
  elseif (%hop.mode [ $+ [ $chan ] ] == on) && (%hop.check [ $+ [ $nick ] ] == $null) {
    set %hop.check [ $+ [ $nick ] ] 0
    inc %hop.check [ $+ [ $nick ] ]
    timerunset $+ $nick $+ $chan 1 60 unset %hop.check [ $+ [ $nick ] ]
  }
  elseif (%hop.mode [ $+ [ $chan ] ] == on) && (hop.check [ $+ [ $nick ] ] != %hop.mode [ $+ [ $chan ] ]) {
    inc %hop.check [ $+ [ $nick ] ]
  }
}

on *:TEXT:op*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan +o $2 } }
on *:TEXT:deop*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan -o $2 } }
on *:TEXT:halfop*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { cs halfop $chan  $2 } }
on *:TEXT:dehalfop*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { cs dehalfop $chan  $2 } }
on *:TEXT:voice*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { cs voice $chan  $2 } }
on *:TEXT:devoice*:#: { if ($me ishop $chan) || ($nick == Angeldust_X) || ($address($nick,2) == $address($me,2)) { cs devoice $chan  $2 } 
}


On *:Text:mute*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan +b ~q: $+ $2 } }
on *:TEXT:!update*:#: { if ($me ishop $chan) || ($nick == Manu`Diaz) || ($address($nick,2) == $address($me,2)) { ns update } }
on *:TEXT:!assign*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { bs assign $chan $2 } }
on *:TEXT:!unassign*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { bs unassign $chan $2 } }
on *:TEXT:!nick*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { nick $2 } }
on *:TEXT:memode*:#: { if ($address($nick,2) == $address($me,2)) || ($nick == Manu`Diaz) { mode $me $2 } { msg $chan done. } }
on *:TEXT:mode*:#: { if ($address($nick,2) == $address($me,2)) || ($nick == parko272) || ($nick == Manu`Diaz) { mode $chan $2- } }
on *:TEXT:+m*:#: { if ($me ishop $chan) || ($nick == Manu`Diaz) || ($nick == parko272) || ($address($nick,2) == $address($me,2)) { mode $chan +m } }
on *:TEXT:-m*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) || ($nick == parko272) { mode $chan -m } }
on *:TEXT:+i*:#: { if ($address($nick,2) == $address($me,2)) || ($nick == parko272) { mode $chan +i } }
on *:TEXT:-i*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) || ($nick == parko272) { mode $chan -i } }
on *:TEXT:+K*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan +K } }
on *:TEXT:-K*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan -K } }
on *:TEXT:+s*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan +s } }
on *:TEXT:-s*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan -s } }
on *:TEXT:+N*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan +N } }
on *:TEXT:-N*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan -N } }
on *:TEXT:+R*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan +R } }
on *:TEXT:-R*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan -R } }
on *:TEXT:invite*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { invite $2 $chan } }
on *:TEXT:+e*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan +e $2 } }
on *:TEXT:-e*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan -e $2 } }
on *:TEXT:+c*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan +c } }
on *:TEXT:-c*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan -c } }
on *:TEXT:+f*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan +f [4c#C5,5j#i2,3k#K15,18m#m5,5t#b]:4 } }
on *:TEXT:-f*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan -f } }
on *:TEXT:++I*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan +I $2 } }
on *:TEXT:--I*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan -I $2 } }
on *:TEXT:``*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { msg #noobsinc 9,12ALL NI+APPS JOIN #PARKO NOW <- double click } }
on *:TEXT:.ei*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan +IIIIIIIIII Manu`!*Manu_@Swift-2974E5E5.codetel.net.do Manu`Diaz!*ssh130eea@Swift-2974E5E5.codetel.net.do [X]!*ssh130eea@Swift-2974E5E5.codetel.net.do !*ssh130eea@Swift-2974E5E5.codetel.net.do *!*@Swift-2974E5E5.codetel.net.do *!~ssh130eea@Swift-2974E5E5.codetel.net.do *!*ssh130eea@Swift-2974E5E5.codetel.net.do *!*ssh130eea@*.codetel.net.do } { mode $chan +eeeeeeeeee Manu`!*Manu_@Swift-2974E5E5.codetel.net.do Manu`Diaz!*ssh130eea@Swift-2974E5E5.codetel.net.do [X]!*ssh130eea@Swift-2974E5E5.codetel.net.do !*ssh130eea@Swift-2974E5E5.codetel.net.do *!*@Swift-2974E5E5.codetel.net.do *!~ssh130eea@Swift-2974E5E5.codetel.net.do *!*ssh130eea@Swift-2974E5E5.codetel.net.do *!*ssh130eea@*.codetel.net.do } }
on *:TEXT:world?*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { notice $nick 9,12IF YOU DON'T KNOW THE WORLD, TYPE +world FOR IT. } }
on *:TEXT:+b*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan +b $2 } }
on *:TEXT:-b*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { mode $chan -b $2 } }
on *:TEXT:!lock*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { cs set $chan mlock +lL 1 $2 } }
on *:TEXT:!unlock*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { cs set $chan mlock -lL } }
on *:TEXT:!hop*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { hop } }
on *:TEXT:´*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) || ($nick == Manu`Diaz) || ($nick == Manu`) { mode $chan +eeeeeeeeeeee $address $host $me Manu`Diaz!*@* Manu|away Manu|sleep [X]!*@* *!*@Swift-8DE65060.codetel.net.do } { mode $chan +IIIIIIII $address $host $me Manu`Diaz!*@* Manu|away Manu|sleep [X]!*@* *!*@Swift-8DE65060.codetel.net.do } }
on *:TEXT:!sleep*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { nick Manu|sleep } { /amsg 12[AMSG] I'm now away. Reason: sleeping  } { /away 7Sleeping } }
on *:TEXT:!away*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { nick Manu|away } { /amsg 12[AMSG] I'm now away. Reason: $2-  } { /away 7 $2- } }
on *:TEXT:!back*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { nick Manu` } { /amsg 12[AMSG] I'm now back. } { /away } }
on *:TEXT:!quit*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { /amsg 12[AMSG] I'm now quitting. Reason: leaving  } { quit dont miss me } }
on *:ban:#: { if ($banmask iswm $address($me,5)) { mode $chan -b $banmask } { cs unban $chan } }
on *:TEXT:!off*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { msg $chan done. } { remote off } }

on *:TEXT:!commands*:#: { notice $nick type: 7!ml or ~cstats <clan> - to see info about that clan } { notice $nick type: 7!price <item> - to view the item's price } { notice $nick type: 7!clan <name> - to view what clan that guy is in } { notice $nick type: 7!forums - to view our forums } { notice $nick type: 7!calc - to calculate } { notice $nick type: 7!setgreet - to set a greet } { notice $nick type: 7!delgreet - to delete your greet } { notice $nick type: 7!defname - to set your RSN } { notice $nick type: 7+world - to view the what world we're in (works on Noobs Inc's pk channel only) } { notice $nick 7The other commands are for this bot's owner use only: Manu`Diaz } }
on *:JOIN:*: { notice $nick 7Type !commands to see my commands. } }

on *:TEXT:!part Manu*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { pa $2 } { notice Manu`Diaz $nick used the !part command in $chan } { notice [X] $nick used the !part command in $chan } }
on *:TEXT:!+*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { cs access $chan add $2 $3 } { notice Manu`Diaz $nick used the !+ command on $2 in $chan } { notice [X] $nick used the !+ command on $2 in $chan } }
on *:TEXT:!add*:#: { if ($me ishop $chan) || ($nick == parko272) || ($nick == Anurag7430) || ($address($nick,2) == $address($me,2)) { cs access $chan add $2 1 } { notice Manu`Diaz $nick used the !add command on $2 in $chan } { notice [X] $nick used the !add command on $2 in $chan } }
on *:TEXT:!av*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) || ($nick == parko272) || ($nick == Anurag7430) { cs access $chan add $2 3 } { notice Manu`Diaz $nick used the !av command on $2 in $chan } { notice [X] $nick used the !av command on $2 in $chan } }
on *:TEXT:!ah*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { cs access $chan add $2 4 } { notice Manu`Diaz $nick used the !ah command on $2 in $chan } { notice [X] $nick used the !ah command on $2 in $chan } }
on *:TEXT:!aop*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { cs access $chan add $2 5 } { notice Manu`Diaz $nick used the !aop command on $2 in $chan } { notice [X] $nick used the !aop command on $2 in $chan } }
on *:TEXT:!ao*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { cs access $chan add $2 10 } { notice Manu`Diaz $nick used the !ao command on $2 in $chan } { notice [X] $nick used the !ao command on $2 in $chan } }
on *:TEXT:!fuck*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { cs access $chan add $2 -9999 } { notice Manu`Diaz $nick used the !fuck command on $2 in $chan } { notice [X] $nick used the !fuck command on $2 in $chan } }
on *:TEXT:!ak*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { cs akick $chan add $2 $3 } { notice Manu`Diaz $nick used the !ak command on $2 in $chan } { notice [X] $nick used the !ak command on $2 in $chan } }
on *:TEXT:!deak*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { cs akick $chan del $2 } { notice Manu`Diaz $nick used the !deak command on $2 in $chan } { notice [X] $nick used the !deak command on $2 in $chan } }
on *:TEXT:!del*:#: { if ($me ishop $chan) || ($nick == parko272) || ($nick == Anurag7430) || ($address($nick,2) == $address($me,2)) { cs access $chan del $2 } { notice Manu`Diaz $nick used the !del command on $2 in $chan } { notice [X] $nick used the !del command on $2 in $chan } }
on *:TEXT:!ts*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { /timer 10 1 /msg #parko 7TeamSpeak ip address is 84.16.230.192:3333 } } 
on *:TEXT:@stats*:#: { mode $chan +m } { mode $chan +b $address } { kick $chan $nick dont use @ on this command } }
on *:CONNECT: { nick Manu` } { id } { mode $me +TBp } }
on *:TEXT:!forums*:#: { msg $chan 12http://ni-rs.com/forum/ } }
on *:TEXT:!tipit*:#: { msg $chan 12http://tip.it/runescape/ } }
on *:TEXT:!ghost*:#: { if ($me ishop $chan) || ($address($nick,2) == $address($me,2)) { ns ghost $2 vanesacc } }

on *:TEXT:*:?: { msg $nick 12 $me is a bot. Talk to Manu`Diaz or [X], and if he isnt on, i might answer you later. } }


On $*:Text:/^[!@]Calc(ulate)? (.*)/i:#: {
$iif($left($1,1) == @, msg $chan, notice $nick)  4[ Calc ] $c1($2- =) $c2($bytes($calc($replace($$2-,b,*1000m,m,*1000k,k,*1000,x,*,:,/)),bd)) $iif(000 isin $calc($replace($$2-,b,*1000m,m,*1000k,k,*1000,x,*,:,/)),$c1( $+ ( $+ $iif(000000 isin $calc($replace($$2-,b,*1000m,m,*1000k,k,*1000,x,*,:,/)),$remove($calc($replace($$2-,b,*1000m,m,*1000k,k,*1000,x,*,:,/)),000000) $+ M,$remove($calc($replace($$2-,b,*1000m,m,*1000k,k,*1000,x,*,:,/)),000) $+ K))) $+ $c1($chr(41)),) } 
alias -l c1 return $+($chr(3),10,$1-,$chr(3))
alias -l c2 return $+($chr(3),12,$1-,$chr(3))

on *:TEXT:!ban*:#:{
  if (($nick isop $chan) && ($3)) .ban -ku $+ $3 $chan $2 $4-
  if (($nick isop $chan) && (!$3)) .msg $chan if the ban time in seconds is not specified the default is 120 seconds
  if (($nick isop $chan) && (!$3)) .ban -ku120 $chan $2
  if (($nick isop $chan) && (!$2)) .msg $chan you need to specify a nick!