Autor Tema: Tengo un remote que es anti repeticiones con advertencia  (Leído 2378 veces)

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado Dino

  • Novato
  • *
  • Mensajes: 34
  • Karma: +0/-36
Tengo un remote que es anti repeticiones con advertencia
« en: Enero 21, 2020, 04:57:33 am »
Tengo un remote que es anti repeticiones con advertencia y a la tercera da bankick.. pero no funciona me pueden corregir por favor

on @*:text:*:#: {
  if ($nick isreg #) { floodpesados }
}
alias floodpesados {
  inc -u2 $+(%,flood,.,$chan,.,txt,.,$nick)
  if $($+(%,flood,.,$chan,.,txt,.,$nick),2) >= 2 {
    inc -u800 $+(%,floodd,.,$chan,.,$nick) 
    if ($($+(%,floodd,.,$chan,.,$nick),2) = 1 ) { msg $chan 4AVISO12 $nick 1Porfavor no 44repita.11 Esta practica floodea el canal.  }
    if ($($+(%,floodd,.,$chan,.,$nick),2) = 2 ) { msg $chan $nick no repitas ultimo aviso }
    if ($($+(%,floodd,.,$chan,.,$nick),2) = 3 ) { Ban u120 $addres($nick,2) | kick $chan $nick Expulsado por repeticiones. }
  }
}

Desconectado rayco

  • Miembro Junior
  • **
  • Mensajes: 64
  • Karma: +1/-66
Re:Tengo un remote que es anti repeticiones con advertencia
« Respuesta #1 en: Enero 21, 2020, 02:25:03 pm »
Hola.

Cambia está línea:

Código: [Seleccionar]
if ($($+(%,floodd,.,$chan,.,$nick),2) = 3 ) { Ban u120 $addres($nick,2) | kick $chan $nick Expulsado por repeticiones. }
Por está línea:

Código: [Seleccionar]
if ($($+(%,floodd,.,$chan,.,$nick),2) = 3 ) { ban -u120 $chan $addres($nick,2) | kick $chan $nick Expulsado por repeticiones. }

Un saludo.

Desconectado Cadaver

  • Miembro Junior
  • **
  • Mensajes: 98
  • Karma: +137/-3
  • Sexo: Masculino
    • ElChatIRC.com
Re:Tengo un remote que es anti repeticiones con advertencia
« Respuesta #2 en: Enero 21, 2020, 04:53:04 pm »
No va a funcionar porque estas llamando un alias sin argumentos, puedes llamar el alias como { floodpesados $nick $chan } y cambias en el alias $nick por $1 y $chan por $2 ademas que tienes errores en la llamada de variables con $identificadores e incluso las variables mal escritas, también puedes eliminar el alias:

Código: [Seleccionar]
on *:TEXT:*:#: {
  if ($nick isreg $chan) && ($me isop $chan) {
    inc -u500 $+(%,flood,.,$chan,.,txt,.,$nick)
    if (%flood. [ $+ [ $chan ] $+ .txt. $+ [ $nick ] ] == 2) { msg $chan AVISO 1 }
    if (%flood. [ $+ [ $chan ] $+ .txt. $+ [ $nick ] ] == 3) { msg $chan AVISO 2 }
    if (%flood. [ $+ [ $chan ] $+ .txt. $+ [ $nick ] ] == 4) { ban -u120 $chan $address($nick,2) | kick $chan $nick Razon del KICK }
  }
}

Asi debe quedar funcional solo es cuestión de que modifiques el inc -u a tus necesidades ...
« última modificación: Enero 21, 2020, 05:18:26 pm por Cadaver »

Desconectado Dino

  • Novato
  • *
  • Mensajes: 34
  • Karma: +0/-36
Re:Tengo un remote que es anti repeticiones con advertencia
« Respuesta #3 en: Enero 22, 2020, 02:16:29 am »
Gracias amigos voy a probar  :)

Desconectado Dino

  • Novato
  • *
  • Mensajes: 34
  • Karma: +0/-36
Re:Tengo un remote que es anti repeticiones con advertencia
« Respuesta #4 en: Enero 22, 2020, 02:41:32 am »
No funciono ninguna sugerencia hice pruebas de ambas y no funciona

Desconectado MiLeNiUm

  • Novato
  • *
  • Mensajes: 7
  • Karma: +0/-12
  • Sexo: Masculino
  • CaEr EsTa PeRmItIdO lEvAnTaRsE eS oBLiGaToRiO
