Autor Tema: duda sobre anticolores de ircap  (Leído 4155 veces)

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

Desconectado Diablo

  • Novato
  • *
  • Mensajes: 24
  • Karma: +2/-190
Re:duda sobre anticolores de ircap
« Respuesta #15 en: Enero 17, 2020, 11:40:17 am »
Banea  por WEB e IRCAP los colores y no  el nick completion de IRCAP

Programa Baneo por colores                     
  Con la ayuda de  Quetzalcoatl y Cadaver preparado por Diablo 
  Mi agradecimiento , porque sin los cuales , no habria sido capaz terminar
 Eso si jajajajaja, me las habeis hecho pasar moradas , vosotros sabeis yo practicamente nada

Código: [Seleccionar]
on 1:text:*:#: {
 var %a 1, %b $2 | while ($gettok(%b,%a,32)) { inc %a
if ($chr(3) isin $1-) { msg # $nick No use texto con COLORES estan prohibidos en #  | Ban -u600 $chan $address($nick,2) | kick $chan $nick }
  }
 }

Bueno pues eso muchas gracias y  a partir de aqui imaginacion
Yo le he hechado mucha , ya lo tengo  preparado para 4 canales con contador
No lo pongo entero , por que yo asi he aprendido , haciendolo error , acierto y al final salio , pero ya , con una base para empezar , que yo no la tenia


Desconectado Quetzalcoatl

  • Miembro de pleno derecho
  • ***
  • Mensajes: 162
  • Karma: +228/-2
  • HipercomputoHipermegared
    • elchatirc
Re:duda sobre anticolores de ircap
« Respuesta #16 en: Febrero 17, 2020, 07:36:29 pm »
Hola que tal Diablo

No había podido responder este post, por que por cuestiones laborales me ocupe y cuando regrese a leer el foro ya había otros post mas recientes.
Acabo de ver el código mas reciente y noto que evalúas si se usa color a partir de la segunda palabra de la frases(supongo para evitar lo del nickcompletation) y sanciona después si se vuelve insertar el carácter de color, por lo tanto si alguien escribe con color en la primera palabra de la frase este no sera sancionado.

lo mas simple es como te lo puso Cadaver, así que resumiré esto  ;D
Código de detección simple, solo mensaje
Código: [Seleccionar]
on 1:text:*:#canal: {
if ( $chr(3) isin $1- ) {  .msg $chan $nick --> esta Baneado : no use TEXTO CON COLORES!
}
}
Codigo que evalua el cambio de color en cada palabra de una frase
Código: [Seleccionar]
on 1:text:*:#: {
 var %a 1, %msg No use texto con COLORES estan prohibidos en $remove($chan,$chr(35))
 while ($gettok($1-,%a,32)) {
  if ($chr(3) isin $v1) { msg $chan $nick %msg | Ban -ku600 $chan $nick 2 %msg | return } | inc %a
 }
}
*NOTA: si se requiere que se evalué después de la segunda palabra cambiar el $1- por $2-

Lo mismo que el anterior, pero con advertencias si el usuario no hace caso se le advierte y sanciona después del segundo aviso y al tercero aviso patea(obviamente después de que la sanción del 2do aviso concluya)
Código: [Seleccionar]
on 1:text:*:#: {
  if (($me !isop $chan) || ($nick isop $chan) || ($nick isvoice $chan) ) { return }
  if (($sinNC($1) ison $chan) && ($chr(3) !isin $2-)) { return }
  var %quien $+(NoColor,~,$nick,~,$chan)
  set -u300 % [ $+ [ %quien ] ] $iif(% [ $+ [ %quien ] ],$calc($v1 +1), 1)
  if (1 == % [ $+ [ %quien ] ]) { msg $chan No uses colores en su texto $+($nick,.) Aviso $v2 }
  if (2 == % [ $+ [ %quien ] ]) { msg $chan No uses colores en su texto $nick Aviso $v2 | ban -u120 $chan  $address($nick,2) }
  if (3 == % [ $+ [ %quien ] ]) { ban -ku3600 $chan $nick 2 Se le advirtio de que no deberia usar colores en $chan }
}
alias -l sinNC { var %a 1, %b | tokenize 32 $remove($1,$chr(91),$chr(92),$chr(45)) | while ($mid($strip($1),%a,1)) { if ($v1 isalnum) { %b =  $+(%b,$v1) } | inc %a } | return %b }

el control esta dado por
if (($sinNC($1) ison $chan) && ($chr(3) !isin $2-)) { return }
Donde usa una alias llamado sinNC el cual depura que contenga caracteres raros la palabra y solo permite los alfanbumericos y si esa palabra es un nick en el canal y no hay una inserción del carácter en el color en el canal, entonces no hace nada, de lo contrario entra en el proceso.

