On 1:input:#dj:{
  if ($1 == !yaz) {
    if !$2 { msg # Lütfen ekliyeceginiz Nick i  belirtiniz. | return }
    if $read(dj.txt,w,$strip($2-)) { msg # Belirttiginiz Dj Ekli. | return }
    .write dj.txt $strip($2-)
    msg # [ $strip($2-) ] Dj Saati  Eklenmişdir.
  }
  if ($1 == !sil) {
    if !$2 { msg # Lütfen sileceginiz Nick'i belirtiniz. | return }
    if $read(dj.txt,w,$strip($2-)) { .write $+(-dl,$readn) dj.txt | msg # [ $strip($2-) ] Nick listem'den silinmişdir. | return }
    else { msg # Belirttiginiz Nick listem'de bulunmamaktadır. | return }
  }
  if ($1 == !saatler) {
    if $lines(dj.txt) == 0 { msg # Dj listesinde kayıt bulunmamaktadır. | return }
    var %t = 1 | while %t <= $lines(dj.txt) {
      msg # 4 $+(%t,.)  $read(dj.txt,%t)
      inc %t
    }
  }
}
on *:text:*:#dj:{
  if ($1 == !saatler) {
    if $lines(dj.txt) == 0 { msg # Dj listesinde kayıt bulunmamaktadır. | return }
    var %t = 1 | while %t <= $lines(dj.txt) {
      msg # 4 $+(%t,.)  $read(dj.txt,%t)
      inc %t
    }
  }
}