Computer Science Canada

Trippy mapple leaf Program, Reversed Axises

Author:  the_short1 [ Wed Jan 14, 2004 7:33 pm ]
Post subject:  Trippy mapple leaf Program, Reversed Axises

% Kevin Folz, AKA the_short1, October 2003
% A draw pad program to make a filled mapple leaf,axis reversed
% click anywhere to begin...
var mx,my,mbtn:int
loop
mousewhere(mx,my,mbtn)
if mbtn=1 then
View.Set ("graphics")
const message := "Kevin The Short!"
for i : 1 .. length (message)
color (i mod maxcolor + 1)
put message (i) ..
end for
Draw.FillMapleLeaf (my, mx, 300, 400, brightred)
Draw.MapleLeaf (my, mx, 300, 400, 9)
end if
end loop

Click Down Anywhere and enjoy....Man i love visuals.. i should make them for Winamp 5... HEHEH AVS ROCKS Laughing 8)

Author:  Maverick [ Wed Jan 14, 2004 8:59 pm ]
Post subject: 

Cool looking program. GJ


: