All pastes #795403 Raw Edit

Stuff

public text v1 · immutable
#795403 ·published 2007-11-24 02:26 UTC
rendered paste body
raw 319 *:*: { 
  haltdef 
  var %a 0 
  while (%a < $gettok($3-,0,32)) { 
    inc %a 
    if ($left($gettok($3-,%a,32),1) == @) { 
      set %b %b $right($gettok($3-,%a,32),$calc($len($gettok($3-,%a,32)) - 1)) 
    } 
  } 
  if (%b) { 
    echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Whois:__4 $2 __14is _4op _14on:_4 %b 
    unset %b 
  } 
  var %a 0 
  while (%a < $gettok($3-,0,32)) { 
    inc %a 
    if ($left($gettok($3-,%a,32),1) == %) { 
      set %b %b $right($gettok($3-,%a,32),$calc($len($gettok($3-,%a,32)) - 1)) 
    } 
  } 
  if (%b) { 
    echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Whois:__4 $2 __14is _7halfop _14on:_4 %b 
    unset %b 
  } 
  var %a 0 
  while (%a < $gettok($3-,0,32)) { 
    inc %a 
    if ($left($gettok($3-,%a,32),1) == +) { 
      set %b %b $right($gettok($3-,%a,32),$calc($len($gettok($3-,%a,32)) - 1)) 
    } 
  } 
  if (%b) { 
    echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Whois:__4 $2 __14is _2voice _14on:_4 %b 
    unset %b 
  } 
  var %a 0 
  while (%a < $gettok($3-,0,32)) { 
    inc %a 
    if ($left($gettok($3-,%a,32),1) == $chr(35)) { 
      set %b %b $gettok($3-,%a,32) 
    } 
  } 
  if (%b) { 
    echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Whois:__4 $2 __14is _10regular _14on:_4 %b 
    unset %b 
  } 
} 
raw 311 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Whois:__4 $2 __14is_4 $3 $+ @ $+ $4 $+ __14 $5- 
} 
raw 378 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Whois:__4 $2 __14 $+ $3- 
} 
raw 312 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Whois:__4 $2 __14is using_4 $3 __14 $+ $4- 
} 
raw 301 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Whois:__4 $2 __14is away:_4 $3- 
} 
raw 307 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Whois:__4 $2 __14 $+ $3 _4 $+ $4 __14 $+ $5- 
} 
raw 671 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Whois:__4 $2 __14 $+ $3 $4 $5 _4 $+ $6- _ 
} 
raw 317 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Whois:__4 $2 __14has been idle_4 $duration($3) $+ __14, signed on_4 $duration($calc($ctime - $4)) __14ago. 
} 
raw 318 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Whois:__4 $2 __14 $+ $3- 
} 
raw 335 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Whois:__4 $2 __14 $+ $3 $4 _4 $+ $5 __14 $+ $6 _4 $+ $7 __14 $+ $8- 
} 
raw 401 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Raw:__14 $3- 
} 
raw 443 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Invite:_ $2 __14 $+ $4 $5 $6 _4 $+ $3 __14 
} 
raw 324 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Mode:__14 $2 _4 $+ $3- __14 
} 
raw 332 *:*: { 
  haltdef 
  echo $2 $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Topic:__4 $2 __14Topic is:__3 $3- 
} 
raw 333 *:*: { 
  haltdef 
  echo $2 $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Topic:__14 Topic set by_4 $3 __14 $+ $duration($calc($ctime - $4)) ago. 
} 
raw 353 *:*: { 
  haltdef 
  echo -s $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Names:__4 $3 $+ __14:_14 $4- 
} 
raw 366 *:*: { 
  haltdef 
  echo -s $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Names:__4 $2 $+ __14: $3- 
} 
raw 341 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Invite:__4 $2 $+ __14 invited into_4 $3- __14 
} 
raw 329 *:*: { 
  haltdef 
  echo -s $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Join:__14 Joined_4 $2 __14at $remove($timestamp,|) 
} 
raw 314 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Whowas:__4 $2 __14was_4 $3 $+ @ $+ $4 $+ __14 $5- 
} 
raw 369 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Whowas:__4 $2 __14 $+ $3- 
} 
raw 406 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Whowas:__4 $2 __14 $+ $3- 
} 
on ^*:TEXT:*:#: { 
  haltdef 
  if ($nick isop $chan) { 
    //echo -tml $chan $+($chr(3),15,$chr(91),$chr(3),15,@,$chr(3),4,$nick,$chr(3),15,$chr(93),$chr(15)) $1- 
  } 
  elseif ($nick ishop $chan) { 
    //echo -tml $chan $+($chr(3),15,$chr(91),$chr(3),2,%,$chr(3),7,$nick,$chr(3),15,$chr(93),$chr(15)) $1- 
  } 
  elseif ($nick isvoice $chan) { 
    //echo -tml $chan $+($chr(3),15,$chr(91),$chr(3),15,+,$chr(3),2,$nick,$chr(3),15,$chr(93),$chr(15)) $1- 
  } 
  elseif ($nick isreg $chan) { 
    //echo -tml $chan $+($chr(3),15,$chr(91),$chr(3),10,$nick,$chr(3),15,$chr(93),$chr(15)) $1- 
  } 
} 
on *:INPUT:#: { 
  if ($left($1,1) != /) { 
    haltdef 
    .msg $chan $1- 
    if ($me isop $chan) { 
      //echo -tm $chan $+($chr(3),15,$chr(91),$chr(3),15,@,$chr(3),4,$me,$chr(3),15,$chr(93),$chr(15)) $1- 
    } 
    elseif ($me ishop $chan) { 
      //echo -tm $chan $+($chr(3),15,$chr(91),$chr(3),2,%,$chr(3),7,$me,$chr(3),15,$chr(93),$chr(15)) $1- 
    } 
    elseif ($me isvoice $chan) { 
      //echo -tm $chan $+($chr(3),15,$chr(91),$chr(3),15,+,$chr(3),2,$me,$chr(3),15,$chr(93),$chr(15)) $1- 
    } 
    elseif ($me isreg $chan) { 
      //echo -tm $chan $+($chr(3),15,$chr(91),$chr(3),10,$me,$chr(3),15,$chr(93),$chr(15)) $1- 
    } 
  } 
} 
on ^*:RAWMODE:#: { 
  haltdef 
  echo -t $chan $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Mode:__4 $nick __14sets:_ $+($chr(3),04,[,$chr(15),$chr(2),$1,$chr(15),$chr(3),04,],$chr(15)) _04 $+ $2- 
} 
on ^*:PART:#: { 
  haltdef 
  echo -t $chan $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Part:__4 $nick $+($chr(3),14,$chr(40),$gettok($gettok($address($nick,5),2,33),1,64),$chr(3),4,@,$gettok($gettok($address($nick,5),2,33),2,64),$chr(3),14,$chr(41)) __14has parted_4 $chan $iif($1-,$+(_,$chr(40),$chr(15),$chr(3),03,$1-,$chr(15),$chr(41)),$null) 
} 
on ^*:JOIN:#: { 
  haltdef 
  echo -t $chan $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Join:__4 $nick $+($chr(3),14,$chr(40),$gettok($gettok($address($nick,5),2,33),1,64),$chr(3),4,@,$gettok($gettok($address($nick,5),2,33),2,64),$chr(3),14,$chr(41)) __14has joined_4 $chan $iif($1-,$+(_,$chr(40),$chr(15),$chr(3),03,$1-,$chr(15),$chr(41)),$null) 
} 
on ^*:NICK: { 
  haltdef 
  var %a = 0 
  while (%a < $comchan($newnick,$me)) { 
    inc %a 
    echo -t $comchan($newnick,%a) $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Nick:__4 $nick __14has changed their nick to $tbox($newnick) 
  } 
} 
alias tbox { 
  return $+($chr(3),04,[,$chr(15),$chr(2),$1-,$chr(15),$chr(3),04,],$chr(15)) 
} 
on ^*:NOTICE:*:?: { 
  haltdef 
  echo -ta $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Notice:__4 $+(-,$nick,-) __14 $+ $1- 
} 
on ^*:KICK:#: { 
  haltdef 
  echo -t $chan $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Kick:__4 $nick __14has kicked $tbox($knick) _14from_4 $chan $+ __14 $iif($1-,(_3 $+ $1- $+ __14),$null) 
} 
raw 302 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Userhost:__4 $2- 
} 
raw 482 *:*: { 
  haltdef 
  echo $2 $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Raw:__4 $3- 
} 
raw 974 *:*: { 
  haltdef 
  echo -s $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_ $+ $2 $+ :__4 $3 _14 $+ $4- 
} 
raw 499 *:*: { 
  haltdef 
  echo $2 $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Raw:__14 $3- 
} 
raw 472 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Raw:__4 $2 _14 $+ $3- 
} 
raw 421 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Raw:__4 $2 _14 $+ $3- 
} 
raw 460 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Raw:__14 $2- 
} 
raw 474 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Raw:__4 $2 _14 $+ $3- 
} 
raw 536 *:*: { 
  haltdef 
  echo -a $+($chr(3),14[,$chr(3),4,$chr(248),$chr(3),14,]) _4_Whois:__4 $2 _14 $+ $3-