-
Notifications
You must be signed in to change notification settings - Fork 8
/
Copy pathTDALABconfig.m
executable file
·66 lines (50 loc) · 1.64 KB
/
TDALABconfig.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
function TDALABconfig
global TDALABPATH;
TDALABPATH=genpath(pwd);
addpath(TDALABPATH);
global TDALABHOME TEMPFILE;
p=which('tdalab');
cd(p(1:end-8));
TDALABHOME=pwd;
TEMPFILE=horzcat(TDALABHOME,filesep,'userdata',filesep,'tdalabtemp.mat');
global XSpread YSpread ScreenWidth ScreenHeight Spread;
oldUnits=get(0,'Units');
set(0,'Units','characters');
spt=get(0,'MonitorPositions');
spt=spt(1,:);
set(0,'Units','characters');
WinSize=get(0,'ScreenSize');
XSpread=1;
YSpread=1;
Spread=min(XSpread,YSpread);
global PixelPt;
PixelPt=spt(3)/WinSize(3);
set(0,'Units','characters');
WinSize=get(0,'ScreenSize');
ScreenWidth=WinSize(3);
ScreenHeight=WinSize(4);
set(0,'Units',oldUnits);
%% UIFontSize -- normalized
global nFontSize defaultFontName sFontSize lFontSize varFontName;
nFontSize=.8;
sFontSize=8; % fixed small font size
lFontSize=11; % fixed large font size
defaultFontName='Times New Roman';
varFontName=defaultFontName;
%% UIControlSize -- characters
global defaultCtrlHeight defaultCtrlWidth defaultVSpace defaultHSpace;
defaultCtrlHeight=1.5*YSpread;
defaultCtrlWidth=30*XSpread;
defaultVSpace=YSpread;
defaultHSpace=XSpread;
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% colormap
global backGroundColor colorMap pbBackGroundColor;
pbBackGroundColor=[0.9412 0.9412 0.9412];
backGroundColor = [0.831372549019608 0.815686274509804 0.784313725490196];
colorMap = [ 1 0 0
0 1 0
0 0 1
1 1 0
0 1 1
1 0 1 ];