Tüm kodlara tanıtmak gerekmez dediğim özellikte birşeyler yazdım arkadaş istiyorsa buyursun kullansın;

on *:text:*:?:{
if !register* iswm $1- {
if $read(login.txt,w,$nick $+ *) {
msg $nick Zaten Bu Nicke kayıtlı bir login mevcut
}
if $3 == $null || $2 == $null {
msg $nick Lütfen Komutu Düzgün Yazınız.. ÖRN: !register 12345 FENERBAHÇE
}
else {
write login.txt $+($nick,$chr(11),$2,$chr(11),$3)
msg $nick Nick: $nick
msg $nick Şifre: $2
msg $nick Gizli Soru: $3
msg $nick Bilgilerinizi kimseye söylemeyiniz..
msg $nick Şifrenizi kaybetme durumunda !gizlisoru $3 yazdığınızda şifreniz size verilecektir
}
}
if !login* iswm $1- {
if $read(login.txt,w,$nick $+ *) && $gettok($read(login.txt,w,$nick $+ *),2,11) == $2 {
.set $+(%,login,.,$nick) LOGIN
msg $nick Başarıyla Login oldunuz..
}
else {
msg $nick Bu Nickde herhangi bi kayıt yok yada şifre hatalı
}
}
if !gizlisoru* iswm $1- {
if $read(login.txt,w,$nick $+ *) && $gettok($read(login.txt,w,$nick $+ *),3,11) == $2 {
msg $nick Nick: $nick
msg $nick Şifre: $gettok($read(login.txt,w,$nick $+ *),2,11)
msg $nick Gizli Soru: $gettok($read(login.txt,w,$nick $+ *),3,11)
}
else {
msg $nick Bu Nickde herhangi bi kayıt yok yada gizli soru cevabı hatalı
}
}
}

<GFBUlaa> !register 12345 selam
<CipriX> Nick: GFBUlaa
<CipriX> Şifre: 12345
<CipriX> Gizli Soru: selam
<CipriX> Bilgilerinizi kimseye söylemeyiniz..
<CipriX> Şifrenizi kaybetme durumunda !gizlisoru selam yazdığınızda şifreniz size verilecektir
<GFBUlaa> !login 12345
<CipriX> Başarıyla Login oldunuz..
<GFBUlaa> !gizlisoru selam
<CipriX> Nick: GFBUlaa
<CipriX> Şifre: 12345
<CipriX> Gizli Soru: selam

!login olanlar için komutların geçerli olmasını istiyorsan..

Kodun başına eklenecek parametre;

if $($+(%,login,.,$nick),2) == LOGIN {

Nick yerine kişinin nicki nasıl tanımlanıyorsa o eklenecektir..

ÖRNEK;

on *:text:*:#:{
if !at* iswm $1- {
kick $chan $2 $3-
}
}

böyle bir sistem var diyelim bunu login'e uyarlıyacağız

on *:text:*:#:{
if $($+(%,login,.,$nick),2) == LOGIN {
if !at* iswm $1- {
kick $chan $2 $3-
}
}
}

Not: on *:quit veya on *:part vb. bir sistem ile veriablede bulunan %login.Nick LOGIN değişgenini kaldırtırsanız daha sağlıklı olur..

Misal:
on *:quit:{ if $($+(%,login,.,$nick),2) == LOGIN { .unset $+(%,login,$nick) } }

gibi..