Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ; $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
- SYS:AMB/AMB SYS:AMB SYS:AMB/AMB.iff TIMEOUT 30
- IF WARN
- EndCLI >NIL:
- EndIF
- 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
- 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:
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement