2 Colour

By Cracker200 on Oct 04, 2009

This is a Simple Colour script for those who have a Nice to Colour s they want together :P

alias ac {
  var %colour1 = 4, %colour2 = 9
  var %x = 1
  var %c = $chr(3)
  var %t = $+(%c,%colour1)
; var %colour1 = 4, %colour2 = 9 4 = Red 9 = Green  The Colours like that ;D 
  %colour1 = $base(%colour1,10,10,2)
  %colour2 = $base(%colour2,10,10,2)

  while ($mid($1-,%x,1) != $null) {
    %t = $+(%t,$v1,%c,$iif($and(%x,1) == 0,%colour1,%colour2))
    inc %x
  }
  return %t
}

on 1:INPUT:#: {
  if ($ctrlenter || $left($1-,1) == /) { return }
  msg $target $ac($1-)
  halt
}

Comments

Sign in to comment.
Jethro   -  Oct 11, 2009

var %colour1 = 4, %colour2 = 9Change the number to any of your choice.>
0 white
1 black
2 blue
3 green
4 lightred
5 brown
6 purple
7 orange
8 yellow
9 lightgreen
10 cyan
11 lightcyan
12 lightblue
13 pink
14 grey
15 lightgreyaccording to the help file.

 Respond  
dangerous_angel   -  Oct 11, 2009

can u change the colors? if so how?

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.