Line object screen x(drawstartobject+loc(bb)),object screen y(drawstartobject+loc(bb))+90,object screen x(drawstartobject+loc(bb-2)),object screen y(drawstartobject+loc(bb-2))+90ĭepth# = ObjDistToObj(drawstartobject+loc(bb), drawstartobject+loc(bb-2))Ĭenter text (object screen x(drawstartobject+loc(bb))+ object screen x(drawstartobject+loc(bb-2)))/2,(object screen y(drawstartobject+loc(bb))+ object screen y(drawstartobject+loc(bb-2)))/2+95,str$(depth#,4)īwidth# = ObjDistToObj(drawstartobject+loc(bb), drawstartobject+loc(bb-1))Ĭenter text (object screen x(drawstartobject+loc(bb))+ object screen x(drawstartobject+loc(bb-1)))/2,(object screen y(drawstartobject+loc(bb))+ object screen y(drawstartobject+loc(bb-1)))/2+95,str$(bwidth#,4) Width# = ObjDistToObj(drawstartobject+loc(bb), drawstartobject+loc(bb-1))Ĭenter text (object screen x(drawstartobject+loc(bb))+ object screen x(drawstartobject+loc(bb-1)))/2,(object screen y(drawstartobject+loc(bb))+ object screen y(drawstartobject+loc(bb-1)))/2+95,str$(width#,4) Line object screen x(drawstartobject+loc(bb)),object screen y(drawstartobject+loc(bb))+90,object screen x(drawstartobject+loc(bb-1)),object screen y(drawstartobject+loc(bb-1))+90

Line object screen x(drawstartobject+loc(bb)),object screen y(drawstartobject+loc(bb)),object screen x(drawstartobject+loc(bb)),object screen y(drawstartobject+loc(bb))+100 Text object screen x(t),object screen y(t)-170+(pt*3),partname$(pt,0) Line object screen x(t),object screen y(t),object screen x(t),object screen y(t)-150 Text object screen x(t),object screen y(t),str$(t-startobject+1) Print 'left button to pick a model point' Print 'right button to move model and zoom in out' Print 'Arrowkey to move camera about model' `Add a limb onto the object using the mesh we just made Set camera aspect 0,(rightline-twothirds)/((bottomline-topline)+0.0)īackdrop on : color backdrop 0,rgb(0,255,0) Set camera view 0,twothirds,topline,rightline,bottomcamscreen Valuesdisplaymax=((bottomcamscreen-(verthalfline+gap))/18)-2ĭisplaywidthmax=((middleline-leftline)/10)-2

Verthalfline=topline+((bottomcamscreen-topline)/2)ĭisplaymax=((bottomcamscreen-topline)/18)-2 `These variables make the camera rotation faster/slower `Some variables containing the position of the camera in sphere coordinatesĬamDist# = 10.0 :rem how far away from object

Global wheelid4 xlf# ylf# zlf# wheelradiusid4# bodyheightid4# Global wheelid3 xrf# yrf# zrf# wheelradiusid3# bodyheightid3# Global wheelid2 xlb# ylb# zlb# wheelradiusid2# bodyheightid2# Global wheelid1 xrb# yrb# zrb# wheelradiusid1# bodyheightid1# Global depth# baseheight# rooftop# width# baseheight#

Ac3d spin tires