home *** CD-ROM | disk | FTP | other *** search
- .key test/s,full/s
- .bra [
- .ket ]
-
- echo "*Ec*N Bubble & Squeak Hard Drive Installer*N"
-
- lab nameloop
- echo "Which partition do you want to install Bubble to? (eg DH0: Work:) " noline
- set >NIL: target ?
- if "$target" EQ "Q"
- skip exit
- endif
-
- if "`echo $target len 1`" NOT EQ ":"
- set target $target:
- endif
-
- assign >NIL: exists "${Target}"
- if warn
- echo "Error: partition does not exist.*N"
- skip back nameloop
- endif
-
- lab partok
-
- assign Target: "${Target}"
- c:makedir >nil: target:Bubble
- c:copy cls ram:
- ram:cls
- c:copy Bubbl target:Bubble.info
- c:copy Bubble&Squeak target:bubble/
- c:copy Bubble&Squea target:bubble/Bubble&Squeak.info
- lab disk?
- assign >nil: exists Bubble1:
- if warn
- ram:cls
- c:echo "*n*n*n*n*n*n*n*n*n Insert Disk One"
- skip back disk?
- endif
- ram:cls
- c:echo "*n*nPlease wait while i copy disk one..........."
- c:copy >nil: bubble1: target:bubble/ all
- lab disk3?
- assign >nil: exists Bubble2:
- if warn
- ram:cls
- c:echo "*n*n*n*n*n*n*n*n*n Insert Disk Two"
- skip back disk3?
- endif
- ram:cls
- c:echo "*n*nPlease wait while i copy disk two..........."
- c:copy >nil: bubble2: target:bubble/ all
-
- lab exit
- ram:cls
- c:echo "*n*n All done now please reboot!"
-
-