https://zh-cn.arcowiki.com/index.php?action=history&feed=atom&title=%E5%AE%8F宏 - 版本历史2026-04-08T07:54:11Z本wiki的该页面的版本历史MediaWiki 1.29.1https://zh-cn.arcowiki.com/index.php?title=%E5%AE%8F&diff=182&oldid=prevSlia：创建页面，内容为“'''Macro''' are sub-routines that allow to compact a sequence of instructions in a single command.<br/> The macro command can be in the main program or in an externa…”2018-06-11T10:01:56Z<p>创建页面，内容为“'''Macro''' are sub-routines that allow to compact a sequence of instructions in a single command.<br/> The macro command can be in the main program or in an externa…”</p>
<p><b>新页面</b></p><div>'''Macro''' are sub-routines that allow to compact a sequence of instructions in a single command.<br/><br />
The macro command can be in the main program or in an external file.<br/><br />
<br />
== ==<br />
If the macro description is inside the [[DMIS]] program, it should be written at the beginning of it but, in any case, prior to the execution of the Macro command itself.<br/><br />
<br />
<code><span style="color: green; text-decoration: none;">$$ Example of a MACRO declaration</span><br/></code><br />
::<code>M(foro)=MACRO/off_x,off_y,'nome_ci'</code><br />
::::<code> DECL/LOCAL,DOUBLE,r_foro,z_mis</code><br />
::::<code> r_foro=ASSIGN/6.25</code><br />
::::<code> z_mis=ASSIGN/-2.5</code><br />
::::<code> F(@nome_ci) = FEAT/CIRCLE, INNER, CART, off_x, off_y, z_mis, 0, 0, 1, r_foro*2</code><br />
::::<code> MEAS/CIRCLE, F(@nome_ci), 4</code><br />
::::<code> GOTO/off_x, off_y, 7</code><br />
::::<code> PTMEAS/CART, off_x+r_foro, off_y, z_mis, -1, 0, 0</code><br />
::::<code> PTMEAS/CART, off_x, off_y+r_foro, z_mis, 0, -1, 0</code><br />
::::<code> PTMEAS/CART, off_x-r_foro, off_y, z_mis, 1, 0, 0</code><br />
::::<code> PTMEAS/CART, off_x, off_y-r_foro, z_mis, 0, 1, 0</code><br />
::::<code> GOTO/off_x, off_y, 7</code><br />
::::<code> ENDMES</code><br />
::::<code><span style="color: green; text-decoration: none;">$$ End of Macro Declaration</span><br/></code><br />
::<code>ENDMAC</code><br />
<br />
::<code><span style="color: green; text-decoration: none;">$$ instructions</span><br/></code><br />
::<code><span style="color: green; text-decoration: none;">$$ instructions</span><br/></code><br />
<br />
<code><span style="color: green; text-decoration: none;">$$ Recall to execute the macro</span><br/></code><br />
::<code>CALL/M(foro),12.5,12.5,foro1</code><br />
<br />
::<code><span style="color: green; text-decoration: none;">$$ instructions</span><br/></code><br />
::<code><span style="color: green; text-decoration: none;">$$ instructions</span><br/></code><br />
<br />
<br />
== ==<br />
If the macro is located in an external file (for example to make sure that the macro can be shared between more programs), then the macro file shall be inserted in the program using the procedure to [[Include an External Macro File]] at the beginning of the program using an ‘EXTFIL’ command.<br />
In this case the macros are recalled from the specified external file.<br />
<br />
<code><span style="color: green; text-decoration: none;">$$ Use of an external file containing macro declaration</span><br/></code><br />
::<code>EXTFIL/DMIS,'c:\cim\MACRO.dmi'<br/></code><br />
<br />
<br />
The [[External Macro File|external macro file]] has “.DML” extension, begins with <code>DMISMD/</code> and ends with <code>ENDFIL/</code>.<br/><br />
Inside of the file, the syntax is the same as a regular [[DMIS]] program.<br />
<br />
<br />
<code><span style="color: green; text-decoration: none;">$$ Declaration of different Macro in an external file</span><br/></code><br />
<code>DMISMD/'module_name'</code><br/><br />
::<code><span style="color: green; text-decoration: none;">$$ First Macro declaration</span><br/></code><br />
::<code>M(macro_1)=MACRO/passedtext</code><br />
::::<code>TEXT/OPER,CONCAT('You passed the following text to the macro: ',passedtext)</code><br />
::<code>ENDMAC</code><br/><br />
::<code><span style="color: green; text-decoration: none;">$$ Second Macro declaration</span><br/></code><br />
::<code>M(macro_2)=MACRO/num1,num2</code><br />
::::<code>DECL/DOUBLE,sumres</code><br />
::::<code>sumres=ASSIGN/num1+num2</code><br />
::::<code>EXT/OPER,CONCAT('The sum of the 2 numbers is: ',STR(sumres))</code><br />
::<code>ENDMAC</code><br />
<code>ENDFIL</code><br />
<br />
[[it:Macro]]<br />
[[zh-cn:宏]]<br />
[[pt:Macro]]<br />
[[de:Makro]]<br />
[[es:Macro]]<br />
[[en:Macro]]</div>Slia