Re:Tengo un remote que es anti repeticiones con advertencia
« Respuesta #5 en: Enero 22, 2020, 03:55:02 am »
Buenas, yo uso este y funciona muy bien, espero que te sirva como a mi, saludos.  :)
Código: [Seleccionar]
#Repite on
on *:TEXT:*:%pral: {
  if ($ulevel >= 60) || ($ulevel >= 100) { halt }
  if ($ulevel < 100) {
    if ($nick !isop $chan) && ($nick isvo $chan) && ($me isop $chan) { return }
    if (%NickRepite. [ $+ [ $nick ] ] == $null) { set -u300 %NickRepite. [ $+ [ $nick ] ] 0 $1- }
    else if (%NickRepite. [ $+ [ $nick ] ] != $null) {
      if ($gettok(%NickRepite. [ $+ [ $nick ] ],1,32) == 0) && ($gettok(%NickRepite. [ $+ [ $nick ] ],2-,32) == $1-) {
        PRIVmsg $chan 2 $+ $nick $+  12--> 2Por favor, 4No repita. 2Con una vez ya le leemos. 12(1er Aviso)
        PRIVmsg %ops 2Avisando a 1 $+ $nick $+  2de que no repita una frase o texto. 12[1]
        set -u1200 %NickRepite. [ $+ [ $nick ] ] $calc($gettok(%NickRepite. [ $+ [ $nick ] ],1,32) + 1) $gettok(%NickRepite. [ $+ [ $nick ] ],2-,32)
        return
      }
      else if ($gettok(%NickRepite. [ $+ [ $nick ] ],1,32) == 1) && ($gettok(%NickRepite. [ $+ [ $nick ] ],2-,32) == $1-) {
        msg $chan 2 $+ $nick $+  12--> 2Por favor, 4No repita. 2Con una vez ya le leemos. 12(2ndo Aviso)
        PRIVmsg %ops 2Avisando a 1 $+ $nick $+  2de que no repita una frase o texto. 12[2]   
        set -u1200 %NickRepite. [ $+ [ $nick ] ] $calc($gettok(%NickRepite. [ $+ [ $nick ] ],1,32) + 1) $gettok(%NickRepite. [ $+ [ $nick ] ],2-,32)
        return
      }   
      else if ($gettok(%NickRepite. [ $+ [ $nick ] ],1,32) == 2) && ($gettok(%NickRepite. [ $+ [ $nick ] ],2-,32) == $1-) {
        PRIVmsg $nick 4Se le Advirtío De que no Repitiera. Esta práctica molesta a los demas usuarios del canal, gracias y hasta pronto.
        ban -u1800 $chan $address($nick,2)
        kick $chan $nick Repetir una frase o una idea es molesto para el canal, con una vez ya le leemos.
        unset %NickRepite. [ $+ [ $nick ] ]
      }
      else {
        set -u300 %NickRepite. [ $+ [ $nick ] ] 0 $1-
      }
    }
  }
}
#Repite end

Desconectado Cadaver

  • Miembro Junior
  • **
  • Mensajes: 98
  • Karma: +137/-3
  • Sexo: Masculino
    • ElChatIRC.com
Re:Tengo un remote que es anti repeticiones con advertencia
« Respuesta #6 en: Enero 22, 2020, 06:03:07 pm »
Si funciona, tienes que revisar que no tengas varios eventos on TEXT en el mismo archivo o incluso si hay muchos eventos del mismo tipo en diferentes archivos suele ocasionar problemas:

Citar
 10:58:28  (Hugo): .
 10:58:30  (Hugo): .
 10:58:30  (@Cadaver): AVISO 1
 10:58:33  (Hugo): .
 10:58:33  (@Cadaver): AVISO 2
 10:58:34  (Hugo): .
 10:58:35  ••• mode (@Cadaver) sets: '+b *!*@Hugo.Sa.nchez.MX'
 10:58:35  ••• kick (Hugo) (Futbol@Hugo.Sa.nchez.MX) [#ElChatIRC] by (@Cadaver) (Razon del KICK)

Vuelvo a copiar el código solo con otra modificación:

Código: [Seleccionar]
on *:TEXT:*:#: {
  if ($nick isreg $chan) && ($me isop $chan) {
    inc -u500 $+(%,flood.,$chan,.txt.,$nick)
    if (%flood. [ $+ [ $chan ] $+ .txt. $+ [ $nick ] ] == 2) { msg $chan AVISO 1 }
    if (%flood. [ $+ [ $chan ] $+ .txt. $+ [ $nick ] ] == 3) { msg $chan AVISO 2 }
    if (%flood. [ $+ [ $chan ] $+ .txt. $+ [ $nick ] ] == 4) { ban -u120 $chan $address($nick,2) | kick $chan $nick Razon del KICK | unset $+(%,flood.,$chan,.txt.,$nick) }
  }
}

