home *** CD-ROM | disk | FTP | other *** search
/ World of A1200 / World_Of_A1200.iso / s / startup-sequence < prev    next >
Text File  |  1995-03-01  |  1KB  |  62 lines
  1. ; $VER: startup-sequence 39.9 (9.8.92)
  2.  
  3. C:SetPatch QUIET
  4. C:Version >NIL:
  5. C:AddBuffers >NIL: DF0: 15
  6. FailAt 21
  7.  
  8. C:MakeDir RAM:T RAM:Clipboards RAM:ENV RAM:ENV/Sys
  9. C:Copy >NIL: ENVARC: RAM:ENV ALL NOREQ
  10. C:Copy S:RAMICON RAM:Disk.info
  11.  
  12. Resident >NIL: C:Assign PURE
  13. Resident >NIL: C:Execute PURE
  14.  
  15. Assign >NIL: ENV: RAM:ENV
  16. Assign >NIL: T: RAM:T
  17. Assign >NIL: CLIPS: RAM:Clipboards
  18. Assign >NIL: REXX: S:
  19. Assign >NIL: PRINTERS: DEVS:Printers
  20. Assign >NIL: KEYMAPS: DEVS:Keymaps
  21. Assign >NIL: LOCALE: SYS:Locale
  22. Assign >NIL: LIBS: SYS:Classes ADD
  23. Assign >NIL: HELP: LOCALE:Help DEFER
  24.  
  25. IF NOT EXISTS SYS:Fonts
  26.   Assign FONTS:
  27. EndIF
  28.  
  29. BindDrivers
  30. C:Mount >NIL: DEVS:DOSDrivers/~(#?.info)
  31.  
  32. IF EXISTS DEVS:Monitors
  33.   IF EXISTS DEVS:Monitors/VGAOnly
  34.     DEVS:Monitors/VGAOnly
  35.   EndIF
  36.  
  37.   C:List >NIL: DEVS:Monitors/~(#?.info|VGAOnly) TO T:M LFORMAT "DEVS:Monitors/%s"
  38.   Execute T:M
  39.   C:Delete >NIL: T:M
  40. EndIF
  41.  
  42. SetEnv Workbench $Workbench
  43. SetEnv Kickstart $Kickstart
  44. UnSet Workbench
  45. UnSet Kickstart
  46.  
  47. C:IPrefs
  48.  
  49. C:ConClip
  50.  
  51. Path >NIL: RAM: C: SYS:Utilities SYS:Rexxc SYS:System S: SYS:Prefs SYS:WBStartup SYS:Tools SYS:Tools/Commodities
  52.  
  53. IF EXISTS S:User-Startup
  54.   Execute S:User-Startup
  55. EndIF
  56.  
  57. Resident Execute REMOVE
  58. Resident Assign REMOVE
  59.  
  60. C:LoadWB
  61. EndCLI >NIL:
  62.