kayitlimi off 
raw 307:*: { 
  .set $+(%,yeah,.,$2) on 
} 
#kayitlimi end 
alias kontrolet { 
  .enable #kayitlimi 
  .whois $1 
} 
on *:text:.greet *:%operkanali:{ 
  if $2 == ekle { 
    if !$read(admin.txt,w,$nick) { .msg # $+(",$nick,") Bu Komutu Kullanmaya Yetkili Degilsiniz. } 
    elseif $2 == $null { .msg # $+(",$nick,") .greet ekle Mesaj Seklinde Kodu Kullaniniz. }
    elseif $3 == $null { .msg # $+(",$nick,") Lütfen Greet Mesajinizi Yaziniz }
    else { kontrolet $nick  | .msg %operkanali $+(",$nick,")  Bekleyin Kontrol Ediliyor  | .timer 1 2 kontrolet2 $nick $3- }
  } 
  if $2 == sil { 
    if !$read(admin.txt,w,$nick) { .msg # $+(",$nick,") Bu Komutu Kullanmaya Yetkili Degilsiniz. } 
    elseif $3 == $null { .msg # $+(",$nick,") Lütfen Silincek Nick Yaziniz }
    else { greetsil $3 }
  }
  if $2 == list {
    if !$read(admin.txt,w,$nick) { .msg # $+(",$nick,") Bu Komutu Kullanmaya Yetkili Degilsiniz. } 
    else { .msg $chan $nick Özelinize Bilgiler Verilmiştir , Lütfen Özelinizi Kontrol Ediniz | .msg $nick Greet Mesajlari Listeleniyor | greetlist | .msg $nick Greet Mesajlari Listesi Sonu }
  }
}
alias greetsil { if $1 { if !$read(greet.txt,w,$+($1,*)) { .msg $chan  $1  Greet Mesaj'i listesinde yok. | halt } | else { write $+(-dl,$readn) greet.txt | .msg $chan - $1 - Greet Mesaj'i listesinden silindi. } } }
alias greetlist { var %s = 1,%ss = $lines(greet.txt) | while %s <= %ss { .msg $nick  $read(greet.txt,%s) | inc %s } }
alias kontrolet2 { 
  if $($+(%,yeah,.,$1),2) == on { 
    if $read(greet.txt,w,$1 $+ *) { 
      .msg %operkanali $+(",$1,") zaten seçilmiş bir greet mesajınız vardı 
      .write -dl $+ $readn greet.txt 
      .msg %operkanali $+(",$1,") Seçilen Greet Mesajı değiştirildi 
      .write greet.txt $1 $+ $chr(11) $+ $2- 
      .msg %operkanali $+(",$1,")   Eklenen Mesaj:4 $2- 
    } 
    else { 
      .write greet.txt $1 $+ $chr(11) $+ $2- 
      .msg  %operkanali $+(",$1,") Greet mesajınız eklendi Mesaj:4 $2- 
    } 
    .unset $+(%,yeah,.,$1) 
    .disable #kayitlimi 
  } 
  else { 
    .msg %operkanali $+(",$1,")  Nickiniz kayıtlı olmadığından dolayı malesef bu özelliği kullanamıyorsunuz  
    .msg %operkanali $+(",$1,")  /ns register sifre email  Sifre Yerine Sifrenizi Email Yerine Msnenizi Yazarak Kayıt Edebilirsiniz Nickinizi 
    .disable #kayitlimi 
  } 
} 
on *:join:#:{ 
  if $read(yönetimkanal.txt,w,$chan) { halt }
  if $read(greet.txt,w,$+($nick,$chr(11),*)) { 
    .msg $chan $+([,$nick,]) $gettok($read(greet.txt,w,$nick $+ *),2,11) 
  } 
}