;
; you can add your own scripts here
; this file will not be overwritten by patches
;

alias scriptlines {
  var %i = 1
  var %lines = 0
  var %cnt = $script(0)

  while (%i <= %cnt) {
    if ($right($script(%i), 4) == .ini) {
      inc %lines $lines($script(%i))
    }
    inc %i
  }

  xecho %lines lines!
}

alias mychans {
  var %n = 1
  var %cnt = $scon(0)
  while (%n <= %cnt) {
    scid $scon(%n)

    var %c = 1
    var %cntc = $chan(0)
    while (%c <= %cntc) {
      echo -a $network - $chan(%c) - $nick($chan(%c),0)
      inc %c
    }
    inc %n
  }
}

alias nopaste {
  browser http://nopaste.php-q.net @nopaste
}