on *:text:*:#:{
  if !Aopekle* iswm $1- {  
    if $read(Aoplar.txt,w,$2-) { 
      .msg $chan $2 Listede Mevcut
    } 
    else { 
      write Aoplar.txt $2- 
      .msg $chan $2 eklendi 
    } 
  } 
  if !Aopsil* iswm $1- {
    if !$read(Aoplar.txt,w,$2-) { 
      msg $chan $2 Listede yok 
    } 
    else { 
      write $+(-,dw,$2-) Aoplar.txt 
      msg $chan $2 Silindi 
    }
  }
  if !Aoplist* iswm $1- { 
    msg # 4 Aop Listesi
    play # aoplar.txt 300
  }
  if !Sopekle* iswm $1- {
    if $read(Soplar.txt,w,$2-) { 
      .msg $chan $2 Listede Mevcut
    } 
    else { 
      write Soplar.txt $2- 
      .msg $chan $2 eklendi 
    } 
  } 
  if !Sopsil* iswm $1- {
    if !$read(Soplar.txt,w,$2-) { 
      msg $chan $2 Listede yok 
    } 
    else { 
      write $+(-,dw,$2-) Soplar.txt 
      msg $chan $2 Silindi 
    }
  }
  if !Soplist* iswm $1- { 
    msg # 4 Sop Listesi
    play # Soplar.txt 300
  }
  if !Halfopekle* iswm $1- {
    if $read(Halfoplar.txt,w,$2-) { 
      .msg $chan $2 Listede Mevcut
    } 
    else { 
      write Halfoplar.txt $2- 
      .msg $chan $2 eklendi 
    } 
  } 
  if !Halfopsil* iswm $1- {
    if !$read(Halfoplar.txt,w,$2-) { 
      msg $chan $2 Listede yok 
    } 
    else { 
      write $+(-,dw,$2-) Halfoplar.txt 
      msg $chan $2 Silindi 
    } 
  }
  if !Halfoplist* iswm $1- { 
    msg # 4 Halfop Listesi
    play # Halfoplar.txt 300
  }
}