Mercurial > hg > aimmat
annotate aim-mat/gui/edit_scale.m @ 4:537f939baef0 tip
various bug fixes and changed copyright message
author | Stefan Bleeck <bleeck@gmail.com> |
---|---|
date | Tue, 16 Aug 2011 14:37:17 +0100 |
parents | 20ada0af3d7d |
children |
rev | line source |
---|---|
tomwalters@0 | 1 % procedure for 'aim-mat' |
tomwalters@0 | 2 % |
tomwalters@0 | 3 % INPUT VALUES: |
tomwalters@0 | 4 % |
tomwalters@0 | 5 % RETURN VALUE: |
tomwalters@0 | 6 % |
bleeck@3 | 7 % |
tomwalters@0 | 8 % (c) 2011, University of Southampton |
bleeck@3 | 9 % Maintained by Stefan Bleeck (bleeck@gmail.com) |
bleeck@3 | 10 % download of current version is on the soundsoftware site: |
bleeck@3 | 11 % http://code.soundsoftware.ac.uk/projects/aimmat |
bleeck@3 | 12 % documentation and everything is on http://www.acousticscale.org |
tomwalters@0 | 13 |
tomwalters@0 | 14 |
tomwalters@0 | 15 function handles=edit_scale(hObject, eventdata, handles) |
tomwalters@0 | 16 |
tomwalters@0 | 17 |
tomwalters@0 | 18 curval=get(hObject,'String'); |
tomwalters@0 | 19 curval=str2num(curval); |
tomwalters@0 | 20 handles.slideredit_scale=... |
tomwalters@0 | 21 slidereditcontrol_set_raweditvalue(handles.slideredit_scale,curval); |
tomwalters@0 | 22 |
tomwalters@0 | 23 |
tomwalters@0 | 24 return |
tomwalters@0 | 25 |
tomwalters@0 | 26 |
tomwalters@0 | 27 |
tomwalters@0 | 28 % strval=str2double(get(hObject,'String')); |
tomwalters@0 | 29 % von=handles.data.min_scale; |
tomwalters@0 | 30 % bis=handles.data.max_scale; |
tomwalters@0 | 31 % if strval>bis |
tomwalters@0 | 32 % strval=bis; |
tomwalters@0 | 33 % end |
tomwalters@0 | 34 % if strval<von |
tomwalters@0 | 35 % strval=von; |
tomwalters@0 | 36 % end |
tomwalters@0 | 37 % val=f2f(strval,von,bis,0,1,'loglin'); |
tomwalters@0 | 38 % val=fround(val,3); |
tomwalters@0 | 39 % set(handles.slider1,'Value',val); |