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
|
%----- Beef up the graphics ---------------------
function grphset(fHnd,PP)
FntNme = 'Times New Roman';
FntSze = 10;
FntAng = 'normal';
GrfLnW = .01;
set(fHnd,'PaperType','a4letter', ...
'PaperOrientation','portrait', ...
'PaperUnits','centimeters', ...
'PaperPosition',PP);
aHnd = get(fHnd,'Children');
for j = 1:length(aHnd)
set(aHnd(j), 'FontName',FntNme, 'FontSize',FntSze, 'FontAngle', FntAng);
set(get(aHnd(j),'Title' ), 'FontName',FntNme, 'FontSize',FntSze, 'FontAngle', FntAng);
set(get(aHnd(j),'XLabel'), 'FontName',FntNme, 'FontSize',FntSze, 'FontAngle', FntAng);
set(get(aHnd(j),'YLabel'), 'FontName',FntNme, 'FontSize',FntSze, 'FontAngle', FntAng);
set(get(aHnd(j),'ZLabel'), 'FontName',FntNme, 'FontSize',FntSze, 'FontAngle', FntAng);
chHnd = get(aHnd(j),'Children');
for i=1:length(chHnd)
if get(chHnd(i),'Type')=='line'
set(chHnd(i),'LineWidth',GrfLnW);
end
if get(chHnd(i),'Type')=='text'
set(chHnd(i),'FontName',FntNme,'FontSize',FntSze, 'FontAngle', FntAng);
end
end
end
|