pastebin - pastes related to color

alias <ALIAS HERE> {

  var %c1 4

  var %c2 2

  tokenize 32 $1-

  var %i $0,%t,%b = $iif(%b,$chr(2)),%u = $iif(%u,$chr(31))

  while %i {

    var %w $ [ $+ [ %i ] ],%t = $+($chr(3),$base(%c1,10,10,2),$replace($left(%w,1),a, A,b, B,c, C,d, D,e, E,f, F,g, G,h, H,i, I,j, J,k, K,l, L,m, M,n, N,o, O,p, P,q, Q,r, R,s, S,t, T,u, U,v, V,w, W,x, X,y, Y,z, Z,[, 4[,], 4]),$chr(3),$base(%c2,10,10,2),%u,%b,$replace($mid(%w,2),:, 2:,!, 2!),$chr(15)) %t

    dec %i

 

on *:INPUT:#: {

  if (%colortype == $null) && ($mid($1,1,1) != /) { /echo -a 2Please specify a color type by typing /ctype light or /ctype dark.  You may also right click this window and select it in Rainbow Text->Options->Color Type. | /halt }

  if (%colorbold == $null) && ($mid($1,1,1) != /) { /echo -a 2Please specify bold by typing /cbold on or /cbold off.  You may also right click this window and select it in Rainbow Text->Options->Bold. | /halt }

  if (%color == on) && ($mid($1,1,1) != /) {

    /set %color.words $strip($1-)

    /set %color.wcounter 0

    if (%colorbold == on) { /set %color.final 0,1 }

    if (%colorbold == off) { /set %color.final 0,1 }