Saludos.
PD: Probado en mirc version 7.57 en otras versiones posteriores ignoro si funcione se tendría que verificar que el operador logico isalnum este incluido en esa version
PD2: en repuesta a http://foroircap.org/ayuda-scripting-ircap/un-codigo-que-no-me-funciona/msg7297/#msg7297
« última modificación: Febrero 17, 2020, 07:45:23 pm por Quetzalcoatl »

Desconectado Novatisima

  • Novato
  • *
  • Mensajes: 19
  • Karma: +6/-9
  • Sexo: Femenino
Re:duda sobre anticolores de ircap
« Respuesta #17 en: Febrero 19, 2020, 12:04:08 pm »
 Hola Quetzalcoatl

He hecho como pones en la nota cambiar el $1-  por el $2- y se si lo hare mal pero no va bien

Despues he probado  el segundo que pones
Tampoco me ha ido bien ya que los dos de entrada  explusan las frases sin color bueno este segundo cuando ha explusado 3 veces ya no expulsa nada

Como dices que lo has probado con mirc 7.57 y yo no tengo ni diea de que version tengo he descargado y pagado mirc 7.57 me lo han instalado con un ircap 8.72 y los fallos son los mismos
Yo no se si se podra hacer pero si se podria estaria muy agradecida

Que mas quisiera yo que ser como ella

Desconectado Quetzalcoatl

  • Miembro de pleno derecho
  • ***
  • Mensajes: 162
  • Karma: +228/-2
  • HipercomputoHipermegared
    • elchatirc
Re:duda sobre anticolores de ircap
« Respuesta #18 en: Febrero 19, 2020, 06:00:43 pm »
Ya veo, lo que creo que este pasando es que el ban ha sido removido de manera manual y no expiro después de los 5 minutos. Es por eso eso que el contador de sanción se sigue incrementando, si es así solo bastaría que agregar un if cuando llegue a cuatro para hacer un decremento o en su defecto colocar el valor a 2 cuando se da el ban.
una ves dicho esto entonces me gustaría saber ¿El ban fue removido de manera manual antes de que expirara?

Saludos.

pd: Escribir con color negro también utiliza el carácter de color 2. Si se van a hacer pruebas es bueno usar //msg #elcanal el mensaje(opcional el uso de colores)
« última modificación: Febrero 19, 2020, 06:17:35 pm por Quetzalcoatl »

Desconectado Novatisima

  • Novato
  • *
  • Mensajes: 19
  • Karma: +6/-9
  • Sexo: Femenino
Re:duda sobre anticolores de ircap
« Respuesta #19 en: Febrero 20, 2020, 05:52:38 pm »

Buenas Quetzalcoatl

Prece que ves lo que hago ja ja ja  y si tienes razon  no esperaba  al tiempo y le quitaba el ban antes de su tiempo tal vez este asi bien

Pero poniendo esto //msg #canaldeprueba "te llamara al telefonillo pa decir que subo"  lo banea igual

lo mismo que  //msg #canaldeprueba Nickcompletion "te llamara al telefonillo pa decir que subo"  bueno que lo expulsa todo

Por lo que noto parece muy complicado menos mal que lo haces que sino  para mi imposible . Gracias
Que mas quisiera yo que ser como ella

Desconectado Quetzalcoatl

  • Miembro de pleno derecho
  • ***
  • Mensajes: 162
  • Karma: +228/-2
  • HipercomputoHipermegared
    • elchatirc
Re:duda sobre anticolores de ircap
« Respuesta #20 en: Febrero 20, 2020, 11:05:11 pm »
Hola Novatisima

Revise lo que mencionas y tienes razón, le di un acomodo a los if's, por favor revisalo y comentas por favor si ha funcionado.
Código: [Seleccionar]
on 1:text:*:#: {
  if ($chr(3) !isin $1-) { return }
  if ( ($me !isop $chan) || ($nick isop $chan) || ($nick isvoice $chan) || ($sinNC($1) ison $chan) ) { $iif($chr(3) !isin $2-,return) }
  var %quien $+(NoColor,~,$nick,~,$chan)
  set -u300 % [ $+ [ %quien ] ] $iif(% [ $+ [ %quien ] ],$calc($v1 +1), 1)
  if (1 == % [ $+ [ %quien ] ]) { msg $chan No uses colores en su texto $+($nick,.) Aviso $v2 }
  if (2 == % [ $+ [ %quien ] ]) { msg $chan No uses colores en su texto $+($nick,.) Aviso $v2 | ban -u120 $chan $address($nick,2) }
  if (3 == % [ $+ [ %quien ] ]) { ban -ku3600 $chan $nick 2 Se le advirtio de que no deberia usar colores en $chan }
}

alias -l sinNC { var %a 1, %b | tokenize 32 $remove($1,$chr(91),$chr(92),$chr(45)) | while ($mid($strip($1),%a,1)) { if ($v1 isalnum) { %b =  $+(%b,$v1) } | inc %a } | return %b }

Saludos
« última modificación: Febrero 20, 2020, 11:39:33 pm por Quetzalcoatl »

Desconectado Novatisima

  • Novato
  • *
  • Mensajes: 19
  • Karma: +6/-9
  • Sexo: Femenino
Re:duda sobre anticolores de ircap
« Respuesta #21 en: Febrero 21, 2020, 08:07:44 pm »

Hola Quetzalcoatl

 Si pongo //msg #canaldeprueba Nick "te llamara al telefonillo pa decir que subo"  esto no expulsa si la frase esta sin color
si solo es //msg #canaldeprueba Nick  tampoco lo expulsa  y //msg #canaldeprueba "te llamara al telefonillo pa decir que subo" tampoco expulsa

Siendo //msg #canaldeprueba Nick "te llamara al telefonillo pa decir que subo" con color si expulsa si es //msg #canaldeprueba "te llamara al telefonillo pa decir que subo" si expulsa con color

Pero en el uso normal que no se pone //msg #canalprueba   espulsa todo menos "te llamara al telefonillo pa decir que subo" sin color

Madre mia  si que es complicado  por que  leo lo que me pones  y me parece chino
Que mas quisiera yo que ser como ella

Desconectado Quetzalcoatl

  • Miembro de pleno derecho
  • ***
  • Mensajes: 162
  • Karma: +228/-2
  • HipercomputoHipermegared
    • elchatirc
Re:duda sobre anticolores de ircap
« Respuesta #22 en: Febrero 21, 2020, 10:27:47 pm »
no entendi nada  ???
pero expulsa cuando la frase tiene color(excepto si la primera palabra es un nick en el canal)
y no expulsa cuando se nombra al nick con colores al inicio de la frase(excepto si en la frase se vuelve a usar color).

Desconectado Novatisima

  • Novato
  • *
  • Mensajes: 19
  • Karma: +6/-9
  • Sexo: Femenino
Re:duda sobre anticolores de ircap
« Respuesta #23 en: Febrero 21, 2020, 11:32:09 pm »

Quetzalcoatl

ja ja ja  no me estraña por que me explico fatal

En concreto  usando lo de //msg #canaldeprueba cuando es con color si expulsa y si es sin color no  ( osea que va bien )

Pero cuando se escribe normal en un canal que no se pone //msg #canaldeprueba no funciona bien  lo unico que no banea es  a "te llamara al telefonillo pa decir que subo" sin color lo demas si expulsa

 Y perdon perdon perdon  pero me pongo nerviosa y no atino a explicarme y ante todo gracias Quetzalcoatl
Que mas quisiera yo que ser como ella

Desconectado Quetzalcoatl

  • Miembro de pleno derecho
  • ***
  • Mensajes: 162
  • Karma: +228/-2
  • HipercomputoHipermegared
    • elchatirc
Re:duda sobre anticolores de ircap
« Respuesta #24 en: Febrero 22, 2020, 01:06:26 am »
Muy bien creo que ya entendí, lo que creo que puede estar pasando es que otro script tengas un evento similar que alguna palabra en si este dándole un halted, por eso ya no se ejecutaría, pero es bueno saber que ya quedo todo  :)

Saludos

PD1: Diablo, ya puedes cerrar el tema  8)
PD2: Gracias Novatisima, por hacer las pruebas.

Desconectado Novatisima

  • Novato
  • *
  • Mensajes: 19
  • Karma: +6/-9
  • Sexo: Femenino
Re:duda sobre anticolores de ircap
« Respuesta #25 en: Febrero 22, 2020, 11:13:07 pm »
Quetzalcoatl hola  ves como me explico mal ?

Si se escribe en el canal normalmente  [19:27] > te llamara al telefonillo pa decir que subo  (el texto esta sin colores no lo expulsa )

Pero todo lo demas formas SI

[19:27] > [Novatisima]  te llamara al telefonillo pa decir que subo   (el texto esta sin colores y Si lo expulsa)
[19:27] <@Novatisima> No uses colores en su texto nick23. Aviso 1

Pero solo funciona como debe si es como me explicaste //msg #canaldeprueba   pero asi podria escribir yo pero los demas usuarios va ser que no escriban asi

Lo siento pero no se explicarme mejor

Estoy probandolo con el  mirc 7.57 y no tiene mas que el script este lo demas esta segun viene   . Gracias
Que mas quisiera yo que ser como ella

