32 bit color map

[SSC]

Code:

screen 20,32,,1

for x=0 to 255:for y = 0 to 255
r=r+1
if r=256 then g=g+1:r=0
if g=256 then b=b+1:g=0
pset (x,y),rgb(r,g,b)
next:next

This doesnt work because there are 3 rgb values and only 2 coordinates that only equal 65536 total colors, there should be a total of 16777216 colors available. but if i simply increase the x and y max values to allow more room for more colors than the colors loop themselves. So how can i get all of the colors in here...i assume i still need higher x and y coordinates, otherwise there wont be enough room.