home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The CDPD Public Domain Collection for CDTV 1
/
CDPD_Vol1.bin
/
s
/
startup-sequence
< prev
next >
Wrap
Text File
|
1992-06-24
|
960b
|
40 lines
cd0:rmtm
cd0:1.3/c/assign c: cd0:1.3/c
failat 21
cd0:bookit v
cd0:c/m >NIL: cd0:s/titlepic.iff nomouse secs 2 fade 2
failat 10
cd0:c/kicktest
If warn
cd0:c/assign c: cd0:c
cd0:c/resident >NIL: cd0:c/Execute pure add
cd0:c/resident >NIL: cd0:c/Assign pure add
cd0:c/makedir ram:T ram:Clipboards ram:env ram:env/sys
cd0:c/copy >NIL: ENVARC: ram:env all quiet noreq
assign ENV: ram:env
assign T: ram:t ;set up T: directory for scripts
assign CLIPS: ram:clipboards
execute cd0:s/startup-sequence2.0
else
cd0:1.3/c/assign c: cd0:1.3/c
c:assign sys: cd0:1.3
c:assign l: cd0:1.3/l
c:assign libs: cd0:1.3/libs
c:assign devs: cd0:1.3/devs
c:makedir ram:t
c:assign t: ram:t
c:assign s: cd0:1.3/s
resident >NIL: CLI cd0:1.3/L/Shell-Seg SYSTEM PURE add
resident >NIL: cd0:1.3/c/Execute PURE
mount NEWCON: from cd0:1.3/devs/mountlist
;
failat 11
execute cd0:s/startup-sequence1.3
endif
endcli >nil: