I need help.... read the code to see where...
And... yes... I need it like that... :(
;//Create Body temp$="ODE_CreateBody mybody,"+Chr$(34)+"box"+Chr$(34) If Instr(temp$,"ODE_CreateBody ") ;blah blah cmd$=Replace(temp$,"ODE_CreateBody","") cmd$=Replace(cmd$," ","");tab param_handle$=Replace(cmd$," ","");space my_Handle$=entry$(1,param_handle$) my_shaper$=entry$(2,param_handle$) my_shaper$=Replace(my_shaper$,Chr$(34),"") ;should work... g.TODEGeom = New TODEGeom ;new ode object g\body=ODE_dBodyCreate() DebugLog "ODE BODY CREATED - "+my_handle$ g\name$=my_handle$ ;think it works... works with debug saying it did it... For g.TODEGeom=Each TODEGeom If my_handle$=g\name$ If my_shaper$="sphere" g\geom=ODE_dCreateSphere(space,1,1) DebugLog "g\geom - Sphere Created - "+g\geom Else g\geom=ODE_dCreateBox(space,1,1,1,1) DebugLog "g\geom - Box Created - "+g\geom EndIf EndIf Next ;I cant get the next two commands to go where they are supposed to go... ;I don't know where to put them... It doesn't work any way I've tried... ;I want it to have the conditions of the 'if statement' its commented in... ;I'm sooooo confused.... :( ;Everywhere I put it, I get an error... :( ;If g\name$=my_Handle$ ODE_dGeomSetBody g\geom,g\body:DebugLog "g\body and g\geom combinded";<< THESE ODE_dBodySetPosition(g\body,0,0,0) ;<< COMMANDS DONT WORKY! :( ;EndIf EndIf
And... yes... I need it like that... :(