blob: 1df8e5e334850f3421ba8fc057eb284af3c4691e (
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
|
// 08.05.21
// 08.07.14
// 10.01.02 bin remade
// 10.11.13 Flattenlist used
function Dashline(varargin)
global MilliIn
Nargs=length(varargin);
Nall=Nargs; Sen=1 ; Gap=1;
Tmp=varargin(Nall);
if type(Tmp)==1 & length(Tmp)==1 & Tmp>0
Tmp1=varargin(Nall-1);
if type(Tmp1)==1 & length(Tmp1)==1 & Tmp1>0
Sen=Tmp1; Gap=Tmp;
Nall=Nall-2;
else
Sen=Tmp; Gap=Sen;
Nall=Nall-1;
end
end
Sen=1000/2.54/MilliIn*Sen;
Gap=1000/2.54/MilliIn*Gap;
for N=1:Nall
Tmp=varargin(N);
Fdata=Flattenlist(Tmp);
for I=1:length(Fdata);
Figdata=Fdata(I);
Makehasen(Figdata,Sen,Gap,0);
end;
end;
endfunction
|