Cool Star Array (Graphic Visualization)

[the_short1]

Visuals are fun, i have a realy nice one but has pictures...
so i will make a Installer for it soon...
% Kevin Folz, AKA the_short1
% Program to endlessly draw stars at random location,color,size
colorback (black)
cls
var blah,hah : array 1 .. 500 of int
loop
for i : 1 .. 500
randint (blah(i),1,maxx)
end for
for i : 1 .. 500
randint (hah(i),1,maxy)
end for
for i : 1..500
delay (50)
drawfillstar (blah(i),hah(i),blah(i+5),hah(i+5),blue)
drawfillstar (hah(i),blah(i),hah(i+5),blah(i+5),red)
drawfillstar (blah(i),blah(i),hah(i+5),hah(i+5),green)
drawfillstar (hah(i),blah(i),blah(i+5),hah(i+5),yellow)
end for
end loop

[Thuged_Out_G]

the colors arent really random....but, nice program none the less

[the_short1]

Yea instead of randomizing for the whole program it just randomizes 200 colors and 200 locations and replays them again and again... this was one of my first attemps of Arays.... i have one without an array...meh..