Responder al mensaje

Advertencia: No se ha publicado ninguna respuesta a este tema desde hace 40 días como mínimo.
A menos que estés seguro de que quieres responder, por favor, considera el empezar un nuevo tema.

Nota: este mensaje no se mostrará hasta que sea aprobado por un moderador.

Nombre:
Email:
Asunto:
Icono del mensaje:

Verificación:
Escribe las letras mostradas en la imagen
Escuchar el texto / Solicitar otra imagen

Escribe las letras mostradas en la imagen:
¿Cuánto es uno por uno? (en letra y en minúscula):

teclas método abreviado (sólo IE y Mozilla): presiona alt+s para enviar formulario/publicar o alt+p para previsualizar


Sumario de Temas

Publicado por: Purpura
« en: Junio 09, 2017, 08:26:38 am »

Hola Purpura.
Abres aliases en el mirc y pegas el código de abajo, después colocas en cualquier ventana /col_activars y das enter.
Código: [Seleccionar]
col_activars set %mod^ncomp $+($chr(15),$chr(8),$chr(15),$chr(8),coltri(<t>))
coltri { ; Primer y ultima palabra coloreada, y el centro de la palabra(mas amplio), también :P
  var %txt1 $+($chr(3),13)
  var %txt2 $+($chr(3),12)
  var %txt3 $+($chr(3),13)
  var %i 1, %txt $chr(2)
  while ($gettok($1-,%i,32) != $null) {
    var %palabra = $lower($v1) | if ($len(%palabra) < 3) { %palabra = $+(%txt1,%palabra) | goto L }
    ;>>>>>>>>>>>>>>>>>>>> Preguntas dudas con >> Quetzalcoatl red Chatzona canal #scripting  <<<<<<<<<<<<<<
    %palabra = $+(%txt1,$upper($left(%palabra,1)),%txt2,$mid(%palabra,2,-1),%txt3,$right(%palabra,1))
    :L | %txt = %txt $+ %palabra | inc %i
  }
  return %txt
}

PD: El código que puse tenia dos error de sintaxis(un espacio de más), referente al nombre del alias(col tri)

Muchas gracias por tu ayuda!
Publicado por: Quetzalcoatl
« en: Junio 08, 2017, 06:44:24 pm »

Hola Purpura.
Abres aliases en el mirc y pegas el código de abajo, después colocas en cualquier ventana /col_activars y das enter.
Código: [Seleccionar]
col_activars set %mod^ncomp $+($chr(15),$chr(8),$chr(15),$chr(8),coltri(<t>))
coltri { ; Primer y ultima palabra coloreada, y el centro de la palabra(mas amplio), también :P
  var %txt1 $+($chr(3),13)
  var %txt2 $+($chr(3),12)
  var %txt3 $+($chr(3),13)
  var %i 1, %txt $chr(2)
  while ($gettok($1-,%i,32) != $null) {
    var %palabra = $lower($v1) | if ($len(%palabra) < 3) { %palabra = $+(%txt1,%palabra) | goto L }
    ;>>>>>>>>>>>>>>>>>>>> Preguntas dudas con >> Quetzalcoatl red Chatzona canal #scripting  <<<<<<<<<<<<<<
    %palabra = $+(%txt1,$upper($left(%palabra,1)),%txt2,$mid(%palabra,2,-1),%txt3,$right(%palabra,1))
    :L | %txt = %txt $+ %palabra | inc %i
  }
  return %txt
}

PD: El código que puse tenia dos error de sintaxis(un espacio de más), referente al nombre del alias(col tri)
Publicado por: Purpura
« en: Junio 08, 2017, 02:55:39 am »

Saludos RUBI.

Agregue una S al final del activador, espero te sirva y te suguiero que te registres en el el foro para que cuando se te responda un post, se te notifique vía correo.



