home *** CD-ROM | disk | FTP | other *** search
/ World of A1200 / World_Of_A1200.iso / programs / system / printfiles / english / rexx / show < prev    next >
Text File  |  1995-02-27  |  2KB  |  36 lines
  1. /* ************************************************************* */
  2. /* PrintFiles V1.4e Rev 48 Mar 27 1993  Preferences - Arexx File */
  3. /* generated   Sunday, April 11, 1993  14:11:04 */
  4. /* ************************************************************* */
  5.  
  6.  
  7. /* ************************************************************* */
  8. /* Start Block */
  9. /* ************************************************************* */
  10. options results   /* request results */ 
  11. if ~show(ports,'PRINTFILES')then do   /* PrintFiles already running ? */ 
  12.     address command 'printfiles'    /* if not, attempt to launch it */ 
  13. address command 'sys:rexxc/WaitForPort PRINTFILES'  /* wait...wait...wait */ 
  14. end   /*  */ 
  15. if ~(show(ports,'PRINTFILES')) then return 5   /* return 5 if we couldn't find PrintFiles */ 
  16. address  PRINTFILES  /* Kommandos an PrintFiles */ 
  17.  
  18.  
  19. /* ************************************************************* */
  20. /* Handler Block */
  21. /* ************************************************************* */
  22. pass text 'intern'      /* process text files intern */
  23. pass prog 'intern'      /* process executables intern */
  24. pass icon 'intern'      /* process Icon files intern */
  25. pass iff 'on'     /* pass IFF-files to the shell */
  26. insertiff 'ILBM sys:utilities/display'      /* IFF-Chunk and corresponding program */
  27. insertiff 'ANIM work:dpaintiv/player'      /* IFF-Chunk and corresponding program */
  28. insertiff 'VDEO work:dpaintiv/dvplayer'      /* IFF-Chunk and corresponding program */
  29.  
  30. output 'printer'      /* Output to the printer device  */
  31. header on      /* Send Control Codes to the Printer */
  32.  
  33. /* ************************************************************* */
  34. /* *** End of File *** */
  35. /* ************************************************************* */
  36.