Desconectado Dino

  • Novato
  • *
  • Mensajes: 34
  • Karma: +0/-36
Re:Tengo un remote que es anti repeticiones con advertencia
« Respuesta #7 en: Enero 24, 2020, 07:20:49 am »
gracias a los dos por la ayuda MiLeNiUm2 y cadaver
el codigo de cadaver funciona pero tiene un fallo que cuando cambio de frase en la tercera vez igual me banea deberia parar el ban pero no sigue la secuencia.
en relacion del codigo de MiLeNiUm2 funciona de maravilla lo prove y si funciona a la perfeccion gracias a los dos por su tiempo.

Desconectado Dino

  • Novato
  • *
  • Mensajes: 34
  • Karma: +0/-36
Re:Tengo un remote que es anti repeticiones con advertencia
« Respuesta #8 en: Febrero 01, 2020, 05:43:56 am »
me sucedio el mismo detalle funciona bien pero cuando repito la misma frase en otro canal ya me lanza la segunda advertencia y no empieza desde cero..
Código: [Seleccionar]
#Repite on
on *:TEXT:*:%pral: {
  if ($ulevel >= 60) || ($ulevel >= 100) { halt }
  if ($ulevel < 100) {
    if ($nick !isop $chan) && ($nick isvo $chan) && ($me isop $chan) { return }
    if (%NickRepite. [ $+ [ $nick ] ] == $null) { set -u300 %NickRepite. [ $+ [ $nick ] ] 0 $1- }
    else if (%NickRepite. [ $+ [ $nick ] ] != $null) {
      if ($gettok(%NickRepite. [ $+ [ $nick ] ],1,32) == 0) && ($gettok(%NickRepite. [ $+ [ $nick ] ],2-,32) == $1-) {
        PRIVmsg $chan 2 $+ $nick $+  12--> 2Por favor, 4No repita. 2Con una vez ya le leemos. 12(1er Aviso)
        PRIVmsg %ops 2Avisando a 1 $+ $nick $+  2de que no repita una frase o texto. 12[1]
        set -u1200 %NickRepite. [ $+ [ $nick ] ] $calc($gettok(%NickRepite. [ $+ [ $nick ] ],1,32) + 1) $gettok(%NickRepite. [ $+ [ $nick ] ],2-,32)
        return
      }
      else if ($gettok(%NickRepite. [ $+ [ $nick ] ],1,32) == 1) && ($gettok(%NickRepite. [ $+ [ $nick ] ],2-,32) == $1-) {
        msg $chan 2 $+ $nick $+  12--> 2Por favor, 4No repita. 2Con una vez ya le leemos. 12(2ndo Aviso)
        PRIVmsg %ops 2Avisando a 1 $+ $nick $+  2de que no repita una frase o texto. 12[2]   
        set -u1200 %NickRepite. [ $+ [ $nick ] ] $calc($gettok(%NickRepite. [ $+ [ $nick ] ],1,32) + 1) $gettok(%NickRepite. [ $+ [ $nick ] ],2-,32)
        return
      }   
      else if ($gettok(%NickRepite. [ $+ [ $nick ] ],1,32) == 2) && ($gettok(%NickRepite. [ $+ [ $nick ] ],2-,32) == $1-) {
        PRIVmsg $nick 4Se le Advirtío De que no Repitiera. Esta práctica molesta a los demas usuarios del canal, gracias y hasta pronto.
        ban -u1800 $chan $address($nick,2)
        kick $chan $nick Repetir una frase o una idea es molesto para el canal, con una vez ya le leemos.
        unset %NickRepite. [ $+ [ $nick ] ]
      }
      else {
        set -u300 %NickRepite. [ $+ [ $nick ] ] 0 $1-
      }
    }
  }
}
#Repite end
alguien porfa que me ayude a agregar la variante canal para que asi las advertencias sean independientes una y de otra
ejemplo si en #lumm repito una frase y la misma frase la repito en #caps me lanza directo a la segunda advertencia y en #caps
deberia empezar de nuevo... gracias

Desconectado Quetzalcoatl

  • Miembro de pleno derecho
  • ***
  • Mensajes: 162
  • Karma: +228/-2
  • HipercomputoHipermegared
    • elchatirc
