sync on
sync rate 0
`Create purple bitmap half size of screen
create bitmap 1,640,240
ink rgb(255,0,255),0
box 0,0,640,240
ink rgb(255,255,255),0
set current bitmap 0
do
`Does not even copy
if spacekey()
copy bitmap 1,0,1,640,241,0,0,1,640,241
text 10,10,str$(screen fps())
else
`Runs fine
if controlkey()
copy bitmap 1,0
else
`Runs insanely slowly
copy bitmap 1,0,0,640,240,0,0,0,640,240
endif
text 10,10,str$(screen fps())
endif
sync
cls
loop
All three of these ran the same before, now two of them are broken. The really slow one may be that it thinks it has to scale the bitmap, even if the size of the areas specified are the same. I don't have a clue what is up with the other one.