Erm my image does not show????
Graphics 640,480,0,32 image=CreateImage(256,256) LockImage(image) SetColor 255,0,0 ; DrawRect 0,0,128,128 UnlockImage(image) Repeat ; Cls DrawImage image,0,0 Flip ; Until KeyDown(KEY_ESCAPE) ; End