; Startup sequence for Hard Disk users...checks for hard disk, then
; transfers control if it is present. (The script assumes FH0: and FH1:)
;
Setpatch >NIL:
binddrivers
mount fh0: from BOOT:devs/MountList.HD
mount fh1: from BOOT:devs/MountList.HD
assign >NIL: FH0: exists
IF NOT WARN
; hard disk is present
assign sys: FH0:
assign c: SYS:c
assign L: SYS:l
assign FONTS: SYS:fonts
assign S: SYS:s
assign DEVS: SYS:devs
assign LIBS: SYS:libs
makedir ram:tr
assign t: ram:tr
execute s:Startup-Sequence
ELSE
; no hard disk
echo "hard drive FH0: not found!"
ENDIF
