tuklusan/TWONKY-8XDUP-HACK.LOG

## TWONKY-8XDUP-HACK.LOG
#####
# We bump up the number of DUP lines on TWONKY
# dup0 = DECNET
# dup1 - dup3 = ANF10
#
# We do 4 lines because SimH allows 4 lines
#
# NOTE: We can have 8 DUP lines on TWONKY but running it under
#       SimH's support of max 4 lines causes numerous problems
#       So stick to 4 DUP lines
#
# I have simply followed instructions from gurus at HECnet
# For more information on patching TOPS-10 7.04 NET on KS10 processor
# please reach out to HECnet: http://www.update.uu.se/~bqt/hecnet.html
#####

localuser@myhostname:~/simh.run/twonky/bin$ screen -r twonky
BOOT>[1,5]SYSTEM
[Loading from DSKA:SYSTEM.EXE[1,5]]

SIMH KS10 TWONKY 7.04NET 15-Nov-21
Why reload: SCHED
Date:
Time:
Startup option: GO
[Rebuilding the system search list from the HOM blocks]

[Rebuilding the active swapping list from the HOM blocks]

[Rebuilding the system dump list from the HOM blocks]


SIMH KS10 TWONKY 7.04NET 00:09:12 CTY system 4998
Connected to Node TWONKY(37) Line # 32
.LOGIN 1,2
.R OPR

[CCPWFD Waiting for file daemon to start]
%% Node VENTI(20) up at :09:18
%%TTY STOMPER - Not starting
%FRCLIN INITIA - Logging out
%% Node HUGIN(2) up at :09:20
%% Node MUNIN(3) up at :09:23
OPR>
 0:09:25          -- Message from the Accounting System --
                Account validation is not required

 0:09:27          --  Network topology  --

Nodes on-line:
BALDER (4)      ODEN   (1)      MUNIN  (3)      HUGIN  (2)      VENTI  (20)


 0:09:27        -- Begin auto take file --
                File: SYS:SYSTEM.CMD[1,4]

 0:09:27        -- End auto take file --
                36 lines processed

OPR>
 0:09:28        Reader 0  -- Started --

OPR>
 0:09:29        FAL-Stream 0  -- Started --

OPR>
 0:09:35        FAL-Stream 1  -- Started --

OPR>enter ncp
NCP>take nodnam.cmd

 0:10:04        NCP

Request # 9; Set Node Completed

 0:10:04        NCP

....
....

Request # 926; Set Node Completed

 0:10:26        NCP

Request # 927; Set Node Completed

 0:10:26        NCP

Request # 928; Set Node Completed

NCP>return
OPR>exit

.net
[ANF10 network: connected to TWONKY(37), located at TWONKY(37), 6 nodes]
Node    ODEN    (1)     Oden Tops10 7.04        12-Nov-21
Node    HUGIN   (2)     HUGIN Tops10 7.04       12-Nov-21
Node    MUNIN   (3)     MUNIN Tops10 7.04       12-Nov-21
Node    BALDER  (4)     BALDER Tops10 7.04      12-Nov-21
Node    VENTI   (20)    SIMH KS10 VENTI 7.04 NET        18-Nov-21
Node    TWONKY  (37)    SIMH KS10 TWONKY 7.04NET        15-Nov-21

[DECnet network: local node TWONKY, 51 reachable nodes in area 31]
(31.153)        AHIMSA  CAIR    CGOING  CLOUDY  CSHORE  FEDACH  FOMFOR  IBM390
IMPRTR
IMPVAX  JUICHI  KARMA   KETURA  LV      MACOS7  MACOS9  MOKSHA  MOSHML  NANAJU
NJEVX1  NJEVX2  NOFAR   OSTARA  PIPY    PYDNET  PYRTR   QCOCAL  RAPTOR  RST101
SEACOW  SEAHAG  SEAPIG  SHAKTI  TOWEL   TRAINS  TRU64   TSTVAX  TSVMSA  TSVMST
TSVMSZ  TWENEX  TWONKY  VAXSTN  W2000S  WEXPEE  WFW311  WXPEE2  XL      XLIV
XLVII

.
.; ADD SOME NODES TO SYSTEM.CMD
.
.
.TYPE [1,4]SYSTEM.CMD
; Startup file for TWONKY - RLA [13-NOV-2021] ...

; General system configuration ...
CONFIG ADD MEMORY 512K 1024K
DISABLE OUTPUT-DISPLAY ALL-MESSAGES /JOB
ENABLE VOLUME-RECOGNITION TAPE-DRIVES

; Start up the printer ...
SET PRINTER 0 PAGE-LIMIT 2000
START PRINTER 0

; Start up the batch queues ...
SET BATCH-STREAM 0 TIME-LIMIT 0:10      ;TIME: 0 TO 10 MINUTES
SET BATCH-STREAM 1 TIME-LIMIT 0:60      ;TIME: 0 TO 1 HOUR
SET BATCH-STREAM 2 TIME-LIMIT 10:100000 ; FOR LONG STREAMS
START BATCH-STREAM 0:2

; Start the card reader ...
START READER 0

; Start the DECnet network ...
;   Sampsa, you can add your own node names here.  TOPS-10 has no permanent
; node name database ...
ENTER NCP
SET NODE 1.13 NAME MIM
SET NODE 2.1023 NAME A2RTR
SET NODE 2.1 NAME LEGATO
SET NODE 2.20 NAME VENTI
SET CIRCUIT KDP-0-0 STATE ON
RETURN

; Start up FAL for DECNET ...
SET FAL-STREAM 0 NETWORK DECNET
SET FAL-STREAM 1 NETWORK DECNET
START FAL-STREAM 0
START FAL-STREAM 1

.
.TECO [1,4]SYSTEM.CMD

[2K Core]
*AAAA$$
*SVENTI$$
*I
SET NODE 31.1 NAME IMPVAX
SET NODE 31.2 NAME KARMA
SET NODE 31.3 NAME PYRTR
SET NODE 31.10 NAME QCOCAL
SET NODE 31.37 NAME TWONKYYKNOWT EMAN 7340 NAME TWONK2
SET NODE 31.1020 NAME MOKSHA
SET NODE 31.1021 NAME PYDNET
SET NODE 31.1022 NAME AHIMSA
SET NODE 31.1023 NAME IMPRTR$$
*EX$$

.TYPE [1,4]SYSTEM.CMD
; Startup file for TWONKY - RLA [13-NOV-2021] ...

; General system configuration ...
CONFIG ADD MEMORY 512K 1024K
DISABLE OUTPUT-DISPLAY ALL-MESSAGES /JOB
ENABLE VOLUME-RECOGNITION TAPE-DRIVES

