Groovey little RGB colour changer/phaser
This is a very simple code, can obviously be adapted for text or other items.
B = 255
R = 1
D = 0
Repeat
sync rate 1000
If D = 0
B = B - 1
R = R + 1
endif
if D = 1
B = B + 1
R = R - 1
endif
If B = 1 then D = 1
if B = 255 then D = 0
ink rgb(R,0,B),0
REM Draw
Line 245,50,327,50 : Line 327,50,327,75 : Line 245,50,245,75 : Line 245,75,327,75
Line 245,90,327,90 : Line 327,90,327,115 : Line 245,90,245,115:Line 245,115,327,115
Line 245,130,327,130 : Line 327,130,327,155 : Line 245,130,245,155:Line 245,155,327,155
sync
Until mouseclick()=1
Basically, the Red and Blue value for the colour increses and decreses, and a border is drawn in the colour currently selected.
By adapting the code, you can change the shades and colours used, for instance, by changing the Red to Green, and having the ink command as "ink rgb(0,G,B),0" it will phase from blue to green and back again.
Enjoy
EDIT
Word of warning, keep the initial variables
B = 255
R = 1
D = 0
outside of the repeat/until comand else it aint gunna work