Código: [Seleccionar]
col_activars set %mod^ncomp $+($chr(15),$chr(8),$chr(15),$chr(8),col tri(<t>))
col tri { ; Primer y ultima palabra coloreada, y el centro de la palabra(mas amplio), tambien :P
  var %txt1 $+($chr(3),13)
  var %txt2 $+($chr(3),12)
  var %txt3 $+($chr(3),13)
  var %i 1, %txt $chr(2)
  while ($gettok($1-,%i,32) != $null) {
    var %palabra = $lower($v1) | if ($len(%palabra) < 3) { %palabra = $+(%txt1,%palabra) | goto L }
    ;>>>>>>>>>>>>>>>>>>>> Preguntas dudas con >> Quetzalcoatl red Chatzona canal #scripting  <<<<<<<<<<<<<<
    %palabra = $+(%txt1,$upper($left(%palabra,1)),%txt2,$mid(%palabra,2,-1),%txt3,$right(%palabra,1))
    :L | %txt = %txt $+ %palabra | inc %i
  }
  return %txt
}

Ya sabes cualquier duda contactame via irc, o dejame un memo por hay.
;>>>>>>>>>>>>>>>>>>>> Preguntas dudas con >> Quetzalcoatl red Chatzona canal #scripting  <<<<<<<<<<<<<<



 A mí no me funcionó, me podrías explicar cómo se hace? por favor!
Publicado por: Rubi
« en: Junio 06, 2017, 09:43:03 pm »

Quetzalcoatl  Eres genial, muchas gracias por ayudarme,  funciona perfecto el aliase :D
Publicado por: Quetzalcoatl
« en: Junio 05, 2017, 09:30:08 pm »

Saludos RUBI.

Agregue una S al final del activador, espero te sirva y te suguiero que te registres en el el foro para que cuando se te responda un post, se te notifique vía correo.



Código: [Seleccionar]
col_activars set %mod^ncomp $+($chr(15),$chr(8),$chr(15),$chr(8),col tri(<t>))
col tri { ; Primer y ultima palabra coloreada, y el centro de la palabra(mas amplio), tambien :P
  var %txt1 $+($chr(3),13)
  var %txt2 $+($chr(3),12)
  var %txt3 $+($chr(3),13)
  var %i 1, %txt $chr(2)
  while ($gettok($1-,%i,32) != $null) {
    var %palabra = $lower($v1) | if ($len(%palabra) < 3) { %palabra = $+(%txt1,%palabra) | goto L }
    ;>>>>>>>>>>>>>>>>>>>> Preguntas dudas con >> Quetzalcoatl red Chatzona canal #scripting  <<<<<<<<<<<<<<
    %palabra = $+(%txt1,$upper($left(%palabra,1)),%txt2,$mid(%palabra,2,-1),%txt3,$right(%palabra,1))
    :L | %txt = %txt $+ %palabra | inc %i
  }
  return %txt
}

Ya sabes cualquier duda contactame via irc, o dejame un memo por hay.
;>>>>>>>>>>>>>>>>>>>> Preguntas dudas con >> Quetzalcoatl red Chatzona canal #scripting  <<<<<<<<<<<<<<
Publicado por: Rubi
« en: Junio 05, 2017, 05:22:35 pm »

Buen día, me gustaría que me ayuden con este aliase para un nick completación en 3 colores. lo que busco es que al mencionar un nick salga asi: Ej. Hola Constantino cómo vas ?.
Código: [Seleccionar]
;--------- Letra col

col_activar set %mod^ncomp $+($chr(15),$chr(8),$chr(15),$chr(8),col(<t>))
col {
var %txt1 $+($chr(3),13)
var %txt2 $+($chr(3),12)
var %txt3 $+($chr(3),13)
var %mi frase $null, %i 1, %txt $chr(2), %n, %n2, %n3
while ($gettok($1-,%i,32) != $null) {
var %palabra = $v1
if ($len(%palabra) = 1) { %palabra = $+(%txt1,%palabra) | goto L }
%n = $int($calc($len(%palabra) / 3)) | %n2 = $calc($len(%palabra) - %n) | %n3 = $calc($len(%palabra) - $calc(%n + %n2))
%palabra = $+(%txt1,$mid(%palabra,14 $+ $left($1,1),%txt2,$mid(%palabra, $+ 04  $+ $mid($1-,2,-1) $calc(%n +1),$calc(%n2 - %n)),%txt3,$right(%palabra, $+ 14  $+  $right($1-,1)  ))
:L
%txt = %txt $+ %palabra
inc %i
}
return %txt
}


El aliase se activa con el siguiente comando /col_activar.
Quien pueda ayudarme de antemano muchas gracias :D