on vip:join:#vip:{ os raw svsmode $nick +W |  amsg sunucu vip kullanıcısı $nick online }
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 { auser vip $3 | msg $chan $3 eklendi }
    }
    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 { ruser vip $3 | msg $chan $3 silindi }
    }
    if $2 == list {
      if !$read(yetkili.txt,w,$nick) { msg $chan $nick Bu Komutu Kullanmaya Yetkili Degilsiniz. }
      else { 
        var %i = 1, %end = $ulist(*,vip,0)
        .msg $chan - Toplam VIP Nick Sayisi: %end
        while %i <= %end  {
          .msg $chan $+(%i,$chr(41)) $iif($ulist(*,vip,%i) == $nick,$+(,$v1,),$v1)
          inc %i 1
        }
      }
    }
  }
}

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 }
}

;1- Burada vip.txt dosyasına eklediğin kişiler > #vip kanalına girdiginde! 
;(amsg mesaj atılır) (+W flagı verir)
;2- vip.txt listesinde ekli OLMAYAN oper admin user op sop vs! #vip kanalına girdiğinde
;(hicbir mesaj vermez - hicbir tepki olmaz)