Kod

alias _tekle {
  if ($1) {
    write takip_listesi.txt $1
    echo -a $1 takip listesine eklendi.
  } 
  else {
    echo -a Lütfen takip etmek istediğiniz nicki belirtin.
  }
}
alias _tsil {
  if (!$1) {
    echo -a Silmek istediğiniz kişiyi belirtin.
  }
  elseif ($read(takip_listesi.txt, w, $1)) {
    write -dl $+ $readn takip_listesi.txt
    echo -a $1 takip listesinden silindi.
  } 
  elseif (!$read(takip_listesi.txt, w, $1)) {
    echo -a $1 takip listesinde ekli değil.
  } 
}

on *:snotice:*: {
  if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Lütfen Üye Olmak için TIKLAYIN...]
e)) window -en @[Üye Olmadan Linkleri Göremezsiniz. Lütfen Üye Olmak için TIKLAYIN...]
e
  if $regex($1-,/Yeni\sGiris/iS) {
    var %;port $remove($7,:)
    var %;ip $gettok($gettok($9,2,64),1,41)
    var %file ip_log.txt
    var %;t $date $+ $time
    var %;n $8
    write %file %;t $+ : %;n $+ : %;ip
    echo -tm @[Üye Olmadan Linkleri Göremezsiniz. Lütfen Üye Olmak için TIKLAYIN...]
e 2 %;n  : 4 %;ip 5 %;port
    if ($read(takip_listesi.txt, w, %;n)) {
      echo -tm @[Üye Olmadan Linkleri Göremezsiniz. Lütfen Üye Olmak için TIKLAYIN...]
e 4Takip listesinde yer alan 2 %;n 4 sunucuya giriş yaptı.
    }
  }
}

on ^*:hotlink:*:@[Üye Olmadan Linkleri Göremezsiniz. Lütfen Üye Olmak için TIKLAYIN...]
e: {
  if ($mouse.key & 1) {
    var %:nick $gettok($1,1,58)
    whois %:nick
  }
}