; Start up the printer ...
SET PRINTER 0 PAGE-LIMIT 2000
START PRINTER 0

; Start up the batch queues ...
SET BATCH-STREAM 0 TIME-LIMIT 0:10      ;TIME: 0 TO 10 MINUTES
SET BATCH-STREAM 1 TIME-LIMIT 0:60      ;TIME: 0 TO 1 HOUR
SET BATCH-STREAM 2 TIME-LIMIT 10:100000 ; FOR LONG STREAMS
START BATCH-STREAM 0:2

; Start the card reader ...
START READER 0

; Start the DECnet network ...
;   Sampsa, you can add your own node names here.  TOPS-10 has no permanent
; node name database ...
ENTER NCP
SET NODE 1.13 NAME MIM
SET NODE 2.1023 NAME A2RTR
SET NODE 2.1 NAME LEGATO
SET NODE 2.20 NAME VENTI
SET NODE 31.1 NAME IMPVAX
SET NODE 31.2 NAME KARMA
SET NODE 31.3 NAME PYRTR
SET NODE 31.10 NAME QCOCAL
SET NODE 31.40 NAME TWONK2
SET NODE 31.1020 NAME MOKSHA
SET NODE 31.1021 NAME PYDNET
SET NODE 31.1022 NAME AHIMSA
SET NODE 31.1023 NAME IMPRTR
SET CIRCUIT KDP-0-0 STATE ON
RETURN

; Start up FAL for DECNET ...
SET FAL-STREAM 0 NETWORK DECNET
SET FAL-STREAM 1 NETWORK DECNET
START FAL-STREAM 0
START FAL-STREAM 1

.
.; Lets also add PIPY to the list of nodes in SYSTEM.CMD ...
.TECO [1,4]SYSTEM.CMD

[2K Core]
*SQCOCAL$$
*I
SET NODE 31.32 NAME PIPY$$
*EX$$

.
.
.
.TYPE [1,4]SYSTEM.CMD
; Startup file for TWONKY - RLA [13-NOV-2021] ...

; General system configuration ...
CONFIG ADD MEMORY 512K 1024K
DISABLE OUTPUT-DISPLAY ALL-MESSAGES /JOB
ENABLE VOLUME-RECOGNITION TAPE-DRIVES

; Start up the printer ...
SET PRINTER 0 PAGE-LIMIT 2000
START PRINTER 0

; Start up the batch queues ...
SET BATCH-STREAM 0 TIME-LIMIT 0:10      ;TIME: 0 TO 10 MINUTES
SET BATCH-STREAM 1 TIME-LIMIT 0:60      ;TIME: 0 TO 1 HOUR
SET BATCH-STREAM 2 TIME-LIMIT 10:100000 ; FOR LONG STREAMS
START BATCH-STREAM 0:2

; Start the card reader ...
START READER 0

; Start the DECnet network ...
;   Sampsa, you can add your own node names here.  TOPS-10 has no permanent
; node name database ...
ENTER NCP
SET NODE 1.13 NAME MIM
SET NODE 2.1023 NAME A2RTR
SET NODE 2.1 NAME LEGATO
SET NODE 2.20 NAME VENTI
SET NODE 31.1 NAME IMPVAX
SET NODE 31.2 NAME KARMA
SET NODE 31.3 NAME PYRTR
SET NODE 31.10 NAME QCOCAL
SET NODE 31.32 NAME PIPY
SET NODE 31.40 NAME TWONK2
SET NODE 31.1020 NAME MOKSHA
SET NODE 31.1021 NAME PYDNET
SET NODE 31.1022 NAME AHIMSA
SET NODE 31.1023 NAME IMPRTR
SET CIRCUIT KDP-0-0 STATE ON
RETURN

; Start up FAL for DECNET ...
SET FAL-STREAM 0 NETWORK DECNET
SET FAL-STREAM 1 NETWORK DECNET
START FAL-STREAM 0
START FAL-STREAM 1

.
.
.; NOW ADD A WELCOME MESSAGE
.
.MAKE SYS:NOTICE.TXT

*I ___   _   _  ___   ___   _             _     _         _
 / __| /_\ | \| \ \ / /_\ | |   _ _  ___| |_  | |  __ _ |__ ___
 \__ \/ _ \| .` |\ V / _ \| |__| ' \/ -_)  _| | |__/ _` | '_ (_-<
 |___/_/ \_\_\|_| |/_/ \_\____|_||_\___|\__| |____\__,_|_.__/__/

 WELCOME TO TOPS-10 VERSION 7.04 ON A DEC PDP-01 KS1 PROCESSOR$$
*EX
$$

.TYPE SYS:NOTICE.TXT
  ___   _   _  ___   ___   _             _     _         _
 / __| /_\ | \| \ \ / /_\ | |   _ _  ___| |_  | |   __ _| |__ ___
 \__ \/ _ \| .` |\ V / _ \| |__| ' \/ -_)  _| | |__/ _` | '_ (_-<
 |___/_/ \_\_|\_| |_/_/ \_\____|_||_\___|\__| |____\__,_|_.__/__/

 WELCOME TO TOPS-10 VERSION 7.04 ON A DEC PDP-10 KS10 PROCESSOR
.
.; GOOD
.
.
.
Monitor SIMH KS10 TWONKY 7.04NET
System uptime :50:47
Current date/time Saturday 27-Nov-121 1:00:00


.
.
.; Fix permissions for notice.txt, there probably is a
.; easier command on TOP-10 ...
.
.
.copy sys:notice.txt<055>=sys:notice.txt

.dir sys:notice.txt


NOTICE  TXT     1  <055>   27-Nov-21    DSKA:   [1,4]

.kjob
[LGNJSP Other jobs same PPN]
Job 2  User OPR  [1,2]
Logged-off CTY  at  1:22:47  on 27-Nov-121
Runtime: 0:08:23, KCS:4074, Connect time: 1:13:35
Disk Reads:945, Writes:52, Blocks saved:0

.login guest
Job 2  SIMH KS10 TWONKY 7.04NET  CTY
[LGNLAS Last access to [14,14] succeeded on 16-Nov-121:17:10:43]
01:22   27-Nov-121   Saturday
  ___   _   _  ___   ___   _             _     _         _
 / __| /_\ | \| \ \ / /_\ | |   _ _  ___| |_  | |   __ _| |__ ___
 \__ \/ _ \| .` |\ V / _ \| |__| ' \/ -_)  _| | |__/ _` | '_ (_-<
 |___/_/ \_\_|\_| |_/_/ \_\____|_||_\___|\__| |____\__,_|_.__/__/

 WELCOME TO TOPS-10 VERSION 7.04 ON A DEC PDP-10 KS10 PROCESSOR
.
.kjob
Job 2  User GUEST  [14,14]
Logged-off CTY  at  1:23:19  on 27-Nov-121
Runtime: 0:00:00, KCS:1, Connect time: 0:00:27
Disk Reads:43, Writes:8, Blocks saved:0

.login 1,2
Job 2  SIMH KS10 TWONKY 7.04NET  CTY
[LGNJSP Other jobs same PPN]
%LGNSVM Set maximum virtual and physical limits failed
[LGNLAS Last access to [1,2] succeeded on 16-Nov-121:04:51:01]
01:23   27-Nov-121   Saturday

.; NOTICE.TXT works :)
.
.; START OF RECIPE FOR 8 LINES OF DUP11
.
.
.R SETSRC


*CP [10,7,MON]

*^C

.DIR NETPRM.MAC


NETPRM  MAC    75  <155>   29-Feb-88    DSKB:   [10,7,MON]

.
.COPY NETPRM.ORG=NETPRM.MAC

.TECO NETPRM.MAC

[2K Core]
*AAAAAAAA$$
[3K Core]
[4K Core]
[5K Core]
*AAAAAAAA$$
[6K Core]
[7K Core]
*AAAAAAAA$$
[8K Core]
[9K Core]
*SMXNDUP$$
*0TT$$
        MXNDUP==^D2             ;MAXIMUM NUMBER OF DUP-11'S ON THE KMC-11
*3C$$
*T$$
D2              ;MAXIMUM NUMBER OF DUP-11'S ON THE KMC-11
*2D$$
*ID8$$
*0TT$$
        MXNDUP==^D8             ;MAXIMUM NUMBER OF DUP-11'S ON THE KMC-11
*EX$$

.
.
.; REASSEMBLE NETPRM.MAC
.COMPIL/COMPIL NETPRM
MACRO:  NETPRM

EXIT

.
.
.DIR [10,7,MON,KS]NETPRM.*

%WLDNSF No such files as [10,7,MON,KS]NETPRM.*

.DIR REL:NETPRM.*

%WLDNSF No such files as REL:NETPRM.*

.; SO NO NEED TO COPY NETPRM.REL
.
.
.
.; NOW TACKLE D8KINT, KDPSER, and KDPINT
.
.COMPIL/COMPIL D8KINT
MACRO:  D8KINT
        KDPSER
        KDPINT

EXIT

.
.DIR D8KINT*


D8KINT  MAC   231  <155>   16-Feb-88    DSKB:   [10,7,MON]
D8KINT  REL    37  <057>   27-Nov-21
  Total of 268 blocks in 2 files on DSKB: [10,7,MON]

.
.DIR [10,7,MON,KS]TOPS10.REL


TOPS10  REL  2300  <057>    4-Nov-21    DSKB:   [10,7,MON,KS]

.COPY [10,7,MON,KS]TOPS10.ORG=[10,7,MON,KS]TOPS10.REL

.
.
.DIR REL:TOPS10.REL


TOPS10  REL  2300  <055>    4-Nov-21    DSKA:   [5,11]

.COPY REL:TOPS10.ORG=REL:TOPS10.REL

.
.
.; NOW WE REPLACE D8KINT, KDPSER AND KDPINT IN BOTH COPIES OF TOPS10.REL IN [10,
7,MON,KS] AND REL:
.
.; WE TEMPORARILY USE X.REL AND THEN COPY X.REL TO TOPS10.REL IN PROPER PLACES..
.
.
.COPY REL:X.REL=REL:TOPS10.REL

.R MAKLIB

*REL:X.REL=REL:TOPS10.REL/MASTER:D8KINT,[10,7,MON]D8KINT.REL/REPLACE:D8KINT
?WLDLKE Non-existent SFD file REL:D8KINT.REL[10,7,MON]
?MKLTFR  all TRANSACTION files rejected by conditions

*^C

.; THAT DIDN'T WORK; COPY D8KINT.REL TO REL: TO MAKE IT EASIER AND RETRY ...
.COPY REL:D8KINT.REL=D8KINT.REL

.R MAKLIB

*REL:X.REL=REL:TOPS10.REL/MASTER:D8KINT,REL:D8KINT.REL/REPLACE:D8KINT
%MKLNIO OUTPUT file REL:X.REL will not be INDEXed
*REL:X.REL=REL:X.REL/MASTER:KDPSER,REL:D8KINT.REL/REPLACE:KDPSER
*REL:X.REL=REL:X.REL/MASTER:KDPINT,REL:D8KINT.REL/REPLACE:KDPINT
*
*; LOOKS LIKE REPLACEMENT WORKED, GET A LIST OF MODULES IN X.REL ...
*
*TTY:=REL:X.REL/LIST
        Listing of Modules
Produced by MAKLIB Version 2C(132) on 27-Nov-121 at  1:50:43

        **************************

REL:X.REL[5,11] Created on 27-Nov-121 at  1:49:00

VJBDAT  000000  000021
APRSER  000023  000021
D36COM  000112  000021
DNADLL  000026  000021
LLINKS  000066  000021
NRTSER  000253  000021
NTMAN   000022  000021
ROUTER  000072  000021
SCLINK  000035  000021
SCMUUO  000024  000021
D8RINT  000000  000021
DMRSER  000045
DMRINT  000000
KASER   000000  000021
PPSSER  000257  000021
PRSSER  000177  000021
RX2SER  000000  000021
AUTCON  000207  000021
CD2SER  000000  000113
CLOCK1  000003  000021
COMCON  000115  000021
CORE1   000000  000021
CTXSER  000015  000021
D60SER  000000  000021
D8KINT  000000  000021
KDPSER  000045
KDPINT  000000
DATMAN  000000  000021
DZINT   000003  000021
ERRCON  000012  000021
FILFND  000000  000021
FILIO   000011  000021
FILUUO  000005  000021
IPCSER  000000  000021
LATSER  000137  000021
LOKCON  000000  000021
LP2SER  000000  000551
MONBTS  000003  000021
MONPFH  000000  000021
MPXSER  000033  000032
NETDEV  000000  000021
NETCDR  000000
NETDDP  000000
NETLPT  000000
NETMCR  000001
NETPLT  000000
NETRDX  000000
NETTSK  000001
NETVTM  000000
NETSER  000173  000021
NULFEK  000000  000021
ONCMOD  000000  000021
PSISER  000000  000021
PTYSER  000024  000024
QUESER  000036  000021
REFSTR  000000  000021
RHXKON  000000  000142
SCHED1  000124  000021
SCNSER  000217  000132
SEGCON  000003  000021
SWPSER  000001  000021
SYSINI  000000  000021
TAPSER  000000  000021
TAPUUO  000042  000041
TM2KON  000000  000145
TMPUUO  000000  000021
UUOCON  000242  000021
VMSER   000000  000021
PATCH   000500  000021
EDDT    022317  000077
USRONC  000000  000021
MONEND  000000
*
*;LOOKS GOOD
*
*^Z

