I need to be able to move a single object at 1 pixel resolution.
I tried the following code but it runs at a crawl, not sure what I am doing wrong.......
I will be using Imagescollide to get pixel perfect collision.
Any ideas would be much appreciated.
TIA
Andy
I tried the following code but it runs at a crawl, not sure what I am doing wrong.......
I will be using Imagescollide to get pixel perfect collision.
Graphics 800,600,0,2 SetBuffer BackBuffer() xpos = 1 ypos = 1 Shape = CreateImage(100,60) ;Make Shape Graphic Oval 50,70,40,40,1 Oval 89,80,22,22,1 Oval 110,70,40,40,1 GrabImage shape,50,50 ;Main Loop Repeat Cls xpos=xpos+1 If xpos>679 Then xpos=1:ypos=ypos-1 If ypos<-360 Then End DrawImage shape,10+xpos,515+ypos Flip Until KeyDown(1) End
Any ideas would be much appreciated.
TIA
Andy