home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Misc / GTS-STRT.LHA / shareware / examplescripts / Standard.Script < prev   
Encoding:
Text File  |  1992-09-02  |  1.9 KB  |  100 lines
  1. ; $VER: startup-sequence 39.9 (9.8.92)
  2.  
  3. C:SetPatch QUIET
  4.  
  5. C:Version >NIL:
  6. C:AddBuffers >NIL: DF0: 15
  7. FailAt 21
  8.  
  9.  
  10. Resident >NIL: C:Assign PURE
  11. Resident >NIL: C:Execute PURE
  12.  
  13. Assign ENV: DH0:T
  14. Assign T: DH0:T
  15. Assign >NIL: CLIPS: DH0:T
  16. Assign >NIL: REXX: S:
  17. Assign >NIL: PRINTERS: DEVS:Printers
  18. Assign >NIL: KEYMAPS: DEVS:Keymaps
  19. Assign LOCALE: SYS:Locale
  20. Assign LIBS: SYS:Classes ADD
  21. Assign >NIL: HELP: LOCALE:Help DEFER
  22.  
  23.  
  24. BindDrivers
  25. C:Mount >NIL: DEVS:DOSDrivers/~(#?.info)
  26.  
  27. IF EXISTS DEVS:Monitors
  28.   IF EXISTS DEVS:Monitors/VGAOnly
  29.     DEVS:Monitors/VGAOnly
  30.   EndIF
  31.  
  32.   C:List >NIL: DEVS:Monitors/~(#?.info|VGAOnly) TO T:M LFORMAT "DEVS:Monitors/%s"
  33.   Execute T:M
  34.   C:Delete >NIL: T:M
  35. EndIF
  36.  
  37. SetEnv Workbench $Workbench
  38. SetEnv Kickstart $Kickstart
  39. UnSet Workbench
  40. UnSet Kickstart
  41.  
  42. C:ConClip
  43.  
  44. Path >NIL: RAM: C: SYS:Utilities SYS:Rexxc SYS:System S: SYS:Prefs SYS:WBStartup SYS:Tools SYS:Tools/Commodities
  45.  
  46. copy  dh0:ram.info ram:disk.info
  47.  
  48. ; This mounts KCON and KRAW
  49. Mount KCON: from DEVS:KingCON-mountlist
  50. Mount KRAW: from DEVS:KingCON-mountlist
  51.  
  52. ;BEGIN ImageFX
  53. Assign "ImageFX:" "WorkOut:Utilities/Graphic/ImageFX"
  54. If NOT EXISTS ENV:ImageFX
  55.   Makedir ENV:ImageFX
  56. EndIf
  57. SetEnv ImageFX/JPEG_Smoothing ON
  58. ;END ImageFX
  59.  
  60. Assign REAL: dh1:utilities/graphic/real3d/
  61.  
  62. ;BEGIN MUI
  63. if exists "WorkOut:Utilities/System/MUI"
  64.    assign MUI: "WorkOut:Utilities/System/MUI"
  65.    if exists MUI:Libs
  66.       assign add LIBS: MUI:Libs
  67.    endif
  68.    if exists MUI:Locale
  69.       assign add LOCALE: MUI:Locale
  70.    endif
  71.    version >nil: exec.library 39
  72.    if not warn
  73.       if exists MUI:Docs
  74.          if exists HELP:dummy ; do not remove
  75.          endif                ; this entry!
  76.          assign add HELP: MUI:Docs
  77.       endif
  78.    endif
  79. endif
  80. ;END MUI
  81.  
  82. ;BEGIN AmiTCP/IP
  83. assign AmiTCP: Production:Surfing/AmiTCP
  84. path AmiTCP:bin add
  85. Assign APIPE: Exists > NIL:
  86. IF Warn
  87.   Mount APIPE: from AmiTCP:devs/APipe-Mountlist
  88. EndIf
  89. ;END AmiTCP/IP
  90.  
  91.  
  92.  
  93. Resident Execute REMOVE
  94. Resident Assign REMOVE
  95.  
  96. C:LoadWB
  97. C:NoKlik
  98. C:Endcli
  99.  
  100.