Exemples de macros
Les exemples suivants illustrent les différent types de macros.
Mise en évidence du contenu
Cette macro sélectionne le mot avant le curseur, ajoute une balise de mise en forme (par exemple, la mise en forme Italique de la barre d'outils), puis positionne le curseur derrière la balise </emphasis>.
<macro name="MakeItalic">
<desc>Macro recorded 04/01/2004.</desc>
<script type="application/x-acl"><![CDATA[
WordLeftExtend;
Italic;
ElementEnd;]]>
</script>
</macro>
Rechercher et remplacer
Cette macro recherche l'occurrence suivante d'une phrase et la remplace par une entité texte.
<macro name="SwitchToEntity">
<desc>Macro recorded 04/01/2004.</desc>
<script type="application/x-acl"><![CDATA[
#FindReplace;
find("Arbortext Editor", 0xb30);
insert_entity("&AE");]]>
</script>
</macro>
Application d'un marquage à un contenu
Cette macro recherche l'occurrence suivante d'une phrase et l'entoure d'une balise.
<macro name="FixProductName">
<desc>Macro recorded 04/01/2004.</desc>
<script type="application/x-acl"><![CDATA[
#FindReplace;
find("Arbortext Editor", 0xb30);
insert_tag("productname");]]>
</script>
</macro>
Indexation
Cette macro effectue les actions suivantes :
1. Sélectionne les deux mots précédents.
2. Supprime les mots sélectionnés.
3. Insère un élément indexterm avec des enfants primary et secondary.
4. Colle le premier mot dans l'élément primary.
5. Colle le second mot dans l'élément secondary.
<macro name="InsertIndexterm">
<desc>Macro recorded 04/01/2004.</desc>
<script type="application/x-acl"><![CDATA[
WordLeftExtend; repeat;
EditCut;
insert_tag("indexterm");
EditPaste;
WordLeftExtend;
EditCut;
ElementEnd;
insert_tag("secondary");
EditPaste;
ElementEnd; repeat;]]>
</script>
</macro>
JavaScript
L'exemple ci-dessous est une macro écrite à l'aide de JavaScript :
<macro name="JavaScriptMacro"
key="Alt+Ctrl+F1">
<desc>Test JavaScript macro.</desc>
<script type="application/x-javascript"><![CDATA[
Application.alert("Hello from JavaScript macro.");
]]></script>
</macro>
JScript
L'exemple ci-dessous est une macro écrite à l'aide de JScript :
<macro name="JScriptMacro">
<desc>Test JScript</desc>
<script type="application/x-jscript">
Application.alert("Hello from JScript Macro");
</script>
</macro>
VBScript
L'exemple ci-dessous est une macro écrite à l'aide de VBScript :
<macro name="VBScriptMacro">
<desc>Test VBScript</desc>
<script type="text/VBScript"><![CDATA[
Dim doc
set doc=Application.activeDocument
msg = "Hello from VBScript Macro for document " + doc.documentURI
Application.alert(msg)]]></script>
</macro>