// DoradoUnBugDisk.cm
// Last modified by Frank Vest  June 29, 1985

//Create a blank disk with the Install command, invoking the "long"
//dialogue and the "Erase a disk" option.  Then load this command file
//and execute it to build a Dorado Unbug Disk.
Ftp IO Directory/C Alto ^
Retrieve/C Sys.Errors Sys.Syms InstallSwat.Run

InstallSwat

Delete InstallSwat.Run Dmt.Boot Dumper.Boot

Ftp INDIGO ^
Directory/C AltoFonts Retrieve/C Gacha8.al Gacha10.al ^
Directory/C Fonts Retrieve/C Fonts.Widths ^

Ftp IO Directory/C Alto ^
Directory/C Alto Retrieve/C Empress.Run  ^
Bravo.Run Bravo.Error Bravo.Messages

Ftp Io ret <vest>midasuser.cm

Delete user.cm

Rename midasuser.cm user.cm

Bravo/I

copy SysFont.Al _ Gacha10.al

Ftp INDIGO Directory/C Dorado ^
Retrieve/C Midas.Programs DoradoBaseROM.mb  ^
  UpdateEmulators.cm ^
Load/C DoradoMidasRun.dm ^
Load/C Kernel.dm ^
Load/C MemA.dm ^
Load/C MemMisc.dm ^
Load/C Ifu.dm ^
Load/C EventCounters.dm ^
Load/C BootEmu.dm ^
Load/C BootStrap.dm ^
Load/C TriConD.dm ^
Load/C DSEmu.dm ^
Load/C EDP.dm ^
Load/C Diex.dm ^
Load/C Ftest.dm

FTP IO Retrieve <ALTO>EDP.RUN

FTP Indigo Retrieve <Dorado>Aemu.mb

FTP IO LOAD <VEST>GARAGEMIDAS.DM

// UpdateEmulators.cm
// Last modified February 13, 1984 5:31:22 pm PST by Willie-Sue

Ftp Indigo dir/c Dorado ret/'#a Mesa.mb Mesa.midas Cedar.mb Cedar.midas load/'#a DSEmu.dm

Ftp Eris Dir/c <lisp>intermezzo>basics> ret doradolisp.mb

Ftp Eris Dir/c <lisp>fugue.6>Ucode> ret lisp.midas

Midas/i