FnOff 
ClrDraw
AxesOff
GridOff
CoordOff
LabelOff
PlotsOff 
ClrHome
Input "Qmin=",A
Input "Qmax=",B
Input "Qstep=",C
ClrHome
For(Q,A,B,C)
y1(Q)=W
y2(Q)=X
y3(Q)=Y
y4(Q)=Z
Line(W,X,Y,Z)
End