#crgris on
on *:snotice:*client connecting*: {
  if !$exists(crgiris.ini) { $scripdir(crgiris.ini) }
  writeini $qt(crgiris.ini) $9 crgiris $ticks
  .msg $9 Lütfen Giriş kodunu giriniz. Giriş kodunuz: $readini(crgiris.ini,$9,crgiris) (Örn: kullanım giris 6985452)
}
on *:TEXT:*:?:{ 
  if $ini(crgiris.ini,$nick) >= 1 && ($1 == giris) && ($2 == $readini(crgiris.ini,$nick,crgiris)) && ($3- == $null) { msg $nick Şifre başarı ile girildi kanallara yönlendiriyorsun.. | remini crgiris.ini $nick | close -m $nick | fjoin $nick #sohbet | fjoin $nick #oyun }
  elseif $ini(crgiris.ini,$nick) >= 1 && ($1 == $+(giris,$readini(crgiris.ini,$nick,crgiris))) && ($2- == $null) { msg $nick Hata! $nick Giris ile giris kodu arasında bir boşluk bırak. (Örn: giris 963654) Giris kodun: $readini(crgiris.ini,$nick,crgiris) tekrar dene }
  elseif $ini(crgiris.ini,$nick) >= 1 && ($1 == giris) && ($2 != $readini(crgiris.ini,$nick,crgiris)) { msg $nick Hata! $nick Giris kodun yanlış. Giris kodun: $readini(crgiris.ini,$nick,crgiris) tekrar dene }
  elseif $ini(crgiris.ini,$nick) = 0 && ($1 == giris) && ($3- == $null) { writeini $qt(crgiris.ini) $nick crgiris $ticks | .msg $nick Nickiniz değiş olabilir veya siz değiştirmiş olabilirsiniz veya Giriş kodu yeni aktif edilmiş olabilir.Size yeni bir giriş kodu yerildi.Yeni giriş kodun: $readini(crgiris.ini,$nick,crgiris) (Örn: kullanım giris 6985452) 
  }
}
on *:snotice:*client exiting*: { if $ini(crgiris.ini,$6) >= 1 { remini crgiris.ini $6 | if ($query($6) = $6) { close -m $6 } } }
on *:nick: { if $ini(crgiris.ini,$nick) >= 1 { remini crgiris.ini $nick | close -m $nick } } 
#crgris end
on *:exit: { .write -c crgiris.ini }
menu menubar,status,channel {
  -
  Cr giris kodu
  .-
  .Açık:.enable #crgris | umode +c
  .Kapalı:.disable #crgris
}