clear
x=0: 0.01 : 12;
k=0; color=['r-';'y-';'g-'];

while k~=4
k=menu('Selectorder','First','Second','Third','Exit');
H=besselj(k,x);plot(x(1:280),H(1:280),color(k))
%plot(?????????????); 
end;  hold off; close
