All pastes #587198 Raw Edit

Untitled

public text v1 · immutable
#587198 ·published 2007-06-24 10:46 UTC
rendered paste body
Code: 
on *:text:!reqs*:#: { 
  if (!$2) { 
    msg $chan Please set the combat level. 
  } 
  elseif ($2 && $nick isop $chan) { 
    set %cmb.req [ $+ [ $chan ] ] $2 
    msg $chan 2 Channel requirement has been changed to: %cmb.req [ $+ [ $chan ] ] 
    unset %cmb.req.off [ $+ [ $chan ] ] 
  } 
  else { 
    /notice $nick Only OP's can use this command. 
  } 
} 
on *:text:!unsetreq:#: { 
  if ($nick isop $chan && %cmb.req.off [ $+ [ $chan ] ] == off) { 
    msg $chan Combat requirement has already been set off. 
  } 
  elseif ($nick isop $chan && %cmb.req.off == $null) { 
    set %cmb.req.off [ $+ [ $chan ] ] off 
    set %nick $nick 
    msg $chan Combat requirement has been set off by %nick 
    unset %nick    
    unset %cmb.req [ $+ [ $chan ] ] 
  } 
  else { 
    /notice $nick Only OP's can use this command. 
  } 
} 
on *:join:#: { 
  if (!%cmb.req [ $+ [ $chan ] ] || $nick == $me) { HALT }
  if ($nick == seen_my_att || $nick == seen_my_hp || $Nick == seen_my_str || $nick = ||seenmymage|| || $nick == ISEEUI || $nick == x_timbob_x || $Nick ==  t_n_t_4_life || $Nick ==  E4t_F0od_Nub || $nick == chappy || $Nick == ownege-0wnz || $Nick == suraj || $Nick == Xx-abla-xX || $Nick == Hermits_FTW) { HALT } 
  else { 
    var %joincb.msock = $right($ticks,6) 
    set %nick $nick
    set %joincb.nick [ $+ [ %joincb.msock ] ] $replace($nick,$chr(32),_) 
    set %msg.chan [ $+ [ %joincb.msock ] ] /msg $chan 
    set %joincb.chan [ $+ [ %joincb.msock ] ] $chan 
    sockopen cbjoin [ $+ [ %joincb.msock ] ] www.slushpuppy.silverinterlocution.org 80 
  } 
} 
on *:sockopen:cbjoin*: { 
  sockwrite -nt $sockname GET /rsstats.php?stats= $+ %joincb.nick [ $+ [ $right($sockname,6) ] ] HTTP/1.1 
  sockwrite -nt $sockname Host: www.slushpuppy.silverinterlocution.org 
  sockwrite -nt $sockname $crlf 
} 
on *:SOCKREAD:cbjoin*: { 
  var %joincb.sockread 
  sockread %joincb.sockread 
  if (*does not feature* iswm %joincb.sockread) { 
    kick %joincb.chan [ $+ [ $right($sockname,6) ] ] %joincb.nick [ $+ [ $right($sockname,6) ] ] You're nick does not feature in the highscores. Please join with your RS Name.
    mode %joincb.chan [ $+ [ $right($sockname,6) ] ] +b $address(%joincb.nick [ $+ [ $right($sockname,6) ] ],2) 
    notice %joincb.nick [ $+ [ $right($sockname,6) ] ] You're nick does not feature in the highscores. Please join with your RS Name, 5 min ban. 
    timer 1 $calc(5 * 60) mode %joincb.chan [ $+ [ $right($sockname,6) ] ] -b $address(%joincb.nick [ $+ [ $right($sockname,6) ] ] ,2) 
    timer 1 $calc(5 * 60) notice %joincb.nick [ $+ [ $right($sockname,6) ] ] You are now unbanned from %joincb.chan [ $+ [ $right($sockname,6) ] ] 
    unset %joincb.nick [ $+ [ $right($sockname,6) ] ] 
    unset %msg.chan [ $+ [ $right($sockname,6) ] ] 
    unset %joincb.chan [ $+ [ $right($sockname,6) ] ] 
    sockclose $sockname 
  } 
  if (*combat level for* iswm %joincb.sockread) { 
    tokenize 32 %joincb.sockread 
    set %combat.wait [ $+ [ $right($sockname,6) ] ] $remove($7,<br>) 
    set %joincb.continue [ $+ [ $right($sockname,6) ] ] true 
  } 
  if (%combat.wait [ $+ [ $right($sockname,6) ] ] < %cmb.req [ $+ [ %joincb.chan [ $+ [ $right($sockname,6) ] ] ] ] && %joincb.continue [ $+ [ $right($sockname,6) ] ] == true) { 
    kick %joincb.chan [ $+ [ $right($sockname,6) ] ] %joincb.nick [ $+ [ $right($sockname,6) ] ] You don't meet the combat requirement. 5 min ban. 
    notice %joincb.nick [ $+ [ $right($sockname,6) ] ] You don't meet the combat requirement. 5 min ban. 
    mode %joincb.chan [ $+ [ $right($sockname,6) ] ] +b $address(%joincb.nick [ $+ [ $right($sockname,6) ] ],2) 
    timer 1 $calc(5 * 60) mode %joincb.chan [ $+ [ $right($sockname,6) ] ] -b $address(%joincb.nick [ $+ [ $right($sockname,6) ] ] ,2) 
    timer 1 $calc(5 * 60) notice %joincb.nick [ $+ [ $right($sockname,6) ] ] You are now unbanned from %joincb.chan [ $+ [ $right($sockname,6) ] ] 
  } 
  if (%combat.wait [ $+ [ $right($sockname,6) ] ] >= %cmb.req [ $+ [ %joincb.chan [ $+ [ $right($sockname,6) ] ] ] ] && %joincb.continue [ $+ [ $right($sockname,6) ] ] == true) { 
    msg %joincb.chan [ $+ [ $right($sockname,6) ] ] 2 The combat level for %joincb.nick [ $+ [ $right($sockname,6) ] ] is %combat.wait [ $+ [ $right($sockname,6) ] ] and you meet the reqs! congratulations!!! 
    unset %joincb.nick [ $+ [ $right($sockname,6) ] ] 
    unset %msg.chan [ $+ [ $right($sockname,6) ] ] 
    unset %joincb.chan [ $+ [ $right($sockname,6) ] ] 
    unset %joincb.continue [ $+ [ $right($sockname,6) ] ] 
    mode #sdpc +v %nick
    sockclose $sockname

  } 
}