Autor Tema: Combinar  (Leído 3610 veces)

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

~Draco.

  • Visitante
Combinar
« en: Mayo 22, 2011, 11:46:23 am »
Como puedo combinar estos dos.
Código: [Seleccionar]
on *:signal:modoescritura: {
if (%nick^comp) %nick^comp = 12,00[02 $+ $left($1,1) $+ 12 $+ $mid($1,2,-1) $+ 02 $+ $right($1,1) $+ 12]- }

Código: [Seleccionar]
alias t1 {
  var %a 1, %t $replace($1-,$chr(32),$chr(9)), %b $len(%t), %c, %j
  while ( %a <= %b ) {
    %c =  $mid(%t,%a,1)
    %j = $+(%j,$iif($r(1,2) == 1,$chr(2)),%c)
    inc %a
  }
  Return $Replace(%j,$chr(9),$chr(32))
}

SykO

  • Visitante
Re: Combinar
« Respuesta #1 en: Mayo 22, 2011, 08:43:40 pm »
ke se supone ke kieres hacer con el t1

~Draco.

  • Visitante
Re: Combinar
« Respuesta #2 en: Mayo 22, 2011, 11:13:11 pm »
Hola esto es prueba

Código: [Seleccionar]
alias t1 {
  var %a 1, %t $replace($1-,$chr(32),$chr(9)), %b $len(%t), %c, %j
  while ( %a <= %b ) {
    %c =  $mid(%t,%a,1)
    %j = $+(%j,$iif($r(1,2) == 1,$chr(2)),%c)
    inc %a
  }
  Say $Replace(%j,$chr(9),$chr(32))
}

SykO

  • Visitante
Re: Combinar
« Respuesta #3 en: Mayo 23, 2011, 07:16:36 am »
Código: [Seleccionar]
on *:signal:modoescritura: {
  var %s = $1-
  if (%nick^comp) {
    %nick^comp = 12,00[02 $+ $left($1,1) $+ 12 $+ $mid($1,2,-1) $+ 02 $+ $right($1,1) $+ 12]-
    %s = $2-
  }
  %mi^frase = $t1(%s)
}

~Draco.

  • Visitante
Re: Combinar
« Respuesta #4 en: Mayo 23, 2011, 07:42:53 am »

SykO

  • Visitante
Re: Combinar
« Respuesta #5 en: Mayo 24, 2011, 07:12:05 pm »
no avia probado el codigo… solo lo hice y lo puse… pero ahora ke lo eh provado me funciona bien asi ke ah de ser algo mas… seguro ke tambien pusiste el alias t1? oh tambien el alias t1 en lugar de Say tiene ke estar komo el primero kon el return… si no es eso provablemente sea algo mas

~Draco.

  • Visitante
Re: Combinar
« Respuesta #6 en: Mayo 24, 2011, 07:43:51 pm »
ya vi, era cambiar el say por return.

Muchas Gracias

SykO

  • Visitante
Re: Combinar
« Respuesta #7 en: Mayo 24, 2011, 10:44:36 pm »
de nada