sync on
mouse_x = 170
mouse_y = 170
obj1_x = 100
obj1_y = 100
Do
cls
Load bitmap "wash.bmp",0
mouse_x=mousex()
mouse_y=mousey()
PRINT mouse_x
PRINT mouse_y
PRINT obj1_x - 15
PRINT obj1_y - 15
PRINT obj1_x + 15
PRINT obj1_y + 15
circle mouse_x,mouse_y,15
sync
Loop
You do realise that with this code, you're attempting to read the bitmap from the hard drive about once every 1/200th of a second, if not more?
Use this:
sync on
mouse_x = 170
mouse_y = 170
obj1_x = 100
obj1_y = 100
load bitmap "wash.bmp",1
Do
cls
`paste wash.bmp onto bitmap 0 - the screen
copy bitmap 1,0
mouse_x=mousex()
mouse_y=mousey()
PRINT mouse_x
PRINT mouse_y
PRINT obj1_x - 15
PRINT obj1_y - 15
PRINT obj1_x + 15
PRINT obj1_y + 15
circle mouse_x,mouse_y,15
sync
Loop
...and if you're using the 'cls' command just to get the print command to start at the top again, use 'Set Cursor 0,0' instead.
Avatar - white cat in a snowstorm. Look closely.
