home *** CD-ROM | disk | FTP | other *** search
- /* HTML-Helper Arexx script sample
- * Ver : 1.1 (7th January 1995)
- * Copyright: Paul Kolenbrander (InterNet: paul@serena.iaehv.nl)
- * Function : Pass on the HTML commands from HTML-Helper to AME.
- * Author : Simon Dick, <sidick@essex.ac.uk>
- * Input : HTMLCMD - The HTML command to be inserted.
- */
-
- OPTIONS RESULTS /* enable return codes */
- PARSE ARG MYCMD HTMLCMD
-
- HTMLCMD = SUBSTR(HTMLCMD,2, LENGTH(HTMLCMD)-1) /* strip leading space */
- HTMLCMD = SUBSTR(HTMLCMD,2,LENGTH(HTMLCMD)-2)
-
- ADDRESS 'AME.01' /* The editor's ARexx port */
-
- Text HTMLCMD /* the Insert command */
- EXIT /* And exit the script. */
-