The top = xy-view

>    with(plots):
s1:=spacecurve([xt+0.05,yt,t],trange,color=red):
s2:=spacecurve([xtnew,ytnew,t],new_trange,color=blue):
s12:=display([s1,s2],axes=boxed,thickness=4):
display(s12,topview);

[Maple Plot]

>