trying to get him to swing on a pole like walabers gymnast lol
ill get it
`trying to make him swing on a pole lol :P
gosub make_scene
do
`camera
rotate camera camera angle x()+mousemovey(),camera angle y()+mousemovex(),0
if mouseclick()=1 then move camera 1
if mouseclick()=2 then move camera -1
`physics
if spacekey() then phy add rigid body force 2,0,0.5,0,2
`trying to make homeboy get up hahaahah :P
if keystate(2) then phy add rigid body local torque 8,5,0,0,2
if keystate(3) then phy add rigid body local torque 8,0,5,0,2
if keystate(4) then phy add rigid body local torque 8,0,0,5,2
phy update
sync
loop
`*** make scene gosub ***
make_scene:
autocam off : position camera 0,45,-60 : point camera 0,7,0
load image "c:\goodies\textures\bikinis\503.jpg",1
phy start
`ground
make object box 1,500,1,500 : texture object 1,1
`ragdoll
`head
make object sphere 2,5 : position object 2,0,40,0 : color object 2,rgb(255,255,0)
`body
make object box 3,2,12,2 : position object 3,0,31.3,0 : color object 3,rgb(0,200,0)
`right arm joint
make object sphere 4,2 : position object 4,-1.9,36,0 : color object 4,rgb(0,200,0)
`left arm joint
make object sphere 5,2 : position object 5,1.9,36,0 : color object 5,rgb(0,200,0)
`right leg joint
make object box 6,1.5,4,1.5 : position object 6,-1.1,23.4,0 : color object 6,rgb(0,0,200)
`left leg joint
make object box 7,1.5,4,1.5 : position object 7,1.1,23.4,0 : color object 7,rgb(0,0,200)
`right arm
make object box 8,8,1,1 : position object 8,-7,36,0 : color object 8,rgb(255,255,0)
`left arm
make object box 9,8,1,1 : position object 9,7,36,0 : color object 9,rgb(255,255,0)
`right leg
make object box 10,1.8,12,1.8 : position object 10,-1.1,15.2,0 : color object 10,rgb(0,0,200)
`left leg
make object box 11,1.8,12,1.8 : position object 11,1.1,15.2,0 : color object 11,rgb(0,0,200)
`left foot
make object box 12,1.8,2,1.8 : position object 12,-1.1,10.2,1.8 : color object 12,rgb(0,0,200)
`right foot
make object box 13,1.8,2,1.8 : position object 13,1.1,10.2,1.8 : color object 13,rgb(0,0,200)
`pole :P
make object box 14,20,0.4,0.4 : position object 14,0,40,0
phy make rigid body static box 14
phy make rigid body static box 1
for n=2 to 13
phy make rigid body dynamic box n
next n
`joints
phy make sphere joint 1,2,3,0,40.3,0
phy make sphere joint 2,4,3,-1.9,36,0
phy make sphere joint 3,5,3,1.9,36,0
phy make revolute joint 4,6,3,30,0,0,-1.1,25,0
phy make revolute joint 5,7,3,30,0,0,1.1,25,0
`limbs
phy make revolute joint 6,8,4,30,30,30,-2.1,36,0
phy make revolute joint 7,9,5,28,28,28,2.1,36,0
`right leg
phy make revolute joint 8,10,6,25,0,0,-1.1,20.5,0
`left leg
phy make revolute joint 9,11,7,25,0,0,1.1,20.5,0
`left foot
phy make fixed joint 10,10,12
`right foot
phy make fixed joint 11,11,13
`grabbed onto pole :P
phy make revolute joint 12,8,14,10,0,10,0,40,0
return
