Converting blitz2d to max

BlitzMax Forums/BlitzMax Programming/Converting blitz2d to max

Curtastic
 #1
hmm I guess I meant a Plot.
Plotting one pixel plots 9. according to the readpixel information.

Graphics 800,600

i=CreateImage(10,10)
Plot 5,5
GrabImage i,0,0

p=LockImage(i)
For y=0 Until 10
	For x=0 Until 10
		Print ReadPixel(p,x,y) & $FF 'print the blue value of each pixel
	Next
Next
UnlockImage(i)