Question: Animation of Archimedes Screw.

Hi I need to animate the Screw of Archimedes using maple, I tried animate3d and insequence=true and both don't work. This is the screw. plot3d([a*cos(x),a*sin(x),3*x],a=-15..15,x=1..8*Pi,axes=framed,scaling=constrained,color=gold,numpoints=4000,style=patch); This is the center cilinder. with(plots):plot2:=implicitplot3d([x^2+y^2=40,z],x=-15..15,y=-15..15,z=1..24*Pi,axes=framed,color=yellow,numpoints=5000); I should also make a function that "lays" on the screw, and a point should be visible going upwards, this should make the water that gets pumped up by the rotating move. And this should all come together, any help? Thanks in advance Koen.
Please Wait...