home *** CD-ROM | disk | FTP | other *** search
/ Acorn User 4 / AUCD4.iso / acorn / riscos / patches / printer153 / !Run next >
Text File  |  1996-11-27  |  2KB  |  45 lines
  1. |
  2. | This application is © 1991, 1992, 1993, 1994,1995 Acorn Computers Ltd. 
  3. |                  All Rights Reserved.
  4. |
  5. RMEnsure UtilityModule 3.10 Error This application is only suitable for use with RISC OS 3.10 or later versions
  6. |
  7. Set Printers$Dir  <Obey$Dir>
  8. | Note that this version of !Printers is totally disc based
  9. Set Printers$Path <Obey$Dir>.
  10. Set File$Type_FC6 PrntDefn
  11. Set Alias$@RunType_FC6 Run <Obey$Dir> -pdf %%0
  12. |
  13. Set Printers$ppd 350
  14. RMEnsure UtilityModule 3.50 Set Printers$ppd 310
  15. RMEnsure ParallelDeviceDriver 0.44 RMLoad Printers:Modules.<Printers$ppd>.Parallel
  16. Unset Printers$ppd
  17. |
  18. | maximum memory to be used by PDriverDP (kbytes)
  19. If "<PDriverDP$MaxMem>" = "" Then Set PDriverDP$MaxMem 8192
  20. |
  21. | Ensure that there is enough memory for !Printers, some modules and some workspace
  22. WimpSlot -min 192K -max 192K
  23. WimpSlot -min 128K -max 128K
  24. |
  25. | If there isn't any PDriver module at all, load the one we've got. This ensures that
  26. | the loading of RemotePrinterSupport will at least get past that point.
  27. RMEnsure PDriver               0.00 RMLoad Printers:Modules.PDriver
  28. |
  29. | Ensure that any ROM version is disabled
  30. Set Printers$IsROMV Y
  31. RMEnsure Printers 0.00 Set Printers$IsROMV N
  32. If "<Printers$IsROMV>" = "Y" Then RMKill Printers
  33. Unset Printers$IsROMV
  34. |
  35. RMEnsure ColourTrans           1.50 RMLoad Printers:Modules.Colours
  36. RMEnsure RemotePrinterMessages 1.01 RMLoad Printers:Modules.RemPrnMsgs
  37. RMEnsure RemotePrinterMessages 1.01 Error !Printers needs RemotePrinterMessages version 1.01 or later
  38. RMEnsure RemotePrinterSupport  1.01 RMLoad Printers:Modules.RemPrnSpt
  39. RMEnsure RemotePrinterSupport  1.01 Error !Printers needs RemotePrinterSupport 1.01 or later
  40. |
  41. IconSprites Printers:!Sprites
  42. /<Printers$Dir>.SetPrint
  43. WimpSlot -min 128K -max 128K
  44. /<Printers$Dir>.!RunImage %*0
  45.