blob: 111e9b3b70f06ecb2ebf74341f3db92b07f92023 (
plain)
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
|
function CalcWidth(Hoko,Moji)
global Wfile FID
D=0;
Tmp=ascii(Hoko);
H=char(Tmp(2));
if H=='e'
D=0;
end
if H=='w'
D=-1.0;
end
if H=='c'
D=-0.5;
end
Str1='\settowidth{\Width}{'+Moji+'}';
Tmp=string(D);
Str2='\setlength{\Width}{'+Tmp+'\Width}';
if Wfile=='default'
mprintf('%s',Str1);
mprintf('%s%s\n',Str2,'%');
else
mfprintf(FID,'%s',Str1);
mfprintf(FID,'%s%s\n',Str2,'%');
end
endfunction
|