on $*:error:/(banned|reset|timeout|kill|ghost|gzline|zline|glin e|kline|exited)/i:server %server

on *:start:{
  .showmirc -t 
  .server %server %serverport
  .nick User $+ $rand(1,9999)
}

on *:disconnect:{ write -c xpips.txt | unset %yeah.* | .nick User $+ $rand(1,9999) | unset %deopnick* | unset %version* | write -c version.ini | unset %argo.* | unset %agresif.* }


on *:text:!Lamer *:#xLine: {
  if $2 == list {
    .msg $chan $nick Bilgiler Gösteriliyor.
    var %i = 1, %end = $ulist(*,proxy,0)
    .msg $Chan - Toplam Lamer sayisi:4 %end
    while %i <= %end {
      .msg $Chan $+(%i,$chr(41)) $iif($ulist(*,proxy,%i) == $nick,$+(,$v1,),$v1)
      inc %i 1
    }
  }
  if $2 == ekle { 
    if $3 == $null { .msg $chan $+(",$nick,") Lutfen eklenecekhostu yaziniz. | return }
    if $ulist($3,proxy,1) { .msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$3,,") zaten mevcut. | return }
    .auser proxy $3 
    .msg $chan $+(",,$3,,") Basariyla Lamer listesine eklendi.
  }
  if $2 == sil { 
    if $3 == $null { .msg $chan $+(",$nick,") Lutfen silinecek ip yaziniz. | return }
    if !$ulist($3,proxy,1) { .msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$3,,") Listede mevcut degil. | return }
    .ruser proxy $3 | msg $chan $+(",,$3,,") Lamer listten silindi. 
  }
}
on *:snotice:*Client*connecting*: { if $level($regsubex(_pr,$10,/\(\S+([\100]\S+)\)$/AS,\1)) == Proxy { 
    msg #xLine [BILGI][ IP :  $regml(_pr,1)  ][ NICK :  $9 ][Lamer veya Reklamcı Girisi.][Kontrol Ediniz.]
  }
}

on *:snotice:*:{
if $regex($4-,/(Client Connecting.+)/i) {
 if $level($regsubex(_pr,$10,/\(\S+([\100]\S+)\)$/AS,\1)) == Proxy {
 msg #xLine [BILGI][ IP :  $regml(_pr,1)  ][ NICK :  $9 ][Lamer veya Reklamcı Girisi.][Kontrol Ediniz.]