on *:text:*:?: { 

  if $1 == !soz && $3 {

    var %ufuk $replace($2-,$chr(32),+)

    var %senyor $rand(101,9999)

    hadd -m soz %senyor uk 

    msg #Opers 4 $replace($hget(soz,%senyor),+,$chr(32)) 1Sözü Onay Listesine Alindi. Bu Sözü Onaylamak İçin4 !onay %senyor 1Yaziniz.

  }

}

on *:text:*:#: { 

  if $chan == #opers { 

    if $1 == !silsoz && $2 { 

      if $hget(soz,$2) {

        msg #Opers 4 $2 1Kod Numaralı4 $replace($hget(soz,$2),+,$chr(32)) 1Sözü İsteğiniz Üzere 4Silinmiştir

        hdel -s soz $2 

      }

    }

    if $1 == !listeleonayli && !$2 { 

      var %i 1 

      while %i <= $lines(onaylisoz.txt) { 

        msg # $read(onaylisoz.txt,%i)

        inc %i

      }

    }

    if $1 == !listelesoz && !$2 { 

      var %i 1 

      while %i <= $hmatch(soz,*,*) { 

        msg #Opers 4Söz:10 $replace($hget(soz,$hmatch(soz,*,%i)),+,$chr(32)) 7Onay Kodu:12 $hmatch(soz,*,%i)

        inc %i

      }

    }

    if $1 == !onay && $2 {

      if $hget(soz,$2) { 

        write onaylisoz.txt $replace($hget(soz,$2),+,$chr(32)) | msg #Opers 4 $replace($hget(soz,$2),+,$chr(32)) 1Sözü Onaylanmiştir.

        hdel soz $2 

      }

    }

  }

  if $1 == !soz && $2 { 

    msg # 4 $2 -->12 $read(onaylisoz.txt)

  }

}