home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Misc / A1200DignosticChecker.DMS / in.adf / S / startup-sequence < prev   
Encoding:
Text File  |  1993-08-31  |  1.5 KB  |  75 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.  
  11. ;Resident >NIL: C:Assign PURE
  12. ;Resident >NIL: C:Execute PURE
  13.  
  14. Assign >NIL: ENV: RAM:ENV
  15. Assign >NIL: T: RAM:
  16. ;Assign >NIL: CLIPS: RAM:Clipboards
  17. ;Assign >NIL: REXX: S:
  18. ;Assign >NIL: PRINTERS: DEVS:Printers
  19. ;Assign >NIL: KEYMAPS: DEVS:Keymaps
  20. ;Assign >NIL: LOCALE: SYS:Locale
  21. ;Assign >NIL: LIBS: SYS:Classes ADD
  22. ;Assign >NIL: HELP: LOCALE:Help DEFER
  23.  
  24. ;IF NOT EXISTS SYS:Fonts
  25. ;  Assign FONTS:
  26. ;EndIF
  27.  
  28. ;BindDrivers
  29. ;C:Mount >NIL: DEVS:DOSDrivers/~(#?.info)
  30. ;
  31. ;IF EXISTS DEVS:Monitors
  32. ;  IF EXISTS DEVS:Monitors/VGAOnly
  33. ;    DEVS:Monitors/VGAOnly
  34. ;  EndIF
  35. ;
  36. ;  C:List >NIL: DEVS:Monitors/~(#?.info|VGAOnly) TO T:M LFORMAT "DEVS:Monitors/%s"
  37. ;  Execute T:M
  38. ;  C:Delete >NIL: T:M
  39. ;EndIF
  40.  
  41. ;SetEnv Workbench $Workbench
  42. ;SetEnv Kickstart $Kickstart
  43. ;UnSet Workbench
  44. ;UnSet Kickstart
  45.  
  46. C:IPrefs
  47.  
  48. ;C:ConClip
  49.  
  50. ;Path >NIL: RAM: C: SYS:Utilities SYS:Rexxc SYS:System S: SYS:Prefs SYS:WBStartup SYS:Tools SYS:Tools/Commodities
  51.  
  52. ;IF EXISTS S:User-Startup
  53. ;  Execute S:User-Startup
  54. ;EndIF
  55.  
  56. ;Resident Execute REMOVE
  57. ;Resident Assign REMOVE
  58.  
  59. echo "*N*N---------- SHOWCONFIG ----------*N"
  60. Showconfig
  61. wait 10
  62.  
  63. set choice=`requestchoice "Diagnostics Request" "Configuration" "Standard|Unknown"`
  64.  
  65. if $choice eq "1"
  66. atsi a1200-ICL-KC
  67. else
  68. if $choice eq "0"
  69. atsi a1200-ICL-UC
  70. else
  71. endif
  72. endif
  73. C:LoadWB
  74. EndCLI >NIL:
  75.