; Test :ABORTIO on the ADCC.


; Set up the console log.

set -N console log=adcc-ve-test.log


; Configure the CPU.

set CPU S58,4096K,IDLE=10
set CPU STOP=COLDLOAD


; Configure the I/O devices.

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

set DC0 7914,BUS=0
set DC1 ENABLED,9144,BUS=1


; 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 ADCC 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


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

attach ADCC 1054


; Attach the configured disc image file.

attach -E DC0 mpe-ve-reload.7914.disc


; Cold load MPE from the disc.

start


echo
echo
echo -------------------
echo MPE-V/E %MODEL% System
echo -------------------
echo


; Specify the startup options.

go until "WHICH OPTION <WARMSTART/COOLSTART>? " ; reply "COOLSTART\r"
go until "ANY CHANGES? "                        ; reply "NO\r"


; Set the current date and time.

go until "DATE (M/D/Y)?" ; reply "%DATE_MM%/%DATE_DD%/%DATE_YY%\r"
go until "TIME (H:M)?"   ; reply "%TIME_HH%:%TIME_MM%\r"
go until "(Y/N)"         ; reply "Y\r"


; Set up the test.

set adcc debug,nodebug=pserv
set cpp  debug,filter=2-15
set cpu  debug=irq;exec
set cpu  exec=020302
go until ".\r\n:" ; reply "FILE LP;DEV=LP\r"
go until "\r\n:"  ; reply "FCOPY FROM=TEXT;TO=*LP\r"
go until "?"      ; reply "Y\r"

set -n console debug=adcc-ve-debug.log

go until "\r\n:"  ; reply "ABORTIO 6\r"
go

set console nodebug