Function Create3DLine(ent1,ent2,mode=1,size#=0.4)
Select mode
Case 1
m = CreateCylinder(3,0)
Case 2
m = CreateCone(3,0)
Case 3
m = CreateCube()
End Select
RotateMesh m,90,0,0
PositionMesh m,0,0,1
ScaleMesh m,size,size,EntityDistance(ent1,ent2)/2
PositionEntity m,EntityX(ent1,1),EntityY(ent1,1),EntityZ(ent1,1),1
RotateEntity m,0,DeltaYaw(ent1,ent2),0,1
TurnEntity m,DeltaPitch(ent1,ent2),0,0
Return m
End Function