alias ekle {
  write users/ $+ $+($1,.txt) İsmi: $$?"İsmini Yazınız"
  write users/ $+ $+($1,.txt) Şehir: $$?"Şehrin iYazınız"
  write users/ $+ $+($1,.txt) Yaş: $$?"Yaşını Yazınız"
  write users/ $+ $+($1,.txt) Okul: $$?"Okulunu Yazınız"
  write users/ $+ $+($1,.txt) MSN: $$?"MSN Yazınız"
}
on *:open:?: { 
  if  $findfile($mircdirusers\, $+ $nick $+ .txt,0) { 
    echo 4 $nick $read(users/ $+ $nick $+ .txt,1)
    echo 12 $nick $read(users/ $+ $nick $+ .txt,2)
    echo 7 $nick $read(users/ $+ $nick $+ .txt,3)
    echo 11 $nick $read(users/ $+ $nick $+ .txt,4)
    echo 3 $nick $read(users/ $+ $nick $+ .txt,5)
  }
}