Code:
; $VER: startup-sequence 39.9 (9.8.92)
C:SetPatch QUIET ;You've already done this in the previous s-s
C:Version >NIL: ; and this
C:AddBuffers >NIL: DF0: 15 ; same here
FailAt 21 ; don't need it
C:MakeDir RAM:T RAM:Clipboards RAM:ENV RAM:ENV/Sys ;better do this in the previous s-s
C:Copy >NIL: ENVARC: RAM:ENV ALL NOREQ ; need to reassign this as it's pointing to the floppy
Resident >NIL: C:Assign PURE
Resident >NIL: C:Execute PURE
Assign >NIL: ENV: RAM:ENV ;do this in the previous s-s
Assign >NIL: T: RAM:T ; same here
Assign >NIL: CLIPS: RAM:Clipboards ; again
Assign >NIL: REXX: S: ; these assigns are already in place
Assign >NIL: PRINTERS: DEVS:Printers ; =
Assign >NIL: KEYMAPS: DEVS:Keymaps; =
Assign >NIL: LOCALE: SYS:Locale ; =
Assign >NIL: LIBS: SYS:Classes ADD ; =
Assign >NIL: HELP: LOCALE:Help DEFER ;=
IF NOT EXISTS SYS:Fonts
Assign FONTS:
EndIF
BindDrivers
C:Mount >NIL: DEVSOSDrivers/~(#?.info)
IF EXISTS DEVS:Monitors ;replace from here
IF EXISTS DEVS:Monitors/VGAOnly ;
DEVS:Monitors/VGAOnly ;
EndIF ;
C:List >NIL: DEVS:Monitors/~(#?.info|VGAOnly) TO T:M LFORMAT "DEVS:Monitors/%s" ;
Execute T:M ;
Celete >NIL: T:M ;
EndIF ;to here with bindmonitors from aminet
SetEnv Workbench $Workbench
SetEnv Kickstart $Kickstart
UnSet Workbench
UnSet Kickstart
C:IPrefs
C:ConClip
Path >NIL: RAM: C: SYS:Utilities SYS:Rexxc SYS:System S: SYS:Prefs SYS:WBStartup SYS:Tools SYS:Tools/Commodities
IF EXISTS S:User-Startup
Execute S:User-Startup
EndIF
Resident Execute REMOVE
Resident Assign REMOVE
C:LoadWB
EndCLI >NIL: