Wobbler

[peter]

Hi,

it's an earth problem...


Uses "ui"

DWord hwin
hwin=Canvas_Window("iCanvasWobbler",320,240,640,480)
Canvas_Attach(hwin,0,%TRUE)


While IsWindow(hwin)
Canvas_BitmapRender("bild.bmp",Rnd(-40,40),Rnd(-40,40),640,480)
Sleep 10
Canvas_Redraw
If GetAsyncKeyState(27) Then Exit While
Wend
Canvas_Window End