home *** CD-ROM | disk | FTP | other *** search
/ Fish 'n' More 2 / fishmore-publicdomainlibraryvol.ii1991xetec.iso / fish / text / general / texify / texifysetmacro.ced < prev    next >
Text File  |  1991-02-15  |  2KB  |  50 lines
  1. /********************************************************************************/
  2. /* ARexx program         TeXifySetMacro    V 1.00    (Oct 90)        */
  3. /*                                        */
  4. /*              With  this  ARexx  program you can set TeX's        */
  5. /*              macropackage  from  within  CEDPro.   TeXify        */
  6. /*              will notice a macro change.  This program is        */
  7. /*              part  of  the  great  TeXify package and may        */
  8. /*              only  be  spread as part of it.  For further        */
  9. /* Copyright 1990      information  see  the  additional readme and        */
  10. /* by Wolf-Juergen Faust  arexx files you MUST get with this program !        */
  11. /* Am Dorfgarten 10      For   a   new   TeXify   version  call  FIDO        */
  12. /* W-6000 Frankfurt 50      +(49) 6173 2544 (HST DS) or contact me...        */
  13. /* Germany                                    */
  14. /* FIDO: 2:243/43.5 (Wolf Faust)                        */
  15. /* UUCP: cbmvax.commodore.com!cbmehq!cbmger!venus!wfaust            */
  16. /* Tel: +(49) 69 5486556                            */
  17. /*                                        */
  18. /*    YOU MUST ADOPT THE FIRST COMMAND TO YOUR ENVIRONMENT !!!!!!!!!!!!    */
  19. /*    =================================================================    */
  20. /*                                        */
  21. /* Versions needed:                                */
  22. /* ARexx >= V 1.10  (tested: 1.10, 1.12, 1.14)                    */
  23. /* CEDPro>= V 2.00  (tested: 2.10, 2.11, 2.12)                    */
  24. /* TeX   >= V 2.09o (tested: 2.09o, 2.09p)                    */
  25. /********************************************************************************/
  26.  
  27. /* Insert path for Manx's(!) Set command:                    */
  28. setpath = "tex:c/Set"
  29.  
  30.  
  31.  
  32. /*** START ***/
  33. /*** program receives answers ***/
  34. options results
  35.  
  36. /*** now lets get to business with CygnusEd ***/
  37. address 'rexx_ced'
  38.  
  39. 'GetString' "plain" "Macropackage ?"
  40. macro = result
  41. if (macro="") | (macro="RESULT") then do
  42.     okay1 "No selection ?? Aborted..."
  43.     exit
  44.     end
  45. okay2 "Set macropackage = "||macro||" ?"
  46. if ( result = 0) then exit
  47.  
  48. address command setpath||' texformat='||macro
  49. if (show('P','AmigaTeX')) then address 'AmigaTeX' 'Exit'
  50.