.COPY REL:TOPS10.REL=REL:X.REL

.COPY [10,7,MON,KS]TOPS10.REL=REL:X.REL

.
.DIR REL:TOPS10*


TOPS10  REL  2296  <055>   27-Nov-21    DSKA:   [5,11]
TOPS10  ORG  2300  <057>   27-Nov-21
  Total of 4596 blocks in 2 files on DSKA: [5,11]

.DIR [10,7,MON,KS]TOPS10*


TOPS10  ORG  2300  <155>   27-Nov-21    DSKB:   [10,7,MON,KS]
TOPS10  REL  2296  <057>   27-Nov-21
  Total of 4596 blocks in 2 files on DSKB: [10,7,MON,KS]

.
.;OK, DONE TOPS10.REL REPLACEMENTS
.; NEXT STEP
.; NOTE: SYSCNF.MAC hack is not needed as we are going to hack MONGEN.MAC
.;       which handles SYSCNF.MAC automatically
.
.
.; HACK MONGEN AFTER TAKING BACKUP
.
.COPY MONGEN.ORG=MONGEN.MAC

.TECO MONGEN.MAC

[2K Core]
*AAAAAAAA$$
[3K Core]
[4K Core]
[5K Core]
*AAAAAAAA$$
[6K Core]
[7K Core]
*AAAAAAAA$$
[8K Core]
[9K Core]
*AAAAAAAA$$
[10K Core]
[11K Core]
*SSM.KDUP$$
*0TT$$
SM.KDUP==^D2    ;MAXIMUM NUMBER OF DUP-11S ON A KMC-11
*C4$$
*T$$
=^D2    ;MAXIMUM NUMBER OF DUP-11S ON A KMC-11
*3C$$
*T$$
2       ;MAXIMUM NUMBER OF DUP-11S ON A KMC-11
*D$$
*I8$$
*0TT$$
SM.KDUP==^D8    ;MAXIMUM NUMBER OF DUP-11S ON A KMC-11
*EX$$

.
.; REBUILD MONGEN
.
.COMPIL/COMPIL MONGEN
MACRO:  MONGEN

EXIT

.; ACTUALLY MONGEN.MAC HAS THIS INSTRUCTION:
.
.
.COMPIL MONGEN

.LOAD MONGEN
LINK:   Loading

EXIT

.; SAVE THE NEW MONGEN.EXE AND ALSO COPY TO FINAL LOCATION
.
.SAVE MONGEN.EXE
MONGEN saved

.
.COPY [1,4]MONGEN.ORG=[1,4]MONGEN.EXE

.COPY [1,4]MONGEN.EXE=MONGEN.EXE

.
.
.; PROCEED TO REBUILD THE MONITOR WITH THE HACK NOW
.; RUN THE FULL MONGEN PROCEDURE
.; ------------------------
.; ------------------------
.;
.; EXECUTE THIS NOW:
.;
.; https://gist.github.com/tuklusan/d53505f3f9859eca048e253159c75bc8
.;
.; ------------------------
.; ------------------------

.; PROCEED TO REBUILD THE MONITOR WITH THE HACK NOW
.;
.COMPIL/COMPIL F,S
MACRO:  F
MACRO:  S

EXIT

.COMPIL/COMPIL devprm,dteprm,netprm,d36par,syscnf+<common,comdev,commod>
MACRO:  DEVPRM
MACRO:  DTEPRM
MACRO:  NETPRM
MACRO:  D36PAR
MACRO:  COMMON
MACRO:  COMDEV
MACRO:  COMMOD

EXIT

.
.; WE WILL CALL THE NEW MONITOR 4XDUP ...
.
.R LINK

*4XDUP/save/noinitial/hash:13k = /locals -
#common,comdev,commod,tops10[10,7,mon,ks]/search-
#/patch:200/counters/go
[LNKRLC Reloc. ctr.     initial value   current value   limit value
        .LOW.           0               110371          344000
        .HIGH.          344000          704175          720000
        .INIT.          740000          764735          771000
        .TWIC.          771000          772401          1000000
        Absolute code loaded]

EXIT

.
.DIR 4X*


4XDUP   EXE  1680  <057>   27-Nov-21    704(33461)      DSKB:   [10,7,MON]

.
.
.COPY NEW:4XDUP.EXE=4XDUP.EXE

.DIR NEW:4XDUP.EXE


4XDUP   EXE  1680  <057>   27-Nov-21    704(33461)      DSKA:   [1,5]

.
.; DONE - NOW WE BOOT INTO 4XDUP.EXE MONITOR AND HOPE TO SEE 4 DUP LINES
.
.R OPR

OPR>SET KSYS NOW
OPR>
 2:24:12          -- Event KSYS queued, request #11 --

 2:24:12          -- gTimesharing is over --
                Wait for "KSYS processing complete" message before SHUTDOWN

 2:24:12          -- Waiting for BATCON to start for KSYS logouts --

OPR>
g;;SYSTEM: - Timesharing is over!

 2:24:13          -- KSYS processing completed --

OPR>EXIT

.KJOB
[LGNJSP Other jobs same PPN]
Job 2  User OPERATOR [1,2]
Logged-off CTY  at  2:24:18  on 27-Nov-121
Runtime: 0:16:51, KCS:115125, Connect time: 1:00:56
Disk Reads:37726, Writes:29667, Blocks saved:0

