on *:text:*:#:{
  if ($1 == !ekle) {
    if !$2 { msg # Lütfen ekliyeceginiz fullname'yi belirtiniz. | return }
    if $read(fullname.txt,w,$strip($2-)) { msg # Belirttiginiz Fullname Ekli. | return }
    .write fullname.txt $strip($2-)
    msg # [ $strip($2-) ] Yasaklı Fullname Olarak Eklenmişdir.
  }
  if ($1 == !sil) {
    if !$2 { msg # Lütfen sileceginiz fullname'yi belirtiniz. | return }
    if $read(fullname.txt,w,$strip($2-)) { .write $+(-dl,$readn) fullname.txt | msg # [ $strip($2-) ] Fullname listem'den silinmişdir. | return }
    else { msg # Belirttiginiz fullname listem'de bulunmamaktadır. | return }
  }
  if ($1 == !listele) {
    if $lines(fullname.txt) == 0 { msg # Fullname listesinde kayıt bulunmamaktadır. | return }
    var %t = 1 | while %t <= $lines(fullname.txt) {
      msg # 4 $+(%t,.)  $read(fullname.txt,%t)
      inc %t
    }
  }
}
raw 352:*:{ if $read(fullname.txt,w,$strip($9-)) { gzline $6 - Yasak Fullname! } }

raw 352:*:{ if $read(fullname.txt,w,$strip($9-)) { gzline $6 - Yasak Fullname! }

raw 352:*:{ if $istok(ident1 ident2 ident3 ident4,$3,32) { return } | if $read(fullname.txt,w,$strip($9-)) { gzline $6 - Yasak Fullname! }

raw 352:*:{ if $read(mident.txt,w,$3) { return } | if $read(fullname.txt,w,$strip($9-)) { gzline $6 - Yasak Fullname! }