; $VER: Startup-Sequence_HardDrive 40.2 (25.2.93) ; Startup-Sequence for hard drive systems C:SetPatch QUIET C:Version >NIL: C:AddBuffers >NIL: DF0: 15 FailAt 21 C:MakeDir RAM:T RAM:Clipboards RAM:ENV RAM:ENV/Sys C:Copy >NIL: ENVARC: RAM:ENV ALL NOREQ Resident >NIL: C:Assign PURE Resident >NIL: C:Execute PURE Assign >NIL: ENV: RAM:ENV run >nil: C:MagicWB-Demon 4,123,123,123 5,175,175,175 6,170,144,124 7,255,169,151 8,0,0,255 ; Don't remove this entry! Assign >NIL: T: RAM:T Assign >NIL: CLIPS: RAM:Clipboards Assign >NIL: REXX: S: 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
@qntos, post #1
@cholok, post #6
; $VER: Startup-Sequence_HardDrive 40.2 (25.2.93)
; Startup-Sequence for hard drive systems
C:SetPatch QUIET
C:Version >NIL:
C:AddBuffers >NIL: DF0: 15
FailAt 21
C:MakeDir RAM:T RAM:Clipboards RAM:ENV RAM:ENV/Sys
C:Copy >NIL: ENVARC: RAM:ENV ALL NOREQ
Resident >NIL: C:Assign PURE
Resident >NIL: C:Execute PURE
Assign >NIL: ENV: RAM:ENV
run >nil: C:MagicWB-Demon 4,123,123,123 5,175,175,175 6,170,144,124 7,255,169,151 8,0,0,255 ; Don't remove this entry!
Assign >NIL: T: RAM:T
Assign >NIL: CLIPS: RAM:Clipboards
Assign >NIL: REXX: S:
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
BindDrivers
C:Mount >NIL: DEVS:DOSDrivers/~(#?.info)
IF EXISTS DEVS:Monitors
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
C:Delete >NIL: T:M
EndIF
SetEnv Language "english"
SetEnv Workbench $Workbench
SetEnv Kickstart $Kickstart
UnSet Workbench
UnSet Kickstart
C:AddDataTypes REFRESH QUIET
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: @qntos, post #7
@Norbert, post #10
@qntos, post #11
@qntos, post #13
@Norbert, post #16
@Norbert, post #16