[H@NON]

Ивправду, чет я не заметил. Тогда все просто:
img = Createimage( 32, ,32)
setbuffer imagebuffer(img)
for n = 1 to 32
for m = 1 to 32
color Rand(0, 255), Rand(0, 255), Rand(0, 255)
plot m, n
next
next
setbuffer backbuffer

Saveimage( img, "d:\img1.bmp" )