Channel whois | nopaste | share your clipboard

Channel whois

Edit & repaste | raw paste | Request removal

raw 319:*: {
  var %aantal = $numtok($3-,32)
  var %i = 0
  while (%i <= %aantal) {
    unset %tocheck
    var %cur = $gettok($3-,%i,32)
    ; 45 - 33 ! 60 <
    if ($asc($left(%cur,1)) == 45 || $asc($left(%cur,1)) == 33 || $asc($left(%cur,1)) == 60) {
      %tocheck = $mid(%cur,2)
    }
    if ($asc($left(%tocheck,1)) == 45 || $asc($left(%tocheck,1)) == 33 || $asc($left(%tocheck,1)) == 60) {
      %tocheck = $mid(%tocheck,2)
    }
    if ($asc($left(%tocheck,1)) == 45 || $asc($left(%tocheck,1)) == 33 || $asc($left(%tocheck,1)) == 60) {
      %tocheck = $mid(%tocheck,2)
    }
    if (%tocheck) %toshow = %cur
    else {
      %tocheck = %cur
      %toshow = $mid(%cur,2,300)
    }
    var %wchan = $remove(%cur, $gettok(%cur, 1, 35))
    if ($left(%tocheck,1) == @ || $left(%tocheck,2) == :@) {
      var %op = %op %toshow
    }
    elseif ($left(%tocheck,1) == +) {
      var %voice = %voice %toshow
    }
    elseif ($left(%tocheck,1) == %) {
      var %hop = %hop %toshow
    }
    elseif ($left(%tocheck,1) == &) {
      var %admin = %admin %toshow
    }
    elseif ($left(%tocheck,1) == ~) {
      var %owner = %owner %toshow
    }
    else {
      if ($left(%tocheck,1) == $chr(35)) {
        var %regged = %regged %cur
      }
    }
    inc %i
  }
  if (%owner) echo -at $+($chr(160),$chr(160),[,$2,]) - $+([,Owner in: %owner,])
  if (%admin) echo -at $+($chr(160),$chr(160),[,$2,]) - $+([,Admin in: %admin,])
  if (%op) echo -at $+($chr(160),$chr(160),[,$2,]) - $+([,Opped in: %op,])
  if (%hop) echo -at $+($chr(160),$chr(160),[,$2,]) - $+([,HalfOpped in: %hop,])
  if (%voice) echo -at $+($chr(160),$chr(160),[,$2,]) - $+([,Voiced in: %voice,])
  if (%regged) echo -at $+($chr(160),$chr(160),[,$2,]) - $+([,Reg in: %regged,])
  if (%aantal) echo -at $+($chr(160),$chr(160),[,$2,]) - $+([,Total chans: %aantal,])
  halt
}

Latest pastes

teen videos collection december

1 hours ago

6GB BOCIL UPFILES PACK

11 hours ago

BOCIL PACK 6GB FREE

1 days ago

2 pack and loli

2 days ago

Free cp no ada

2 days ago