alias xline.data return $shortfn($+($mircdir,xline.data))
on *:snotice:*:{
  if (*Z:line added* iswm $1-) {
    if ($2 == Global) { write xline.data $6 $+ $chr(183) $+ $15 $+ $chr(183) $+ $left($25-,-1) $+ $chr(183) $+ $date $time }
    else { write xline.data $5 $+ $chr(183) $+ $14 $+ $chr(183) $+ $left($24-,-1) $+ $chr(183) $+ $date $time }
  }
  if (*K:Line added for* iswm $1-) { write xline.data $5 $+ $chr(183) $+ $14 $+ $chr(183) $+ $left($24-,-1) $+ $chr(183) $+ $date $time }
  if (*G:Line added for* iswm $1-) { write xline.data $5 $+ $chr(183) $+ $14 $+ $chr(183) $+ $left($24-,-1) $+ $chr(183) $+ $date $time }
  if (*Permanent Global Z:line* iswm $1-) { write xline.data $7 $+ $chr(183) $+ $remove($16,:) $+ $chr(183) $+ $left($17,-1) $date $time }
  if (*Permanent Z:Line* iswm $1-) { write xline.data $6 $+ $chr(183) $+ $remove($15,:) $+ $chr(183) $+ $left($16,-1) $+ $chr(183) $+ $date $time }
  if (*Permanent G:Line* iswm $1-) { write xline.data $6 $+ $chr(183) $+ $remove($15,:) $+ $chr(183) $+ $left($16,-1) $+ $chr(183) $+ $date $time }
  if (*Permanent K:Line* iswm $1-) { write xline.data $6 $+ $chr(183) $+ $remove($15,:) $+ $chr(183) $+ $left($16,-1) $+ $chr(183) $+ $date $time }
  if (*removed Global Z:line* iswm $1-) { if ($read($xline.data,w,$+(*,$5,*))) { write $+(-dl,$readn) $xline.data  } }
  if (*removed K:Line* iswm $1-) { if ($read($xline.data,w,$+(*,$4,*))) {  write $+(-dl,$readn) $xline.data  } }
  if (*removed Z:Line* iswm $1-) { if ($read($xline.data,w,$+(*,$4,*))) { write $+(-dl,$readn) $xline.data  } }
  if (*removed G:Line* iswm $1-) { if ($read($xline.data,w,$+(*,$4,*))) { write $+(-dl,$readn) $xline.data  } }
  if *Expiring Global Z:Line* iswm $1-) { if ($read($xline.data,w,$+($remove($5,$chr(40),$chr(41)),*))) { write $+(-dl,$readn) $xline.data  } }
  if *Expiring K:Line* iswm $1-) { if ($read($xline.data,w,$+($remove($4,$chr(40),$chr(41)),*))) { write $+(-dl,$readn) $xline.data  } }
  if *Expiring G:Line* iswm $1-) { if ($read($xline.data,w,$+($remove($4,$chr(40),$chr(41)),*))) { write $+(-dl,$readn) $xline.data  } }
  if *Expiring Z:Line* iswm $1-) { if ($read($xline.data,w,$+($remove($4,$chr(40),$chr(41)),*))) { write $+(-dl,$readn) $xline.data  } }
}
alias ip {
  if ($1) {
    if $read($xline.data,w,$+(*,$1,*)) { var %xline.data $read($xline.data,$readn) }
    if (!%xline.data) { echo 4 -ta $qt($1) ipi için kayıt bulunamadı! | halt }
    else { 
      echo 4 -ta IP: $gettok(%xline.data,1,183)
      echo 4 -ta Banlayan: $gettok(%xline.data,2,183)
      echo 4 -ta Sebep: $gettok(%xline.data,3,183)
      echo 4 -ta Ban Zamanı: $gettok(%xline.data,4,183)
    }
  }
}
alias ipler {
  unset %x
  var %x = 1
  while (%x <= $lines($xline.data)) {
    var %xline.data = $read($xline.data,%x)
    echo 12 -ts -
    echo 4 -ts IP: $gettok(%xline.data,1,183)
    echo 4 -ts Banlayan: $gettok(%xline.data,2,183)
    echo 4 -ts Sebep: $gettok(%xline.data,3,183)
    echo 4 -ts Ban Zamanı: $gettok(%xline.data,4,183)
    inc %x 1
  }
}
on *:start:write -c $xline.data
on *:disconnect:write -c $xline.data

on *:text:*:#Kanal:{
  if *!ip* iswm $1 {
    set %ips $2
    set -u20 %Stats on
    .stats g
    .stats k
  }
}
raw *:*:{
  if %Stats == on {
    if $numeric == 223 {
      if %ips iswm $remove($3,*@) {
        msg #Kanal %ips adresine Ban atan Nick : $gettok($6,1,33)  Sebeb : $7- 
      }
    }
    if $numeric == 216 {
      if %ips iswm $remove($3,*@) {
        msg #Kanal %ips adresine Ban atan Nick : $gettok($6,1,33)  Sebeb : $7- 
      }
    }
  }
}