 />
Graphics 320,200
<br />
SetBuffer BackBuffer()
<br />

<br />
For t = 1 To 1000
<br />
Color Rnd(255), Rnd(255), Rnd(255)
<br />
Rect Rnd(320),Rnd(200),10,10,1
<br />
Next
<br />

<br />
GetColor 100,100
<br />
Print "Box at 100,100 is RGB:" + ColorRed() + "," + ColorGreen() + "," + ColorBlue()  + "!"
<br />
Flip 
<br />
While Not KeyHit(1)
<br />
Wend
<br />

</td>
</tr>
</table>
<br>
<a target=_top href=../index.htm>Index</a><br>
<br>
Click <a href=http://www.blitzbasic.co.nz/b3ddocs/command.php?name=