I am new to tokamak. I have tried a few things but none of them seem to work.
First of all, why doesn't this work?
Also, any advice on tokomak in general would be very helpful.
Please post any useful ideas!
First of all, why doesn't this work?
Graphics3D 640,480 SetBuffer BackBuffer() tok_setupphysics(2,0,0,-1,0) light=CreateLight() camera=CreateCamera() PositionEntity camera,0,3,-10 TOKSIM_SetMaterial(1,.1,.5) sphere=CreateSphere() PositionEntity sphere,0,5,0 tok_sphere=TOKRB_Create() TOKGEOM_SetMaterialIndex(tok_sphere,1) TOKRB_AddSphere(tok_sphere,1) TOKRB_SetPosition(tok_sphere,0,5,0) bowl=CreateSphere() ScaleEntity bowl,5,.1,5 tok_bowl=TOKRB_Create() TOKGEOM_SetMaterialIndex(tok_bowl,1) TOKRB_AddBox(tok_bowl,5,1,5) While Not KeyDown(1) PositionEntity sphere,TOKRB_GetX(tok_sphere),TOKRB_GetY(tok_sphere),TOKRB_GetZ(tok_sphere) TOKSIM_Advance .02,1 UpdateWorld RenderWorld Flip Wend End TOKSIM_DestroySimulator() Function TOK_SetUpPhysics(rigids,anims,gx#,gy#,gz#) TOKSIM_SetRigidBodiesCount rigids TOKSIM_SetAnimatedBodiesCount anims TOKSIM_SetGeometriesCount rigids+anims TOKSIM_SetOverlappedPairsCount ((rigids+anims)*((rigids+anims)-1))/2 TOKSIM_CreateSimulator(gx,gy,gz) End Function
Also, any advice on tokomak in general would be very helpful.
Please post any useful ideas!