;                  Manually boot the MPE system from the disc.
;
;
; This command file cold loads MPE from the system disc but leaves it to the
; user to answer the questions from INITIAL.  It is invoked as follows:
;
;   hp3000 mpe-ve-man [ <disc-model> ]
;
; ...where the optional disc-model is 7911, 7912, 7914, 7933, 7935, 7936, 7937,
; 7945, 7957B, 7958B, or 7959B.  If the model is omitted, the 7914 is used.
;
; The ADCC is configured to listen for Telnet connections on local port 1054.
; Connecting an HP terminal emulator (for ENQ/ACK support) to the port and
; pressing ENTER will bring up the MPE logon prompt.  The MANAGER.SYS account is
; provided (with no password).
;
; The following media image is used and must be present:
;
;    Disc Image Filename
;    -------------------
;    mpe-ve.<model>.disc
;
;
; NOTES:
;
;  - A newly RESTOREd system disc will be named "mpe-ve-reload.<model>.disc".
;    The file must be renamed "mpe-ve.<model>.disc" for use with this command
;    file (this prevents a new system generation from overwriting a good system
;    disc).
;
;  - Line printer output goes to the file "printer.txt", which is cleared or
;    recreated each time the simulator is restarted.  If you prefer to append
;    each session's output onto the file's previous contents, then remove the
;    "-N" switch from the ATTACH LPA line.
;
;  - If the terminal used for the system console responds to the ENQ/ACK
;    protocol, speed-sensing does not require the user to enter a carriage
;    return.  The default setting for ADCC channel 0 (LOCALACK) is to reply to
;    ENQ with an ACK internally, so the REPLY "\r" command below is not needed,
;    although it is harmless.  However, if the setting is changed to REMOTEACK,
;    then the REPLY will be required.
;
;  - MPE-V/E accepts years only through 2027 before rolling over to 1900.  This
;    For years starting in 2028, this script selects a year in the range
;    2000-2027 whose days of the week and leap-year status are identical to the
;    current year.  For example, February 29, 2028 is a Tuesday, as is February
;    29, 2000.


; Determine the type of system disc to use.

do configure-disc.inc %1


; Set up the console log.

set -N console log=mpe-ve-man.log


; Configure the CPU.

set CPU S58,4096K,IDLE=10


; Configure the simulation environment.
;
; We configure SCP's "GO UNTIL" command to break execution after a delay to
; allow MPE's I/O driver to turn the ATC port around for input.  With this
; configuration, no reply delay is needed.
;
; We also configure the console DELETE key to send the ASCII DEL character.

break delay 100 milliseconds

set console DEL=177


; Configure the I/O devices.

set GIC COUNT=2
set GICA CHANNEL=11
set GICB CHANNEL=9

set ADCC LINEORDER=1-7


; Set the disc mode and attach the configured disc image file.

if "%DEV%" == "DC" set DC0 %MODEL%,BUS=0
set DC1 ENABLED,9144,BUS=1

attach -E %DEV%0 mpe-ve.%MODEL%.disc


; Set up the ADCC to listen for Telnet connections on local port 1054.

attach ADCC 1054


; Load paper into the system line printer.

attach -N LPA printer.txt


; Report that the system is starting.

echo
echo Cold loading the system.
echo
echo For QCTerm sessions, press ENTER for the CI prompt.
echo
echo The current date is %DATE_MM%/%DATE_DD%/%DATE_AA%
echo The current time is %TIME_HH%:%TIME_MM%
echo
echo The character delete key is BACKSPACE.
echo The line delete key is CTRL+X.


; Cold load MPE from the disc.

start