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 ] ] }
} }Publicado por: Dino
« en: Julio 05, 2020, 01:44:08 am »oki gracias provare
Publicado por: Dino
« en: Julio 04, 2020, 08:14:00 am »La pregunta es como solo la variable era un ejemplo
Publicado por: Quetzalcoatl
« en: Julio 04, 2020, 07:49:37 am »es que en realidad no tiene ningún identificador llamado $text pero si solo son xd xd xd entonces lo mas fácil seria poner un seguro para ello
Código: [Seleccionar]
if ($strip($1-) == xd xd xd) { halt }esto va de preferencia al inicio de la declaración de variables.Publicado por: Dino
« en: Julio 04, 2020, 06:50:46 am »Quetzalcoatl disculpa que sea pregunton pero como haria para ignorar frases y no las kikee
ejemplo :
xD xD xD
o tambien Xd Xd Xd
trate de agregarla en esta ruta pero no me funciono
If ( $text =="xD xD xD" ) && ( $text =="Xd Xd Xd" ) && ( $me isop # ) && ( $nick !isop # ) && ( %lon_frase >= 4 )
y no me funciono por fa ayudame para que agregue palabras y las omita!! gracias
ejemplo :
xD xD xD
o tambien Xd Xd Xd
trate de agregarla en esta ruta pero no me funciono
If ( $text =="xD xD xD" ) && ( $text =="Xd Xd Xd" ) && ( $me isop # ) && ( $nick !isop # ) && ( %lon_frase >= 4 )
y no me funciono por fa ayudame para que agregue palabras y las omita!! gracias
Publicado por: Quetzalcoatl
« en: Febrero 01, 2020, 05:59:51 am »Que bien que te funcionara 
Publicado por: Dino
« en: Febrero 01, 2020, 05:38:12 am »gracias me funciono a la perfeccion con la segunda opcion
%_cuenta. [ $+ [ $+($nick,.,$chan) ] ]
%_cuenta. [ $+ [ $+($nick,.,$chan) ] ]
Publicado por: Quetzalcoatl
« en: Enero 31, 2020, 12:38:58 am »eso es debido a la variable %_cuenta. [ $+ [ $nick ] ]
debido a que solo esta en función del nick y no existe un parametro de canal, mas que la comparación si es op, entonces solo habría que añadirla al if para que actué en el canal o modificar la variable para que la incluya por ejemplo que use
%_cuenta. [ $+ [ $nick $+ . $+ $chan ] ]
o con
%_cuenta. [ $+ [ $+($nick,.,$chan) ] ]
espero que te sea util
debido a que solo esta en función del nick y no existe un parametro de canal, mas que la comparación si es op, entonces solo habría que añadirla al if para que actué en el canal o modificar la variable para que la incluya por ejemplo que use
%_cuenta. [ $+ [ $nick $+ . $+ $chan ] ]
o con
%_cuenta. [ $+ [ $+($nick,.,$chan) ] ]
espero que te sea util