Paint Please Help (NVM) but use the codes

[stajanleafs]

yah this is long i've still gotta clean it up as it has alot of useless stuff in it......

BUT
how can i chose multiple colours to paint with and switch back and forth?

it works fine with the rainbow colour i have but i would love to be able to change and not have to quit the program

NVM I GOT IT A DIFFERNT WAY BUT ANY ONE CAN USE THIS PAINT CODE

Quote:

% The "MouseTrails" program.

var x, y, oldx, oldy, b : int := - 1
var c : int := 0
loop
% Get the current location of the mouse
mousewhere (x, y, b)
% if the mouse has moved and the button is pressed.
if x>183 and y>157 and (x not= oldx or y not= oldy) and b = 1 then
% Draw a circle around the mouse location
drawfilloval (x, y, 20, 20, c)%changes size
% Change the color

c := (c + 1) mod 16
oldx := x
oldy := y
end if
end loop[/list]