blob: 9b84831512cd6aac34eac819a80450bf545068df (
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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
|
//
// 09,12.05
// 09.12.06
// 09.12.07
// 09.12.20
function Texcom(Meirei)
global Wfile FID;
if Meirei=='\thinlines'
Setpen(1);
return
end
if Meirei=='\thicklines'
Setpen(2);
return
end
if Meirei=='\Thicklines'
Setpen(3);
return
end;
if Meirei=='' // 09.12.07
Tmp=[];
else
Tmp=mtlb_findstr(Meirei,'newline');
end;
if length(Tmp)>0
if Wfile=='default'
mprintf('%s\n','');
else
mfprintf(FID,'%s\n','');
end;
return;
end;
if Wfile=='default'
mprintf('%s%s\n',Meirei,'%');
else
mfprintf(FID,'%s%s\n',Meirei,'%');
end
endfunction
|