great bit of code, wonder what happens in the end.
hope you don't mine, but manage to get it down to nineteen lines for you. (I am sure you would have got there.)
autocam off:sync on:make object box 1,20,10,20:make object box 2,5,50,5:offset limb 2,0,0,25,0:make mesh from object 1,2
delete object 2:add limb 1,1,1:link limb 1,0,1:add limb 1,2,1:link limb 1,1,2:offset limb 1,2,0,50,0:make object box 50,1300,1,1300
make object box 100,10,10,10:set object radius 100,6:make mesh from object 2,100:add limb 1,3,2:link limb 1,2,3
offset limb 1,3,0,50,0:hide limb 1,3:color object 1,rgb(100,100,0):color object 100,rgb(0,255,0):position object 50,0,-30,0
position object 100,0.3,0,-63:position camera -150,120,-150:point camera 0,0,0:m=40:color object 50,rgb(10,30,0):hide mouse
do:t=t+1:if t=30 then t=0:m=m+1
if m>50 and m<60 then inc rod#,0.1
rotate limb 1,1,rod#,0,0:if m>70 and m<100 or m>130 and m<162 then inc bas#,0.1
rotate limb 1,0,0,bas#,0:if m>110 and m<120 then inc gr#,0.1:dec rod#,0.2
rotate limb 1,2,gr#*5,0,0:if m>165 and m<188 then inc rod#,0.1:dec gr#,0.01
if m>188 and m<300 then position object 100,limb position x(1,3),limb position y(1,3),limb position z(1,3):rotate object 100,0,bas#,0
if m>200 and m<270 then inc bas#,0.03:dec rod#,0.03
if m>300 and m<303 then move object down 100,1:else:if m>303 and m<306 then move object up 100,0.5:rotate object 100,rnd(20),rnd(20),rnd(20):else:if m>306 and m<309 then move object down 100,0.5:rotate object 100,0,0,0:position object 100,-30,0,6
if m>320 and m<440 then move object left 1,0.03
if object collision(100,1)>0 then point object 100,object position x(1),0,object position z(1):move object 100,-0.03
if m>430 and m<490 then sc#=sc#+0.2:scale object 100,100+sc#,100+sc#,100+sc#
if m>430 and m<445 then inc bas#,0.5:move object left 1,0.01:else:if m>470 and m<520 then dec bas#,0.5: move object 1,0.5:point object 100,object position x(1),0,object position z(1)
if m>520 then position object 1,50,0,50:rotate object 1,rnd(2),rnd(2),rnd(2):position camera 0,50,0:point camera 55,10,55
sync:loop
Dark Physics makes any hot drink go cold.