home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / WordProcessors / JFF-WW1.DMS / in.adf / S / startup-sequence
Encoding:
Text File  |  1992-09-02  |  1.8 KB  |  73 lines
  1. c:setpatch QUIET
  2.  
  3. Path >NIL: RAM: C: S:
  4.  
  5. Addbuffers >NIL: df0: 30
  6. FailAt 21
  7.  
  8.  
  9. echo ""
  10. echo "        Wordworth ©1993 Digita International Ltd. Von Ian Potts."
  11. echo ""
  12. echo "  ###################################################################"
  13. echo "  #                                                                 #"
  14. echo "  # Diese Wordworth Amiga 1200/4000 Special Edition ist kostenloser #"
  15. echo "  #             Bestandteil des Desktop Dynamite Packs.             #"
  16. echo "  #                  Nicht für separaten Verkauf.                   #"
  17. echo "  #                                                                 #"
  18. echo "  ###################################################################"
  19.  
  20. version >NIL: graphics.library 39
  21. IF WARN
  22.     echo "Ihr Amiga benötigt die Workbench Version 3 um diese Wordworth"
  23.     echo "Special Edition ausführen zu können."
  24.     echo "Die Installation wird nun abgebrochen."
  25.     quit
  26. endif
  27.  
  28.  
  29.  
  30. Resident >NIL: C:Assign PURE
  31. Resident >NIL: C:makedir PURE
  32. Resident >NIL: C:Copy PURE
  33. Resident >NIL: C:delete PURE
  34.  
  35. MakeDir RAM:T RAM:Clipboards RAM:ENV RAM:ENV/Sys RAM:AgfaFonts RAM:AgfaFonts/Intellifont
  36. Copy >NIL: ENVARC: RAM:ENV ALL NOREQ
  37.  
  38. Assign >NIL: ENV: RAM:ENV
  39. Assign >NIL: T: RAM:T
  40. Assign >NIL: CLIPS: RAM:Clipboards
  41. Assign >NIL: PRINTERS: DEVS:Printers
  42. Assign >NIL: LIBS: SYS:Classes ADD
  43. Assign >NIL: KEYMAPS: DEVS:Keymaps
  44.  
  45. IF EXISTS DEVS:Monitors
  46.   IF EXISTS DEVS:Monitors/VGAOnly
  47.     DEVS:Monitors/VGAOnly
  48.   EndIF
  49.  
  50.   C:List >NIL: DEVS:Monitors/~(#?.info|VGAOnly) TO T:M LFORMAT "DEVS:Monitors/%s"
  51.   Execute T:M
  52.   Delete >NIL: T:M
  53. EndIF
  54.  
  55. SetEnv Workbench $Workbench
  56. SetEnv Kickstart $Kickstart
  57. UnSet Workbench
  58. UnSet Kickstart
  59.  
  60. c:IPrefs
  61.  
  62. IF EXISTS s:User-Startup
  63.     execute s:User-Startup
  64.     Loadlibs ;preload some useful libs and fonts
  65. ENDIF
  66.  
  67. Resident Assign REMOVE
  68. Resident makedir REMOVE
  69. Resident delete REMOVE
  70.  
  71. c:loadwb
  72. endcli >NIL:
  73.