@Robert The Robot
You can animate manually any bones of your model.Download this example and see how it works.
Cheers.
REMSTART
OBJECT MADE IN 3DMAX AND EXPORTED WITH PANDA EXPORTER PLUG IN
REMEND
hide mouse
make matrix 1,10000.0,10000.0,25,25
load bitmap "cesped2.bmp",1
get image 1,1,1,100,100
get image 2,80,80,120,120
delete bitmap 1
prepare matrix texture 1,1,2,2
randomize matrix 1,50.0
set ambient light 60
sync on
load object "pas.x",70
position object 70,120,100,350
clone object 71,70
position object 71,320,100,350
clone object 72,70
position object 72,520,100,350
parte=1
do
gosub _controla_camara
`ANIMATION COUNTER
cron=cron+1
if cron>400 then cron=0
if cron<200 then rota#=rota#+0.1
if cron>200 then rota#=rota#-0.1
`LEGS
rotate limb 70,11,0,0,rota#
rotate limb 70,3,0,0,rota#
`knees
rotate limb 70,4,0,0,-rota#*2
rotate limb 70,12,0,0,-rota#*2
`right arm
rotate limb 70,21,0,rota#/3,45 `brazo
rotate limb 70,22,0,0,rota#*4 `antebrazo
rotate limb 70,23,0,0,rota#*2
scale limb 70,23,100,100,200
`left arm
rotate limb 70,31,0,-rota#/2,45
if mouseclick()then rotate limb 70,32,a#,cam#,50
rem scale limb 70,32,80,80,80
scale limb 70,33,100,100,200
` it goes up and down with the main limb
offset limb 70,1,-rota#/3,0,0
`waist
rotate limb 70,18,0,0,rota#*2
rotate limb 70,19,rota#,0,0
`========================================
`other DUMY
`right arm
rotate limb 71,21,0,rota#*2,ROTA#*3
rotate limb 71,22,0,-rota#*7,0
`left arm
rotate limb 71,31,0,-rota#*2,ROTA#*3
rotate limb 71,32,0,rota#*7,0
`body and left leg
rotate limb 71,1,0,rota#,0
rotate limb 71,3,0,-rota#,0
rotate limb 71,11,0,0,rota#*3
rotate limb 71,12,0,0,-rota#*6
`========================================
rotate limb 72,11,0,0,-20+rota#*2
rotate limb 72,31,0,0,-20+rota#*2
rotate limb 72,32,0,0,30-rota#
rotate limb 72,12,5,0,-20+rota#
rotate limb 72,3,0,0,20-rota#*2
rotate limb 72,21,0,0,20-rota#*2
rotate limb 72,22,0,0,20+rota#
rotate limb 72,4,-5,0,-rota#
rotate limb 72,19,-20+rota#,0,0
rotate limb 72,18,0,-10+rota#/2,0
sync
loop
_controla_camara:
oldx#=x#
oldz#=z#
rem camera control keys
if upkey()=1 then x#=newxvalue(x#,a#,1) : z#=newzvalue(z#,a#,1)
if downkey()=1 then x#=newxvalue(x#,a#,-1) : z#=newzvalue(z#,a#,-1)
`slice left
if leftkey()=1 THEN x#=NEWXVALUE(x#,a#-90,1):z#=NEWZVALUE(z#,a#-90,1)
`slice ritht
if rightkey()=1 THEN x#=NEWXVALUE(x#,a#-90,-1):z#=NEWZVALUE(z#,a#-90,-1)
a#=wrapvalue(a#+mousemovex()/2)
cam#=wrapvalue(cam#+mousemovey()/2)
rotate camera cam#,0,0
yrotate camera a#
`camera limits
if cam#<=290 and cam#>180 then cam#=290
if cam#>=70 and cam#<180 then cam#=70
position camera x#,145,z#
return
I'm not a grumpy grandpa
