blob: a17c9e95060cb781aa7bd0f6e30f98f6ea7cd2c8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
//
// 09.02.27
// 14.03.05 MARKLEN
function Setmarklen(varargin)
global MARKLEN MARKLENInit MARKLENNow;
Nargs=length(varargin);
if Nargs==0
Tmp=MARKLEN/MARKLENInit;
Tmp=round(Tmp*100)/100;
disp(Tmp);
return;
end;
Size=varargin(1);
MARKLEN=MARKLENInit*Size;
MARKLENNow=MARKLEN;
endfunction
|