Re:Tengo un remote que es anti repeticiones con advertencia
« Respuesta #9 en: Febrero 01, 2020, 05:55:41 am »
usa la misma variante que usaste en el codigo de antimayusculas
%_cuenta. [ $+ [ $+($nick,.,$chan) ] ]
solo modificas la creacion de la variable
en este caso originalmente la tienes como :
Citar
%NickRepite. [ $+ [ $nick ] ]
te quedaria como :
Citar
%NickRepite. [ $+ [ $+($nick,.,$chan) ] ]
por lo tanto quedara algo como............
Código: [Seleccionar]
#Repite on
on *:TEXT:*:%pral: {
  if ($ulevel >= 60) || ($ulevel >= 100) { halt }
  if ($ulevel < 100) {
    if ($nick !isop $chan) && ($nick isvo $chan) && ($me isop $chan) { return }
    if (%NickRepite. [ $+ [ $+($nick,.,$chan) ] ] == $null) { set -u300 %NickRepite. [ $+ [ $+($nick,.,$chan) ] ] 0 $1- }
    else if (%NickRepite. [ $+ [ $+($nick,.,$chan) ] ] != $null) {
      if ($gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],1,32) == 0) && ($gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],2-,32) == $1-) {
        PRIVmsg $chan 2 $+ $nick $+  12--> 2Por favor, 4No repita. 2Con una vez ya le leemos. 12(1er Aviso)
        PRIVmsg %ops 2Avisando a 1 $+ $nick $+  2de que no repita una frase o texto. 12[1]
        set -u1200 %NickRepite. [ $+ [ $+($nick,.,$chan) ] ] $calc($gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],1,32) + 1) $gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],2-,32)
        return
      }
      else if ($gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],1,32) == 1) && ($gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],2-,32) == $1-) {
        msg $chan 2 $+ $nick $+  12--> 2Por favor, 4No repita. 2Con una vez ya le leemos. 12(2ndo Aviso)
        PRIVmsg %ops 2Avisando a 1 $+ $nick $+  2de que no repita una frase o texto. 12[2]   
        set -u1200 %NickRepite. [ $+ [ $+($nick,.,$chan) ] ] $calc($gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],1,32) + 1) $gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],2-,32)
        return
      }   
      else if ($gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],1,32) == 2) && ($gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],2-,32) == $1-) {
        PRIVmsg $nick 4Se le Advirtío De que no Repitiera. Esta práctica molesta a los demas usuarios del canal, gracias y hasta pronto.
        ban -u1800 $chan $address($nick,2)
        kick $chan $nick Repetir una frase o una idea es molesto para el canal, con una vez ya le leemos.
        unset %NickRepite. [ $+ [ $+($nick,.,$chan) ] ]
      }
      else {
        set -u300 %NickRepite. [ $+ [ $+($nick,.,$chan) ] ] 0 $1-
      }
    }
  }
}
#Repite end

No he probado el código, pero intenta haber si es lo que requieres.

Saludos

Desconectado Dino

  • Novato
  • *
  • Mensajes: 34
  • Karma: +0/-36
Re:Tengo un remote que es anti repeticiones con advertencia
« Respuesta #10 en: Febrero 01, 2020, 06:28:56 am »
funciono de maravilla
pero encontre otro detalle que no funciona

Desconectado Dino

  • Novato
  • *
  • Mensajes: 34
  • Karma: +0/-36
Re:Tengo un remote que es anti repeticiones con advertencia
« Respuesta #11 en: Febrero 01, 2020, 06:33:13 am »
<master> heyyyy
<master> heyyyy
<@JetLee> master ==>> Por favor, No repitas Con una vez ya le leemos. (1er Aviso) <<==
<master> heyyyy
<@JetLee> master ==>> Calmate, trata de escribir todo en una sola linea por favor. (2do Aviso) <<==
<master> yaaa
<master> heyyyyy
<master> heyyyyy
<@JetLee> master ==>> Por favor, No repitas Con una vez ya le leemos. (1er Aviso) <<==

si digo la frase dos veces me advierte pero si meto una frase que no esta repetida y luego vuelvo a repetir la anterior frase no castiga
y el conteo empieza desde cero...
el detalle es que al repetir en la tercera vez pero intercalado con una frase la secuencia deberia de continuar y aplicar el castigo cosa que no lo hace.. se puede solucionar ese detalle??

Desconectado Quetzalcoatl

  • Miembro de pleno derecho
  • ***
  • Mensajes: 162
  • Karma: +228/-2
  • HipercomputoHipermegared
    • elchatirc
Re:Tengo un remote que es anti repeticiones con advertencia
« Respuesta #12 en: Febrero 02, 2020, 09:45:21 pm »
no es propiamente un detalle que no funciona, más bien así esta hecho el código que funcione, cuando se repite una frase seguida y por ello reinicia los valores en las advertencia sin son diferente los textos de la linea previa a la ultima.

