sub Line3D(x1, y1, z1, x2, y2, z2)

Draws a line in 3D space