home *** CD-ROM | disk | FTP | other *** search
/ Dream 45 / Amiga_Dream_45.iso / Amiga / Magazine / Dossier-LaTeX / PasTeX-GED.lha / PasTeX-GoldED / Letterhead.ged < prev    next >
Text File  |  1994-10-11  |  697b  |  27 lines
  1. /* Script loads your preferred letterhead */
  2.  
  3. /* $VER: 0.9, ⌐1993 Dietmar Eilert. Empty GoldED macro */
  4.  
  5. OPTIONS RESULTS                             /* enable return codes     */
  6.  
  7. if (LEFT(ADDRESS(), 6) ~= "GOLDED") then    /* not started by GoldEd ? */
  8.     address 'GOLDED.1'
  9.  
  10. 'LOCK CURRENT'                              /* lock GUI, gain access   */
  11. OPTIONS FAILAT 6                            /* ignore warnings         */
  12. SIGNAL ON SYNTAX                            /* ensure clean exit       */
  13.  
  14. 'OPEN INSERT="tex:doc/Letterhead.tex"'
  15. 'GOTO LINE=9'
  16. 'GOTO COLUMN=15'
  17.  
  18. 'UNLOCK' /* VERY important: unlock GUI */
  19. EXIT
  20.  
  21. SYNTAX:
  22.  
  23. SAY "Sorry, error line" SIGL ":" ERRORTEXT(RC) ":-("
  24. 'UNLOCK'
  25. EXIT
  26.  
  27.