This is ace!
Pea-easy to use, yet swings from tree to tree like an agile super-monkey!
#constant camMain = 1
set display mode 1024, 768, 32 : set window on
sync rate 100 : sync on
make camera camMain : autocam off
set camera range camMain, 0.1,5000
position camera camMain, 1500,200,1500
point camera camMain, 0,0,0
color backdrop camMain, RGB(224,242,248)
phy start
phy set gravity 0, -28, 0
load image "V:\db\fPhy\img\myangel.bmp", 1
load image "V:\db\fPhy\img\themouth.jpg", 2
load image "V:\db\fPhy\img\myangel-tiny.png", 3
sprite 1, 0,0, 3 : sprite 1, screen width() - sprite width(1), screen height() - sprite height(1), 3
make object box 1, 3000, 4, 3000
position object 1, 0,0,0
texture object 1, 1
turn object left 1, 180
phy make rigid body static box 1
for NewObj = 2 to 100
make object box NewObj, 50, 50, 50
position object NewObj, RND(3000)-1500, 200, RND(3000)-1500
rotate object NewObj, rnd(300), rnd(300), rnd(300)
texture object NewObj, 2
phy make rigid body dynamic box NewObj
next NewObj
do
phy update
if upkey()
for NewObj = 2 to 100
phy set rigid body position NewObj, RND(3000)-1500, 200, RND(3000)-1500
next NewObj
endif
sync
loop