Rosetta Code example

# This is a code example in basic 256 that you can find in Rosetta code website http://rosettacode.org/wiki/Greyscale_bars/Display. There you will find this program (and more) in many other languages such as Java Python and C, and that is a very good way to learn new programming languages.

h=ceil(graphheight/4)

for row=1 to 4

w=ceil(graphwidth/(8*row))

c=255/(8*row-1)

for n = 0 to (8*row-1)

color rgb(255-c*n,255-c*n,255-c*n)

if row/2 = int(row/2) then color rgb(c*n,c*n,c*n)

rect n*w,h*(row-1),w,h

next n

next row