home *** CD-ROM | disk | FTP | other *** search
/ The CDPD Public Domain Collection for CDTV 2 / CDPD_II_2352.bin / s / startup-sequence < prev    next >
Text File  |  1992-11-20  |  967b  |  40 lines
  1. cdpd2:rmtm
  2. cdpd2:1.3/c/assign c: cdpd2:1.3/c
  3. failat 21
  4. cdpd2:bookit v
  5. cdpd2:intro
  6. failat 10
  7.  
  8. cdpd2:c/kicktest
  9. If warn
  10.    cdpd2:c/assign c: cdpd2:c
  11.    cdpd2:c/resident >NIL: cdpd2:c/Execute pure add
  12.    cdpd2:c/resident >NIL: cdpd2:c/Assign pure add
  13.    cdpd2:c/makedir ram:T ram:Clipboards ram:env ram:env/sys
  14.    cdpd2:c/copy >NIL: ENVARC: ram:env all quiet noreq
  15.    assign ENV: ram:env
  16.    assign T: ram:t ;set up T: directory for scripts
  17.    assign CLIPS: ram:clipboards
  18.  
  19.    execute cdpd2:s/startup-sequence2.0
  20.  
  21. else
  22.    cdpd2:1.3/c/assign c: cdpd2:1.3/c
  23.    c:assign sys: cdpd2:1.3
  24.    c:assign l: cdpd2:1.3/l
  25.    c:assign libs: cdpd2:1.3/libs
  26.    c:assign devs: cdpd2:1.3/devs
  27.    c:makedir ram:t
  28.    c:assign t: ram:t
  29.    c:assign s: cdpd2:1.3/s
  30.    resident >NIL: CLI cdpd2:1.3/L/Shell-Seg SYSTEM PURE add
  31.    resident >NIL: cdpd2:1.3/c/Execute PURE
  32.    mount NEWCON: from cdpd2:1.3/devs/mountlist
  33.    ;
  34.    failat 11
  35.  
  36.    execute cdpd2:s/startup-sequence1.3
  37. endif
  38.  
  39. endcli >nil:
  40.