summaryrefslogtreecommitdiff
path: root/graphics/mcf2graph/template_soc.mp
blob: 0c05bf332d992cd0aa330c17d4a85da44b887ea0 (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
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% MCF compile template file                    by Akira Yamaji  2023.05.15
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
if unknown mcftograph: input mcf2graph; fi  %%% it must be version 5.01
message "* mcf_template 2023.05.15";
message "";
%------------------------------------------------------------------------------
%%%%ext(defaultscale:=.3; label.rt(EN,(0,0));)
%------------------------------------------------------------------------------
%%%%ext(defaultfont:=mpfont; defaultscale:=.3;
%%%%label.rt(EN&" / "&mw&" / "&decimal(num_MW-scantokens(MW)),(0,0));)
%------------------------------------------------------------------------------
sw_output:=Fig+Calc;
%------------------------------------------------------------------------------
loadm("f:temp");
%------------------------------------------------------------------------------
for i=1 upto ucount:
  beginfigm
    getm(i);
    putm;
  endfigm
endfor
%******************************************************************************
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
bye