; .key SYS/A,RUN/S
; .bra [
; .ket ]
sys:c/assign OLDSYS: SYS:
sys:c/assign SYS: CD0:
failat 21

; First, clear all assignments

oldsys:c/assign >nil: C:
oldsys:c/assign >nil: DEVS:
oldsys:c/assign >nil: FONTS:
oldsys:c/assign >nil: L:
oldsys:c/assign >nil: LIBS:
oldsys:c/assign >nil: S:

; Then assign to CD-ROM

oldsys:c/assign >nil: C: SYS:C
oldsys:c/assign >nil: DEVS: SYS:DEVS
oldsys:c/assign >nil: FONTS: SYS:FONTS
oldsys:c/assign >nil: L: SYS:L
oldsys:c/assign >nil: LIBS: SYS:LIBS
oldsys:c/assign >nil: S: SYS:S

;  Finally, assign to hard disk again

oldsys:c/assign >nil: C: OLDSYS:C ADD
oldsys:c/assign >nil: DEVS: OLDSYS:DEVS ADD
oldsys:c/assign >nil: FONTS: OLDSYS:FONTS ADD
oldsys:c/assign >nil: L: OLDSYS:L ADD
oldsys:c/assign >nil: LIBS: OLDSYS:LIBS ADD
oldsys:c/assign >nil: S: OLDSYS:S ADD

; Set current directory to root of CD-ROM - some disks assume it is there.

cd SYS:

failat 10
execute s:startup-sequence