Desconectado Quetzalcoatl

  • Miembro de pleno derecho
  • ***
  • Mensajes: 162
  • Karma: +228/-2
  • HipercomputoHipermegared
    • elchatirc
Re:duda sobre anticolores de ircap
« Respuesta #26 en: Febrero 23, 2020, 04:44:30 am »
Novatisima te mando captura de la prueba que realice :

con lo que dices de:
Citar
Pero solo funciona como debe si es como me explicaste //msg #canaldeprueba   pero asi podria escribir yo pero los demas usuarios va ser que no escriban asi
Es solo para que hicieras pruebas con los colores, obviamente los usuarios escribirían normal, no se si me explico

Desconectado Novatisima

  • Novato
  • *
  • Mensajes: 19
  • Karma: +6/-9
  • Sexo: Femenino
Re:duda sobre anticolores de ircap
« Respuesta #27 en: Febrero 23, 2020, 05:42:26 pm »
Quetzalcoatl caballero solo puedo pedirle perdon y le explico

Hoy le he dedicado  toda mi atencion y se lo que me paso 

Ayer  tuve abierto el ircap con mirc 7.57 pero el otro era el antiguo y lo debi hacer al reves enviando con el 7.57 y comprobando con el antiguo

Hoy he probado con los dos y he visto que FUNCIONA PERFECTAMENTE con mirc 7.57 pero no con el anterior que yo tenia de ahi mi enorme error  cosa que pienso es de ser tan nerviosa y algo alocada ademas de estar en el trabajo y hoy de fiesta

Asi que caballero me inclino ante usted y le confieso que si  llegue a pensar que no se podria hacer pero me ha demostrado que se puede  y me queda agradecerle todo por que yo de lo que pone ahi no entiendo nada

Pero he notado que si el que escribe en color no es @ y no soy yo si le avisa y hasta le expulsa  no es  demasiado problema  simplemente es un ligero problema

Muchas gracias y un beso (casto)  para usted  y siempre agradecida
Que mas quisiera yo que ser como ella

Desconectado Novatisima

  • Novato
  • *
  • Mensajes: 19
  • Karma: +6/-9
  • Sexo: Femenino
Re:duda sobre anticolores de ircap
« Respuesta #28 en: Febrero 23, 2020, 05:49:27 pm »
Si es que soy una desastres

Pero he notado que si el que escribe en color no es @ y no soy yo si le avisa y hasta le expulsa  no es  demasiado problema  simplemente es un ligero problema

En esa frase queria decir  que si el que escribe  en color es otro @ que no sea yo si le avisa y si sigue le expulsa

pero no importa por que asi le vuelvo a decir Quetzalcoatl MUCHAS GRACIAS
Que mas quisiera yo que ser como ella

Desconectado Quetzalcoatl

  • Miembro de pleno derecho
  • ***
  • Mensajes: 162
  • Karma: +228/-2
  • HipercomputoHipermegared
    • elchatirc
Re:duda sobre anticolores de ircap
« Respuesta #29 en: Febrero 23, 2020, 06:23:12 pm »
Hola Novatisima

Tienes toda la razón con lo que mencionas, solo había realizado pruebas con el usuario normal y no con los @/+v, por eso no me había percatado de ese detalle, le he dado un re-acomodo a los if's y ahora parece que funciona como debería.
Código: [Seleccionar]
on 1:text:*:#: {
  if ($chr(3) !isin $1-) { return }
  elseif ( ($me !isop $chan) || ($nick isop $chan) || ($nick isvoice $chan) ) { return }
  elseif ($sinNC($1) ison $chan) { $iif($chr(3) !isin $2-,return) }
  var %quien $+(NoColor,~,$nick,~,$chan)
  set -u300 % [ $+ [ %quien ] ] $iif(% [ $+ [ %quien ] ],$calc($v1 +1), 1)
  if (1 == % [ $+ [ %quien ] ]) { msg $chan No uses colores en su texto $+($nick,.) Aviso $v2 }
  if (2 == % [ $+ [ %quien ] ]) { msg $chan No uses colores en su texto $+($nick,.) Aviso $v2 | ban -u120 $chan $address($nick,2) }
  if (3 == % [ $+ [ %quien ] ]) { ban -ku3600 $chan $nick 2 Se le advirtio de que no deberia usar colores en $chan }
}

alias -l sinNC { var %a 1, %b | tokenize 32 $remove($1,$chr(91),$chr(92),$chr(45)) | while ($mid($strip($1),%a,1)) { if ($v1 isalnum) { %b =  $+(%b,$v1) } | inc %a } | return %b }

Muchas gracias por comentarlo y probarlo :)
« última modificación: Febrero 23, 2020, 06:48:22 pm por Quetzalcoatl »