--@SystemFilesFloppy.cm
-- modified from MakeLispFloppies.cm
-- last edited  27-Jun-83 22:03:14 by Masinter 
-- last edited by JFung.pasa 13-Sep-84 16:40:13  for Harmony release
-- filed at [Rose]<Lisp>Harmony>Installation>SystemFilesFloppy.cm
-- command file to build Interlisp-D's "System Files" Floppy
-- to run this command file, type @SystemFilesFloppy<CR> on your exec window, from Tajo or Copilot volume

ftp Rose directory/c <Apilot>11.0>Tajo>Public retrieve/a<> TajoDLion.boot
ftp Rose directory/c <Apilot>11.0>DLionMicrocode>Public> retrieve/a<>  Mesa.db 

floppy format "System Files"/n 
floppy write TajoDLion.boot Mesa.db 
floppy info list/v