Its supposed to be sitting there, watching the sphere go around it, but its gone, where'd it go?
sync on
make object cylinder 1,20
xrotate object 1,90
position object 1,0,0,0
make object sphere 2,10
position object 2,0,0,0
rotate=1
size=100
do
position object 2,0,0,0
inc rotate
if rotate=361 then rotate=1
if leftkey()=1 then dec size
if rightkey()=1 then inc size
xrotate object 2,rotate
move object up 2,25
position object 2,object position x(2),object position y(2),object position z(2)
position object 1,0,0,0
position camera 0,0,-100
text 1,1,str$(size)
sync
loop

Dark Basic Pro has arived! I can feel the power!