function callback_test

shg         %%Show Graph
clf reset   %%Reset all properties of graph
fig=gcf;
ax=gca;

set(fig,'doublebuffer','on','menubar','non',...       %... Can be used to extend lines! Yeh!
    'numbertitle','off','name','Box_Try',...
    'nextplot','add');

handles.stop = uicontrol('string','quit', ...
   'units','normal','pos',[.85 .02 .08 .06])

while get(handles.stop,'value')==0


handles.reg = uicontrol('style','edit',...
    'string','input', ...
    'units','normal','pos',[.4 .02 .08 .06]);
   
f1=str2double(get(handles.reg,'String'));

handles.slider=uicontrol('style','slider',...
    'min',0,'max',20,...
    'units','normal',...
    'pos',[.2 .02 .2 .06])

handles.step = uicontrol('string','step', ...
   'units','normal','pos',[.65 .02 .08 .06], ...
   'callback',{@test_function,f1});

end

function test_function(obj,eventdata,f1)

    x=2;
    y=f1;
    plot(x,f1);