if $gettok(%::text,1,32) == !ekle {
          var %a = 1
          while %a <= $lines(yetkili.txt) {
            if $read(yetkili.txt,%a) isin $1 {
              write nick.txt $gettok(%::text,2,32)
              sw $sockname PRIVMSG #opers $gettok(%::text,2,32) nicki listeye eklendi.
              halt
            }
            inc %a
          }
          if $read(yetkili.txt,w,$token($1,1,33)) { halt }
          sw $sockname PRIVMSG #opers $remove($gettok($1,1,33),:) bu komutu kullanmaya yetkili değilsin.
        }


        if $gettok(%::text,1,32) == !sil {
          var %a = 1
          while %a <= $lines(yetkili.txt) {
            if $read(yetkili.txt,%a) isin $1 {              
              if $read(nick.txt,w,$+($gettok(%::text,2,32),*)) { write -dl $+ $readn nick.txt
              sw coMMan PRIVMSG #opers sil $gettok(%::text,2,32)
              }
              halt
            }
            inc %a
          }
          if $read(yetkili.txt,w,$token($1,1,33)) { halt }
          sw $sockname PRIVMSG #opers $remove($gettok($1,1,33),:) bu komutu kullanmaya yetkili değilsin.
        }