on *:text:*:#Y:{
  if ($regex($1-,/^!takip ?/i)) {
    if (!$isfile($mircdirtakip\,$+($2,.txt))) .msg # Hata: $2 rumuzuna ait bir kayıt yok.
  else { .msg # $2 rumuzuna ait kayıtlar listeleniyor. | var %z = 1 | while ($read($+(takip\,$2,.txt),%z)) { .msg # $v1 | inc %z } }
  }
  if ($regex($1-,/!sıfırla$/Ai)) { .msg # $findfile($mircdirtakip,*.txt,0) adet dosya siliniyor. | var %* = 1 | while ($findfile($mircdirtakip,*.txt,%*)) { .remove $v1 | inc %* } | .msg # Dosyalar silindi. }
  if ($regex($1,/!tsil$/Ai) && $2) {
    if (!$isfile($+($mircdirtakip\,$2.txt))) .msg # Hata: Dosya bulunamadı.
    else { .remove $+($mircdirtakip\,$2,.txt) | .msg # $2 rumuzuna ait veriler silindi. }
}