##  scramble textmode colors
##  needs textcolor (setcolor from SVGATextMode)
##  <-- cLIeNUX pawprints

BLAH=$RANDOM
R=$((($BLAH)/11000)) 	 		# 0 thru 2, rotation
F1=$(($BLAH & 31))			# 0 thru 31 fuzz
F2=$(($RANDOM & 31))			# 0 thru 31
F3=$(($RANDOM & 31))			# 0 thru 31



##  XYZ vector array, xyzxyz for rotating by simply adding an offset to an index
## this gives 3 rotations, with the same relate saturations

declare -a VA

VA=(32 40 32 32 40 32 \
224 64 160 210 74 150 \
74 214 140 64 224 160 \
96 128 224 96 128 224 \
160 64 224 160 64 224 \
96 224 224 96 224 224 \
224 96 128 210 100 120 \
208 190 224 220 180 224 \
224 208 32 224 208 32 \
208 32 224 208 32 224 \
208 224 32 208 224 32 \
32 224 208 32 224 208 \
160 128 96 160 128 96 \
32 64 96 32 64 96 \
128 128 96 96 128 128 \
128 96  128 128 128 96 \
) 



textcolor \
0  $((${VA[$(( 0+$R))]}+$F1))  $((${VA[$(( 1+$R))]}+$F2)) $((${VA[$(( 2+$R))]}+F3)) \
1  $((${VA[$(( 6+$R))]}+$F1))  $((${VA[$(( 7+$R))]}+F2)) $((${VA[$(( 8+$R))]}+F3)) \
2  $(($F3+${VA[$((12+$R))]}))  $(($F1+${VA[$((13+$R))]})) $(($F2+${VA[$((14+$R))]})) \
3  $(($F2+${VA[$((18+$R))]}))  $(($F1+${VA[$((19+$R))]})) $(($F2+${VA[$((20+$R))]})) \
4  $(($F2+${VA[$((24+$R))]}))  $(($F1+${VA[$((25+$R))]})) $(($F2+${VA[$((26+$R))]})) \
5  $(($F3+${VA[$((30+$R))]}))  $(($F1+${VA[$((31+$R))]})) $(($F2+${VA[$((32+$R))]})) \
6  $(($F1+${VA[$((36+$R))]}))  $(($F1+${VA[$((37+$R))]})) $(($F2+${VA[$((38+$R))]})) \
7  $((${VA[$((42+$R))]}+$F3))  $((${VA[$((43+$R))]}+$F1)) $(($F1+${VA[$((44+$R))]})) \
8  $(($F1+${VA[$((48+$R))]}))  $(($F1+${VA[$((49+$R))]})) $(($F1+${VA[$((50+$R))]})) \
9  $(($F2+${VA[$((54+$R))]}))  $(($F3+${VA[$((55+$R))]})) $(($F1+${VA[$((56+$R))]})) \
10 $(($F1+${VA[$((60+$R))]}))  $(($F3+${VA[$((61+$R))]})) $(($F1+${VA[$((62+$R))]})) \
11 $(($F1+${VA[$((66+$R))]}))  $(($F2+${VA[$((67+$R))]})) $(($F1+${VA[$((68+$R))]})) \
12 $(($F1+${VA[$((72+$R))]}))  $(($F3+${VA[$((73+$R))]})) $(($F1+${VA[$((74+$R))]})) \
13 $(($F2+${VA[$((78+$R))]}))  $(($F3+${VA[$((79+$R))]})) $(($F1+${VA[$((80+$R))]})) \
14 $(($F2+${VA[$((84+$R))]}))  $(($F1+${VA[$((85+$R))]})) $(($F1+${VA[$((86+$R))]})) \
15 $(($F2+${VA[$((90+$R))]}))  $(($F1+${VA[$((91+$R))]})) $(($F1+${VA[$((92+$R))]})) 







## Copyright 1999 Richard Allen Hohensee
## This file is released for redistribution only as part of an intact entire
## cLIeNUX Core.
