//
//  Install Fugue.6 on an 1132 customer disk  << PARTITION 1 >>
//  

//  All Lisp Library files (except sources) AND Lisp User files reside on Parition 2.  INIT.LISP should be set up 
//  to reflect this.

delete dmt.boot dumper.boot // garbage on disk
//install swat
ftp Indigo  ^
directory/c Alto retrieve/>A InstallSwat.run Sys.Errors 
InstallSwat
Delete dumper.boot 

//Now create Lisp.virtualmem
ftp Indigo directory/c Alto retrieve/>A CreateFile.run 
CREATEFILE.run LISP.VIRTUALMEM 12000D

//  Install Lisp Systems files

FTP Phylum dir/c <Lisp>Current> Ret/>A ^
LISP.SYSOUT LISP.run LISP.syms ^
DORADOLispMC.eb ^
AltoD1MC.eb ^
Init.Sample ^
Ret/S DoradoInit.nonet Init.NoNet ^
Ret/S CustomerUser.cm User.cm ^

//  Install Lisp fonts

FTP Phylum dir/c lisp>current ret/c InstallFonts.cm
@InstallFonts.cm@

Delete InstallFonts.cm 

//  Install Burn-in test

FTP Phylum Ret/C <Lisp>Test>Test 
FTP Indigo Dir/C Alto Ret/C ^
Scavenger.run KeyTest.run CopyDisk.run Neptune.run ^
Peek.run PeekPup.run EtherWatch.run EDP.run PUPTest.run ^
 
//Scavenge the disk
Scavenger.run

Delete  MakeDoradoPart1.cm