on *:text:*:#: {
  if ($1 == !vip) {
    if $2 == ekle {
      if !$read(yetkili.txt,w,$nick) { .msg $chan $nick  Bu Komutu Kullanmaya Yetkili Degilsiniz. }
      elseif $3 == $null { .msg $chan $nick Lütfen Nick Yaziniz. }
      else { vipekle $3 }
    }
    if $2 == sil {
      if !$read(yetkili.txt,w,$nick) { .msg $chan $nick  Bu Komutu Kullanmaya Yetkili Degilsiniz. }
      elseif $3 == $null { .msg $chan $nick Lütfen Nick Yaziniz. }
      else { vipsil $3 }
    }
    if $2 == list {
      if !$read(yetkili.txt,w,$nick) { msg $chan $nick Bu Komutu Kullanmaya Yetkili Degilsiniz. }
      else { viplist  }
    }
  }
}
alias vipekle { if $1 { if $read(vip.txt,w,$1) { .msg $chan  $1   zaten listede ekli. | halt } | else { write vip.txt $1 | .msg $chan  $1  vip listeye eklendi. } } }
alias viplist { if !$lines(vip.txt)  { msg $chan $Nick listede ekli vip user yok | halt } | var %l2 1 | while (%l2 <= $lines(vip.txt)) { msg $chan %l2 $read(vip.txt,%l2) | inc %l2 } }
alias vipsil { if $1 { if !$read(vip.txt,w,$1) { .msg $chan  $1  vip listesinde yok. | halt } | else { write $+(-dl,$readn) vip.txt | .msg $chan  $1 vip listesinden silindi. } } }
on *:join:#vip:{
  if $read(vip.txt,w,$nick) { os raw svsmode $nick +W | msg $nick +W flagı aldınız. vs vs vs vs.. | amsg vip user $nick online }
}