; Load DUS-III from the tape.


; Set up the log(s).

set -N console debug=IOMAP-debug.log
set -N console log=IOMAP.log


; Establish the initial environment.

echo
echo Configuring the simulation environment.

set CPU 512K,CIS

set console DEL=177

break delay 30 milliseconds

set GIC  count=3
set GICA channel=5
set GICB channel=9
set GICC channel=11

set DC  count=3
set DCA channel=11
set DCB channel=9
set DCC channel=5

set DCB0 7941
set DCC0 7957

set imba debug=csrw;data
set gica debug
set gicb debug
set gicc debug
set cpp  debug
set dca  debug=cmd;inco;state;serv
set dcb  debug=cmd;inco;state;serv
set dcc  debug=cmd;inco;state;serv


echo
echo
echo -----------------------------
echo Diagnostic Utility System III
echo -----------------------------
echo
echo Loading DUS-III.


; Cold load the DUS-III tape.

attach -e -r MS0 DUS-III.tape
boot MS0


echo
echo Configuring the diagnostic.

deposit SWCH 2


; Load and start the diagnostic.
;
; The diagnostic loads from tape and then waits for a <CR>.

echo
echo Starting the diagnostic.

reply "\r" delay 2 seconds

go until "\r\n:" ; reply "IOMAP\r"
go until "\r\n>" ; reply "GO\r"

go until "\r\n:"

exit