Setvirtualresolution(640,480)
ResetTimer()
//Create test sprite cubes
For i=1 to 10
id=CreateSprite(0)
SetSpriteSize(id,32,32)
SetSpriteColor(id,255,0,0,255)
SetSpritePosition(id,Random(0,960),-30)
SetSpritePhysicsOn(id,3)
SetSpritePhysicsVelocity(id,0,Random(10,50))
SetSpritePhysicsAngularVelocity( id,5 )
Next i
Do
Sync()
If Timer()>20 Then Exit
Loop
End
Setvirtualresolution(640,480) ResetTimer() //Create test sprite cubes For i=1 to 10 id=CreateSprite(0) SetSpriteSize(id,32,32) SetSpriteColor(id,255,0,0,255) SetSpritePosition(id,Random(0,960),-30) SetSpritePhysicsOn(id,3) SetSpritePhysicsVelocity(id,0,Random(10,50)) SetSpritePhysicsAngularVelocity( id,5 ) Next i Do Sync() If Timer()>20 Then Exit Loop End