Sorry, you are totaly right. I don't know but I really forget it.
So, I get this:
Block[
 {a = 0.05, T = 90, x1 = 0, y1 = 20, z1 = 40, x2 = 10, y2 = 10, 
  z2 = 0}, ParametricPlot3D[
  {x[t], y[t], z[t]}, {t, 0, T}, 
  AxesLabel -> {"x[t]", "y[t]", "z[t]"}, BoxRatios -> {1, 1, 1}, 
  PlotStyle -> Red
  ]
 ]
But how can I get a Plot3D (if I can)? 
Plot3D[{x[t], y[t], z[t]}, {t, 0, T}, ...]
				
					
				
				
					
					
						
							
							Attachments: