stj {
  $iif(!$isdir(kadro),.mkdir kadro)
  if $istok($read(kadro/stj.txt),$1-,32) { echo -a bu nick ekli }
  else { .write -l kadro/stj.txt $read(kadro/stj.txt) $1- | echo -a eklendi. }
}
stjbasi {
  if !$lines(kadro/stj.txt) { echo -a liste boş }
  else { echo -a Listeleniyor.. | tokenize 32 $read(kadro/stj.txt) | echo -a $* }
}
stjsil {
  if !$lines(kadro/stj.txt) { echo -a liste boş }
  elseif !$istok($read(kadro/stj.txt),$1-,32) { echo -a bu nick ekli değil.. }
  else { 
    $iif($token($read(kadro/stj.txt),0,32) == 1,.remove kadro/stj.txt,.write -l kadro/stj.txt $remtok($read(kadro/stj.txt),$1-,32))
    echo -a silindi. 
  }
}