home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Misc / EDG-CT1.DMS / in.adf / CT.run / ARexx / LoadTPaint.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1995-09-07  |  645 b   |  26 lines
  1. /* 
  2.                         Control Tower Arexx Script
  3.                             Load Toaster Paint
  4.                            Written By J.L. White
  5.                          (C)1995 Merlin's Software
  6. */
  7.  
  8. parse arg FileName
  9. OPTIONS RESULTS
  10. FileName = strip(FileName)
  11. TOASTERLIB="ToasterARexx.port"
  12. call remlib('ToasterARexx.port')
  13. call remlib('PROJECT_REXX_PORT')
  14. call addlib('PROJECT_REXX_PORT' , 0)
  15. call addlib(TOASTERLIB,0)
  16. call Switcher(TOSW)
  17. call Switcher(MDV1)
  18. call Switcher(PDV1)
  19. call Switcher( DPTP )
  20. call Switcher( LDTP )
  21. call Switcher( STTP )
  22. call Switcher(TOWB)
  23. call remlib('ToasterARexx.port')
  24. call remlib('PROJECT_REXX_PORT')
  25. exit
  26.