funciono de maravilla
pero encontre otro detalle que no funciona.

Lo que se puede hacer es crear una variable independiente que cuente si ha sido advertido por las repeticiones, y que esta variable sea temporal, y mantenga este valor por 5 min, después de eso desaparecerá.

Código: [Seleccionar]
#Repite on
on *:TEXT:*:%pral: {
  if ($ulevel >= 60) || ($ulevel >= 100) { halt }
  if ($ulevel < 100) {
    if ($nick !isop $chan) && ($nick isvo $chan) && ($me isop $chan) { return }
    if (%NickRepite. [ $+ [ $+($nick,.,$chan) ] ] == $null) { set -u300 %NickRepite. [ $+ [ $+($nick,.,$chan) ] ] 0 $1- }
    else if (%NickRepite. [ $+ [ $+($nick,.,$chan) ] ] != $null) { var %advertido = %NickRepite.Advertido. [ $+ [ $+($nick,.,$chan) ] ]
    ;----Si el usuario no ha sido advertido se crea una variable individual de lo contrario incrementa y va una advertencia definida.
    if (!%advertido) { set -u300 %NickRepite.Advertido. [ $+ [ $+($nick,.,$chan) ] ] 1 }
else { set -u300 %NickRepite.Advertido. [ $+ [ $+($nick,.,$chan) ] ] $calc(%advertido +1) | goto $calc(%advertido +1) }
    ;---- fin de la  manipulacin de la variable de advertencia
      if ($gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],1,32) == 0) && ($gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],2-,32) == $1-) {
        PRIVmsg $chan 2 $+ $nick $+  12--> 2Por favor, 4No repita. 2Con una vez ya le leemos. 12(1er Aviso)
        PRIVmsg %ops 2Avisando a 1 $+ $nick $+  2de que no repita una frase o texto. 12[1]
        set -u1200 %NickRepite. [ $+ [ $+($nick,.,$chan) ] ] $calc($gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],1,32) + 1) $gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],2-,32)
        return
      }
      else if ($gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],1,32) == 1) && ($gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],2-,32) == $1-) {
        :2 | msg $chan 2 $+ $nick $+  12--> 2Por favor, 4No repita. 2Con una vez ya le leemos. 12(2ndo Aviso)
        PRIVmsg %ops 2Avisando a 1 $+ $nick $+  2de que no repita una frase o texto. 12[2]   
        set -u1200 %NickRepite. [ $+ [ $+($nick,.,$chan) ] ] $calc($gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],1,32) + 1) $gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],2-,32)
        return
      }
      else if ($gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],1,32) == 2) && ($gettok(%NickRepite. [ $+ [ $+($nick,.,$chan) ] ],2-,32) == $1-) {
       :3 | PRIVmsg $nick 4Se le Advirtío De que no Repitiera. Esta práctica molesta a los demas usuarios del canal, gracias y hasta pronto.
        ban -u1800 $chan $address($nick,2)
        kick $chan $nick Repetir una frase o una idea es molesto para el canal, con una vez ya le leemos.
        unset %NickRepite. [ $+ [ $+($nick,.,$chan) ] ]
      }
      else {
        set -u300 %NickRepite. [ $+ [ $+($nick,.,$chan) ] ] 0 $1-
      }
    }
  }
}
#Repite end

Solo se agregaron dos lineas de código y otras dos de anotaciones, no he probado el código, pero en teoría te debería funcionar

Saludos.

Desconectado MiLeNiUm

  • Novato
  • *
  • Mensajes: 7
  • Karma: +0/-12
  • Sexo: Masculino
  • CaEr EsTa PeRmItIdO lEvAnTaRsE eS oBLiGaToRiO
Re:Tengo un remote que es anti repeticiones con advertencia
« Respuesta #13 en: Febrero 03, 2020, 03:01:20 am »
el codigo que puse lo ajuste a una sola sala, de ahi la variable %pral y los level es para que "ignore" a los usarios que de nivel tenga 60 o mas o 100, quien tenga menos de ese nivel (en el bot), seria expulsado por repeticiones.

Desconectado Dino

  • Novato
  • *
  • Mensajes: 34
  • Karma: +0/-36
Re:Tengo un remote que es anti repeticiones con advertencia
« Respuesta #14 en: Febrero 06, 2020, 08:26:42 pm »
use el que modifico Quetzalcoatl y dejo de funcioanar no advierte no banea ...   :-\