home *** CD-ROM | disk | FTP | other *** search
/ World of A1200 / World_Of_A1200.iso / programs / text / textra / scripts / starttextra.rexx < prev    next >
OS/2 REXX Batch file  |  1995-02-27  |  318b  |  13 lines
  1. /* load a file into Textra */
  2. arg filename
  3.  
  4. if ~show('l','rexxsupport.library') then
  5.     if ~addlib('rexxsupport.library',0,-30) then
  6.         exit 25
  7.  
  8. if ~show('Ports', 'TEXTRA') then
  9.     address command 'run >nil: <nil: Textra "'filename'"'    / * start textra */
  10. else
  11.     address 'TEXTRA' 'openfile' '"'filename'"'
  12.  
  13.