my catapult has had too much
how do i stop it fro getting the shakes?
cls
sync on
sync rate 30
rem these will be static
make object box 1,50,1,50
make object box 2,5,20,5
make object box 3,5,20,5
make object box 4,5,5,40
make object sphere 5,15,5,8
position object 2,15,10,15
position object 3,15,10,-15
position object 4,15,22.5,0
position object 5,20,0,0
rem these will be our moving parts
make object box 6,45,5,5
make object box 7,15,1,15
make object box 8,15,8,1
make object box 9,15,8,1
make object box 10,1,8,15
position object 6,-2.5,5,0
position object 7,-32.5,3,0
position object 8,-32.5,7,0
move object 8,7.5
position object 9,-32.5,7,0
move object 9,-7.5
position object 10,-39.5,7,0
rem give me something to launch :)
make object sphere 11,7,5,10
position object 11,-36,10,0
position camera -150,0,30
point camera 0,0,0
phy start
for object=1 to 5
phy make rigid body static box object
next object
for object=6 to 11
phy make rigid body dynamic box object
next object
phy make revolute joint 1,5,6,0,0,10,20,0,0
phy make fixed joint 2, 6, 7
phy make fixed joint 3, 7, 8
phy make fixed joint 4, 7, 9
phy make fixed joint 5, 7, 10
do
text 10,10,str$(object position z(11))+" "+str$(object position y(11))
phy update
sync
loop
nvm i figured it out and it rocks lol
first problem was phystart needs to be called before you even make your shapes not just assign them in the physical world...and secondly if your object is joined by 2 others and they are joined then you should have 3 fixed joints not just 2 so all 3 of them would have 2 fixed joints leading to the other 2 this secures the object soundly...I also added a reload by pressing enter...and a launch power by holding the space bar(launches when released)
REM Project: catapult
REM Created: 8/14/2006 11:44:00 PM
REM
REM ***** Main Source File *****
REM
cls
sync on
sync rate 60
phy start
rem these will be static
make object box 1,50,1,50
make object box 2,5,20,5
make object box 3,5,20,5
make object box 4,5,5,40
make object sphere 5,15,5,8
position object 2,15,10,15
position object 3,15,10,-15
position object 4,15,22.5,0
position object 5,20,7.5,0
rem these will be our moving parts
make object box 6,45,5,5
make object box 7,15,1,15
make object box 8,15,8,1
make object box 9,15,8,1
make object box 10,1,8,15
position object 6,-2.5,5,0
position object 7,-32.5,3,0
position object 8,-32.5,7,0
move object 8,7.5
position object 9,-32.5,7,0
move object 9,-7.5
position object 10,-39.5,7,0
rem give me something to launch :)
make object sphere 11,7,5,10
position object 11,-36,10,0
position camera -150,0,30
point camera 0,0,0
for object=1 to 4
phy make rigid body static box object
next object
phy make rigid body dynamic sphere 5
for object=6 to 10
phy make rigid body dynamic box object
next object
phy make rigid body dynamic sphere 11
phy make revolute joint 1,5,6,0,0,180,20,0,0
phy make fixed joint 10,5,1
phy make fixed joint 2, 6, 7
phy make fixed joint 3, 8, 10
phy make fixed joint 4, 9, 7
phy make fixed joint 5, 10, 9
phy make fixed joint 6, 10, 7
phy make fixed joint 7, 8, 7
do
text 10,10,str$(launchpower)
if spacekey()=1 and launchpower < 4000000 then inc launchpower,10000
if spacekey()=0
phy add rigid body force 6, 0,-launchpower, 0, -30,0, 0, 1
launchpower=0
endif
if returnkey()=1
phy delete rigid body 11
position object 11,-36,10,0
phy make rigid body dynamic sphere 11
endif
phy update
sync
loop
Ink all over the screen...and dang it! Signature still does not show.
