Color Spammer

By Rolo on Dec 05, 2009

An alias I made in the space of 40-ish seconds from the brief need to spam a channel.
It will repeat a phrase (whatever $1- is) in sequence of mIRC colors from dark blue to light gray (2-15).

/colors

alias colors {
  ; /colors blah blah
  var %x 2
  while (%x < 16) {
    say $+($chr(3),%x,$1-)
    inc %x
  }
}

Like Page Follow Author

Comments

Dark| - Dec 02, 2010

Spamming colors AMAZING xD

Respond

Iambored - Dec 02, 2010

Nvm.

Respond

Jonesy44 - Dec 06, 2009

RegularExpressions will alwasy win. Nice one Jethro.

Respond

napa182 - Dec 05, 2009

Armand Said:

@Jethro_
Nice usage of regex, although it kills readability.

hmm not at all. I can read Jethro_'s version of it just fine, and so can most people.

Respond

Armand - Dec 05, 2009

10/10, does what is says.
Simple yet effective. Good job Rolo.

@Ghost-Writer
1) while (%x < 15) { } <- You need to set off the while loop. At its current state, it will never work, as %x does not yet exist. He also started it at 2 for a reason, as white text won't show up, and black text is normal. Also, yours will never reach 15, as it is < when it should be <= in this case.

2) var %x $iif(%x,$calc(%x + 1),1) <- $iif is pointless. It will always do $calc(%x + 1) since %x will always exist in the loop. How about just inc %x?

3) echo -a $+($chr(3),%x,$1-) <- This will only flood the user who uses it, not the channel or query.

@Jethro_
Nice usage of regex, although it kills readability.

Respond

Jethro - Dec 05, 2009

You can also use $regsubex for looping along with various colors in each word, making the spam more fun:

alias colors {
  tokenize 136 $regsubex($replace($str($1-|,14),$chr(124),$chr(136)),/(.)/g,$+($chr(3),$base($r(2,15),15,15,2),\1)) | say $( $* )
}

Respond

Lord-Harlot - Dec 05, 2009

GTFO Ghost-writer.

Please learn to script. Please learn not to fail.

Respond

Rolo - Dec 05, 2009

@Ghost-writer
Seems pretty fail to me. Mine is faster, and it actually works.

Respond

Ghost-writer - Dec 05, 2009

Yay! Colourspam! Let me see if this counts as a napa:

alias colora { 
  while (%x < 15) { var %x $iif(%x,$calc(%x + 1),1) | echo -a $+($chr(3),%x,$1-) }
}

Respond