This is an application of the Mathematica
built-in functions Tube
. Some control points are provided and the curved tube will follow by bending gently.
Use this control to let the worm crawl 1, 10, 100, or 1000 steps.
This slider controls the thickness of the worm.
This slider selects the spline degree of the worm curve. The higher the degree, the smoother the curve.
This slider controls the agility of the worm. The higher the agility, the more bends it makes.
"light = Neutral/Automatic/None" are three lighting options.
Click this checkbox to show the coordinate axes.
Click this checkbox to show a 6×6 grid in the
Click this checkbox to show a 6×6 gray square (the floor) in the
The worms stays in a box of size 12×12×(2×max height).
Hence the variable "max height" determines how far above or below the 12×12 floor grid the worm can venture.
This slider controls the opacity of the floor.
These controls select the colors of the worm, floor, and background.
The Demonstration runs faster if you unselect "floor" and "grid".