All pastes #363834 Raw Edit

Gsus

public text v1 · immutable
#363834 ·published 2007-02-19 18:37 UTC
rendered paste body
alias globalban { 
  if (*!*@* iswm $1) var %m = $1 
  elseif ($comchan($1,0) > 0) var %m = $address($1,2), %n = $1 
  else { 
    .enable #gban 
    if ($2) set %gban.reason $2- 
    userhost $1 
    halt 
  } 
  var %a = $chan(0), %b  
  while (%b <= %a) { 
    var %c = $chan(%b) 
    if ($nick(%c,$me,ho)) { 
      msg %c %message 
      mode %c +b %m 
    } 
    inc %b 
  } 
} 
#gban off
raw 302:*:{ 
  if (!$2) { 
    echo 4 -a * /gban: no such nick 
  } 
  else { 
    var %m = $+(*!*@,$gettok($2,2,$asc(@))), %n = $gettok($2,1,$asc(=)) 
    var %a = $chan(0), %b = 1 
    while (%b <= %a) { 
      var %c = $chan(%b) 
      if ($nick(%c,$me,ho)) { 
        mode %c +b %m 
      } 
      inc %b 
    } 
  } 
  if (%gban.reason) unset %gban.reason 
  .disable #gban 
} 
#gban end