.
Simulation stopped, PC: 000001 (SOJG 6,1)
Winding down
BOOT>Thanks for playing
Goodbye
Log file closed
	#####
	# We bump up the number of DUP lines on TWONKY
	# dup0 = DECNET
	# dup1 - dup3 = ANF10
	#
	# We do 4 lines because SimH allows 4 lines
	#
	# NOTE: We can have 8 DUP lines on TWONKY but running it under
	# SimH's support of max 4 lines causes numerous problems
	# So stick to 4 DUP lines
	#
	# I have simply followed instructions from gurus at HECnet
	# For more information on patching TOPS-10 7.04 NET on KS10 processor
	# please reach out to HECnet: http://www.update.uu.se/~bqt/hecnet.html
	#####

	localuser@myhostname:~/simh.run/twonky/bin$ screen -r twonky
	BOOT>[1,5]SYSTEM
	[Loading from DSKA:SYSTEM.EXE[1,5]]

	SIMH KS10 TWONKY 7.04NET 15-Nov-21
	Why reload: SCHED
	Date:
	Time:
	Startup option: GO
	[Rebuilding the system search list from the HOM blocks]

	[Rebuilding the active swapping list from the HOM blocks]

	[Rebuilding the system dump list from the HOM blocks]


	SIMH KS10 TWONKY 7.04NET 00:09:12 CTY system 4998
	Connected to Node TWONKY(37) Line # 32
	.LOGIN 1,2
	.R OPR

	[CCPWFD Waiting for file daemon to start]
	%% Node VENTI(20) up at :09:18
	%%TTY STOMPER - Not starting
	%FRCLIN INITIA - Logging out
	%% Node HUGIN(2) up at :09:20
	%% Node MUNIN(3) up at :09:23
	OPR>
	0:09:25 -- Message from the Accounting System --
	Account validation is not required

	0:09:27 -- Network topology --

	Nodes on-line:
	BALDER (4) ODEN (1) MUNIN (3) HUGIN (2) VENTI (20)


	0:09:27 -- Begin auto take file --
	File: SYS:SYSTEM.CMD[1,4]

	0:09:27 -- End auto take file --
	36 lines processed

	OPR>
	0:09:28 Reader 0 -- Started --

	OPR>
	0:09:29 FAL-Stream 0 -- Started --

	OPR>
	0:09:35 FAL-Stream 1 -- Started --

	OPR>enter ncp
	NCP>take nodnam.cmd

	0:10:04 NCP

	Request # 9; Set Node Completed

	0:10:04 NCP

	....
	....

	Request # 926; Set Node Completed

	0:10:26 NCP

	Request # 927; Set Node Completed

	0:10:26 NCP

	Request # 928; Set Node Completed

	NCP>return
	OPR>exit

	.net
	[ANF10 network: connected to TWONKY(37), located at TWONKY(37), 6 nodes]
	Node ODEN (1) Oden Tops10 7.04 12-Nov-21
	Node HUGIN (2) HUGIN Tops10 7.04 12-Nov-21
	Node MUNIN (3) MUNIN Tops10 7.04 12-Nov-21
	Node BALDER (4) BALDER Tops10 7.04 12-Nov-21
	Node VENTI (20) SIMH KS10 VENTI 7.04 NET 18-Nov-21
	Node TWONKY (37) SIMH KS10 TWONKY 7.04NET 15-Nov-21

	[DECnet network: local node TWONKY, 51 reachable nodes in area 31]
	(31.153) AHIMSA CAIR CGOING CLOUDY CSHORE FEDACH FOMFOR IBM390
	IMPRTR
	IMPVAX JUICHI KARMA KETURA LV MACOS7 MACOS9 MOKSHA MOSHML NANAJU
	NJEVX1 NJEVX2 NOFAR OSTARA PIPY PYDNET PYRTR QCOCAL RAPTOR RST101
	SEACOW SEAHAG SEAPIG SHAKTI TOWEL TRAINS TRU64 TSTVAX TSVMSA TSVMST
	TSVMSZ TWENEX TWONKY VAXSTN W2000S WEXPEE WFW311 WXPEE2 XL XLIV
	XLVII

	.
	.; ADD SOME NODES TO SYSTEM.CMD
	.
	.
	.TYPE [1,4]SYSTEM.CMD
	; Startup file for TWONKY - RLA [13-NOV-2021] ...

	; General system configuration ...
	CONFIG ADD MEMORY 512K 1024K
	DISABLE OUTPUT-DISPLAY ALL-MESSAGES /JOB
	ENABLE VOLUME-RECOGNITION TAPE-DRIVES

	; Start up the printer ...
	SET PRINTER 0 PAGE-LIMIT 2000
	START PRINTER 0

	; Start up the batch queues ...
	SET BATCH-STREAM 0 TIME-LIMIT 0:10 ;TIME: 0 TO 10 MINUTES
	SET BATCH-STREAM 1 TIME-LIMIT 0:60 ;TIME: 0 TO 1 HOUR
	SET BATCH-STREAM 2 TIME-LIMIT 10:100000 ; FOR LONG STREAMS
	START BATCH-STREAM 0:2

	; Start the card reader ...
	START READER 0

	; Start the DECnet network ...
	; Sampsa, you can add your own node names here. TOPS-10 has no permanent
	; node name database ...
	ENTER NCP
	SET NODE 1.13 NAME MIM
	SET NODE 2.1023 NAME A2RTR
	SET NODE 2.1 NAME LEGATO
	SET NODE 2.20 NAME VENTI
	SET CIRCUIT KDP-0-0 STATE ON
	RETURN

	; Start up FAL for DECNET ...
	SET FAL-STREAM 0 NETWORK DECNET
	SET FAL-STREAM 1 NETWORK DECNET
	START FAL-STREAM 0
	START FAL-STREAM 1

	.
	.TECO [1,4]SYSTEM.CMD

	[2K Core]
	*AAAA$$
	*SVENTI$$
	*I
	SET NODE 31.1 NAME IMPVAX
	SET NODE 31.2 NAME KARMA
	SET NODE 31.3 NAME PYRTR
	SET NODE 31.10 NAME QCOCAL
	SET NODE 31.37 NAME TWONKYYKNOWT EMAN 7340 NAME TWONK2
	SET NODE 31.1020 NAME MOKSHA
	SET NODE 31.1021 NAME PYDNET
	SET NODE 31.1022 NAME AHIMSA
	SET NODE 31.1023 NAME IMPRTR$$
	*EX$$

	.TYPE [1,4]SYSTEM.CMD
	; Startup file for TWONKY - RLA [13-NOV-2021] ...

	; General system configuration ...
	CONFIG ADD MEMORY 512K 1024K
	DISABLE OUTPUT-DISPLAY ALL-MESSAGES /JOB
	ENABLE VOLUME-RECOGNITION TAPE-DRIVES

	; Start up the printer ...
	SET PRINTER 0 PAGE-LIMIT 2000
	START PRINTER 0

	; Start up the batch queues ...
	SET BATCH-STREAM 0 TIME-LIMIT 0:10 ;TIME: 0 TO 10 MINUTES
	SET BATCH-STREAM 1 TIME-LIMIT 0:60 ;TIME: 0 TO 1 HOUR
	SET BATCH-STREAM 2 TIME-LIMIT 10:100000 ; FOR LONG STREAMS
	START BATCH-STREAM 0:2

	; Start the card reader ...
	START READER 0

	; Start the DECnet network ...
	; Sampsa, you can add your own node names here. TOPS-10 has no permanent
	; node name database ...
	ENTER NCP
	SET NODE 1.13 NAME MIM
	SET NODE 2.1023 NAME A2RTR
	SET NODE 2.1 NAME LEGATO
	SET NODE 2.20 NAME VENTI
	SET NODE 31.1 NAME IMPVAX
	SET NODE 31.2 NAME KARMA
	SET NODE 31.3 NAME PYRTR
	SET NODE 31.10 NAME QCOCAL
	SET NODE 31.40 NAME TWONK2
	SET NODE 31.1020 NAME MOKSHA
	SET NODE 31.1021 NAME PYDNET
	SET NODE 31.1022 NAME AHIMSA
	SET NODE 31.1023 NAME IMPRTR
	SET CIRCUIT KDP-0-0 STATE ON
	RETURN

	; Start up FAL for DECNET ...
	SET FAL-STREAM 0 NETWORK DECNET
	SET FAL-STREAM 1 NETWORK DECNET
	START FAL-STREAM 0
	START FAL-STREAM 1

	.
	.; Lets also add PIPY to the list of nodes in SYSTEM.CMD ...
	.TECO [1,4]SYSTEM.CMD

	[2K Core]
	*SQCOCAL$$
	*I
	SET NODE 31.32 NAME PIPY$$
	*EX$$

	.
	.
	.
	.TYPE [1,4]SYSTEM.CMD
	; Startup file for TWONKY - RLA [13-NOV-2021] ...

	; General system configuration ...
	CONFIG ADD MEMORY 512K 1024K
	DISABLE OUTPUT-DISPLAY ALL-MESSAGES /JOB
	ENABLE VOLUME-RECOGNITION TAPE-DRIVES

	; Start up the printer ...
	SET PRINTER 0 PAGE-LIMIT 2000
	START PRINTER 0

	; Start up the batch queues ...
	SET BATCH-STREAM 0 TIME-LIMIT 0:10 ;TIME: 0 TO 10 MINUTES
	SET BATCH-STREAM 1 TIME-LIMIT 0:60 ;TIME: 0 TO 1 HOUR
	SET BATCH-STREAM 2 TIME-LIMIT 10:100000 ; FOR LONG STREAMS
	START BATCH-STREAM 0:2

	; Start the card reader ...
	START READER 0

	; Start the DECnet network ...
	; Sampsa, you can add your own node names here. TOPS-10 has no permanent
	; node name database ...
	ENTER NCP
	SET NODE 1.13 NAME MIM
	SET NODE 2.1023 NAME A2RTR
	SET NODE 2.1 NAME LEGATO
	SET NODE 2.20 NAME VENTI
	SET NODE 31.1 NAME IMPVAX
	SET NODE 31.2 NAME KARMA
	SET NODE 31.3 NAME PYRTR
	SET NODE 31.10 NAME QCOCAL
	SET NODE 31.32 NAME PIPY
	SET NODE 31.40 NAME TWONK2
	SET NODE 31.1020 NAME MOKSHA
	SET NODE 31.1021 NAME PYDNET
	SET NODE 31.1022 NAME AHIMSA
	SET NODE 31.1023 NAME IMPRTR
	SET CIRCUIT KDP-0-0 STATE ON
	RETURN

	; Start up FAL for DECNET ...
	SET FAL-STREAM 0 NETWORK DECNET
	SET FAL-STREAM 1 NETWORK DECNET
	START FAL-STREAM 0
	START FAL-STREAM 1

	.
	.
	.; NOW ADD A WELCOME MESSAGE
	.
	.MAKE SYS:NOTICE.TXT

	*I ___ _ _ ___ ___ _ _ _ _
	/ __\| /_\ \| \\| \ \ / /_\ \| \| _ _ ___\| \|_ \| \| __ _ \|__ ___
	\__ \/ _ \\| .` \|\ V / _ \\| \|__\| ' \/ -_) _\| \| \|__/ _` \| '_ (_-<
	\|___/_/ \_\_\\|_\| \|/_/ \_\____\|_\|\|_\___\|\__\| \|____\__,_\|_.__/__/

	WELCOME TO TOPS-10 VERSION 7.04 ON A DEC PDP-01 KS1 PROCESSOR$$
	*EX
	$$

	.TYPE SYS:NOTICE.TXT
	___ _ _ ___ ___ _ _ _ _
	/ __\| /_\ \| \\| \ \ / /_\ \| \| _ _ ___\| \|_ \| \| __ _\| \|__ ___
	\__ \/ _ \\| .` \|\ V / _ \\| \|__\| ' \/ -_) _\| \| \|__/ _` \| '_ (_-<
	\|___/_/ \_\_\|\_\| \|_/_/ \_\____\|_\|\|_\___\|\__\| \|____\__,_\|_.__/__/

	WELCOME TO TOPS-10 VERSION 7.04 ON A DEC PDP-10 KS10 PROCESSOR
	.
	.; GOOD
	.
	.
	.
	Monitor SIMH KS10 TWONKY 7.04NET
	System uptime :50:47
	Current date/time Saturday 27-Nov-121 1:00:00


	.
	.
	.; Fix permissions for notice.txt, there probably is a
	.; easier command on TOP-10 ...
	.
	.
	.copy sys:notice.txt<055>=sys:notice.txt

	.dir sys:notice.txt


	NOTICE TXT 1 <055> 27-Nov-21 DSKA: [1,4]

	.kjob
	[LGNJSP Other jobs same PPN]
	Job 2 User OPR [1,2]
	Logged-off CTY at 1:22:47 on 27-Nov-121
	Runtime: 0:08:23, KCS:4074, Connect time: 1:13:35
	Disk Reads:945, Writes:52, Blocks saved:0

	.login guest
	Job 2 SIMH KS10 TWONKY 7.04NET CTY
	[LGNLAS Last access to [14,14] succeeded on 16-Nov-121:17:10:43]
	01:22 27-Nov-121 Saturday
	___ _ _ ___ ___ _ _ _ _
	/ __\| /_\ \| \\| \ \ / /_\ \| \| _ _ ___\| \|_ \| \| __ _\| \|__ ___
	\__ \/ _ \\| .` \|\ V / _ \\| \|__\| ' \/ -_) _\| \| \|__/ _` \| '_ (_-<
	\|___/_/ \_\_\|\_\| \|_/_/ \_\____\|_\|\|_\___\|\__\| \|____\__,_\|_.__/__/

	WELCOME TO TOPS-10 VERSION 7.04 ON A DEC PDP-10 KS10 PROCESSOR
	.
	.kjob
	Job 2 User GUEST [14,14]
	Logged-off CTY at 1:23:19 on 27-Nov-121
	Runtime: 0:00:00, KCS:1, Connect time: 0:00:27
	Disk Reads:43, Writes:8, Blocks saved:0

	.login 1,2
	Job 2 SIMH KS10 TWONKY 7.04NET CTY
	[LGNJSP Other jobs same PPN]
	%LGNSVM Set maximum virtual and physical limits failed
	[LGNLAS Last access to [1,2] succeeded on 16-Nov-121:04:51:01]
	01:23 27-Nov-121 Saturday

	.; NOTICE.TXT works :)
	.
	.; START OF RECIPE FOR 8 LINES OF DUP11
	.
	.
	.R SETSRC


	*CP [10,7,MON]

	*^C

	.DIR NETPRM.MAC


	NETPRM MAC 75 <155> 29-Feb-88 DSKB: [10,7,MON]

	.
	.COPY NETPRM.ORG=NETPRM.MAC

	.TECO NETPRM.MAC

	[2K Core]
	*AAAAAAAA$$
	[3K Core]
	[4K Core]
	[5K Core]
	*AAAAAAAA$$
	[6K Core]
	[7K Core]
	*AAAAAAAA$$
	[8K Core]
	[9K Core]
	*SMXNDUP$$
	*0TT$$
	MXNDUP==^D2 ;MAXIMUM NUMBER OF DUP-11'S ON THE KMC-11
	*3C$$
	*T$$
	D2 ;MAXIMUM NUMBER OF DUP-11'S ON THE KMC-11
	*2D$$
	*ID8$$
	*0TT$$
	MXNDUP==^D8 ;MAXIMUM NUMBER OF DUP-11'S ON THE KMC-11
	*EX$$

	.
	.
	.; REASSEMBLE NETPRM.MAC
	.COMPIL/COMPIL NETPRM
	MACRO: NETPRM

	EXIT

	.
	.
	.DIR [10,7,MON,KS]NETPRM.*

	%WLDNSF No such files as [10,7,MON,KS]NETPRM.*

	.DIR REL:NETPRM.*

	%WLDNSF No such files as REL:NETPRM.*

	.; SO NO NEED TO COPY NETPRM.REL
	.
	.
	.
	.; NOW TACKLE D8KINT, KDPSER, and KDPINT
	.
	.COMPIL/COMPIL D8KINT
	MACRO: D8KINT
	KDPSER
	KDPINT

	EXIT

	.
	.DIR D8KINT*


	D8KINT MAC 231 <155> 16-Feb-88 DSKB: [10,7,MON]
	D8KINT REL 37 <057> 27-Nov-21
	Total of 268 blocks in 2 files on DSKB: [10,7,MON]

	.
	.DIR [10,7,MON,KS]TOPS10.REL


	TOPS10 REL 2300 <057> 4-Nov-21 DSKB: [10,7,MON,KS]

	.COPY [10,7,MON,KS]TOPS10.ORG=[10,7,MON,KS]TOPS10.REL

	.
	.
	.DIR REL:TOPS10.REL


	TOPS10 REL 2300 <055> 4-Nov-21 DSKA: [5,11]

	.COPY REL:TOPS10.ORG=REL:TOPS10.REL

	.
	.
	.; NOW WE REPLACE D8KINT, KDPSER AND KDPINT IN BOTH COPIES OF TOPS10.REL IN [10,
	7,MON,KS] AND REL:
	.
	.; WE TEMPORARILY USE X.REL AND THEN COPY X.REL TO TOPS10.REL IN PROPER PLACES..
	.
	.
	.COPY REL:X.REL=REL:TOPS10.REL

	.R MAKLIB

	*REL:X.REL=REL:TOPS10.REL/MASTER:D8KINT,[10,7,MON]D8KINT.REL/REPLACE:D8KINT
	?WLDLKE Non-existent SFD file REL:D8KINT.REL[10,7,MON]
	?MKLTFR all TRANSACTION files rejected by conditions

	*^C

	.; THAT DIDN'T WORK; COPY D8KINT.REL TO REL: TO MAKE IT EASIER AND RETRY ...
	.COPY REL:D8KINT.REL=D8KINT.REL

	.R MAKLIB

	*REL:X.REL=REL:TOPS10.REL/MASTER:D8KINT,REL:D8KINT.REL/REPLACE:D8KINT
	%MKLNIO OUTPUT file REL:X.REL will not be INDEXed
	*REL:X.REL=REL:X.REL/MASTER:KDPSER,REL:D8KINT.REL/REPLACE:KDPSER
	*REL:X.REL=REL:X.REL/MASTER:KDPINT,REL:D8KINT.REL/REPLACE:KDPINT
	*
	*; LOOKS LIKE REPLACEMENT WORKED, GET A LIST OF MODULES IN X.REL ...
	*
	*TTY:=REL:X.REL/LIST
	Listing of Modules
	Produced by MAKLIB Version 2C(132) on 27-Nov-121 at 1:50:43

	**************************

	REL:X.REL[5,11] Created on 27-Nov-121 at 1:49:00

	VJBDAT 000000 000021
	APRSER 000023 000021
	D36COM 000112 000021
	DNADLL 000026 000021
	LLINKS 000066 000021
	NRTSER 000253 000021
	NTMAN 000022 000021
	ROUTER 000072 000021
	SCLINK 000035 000021
	SCMUUO 000024 000021
	D8RINT 000000 000021
	DMRSER 000045
	DMRINT 000000
	KASER 000000 000021
	PPSSER 000257 000021
	PRSSER 000177 000021
	RX2SER 000000 000021
	AUTCON 000207 000021
	CD2SER 000000 000113
	CLOCK1 000003 000021
	COMCON 000115 000021
	CORE1 000000 000021
	CTXSER 000015 000021
	D60SER 000000 000021
	D8KINT 000000 000021
	KDPSER 000045
	KDPINT 000000
	DATMAN 000000 000021
	DZINT 000003 000021
	ERRCON 000012 000021
	FILFND 000000 000021
	FILIO 000011 000021
	FILUUO 000005 000021
	IPCSER 000000 000021
	LATSER 000137 000021
	LOKCON 000000 000021
	LP2SER 000000 000551
	MONBTS 000003 000021
	MONPFH 000000 000021
	MPXSER 000033 000032
	NETDEV 000000 000021
	NETCDR 000000
	NETDDP 000000
	NETLPT 000000
	NETMCR 000001
	NETPLT 000000
	NETRDX 000000
	NETTSK 000001
	NETVTM 000000
	NETSER 000173 000021
	NULFEK 000000 000021
	ONCMOD 000000 000021
	PSISER 000000 000021
	PTYSER 000024 000024
	QUESER 000036 000021
	REFSTR 000000 000021
	RHXKON 000000 000142
	SCHED1 000124 000021
	SCNSER 000217 000132
	SEGCON 000003 000021
	SWPSER 000001 000021
	SYSINI 000000 000021
	TAPSER 000000 000021
	TAPUUO 000042 000041
	TM2KON 000000 000145
	TMPUUO 000000 000021
	UUOCON 000242 000021
	VMSER 000000 000021
	PATCH 000500 000021
	EDDT 022317 000077
	USRONC 000000 000021
	MONEND 000000
	*
	*;LOOKS GOOD
	*
	*^Z

	.COPY REL:TOPS10.REL=REL:X.REL

	.COPY [10,7,MON,KS]TOPS10.REL=REL:X.REL

	.
	.DIR REL:TOPS10*


	TOPS10 REL 2296 <055> 27-Nov-21 DSKA: [5,11]
	TOPS10 ORG 2300 <057> 27-Nov-21
	Total of 4596 blocks in 2 files on DSKA: [5,11]

	.DIR [10,7,MON,KS]TOPS10*


	TOPS10 ORG 2300 <155> 27-Nov-21 DSKB: [10,7,MON,KS]
	TOPS10 REL 2296 <057> 27-Nov-21
	Total of 4596 blocks in 2 files on DSKB: [10,7,MON,KS]

	.
	.;OK, DONE TOPS10.REL REPLACEMENTS
	.; NEXT STEP
	.; NOTE: SYSCNF.MAC hack is not needed as we are going to hack MONGEN.MAC
	.; which handles SYSCNF.MAC automatically
	.
	.
	.; HACK MONGEN AFTER TAKING BACKUP
	.
	.COPY MONGEN.ORG=MONGEN.MAC

	.TECO MONGEN.MAC

	[2K Core]
	*AAAAAAAA$$
	[3K Core]
	[4K Core]
	[5K Core]
	*AAAAAAAA$$
	[6K Core]
	[7K Core]
	*AAAAAAAA$$
	[8K Core]
	[9K Core]
	*AAAAAAAA$$
	[10K Core]
	[11K Core]
	*SSM.KDUP$$
	*0TT$$
	SM.KDUP==^D2 ;MAXIMUM NUMBER OF DUP-11S ON A KMC-11
	*C4$$
	*T$$
	=^D2 ;MAXIMUM NUMBER OF DUP-11S ON A KMC-11
	*3C$$
	*T$$
	2 ;MAXIMUM NUMBER OF DUP-11S ON A KMC-11
	*D$$
	*I8$$
	*0TT$$
	SM.KDUP==^D8 ;MAXIMUM NUMBER OF DUP-11S ON A KMC-11
	*EX$$

	.
	.; REBUILD MONGEN
	.
	.COMPIL/COMPIL MONGEN
	MACRO: MONGEN

	EXIT

	.; ACTUALLY MONGEN.MAC HAS THIS INSTRUCTION:
	.
	.
	.COMPIL MONGEN

	.LOAD MONGEN
	LINK: Loading

	EXIT

	.; SAVE THE NEW MONGEN.EXE AND ALSO COPY TO FINAL LOCATION
	.
	.SAVE MONGEN.EXE
	MONGEN saved

	.
	.COPY [1,4]MONGEN.ORG=[1,4]MONGEN.EXE

	.COPY [1,4]MONGEN.EXE=MONGEN.EXE

	.
	.
	.; PROCEED TO REBUILD THE MONITOR WITH THE HACK NOW
	.; RUN THE FULL MONGEN PROCEDURE
	.; ------------------------
	.; ------------------------
	.;
	.; EXECUTE THIS NOW:
	.;
	.; https://gist.github.com/tuklusan/d53505f3f9859eca048e253159c75bc8
	.;
	.; ------------------------
	.; ------------------------

	.; PROCEED TO REBUILD THE MONITOR WITH THE HACK NOW
	.;
	.COMPIL/COMPIL F,S
	MACRO: F
	MACRO: S

	EXIT

	.COMPIL/COMPIL devprm,dteprm,netprm,d36par,syscnf+<common,comdev,commod>
	MACRO: DEVPRM
	MACRO: DTEPRM
	MACRO: NETPRM
	MACRO: D36PAR
	MACRO: COMMON
	MACRO: COMDEV
	MACRO: COMMOD

	EXIT

	.
	.; WE WILL CALL THE NEW MONITOR 4XDUP ...
	.
	.R LINK

	*4XDUP/save/noinitial/hash:13k = /locals -
	#common,comdev,commod,tops10[10,7,mon,ks]/search-
	#/patch:200/counters/go
	[LNKRLC Reloc. ctr. initial value current value limit value
	.LOW. 0 110371 344000
	.HIGH. 344000 704175 720000
	.INIT. 740000 764735 771000
	.TWIC. 771000 772401 1000000
	Absolute code loaded]

	EXIT

	.
	.DIR 4X*


	4XDUP EXE 1680 <057> 27-Nov-21 704(33461) DSKB: [10,7,MON]

	.
	.
	.COPY NEW:4XDUP.EXE=4XDUP.EXE

	.DIR NEW:4XDUP.EXE


	4XDUP EXE 1680 <057> 27-Nov-21 704(33461) DSKA: [1,5]

	.
	.; DONE - NOW WE BOOT INTO 4XDUP.EXE MONITOR AND HOPE TO SEE 4 DUP LINES
	.
	.R OPR

	OPR>SET KSYS NOW
	OPR>
	2:24:12 -- Event KSYS queued, request #11 --

	2:24:12 -- gTimesharing is over --
	Wait for "KSYS processing complete" message before SHUTDOWN

	2:24:12 -- Waiting for BATCON to start for KSYS logouts --

	OPR>
	g;;SYSTEM: - Timesharing is over!

	2:24:13 -- KSYS processing completed --

	OPR>EXIT

	.KJOB
	[LGNJSP Other jobs same PPN]
	Job 2 User OPERATOR [1,2]
	Logged-off CTY at 2:24:18 on 27-Nov-121
	Runtime: 0:16:51, KCS:115125, Connect time: 1:00:56
	Disk Reads:37726, Writes:29667, Blocks saved:0

	.
	Simulation stopped, PC: 000001 (SOJG 6,1)
	Winding down
	BOOT>Thanks for playing
	Goodbye
	Log file closed