home *** CD-ROM | disk | FTP | other *** search
- lab 163
- assign af97b: exists >ram:necessary
- search ram:necessary "Mounted" >nil:
- if warn
- echo "*EcPlease insert the *E[33m*E[3mAmiga Format*E[0m Coverdisk."
- else
- skip 164
- endif
- skip 163 back
- lab 164
- endif
- echo "*EcIf you have 2Mb RAM or more, you can play this game directly from this disk."
- echo "If you have and would like to, press 'p' and <return> or to install to"
- echo "an empty, pre-formatted floppy, press 'i' and return."
- setenv >nil: play ?
- if not exists ram:play
- skip 10
- endif
- if not $play EQ p
- skip 10
- endif
- unlzx -a -q x af97b:witness.lzx ram:
- cd ram:
- assign >NIL: WITNESS: ""
- witness
- echo "There does not appear to be enough RAM to run Witness."
- echo "You will have to install to a separate disk. To do so, you need to re-start."
- lab 10
- echo "*EcWould you like to install to a floppy or hard drive?"
- echo "Enter either 'f' or 'h' (the default for this is floppy)."
- setenv >nil: type ?
- if not exists ram:type
- skip 101
- endif
- if not $type EQ h
- skip 101
- lab 109
- endif
- echo "Could you please now enter the path name for your hard drive?"
- echo "E.g. 'dh0:', 'work:test/', etc..."
- setenv >nil: pathname ?
- assign source: af97b:
- failat 21
- cd $pathname >nil:
- if fail
- failat 10
- skip 109 back
- endif
- failat 10
- echo "*EcOK... Installing disk."
- makedir Witness
- unlzx -a -q -bi24 x source:witness.lzx witness/
- copy witness/s/witness.info ""
- skip 110
- lab 101
- endif
- assign source: af97b:
- echo "*EcYou must have a spare disk ready. This must be empty and formatted."
- setenv pathname "df1:"
- lab 103
- echo "Insert the spare disk into df1: (your external drive)"
- ask "and press the <return> key."
- info df1: >ram:check
- search ram:check "af97b" >nil:
- if warn
- skip 104
- endif
- echo "An Amiga Format disk is in df0:"
- skip 103 back
- lab 104
- search ram:check "No disk present" >nil:
- if warn
- skip 105
- endif
- echo "No disk detected in df1:"
- skip 103 back
- lab 105
- cd $pathname >nil:
- echo "*EcInstalling disk."
- install df1:
- relabel df1: Witness
- unlzx -a -q -bi5 -bo5 x source:witness.lzx ""
- echo "The disk is ready."
- lab 110
- echo "Re-boot now."
-