tomwalters@0
|
1 % procedure for 'aim-mat'
|
tomwalters@0
|
2 %
|
tomwalters@0
|
3 % INPUT VALUES:
|
tomwalters@0
|
4 % column number
|
tomwalters@0
|
5 % RETURN VALUE:
|
tomwalters@0
|
6 %
|
tomwalters@0
|
7 %
|
tomwalters@0
|
8 % helping function, that gives back the current selected module for a given
|
tomwalters@0
|
9 % column number
|
tomwalters@0
|
10 %
|
bleeck@3
|
11 %
|
tomwalters@0
|
12 % (c) 2011, University of Southampton
|
bleeck@3
|
13 % Maintained by Stefan Bleeck (bleeck@gmail.com)
|
bleeck@3
|
14 % download of current version is on the soundsoftware site:
|
bleeck@3
|
15 % http://code.soundsoftware.ac.uk/projects/aimmat
|
bleeck@3
|
16 % documentation and everything is on http://www.acousticscale.org
|
bleeck@3
|
17
|
bleeck@3
|
18
|
tomwalters@0
|
19
|
tomwalters@0
|
20
|
tomwalters@0
|
21
|
tomwalters@0
|
22 function [generating_module,generating_function,coptions]=aim_getcurrent_module(handles,columnnr)
|
tomwalters@0
|
23
|
tomwalters@0
|
24
|
tomwalters@0
|
25 switch columnnr
|
tomwalters@0
|
26 case 2
|
tomwalters@0
|
27 options=handles.all_options.pcp;
|
tomwalters@0
|
28 generating_module=handles.info.current_pcp_module; % this one is selected by the user
|
tomwalters@0
|
29 handles.info.calculated_pcp_module=generating_module; % this one is really calculated
|
tomwalters@0
|
30 generating_functionline=['options.' generating_module '.generatingfunction'];
|
tomwalters@0
|
31 eval(sprintf('generating_function=%s;',generating_functionline'));
|
tomwalters@0
|
32 optline=sprintf('coptions=%s.%s;','handles.all_options.pcp',generating_module);
|
tomwalters@0
|
33 eval(optline);
|
tomwalters@0
|
34 case 3
|
tomwalters@0
|
35 options=handles.all_options.bmm;
|
tomwalters@0
|
36 generating_module=handles.info.current_bmm_module;
|
tomwalters@0
|
37 handles.info.calculated_bmm_module=generating_module; % this one is really calculated
|
tomwalters@0
|
38 generating_functionline=['options.' generating_module '.generatingfunction'];
|
tomwalters@0
|
39 eval(sprintf('generating_function=%s;',generating_functionline'));
|
tomwalters@0
|
40 optline=sprintf('coptions=%s.%s;','handles.all_options.bmm',generating_module);
|
tomwalters@0
|
41 eval(optline);
|
tomwalters@0
|
42 case 4
|
tomwalters@0
|
43 options=handles.all_options.nap;
|
tomwalters@0
|
44 generating_module=handles.info.current_nap_module;
|
tomwalters@0
|
45 handles.info.calculated_nap_module=generating_module; % this one is really calculated
|
tomwalters@0
|
46 generating_functionline=['options.' generating_module '.generatingfunction'];
|
tomwalters@0
|
47 eval(sprintf('generating_function=%s;',generating_functionline'));
|
tomwalters@0
|
48 optline=sprintf('coptions=%s.%s;','handles.all_options.nap',generating_module);
|
tomwalters@0
|
49 eval(optline);
|
tomwalters@0
|
50 case 5
|
tomwalters@0
|
51 options=handles.all_options.strobes;
|
tomwalters@0
|
52 generating_module=handles.info.current_strobes_module;
|
tomwalters@0
|
53 handles.info.calculated_strobes_module=generating_module; % this one is really calculated
|
tomwalters@0
|
54 generating_functionline=['options.' generating_module '.generatingfunction'];
|
tomwalters@0
|
55 eval(sprintf('generating_function=%s;',generating_functionline'));
|
tomwalters@0
|
56 optline=sprintf('coptions=%s.%s;','handles.all_options.strobes',generating_module);
|
tomwalters@0
|
57 eval(optline);
|
tomwalters@0
|
58 case 6
|
tomwalters@0
|
59 options=handles.all_options.sai;
|
tomwalters@0
|
60 generating_module=handles.info.current_sai_module;
|
tomwalters@0
|
61 handles.info.calculated_sai_module=generating_module; % this one is really calculated
|
tomwalters@0
|
62 generating_functionline=['options.' generating_module '.generatingfunction'];
|
tomwalters@0
|
63 eval(sprintf('generating_function=%s;',generating_functionline'));
|
tomwalters@0
|
64 optline=sprintf('coptions=%s.%s;','handles.all_options.sai',generating_module);
|
tomwalters@0
|
65 eval(optline);
|
tomwalters@0
|
66 case 7
|
tomwalters@0
|
67 options=handles.all_options.usermodule;
|
tomwalters@0
|
68 generating_module=handles.info.current_usermodule_module;
|
tomwalters@0
|
69 handles.info.calculated_usermodule_module=generating_module; % this one is really calculated
|
tomwalters@0
|
70 generating_functionline=['options.' generating_module '.generatingfunction'];
|
tomwalters@0
|
71 eval(sprintf('generating_function=%s;',generating_functionline'));
|
tomwalters@0
|
72 optline=sprintf('coptions=%s.%s;','handles.all_options.usermodule',generating_module);
|
tomwalters@0
|
73 eval(optline);
|
tomwalters@0
|
74 case 8
|
tomwalters@0
|
75 options=handles.all_options.movie;
|
tomwalters@0
|
76 generating_module=handles.info.current_movie_module;
|
tomwalters@0
|
77 handles.info.calculated_movie_module=generating_module; % this one is really calculated
|
tomwalters@0
|
78 generating_functionline=['options.' generating_module '.generatingfunction'];
|
tomwalters@0
|
79 eval(sprintf('generating_function=%s;',generating_functionline'));
|
tomwalters@0
|
80 optline=sprintf('coptions=%s.%s;','handles.all_options.movie',generating_module);
|
tomwalters@0
|
81 eval(optline);
|
tomwalters@0
|
82 end |