Publicado por: Quetzalcoatl
« en: Enero 09, 2021, 04:58:45 am »Gracias por notificar, quizás a alguien le pueda servir en un futuro.
Saludos Dino
Saludos Dino
Foro IRcap
Todo sobre IRcap, mIRC y el IRC
Noticias:
Postea tus dudas sobre IRC o IRcap. Nosotros te ayudaremos.
Publicado por: Dino
« en: Enero 09, 2021, 04:01:36 am »POS Ahora si me funciono de maravilla gracias 
eres un genio
eres un genioPublicado por: Quetzalcoatl
« en: Enero 06, 2021, 09:13:03 am »tu mencionas que
siendo así si funciono, por que ya no esta tomando en cuenta los caracteres de ; : . , por ende esta lanzando la advertecia asi como mencionaste.
A menos que quieras decir que los nicks en mayúsculas no sean tomados en cuenta, cosa que seria diferente a lo que mencionas, se haria referencia al post de
http://foroircap.org/ayuda-scripting-ircap/antimayusuculas-con-advertencia/?action=post;quote=7717;last_msg=7810
ignoro como tienes el checador de %c en la comprobacion si es un nick en el canal, pero deberia ser algo como:
Saludos.
pero detecte que tambien si los usuarios nombra nicks con mayusculas iniciando o terminando en dos puntos : o punto y coma ;y te da como resultado una advertencia para que desactive las mayúsculas.
igual les advierte la solucion que veo es que a tu depurador se añada para que omita los dos puntos y punto y coma y coma y punto y coma.... se puede añadir añadir por favor???
blablabla
siendo así si funciono, por que ya no esta tomando en cuenta los caracteres de ; : . , por ende esta lanzando la advertecia asi como mencionaste.
A menos que quieras decir que los nicks en mayúsculas no sean tomados en cuenta, cosa que seria diferente a lo que mencionas, se haria referencia al post de
http://foroircap.org/ayuda-scripting-ircap/antimayusuculas-con-advertencia/?action=post;quote=7717;last_msg=7810
ignoro como tienes el checador de %c en la comprobacion si es un nick en el canal, pero deberia ser algo como:
Código: [Seleccionar]
if ( $sinNC($strip(%c)) ison # ) { inc %b | goto bucle }
donde se están quitando los colores de %c y removiendo caracteres especiales y una ves realizado eso, verificando si es una palabra que corresponde a un nick en el canal.Saludos.
Publicado por: Dino
« en: Enero 06, 2021, 01:40:53 am »lo agregue y no funciona //echo -a $asc(
58
alias sinNC { var %a 1, %b | tokenize 32 $remove($1,$chr(91),$chr(92),$chr(45),$chr(58),$chr(59),$chr(55357)) | while ($mid($strip($1),%a,1)) { if (($v1 isalnum) || ($v1 isin -_)) { %b = $+(%b,$v1) } | inc %a } | return %b }
dumkan> MININHA: gracias 😉
<@dinn> [ dumkan ] Desactive las Mayusculas. Se consideran gritos y el uso excesivo de ellas puede generar lag. Gracias. (Ultimo aviso)
58
alias sinNC { var %a 1, %b | tokenize 32 $remove($1,$chr(91),$chr(92),$chr(45),$chr(58),$chr(59),$chr(55357)) | while ($mid($strip($1),%a,1)) { if (($v1 isalnum) || ($v1 isin -_)) { %b = $+(%b,$v1) } | inc %a } | return %b }
dumkan> MININHA: gracias 😉
<@dinn> [ dumkan ] Desactive las Mayusculas. Se consideran gritos y el uso excesivo de ellas puede generar lag. Gracias. (Ultimo aviso)
Publicado por: Quetzalcoatl
« en: Enero 06, 2021, 01:10:25 am »la parte de depuración de caracteres o símbolos es donde esta:
tokenize 32$remove($1,$chr(91),$chr(92),$chr(45))
Siendo que los caracteres estan agregados por su numero ascii, debido a que si pones algunos simbolos especiales puede que te marque error, es por eso que se requiere usar su numero ascii y usar el identificador de $chr
ejemplo si quieres poner ; para quitarlo seria primero buscar su ascii en IRCap se usa /ascii ; y retornara el numero del ascii o usar //echo -a $asc(;)
una ves obtenido el valor solo basta agregarlo, separado de comas entre los otros $chr
; en ascii es 59, quedaría como:
tokenize 32$remove($1,$chr(91),$chr(92),$chr(45),$chr(59))
Una vez dicho eso, solo basta agregar los caracteres que requieres eliminar uno por uno.
tokenize 32$remove($1,$chr(91),$chr(92),$chr(45))
Siendo que los caracteres estan agregados por su numero ascii, debido a que si pones algunos simbolos especiales puede que te marque error, es por eso que se requiere usar su numero ascii y usar el identificador de $chr
ejemplo si quieres poner ; para quitarlo seria primero buscar su ascii en IRCap se usa /ascii ; y retornara el numero del ascii o usar //echo -a $asc(;)
una ves obtenido el valor solo basta agregarlo, separado de comas entre los otros $chr
; en ascii es 59, quedaría como:
tokenize 32$remove($1,$chr(91),$chr(92),$chr(45),$chr(59))
Una vez dicho eso, solo basta agregar los caracteres que requieres eliminar uno por uno.
Publicado por: Dino
« en: Enero 05, 2021, 11:05:36 pm »tu depurador funciona muy bien
igual les advierte la solucion que veo es que a tu depurador se añada para que omita los dos puntos y punto y coma y coma y punto y coma.... se puede añadir añadir por favor???
como por ejemplo que omita cuando saluden a dino:
Código: [Seleccionar]
alias sinNC { var %a 1, %b | tokenize 32 $remove($1,$chr(91),$chr(92),$chr(45)) | while ($mid($strip($1),%a,1)) { if (($v1 isalnum) || ($v1 isin -_)) { %b = $+(%b,$v1) } | inc %a } | return %b }pero detecte que tambien si los usuarios nombra nicks con mayusculas iniciando o terminando en dos puntos : o punto y coma ;igual les advierte la solucion que veo es que a tu depurador se añada para que omita los dos puntos y punto y coma y coma y punto y coma.... se puede añadir añadir por favor???
como por ejemplo que omita cuando saluden a dino:
Código: [Seleccionar]
Hola [DINO]:
Hola [DINO];
Hola [DINO].
Hola [DINO], Publicado por: Dino
« en: Diciembre 06, 2020, 02:41:12 am »este nick esta en linea en el canal BUZA_KAPERUZA y cuando dicen su nick el remote lo reconoce como mayuscula y lo lanza como advertencia y es solo con ese nick en mayuscula que esta en linea en el canal
Publicado por: Dino
« en: Agosto 26, 2020, 11:48:23 pm »baje el porcentaje de 90 a 20 funciona pero cuando dan mas espacio ya no reconoce lo ideal seria que envez de porcentaje mejor contara las letras mayusculas
Publicado por: Quetzalcoatl
« en: Agosto 24, 2020, 05:32:49 am »"Ya se te especifico que es por porcentaje el código con que iniciaste el post."
https://es.wikipedia.org/wiki/Porcentaje
https://es.wikipedia.org/wiki/Porcentaje
Publicado por: Dino
« en: Agosto 24, 2020, 02:43:36 am »despues de muchas pruebas note que no reconoce mayusculas cuando la palabra tiene espacios largos ejemplo
heyyy que hacen o como estan AMIGOS saludos...
porfa ayuda.
heyyy que hacen o como estan AMIGOS saludos...
porfa ayuda.
Publicado por: Dino
« en: Julio 10, 2020, 06:42:08 pm »me funciono de maravilla gracias
Publicado por: Quetzalcoatl
« en: Julio 10, 2020, 06:18:14 pm »pues lo acabo de probar y me funciona
//echo -s $sinnc(-[ nick04])
solo quite el -l para usarlo normalmente ya que es un alias local. Algo estas haciendo mal.
pd:Un alias local es igual que cualquier alias en remotes, solo que debe estar en el mismo script donde es llamado para que funcione, por lo tanto si se llama desde una editbox no sera llamado al igual si es llamado desde otro proceso donde no este donde esta escrito.
//echo -s $sinnc(-[ nick04])
Código: [Seleccionar]
alias sinNC { var %a 1, %b | tokenize 32 $remove($1,$chr(91),$chr(92),$chr(45)) | while ($mid($strip($1),%a,1)) { if (($v1 isalnum) || ($v1 isin -_)) { %b = $+(%b,$v1) } | inc %a } | return %b }
solo quite el -l para usarlo normalmente ya que es un alias local. Algo estas haciendo mal.
pd:Un alias local es igual que cualquier alias en remotes, solo que debe estar en el mismo script donde es llamado para que funcione, por lo tanto si se llama desde una editbox no sera llamado al igual si es llamado desde otro proceso donde no este donde esta escrito.
Publicado por: Dino
« en: Julio 10, 2020, 06:22:07 am »probe tu depuradorde caracteres como ser [ ] y no me funciona uso solo mirc
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) || ($v1 isin -_)) { %b = $+(%b,$v1) } | inc %a } | return %b }
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) || ($v1 isin -_)) { %b = $+(%b,$v1) } | inc %a } | return %b }
Publicado por: Quetzalcoatl
« en: Julio 10, 2020, 05:41:21 am »por lo que veo tienes el NC en toda la palabra, es por eso que no lo detecta como nick por los colores/bold/italicas, etc.
seria modificar
pero toma en cuenta que solo quitara los colores(underline/bold/colores/italicas), si el nick nombrado usa cosas como:
Hola [DINO] no funcionara por que habrá que remover los [], hay un post donde se trato ese tema de los NC, tema abierto con respecto a ANTICOLORES iniciado por Diablo donde se da una solucion a los caracteres especiales en los nicks con Completion.
Saludos.
seria modificar
Código: [Seleccionar]
if ( %c ison # ) { inc %b | goto bucle }porCódigo: [Seleccionar]
if ( $strip(%c) ison # ) { inc %b | goto bucle }pero toma en cuenta que solo quitara los colores(underline/bold/colores/italicas), si el nick nombrado usa cosas como:
Hola [DINO] no funcionara por que habrá que remover los [], hay un post donde se trato ese tema de los NC, tema abierto con respecto a ANTICOLORES iniciado por Diablo donde se da una solucion a los caracteres especiales en los nicks con Completion.
Saludos.
Publicado por: Dino
« en: Julio 10, 2020, 05:17:33 am »encontre otro detalle, no omite los nicks presente que esten en el canal y que esos nicks usen mayusculas ejemplo DINO:
hola DINO
DINO como estas
ahi te vez DINO
<mi-bot> Por favor DINO Desactiva tus Mayusculas (Primer aviso)
cuando digo esas variantes el script igual me advierte, como seria para que omita los nicks en mayusculas presente en el canal
hola DINO
DINO como estas
ahi te vez DINO
<mi-bot> Por favor DINO Desactiva tus Mayusculas (Primer aviso)
cuando digo esas variantes el script igual me advierte, como seria para que omita los nicks en mayusculas presente en el canal
Código: [Seleccionar]
on *:text:*:#: {
var %a = $numtok($1-,32)
var %b = 1
:bucle
var %c = $gettok($1-,%b,32)
if ( %c ison # ) { inc %b | goto bucle }
var %d = %d %c
if ( %b > %a ) { goto continua }
inc %b
goto bucle
:continua
var %lon_frase = $len(%d)
var %lon_frase_sin_may = $len($removecs(%d,A,B,C,D,E,F,G,H,I,J,K,L,M,N,Ñ,O,P,Q,R,S,T,U,V,W,X,Y,Z))
If ( $me isop # ) && ( $nick !isop # ) && ( %lon_frase >= 4 ) && ( $calc(((%lon_frase - %lon_frase_sin_may) * 100 ) / %lon_frase ) > 90 ) {
inc %_cuenta. [ $+ [ $nick ] ]
if (%_cuenta. [ $+ [ $nick ] ] == 1) { msg # Por favor $nick Desactiva tus Mayusculas (Primer aviso) }
if (%_cuenta. [ $+ [ $nick ] ] == 2) { msg # $nick Desactiva (Ultimo aviso) }
if (%_cuenta. [ $+ [ $nick ] ] == 3) { ban -u120 $chan $address($nick,2) | kick $chan $nick No Mayusculas (Ya te avise) Baneado por 2 minutos. | unset %_cuenta. [ $+ [ $nick ] ] }
} }