1
0
mirror of synced 2026-01-12 00:42:56 +00:00
Interlisp.medley/docs/internal/MakeLispFloppies.doc

100 lines
3.8 KiB
Plaintext

-- MakeLispFloppies.doc
-- Last edit 11-Oct-84 16:27:50 by Masinter
-- Instructions for building Floppies for installing Interlisp-D on 1108s
-- Follow these instructions if running in Mesa 11.1 Tajo or Copilot.
-- To execute these commands, make sure the insertion point is in the
-- Executive window (by clicking left mouse button in Executive window).
-- Then, while holding the "Copy" key down, select the command you want to
-- execute (including the "return" at the end of line.) When you let up on
-- Copy, the command will be "unread" the Executive input buffer.
-- Before you transfer files, you should have approximate 6000 pages
-- in your volume to contain all the files.
-- If you want to keep the files separate, you can work on separate directory
-- to keep files in one place.
Create FloppyFiles -- creates a new directory
push FloppyFiles -- puts the directory on your search path (like Connect)
-- bring over tool for making floppies.
-- Change "Iris" to to the name of the server has Mesa closest to you (Phylum and Rose are candidates)
ftp Iris directory/c Mesa>11.0 retrieve/a<> MakeDLionBootFloppyTool.bcd FloppyInitial.db Mesa.db MoonBoot.db DLion.germ
-- get Lisp specific files:
ftp Eris directory/c Lisp>Harmony>Mesa ret/<>A HelloDLion.boot directory/c Lisp>Harmony>CM retrieve/<>A GetHello.othello GetLisp.othello PartitionLisp.othello PartitionLispTajo.othello PartitionLispStarTajo.othello
-- now start up tool. Execute:
MakeDLionBootFloppyTool.bcd
-- Insert new floppy
-- Make the following settings in MakeDLionBootFloppyTool:
-- Drive: 0 -- default is correct --
-- Floppy Name: LispOthello -- *** CHANGE THIS ONE *** --
-- Initial uCode: FloppyInitial.db -- default is correct --
-- Diagnostic uCode: MoonBoot.db -- default is correct --
-- Pilot uCode: Mesa.db -- default is correct --
-- Germ File: DLion.germ -- default is correct --
-- Boot File: HelloDLion.boot -- *** CHANGE THIS ONE *** --
-- Turn on all three options (Format Floppy, Reserve Last Cylinder For Diagnostics, Install Boot Files) and button Start!
-- Now execute the following WITHOUT REMOVING FLOPPY:
floppy write Lisp11SAx000Initial.db DLion.germ Mesa.db HelloDLion.boot getLisp.othello PartitionLisp.othello PartitionLispTajo.othello PartitionLispStarTajo.othello
floppy info list/v
----------------------------------------------------
-- You have now made a "LispOthello" diskette
----------------------------------------------------
-- To make a floppy with a SYSOUT on it, generally you should use Lisp:
-- COPYFILE of a file to floppy (after FLOPPY.MODE(SYSOUT)) or SYSOUT({FLOPPY})
-- work. However, you can also do this from Tajo:
ftp Eris directory/c Lisp>Harmony>Basics ret/A<> Lisp.SYSOUT
-- Insert a new floppy, then do the following. The "--y" is so that if it asks you if you want to overwrite, it will get a "Yes" response after complaining about the "--", but if it doesn't ask, the "--y" will get ignored.
floppy format "Lisp Sysout '#1"/n
-- y
floppy write lisp.sysout[0..2249]/s lisp.sysout
floppy info list/v
-- Insert a new floppy, and then
floppy format "Lisp Sysout '#2"/n
-- y
floppy write lisp.sysout[2250..4499]/s lisp.sysout
floppy info list/v
-- If SYSOUT>4499 pages, insert a new floppy, and then:
floppy format "Lisp Sysout '#3"/n
-- y
floppy write lisp.sysout[4500..6749]/s lisp.sysout
floppy info list/v
-- If SYSOUT>6749 pages, insert a new floppy, and then:
floppy format "Lisp Sysout '#4"/n 3/f
-- y
floppy write lisp.sysout[6750..8999]/s lisp.sysout
floppy info list/v
floppy format "Lisp Sysout '#5"/n 3/f
-- y
floppy write lisp.sysout[9000..11499]/s lisp.sysout
floppy info list/v
-- done (extend for sysouts bigger than 11500 pages). If any changes to files were made, back up:
-- stop working in the "FloppyFiles" subdirectory
pop