on *:text:*:#: {
  if $regex($1,/^([!.]vur)/Si) {
    if !$2 { msg # Hatalı Kullanım "Lutfen Nick Belirtiniz" [!.]vur Nick }
    elseif $3- { msg # Hatalı Kullanım "Lutfen Sadece Bir Adet Nick Belirtiniz." }
    elseif $istok($me $nick,$2,32) { msg # Hatalı Kullanım Beni veya Kendiniz Vuramazsınız. }
    elseif !%:vur {
      inc -u30 %:vur 
      $iif($2 ison #,msg # $read(dosyaismi.txt),msg # $2 Kişisi Kanalda Bulunmuyor...)
    }
  }
}