-
Notifications
You must be signed in to change notification settings - Fork 5
/
mpsy_init.m
100 lines (77 loc) · 3.22 KB
/
mpsy_init.m
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
% Usage: mpsy_init
%
% to be called at the beginning of a new experiment
%
% input: (none), works on global variables
% output: (none)
%
% Copyright (C) 2006 Martin Hansen, FH OOW
% Author : Martin Hansen, <psylab AT jade-hs.de>
% Date : 25 Okt 2006
% Updated: < 8 Apr 2013 08:41, martin>
% Updated: <25 Okt 2006 21:27, hansen>
%% This file is part of PSYLAB, a collection of scripts for
%% designing and controlling interactive psychoacoustical listening
%% experiments.
%% This file is free software; you can redistribute it and/or modify
%% it under the terms of the GNU General Public License as published
%% by the Free Software Foundation; either version 2 of the License,
%% or (at your option) any later version. See the GNU General
%% Public License for more details: http://www.gnu.org/licenses/gpl
%% This file is distributed in the hope that it will be useful,
%% but WITHOUT ANY WARRANTY; without even the implied warranty of
%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
if mpsy_querysplash,
clc
type PSYLAB_SPLASH
pause(1)
stmp = input(' OK, I UNDERSTAND, AND I AGREE \n by pressing the "y" key followed by RET ', 's');
if ~strcmp(stmp, 'y'),
fprintf('\n\n Thanks and good-bye, then.\n')
return
end
end
fprintf('\n\n *** Start of a new experiment. ALL psylab variables are now deleted. ***\n')
% clear variable M (and all its fields) belonging to PSYLAB (if any)
% also clear MI (storing individual runs' M for interleaved tracks)
clear M MI
% close the answer GUI, if one is present
tmp = findobj('Tag', 'psylab_answer_gui');
if ~isempty(tmp),
close(tmp);
% in case the existing figures gets closed, its DeleteFcn gets
% called, which will set M.QUIT to 1.
end
% reset overall quit-flag, indicating a quit of the whole experiment
% This needs to be done AFTER an existing psylab gui has been
% deleted, because that figure's DeleteFcn will set M.QUIT to 1
M.QUIT = 0;
% clear all gui handles pertaining to the answer GUI and all
% possibly existing signal like m_quiet, m_test etc.
clear tmp afc_* m_*
% values for M.EARSIDE: only left, only right or binaural
global M_BINAURAL
M_BINAURAL = 0; % 1. possible value of M.EARSIDE, predefined value
global M_LEFTSIDE
M_LEFTSIDE = 1; % 2. possible value of M.EARSIDE, predefined value
global M_RIGHTSIDE
M_RIGHTSIDE = 2; % 3. possible value of M.EARSIDE, predefined value
% values for M.DIRECTION: direction of last change of M.VAR
global M_UP
M_UP = 1; % 1. possible value of M.DIRECTION, predefined value
global M_DOWN
M_DOWN = -1; % 2. possible value of M.DIRECTION, predefined value
global M_STAY
M_STAY = 0; % 3. possible value of M.DIRECTION, predefined value
% values for M.MODE
global M_LISTENER
M_LISTENER = 1; % 1. possible value of M.MODE, meaning: listening test with subject
global M_SIMULATION
M_SIMULATION = 2; % 2. possible value of M.MODE, meaning: simulation via model
% let these variables exist, needed by mpsy_info.m
afc_fb = [];
afc_info = [];
% End of file: mpsy_init.m
% Local Variables:
% time-stamp-pattern: "40/Updated: <%2d %3b %:y %02H:%02M, %u>"
% End: