home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format 68 / af068a.adf / disk1.lha / s / Startup-Sequence
Text File  |  1994-12-13  |  1KB  |  66 lines
  1. Addbuffers >NIL: df0: 30
  2. FailAt 21
  3.  
  4. version >NIL: graphics.library 37
  5. IF WARN
  6.    ;less than WB2.04
  7.    echo ""
  8.    echo "Your Amiga requires Workbench 2.04 or above to run Datastore"
  9.    echo "The startup will now be aborted!"
  10.    quit
  11. ELSE
  12.    version >NIL: graphics.library 39
  13.    IF WARN
  14.       ;less than WB3.0
  15.       SetPatch QUIET
  16.    ELSE
  17.       ; WB3.0
  18.       SetPatch3.0 QUIET
  19.    ENDIF
  20. ENDIF
  21.  
  22. Path >NIL: RAM: C: S: SYS:System
  23.  
  24. Resident >NIL: C:Assign PURE
  25. Resident >NIL: C:makedir PURE
  26. Resident >NIL: C:Copy PURE
  27. Resident >NIL: C:delete PURE
  28.  
  29. MakeDir RAM:T RAM:Clipboards RAM:ENV RAM:ENV/Sys
  30. Copy >NIL: ENVARC: RAM:ENV ALL NOREQ
  31.  
  32. Assign >NIL: ENV: RAM:ENV
  33. Assign >NIL: T: RAM:T
  34. Assign >NIL: CLIPS: RAM:Clipboards
  35. Assign >NIL: PRINTERS: DEVS:Printers
  36. Assign >NIL: LIBS: SYS:Classes ADD
  37. Assign >NIL: KEYMAPS: DEVS:Keymaps
  38.  
  39. IF EXISTS DEVS:Monitors
  40.   IF EXISTS DEVS:Monitors/VGAOnly
  41.     DEVS:Monitors/VGAOnly
  42.   EndIF
  43.  
  44.   C:List >NIL: DEVS:Monitors/~(#?.info|VGAOnly) TO T:M LFORMAT "DEVS:Monitors/%s"
  45.   Execute T:M
  46.   C:Delete >NIL: T:M
  47. EndIF
  48.  
  49. C:IPrefs
  50.  
  51. SetEnv Workbench $Workbench
  52. SetEnv Kickstart $Kickstart
  53. UnSet Workbench
  54. UnSet Kickstart
  55.  
  56. IF EXISTS s:User-Startup
  57.   execute s:User-Startup
  58. ENDIF
  59.  
  60. Resident makedir REMOVE
  61. Resident delete REMOVE
  62.  
  63. c:LoadWB
  64.  
  65. ENDCLI >NIL:
  66.