Digital PDFs

AH-8777B-MC

April 1978

120 pages

Original

54MB

view download

OCR Version

78MB

view download

Document:	CZDXIB0 DX11-B RESPONDER APR 1978 bw
Order Number:	AH-8777B-MC
Revision:	000
Pages:	120
Original Filename:	CZDXIB0__DX11-B__RESPONDER__AH-8777B-MC__APR_1978_gray.pdf

OCR Text

RESPONDER

CZDXIBO

AH-8777B-MC

copvricHTo72.78

FICHE1 OF1

APR 1978

MOEEREN

MADE IN USA

BO1
F1CFFPCBSEQ

e FOP10 4$EQ 00Ce
CZ0X1B.D0C

0001C300

780330

POP10 411

MAINDEC-11- DZDXI-B_NEW DX11-B RESPONDER

30-JAN-78 14:26

OPERARTING PROCEDURE

OsHDR1CZOXIBSEG

MRCY1l 30A(10S2) Ol-FEB-78 09:4&

.REM

IDENTIFICARTION
PRODUCT

CODE:

AC-8776B-MC

PRODUCT

NAME:

CZDXIBO DX11-B RESPONDER

RELERSE DRTE:

MARCH

MARINTAINER:

DIAGNOSTIC ENGINEERING

1978

HIS DOCUMENT IS

BE _CONSTRUED RS

UBJECT TO CHANGE WITHOUT

A COMMITMENT BY DIGITAL

DIGITAL EQUIPMENT CORPORATION ASSUMES
ANY ERRORS THAT MAY APPEAR IN THIS MANUAL.
HIS DOCUHENT

IS FURNISHED

THE

A SINGLE COMPUTER SYSTEH
USE ON
ER

SION OF DIGITAL'S OLT NOTICE)
EXCEPT RS MAY OTHERWISE BE PROVIDED

Ll4

EM,

DIGITAL EQUIP
CORPORATION ASSUMES NO RESPONSIBILITY FOR
USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS NOT
SUPPLIED BY DIGITAL.
COPYRIGHT

(C)

1972,1978 BY DIGITAL EQUIPMENT CORPORATION

THE

(&)

GENERAL DESCRIPTION

COl1
RFACE_BETWEEMN

TEST PR GRQH EXERCISES TH
SYSTEM
THIS
T aNE An 181 3607370 CORMUNTCATING (16 THE
THESeBR=
DXAI-B CONTROL UNIT
ROGRAM EMULRATES RN IBH CRT

(2260) RND ITS CONTROL UNIT (2848) COMMUNICATINC OVER

EITHER A ¥LTIPLEXER SELECTOR CHANNEL.

THE 360370

EXERCISES
THE INTERFACE BY RUNNING STANDARD IBM DIAGNOSTICS DESIGNED TO TEST THE 2260/2848;
FRIEND OR THE

-DZDXI-B

NEW DXi11-B RESPONDER

30-JAN-78 14:26

2848 RESPONDER.

MRCY1]l 30A(10€2)

DOl

OPERATING PROCEDURE

Ol1-FEB-78

UP TO EXGHT 2250'5 MAY BE EMULARTED

SIMULTANEOUSLY BY THE PROGRAM

BARSICALLY THE SYSTEM TEST PROGRRH COLLECTS THE TEST

PQRRHETERS NEEDED VIR

ON RND RESPONSE TUTORIAL

T
T RNg..g
T YSTTsiisg
BENTHENTEQE}IELITSE
Srtirs
2
1658,
1
T
THE SYSTEM TEST PROGR
SUCH RS,
PARITY ERROR

RSIC ERRORS
IL LEGRL DEVICE RDORESS
ETC.

WITH THE 360 DIAGNOSTiC TESTING FOR_MORE DETRILED
ERRORS;

SUCH RS,

TIMING PROBLEMS,

SEQUENCING ERRORS

ETC.

LAY

(@]

THIS PROGRAM COMPLETELY REPLRACES AND OBSOLETES
MD-11-DZDXC.

REQUIREMENTS

EQUIPMENT
A.

PDP-11

COMPUTER WITH A MINIMUM OF

DX11-B 3607370

ONE

CONSOLE

INTERFACE

TELETYPE

MEMORY.

OPTION.

OR EQUIVALENT.

STORAGE
THE

TEST PROGRAM LOADS

INTO 4K OF MEMORY AND REQUIRES

LERST ANOTHER 4K FOR DGTR BUFFERS.
FOR _DATR BUFFERS,

UP
TQ

SIX DEVICES

HITH YK OF HEHORY
(&)

MAY

BE
E

MEMORY

TO EMULATE EIGHT 2260/28498 DEVICES 8K OF MEMORY FO

BUFFERS

IS REQUIRED.

DQTQ

STORRGE MAP
THE

FOLLOWING

MAP

ILLUSTRATES

THE

THE DX11-B SYSTEM TEST PRO G

USARGE

ORE

0-777

I
I
I

INTERRUPT

100C-1777?

I
I
I

DX11-B TEST PROGRAM

Z0-%X777

}

SPW TARBLE

VECTORS

MAP

(256 WORDS)

(4K WORDS)

I
I
1
1
I
1

—————

09:46

PAGE 2

-DZDXI-B

NEW DXil-B RESPONDER

30-JAN-78 14:26

X1000-X1777

MACY1l 30R(10S2)

EOL

O1-FEB-78

OPERATING PROCEDURE

TUMBLE TABLE

(256 WOFDS)

X2000-X2777

1
1
i

DUPLICATE TUMBLE TABLE
(256 WORDS)

<3000-X3377

1
I
1

DST TABLE

X3400-%3475

I
I
1
I
I
I

(128 WORDS)

SOFTWARE DEVICE STATUS TABLE

(DEV 0)1

X3U7H-X4H437

INPUT BUFFER

(DEV O)1

X44H40-XEI77

OUTPUT/DISPLAY BUFFER

XS400-XEH475

SOFTWARE DEVICE STATUS TRBLE (DEV 1)1

YENTB-XE6437

INPUT BUFFER

1
I

XBH40-X7377

NOTE

(241 WORDS)

(DEV O)1

(240 WORDS)

(31 WORDS)

(DEV

1)1

(241

WORDS)

1
i

OUTPUT/DISPLAY BUFFER
(DEV
(240 WORDS)

I
I
I

I
THE ABOVE SOF TWARE BUFFER LAYOUT
I
(DEVICE STATUS TABLE,
INPUT BUFFER +I

1)1
I

QUTPUT BUFFER) WILL BE REPERTED FOR I

I
I

180000-177777

731 WORDS)

EACH DEVICE SPECIFIED (UP TO 8).
EACH DEVICE EMULATED REQUIRES Sli2

WORDS

I
1

1
%

UNIBUS RDDRESSES

I
%

(2000 OCTAL)

"x*

1S DETERMINED

THE

BUFFER

THE

DEFAULT

*“x*

OF BUFFER SPACE

RELOCATION

INPUTTED AT SYSTEM CONFIGURATION TIME.
VALUE

PHYSICAL RADDRESS.

2000C.

*X"

FACTOR

ALWAYS A

09:46

PAGE 2

MAINDEC-11-DZDXI1-B

NEW DX11-8 RESPONDER

O
o8 P50 ansg u:se
3.0

FO1

MACY1l 30R(10S2)

OI-FEB-78

OPERATING PROCEDURE

0S:46

LOADING PROCEDURE
THE STANDARD PROCEDURE FOR LOADING ARBSOLUTE BINARRY TAPES
IS TO BE USED.

STARTING ADDRESS

FOR ABSOLUTE LOARDER
037500

24k
28K

137500
157500

12K
16K
20K

057500
077500
117500

4.0

START

Mo
d

CONTROL SWITCH SETTINGS -- NONE

5.2

STARTING ADDRESSES

UFP PROCEDURE

1000 OR 200 NORMAL STARTING ADDRESS.

FIRST

TIME

AFTER LOADING

ONLY,

THE

FOR THE

PROGRAM

REQUESTS OPERATOR TO ENTER TEST PARAMETERS.

ERCH SUCESSIVE RESTART USES THE PARAMETERS WHICH
HAVE BEEN PREVIOUSLY ENTERED.

1002 RESTART ADDRESS WHICH REQUESTS OPERARTOR
PARAMETERS AGAIN.

NOTE:

AT_ANY

TIME

THE

PROGRAM

IS RUNNING,

TEST

CONTROL

TYPED ON THE TTY KEYBOARD WILL ALSO REQUEST THE

OPERATOR
()

WHILE

TO ENTER

PROGRAM AND/OR

TO REENTER THE

OPERATOR

TEST PARAMETERS.

ACTION

INITIAL PROGRAM START

“.3.2

LORD ADDRESS 200.

INTO MEMORY USING ABSOLUTE LORNER.

PRESS

LOAD PROGRAM

THE

THE SYSTEM NOW REQUESTS THE OPERATOR TC
PRARAMETERS NECESSARY TO RUN THE TEST.

START

PROGRAM

WILL

TYPE

OUT

“DZDXI1-B

NEW

DX11-B

ENTER

RESPOMNDERTM

THE

ENTERING TEST PARAMETERS
BEFORE ANY TESTS MAY BE RUN OR WHENEVER A CHANGE
METERS

DESIRED,

THE

OPERATOR

WILL

REQUIRED

IN PARA-

ENTER

(tP)

PAGE 4

€4 000S

2£4 coos

?Xi11-B RESPONDER

4:26

-B
NEH
-JAN -78

OPERATINGSR&&E 809(1052)

GOl

01-FEB-78

ALL
TEST PARAMETERS.
THE ENTERING OF THE PARAMETE RS
IS DONE VIR THE CCNSOLE TELETYPE IN RESPONSE TO A SERI

ONE

OF QUESTIONS.
4.3.2.1

GENERAL RULES FOR ENTERING PARRAMETERS

2.
O.

e%% S?fifl"ETERS MUST BE DELIMITED BY A CWRRIAGE RETURN

IF
A TYPING ERROR IS DETECTED BEFORE ENTERING THE C/R,

MAY

TO DELETE THE LARST CHARARCTER(S)

USING RUBOUT(S)

HITTING CONTROL-U

(tU)

TO DELETE THE ENTIRE ENTRY

TO_SELECT THE DEFAULT PARAMETER ENTRY,

RETURN

(C/R)

ONLY.

TYPE CARRIARGE

IF _THE PROGRAM DETECTS AN ERROR IN A PARAMETER IT WILL
REPEAT THE QUESTION RGAIN AND REQUIRE THE OPERARTCR TO
REENTER

CORRECTED BY

PRRAMETER

THE PARAMETER.

DEFINITION

"UNIBUS RDDRESS -OCTAL-"
REQUESTS USER TQ ENTER RDDRESS WHERE THE DX RESIDES
ON_THE UNIBUS. THIS MUST BE & DIGIT OCTAL NUMBER
BETWEEN 176200 AND 177700

DEFAULT UNIBUS ADDRESS =176200
"VECTOR RDDRESS

-OCTAL-*

REGUESTS USER TO ENTER THE VECTOR ARDDRESS FOR THE
AS A 3 DIGIT OCTAL NUMBER BETWEEN 300 AND 770.

DEFAULT VECTOR ADDRESS = 300
"DEVICE ADDRESSES

(XX,XX)

=-HEX-*"

REOUESTS THE USER TO ENTER THE 360 CHANNEL RDDRESS(ES) OF
THE 2260(S)
TO BE EMULARTED BY THF TEST.
IF MORE THAN ONE
1s ro EMULATED,
THEN THE USER ENTERS xu THE

RANGE OF ADDRESSES T0'BE EHULRTED

USE

ENTERED
DEVICES

IN MEX BETWEEN OO AND FF. IF A RANGE
O
IS GIVEN, THERE CAN NOT BE none THAN e TOTAL.

DEFARULT DEVICE ADDRESS =
“CHANNEL

sucu RS,

INDICATES THAT UNITS
RO
AND ' A3 chn BE
THE TEST. THE UNIT nobnesses ARE TO BE

TYPE

REQUESTS

10,10

(M OR S)*
THE

USER

INDICATE WHAT

TYPE

360

CHANNEL

0C3:46

PAGE S

éE% 8882

MACY1l 30A(10S2)
MARINDEC-1i-DZOX1-B NEW DXil1-B RESPONDER
CZOX1B.DOC
30-JAN-78 14:26
OPERATING PROCEDURE
THE DX IS INTERFACED TO:

*MEMORY MANAGEMENT

Ol-FEB-78

M = MULTIPLEXER CHANNEL,

S = SELECTOR CHANNEL.

DEFRULT CHANNEL = S,

HO1

SELECTOR CHANNEL

(Y OR N)*TM

RggU;STS THE USER TO IND CflT; WHETHER THE PROGRAM IS TO
HE
HEHORYOHRNQGEHEN

DEFAULT OPTION = N,
"BUFFER RELOCARTION,

OPTION.

DO NOT USE MEMORY MANAGEMENT

IF SPECIFIED -

IN EVEN ,000'S -OCTAL-"

REQUTSTS THE PHYSICAL RDDRESS OF WHERE THE Dx
F IRMWARE BUFFERS (TUHBLE ABLE, SPW + DST)

Al
A
3306 avvs

S
e

hvsxcaLaooggss

100000 IS ENTERED RS
NOTE:

THE DX

TO_ANY

THE BUFFER CRNNOT BE CLOSER THRN 2“000(8)

? W
OF HRVINGTO-ESEB FERS

CROSS A 200000 BOUNDRRY.
IT IS POSSIBLE TO OVERLAY THE ABSOLUTE LOADER
WHICH RE?&E?S éfi THE HIGHEST AVAILABLE 4K(10)
OF THE
28K
OF MEMORY.
DEFAULT BUFFER ADDRESS = 20
"FRIEND

(F)

2848

DIARG

(20000)

(D)*

REOUESTS rus USER TO INDICATE WHAT TYPE OF TEST WILL
BE RUN ON THE 360;
F = IBM'S FRIEND OR D = THE 2848

RESPONDER DIAGNOStICS.

DEFAULT OPTION = F -- FRIEND
IN

FRIEND

MODE,

SEE

PARA

CHANNEL COMMANDS'
FRIEND MODE HILL
USED WITH °'CTP

NOTE

5.0

THE

nsa

FCR

SAME

LIST

COMMAND

VALID

IBM

STRINGS

FORMERLY

ngpo ER
ung seg CTED,

TER

SO THE' svsren

NILL ae NITIALIZE RNcoNTR Pnsseo T0
THE MONITOR.

SEE MONITOR connauos 4.

"SEPARATE
I-0 BUFFERS (Y OR
N
REQUEST% HSU#?ER T0 IN ICRTE WHETHER SEPARATE
INPUT
QND OUTPUT
R SHOULD
BE MARINTAINED
FOR ERCH CRT
THE

T _EMULATED.

SEPARATE

TRANSMISSION

THE

INPUT/OUTPUT BUFFERS ALLOW

SAME

DATA PATTERN

THE

09:46

PAGE &

14:26

MACY1l 30R(10S2)

OI-FEB-78

OPERATING PROCEDURE

360,370 INDEPENDENT OF WHAT DATA IS RECEIVED.

THIS IS USEFUL IN DETERNIN!NG THE CAUSE OF BRD
DRTR BEING TR SMITTED.

NOTE -- MOST TESTS USING 'FRIEND' WILL NOT UTILIZE
SEPARATE I/0 BUFFERS. THESE ARE ONLY FOR SPECIAL
SITURTIONS AS MENTIONED RBOVE.

DEFAULT OPTION = N,
NOTE --

NO USE THE SAME I-0 BUFFER

IF THE SAME I-0 BUFFER WAS SPECIFIED
SO THE s?sv:n
MORE PARAMETERS ARE NEEDED,
CONTROL Pnssso T0

WILL BE INITIALIZED AND
THE MONITOR.

GEE MONITOR COMMANDS
4

"OUTPUT BUFFER FILL CHARACTER -HEX-"

REQUESTS THE USER TO ENTER THE CHARRCTER WHICH IS USED
TO FILL

HEX

(00

THE OUTPUT BUFFER.

THIS CHARRACTER

FF).

DEFAULT FILL CHARACTER = 40,

IS ENTERED

AN EBCDIC BLANK

NOW ALL TEST PARAMETERS HAVE BEEN ENTERED AND THE SYSTEM
WILL BE INITIALIZED AND CONTROL WILL BE PRSSED TO THE

MCNITOR.

SYSTEM INITIALIZATION
AFTER THE TEST PARAMETERS HAVE BEEN ENTERED

THE

INITIALIZED AND CONTROL PRSSED TO THE MONITOR.

SYSTEM

BEFORE

ANY COMMUNICATIONS MAY BE CONDUCTED TO THE 360 THE DX
WILL NEED TO BE ENABLED VIA THE RUN
“R*TM COMMAND.
SEE SECTION
4.4 FOR MORE INFORMATION CONCERNING THIS AND OTHER
MONITOR COMMANDS.

MONITOR COMMANDS
AFTER

THE

TEST PARAMETERS HAVE

BEEN SUCESSFULLY

ENTERED

THE SYSTEM IS CONFIGURED AND INIT IRLXZED THEN CONTROL 1s
PASSED TO THE MONITOR. ONCE IN THE MONITOR THE OPERATOR
IS FREE

NOTE

=--

THE

ISSUE ANY COMMAND LISTED BELOH
OPERATOR MUST ENARBLE

THE

(RUN_COMMAND)

BEFORE ANY TESTS MAY BE PERFORMED WITH THE 360-370.

GENERAL RULES FOR ENTERING MONITOR COMMANDS
A.

fi%é/C?flNQNDS MUST

IF A TYPING ERROR

CELIMITED BY

CRRRIAGE

IS DETECTED BEFORE ENTERING
IT MAY BE CORRECTED BY
1.

USING RUBOUT(S)

TYPING CONTROL-U

TO DELETE
(tU)

THE LAST

TO DELETE

RETURN

THE C/R,

CHARACTER(S).

THE ENTIRE LINE.

0S:4&

PAGE ¥

(&')
Q0
[
)
(LA

NEW Dxxx -B RESPONDER

30-JAN-78

CZDOx18.00C

N
mm
(ST

MARINDEC-11-DIDXI-B_

101

MARINDEC-11-DZDXI1-B_NEW DXi1-B RESPONDER

30-JAN-78 IH?EB

CZgXIB.DOC

JO1

O1-FEB-78

MACYl1l 30A(10S2)

OPERATING PROCEDURE

IF A USER WISHES TO RBORT A COMMAND,

SUCH RS DUMPING

DATA TO THE TELETYPE CONSOLE, HE DOES SO BY TYPING
(tC).

CONTROL-C

CONTROL-S (tS) SIGNALS THAT CONSOLE OUTFUT SHOULD BE

CONTROL-@ (tQ@) IS USED TO RESUHE CONSOLE OUTPUT RFTER
IT HARS BEEN STOPPED VIR
R CONTROL-S.

G.
H.

TEMPORARILY SUSPENDED.

THE MONITOR MODE IS DENOTED BY THE ASTERICK

PRINT POSITION

(#)

IF AN ERROR IS DETECTED IN THE COMMAND BY THE PROGRAM,
IT WILL PRINT A QUESTION MARK (7).
IF

THE OPERATOR TRIES TO ENTER DATA WHILE A COMMAND

CURRENTLY RCTIVE OR HE OVERFLOWS THE INPUT BUFFER (&Y
CHARS) THE SYSTEM WILL PRINT A BACKSLASH (\) AND DELETE
THE ENTIRE LINE.

I.
4.4.2

TYPING CTL-P

DESCRIPTION OF

(tP)

CAUSES THE SYSTEM TO BE REINITIALIZED

AND NEW TEST PARRAMETERS REQUESTED.

ENABLE

THE

MONITOR COMMANDS

DX FOR

TESTING

RUN COMMAND

THE

RUN COMMAND DOES

INITIALIZES THE DX

CLEARS ALL

ENABLES THE DX BY SETTING THE APPROPRIATE BITS

-- DISABLE
rue

STOP

THE

TUMBLE

FOLLOWING:

TABLE ENTRIES.

IN DXCS.

THE DX - STOP CUMMAND
COMMPND ALLOWS

A SPECIFIC EVENT.

THE USER

TO DISABLE

THE

DX AFTER

THIS MAY EITHER BE IMMEDIATELY,

AFTER

AN INITIAL SELECTION SEQUENCE, RFTER A DATA TRANSFER,
AFTER AN ENDING SEQUENCE, OR ONA PARRITY ERROR.
THE

FORMS OF

S(C/R)
gI(C/R
D(C/R)
SE(C/R)
SP(C/R)

THE

-==
-==
=--

STOP COMMAND ARE:

STOP
STOP
STOP
STOP
STOP

IMMEDIRTELY
AFTER NEXT INITIAL SELECTION SEQUENCE
AFTER NEXT DATA TRANSFER COMPLETION
AFTER NEXT ENDING SEQUENCE
ON NEXT PARITY ERROR

AFTER THE CONDITIONS OF STOP ARE
ABLED.
TYPE "R*TM TO CONTINUE.

MET,

THE DX WILL

IEtsgeLéONING WILL BE PRINTED ON THE CONSOLE

DIS-

0S:46

PRAGE B

NEW DXil1-B RESPONDER

30-JAN-78 14:26

MACY1]l 30A(1052)

QOPERATING PROCEDURE

Ol1-FEB-78

09:46

THE CURRENT DEVICE ADDRESS IN_HEX
THE DXDS IN OCTAL - PROBABLY ZERO

“CURRENT DEVICE =-- XX"
S XXXXXXTM

SXXXXXX"
SXXXXXXTM
“RXXXXXTM
“XXXXXX"
S XXXXXX"
"XXXXXX"
“XXXXXX*
SXXXXXX"
TXXXXXX"
SXXXXXX"

THE
THE
THE
THE
THE
THE
T
THE
THE
THE

SXXXXXX
EUXXXXXTM
C

KO1

DXCA
DXCS
DX0S
DXBA
DXBC
DXMO
Xfls
DXCB
DXND
DXES1

IN OCTAL
IN OCTAL
IS OCTAL
IN OLTAL
IN OCTAL
IN OCTAL
N OCTAL
IN OCTAL
IN OCTAL
IN OCTAL

THE DXMOB IN OCTAL
THE DXESe IN OCTAL

-- DUMP COMMAND

THE DUMP COMMAND ALLOWS THE USER TO DUMP VARIOUS DATA

BUFFERS,

TRBLES OR CORE LOCATIONS ON THE CONSOLE TELETYPE
THE FOLLOWING DESCRIBES THE
SYNTRXES THE DUMP CO MMAND:

A VARIE}Y or FORMATS.
DTT,O0

DUMP TUMBLE TABLE

DTT.H

IN OCTAL

DUMP TUMBLE TRBLE IN HEX

UMP TUMBLE Taa E COMMAND nsrsn:ncss
A DUPLICATE TUMBLE
TABLE MAINTAINED
EXCLUSIVELY FOR THIS FUNCTION. THE TUMBLE
LE 1S DUMPED IN REVERSE CHRONOLOGICAL
ORDER AND PRODUCES THE FOLLOWING REPORT:
XXXXXX
XXXXXX
XXXXXX
é¥éxxx

TT2
TTI
TT2
TT1

-----

LAST OPERATION
LAST OPERATION
PREVIOUS T/T ENTRY
PREVIOUS T/T ENTRY

DIN, 0, XX
DIN.H. XX
DIN,E, XX

DUMP INPUT BUFFER FOR DEVICE XX IN OCTAL
DUMP INPUT BUFFER FOR DEVICE XX IN HEX
DUMP INPUT BUFFER FOR DEVICE XX IN EBCDIC

DOT. 0, XX
DOT, H, XX
DOT.E . XX
DOT, A, XX

DUMP OUTPUT BUFFER FOR
DUMP OUTPUT aurrsn FOR
DUMP OUTPUT BUFFER FOR
OUTPUT
rsn FOR

DIN, R, XX

DUMP INPUT BUFFER FOR DEVICE XX IN ARSCII
DEVICE
DEVICE
DEVICE
DEVICE

XX IN OCTAL
XX IN HEX
XX IN EBCDIC
XX IN ASCII

DSS5S5S,EEEEEE,0 DUMP BETWEEN GIVEN LIMITS IN OCTAL
DSSSSSS,EEEEEE,H
DSSSSSS,EEEEEE,E

DSSSSSS,EEEEEE.A
NOTE

DUMP BETWEEN GIVEN LIMITS
DUMP BETWEEN GIVEN LIMITS

IN HEX
IN EBCDIC

DUMP BETWEEN GIVEN LIMITS IN ARSCII

IS THE DEVICE

ADDRESS

IN HEX

;

IF NOT SPECIFIED

WILL DEFAULT TO 1ST DEVICE (CRT)'# IN THE DEVICE TABLE
SSSSSS
EEEEEE

IS THE STARTING MEMORY ADDRESS IN OCTAL
IS THE ENDING MEMORY ADDRESS IN OCTAL

PAGE 9

FILL

COMMAND

THE FXLL COHHRND RLLOHS THE USER TO FILL THE

INFUT OR OUT-

Dg F? ? gE WITH
A SP&EIF{C DATA PRATTERN.
YNTRX FOR T

SCRIBES

FIN,YY, XX
:

XX = THE
YY

-=-

THE FOLLOWING

FILL OUTPUT BUFFER FOR DEVICE XX WITH YY
DEVICE RDCRES

THE

LL COMMAND.

FILL INPUT BUFFER FOR DEVICE XX WITH YY

FOT,YY, XX

WHERE

01-FEB-78

FILL

CHARACTE

IN
=EX

HELP COMMAND

THE HELP connnno PRINTS OUT A SYNOPSIS OF THE
MONITOR COMMANDS AND CONSOLE CONTROL CHARAC TERS
nvn
AaLe ESR gnnt NG THE
Brin TEST

RH T

SYNTA

PRINT OUT

HELP MESSAGE

INPUT COMMAND

TO INPUT DATA FOR

ER
OWS T
PSSTZcm nm'
RT
'&
"5 U?He
N THE snng MANNER
3& EE
3 3?Ht InpuCOMMAND IS
ONLY VALID uusn THE

THE SYNTAX OF

THE

xan aaqa oxncnosrxcs ARE BEING RUN.

INPUT COMMAND

IS:

IXX,D---D

WHERE:
XX

D---D

THE DEVICE ADDRESS

IN HEX

IS THE DATA TO BE SENT TO THE 360.
THE DATA WILL
BE CONVERTED TO EBCDIC BEFORE BEING TRANSMITTED TO
THE 360.

-- ENARBLE A DX-11

DEVICE ADDRESS

THE ENABLE COMMAND TURNS THE DEVICE I NOICRTED IN THE OPERRND
0 AN ON-LINE STRTUS
A DEVICE RDORE S S ONLY BECOMES OFFLINE VIR THE
*
COHHRND
THE DEVIEE RDDRESS HUST BE ENTERED
F
IN HEX AND BE
W
I HIN THE LIMITS SPE
3E
D BY THE TEST
PARAMETERS. THE SYNTAX OF
THE ENRBL E comm

EXX
¥

ENRBLE DEVICE XX

-- DISABLE DXil1-B DEVICE RDDRESS

INDICATE
TO AN OFF-LINE
STnTUéL ¢THE
DEVXEE TSODSESgEvl$ERED
MUST8
N HEX AND BE

uITHIN THE LIMITS SPECIFIED BY THE TEST PQRQHETERS
4]
D AGRIN VIA THE “ETM COMMAND.

;HE SYNTRX8?LTHEEK§LLt MMAND IS:

KXX

DISABLE

DEVICE

09:46

PRGE 10

Eggg?s?a -DZDX& ?QNNfiu DXlé B RESPONDEROPERQTING SR&*EBogélosz)

LO1

MAINDEC-11-DZDXI-B NEW DX11-B RESPONDER
MACY1l 30A(10S2)
OPERATING PROCEDURE
30-JAN-78 14:26
CZDX1B.DOC

MOl

O0I1-FEB-78

09:45

A == ACCESS AND DISPLAY LOCATIONS (QUICK LOOK + CHANGE)
THE ACCESS COMMAND ALLOWS THE USER TO DISPLAY AND ALTER

oyA

e iA

oFwpe"
?fiERL
REFE
OCQTIS:O?ESOE¥“ERINT%SE
CONSOLE TELE
5235%&
¥ heh

CHANGE THE CONTENTS OF THE LOCARTION BY TYPING IN THE

NEW CONTENTS IN OCTAL, DELIMITED BY
A (C/R)

THE

?T2T58N¥ h*STHEN OPEN' THE NEXT LOCATION AND DISPLAY
8.

C.
THE

TYPE A (C/R) ONLY.
THIS WILL NOT AFFECT THE CONTENTS
OF THE CURRENT LOCATION.
THE SYSTEM WILL OPEN THE
NEXT LOCATION AND DISPLAY ITS CONTENTS.
TYPE_

(/)

MONITOR.

SYNTAX OF

SLASH FOLLOWED BY A
THE

ACCESS COMMAND

(C/R)

TO ESCRPE TO THE

IS:

RYYYYY
ACCESS + DISPLAY LOCATION YYYYY
NOTE:
NO SPACE BETWEEN “RTM AND LOCATION.

$.0

OFPERATING PROCEDURE
REFER TO SECTION 4.4 "MONITOR COMMANDSTM FOR DETRILS.

SEE MAINTENANCE MANUAL EK-DX11B-MM-002 FOR PROCEDURES

FOR OPERARTING THE

IBM SYSTEM.

IN FRIEND OR 2848 DIARG.MODE,
COMMAND

OCTAL
00
01
02
03
04
0s

HEX
00
01
Je
C3
o4
0s

07
12

07
0R

o0&

FOR

€.0

TEST 1/0
WRITE FULL BUFFER
#READ MANUAL INPUT
NO OPERATION
SENSE
WRITE LINE RDDRESS

ERRORS

READ FULL BUFFER

ERARSE
#READ SHORT MANUAL

THE

THESE

IBM COMMANDS RRE VALID;

DESCRIPTION

#*DATA_IN

THE FOLLOWING

OUTPUT

COMMANDS.

BUFFER

ONLY

INPUT

TRANSMITTED

ONCE

PARGE 11

220II)ECD(l)é

-DZDX1-B_

6.1

NEW DX11-B RESPONDER

30-JAN-78 14:26

MACY1l 3CA(1052)

OPERARTING PROCEDURE

OI1-FEB-78

093:46

ERROR HALTS

MEMORY §
TO HALT OUTSI

RROR

OFTPE TRAP

CHER.

BOTH ERRORS

ANY SVSTEM HALT
FROM RY
E RECOVE
OF THE"ERROR.
THE CAUS
LOCGTION 200.

REQUIRES THE OPERATOR TO RESTART THE PROGRAM A
SEE ERROR MESSAGES FOR DETRILS.

5.2

DX ERRORS

E_ADDRESS,

UPON RECEIPT OF AN ILLEGAL DX C
INVALID DX COMMAND,
NON
x'xérsm MEMOR
THE USER MAY THEN EXAMINE THE STATE
THAT THE DX nusr BE ENABLED BEFORE

TEM WILL

——n

PRINT A DESCRIPTIVE RROS

&
.

NO1

PERFORMED ON THE 360/370
(RUN COMMAND). AFTER THE
DX
HAS BEEN DISABLED THE FOLLOWING WILL BE PRINTED ON THE
CONSOLE TELETYPE:

“CURRENT DEVICE -- XX"

THE CURRENT DEVICE ADDRESS IN HEX

“XXXXXX"
= XXXXXX"

THE DXCS
IN OCTAL
THE ons IN OCTAL

“XXXXXX"
= XXXXXX"
= XXXXXXTM
= XXXXXX"

THE
THE
THE
THE

= XXXXXX"
= XXXXXX"
= XXXXXX"

THE DXES1
THE DXMOB
THE DXES2

= XXXXXX"TM
“XXXXXX"

= XXXXXX"TM

THE DXDS

IN OCTAL -- PROBRBLY ZERO

THE

DXBA

IN OCTAL

THE DXND

IN OCTAL

DXBC
IN OCTAL
DXMO
IN OCTAL
DXMI
IN OCTAL
DXCB IN
OCTAL

IN OCTAL
IN
OCTAL
IN OCTAL

NOTE —cpTHE DX WILL NOW BE IN A DISRBLE STATE REQUIRING
THE USER TO ENABLE THE DX
VIR THE RUN
COMMAND BE ORE
COMMUNICATIONS TO THE 360 CAN RESUME.
€.3

ERROR MESSAGES AND SUGGESTED CORRECTIVE RCTIONS

*“MEMORY TIFE ouT*

THE MEMORY TIME OUT ERRM IMJ CQTES A TRAP WRS
EXECUTED THRU_LOCATION
4
SYSTEM HALTS AFTER
THIS ERROR.
THE MEMORY Tlft OUT ERROR_NORMALLY
DENOTES THAT AN ILLEGAL RDDRESS WAS REFERENCED AND
THE SYSTEM SHOULD PROBABLY BeE RECONFIGURED.

"MEMORY MANAGEMENT ERRORTM
THIS ERROR INDICRTES TRAP WAS EXECUTED THRU
LOCRATION 250,
THE
MEMORY MANAGEMENT
TRAP VECTOR.

EHEND!;,YSI;TEH WiLL HALT AFTER REPORTING THE ERROR

“ILLEGAL DEVICE NUMBER"

PAGE l2

C-11-DZIDXI-B

NEW DX11-B RESPONDER

BO2

OI1-FEB-78

MACY1l 30A(10S2)

OPERATING PROCEDURE

.sgxgg DSL 3 30-JAN-TB 14:26
TH
RROR
NDICRT S THAT A TUMBLE TARBLE ENTRY
OUTHR%SHEDE HH% RINED A DEVICE RDDRESS
BY THE
1E
mo-«n
OM~

DE THE Vfi%é
ST PARAME

SSES SPECIFIED

WILL NOT
TIOg

NOT

09:46

L O NE L] bHhaldd, 1 ST

*"INVALID D X

ERRORS.

IAL SELECTION SEQUENCE.
THER

DETRILS

SEE SECTION

TENT MEMORY
FROM THE
AILS ON DX
“PARITY ERROR"

THIS ERROR
TECTEDB

INDICQTES THAT A PQRITY ERRCR WRS DE-

THE DX.

A PARITY ERROR

TO STOP

15 DETECTED,

CONSULT THE “STOPTM COMMAND.

RESTRICTIONS

SEE MEMORY REQUIREMENTS

MULTIPLE

DEVICE

THE DX WHEN

THE USER SHOULD

(SECTION 2.2)

ADDRESSES

ONLY B8 DEVICE ADDRESSES MAY BE EXERCISED SIMUL TANEOUSLY
OVER THE DX.
ALL THE DEVICE ADDRESSES MUST BE CONTIGUOUS.

8.0

PROGRAM DESCRIPTION

PURPOSE

THE

PURPOSE

THIS

PROGRAM

T WILL,

SOF TWARE OR HARDWARE
THE

THIS

GIVE

INSIGHT

BY DEFAULT,

PROVE

FENCE“ A PROBLEH Lies-

,DEC OR IBM

FOLLOWING IS A DESCRIPTION
OF THE PROGRAMMING TECHNIQES USEDI
[S BROKEN DOWN BY THE NERREST DISCRIPTIVE ROUTINE-

-------- KEYBORRD
MESG:

HE HARDWARE AND TO GIVE AN EXAMPLE OF

ROUTINE

LOOKS TO SEE

PACKS

PRINTER
THE

TYPE

IF PRINTER

1/0

====-===-

OUT

MESSARGE

IS BUSY -

IF NOT,

BUFFER

RRER

PRINTS AND

PAGE 13

co2

01-FEB-78

RESTORES BUFFER RRER UNTIL MESSAGE IS COMPLETE.
xr BUSY,

IT PACKS BUFFER AREAR UNTIL FULL,

WRITIMG FOR

HE OTHER PRINTRBLE TRSK TO COMPLETE.

THIS APPROACH PROHMIBITS MESSAGE INTERWEARVING.
PROUT:

TKIN:

USES PROUT:

THIS ROUTINE SENDS DATA TO PRINTER BARSED UPON TTY FLAG
IS BUSY OR NOT.
THIS ROUTINE
RCCEPTE $HQRQ TER? FROM KEYFORRD AND STUFFS

THEM

TROL

CHRRQC

FOR CERTAIN CON-

T CHECKS

FIRST

tP - JUMP TO RESTART TO RESELECT PARAMETERS.

tC - WHEN COMMAND
=

FLAG

(TCMDARB)

(TCMACT)

TCHQCT)
& RESET BUFFER

= WHEN COMMAND

A C/R DELIMITS

TTY COMMAND -

TCMACT

RCTIVE
= SET ABORT

= PRINT »
NOT ACTIVE
IS SET

NOW

YOU

CONTINUE TYPING - TCMACT BEING SET WILL NOW THROW RWAY
THOSE

SYSINT:

CHARACTERS.

THIS ROUTINE CLEARS THE
& PRINTER VECTOR ARERS.
gsggsUP MEMORY

TIME OUT &

THE WORLD,

SETS

TTY KEYBORRD

MEMORY MANAGEMENT ERROR

CLERRS OUT SYSTEM BUFFER ARER 3 SETS UP

VECTOR

TTY BUFFER POINTERS.

-===GETS DX ADDRESS - CHECKS FOR LIMITS SAVES

IN UNRDDR:

---=GETS DX VECTOR - DITTO
GETS DEVICE ADDRESS

ADDRESSES

MUST

NOT

IN HEX - ACCEPTS RANGE OF DEVICE

EXCEED 8

SEPARATED

COMMA

09:46

PAGE 14

uwn

(a1

?Q(IOSE)

(&
&)

30 RNNge 14:26

PROGRAM DEgC&{P?
MACY

U
mm
(S .

W DX11-B RESPONDER

(= N}
O

Ore

NDEC
x1B

SAVES START DEV ADD IN SDEV
SAVES END DEV ADD IN EDEV
----CHECKS FOR LEGAL TERMINARTOR IE.
-===GETS CHANNEL

TYPE

C-R

M OR S

----GETS ANSWER WHETHER MEMORY MANRGEMENT?

Y OR N

SET UP VECTOR 4 AND TEST FOR EXISTANCE OF MEMORY

IF YES

MANAGEMENT

----3ET BUFFER RELOCATION

CHECKS FOR MULTIPLE OF 2000

CHECKS TO SEE

MENT

IF NUMBER IS VALID WITHIN MEMORY MANAGE-

AND COMPARES WHETHER M/M WARS SPECIFIED.

TEST TYPE
ASK

--==SEPARATE

Ffié ND OR
-

TION,

I1/0 BUFFERS’

§;ogs éN I10BUF

----FILL

SAVE

CHARACTER

IN FILLCH

NO MEMORY MANAGEMENT
MEMORY

MANARGEMENT

COTE:

2848 - STORS *N ISIYYP:
IF

2848

JUMP

INIT:

Y OR N

HEX

AVAILABLE.

TRAP

CLEAR
WORLD
LZEE OUT ERROR MESSAGE

INITRT:

(T+'OUSANDS)

CHECKS FOR BOUNDARY 20000 OR GREANTER

----G T

MMERR:

,000'S

NOMM:

OUT

PRINTS MESSAGE - WAITS FOR
A C/R - DEFAULTS.

ROUTINE

INPUT

GETS

IT OR

GOBBLES CHARACTERS FROM INPUT BUFFER AREAR - CONVERTS TO
OCTAL AND SAVES RESULT IN R3 - THIS ROUTINE DOES NO
OTHER CHECKING THE CODE FOLLOWING UNIT EXAMINE R3 FOR

oo,

PAGE

[y,

09:46

o0
00

O01-FI8-78

N
mm
OO

MRINDEC-11-DIDXxI1-B NEW DXil1-B RESPONDER
MACY1l 30A(10S2)
PROGRAM DESCRIPTION
30-JAN-T8 14:26
CZOXIB.DOC

DO0e

MAINDEC-11-DZDXI-B_ NEW DXi1-B RESPONDER

:Zéx?E.DOC & 30-JAN-T8 14:26

Ol1-FEB-78 09:46 PAGE l&

MACY! ; 30R(10€2)

PROGRAM DESCRIPTION

VALIDITY.

SHTS:

GOBBLES CHARACTERS FROM INPUT BUFFER AREA_CONVERTS HEX #
TO OCTAL AND SAVES RESULT.

STORES AWAY TERMINARTOR

IN R4

THE TERMINATOR SHOULD BE EITHER A C/R OR R COMMA
PROGRAM INITIALIZATION----

INIT:

SET _UP _MEMORY TIME OUT

TRAP

----SET UP DX RDDRESS TRBLE.

SET
UP VECTOR R ADDRESS WITH
IF NOT START

2¥I§Sboouns BUFFER RELOCATION SPE IF1E D -

----TEST

FOR

MEMORY MANAGEMENT

----1F YES
- SET UP MEMORY MANAGEMENT REGISTERS AND ENABLE
MEMORY MANARGEMENT.
--==SET UP SPW TRBLE
LORDC DXOS WITH BUFFER OFFSET
CALCULRTE ADDRESS OF DST

--==SET UP SPW TABLE
MOVE

DST

TUMBLE
=

TO VALID DEVICE

DTT

= 400(8)

——w

FILL

TUMBLE

#'S

WORDS.
TABLE

WORDS

SET upP D ST TABLE

#'S

WORDS

FIRS T 11. BYTE LOCQTIONS FILL
RE?Q I ?SR DST = UC s
e
=
128.
WORDS
= 256. BYTES
----SET

INVALID DEVICE

= 400(B)

TRBLE 8 DUPLICATE

400(8)

- SAVE AT DSTOFF

- MOVE UCHK FOR

ARDDRESS

SPW TRBLE
-====CLR

(DEFAULT = 20000)

TABLE

IN WITH VALID COMMANDS

CHARACTER

COMPUTE MAX NUHBER OF DEVICES
SAVE AT MAXDEV
CEVCON
= FIRST DEVICE -1

Dxi11-B RESPONDER

N§’8 i 4:26
i

PROGRAM DESCRIPTION

FO2

OI-FEB-78

--==START SETTING UP DEVICE BUFFERS
SAVE ADDRESS AT _SDEVTBE
MAKE THE FIRST DEVICE
= 0O IN THIS TABLE
CLEAR DEVICE STATUS BUFFER TABLE 8 INPUT BUFFER

----gfigggs ‘REQVE ADDRESS OF INPUT/DISPLARY BUFFER IN DEVICE
CRERTE 3 SRVE RDDRESS OF OUTPUT-DISPLAY BUFFER IN DEVICE
BUFFER ARER

---=-FILL OUTPUT/DISPLAY BUFFER WITH FILL CHARACTER

NOW CHECK IF ALL DEVICES HAVE HAD THEIR DEVICE STQTUS
?EFTES TRABLES GENERARTED - IF NOT, REPEAT INT130: THRU
-

REMEMBER MEMORY MANAGEMENT HAS BEEN TURNED ON-

CREARTE _EXTENDED ADDRESS BITS AND SAVE AT XADDR:

FIRST

TIME

GENERATED

THRU FLAG

IF LA

QUESTION/ANSWERS WILL

1002 & START.

OR HITTING

%S ON TTY KEYBOARD

-------- THE EXEC: SYSTEM EXECUTIVE/BACKGROUND
(A WAIT ROUTINE)

—-

“EC:

CLR

SYSTEM FLARGS

----ANY_COMMANDS TO EXECUTE?
OX ABORT AN OPERATION -

_IF YES GO TQ EXEC20.

IF NOT SPIN HERE

SET

ONLY BE

--------

DID THE

----ALWAYS COME HERE AFTER TELETYPE INPUT HARS SET TCMARCT THIS ROUTINE DISPATCHES YOU TO THE COMMAND TYPED IN - IF

NOT AN CETTS?%EQ$EETEH COMMAND =

==-=TYPICAL DX COMMANDS--(ENTERED VIA TTY KEYBORRD)

RUN

COMMAND

RETURN TO EXEC.

09:46

PRAGE 17

-B

30A(10S2)

MACY1l

I F DX

YE S,

1S ENRBLED

TYPE > AND

(BELL)--RETURN TO EXEC_AND

WAIT FOR ANOTHER TTY COMMAND.

NO, C ONTINUE

TURN TO EXEC.
CLR DXCS
INC DXCS -~ GO
CLR DEVICE STATUS BUFFER
(SCMD
SLCMD

TRBLE

(NOT SCURS,

SSENSE

SSTART

SOUBF,

SINTB,

SONLF>

SMINS)

CO THIS FOR ALL DEVICE STATUS BUFFER TRBLES
MAXDEV:)

CLR DXARCT,

CMDCHF,

(BARSED ON

DXARBFL

CLR TUMBLE TRBLE 8 DUPLICATE TUMBLE
SET EXTENDED ADDRESS BITS IN DXCS

TARBLE

CHECK FOR CHANNEL TYPE

IF SELECTOR CHANNEL
SET

INTERRUPT ENRBLE 8 ONWLINE
TO

IN DXCS

EXEC

COMMAND
z&g¥

?$§T

C/P

CRUNCH DX,

TTY

INPUT

CHRRACTER FOR

THE

CONVERT AND PRINT

MODE.

CURRENT

DEVICE

IN HEX, PRINT .3 DX REGISTERS CONTENTS.
CLR ABORT FLAG (DXABFL), CLR DONE

RESET DX, SET GO, RETURN TO EXEC.

]

(&)

O
x

-4

RETURN

m
4

SET BUSY ENABLE

SET

THE STOP FLAG

TRKEN PLQC;

CLEARED (
DXSTPF

(DXSTPF),
ua;v

DISABLE DX

TYPICALLY YHE

(DXISR:))

TEST WHETHER STOP HAS

NOT

UNTIL

OXSTPF

MRS BEEN

PCHEND: ROUTINE WILL CLEAR
,

RETURN TO EXEC

PAGE 18

VAN

09:46

O0l-FEB-78

OO
OO0

PROGRAM DESCATPTION

GO2

OA(10%2)

MACY]

dwn

MY7 Daile

X11-B RESPONDER

MACY1l 30A(10S2)
NEW Dx11-B RESPONDER
MAINDEC-11-DIDXI-B
PROGRAM DESCRIPTION
CZDX1B.DOC
30-JRAN-TB 14:26

SAME AS D

EXCEPT

SAME RS D

EXCEPT

WILL CLERR DXSTPF

ANY

OTHER

CHRRACTER

OQl1-FEB-78

(TYPICALLY PESEND:

(

ROUTINE

ROUTINES WILL CLEAR DXSTPF

PCHEND:

HOZ2

(DXISR:))

TYPICALLY PCHIS:

(DXISR:))

ILLEGAL CHARACTER

DUMP COMMAND

OUMP:

PICK UP THE NEXT SEQUENCE OF OCTAL NUMBERS OR NEXT CHARACTER
FROM

TTY

INPUT

GLIMIT: *STDEHES§I§E

BUFFER

ARER.

}gEYTQRE SCT“& NUH8§RS IF vgs

IF NOT ONE OF THESE - TYPE ERROR ntssncs

(SAVE

IT)

OCTAL NUMBERS,

(SAVE IT);

1ST ADDRESS GIVEN = SADDR

2ND ADDRESS GIVEN = ERDDR.

IF "T" -CHECK FOR 2ND T - CREATE STARTING ADDRESS
CF DUPLICATE TT (TTPTR +1000)
(SAVE)

DTT2 = SADDR

IF "I" - NOW
CHECK FOR N - CRERTE STARTING 8 ENDING ADDRESSES
OF DEVICE O INPUT BUFFER TABLE
SINBUF (DEV 0) = SADDR
SADDR + 4B8l1. = ERDDR
IF 0" - NOW CHECK FOR
T - CREATE STARTING AND ENDING
QDDRESSES OF DEVICE O OUTPUT BUFFER TRBLE
SOUTB (DEVD) = SAODR
SADDR + 479. = EARDDR
NOW SET
CORRECT

UP DMPADR: TO CONTRIN THE ADDRESS OF
DUMP ROUTINE (IE ARSCII DUMP, EBCDIC,

THE
HEX,

OCTAL)

%nfaévESsEEE 6§£§ néang IRU ADR, YES&T?flfiEsDBBMPxNG
(PRINTING) UNTIL BEGIN 33 DTT IS SEEN

ER0 Kol SRAEY T
1oLB EEATBT
IF NOT
A TT DUMP - CHECK FOR
A DEVICE

CONVERT AND DUMP

IT,

STOPPING JERDDR

¢ SPECIFIED -

RETURN TO EXEC.; LOOKING FOR MORE COMMANDS TG EXECUTE.

09:46

PAGE

SEC ooeo
SES ccea

*-11-DZDXI-8

NEW DXi1-B RESPONDER

O oot PP35 Tansg T4:e
FILL

CY}} 30A(1082)

PROGRAM DESCATPTION

102

GI-FEB-78

03:46

COMMAND

FILL:

PICK UP CHARACTERS FROM TTY INPUT BUFFER ARER - PERFORMS
VERY
IMILAR TO THE CUMP COMMAND EXCEPT
SPECIFIED FILL CHARACTER (FILLCH)

IF FILLS RRER WITH THE

USE ONLY THOSE FILL COMMANDS RS SPECIFIED Il THE TEXT - ANY
CTHERS MAY OBLITERATE THE CORE.

BRSICALLY THIS IS USED TO FILL THE OUTPUT OR INPUT BUFFER RRER
WITH FILL CHARACTER
=CCESS

RCCESS:

(FILLCH)

COMMAND

JPENS CORE LOCARTION

RLLOHING IT TO BE MODIFIED
WITH NEW CONTEHTS

" RETURNS YOU TO
THE EXEC, A C/R OPENS NE XT
TUERY SIMILAR TG FoDT

NRBLE

LOCATION ETC.

DEVICE

GETS THE TYPED DEVIC E & IN HEX
CLEARS THAT DEVICES STRTUS TABLE
CLR SSENSE,
CLR SONLF

RETURN TO EXEC

«ILL

DEVICE

Fial?

GETS THE TYPED DEVXCE

MOVES
A "1" INTO SONL
MOVES
R _UNIT CHECK XNTO
RETURN TO EXEC.

IN HEX
THE SPW TRBLE

INPUT COMMAND
INPUT:

CHECK FOR FRIEND OR 28487 - 2848 ONLY GET DEVICE
INn HEX FROM TTY INPUT BUFFER.

PUT THE START CHARACTER IN DEVICE BUFFER AREA (SMI=112)
SAVE DATA LOCATION (SMINS)
INC CURSOR POSITION
CHECK FOR END OF SCREEN (SCURS=478.) IF YES,
PUT EOM

lEOH'lS?) IN THE BUFFER RREA,

A READ REQUEST

PUSH STRCK

(SRDRQ)

(CREATE PHONEY

INC CURSOR POSITION, QUEUE

INTERRUPT)

PAGE 20

MAINDEC-11-DZDXI-B_

CZéX?g.DOC

NEW DXil-B RESPONDER

30-JAN-781 4:26

MACY1l 30A(10%2)
N
PROGRAM DESCRIPTIO

Joe

OI1-FEB-78

09:46

JUMP DXEXEC

T UIMESE SeRvICE ROQTINEG
BRE SELECTEL
8Y THE DXISR
ROUTINE WHEN THE TUMBLE TABLE ENTRY (TT1=DXDS)

1S EXAMINED.

SYSTEM RESET

PSYSRT:

CLERR DEVICE STATUS BUFFER TRBLE.
SETUP DISPLAY BUFFER
AREAR WITH FILL
CHAR.
DO _THIS FOR ALL DEVICES
CLR ACTIVE FLAGS,
CMD CHRINING FLAG (DXARCT & CMDCHF)
CLR CUBUSY IN DX(S

PROCESS NEXT ENTRY

IN TT

IF NO MORE TT ENTRIES - GO TC DXEXEC.

SELECTIVE RESET
FSELRT:

CLR _DEVICE

STATUS BUFFER

TRBLE

FOR THAT DEVICE
+ SENSE
IT IS A SEL RESET ISSUED AGARINST THE CURRENT ACTIVE DEVICE.
PROCESS ANY MORE

ENTRIES

THEN GO

TO DXEXEC.

INTERFACE DISCONNECT:
FINDSC:

DEVICE WRS

ACTIVE,

ITS DEVICE

STATUS

CLERRED - IF NOT ACTIVE,

IGNORE CMD.

IF ACTIVE - QUEUE CE!

IN SCMD

(TYPICALLY IBM WILL INTERFACE DISCONNECT
THO THE DEVICE WARS NOT ACTIVE)

TABLE

WILL

R DEVICE EVEN

IF ACTIVE - CHECK FOR CMDCHF: & DXACT: FOR THAT panrxcULnn
DEVICE - IF YES,
CLR BOTH FLAGS - ONLY ONE DEVICE AT
A TIME

CAN HAVE CMD CHAINING AND/OR DX ARCTIVE SET
IF NO MORE

TT ENTRIES - GO TO DXEXEC.

STATUS ACCEPT
PESENT:

WAS

LAST

CMD

WRITE?

WARS ATTN ARCCEPTED?

IF NO,

CLR OUT

YES,

SO,

FORMAT

SET SRORG

INPUT REQUEST)

CONTINUE

THE

DISPLAY

(RERD MANUAL

SLCMD (LAST cgg)(szr ONLY ON A WRITE)

CLR DXACT
DXACTIVE
F
CLF DEVICE STATUS BUFFER TRBLE

(DISCTL)

PAGE 2!

-11-DI0XI-B_

NEW DXi1-B RESPONDER

o et WA

TEST FOR CMDCHN

| 30A(1052)

PROGRAM DESCRIPTION

(TT1)(DXDS)

IF YES,

KO2

SAVE DEVICE

O1-FEB-78

09:46

# IN

é:ocESSHF (ONLY ONE DEVICE AT A TIME CAN

was A st sPecIFIEn? Celdp on ENDING SE@)TT - ENTRIES'GO
IF YES, CRUNCH
TO
- 1F MO, AND NO MORE
Bx
DXEXEC

NON-EXISTANT
PNXM:

STOP

MEMORY

- FATAL

THE DX FROM

ERROR

INTERRUPTING

SET_RBORT FLAG
EXIT FROM DXISR - GO _TO MONITOR WARIT STATE(EXEC).
(DO NOT PASS THRU DXEXEC ROUTINE - JUST RBORT)

PARITY ERROR
PPRARER:

WAS STOP ON PARITY ERROR SPECIFIED”?
THE PROGRAM (PARSTP: =0) HAS BEEN PRESET
IF YES - CRUNCH DX

YES

IF _NO (PRRSTP:
=>0) gUE UE
R UNIT CHK TO SSTAT
RETURN TO DXISR AND
ONTINUE CHECKING TTIl

(STATUS WORD)

EVERYTHING OK UP TO THIS POINT
CHANNEL

PCHIS:

WAS
A SI

IF YES,

CMDREJ®

INITIRTED SELECTION SEQUENCE
(STOP ON

ISS)

CRUNCH DX

"YES,

SPECIFIED?

IS DEVICE ONLINE?

INTREQ

CMOCHF? IF YES

xn ssense

ANY MORE TT enrkxss* CMDCHF
- IF NO, GO TO DXEXEC
CMDREJ”?

YES, IS DEVICE ON LINE?
YES,
TEST PARITY ERROR

IF NOT, HUST BE ILLEGAL CMD - SET BUS OUT IN SSENSE
IF YES, SET SCMDRJ (COMMAND REJECT) IN SSENSE

CMDCHF?

CMDREJ?

YES,

CLR CMDC HF

nuvnbns TT ENTRIES, NO, GO TO DXEXEC
NO,

THEN PROCESS CMD

(TT2 CONTRINS CMD)

IS THIS
A TIO CMD?

IF YES,

IGNORE,

CHECK CMOCHF ETC,

IS THIS
A _NOP CMD?

IF YES,

IGNORE,

CHECK CMDCHF ETC,

ANYMORE TT? NO? GO' TO DXEXEC
TT ENTRIES?, NO GO' TO DXEXEC

IS THIS A VALID

CMD?

- RBORT DX(DXRB )....EXIT FROM DXISR
RETURN TO EXEC:
YES
- QUEUE CMD (TT2) TO SCMD

PAGE 22

-DZDXI-B

NEW DX11-B RESPONDER

30-JAN-78 14:26

YES,

IS CMDCHF SET?

1 30R(10€2)

PROGRAM DESCRIPTION

LC2

O0OI1-FEB-78

09:46

CLR CMDCHF

ANYMORE TT ENTRIES, NO” GO TO DXEXEC

CHANNEL END,

PREPARE ENDING SEQUENCE RESPONSE

CLR DXRCT

HRS STOP_ON DfiTR TRANSFER DONE?
QUE UE CEDE T0 S CMD

YES,

STOP DX

suérnncr oxavrs couur
(DXBC)1IF
rnon
SRBYTC
Y
R PARITY ERROR?
THERE
ousue EQPCHK TO SSENSE (EQPCHK=éo )
ANYMORE TT ENTRIES? NO,

GO TO DXEXEC

CONTROL UNIT END

CLR

USED

DXARCT

TO KEEP TRACK OF REMAINING BYTE COUNT (SRBYTC)

AND TO KEEP TRACK OF CURRENT BUFFER POINTER
JUMP TO PCHEND:

(MULTIPLEXER CHANNEL)

=== DXISR

=---

(DX11B

INTERRUPT SERVICE ROUTINE)

THE DX SHOULD MAKE ENTRIES
THRU WHEN PSW IS < DX11B

INTERRUPTS VECTORING

CHECK IF ZERO TT ENTRY_UPON INTERRUPT
IF _ZERO - ASSUME TT ;NTRY HAS ALREADY BEEN PROCESSED RETURN FROM
INTERRUP

IF _NON-ZERO

CLEAR "DONE"TM

(DXCS)

FOR EVERY TT ENTRY

- SAVE FIRSY TT ENTRY IN DUPLICATE TT (DTT1) 3TTI.

SAVE SECOND TT ENTRY IN DUPLICATE TT (DTT2) &TT2.
CLR BOTH TT ENTRIES TO SIGNIFY THAT THEY WERE PROCESSED.
NOTE:

TTéchggglfls CONTENTS OF

DXDS...TT2 CONTAINS CONTENTS

PICK UP DTT2 AND CHECK FOR VALID DEVICE

THE ORDER

ETC.

IN WHICH THE FIRST TUMBLE

IMPCRTANT.

(TT2=DXCR)

TRBLE ENTRY

IS PROCESSED

CHECK FIRST FOR SYSTEM RESET , PARITY ERRORS

THEN CHECK FOR CHANNEL INITIATED SEQUENCE,

CONTROL UNIT END.
#

CHANNEL END,

(PERFORM RCCORDING TO TT1 (DXDS))

CHECK ron a svsnsr IN TT1 (DXDS)
IF
Y0 SYSTEM RESET (PSYSRT:)

i SELECTIVE ntserv (DXDS)

PRGE 23

MO2

Ol1-FEB-78

09:4%

TO PINDSC:
I F YES,GO

ou-sxxsmu? rtnonv' (DXDS)
TO_PN

STAT nccgbteo’(D

4 ms’ggm
(DXDS)
t1m
’CHANNE
'”?*L5END?’
22
' c5°SE H?g£7 (EVERYTHING
OK UP TO THIS POINT).
IF YES

o TCHEND:

CUEND:

CONTROL UNI} END? (?XDS)
YES,

INITIAL EELtcrxo«SEQUENCE ns:scrv (DXDS)

—4

xcnon; ENTRY...TRERT AS srn s n us

suguro

F 35? )

UE A CONTROLuulr sno<ocus-10) ro scno OF PROPER DEVICE

THIS SECTI ON OF CODE UNTIL ALL TT ENTRIES
HAVE BEEN PROCESSED. WHEN T HERE ARE NO MORE TT ENTRIES TO
PROCESS ....JUMP TO DXEXEC:

-=-=DXEXEC:

OVERVIEW (

CMD DISPATCH SECTION

OF THE DXISR)

DXISR HQS THE PRIORITY

LEVE

=--

NTING

ANY _MORE

IT HRS PROCESSED ALL # #TENTRVEE

zgnenacn
Tugguggfiei?THE

¥xsn
nr

T SERVICE §3§TI"E

oaL Y,
;;xg sxuc.

NOW IS THE TI TO PROCE:z
§§LE
CHANNEL .

FFICULY TO

SYSTEM nsSs?Exnrznrncs oxséouuscr
DXEXEC:

ROUTINE

FIRST

DETERMINES

(CHTYPE

D
HE 360

WELL,

xzcurxnc

WAS SELECTOR OR MULTIPLEXER

RS 1¥5 T

HBER)

vou CAN EXIT on T

A COMMAND

INTERRUPTS.

GETTING INTO THIS CODE

g§g¢us
NGgzzcgrxc"sos"'|“°§é£&fiéég
REFL cT*fif riflgzs arus§§nr

THE

PAGE 24

CHECK x?ofi‘?fir?flrggspgficomecn (DXDS)

Drard
=4 2

!Ei;S§§* TMok ok ok ko

MAINDEC-11-DZDXI-B NEW DX11-B RESPONDER
MACY1l 30AR(10S2)
PROGRAM DESCRIPTION
30-JAN-78 14:26
CZDX1B.DOC

WHETHER

= "M

THE

OR
*

CHGNNEL

SEG 002S
SEG 0Ges

X11-B RESPONDER

4:26

MACY1l

READ MANUAL INPUT

ENDING SEQUENCE

SENSR COMMAND
WRITE LINE RDDRESS
RERD FULL BUFFER
ERASE COMMAND
CONTROL UNIT END
SEND ATTN_TO 360
READ SHORT MANUAL INPUT

(FOR ERCH DEVICE

(SCMD =

ENDING SEQUENCE
SENSE COMMAND
WRITE LINE ADDRESS
READ FULL BUFFER
ERASE COMMAND
CONTROL UNIT END
SEND ATTENTION
READ SHORT MANUAL INPUT

®)

(SCMD = 2)

(SCMD = 3)

(SCMD
(SCMD
(SCMD
(SCMD
(SCMD
(SCMD
(SCMD

TYPICAL MULTIPLEXER COMMANDS

WRITE FULL BUFFER
READ MANUAL INPUT

O01-FEB-78

30R(10S2)

PROGRAM DESCRIPTION

TYPICAL SELECTOR COMMANDS
WRITE FULL BU"FER

NO2

= 4)
= S)
= B)

= 7)
=10)
=11)
=12)

(FOR ERCH DEVICE

®)

(SCMD = 1)
(SCMD = 2)

(SCMD
(SCMD
(SCMD
(SCMD
(SCMD
(SCMD
(SCMD
(SCMD

= 3)
= 4)
= S)
= &)
= 7)
=10)
=11)
=12)

----SELECTOR/MULTIPLEXER COMMAND DESCRIPTION ------- SELECTOR CHANNEL ---SEX:

1S Trcac ANY

FOR C

COMMANDS TO EXECUTE

(PER oevxcs)v

NING: IF YES, EXIT FROM THE
D
(REMEMBER,

OP THE PROC
PROCESS NEW TT ENTRIES.

xr _NO,

CHECK

IF CMDCHF = 0 CHECK TO SEE OF THE RTTENTION FLAG_(SRDRQ)
FOR THAT DEVICE IS SET.
1IF YES,
QUEUE
A SEND ATTENTION"

(SCMD=11).
_IF NO, RETURN TO DXEXEC AN REPEAT FOR NEXT DEVICE
- REPEAT UNTIL
ALL DEVICES HAVE BEEN SERVICED BEFORE

EXITING FROM DXISR.

IF THERE WAS A COMMAND TO EXECUTE

533;‘351325“”50 BY THE COMMAND.

(SCMD=XX);

GO TO THART

WHEN COMPLETE...EXIT

09:46

PAGE 2%

SEG 0026
SEG 0026

MRI NDEC
cZo

NEW DXil-B RESPONDER

11-DZDX1-B_

30-JRAN-78 14:26

XIB.BOC

MACY!l 30R(10%2)

PROGRAM DESCRIPTION

BO3

O1-FEB-78

WRITE LINE ADDRESS
WRITE FULL BUFFER

SWRITE:

SET UP THE RDDRESS OF INPUT BUFFER ARER (SINBF) INTO DXBR

SUBTRACT PHYSICAL OFFSET
SET BYTE
COUNT
IN DXBC
SET DEVICE ADDRESS IN DXCR
SAVE COMMAND (SLCMD (====- SCMD)
CLR SSENSE
SET DEV ACTIVE FLAG (DXRCT
SET_INPUT FUNCTION & GO_IN D CS
EXIT FROM DXISR AND WRIT FOR NEW TT ENTRIES

THE SRVING OF SLCMD SIGNIFIES TO THE PRESENT ENDING
SEQUENCE (PESEND) THAT IT MUST FORMAT THE DISPLAY (DISCTL)
READ

COMMAND

SRERD:

(READ FULL

BUFFER)

SET UP THE ADDRESS OF THE OUTPUT BUFFER RRER
NTO DXBR.
SUBTRACT PHYSICAL OFFSET.
SET BYTE COUNT IN DXBC
SET DEVICE ADDRESS IN DXCA
CLR S SSENSE
SET DEV RCTIVE FLARG (DXACT)
SET _OUTPUT FUNCTION 8 GO IN DXCS
EXIT FROM DXISR AND WARIT FOR NEW TT ENTRIES.

RERD MANUAL INPUT
READ SHORT MANUAL

(SOUTB)

INPUT

?SRHI:
IS IT FRIEND?
1IF YES, TREART RS READ FULL BUFFER
RAD:)
D _YOU SPECIFY
A READ REQUEST? NO? RASSUME THE
GAVE AN UNSOLICITATED REQUEST (POLL) AND SEND BRCK
NDING SEQUENCE (ESEQ:)
IF RERAD REQUEST WAS SET-PROCEED CLR_SRDRQ
SAVE LAST COMMAND
SET UP STARTING ADDRESS - MOVE SMINS TO DXBA
SUBTRACT PHYSICAL OFFSET FROM DXBA
CALCULRTE BYTE COUNT AND SET DXBC
IF BYTE COUNT IS ERRONEOUS - JUST SEND AN ENDING SEQUENCE
COMPUTE DEVICE ADDRESS AND SET DXC
CLR SSENSE
SET DEVICE ACTIVE FLAG (DXACT)
SET _OUTPUT FUNCTION AND GO IN DXCS
EXIT FROM DXISR AND WAIT FOR NEW TT ENTRIES.
PRESENTY

ENDING STATUS TO CHANNEL

ESEG:

GQUEUE CE & DE TO SSTRT
CALCULRTE DEVICE ADDRESS AND SET DXCA

09:46

PAGE 2¢&

Oz
ND

-D’Dxa ?QN'H DXlé B RESPONDERPROGRRH B@ggé*P??nclos=)
CHECK FOR UNIT CHECK BIT SET.

UNIT CHECK ONLY
F_NO,

1IF YES,

co3

O1-FEB-78

09:4%6

QUEUE SSTAT WITH

MOVE SSTAT TO0
D

EE3§“T

guz

ON
8
co Tg
xcs
FL
vg
XIT R&n px{s
3 ~eu TT ENTRIES.

PRESENT

CONTROL UNIT END

CONUNE :

CONTREL UNIT TO SSTAT
CfitEULROs CEH280RB§§
RN SET DXCR
WITH uuxr CHECK ONLY

xr NO nov: ssrnr TO DX0S
SET stATUS FUNCTION 8 GO TO oxcs

SET DEVICE ACTIVE FLARG (DXACT)
EXIT FROM DXISR AND WAIT FOR NEW TT ENTRIES.
ERASE COMMAND

ERASCM:

MOVE AN EBCDIC SPACE THROUGHOUT OUTPUT DATA BUFFER

CLEAR
CLERR
QUEUE
DO AN

CURSOR POSITION (SCURS)
SSENSE
R CE &
TO SCMD (CRUNCH WHARTEVER WARS
ENDING
SEQUENCE - (ESEQ:)

(SOUTB)

IN SCMD)

SENSE COMMAND
SENSCM:

MOVE THE ADDRESS OF THE SENSE BYTE (SSENSE)
COMPUTE DEVICE ADDRESS AND SET DXCA
SET UP TO SEND ONE BYTE TO DXBC
SET DEVICE ACTIVE FLAG (DXACT)
EXIT FROM DXISR AND WAIT FOR NEW TT ENTRIES

----- MULTIPLEXER CHANNEL
MEX:

COMMAND

CHAINING

TO DXBR

----

SPECIFIED?

(CMOCHF)

YES

EXIT

FROM

DXISR 0 fiLLOH PSW Xg ;F NO, PICK UP LAST DEVICE ADDRESS
HASA COMMAND EXECUTED -'HAS IT BEEN EXECUTED’ (TYPICQLLY
SYSTEH RESET

SELECTIVE RESET,

INTERFACE DISCONNECT

STATUS ACCEPYED, CHANNEL END, OR CONTROL UNIT END wieL
TERMINATE DXACT' IN A COMMAND' SEQUENCE)
GO

TO_

IF NOT,

DEVICE AND FIND OUT

QUEUE “ATTENTION"

THERE

IS A

IFF ATTENTION

JOB

TO DO

IS REQUESTED

(SRDRG=1)

PAGE 27

30-JAN-78 14:26

MACY1l 30A(10€2)

D03

PROGRAM DESCRIPTION

O1-FEB-78

-GO EXECUTE COMMAND.

THOSE THAT ARE COMMON TO THE SELECTOR CHANNEL WILL NOT

BE EXPLARINED HERE - REFER BRACK TO SELECTOR
WRITE FULL BUFFER
MWRITE:

THERE A WRITE

IF_NO,

IN PROGRESS”?”

SET UP DXBR

(SRBYTC)

(DXBR (=====

FR)

SET
UP Pgfl 4 BYTES MAXIMUM TRANSFER IN DXBC
CLR

SSENSE
SAVE COMMAND (SLCMD (===== SCMD)
SET DEVICE RCTIVE (DXACT)
SET_INPUT FUNCTION 8 GO_IN DXCS
EXIT FROM DXISR AND WRIT FOR NEW TT ENTRIES

IF_THERE WAS A WRITE IN PROGRESS JUST CONTINUE RS RBOVE
g?;éL SRBYTC = O, THEN SET UP TO MAXIMUM INPUT BUFFER
SRBYTC

ROUTINE

SBUFR

IS DECREARSED BY THE FOLLOWING TT ENTERED

R 360 WRITE

(PREPARE

CONTROL

UNIT END

(PCUEND))

INCREARSED BY THE SAME ROUTINE
(MUX)

WILL

(PCUEND)

TRANSFER 4 BYTES AT A

TIME

THE SAVING OF SLCMD SIGNIFIES TO THE PRESENT ENDING
%g?g%?fg (PESEND) THAT IT MUST FORMAT THE DISPLRAY

READ COMMAND
MRERD:
SAME BASICALLY AS

MWRITE

OUTPUT FUNCTION & GO

EXCEPT

IN DXCS

LUSES

SOUTB

AND

SETS

PEAD MANUAL INPUT COMMAND
MSRMI:
FR IEND OR 2848
284

IF FRIEND--JUMP TO “READ FULL BUFFER" (MRERD:)
IF 2848,
WAS READ REQUESTED ? NO- ASSUME NOP AND

GUEUE AN ENDING SEQUENCE TO CHANNEL (ESEQ:)
IF READ REQUESTED = YES (SRDRQ =1)
CONTROL (SLCMD)
COMPUTE ADDRESS OF OUTPUT BUFFER
COMPUTE THE BYTE COUNT
GO TO READ (MREAD:)
MOTE:

RFTER

TRANSFER

THE

BYTES,

THE

SAVE CMD FOR DISPLRY

QXBC

WILL

DECREMENT

CREATING A CONTROL UNIT
END TT ENTRY (PCUEND:)
SREYTC WILL BE DECREMENTED BY 4 AND SBUFA WILL BE

ZERO

09:46

PAGE 28

unn
mm
oo

=11 -DZDXI1-B

.DOC

NEW Dx11-B RESPONDER

0029
oces

INCREMENTED BY 4-- THIS APPLIES TO ALL THE SELECTOR OR

MULTIPLEXER REARD CR WRITES
FUNCTIONING

CORRECTLY.

-=-MISCELLANEOUS ROUTINES

ASCDMP:

EBCOMP:
g§¥gn§:
@

IF THE DX HARDWARE

=---

THESE ROUTINES SPIT OUT

THE CHARACTER

EQUIVALENT OF THE ORIGINAL OCTAL BYTE
IN RSCII, EBCDIC, HEXIDECIMAL , OR OCTAL..

UISPLAY

CONTROL ROUTINE

CISCTL:

WAS

IT A READ MANUAL

INPUT COMMAND

(SLCMD=2)

YES,

PICK

UP SMINS. BACK UP. BLANK CHARACTER, SAVE SCURS 3 REYURN
SMINS:
SMINS:
SMINS:
WAS

LOADED IN INPUT COMMAND (ENTER DARTAR ON A 7280 SCREEN)
USED IN READ MANUAL INPUT COMMAND
USED IN PERFORM READ MANUAL COMMANDS

IT A SHORT READ MANUAL

IF YES,

JUST RETURN

IF NEITHER,

2848,

(SLCMD=12)

THE COMMAND MUST HWAVE BEEN A 360 WRITE.

WAS IT FRIEND
IF FRIEND AND
COPY INPUT
IF FRIEND AND
DON’T COPY
IF

INPUT

OR_28487
NOT SEPARATE I1-/0 BUFFERS (I0BUF=0)
BUFFER_TO OUTPUT BUFFER
SEPARATE I/0 BUFFERS (IOBUF=1)
INPUT BUFFER TO OUTPUT BUFFER

GET ADDRESS OF START OF

INPUT

(SINBF)

WAS YHE LAST CMD A WRITE LINE ADDRESS? (SLCMD=S)

0¥ ABORT
CARB:

CLEAR CX INTERRUPT ENARBLE TQ PREVENT
SET_THE DXABLE FLAG TO ABORT
EZIT_FROM DXISR
(TYPICALLY

CAUSED

BY A

SYSTEM ERROR

INVALID COMMAND)
----DEVICE STATUS TABLE FLAGS-----

ANY MORE
(NON

INTERRUPTS

EXISTANT

MEMORY,

09:46

PAGE

Ol-FEB-78

PROGRAM DESCRIPTION

30-JAN-78 14:26

EO3

MACY1l 30A(10S2)

.DOC

NEW DXi1-B RESPONDER

nml

-11-DZDXI-B

NEW DX11-B RESPONDER

MRINDEC-11-DIDXI-B

30-J AN-78 14:26

CZOX1B.D0OC

MACYLl 30R(10€2)

SIGNIFICANT ROUTINE)

MWRITE:

QCUE

“ATTENTION"

(===-

GSRMI:

TO VEEP

TRACK

(NO COMMAND)

CEDE
(==== SENSCM:
(==== SWRITE: & MWRITE:
(==== SREAD: & MRERD:
ERASCM:
(====

THE PROGRAM

NN LW

= 0O

SWRITE:

MSRMI:

GENERATED COMMANDS-

IBM 360/370 COMMANDS

% nununnuuennn

IDLE

----

(

-4
-1

(===

FROGRAM

(CLOSEST

OR USES THE FLRG.

THESE FLRGS ARE USED ACTIVELY BY
OF SIGNIFICANT EVENTS.

A LISTING OF WHAT ROUTINE CLERRS THE FLRG,

OR SET THE FLAG,

SCMD

(THERE

(£9:46

THEY ARE BROKEN DOWN TO THEIR POSSIBLE CONTENTS

2) HOW THEY ARE USED BY_THE PERTINENT ROUTINE
3)

OIl-FEB-78

PROGRAM DESCRIPTION

DESCRIPTION OF THE DEVICE STATUS TRBLE FLARGS.
ONE FULL SET PER SPECIFIED DEVICE).
1)

FO3

WERE AS A RESULT

HOW USED

PESEND: USED TO QUEUE
LRTER PROCESSING

MEX:

8 SEX:

MWRITE:
MSRMI:

SET UP

INFORMATION

USED TO PERFORM THE 360 CMD - SET UP DX AND DO

& SggéT%: USED TO SAVE LAST COMMAND IN SLCMD FOR LRTER
PROCESSING
8 SSRMI: USED TO SAVE LAST COMMAND IN SLCMD FOR LATER
PROCESSING.

USED

CLERRED

TISSRJ:
PI@CSC:

PESEND:
SEX: & MEX:

PLHENC:

SSRMI:

PVISS:

IN SRDRG & SLZ”MD FOR

SWRITE:

& MWRITE:
MSRMI:

1IN

CDEVST: (RUN:,ENRBLE:,
KILL:,PSYSRT: PINDSC:,

PESEND:)

PAGE 30

GO3

NEW Dxil1-B RESPONDER
MACYll
30A(10S2)
PROGRAM osscé{PTION
14:26
30-Jan-78

MAINDEC-11-DZDXI-B

::éx?gfscc

O0L1-FEB-78

ERRSCM

SSENSE

=JW

< ====

(2’

INTREQ

=100

----- BUSOUT
----- SCMDRJ
(===- EGPCHK

=40
=200
=20

USED

USED BY

SET UF

360 WHEN REQUESTING A SENSE

IE.

SENSCM:

USED

FRIS:

CLEARED

SENSCM:

PIHEND

CMD

MOV ®SSENSE,J0xBA

RUN:

ENABLE

PSYSRT
PSELRT

SWRITE
SRERD
ERASCM

MWRITE
MREAD
:

SSTAT
SETAT

HOW

mm-‘-==-=
-===
(====

UCHK
CE'DE
ATTN
CUE

=2
= 14
= 200
=40

USED

USED BY 360 WHEN REQUESTING STATUS

:WITH EXECEPTION

Qisvggoasvncaonous PRESENTING OF STATUS (ATTN) TO

"IE. STOUT: MOV
SET

USED

SSTAT,aDx0S
CLERRED

09:4&

PAGE 3!

EC~

MRINDEC
conl B.D

MACY1]l 30A(1052)
NEW Dx11-B RESPONDER
-DZDOX1- B
PROGRAM DESCRIPTION
30-JAN-T8 [4:26

HO3

OI1-FEB-78

09:4&

PSYSRT:
CDEVST:
(RUN: ,ENRBLE: ,

STOUT:

KELE:

PSYSRT: ,PINDSC:,

PESEND:
)

SCURS

« -==-

ANY

® FROM O TO 479.

(CURSOR POSITION)

HOW USED

NPUT:

USED TO CALCULARTE CURSOR POSITION TO CREATE OUTPUT

SRMI:

& SSRMI:

(FOR

IBM

RERD)

USED TO CALCULATE BYTE COUNT FOR USE aDXBC

USED IN

CLERRED IN

INPUT:

PSYSRT:

SSRMI:

SINBF

OUMF:
-

TRBLE

DISCTL:

ERRSCM:

(&)

USED
?:EP?335¢HBBUHE COMMAND TO RSCERTAIN BOUNDARRIES

UISCTL:

H NRIYE:

USED BY PROGRAM TO CALCULATE BOUNDARIES FOR
3

SWRITE:

USED BY PROGRAM ©OR

USED

SCTL:

MWRITE:

SWRITE:

CALCULATION

INPUT BUFFER

PAGE

SOUTB

EOLTE

HOW

(===-

103

O01-FEB-78

09:46

(10

ADDRESS OF DEVICE OUTPUT/DISPLAY BUFFER

USED

DUMP:

USED BY PROGRAM DUMP COMMAND TO RSCERTAIN
BOUNDRRIES OF THE OUTPUT BUFFER
INPUT: USED TO CALCULRTE START OF DRTA LOCRTION FOR

A SUBSEQUENT
gDéggOOF THE OUTPUT BUFFER FOR

DISCTL:
MRERD:

PSYSRT:
ERASCM:

SET

INIT:

USED BY PROGRAM TO CALCULATE BOUNDARIES FOR OUTPUT BUFFER

&DEEEH%IB: HERSI

USED TO CALCULRTE BYTE COUNT FOR

USED TO CLEAR OUT OUTPUT BUFFER RRER (WITH FILLCH)
USED TO CLERR OUT BUFFER RREAR (WITH EBCDIC SPARCE =

USED

(INTI1SO

DUMP:
INPUT
DISCTL:
SSRMI:
8 MSRMI
SYSRT:
ERASCM
MRERD

SBUFA

SEFA

HOW

(m---

12)

CURRENT BUFFER ADDRESS

(FOR MUX CHANNEL

ONLY)

USED

MSRMI:

8 MWRITE:

MREAD:

USED

TO KEEP

TRACK

CURRENT

BUFFER ADDRESS , INCLUDING MEMORY MANAGEMENT-LORADED IN DXBR
ALSO USED TO CALCULATE BYTE COUNT (SRBYTC)-LORCED IN DxBC

100)

PRARGE 33

A
mm
e

MACY1l 30R(10S2)
MRINDEC-11-DIDXI-B NEW Dxil-B RESPONDER
PROGRAM DESCRIPTION
30-JAN-T8 14:26
CZDXIB.DOC

co34
OC34

NEW Dxi1-B RESPONDER

MRINDEC-11-DZDXI-B_

30-JAN-T8

C20x1B.00OC

14:26

(10€2)
MACY1l %?
PROGRAM DES
CRIP

JO3

O1-FEB-78

SET UP IN

USED IN

CLERRED

PCUEND:
MWRITE:
MRERD:

MWRITE:
MRERD:
MSRMI:

CDEVST: (RUN:
ENRBLE: JKILL:

MSRMI:

SONLF

HOW

(18)

¢==== ONLINE
(==== OFFLINE

=
s

0
]

USED

PHIS:

IF DEVICE IS OFFLINE-QUEUE AN INTERVENT iON REGUEST
TO IBM CHANNEL (SSENSE)
= _WHEN CHANNEL TIMES OUT WHEN DX DIDN'T RESPOND -

IT WILL PROBABLY SEND
A SENSE CMD

READING THE SSENSE

ENRBLE:
ll:

IN
=

=
}

USED
O

PCHIS

SRDRQ

SRORG

(1?7)

¢=---- RERAD REQUEST
(LERRED
{ e

REfiD

REQUEST

ACCEPTED(380)

no»--

SET

PSYSRT:

PINLSC: TPESEND:

THEREBY
8

09:46

PAGE 34

11-DZDXI-B

\18.00C

NEW DXAI-B RESPONDER

30-JAN-78 14:26
MEX: 8 SEX
MSRMI :

MACY1l

PROGRAM DESCRIP

??8&1052)

KO3

01-FEB-78

03:46

USED TO FORCE AN ATTENTION (11) RESFONSE

I BM CHANNEL

&SSRMI USED TO DETERMINE IF AN UNSQOLICITATED
IBM READ HAD TRANSPIRED-- IF YES, QUEUE AN
ENDING SEQUENCE

SET UP IN

USED IN

CLERRED IN

INPUT: = 1
PESEND: = |

SEX: & MEX:
SSRMI:

RUN:
PSYSRT:

SMINS

SSRMI:

(20)

¢(=-=--- ADDRESS OF THE DATA POINTER

(MANUAL

INPUT RERD)

HOW USED

DISCTL:
MSRMI:

SET UFP
INPUT:

USED TO CALCULATE
SSRMI:

USED FOR

USED

THE RELATIVE CURSOR POSITION

STRARTING DARTR ADDRESS FOR DXBR

DISCT L:
SSRMI: 3

CLEARRED
MSRMI:

RUN:
PSYSRT:

(SCURS)

PAGE 35

-yorm

.C L £

DO
D

rlD
OH
bab ot

NEW DXi1-B RESPONDER

A* ??9(1053)

PROGRAM DESC

.TITLE

.ENRBL
.ENRBL

LO3

01-FEB-78

MAINDEC-11-DZDxI-B
RBS
AMA

09:4%

PAGE 37

NEW DOx11-B RESPONDER

MAINDEC-11-DZDXI-B

CZDX1B.P11

NEW DXi1-B RESPONDER

30-JAN-78 14:19

1348
194

1954

1958

0007
17227
17234

p
=
=

1963
1964
1965

172356
172300
177672

1966
1967
1 962
iggo

i"?g
137

kISARD

%@
%6

%7
f7777
7234
172356

:
:

TELETYPE CHARACTER EQUATES

§°8°i5
80845

&
§Pacs

-hBBS?

E*t Q

1977
1978
1973

000023
000025
000177

crL.g

CTL.S
CTL.U
RUBOUT

=
=
=

PAGE 38

%0
%1

=
=

000003

i37

KISAR?
KISDRO
MMSRO

1974
‘

SYSTEM EQUATES

000006

09:46

PROGRAM EQUATES AND DEVICE ASSIGNMENTS

Ao
R1

1959

1960
1325

.SBTTL

88888?
000002

O1-FEB-78

PROGRAM EQUATES AND DEVICE ASSIGNMENTS
:

1950

1384
19?5

MACY1l 30A(1052)

MO3

172300
177572

23
25
177

tCONE FEED - RN

:SPACE CHARACTER
: CONTROL S

558“¥§8t Q
:

:CONTROL S
: CONTROL U
:RUBOUT

SEG 0039
SEG 0039

PAGE 39

IEEEERREREREREERRRERRRRERRRRRRRRERRERRSERRRRRRRRRRRRSFRRRRRRSSRRS
&
1

]

P ®

DEVICE BUFFER LRYOUT

(1 PER DEVICE)

1000 DDH®D

SRR RS
SRS RP RIS RIRRRES
TEEEEEERBERBEEERREERRRRRRERRERRRRRRRERRRBRRR
'l

0-61 = DEVICE STRTUS TRBLE

+
OUTPU /DESPLRY BUFFER
G
g
o SEC£
lllllill}l!llllll!lllIlll!lllllill&llillllll!l!!Iillll!llllbl!il
*

1993

000020

CURRENT DEVICE COMMAND
LAST COMMAND, IF WRITE

DEVICE

NSE' BYTE (NOTE -- MUST BE EVEN BYTE LOCATION)

LoR Poal
{2b%
DOSESS OF

INPUT BUFFER
OUTPUT BUFFER

ADD

iDEVICE ONLINE
R$
AD_MANUAL I NPUT

&5TM

M= be b b = N L WO
o\
Lo

LAYOUT OF DEVICE STATUS TRBLE

ICATOR O=ON-LINE 1=0FF-LINE

REQUEST -- IF NON-ZERO

ART OF MANUAL INPUT DATA

NZ=
Lot =Y
- OnOoO-0Oun
(=)
+ WO

ng;ansz

RO
R3
R4
RS

;
SP:
; START OF

DX EQURTES

mmm

m
P

LOCATIONS 22-77 ARE AVAILABLE FOR EXPANSION PURPOSES

INDICQTOR

NDICRTO
;END _OF EEEEGGE
HARACTERS PER LINE OF 226C DISPLAY
OF

PER 2260 DISP

360 COMMAND EQURTES

EMURT

000012

CMRMI
CMWTLA
CMREAD
CMSRMI

—o

;-..-

89:96
MACY11l
30A(10S2)
Oég FEB-78
-DZDXI-B
NE W DX l1-B RESPONDER
SIGNMENT
PROGRAM EQUATES AND DEVICE
30-JAN-7 8 14:19

e e e L
JDOODOIODOODOHDOLD
M@OMOMDMD
~DODNCNLWU-O

eI ]
X
~
©

NO3

;WRITE DATA (FROM 360 TO PDP-11)

{READ MANUAL INPUT (PDP-11 TO 360)
iWRITE _LINE RDDRESS (360 TQ PDP-11)
iREAD FU.L BUFFER (PDP-11 TO 360)

:SHORT READ MANUAL INPUT (PDP-11 TO 360)

DX REGISTER ASSIGNMENTS 3 LAYOUTS

DXDS OR TUMBLE TARBLE ENTRY 1

PRRITY ERROR DETECTED

100000

-4
m
o

%f‘

I
m

D
v

ond
Bem

N
m
b

'“§

—

L
L
LI
LI

MDREJ

00002
felulslsls}

“?4

DOOHDO00

£
o
(=]

040000

(TT1)

JECTED
COMMAND CHARING

RACCEPT LRST STATUS

S REJECTED

DXCA OR TUMBLE TABLE ENTRY 2 (TT2)
BITS 15 8 = COMMAND (IF ANY)
= "DEVICE ADDRESS
8IT1S 7-0

000100

;BUSY RENABLE - FOR SELECTOR CHANNELS

ON—LINE INDICATION
CONTROL UNIT BUSY
:DONE _FLAG

nuunn

DXCS CONTROL UNIT STATUS REGISTER

: INTERRUPT ENARBLE

nunmn

000001
000003
000C0S
000007

NG
e

3 ARE SET IF EXTENDED ADDRESS IS USED
O ARE THE FUNCTION TO BE PERFORMED
;DX RESET_COMMAND

‘WRITE DATA TO THE 360

{READ DATA FROM THE 360

iSEND STATUS TO THE 360

Dx0S OFFSET AND STATUS REGISTER
BITS 15-10 OFFSET OF SPW TRBLE
STATUS REGISTER DEF (SSTAT) - STATUS BYTE
00C200
000100

ATTH

STAMCD

200
100

;RTTENTION

iSTATUS MODIF IER

32«

PAGE 40

unn
mm
Vo

BO4

MACY1l 30R(10S2)
O0I1-FEB-78
09:46
EQUARTES AND DEVICE RSSIGNMEINTS

HQINDEC 11-DZDXI-B

CZOXIB. Fil
2092
2093
DR
= - |000
0O00000w DO
N LWhs-0OWw -~

582
frorumrorn nrn

2098

NEW DXil-B RESPONDER

30-JAN-TB 14:19
000040
ooooag

PROGRRM

;CONTROL UNIT END

UCHK

UNIT EXCEPTION

000001

UEXP

8
1

2848 SENSE BYTE
000100
000040
200023

000200

CUE
BSY

88884S
000002

co4

PACY{) 3ACI0E2) CI-FER-7p g:46 PAGE Ml
2

F’

&CMDRJ

INTREQ
BUSOUT
EQPCHK

=
=
=

200

100
40
={s]

§“3""Epo
CHECK

(SSENSE) DEFINITION

;COMMAND REJECT

iDEVICE OFF-LINE - INTERVENTION REG
:BUS OUT -- PARITY ERROR DURING CHIS
:EQUIPMENT CHECK - PARITY ERROR DUR DARTA TRANS

22 88t

Poe BaPa

s Pt Pt Pt Pt Pt Pt Pt Pt P

Pt Bt P

fuufurunu
VD VVONNVIL

O
~ Z

DEC-11-DZDXI-B NEW DXi1-B RESPONDER
MACY1l 30A(1052)
1B.P1
30-JAN-78 14:19
TRAP CATCHER

_SBTTL

8§
gg

i3
'
17
18

000000
000002

000000

.=0

176

_REPT

178

LWORD
HALT
.EN g

.42

ég $00220 888199 001000

09:46

PAGE 42

THE TRAP CATCHEF IS LORDED INTO LOW CORE
HALT

O1-FEB-78

TRAP CATCHER

000000

gggogo

DO4

Hatr

3fi§

STARY

.FOR MEMORY MANRGEMENT
. TRAP CATCHER

{ESTABLISH LOC 200 STARTING ADDRESS

SEG 0042
SEL 00wz

NNNNNNNNOO
T OO TNV
L L S L S LS S S L WWWWWwWwWwWww
W
mnmn .-32
NONLWN-O0OoONOCNLWNN-O0ONOCNLEWN=-ODONTCONLSWN-OWOm-ICN
LW OVO-~ I LW mg

.SBTTL

00100

005037

NORMAL SYSTEM START LOCATION

;
:
;

012700

012720
612720
012720
012710

012636

RESET

010744
000340
011232
000340

:RESET FIRST TIME FLAG TO FORCE PRSAMETER REENTEY

STACK POINTER

TRAP/VECTOR AREA
SYSTEM GENERATED TRAPS
TELETYPE (CONSOLE) VECTORS + STATUS REGISTERS
CLEAR ALL LIVE SYSTEM VARIABLES

SET UP TELETYPE INPUT ~ OUTPUT BUFFERS

&YSINT: MOV

000060

:NORMAL START UP

FTIMFL

SET-UP

:
;

00000S

#SSTACK, SP

SET UP CONSOLE VECTORS

MOV

--1000

SYSTEM GENERALIZED INITIALIZATION PROCEDURE

0i2706

PAGE 43

RESTART ADDRESS -- REENTER ALL PARAMETERS -- 1002

ASTART: CLR

013132

09:46

PROGRAM START-UP SEQUENCES

.
.=1000
SYSINT
BR
START:

000403

M D D

DR Ao

DRV RURVND NN

et Bt Pt Bt Bt B Bt Bt Bt Bt Bt Bt B B Bt Bt et ot Bt Bt Bt s Pt Pt Pt Pt
Ba

B 5t e B Bt et B

et Bt Bt Bt )t Bt et Bt et Bt Bt Bt et Bt Bt Bt Bt Bt Pt Bt Bt B

UMY NN MMM N NN NN NN UMY MDD UM ML RU o RL U R UL R U D fu ML

EO4

MACY1l 30R(1052) O1-FEB-78
-B NEW Dxi1-B RESPONDER
-JAN-T8 14:19
PROGRAM START-UP SEQUENCES

MOV
MOV
MOV
MOV

%60, R0

sTKIN (RO)+
8340, [RO)+
sPISR, (RO)+
8340, (RO)

:SET UP THE STACK POINTER
:RESET ALL DEVICES

:START OF CONSOLE VECTORS

:BEG OF TELE INPUT ISR
‘NEW PROC STATUS
‘BEG OF TELE PRINT ISR
:NEW PROC STATUS

SET UP MISC TRAPS

012737

011672

000004

MOV

#MTO, 4

:MEMORY TIME OUT TRAP

012737
012737

011700
000340

000250
0002¢%2

MOV
MOV

sMMERR , 250
8340, 252

;MEMORY MANRGEMENT ERROR

012737

012700
012701
105020

000340

000006

012636
000272

MOV

CLEAR ALL VARIRBLES

;

MOV
MOV
CLRB

10%:

005301

0012375

0i2737
012727

DEC

BNE
:

012737

012640

012744
012744

8340’6

012742

MOV
MOV

108

: DONE
?

INO, CONTINUE CLERRING

SET UP TELE BUFFER POINTERS
MOV

013046
013050

SVSTRT,RO
:START OF VARAIBLES
SVEND-VSTRT+2,R1’
;8 OF VARAIBLES TO CLEAR
(RO)+
:CLERR A BYTE

ENRBLE

#TBUF, TPTR

sPBFS . PFPTR
#PBFS . PPPTR
TTY

:TELE INPUT POINTER

:TELE OUT FETCH PTR
‘TELE OUT PUT PTR

SEG 00432
SEG 0043

'0 |

mm
(o]

LWh-0OWwom

MOOMOM-3-)

Ose
P

o
Pababapabapapa

FO4

11-DZDXI-B NEW Dxil1-B RESPONDER
MACYll 30R(10S2) Ol1-FEB-78
PROGRAM START-UP SEQUENCES
30-JAN-78 14:18
11

001130

0S2777

000100

001iSe

000137

0CeCed

0Ci1136
001144
201180
001154

0S2777
005037
005737
001402

000100
177776
013132

OQl1316

Q11314

BIS

8I%5
CLR
131
BEG
JMP

8100, 3TKS

#100,dTFS
PSW
FTIMFL
GETPRM
INI

09:46

PAGE 44

;ENABLE TELETYPE INPUT

SEG
0044
SE% CCY4

{ENRBLE TTY QUTPUT INTERRUPTS
iCLEAR THE PROCESSOR STATUS WORC
:FIRST TIME THROUGH? (MUST PARAMETERS BE REENTEREL”
{YES, FORCE USER TG ENTER ALL PARAMETERS
{NG, 'RESTART TEST USING SAME PARAMETERS

::
004737

001172

013134

001166

004137

011330

.WORD

:
;
:

001206

004137

001214

001260

001212

08}3‘3

013175

xaoggz

- WORD

gnpa

30155« 8%6327 176200
001230 888355
002764 177000
1535
00{233 032703 000037
e

881
46 8?§;§; 001174 000004
001254 ..0337 012516
0C1260

00S077

011232

5%:

001300
001304

004137
013232

ooasa

001310
001314

120427

001363

00001S

001322
001324
001330
001332

002760
020327
003355
032703

000770

001306

001344

00004 0S$:
B79R9g
‘o8

R1, INoCt
QSCR

-unsTEEE
uxn M
" ITED PROPERLY”

uuh

SNEWPRM, 4

: ADDRESS or DEFRULT ROUT INE

v xo unxaus ngonfgg Esruesu 176200 AND 177000
BUiG“I"REE*
T 177000”
&
nan ugOCTAL uono BOUNDRY

gt# L
: ?SE ou§ T0 VALIDATE ADDRESS

:SAVE uuxags RESS
'VALIDATE THE uuxaus RDDRESS

:TRAP WILL OCCUR IF INVALID UNIBUS ARODRESS

D VECTOR RD "832 g

oe QULT VECTOR

MOV
MoV
JSR

SUNTRP,4
200 e drap
R1, INOCT

.WORD

208

BNE

R3, #300

BNE
MOV

012520

:PRINT START-UP MESG

GET THE oxxx INTERRUPT VECTOR RDDRESS (OCTQL ADDRESS INPUT!

BLT
CHP
BGT
BIT

0013S2
010337

:RESTORE THE CARRIAGE

;RESET FIRST TIME PARAMETERS (FORCE ALL PARMS T2 3£ ENTE
E? UP osrnuar ADDRESS
rer UNIBUS ADDRESS

CLR

CMP

TIMF
-175200
UNRDDR

R3, UNRDDR
JUNARDDR

MOV
MOV

CMPB

001336
001340

0000C!

STHSG

"S
0175200
77000
Nghfl
§25¢§3

. WORD

001316 020327 000300

R1 1ESG

C:S
ah;
gcr
Sfié

1264
012737
801852
Bis737
BhsZdE

PC,CRLF

ALID NIBUS ADDRESSESS (176200- 177000
DEFRUL UNIBUS RDDRESS 176200

. WORD

000015

TOTAL SYSTEM RESTART (REQUEST NEW RUN TIME PARAMETERS

GET DX11 uuxauss ADDRESS (OCTAL ADDRESS INPUT)

NEWPRM: CLR
MOV
JSR

ooasaa

PAGE 4S

§nx~r ?Tgfl?-up HERSLD nesgncgn

JSR

01174
5037 013132
801500
8?2737
Lsaoo 012516

09:4

HERE WE START GETHERING THE TEST INFORMATION

LeETPRM: JSR

011472

O01-FEB-78

TOTAL SYSTEM RESTART (REQUEST NEW RUN TIME PARAMETERS
_SBTTL

001162

GO4

0O
0o
£L
unn

30-JAN-78 14:19

MACY1l 30A(1052)

mm
(ST

P11

NEW Dxii1-B RESPONDER

stoivit Bty datrieta vttt 82

4
<
el

Y Y Y e e e e e e o e e e el
OO
00w

C-11-DZDXI-B

vsbrns

(ggo -

MEMORY TIME-QUT TRAP
sE? TORE
OBEEERORY
TeH§oR{AooRESS
:GET VECTOR ADDRESS

;ADDRESS OF THE DEFAULT ENTRY

RY, #CR

uns LINE
DELIMITED PROPERLY’

108
R3, #770
108
81 ,R3
10
R3, VECTAD

TOO LOW GIVE AN ERROR AND REENTER
(LT 7707
1YES, REENTER
: WORD ADDRESS?

REENTER

cutcx VECTOR ADDRESS BETWEEN 300 AND 770

*NO REENTER
‘savE IT

GET STQRTING AND ENDING DEVICE CHANNEL RDDRESSES
D DEVICE CHANNEL RDDRESSES (00 - FF
DEFRULT DEVICE CHANNEL ARCDRESS
10,10

(HEX

INPUT)

MRINDEC-11-DIDXI-B

:zoxxafszx

NEW Dxii-B RESPONDER

30-JAN-"8 14:19

Sgué

MACY1l 30R(10S2)

O1-FEB-78

09:46

PARGE 46

TOTAL SYSTEM RESTART (REQUEST NEW RUN TIME PARAMETERS)

2l
224

;
:

ag*&
5 48
5233
agsx

HO4

"
:f:
§g§§§s? goooe gigsez eos: :
002624
001
§633§§
%?i"“
--137
63
pi12s22
01374
4
s4 SRl
Bl
ol
001402
1007

NOTE :

xrnsnsows onEruo noo?gs?gsuggg gg §SE”§$AEQxN;FQdSL' ONE

BRETRESod 1" RODAEES

MOV

w
mov
420.3QEV
RI ggusx
anR
\%
.
.58R REupx
:ov
sa,gggv
v
,EDEV
i
BMI
20%

:DEFAULT TO HEX ADDRESS 10

::GET DEVICE RDDRESSES IN HE~
:ADDRESS OF THE DEFAULT ROUTINE
‘SAVE START DEV ADDR
56 suRe posITIVE

ggss

ggizga

gggggg

000377

ggg

583'377

?EEEESE Ezenrsn THAN 377 -- HEX FF

2257

001412

120427

000054

CMPB

RY. 8",

‘MORE THAN ONE DEV? (COMMA, PRRAMETER CELIMETER)

ge3r3?

oxasea

gggv.sosv

$§Ssran1LT END?

ggss
604
2260 °°§3‘°
Ii;»SS 00‘9‘?
10337 8 é
UL

gggé

381:32

2263 001440 163703 012522

012524

308:

2268
2269
2270
2271
2272

;
:
:
:

DO14Se

001332

gg;g

2275

001460

105037

2278
2279

001472
001474

001470

0133494

228C
2281
2282
2283
sggg

(012%2&

001464 oouxa* 002632
001500
001502
001506
001510
001514

001510
120427

001414
120427
001364
105237
000406

SDEV,R3

CMPB

GET

0l12%2e

508 :
.
:

229.
2292

D001Sle
001820

022626
00037

2294

001830

Cl1%ide

001524

004137

17777
011472

¢cs.

ET ENDING
AVE
EN& DEVICE
DORESS

ORE $HRN 8 DEVICES”

Sq #CR

BNE

WA 'ovacs ADDRESSES DELIMITEC PROPERLY®

208

:NO, REENTER

TYPE or 360370 CHANNEL
= MULTIPLEXER CHANNEL
s SELECTOR CHQNNEL

DEFAULT

CLRB

'S’,

R1, INOCT

;0 =

.WORD
cMPB

SOS
RY, 8'M

DEFQULT

BEQ
CMPB
BNE
INCB
BR

CHTYPE

SELECTCR CHANNEL

JSR

.WORD

000123

gggg

229%

NEWP10:

09011%

2286
2287
2cee

2293

SuB

2276

2277

30‘CH79
R3 EDEV

gg§

2266 001452 120427 0000iS
2267

?2%
MOV

CH}YMS

sot

TO SELECTOR CHANNEL
ULIPLEXER CHANNEL --

YES HULTIPLEXER CHANNEL
.s
SELECTOR CHANNEL -‘NOT S OR M -- ERROR
'SELECTOR CHANNEL
:GET MEMORY MANAGEMENT FACILITIES

#'S
NEHPIO
CHTYPE
60%

MEMORY MANAGEMENT

:GET channsL TYPE

TIME-OUT

TRAP HANDLER

USED ONLY FOR PARAMETER ENTRY PROCESS

CMP
CLR

JSR

.WORD

(SP)+, (SP)+
PSW
R1,MESG

PNOMM

:DUMP PC AND PSW SAVED BY INTERRUFT
: TURN DOWN PROCESSOR STATUS
'PRINT “NO MEM MANAGEMENT AVAILTM
:ASK

TO HAVE QUESTION REENTERED

SEG 2046

SEG OCue

104

SEG

MACY1
09:46 PRGE 47
O 1-FEB-78
3 OR(10S2)
(1
NEW Dxi11-B RESPONDER
-DZDXI-B
ART (REQUEST NEW RUN TIME PARAMETERS)
TOTAL SYSTEM RE S TR
33-JAN-T8 i9:19

DETERHINE IF MEMORY MANAGEMENT

SES

IS TQ BE USED

YES, MEMORY MANAGEMENT TO BE us:o
= NO,
DO NOT USE MEMORY MANAGEMENT

UD'—-O"SHDO
O—-00NONO» 80

S
——
[

s panseann
LU‘NS-‘NU‘IN#&:

883RRRRERSS

Qleser
00ek32

£0s:

0001ie

MMRE SP

:DEFAULT TO NO nenonv MANARGEMENT

RH #'N

DEFRULT ROUTINE ADDRESS
NOT USE MEMORY nnnncenanr
--D0

Sfifié"°°7

:GET MEM MANARGEMENT

708
RY, 8'Y
60%
nnnssp

000131
gl1ese?
001516
177572

CLR

xr EQ NO MEMORY MANAGEMENT
--MEMORY MANARGEMENT TO BE USED
s RO
:MEMORY MANAGEMENT SPEC

'SET UP TRAP TO TEST MEMC.(Y MANAGEMENT

#55% 4

:CHECK FOR MEMORY MANAGEMENT

MMSRO

GET BUFFER RELOCATION IN OCTAL

,000'S

ALID RELOCQTéON ADDRESSES (20 - 700)
(20000

THROUGH 734000)

R1,INOCT

00ee3e

aooonnne
s
U‘U"V‘U"G‘U‘U‘U‘U‘G‘G‘U‘g;ghhp
4 X
cCcLroL£noO
LNFERNE
N ToR 28

Bn B

et Bt Bt Bt Bt

s et Bt B

s ot Bt Bt Bt B

88888888888888888883

DEFAULT RELOCATION ADDRESS

R
un
WWwwwwwuwwwwww
LV Y el e e e e o ey el
= OO
N L W0

DEFQUL? IS 'N', DO NOT USE MEMORY MANAGEMENT

BFREMS

NEWP20

000001

RY, #CR
708
'ésR3

000020

R3,

0oo01s

003407
004137

820

708

000734

R3, #734

01ese”

MMRESP

000&eC0
ooo1cH4

R3,RY
8600, RY
RY, si5y
NEWP20

011472

:GET BUFFER RELOC.

IN ,000'S

:ADDRESS OF DEFAULT ROUTINE

‘WAS LINE DELIMITED PROPERLY?
:NO, REENTER
:MUST BE A MULTIPLE OF 2000
: ILLG BUFFER consr -- LT 20000
xs NUMBER NEGATIVE”
ES

REEN
sn ADDRESS

Aogg:

708

vss

718

:NO

:WAS ME

0 LARGE?

NETER aooness

MANAGEMENT spscxr:zov

cuscx ron 28K

;Pu? VALUE IN WORK REG
: IGNORE ADDRESS EXTENSION BITS
:1S IT 100 CLOSE TO 200000 BOUNDARY?
:BRANCH IF
PRINT ERROR CANNOT SET BUFFER SO
R1,MESG
TO
R 200000’ BOUNDARY THAT'A CARRY WOULD BE NEEDED TO CHANGE

;:CLLOSE
: THE EXT%ggED ADDRESS BITS.

: BOUNDAR

017051
000741

0i0337

708
R3

20 ---(20000)

T00C

000134

71%:

gHP

012530

NEWP20:

MOV

GET TYPE

THE DX CANNOT WORK RCROSS 200000

:ADDRESS OF TOO CLOSE MESSAGE

708

:ASK FOR INPUT AGAIN

R3, #134

:NO,

70
R3, BUFREL

IT TOO CLOSE TO

1/0 PAGE?

:YES, REENTER THE RDDRESS
:SAVE REL CONST

OF TEST TO BE RUN

INDEC-11-DZDXI-B

DXIB.Fl1

2359
2360
2361
2362
2363
2364

2365
2366
2367
2368
2369
2370
e37
2372
€373

30-JAN-78 14:19

09:46
PAGE 48
MACY1l 30A(10S2)
O0Ol1-FEB -78
TOTAL SYSTEM RESTART (REQUEST NEW RUN TIME PARAMETERS)

2848 RESPONDER DIAGNOSTIC

FRIEND

DEFAULT =
001710
001714
001720
001722
001724
001732
001736
001740
001744
00174
001752

10S037
004137
013534
001752
112737
120427
001433
120427
001361
105037
105237

80s3:

012532
00ee3e

000100
000104

012534

012532

e374
e37S
2376
€377
2378
€379
2380
€381

001756
00i7e62
001766
001770
001772

105037
004137
013574
002026
120427

012533
00263c

2383

OOSOOU

120427

000131

238S

002006

105237

012533

000116

TSTTYP
R1, iNOCT

.WORD
MOVB

100%
oEBCDSP FILLCH

TESTMS

RY,8'D
xNiT
RY,8'F

CMPB
BEQ
CMPB

000106

1008%:

'F',

CLRB
JSR

.WORD

Pens @s @s @s 4 @s w0

2353
23S
23ss
2356
e357
2358

NEW Dxil1-B RESPONDER

JO4

BNE
CLRB
INCB

FRIEND
;RESET_TEST

TYPE

{GET TEST TYPE

;DEFAULT TO FRIEND

:FOR 2848 SET FILL CHAR TO EBCDIC SPACE
D --29 8 EgPONDER DIAGNOSTIC -IEND TEST --

ILLEGQL ENTRY

30
FILLCH
TSTTYP

ND _MODE -- DEFAULT FILL CHAR TO NULL

SET TEST T0O FRIEND

FRIEND TEST ONLY

TERMINE

PRRQTE INPUT / OUTPUT BUFFERS ARE TO BE USED

S po E I Ygg MAINTAIN SEPARATE
INPUT / OUTPUT BUFFERS
USE SAME BUFFER FOR_INPUT ANC OUTPUT
= NO,
osrnUL? 1S 'N’, 0, USE SAME BUFFER FOR INPUT ~ OQUTPUT
10%:

CLRB
SR

WORD

R1,

UF
INOCT

FIbMS
INIT

CMPB

R4, 8'N

CMPB

RY,

BEQ
NE

INtT

#'Y

1108

= YES

;0 = NO

-sspnaa?s 10 BUFFERS?

DEFRULT TO NO
NO,
SAME

xr EQ.

1,0 BUFFER

USE SAME 1,0 BUFFER FOR INPUT AND OUTPUT

--YES.

SEPARATE 1/0 BUFFERS--

AGAIN
REOUEST1,0INPUT
ERRORSEPARATE
BUFFER INDICATOR

:SET

FRIEND TEST MODE ONL

GET BUFFER FILL CHQRQCTER (HEX INPUT REQUIRED:
ANY VALUE WILL BE RCCEPTED

92
33
94
9€

002012
002016
002020
002022

004137
013636
00202k
110337

002ee24

JSR

R1,

012534

_WORD
MOVB

INIT
R3,FILLCH

. WORD

INHEX

rxLLns

;FILL CHARRACTER

D. 1-B RESPONDER

HRINDEC II-DZDXI
.
30-

14:19

PROGRAM

KO4

MACY1l 30A(10S2)

OI1-FEB-78

INITIALIZATION

.SBTTL

09:46

PAGE 43

PROGRAM INITIALIZATION

INITIALIZATION

MEMORY MANAGEMENT REGISTERS

SET UP ALL DX BUFFERS,

\Jommogou
LWr—NWh-—-N

o nnwn
W= YNINN

002026
002034
002040
002044
0020S0
002052
002054
0020S6e

08800000
(@]
B s e e s

AND DX REGISTERS

€

MOV

000004

MOV
MOV
MOV

MOV
TST
DEC
BNE

#MTO, 4

:SET UP MEMORY TIME OUT TRAP

UNRDDOR, R1
sDXDS, R2
#13. .R3

;13 ADDRESSES (REGISTERS)

(Rl)+
R3
108

:INCR TO NEXT DX REGISTER
: DONE?
INO, SET UP NEXT REGISTEF

R1 (ka +

:SET UP DX UNIBUS ADDRESSES

:SET UP UNIBUS RDODRE

SET UP DX VECTOR ADDRESS
MOV

0i2se0
005334
000340

MOV
MOV

VECTAD,R1

#DXISR. (R1)+
8340, (R1)

; TRAP TO DX ISR
iSET UP PROC STATUS AT INTER.

COMPUTE ADDRESSES OF DX BUFFERS

CURRENTLY THIS INCLUDES DATR ARER,

012530

gg;nsL

ugs BUFFER RELOC SPECIFIED”

MOV

BUFREL, PBUFA

820, BUFREL

SAOE PHYSICAL RDDRESS

MOV

TSTB
BEQ

077406
013100

077406
000200
172356
007600
077406

BUFREL. VBUFA

MMRESP
408

MAKE BUFFERS START AT 20000

vxnruaL RDDRESS

WAS MEMOR
NAGEMENT SPECIFIED”?
;NO. SET UP aurrsns

MEMORY HQNRGEHENY WAS SPECIFIED
SET UP KERNEL REGISTERS

= PROGRAM
0-17777
20000-5777? = BUFFERS (VIRTUAL RDDRESSES)
= UNIBUS ADDRESSES
-177777
160000~
ONLY I SPACE REGISTERS WILL BE USED

Ssmsws

MOV

172340
172300

TUMBLE TARBLE. AND SPW TRBLE

gag

“s

002Ce0
00Z06Y4
002070

MOV

CLR
MOV

MOV

#KISARD, R4

; I-SPACE PAR

(R4)+

= PA 0-17777
IVR 0-17777

#K ISDRO. RS
877406,

(RS)+

: 1-SPACE PDR
'64 BLOCKS,

UNLIMITED ACCESS

PBUFR, R3

:PHYSICAL ADDR* 2-6

MOV

R3,

(RY4)+

:SET UP PR FOR VA 20000-157777

CMP

RY okxsnnr

:ALL BUFFER RADDRESSES SET UP?

MOV
MOV

#7600, (RY)
277408, (RS)

ASL
ASL
RSL

MOV
ACD

BNE

R3
R3
R3

.7#405 (RS)+
8200, R3

3od

164 BLOCKS, UNLIMITED ACCESS
: INCREMENT TO NEXT 4K BA

INO,

SET UP NEXT REGISTER

:SEY UP UNIBUS ADDRESS REGISTER
164 BLOCKS, UNLIMITED ARCCESS

LO4Y

0Ce2le

MOV

012737

002220 012737 000020 813108

MOV

09:4%

01-FEB-78

Yil30R(1052)
NEW DXil-B RESPONDER
-11-DZDXI-B
HRINDEC
PROGRAM INI IALIZATION
30-JAN-78 14:19
1B.P11

PAGE SO

;ENABLE MEMORY MANAGEMENT

#1, MMSRO

:T0O 8K BANK OR 20000 AND UP

w20, VBUFA

START SETTING UP SPW TRBLE

1 ENTRY _PER DEVICE (256 DEVICES)

ENTRY OE CRI
I?

D DEVICE NUMBERS
= OFFSET TO DST TABLE (PHYSICAL RDCR)
BITS 15-8

----FOR xnvSonDEVICE NUMBERS
BITS 15-8

UNIT

CHECK

THIS TQB&E 6EV?EFERENCEE ?g EQE?D?SQHRCTION TO_DETERMINE

E NUMB

BY THE DX CONTROL UNIT

MOV
SWAB
CLRB

FBUFA, RS
RS
ng

;COMPUTE OFFSET PHYSICALLY
: #1000

MOV

RS, 90X0S

:OFFSET TO SPW TABLE

ASL

MOV
SWAB

N
Q0
21

vBUFA, R1
R1

:COMPUTE VIRT ADDR OF SPW TRBLE
: #1000

R1,STSPW

s SAVE srnnr OF SPW TAB

CLRB
ASL

Rl
R1

MOV
SUB
ADD
MOV
CLR
CMPB

R1.PHYOFF
RS’ PHYOFF
#3000, RS
2 pstoFF
DEV
DEV, SDEV

23 u; rzsrrga
puvsxan nooa:ssss
MANAGEMENT
MEM
v RSES VIRTUAL
COMPUTE THE OFFSET TO THE osr TQBLE
snv OFFSET TO og TRBLE
:START AT
DEVICE
:1s DEVICE NUHBER VALID

BGT
SSV

608
;3 (R1)+

:NO
:VALID DEVICE DST OFFSET TO ENTRY

MOV
INC

SUCHK, (R1)+
DEV

xnanxo DEV 8 UNIT CHECK TO ENTRY
T0 NEXT DEVICE

BNE

s0$

ING, SET UP SPW FOR NEXT DEVICE

MOV

50%:

1S AUTOMATICALLY DONE

BLT
CMPB

CMP

60%
DEV,EDEV

DEV, 8256 .

:NO

nLL DEVICES DONE?

NEXT SET UP TUMBLE TABLE AND DUPLICATE TUMBLE TRBLE
MOV

R1, Traoon

CLR
DEC
BNE

(R
a

MOV

80%:

MOV

orfsxzs Re

80%

SET UP DST

; TUMBLE TRBLE PDDRESS

: TUMBLE TRBLE FETCH POINTER
T/T+ DUPLICATE T-/T (WORD POINTER)
:CLEAR

:CLEAR NEXT WORD
: DONE
?
:NO, CLEAR NEXT WORD

TRBLE

THE DST TABLE IS USED _TO VERIFY COMMANDS FROM THE
360, THIS IS DONE BY THEHARDWARE
THE DST TRBLE

IS A BYTE TRBLE,

! BYTE PER POSSIBLE

MRINDEC-11-D2DXI-B

CZ0X1B.P11
2508

NEW DX11-B RESPONDER

30-JAN-78 14:19

537
£218
5 i&

MACY1l 30R(1052)

2515

:
::

SES%
Sé%a 002362 012702 000013
2525
gggg

2629
2630
2631
esag

ooaas!
37¢

015703
112321

005376
001376
002400 012702
002404
002410
12

112721
005302
001374

:
f

002610

000002

1008:

gggg

2539

2542

%:‘34
2545

:
002424

002426

110337

ggguas

363737

002444

012737

5337

013067

gxaseg

013110

000001

013076

01311

gg:g

09:46

PAGE 51

THE FOLLSE?;
Tgpgug E?gi ngsponté
F VALID COMMANDSBéscg?Prign
AND RESPONSESo
Sonn ND
gé
5Siésxlorr£n
:gp
nsflunL INPUT
3

CE'DE

3
“
12

-0

3§I§EFLQk£ 2822555
BRARE
" ¥hkmBRD
SHORT READ MANUAL INPUT
NSE

ALL OTHER COMMANDS ARE RESPONDED WITH UNIT CHECK
MOV
#13,R2
:NUMBER OF VALID 360 COMMANDS

MOV
INIT10: MOVB

000365

O1-FEB-78

PROGRAM INITIALIZATION
COMMAND 0-255. THE ENTRY IN THE DST TABLE IS
;

5 i?

5§i9
£218
2520

MO4

BNE
MOV

MOVB
EC

sVCHDTB,R3
(R3)+, (R1)+

fRiT10
#245. ,R2

SUCHK
. (R1)+
R2
100%

:VALID COMMAND TRBLE
170 DST TRBLE

i:MOVE
DONENOVE
IN NEXT RESPONSE
UNIT CHECK TO INVALID ENTRIES

COMPUTE MAX NUMBER OF DEVICES
INC

MOV

ggtv DEVCON

:SET UP DEVICE NUMBER -1

#1,SELDEV

; INIT DEVICE NUMBER FOR MUX AND SEL EXECUTORS

MOVB

DEZ

MOV

R3, MAXDEV

vCON

;START AT DEVICE NUMERO UNO

§;;:::3;;33333333;33H;HHHHH;HH;HHHH;::HH:H;:;:;:;;::;::::3;;.
:
NOTE -- THE DEVICE BUFFERS ARE USED BY THE SOFTWARE ONLY TO CONTAIN
:

PCINTERS AND INPUT AND OUTPUT DATA FOR ERCH DEVICE;

g:g

g;;;::::;;;::;';:::;::;:;;::;:;::;:;:;;;;:::;:::;:::::;::;::;;:::;:;-::-:--:

gggg

;

START SETTING UP DEVICE BUFFERS

MOV
CLR

R1,SDEVTB
DEV

:SAVE START OF DEVICE BUFFERS
:DEV 8 O

MOV

s272. ,R2

:CLEAR DEVICE STATUS TABLE + INPUT BUFFER

25
2553

002452
002456

010137
00S000

013064

002462

012702

000420

2564

002460

2556
2557

002466
002470
002472
002474
002500

2555
2559

010103

005021
005302
001375
010363
062763

000006

000076

1208:

1228:

000006

Sebs
8852?3 8&3323 88?858 000010
2563 002520 012702 000740

MOV

CLR
DEC

MOV

ADD

233
MOV

RI,DTRB

:SAVE ADDR OF DEVICE STATUS TABLE

(R1)+
R2
; DONE?
1228
:NO, CLERR NEXT WORD
DTAB, SINBF (DTAB)
#62. . SINBF (DTAB) ;COMPUTE ADDRESS OF INPUT BUFFER

9%&3-5885$é?6¢26)
COMPUTE ADDRESS OF OUTPUT BUFFER
#DISPSZ, R2
:

SEG 00S1

SEG 00S]

113721

013702

;FILL OUTPUT/DISPLAY BUFFER

; NO

013067

FILLCH, (R1)+
R
1258
DEV
gsv MAXDEV

013100

MOV

PBUF
A, RS

UP EXTENDED ADDRESS BITS
:SEY

ASR
ASR
ASR

RS
RS
RS

MOV
MOV

RS, XADDR
#1,FTIMFL

1258:

ASR

BIC

012737

013132
ws

SET UP NEXT DEVICE BUFFERS

:NO,

;SAVE ONLY H.0. 2 BITS

:SAVE EXTENDED ADDRESS BITS FOR DX CONTROL REG
iSET FIRST TIME THROUGH FLAG

TELL OPERATOR WE ARE ALREADY TO GO

NOTE:

AT THIS POINT THE DX HAS NOT BEEN STARTED
AND THE OPERATOR MUST TYPE R (RUN COMMAND)
TO THE SHOW UNDER WRY

JSR

_WORD

JIMP

002720

8177747, RS

;HAVE ALL DEVICE BUFFERS BEEN SET UP”

INITIRLIZQTION COMPLETE

W
e wr ws

011472

;DONE?

Rl nssc

; TELL OPERATOR WE ARE RERDY TO GO

sxsc

;GET THE SHOW ON THE ROARD

RNMES

O
O
O
CE'DE
O
O
O
O
UCHK
UCHK
O

n—-0

o
002624

BYTE
-BYTE
.BYTE
.BYTE
BYTE
BYTE
"BYTE
.BYTE
.BYTE
.BYTE
.BYTE

e b i O U £ WO

YcMpTB:

VALID COMMAND TARBLE
TEST 1/0
HRITE BUFFER

READ MANUARL INPUT

NOP

SENSE COMMAND
WRITE LINE RDDRESS

READ FULL BUFFER
ERASE COMMAND
= INVALID

= INVALID
= SHORT READ MANUARL INPUT

PAGE S2

(2l
n]

09:4%

01-FEB-78

NO4Y

MOVB
DEC
BNE
INC
CMPB

012534

006205
006205

gmmmammm

30A (1052)

PROGRAM INITIALIZATION

MACY
ix

ws@s

-78

005302
001374

AR RRRRRRAR
REOR-B3 PN cot ddnsd

NEW DXllgB RESPONDER

g)’.

? 58

AN-TB

i1-B RESPONDER

14:19

.SBTTL

PAGE ?3

O1-FEB-78_09:46

INITIALIZATION PARAMETER INPUT AND CONVERSION ROUTINES

INMEX -- PRINT MESSAGE, WAIT FOR INPUT, GET IT AND CONVERT THE HEX TC BINARY
SEOUENCE
ggLLING

. WORD
.

S
nobn
?fi£~§

T0 BE PRINTED
rnux.g ROUTINE

CHAR POINTER
- N?XT
Rg

FIRS NON-OCTAL CHARACTER
(BIT R;
RY == NUMBI
R OF CHARCTERS CONVERTED
RS

B s 66 B4 B4 B

BF Wt B0 S es

Pt P

28%

002640

INRS

:
[ SNy

[

;MOVE ADDRESS OF CONVERSION ROUTINE TO RS

INOCT -- PRINT MESSRGE, WAIT FOR INPUT, 4 GET IT AND CONVERT OCTALL TO BINARY
LING SEQUENC

uono ADDRESS OF MESSAGE TO BE PRINTED

WORD noonf.ss OF THE DEFAULT ROUTINE
R3 = BINARY RESULT

R4 = (BITS 0-7) FIRST NON-OCTAL CHARACTER
R OF CHARS CONVERTE
RS =

MOV
MOV

8COTB, RS
(R1)+ R2

OF THE CONVERSION ROUTINE
THE MESSAGE

EET uP

x THE DESIRED MESSAGE
AETIVE FLAG

JSR
Cng

PC, PRMESG
TCHACT

1578

TCMDARB

TSTB
BEQ

TCMACT
308

:WAS ENTRY C
.NO WAIT

JSR

PC,

408

:NOT DEFAULT mxs Nonnm. nnunn

408

:17S NOTA DEFAULT

88828n8 o8
[,V 3
ONO n NN
onoo
3 o

FINORRSE
IS

8CHTB,RS

MOV

Cocee4
002&e3C

P OB

BOS

INITIALIZATION PARAMETER INPUT AND CONVERSION RCUTINES

40N £ WO BB T

n
WY
*NN
o
oo
R PR R 0101010
O - 0. 0:0°0"

(&)

-0

MACY1l 30R(10S2)

BNE

MOV
15T

TCMDAB

108

#TBUF ,R2

9RS

SET

ser

T anc

.YES. R; %L

ETED?

OF aec or INPUT BUFFER
;S?RT ngoae;
INPU 1
.c

:LOOK FOR DEFAUL

ES -- C/R

: ILLEGAL cunn nus BER C/R

CMPB

RY, #CR

ggg

é?l).Rl

!=-ZTAKE THE DEFAULT RETURN

(R1)+

: INCR FOR NORMAL RETURN

BNE
TST

RTS

1 Q)i f3® RESPONDER. . croulBCTéle 798¢ ‘08RMNE" T ERATE R #Re [P The T
-8 Bl
11 -DT04

BACKGROUND TELETYPE COMMAND DISPATCHER (EXECUTIVE.

.SBTTL

SYSTEM EXECUTIVE/BACKGROUND
THE SYS EXEC EXECUTES THE SYSTEM TELETYPE COMMANCS
[Thee et o as @t @s ws 00 oo

MOANOEC

CcOS

XEC:

ENTRY T0.7
Y EXECUTING

20$%:

177400
003044

30s:
40%:

EXEC.

EXEC

THE

IS _PERFORMED

CALLER

XPECT ANY RES&%TERS TO BE SAVED OR CONTROL

ENTRY TO

TELETYPE COMMAND EXEC CAUSES THE STRCK PCINTER

Tg H‘S PROGRAM.

0004 RoenE ST SRR T

JSR

PC,CRLF

;PRINT CR/LF

JSR
MOV

PC,PRINT
ogSTngx. P

-pngnr § = ?enors COMMAND MODE
=“"52*“€Lé H PUSH STACK

7%7
853
STB
SSE

bx L
aggp
{RACTX
?82

MOV

THERE
012640

JUMP

E¢OULO NgT

s’k RS

TCMAC
r%nogg

CLRB
ELSB
10%:

TE&ET

TELE CMD ACT
:CLEAR
5CLEE¥ T hE ¢MD gggnr

2353 THE DX 88331 AN OPERATION ?
'¢°s ThERE
??NT} 2;con?auo
PRINT T 6 BXecott
X REGISTERS
{E>
§§8?'u§¥§cgc£x§ IF NOTHING TO DO

IS A TELETYPE COMMAND TO BE EXECUTED

MOV
MOVE

#TBUF ,R2
(R2)+ R3

;gsr UP PTR TO START OF TELE BUFFER
:GET
COMMAND IDENTIFIER

BIC

2177400, R3

CMP
BEQ
CMP

R3, (RY)+
EXECMD
(R4)+,RY

;snvsub.o. BYTE
iSET
PTR TO COMMAND TABLE
:DOES COMMAND MATCH TABLE ENTRY”
:YES, WE GOT A MATCH - START EXECUTION
:INCR TO NEXT COMMAND

BNE

40$

INO,

MOV

TST

sTCMDTB . RY4

(RY)

{END OF TRBLE?

TEST NEXT ENTRY

COMMAND ERROR - NOTIFY OPERATOR WITH ? AND “BELL"
137607
011346
002720

3e
003036

éERfl:

MOV

JSR
IMP

#137607,R2

PC.PRINT2
EXEC

:PRINT

? AND “BELL"

:RETURN TO EXEC

EXECUTE COMMAND

EXECMD:

003042

IMP
TELETYPE

tcmore:

003044
0030¢se

033432

.MORD
_WORD
WORD

"WORD

J(RY)+
COMMAND

'R
ACCESS

DUMP

:EXECUTE COMMAND
TARBLE

;A = RCCESS

:D = DUMP

DOS

MARINDEC-11-DZDXI-B NEW Dxi1-B RESFONDER
MACY11l 30A(10S2) O0O1-FEB-78 09:46 PAGE SS
BACKGROUND TELETYPE COMMAND DISPATCHER (EXECUTIVE)
30-JAN-TB 14:19
CZDXIB.P11
:E = ENRBLE DEVICE
‘E
. WORD
2708 003054 00010S
2709

2710
evll

evle
2713
eriy

evls
2716
2717
2718
2719
2720
22:}_
evee

003056

004222

.WORD

ENRBLE

~1b

.WORD

FILL

003060

000106

0110
4YCO4
%0111

%g&e

00
%30

307
003074
003076
003100
003102
003104
003106
003110

4330
000113
004266
000122
003112
000123
003264
020000

. WORD

. WORD
.WORD
. WORD

. WORD
. WORD
.WORD
. WORD
. WORD
. WORD
. WORD
WORD

:F = FILL

'H
HELP
4 ;

;H = HELP COMMAND

INPUT
6
KILL
'R
RUN
'S
STOP
0

;I = INPUT
K = KILL
:R = RUN
:S = STOP

;END OF TRBLE

SEG OCssS
SE% 0CEs

.SBTTL

032777

001000

003122

005077

007342

003132
003136
003142

012700
004737
004737

003162
003164
003170

120037
0037&

003176

105037

003120

003126

003146
003152
003156

003172

001342

7?7

105063
1

:
:
;

THE RUN COMMAND RERDIES THE DX AND SPECIFIED DEVICE
BUFFERS TO BEGIN OPERATION. THE RUN COMMAND MUST
BE EXECUTED BEFORE ANY ARCTION WILL BE PERFORMED

RUN:

BIT

013067

003202
003206
003212
003216

105037
013701
010137
012702

013072
013062
013060
001000

003224
003226

005302
001375

00S021%

108:

000002
000017
000020
013070

208:

003260

0S3777
0S2777
052777
000137

013112
00400C
001100
002720

007224
007216
007210

;1S DX ENABLED?

J0XCS

:INIYIALIZE THE DX

CERR

INC

JDXCS

1SET GO

CLRB
CLRB
CLR

SSENSE (DTRB)
SRORQ(DTARB)
SMINS(DTARB)

:CLEAR SENSE BYTE
:CLEAR THE READ REQUEST
:CLEAR THE START OF MANUAL INPUT

MOV
JSR
ISR

#1,DEV
PC.CDEVST
PG CSPWST

INC
CMPS
BLE

DEV
DEV, MAXDEV
10$

CLRB

CMDCHF

DXRCT

:YES,

ERROR

:START CLEARING DEVICE TABLES
;CLEAR DEV srnrus TABLE
S
"RESET THE
APPR
C.W STATUS ENTRY FOR THE DEVICE

:INCR TO NEXT DEVICE
{ARE WE DONE
:NO, DO NEXT DEVI

i CLEAR DX ACTIVE FLAG

:CLEAR COMMAND cuaxnxnc FLAG

CLRB
MOV
MOV
MOV

DXABFL
TTRDDR, R1
R1, TTPIR
.Tfsxzs R2

:CLERR DX RBORT
:GET THE TUMBLE TRBLE ADDRESS
‘RESET THE SOFTWARE T/T POINTER
:SET UP CLsna CONSTQNT (WORD COUNTER)

DEC
BNE

na
208

-naz WE oo
?
KEEP ON CLERRING

CLR

MOV
308:

#DXONLN,dDXCS

BNE

CLRB

013074

003230 012737 000001 013076
003236
003244
003252

OVER THE DX.

CLR

000001
010256
010310

BIS
BIS
BIS
IMP

R1)+

#1,MDEV

:CLERR
T/T AND DUP T/T

xiT THE DEVICE NUMBER FOR MUX

: "AND SEL EXECUTOR ROUTINES

XADDR , IDXCS
.ss UP THE EXTENDED ADDRESS BITS
#BSYERN, JDXCS
:SEL CHANNEL - SET BUSY ENABLE
sDXENB!DXONLN, 9DXCS;ENRBLE THE DX

EXEC

SEG
gEG

BACKGROUND -- RUN COMMAND

R = RUN COMMAND

007336

105037

003222

007350

PAGE S&

;

003112

09:4%

)

DONNTNLEW mn

W
~N
W
w

EOS

MACY11 3on<xosa) 01-FEB-78
11-DZ0XI-B NEW DX11-B RESPONDER
BACKGROUND -- RUN COMMAND
30-JAN-78 14:19
11

.SBTTL

BACKGROUND -~ STOP COMMAND

BACKGROUND -~ STOP COMM

PRARGE S7

S = STOP DX COMMAND

STOP DISBLES THE DX IMMEDIATELY,

AFTER THE MNEXT LHWIS

THE NEXT DATA TRANSFER COMPLETION, OR AFTER THE

snoch SEQUENCE

NEX

THE FOLLOHING FORHRTS
RRS RLLOHED

UDes @c we @t v 00 a0 s a0

TOP:

00001s

000104

SI(F/R)
SD(C/R)
SE(C/R)
SP(C/R)

000120

00302e
013066

108:
@
es
ws
s

DI
X IMMEDIRTELY

NEXT INITIAL SELECTION SEGUENCE
ot SYOP DX AFTER
NEXT DATA TRANSFER IS COMPLETED
=- STOP DX AFTER
== STOP DX AFTER NEXT ENDING SEQUENCE IS RECEIVED
== STOP ON NEXT PARITY EROR RECEIVED FROM CHANNEL

STOP WRITS UNTIL THE SPECIFIED CONDITION IS MET.

THEN,

THE

DUMPED ON THE CONSOLE TELETYPE.

A RUN COMMAND (R) MUST BE EXECUTED BEFORE ANY MORE
ACTIONS WILL BE PERFORMED ON THE DX

MOVB

CMPE

BEQ

(RE) R4

srbpox
108

:YES, SE

RY,#'D

CMPB

RY,8'E

CMPB

RY, 8" 1

BEQ
CMPB
BEQ
JMP
MOVB

;GET _THE TYPE OF STOP INDICATED

SIHHED ATEL

slR

CMPB

BEQ

000111

DX 1S DISARBLED AND THE DX STATUS REGISTERS ARE

BEQ

00010s

003264

88r 8RBT e

S(C W)

108

108
RY,8'P
108
CERR

RY, DXSTPF

; YES, xsaahs DX AND PRINT REGISTERS

D = T; XT oarn TRANSFER?

;E = AFT R HE NEXT ENDING SEQUENCE

i YES, SET

STOP FLAG
vss SET STOP FLARG
‘P ='STOP ON PRRITY ERROR??
i YES, SET STOP FLAG
ILLEGAL FORMAT -- GIVE ERROR
ISET THE STOP FLAG
‘1

='AFTER THE CHIS SEQUENCE

WHEN THE STOP CONDITION IS SATISIFIED,
THE ox ISR WILL ABORT ALL DX RCTIVITY AND

SET
A FLAG cnustc ALL ox REGISTERS TO BE
DUMPED BY "STOPDXTM,
BELOW
rue srop conoxrxou WILL REMRIN

IN EFFECT

NTIL IT IS SATISIFIED OR ANOTHER REQUEST

supsnceoes
003334

0oc137

IMP

G02720

17.

EXEC

:RETURN TO THE EXEC

STOP THE DX AND PRINT THE REGISTERS
NOTE THE PRINT OUTS WILL BE IN OCTAL

ST10PDX:

BIC

’
.

203340

042777

007122

012703

:DISABLE THE DX

CDEV,R2

:CONVERT AND PRINT

PC, CRLF
R1 nssc
STPMES

JSR
MOV

PC, HOMP
#13. R3

MOV
003370

SDXENB, JDXCS

JSR
JSR
.WORD

:START AT NEW LINE
:PRINT "CURRENT DEVICE -THE CURRENT

:DEVICE NUMBER IN HEX
{PRINT THE 13 DX REGISTERS IN JCTAL

03:46

20R(10S2)DOI-FEB-?B

FOS

MACY11l

mm
(ST

-B RESPONDER

14:19

003374

Oi2veH

3406

004870

3400

003426

000137

00"096
00704e
OCE”EC

MACYL1l

GOS

30AC10S2)
oOl-FEB-?B

BACKGROUND -- STOP COMM
10%:

.D;DS;RA

Eé.ééTOrs
DXABFL
JOXLS
JdDXCS
EXEC

03:46

PAGE S8

uun

Dx11-B RESPONDER

;:STARTING POINT

:GET THE REGI?T R CONTENTS

:ARE

INO,

:YES,

DUMP

N OCTAL

RESET THE aaonr FLAG

‘RESET THE Ox
;AND

RETURN

T0O

THE

E*EC

(Sl

HGINDE»-IX-DZDXI
C<DXIB.P11

282%
2826

;

2827

gggc
1

CONSOLE TELETYPE IN THE SPECIFIED FORMAT.

2842

5845 003432 004737 005050

BuMP:

5333
2841

ee:a

SBae D93u4 9893 BBSS
00

S8e0 003:50 801;21
UU

012705

0CO47S4

2855
28

003474
003476

001407
012705

004670

003506
003510
003514
0035
003522
003524
003%2p

001402
000137
010537
00S700
001043
112204
120427

00302

003832

120427

001014

000110

000117

00302t
O0i3led

108:

0000SH

gggg
2870

003540

DO0S004

sg;g

883?23

osa;g;

002000

060437
017702
004777
108737

013122
007330
007330
01307!

003542
003544

005303
001403

2875 003554 325u37 013120
2876
2877
2878
2879
2880

003560
003Se4
003570
003574

003600

00137%

DINARC
N ron
NE
WORD 3§H rnsu3~o

FASHION FOR RSCII nuo EBCDIC nooes (so cunnncr:ns pen LINE

JSR

PC,GLIMIT

A4
[

cEgCDHP
RT
s'E

BEG

CMPB

RY,

CMPB

RY.8'0

BEQ
MOV

BEQ
NP
MOV
18T
BNE
MOVB
CMPB
BNE

gggg 003534 004737 005302
2871
287

oc ALnng
HEX nS

MOV

003464

120427

YY = THE DEVICE

253
CMPB

2853

003470

BEY:
X EEEEEE, X Bue
PBa"BEVTEe
Tn 20Be
"
ossésés
gugp BUTBLPHOFFER"
BETWEEN THE OCTAL
LIMITS"VGIVEN
EQEBCDIC
WHERE: X = A-ASC hooa
sss IN' HEXH-HEX, 0-OrTAL

457

SS?? r-guéi 1 S~3§ 8 oxog
2852 003462 001414

286S

THE DUMP COMMAND DUMPS THE SPECIFIED DATR AREA ON THE

THE FOLLSH;NG COMMAND SYNTRVEBUQR§CSVQI
EEE TRBLE IN CODE X

:;
:

2858
2859
2860
2861
2862
2863
2864

BACKGROUND -- DUMP COMMAND

583
2836
Sggfl

2857

PRGE S93

DUMP COMMAND

5835

2854

09:46

5353

.SBTTL

OI1-FEB-78

JSR

oHEanP RS
8’

csr BUFFER LIMITS

:'?g 93
Egco DUMP
EBCD
.

vg ugomgnyt; og
X

10§
oocronp,ns

vss courxnue DUMP
.ser gp
FOR OCTAL DUMP

108
CERR
RS, DMPRDR
RO
DTUMTB
(na)» RY
RY, &'

vss CONTINUE DUMP
ILLEGAL ENTRY -- ERROR
snvs ADDRESS OF DUMP ROUTINE
{WAS THIS A TUMBLE TRBLE DUMP”
:YES, ounp THE TUMBLE TRBLE
‘WAS'A DEV 8 SPECIFIED
IS
NSXT POSITION A COMMA

PC.GOEV

:1S

OCTAL?

UMP GIVEN LIMITS

:s? THE DEVICE
NUMBER -- IN HEX

;

COMPUTE RELOCATION CONSTANT FOR DEVICE

5
308:

CLR
DEC
BEG

ADD

R4, SADDR

408 :
50§ :
60%:

ggo

RDD
MOV
JSR
1STE
BNE

DUMP

R3
40%

Sggoo.nw

R4’ EADDR
aSADDR, R2
PC, aDMPADR
PCER
&OS

;RELOCATION CONSTANT

: DONE ?
vss ADD TO START + END ADDRESSES

0 NEXT DEVICE TRBLES

:ADD RELOCAT TO START ADDRESS
‘ADD RELOCAT TO END RDDRESS
‘GET WORD
:CONVERT AND DUMP IT

MACY1l 30R(10S2)

BACKGROUND -- DUMP COMMAND

)

NEW Dxil-B RESPONDER

30-JAN-T8 14:19

[

CZDX1B.FP1L

uwn

MAINDEC-11-D2DxXI-B

HOS

ADD

0C3J00e2
013120

2881
82

BEG

503

TSTB

IMP

002720

SADDR

snbon,snoon

BGTY

0130%4

82,

CMP

708

TCMDRR

EXEC

:INCR TO NEXT WORD

:DUMP DO
:YES,

EXI

PRINT NEXT WORD

: COMMAND ABORT?

YES, RETURN TO EXEC

DUMP THE DUPLICATE TUMBLE TABLE IN REVERSE SEQUENCE
MOV

1200400
013071

003712

00172
00C137

000777

013120

001000
00000e

3i2C
3120

ssr UP COUNTER TO DUMP ENTIRE TUMBLE TRBLE

1518

PCIR

. 1S annf COHPLE E?

gg{

salsxzs-x.saoon:CHECK FOR WRAP AROUND

ADD

8TTSIZE,.SADDR

——

BNE

208:

013054
002720

8TTSIZE/2,R0

MOV
JSR

308:

SUB
DEC
BEQ
TSTB
BEG
TMP

JSADDR, R2’
PC, 3DMPAUR
10%

%2, SAODR
RO
30%
TCMDARB
313
EXEC

GET STnRTING ADDRESS
T THE CONTENTS

:NO,

WAIT TILL DONE

;WRAP AROUND TO TOP or TnaLE

:DECREMENT TO NEXT ENT
:HAS ENTIRE TUMBLE TRBLE BEEN DUMPED”
i TES, EXIT TO THE EXEC
‘ARE'WE TO ABORT?
:NO, KEEP ON DUMPING
tYUP, BACK TO THE EXEC

PAGE B0

09:46

(@]

5-3an58Tiils

N
mm
[N

1-020%

SNeE rii

CZDX

MAIN

105

MACY11l 30&(1059)
DOX—FEB-?B
DXi1-B RESPONDER
BACKGROUND -- DUMP
C

.SBTTL

BACKGROUND -- FILL COMMAND

FILL COMMAND

THE FILL COMMAND LOARDS THE SPECIFIED BYTE
INTO THE GIVEN DATR AREA.

THE

WHERE:

XX IS THE FILL CHARRACTER IN HEX

ISR

PC.CHTB

004737
004737
110337
004737

00S0s0

0037EE
003772
003776
004000

Www

o
ono

[

000

002000

003762

FILL:

005302

003736

012534
Ol3lee
002720

YNTAX

s °LL0¥§"G ?
FOT.XX. vv

:
003716
0037ee
003726
003732

FOR THE FILL con
#x
FOR DEVICE Y'Y'Y WIiTH
N?UT EUFFER
- nR E LLAVRAILABLE
WITH %

JSR

MOVB
JSR

ND:

FILL ourpur BUFFER FOR DEVICE

YY IS THE DEVICE ADDRESS IN HEX

PC,GLIMIT

R3.FILLCH
PC.GDEV

:GET BUFFER LIMITS

:GET THE FILL cunncrsn

:SAVE FILL CHAR
:GET THE DEVICE ADDRESS

COMPUTE RELOCATION FOR DEVICE

;os /

BEQ

208

ADD

RY, SADDR

208:

SEE

ggo

ADD
MOV

cggoo RY

R4’ EADDR
SADOR, R1

DONE ?

:YES, ADD TO START AND END ACCR
:ADD RELOC CONST TO START

:ADD RELOC CONST TO END RDOR

FILL BUFFER WITH SPECIFIED CAHARCTER

30s:

MOVB
CMP

8LOS
JNP

FILLCH, (R1)+
Rl EADDOR
308
EXEC

:FILL CHARACTER
:DONE?
INOPE, FILL NEXT CHAR
:DONE. RETURN TO EXEC

PAGE &I

06
am

093:46

JOS

MACY1l 30R(10S2)
OI1-FEB-78
BACKGROUND -- FILL COMMAND

mm
oo

$:19

DDV
NDVIY
JDOOODOOODODODDD

Ose
XZ

el
* | [ & ] Hg
Yoo
Lw-0Owum~)

Dxi1-B RESPONDER

: 19

KOS

MACY11l 30A(10S2)
OI1-FEB-78
BACKGROUND =-- HELP COMMAND
.SBTTL

09:46

PRARGE &2

BACKGROUND -~ HELP COMMAND

THE HELP COMMANC PROVIDES THE OPERATOR WITH
A& SYNOPSIS CF

COMMANDS WHICH MAY BE USED FOR OPERATING THIS SYSTEM.
THE SYNTQX FOR THE HELP COMMAND IS:

MOV

SHELPMS Rl

SHELPLN, R2

;SET UP ADDRESS OF HELP MESSAGE

;LENGTH OF HELP MESSAGE

START OUTPUTTING THE HELP MESSAGE UNDER OUR CONTROL
SO THE COMMAND MAY BE ABORTED QUICKLY
013071

011366
013054

002720

MOvB

CMPB

BGT
JSR

1518

BNE

DEC
BNE
IMP

(R1)+,R0O

;GET _BYTE TO OUTPUT

PCTR, by

'MORE THEN FOUR CHARACTEF.. IN OUTPUT BUFFER?”

TCHDAB

; HAS opsknron INDICATED A DESIRE TO STOP?

158
PC, PCHAR

208

R2
108
EXEC

YES, WAIT TIL DOWN A LITTLE
:PRINT IT ON CONSOLE

YES,

RBORT HELP MESSAGE

Has
ENTIRE
MESSAGE BEEN OUTPUTTED??
:
OUTPUT ANOTHER BYTE
: rEQ RETURN TO THE EXECUTIVE

.....

?511-8 RESPONDER

-JAN

Dxil B RESPONDER
14:19

LOS

BACKGROUND -- R ggééoES&flfl
MACY1l

.SBTTL

26-F58-78

09:46

PAGE &3

BARCKGROUND -- ACCESS COMMAND

ACCESS SPECIFIEC LOCATIONS AND CHANGE IF DESIRED

T T

THE RCCESS COMMAND IS A QUICK LOOK AND CHANGE
ROUTINE MRINLY USED FOR PROGRAM DEBUGGING.

THE FOLLOWING ACTIONS ARE PERMITTED:
BQSICQLL;

XXXXX

N
n

g 98899359

SERS
STREILEL
P RINTRER

CCESS

011540

S
PeE

0S0

SPECIFIED [XXXXXX] AND OPEN NEXT LOCATION

-=- RETURN TO EXEC MODE

PC,COTB

SS:

003026
813120
13120
013053

105:

iWAS A VALID aooness ENTERED’
RF.JR
NO GIVE OPE aT

ggmm ;
03 Be

~§°E?:vgflTofi':’x
SSH 2~ 28nTNo1cATION
S0%e groa]
i:CLEAR
TELE ACTIVE
F

00“678

PC OCTDHP

011346
006772

PC PRINT2
9SADDR, R2
PC,0DMP
_R2
"'
PC kaufa

02004

40
R

011346
013083

:GET THE START ADORESS

RS
33

;1.R3

000001

PRINT noonsss IN OCTAL

TPRINT

nsrxve COMMAND”?

012640
011540

SR
§

0000S?7

RY, 8’/
so$
RY, #CR
48

PANYtunncé
STORE IT
:YES,

308

006712
000002
002720

01312C

30%:
40%:
S0%:

ExEE uono ADDRESS”

:PRINT 2’'SPACES
OF oa:scr LOCATION
:GET CONTENTS
'PRINT Sonrsgrg IN
O

58&“

20%:

000015S

000137

== OPEN AND PRINT SPECIFIED OCTRL LOCATION
[XXXXXX](C/R) == C HANGE CURRENT LOCATION IF DARTA

e [lBNt

1/, EXIT 1O EXEC
RETURN TO EXEC
1YES,
:CR, GO TO NEXT LOCRTION’
vsg opsg
ND PRINT NEXT LOC.

:g‘snoon

ORrR
INT CONTENTS OF CURRENT LO
LOCATION
OPEN
cnnncé
NEXT LOCATION

EXEC

:RETURN TO THE EXEC

R3, 3SADDR

:OPEN

.SBTTL

P 0= e e e Pt Pt e e
N—-OwoNNCCNLwWwn

005302
010256

302S
3026

013110
013114
004256
004262

06
105063
000137

002720

fThe et et @aswees as @s a0

i B8

BE888E 000

WWww

BACKGROUND -- ENARBLE DEVICE COMMAND

E = EMABLE DEVICE

THE ENRBLE COHHQND TURNS THE DEVICE SPECIFIED INTO AN
THIS IS ONLY NECESSITATED BECQUSE A KILL
ON-LINE MODE.
COMMAND WRS PERFORHED ON THE DEVICE IN QUESTION
THE ENGBLE COMMAND HAS THE FOLLOWING SYNTRX
X
-- ENABLE DEVICE RDDRESS
EXX
THE DEVICE ADDRESS (XX) HUST BE ENTERED IN HEX

PC, GDEV

:GET THE osvxcs NUMBER

ggg

oevégu RS

; COMPUTE

MOV
CLRB

STOFF,
SSENSE (DTARB)

:ENABLE THE DEVICE NUMBER

JSR

MOV

RDD

CLRB

PCcogv57

BTQPH RS(RS)

EONLF(DTQB)

?h&nfl

ADDRESS

EVICE

OF THE

STATUS TABLE

SPW TABLE ENTRY

: COMPENSATE FOR OFFSET DL.ICE ADDRESS
:RETURN TO THE EXEC

00
00
o,
£L

PAGE &4

3010
3011

09:46

mm
oo

MOS

MACY11l 30AR(10S2)
O1-FEB-78
MARINDEC-11-DZDX1-B
NEW DXil-B RESPONDER
BACKGROUND -- ENARBLE DEVICE COMMAND
30-JAN-78 14:19
CZDX1B.FP11

Fes @t 2t s ws ws @t ws o0 40 @s ws w0

.SBTTL

LILL:

C0s302
000016

013110

004320
004324

000137

013114
000002
002720

PRAGE &S

BACKGROUND -- KILL DEVICE COMMAND

K = KILL R DEVICE

THE KILL COMMAND DISABLES THE SPECIFIED DEVICE ADDRESS FROM
DX. 1T PUTS THE SPECIFIED
PERFORMING TRANSFERS OVER THE
DEVICE ADORESS INTO AN OFF-LINE STATE. AN ENflBks CCMMAND
HUST BE ISSUED BEFORE DATA TRANSFERS MAY BE PERFORMED WITH
THE DX FOR THE SPECIFIED DEVICE RDDRESS.
THE KILL COHHRND HAS THE FOLLOHING SYNTRX:
-- KILL DEVICEADDRESS XX
THE DEVICE QDDRESS (XX) MUST BE ENTERED IN HEX

JSR

JSR
MOVB
MOV
388

ADD

MOV

KILLEX: JMP

PC, GDEV

PC.CDEVST
81 SONLF (DTRB)
DEV RS
oevsgu RS

srspu
RS
SUCHK| (RS)
EXEC

;GET THE DEVICE NUMBER

:COMPUTE THE ADDRESS OF THE SPW TABLE

: COMPONSATE FOR OFFSET DEVICE ADDRESS
:MAKE THE DEVICE OFF-LINE SEND UNIT CHECK

:RETURN TO THE EXEC

09:4%

Qo0
(=
o

01-FEB-78

unen

MACY1l 30R(l05¥

BACKGROUND -- KILL DEVICE COMMAND

-0

X11-B RESPONDER

4:19

NOS

Dxil-B RESPONDER
i4:19

MAC711 30AR(1052)

BACKGROUND -- INPUT DISPLAY DATR COMMAND

;
:

A 2260
INPUT COMMAND IS USED TO ENTER DATA ONTO
THE
SCREEN AND THEN SEND IT TO THE 360 VIR THE READ MANUAL INPLT

COMMANDS

THE INPUT COMMAND HAS THE rououxrg SYN

b
98832 53
%@&§3§§§5§3§§§
82--RRRRER
;.s&ge:ee
Pt D X
J

308:

OwoN

40$:

TSTB
BNE
JSR
CMPB
BEQ
IMP
JSR

che
BIT
BNE
INC
BGE

TSTTYP
Gs
PC, GDEV
q'e',
o$
c:nn

I'.LEGAL ON FRIEND TEST
AN ERROR
ra END -- G
Ti(osvCE NUMBER
MAR MUST BE A .OMMA
n s cou
j
FOUND GIVE INDICATION
OR
UP THE vxc;STATUS TABLE PCINTERS

MOV
ADD
MOVB
MOV
INC
cHP
BEQ
MOVB
BIC
CMP
BEQ
CMP
BLY

RY, #SPACE
608

BGT

ME ENC OF THE BUFFER”
noons:.s
T ON EVEN avrs
ADDRESS
E
oos
svrz ADDRESS
'I’O
smon

SOUTB(DTRB),
comur: STARTING ADDRESS
SCURS(DTRB)|
#SMI, (RS)+
s ART CHARACTER TO BUFFER
RS, SMINS(DTAB) :S
START OF DATA Locmxou
fgg( TRB)
: INCREMENT C
POSITION
AT THE END OF BUFFER
( me).ooxsfi%-a : ARE
CURS
: YES, 'f:mxmr; INPUT
708
{GET NEXT INPUTTED CHARACTER
(R2)+,RY
8177600,
R4
iSAVE L.0. 7 BITS
:END OF INPUT?
R4, sCR
7

RY,8'+

UP TO EXIT

{YES, SET

:CAN’ CHARACTER BE CONVERTED?
INO, MUST BE BETWEEN 40 - 137

:NO

;
:

SET UP TO EXIT
SET EOM INDICATOR

20%:

MOVB

SS (XX) MUST BE ENTERED

omsbsg--o &
sc(mswma)
108
81, SCURS(DTARB) smk
TART
got
NCR
CURS (DTARB)

608 :

;

T BE BETWEEN 40 - 137

#SPAC
:SCALE DOWN FOR INDEXING
QTOETBlRH) (RS)+:CONVERT CHARACATER AND MOVE TO DISPLAY BUFFER
os
:GET AND CONVERT NEXT CHARACATER
:ILLEGAL CHARACTER -- TRERT AS SPACE
sos

QUEUE READ MANUAL INPUT REQUEST

INC
INCB

SEE
013070

-- SEND

SuB
MOVB
BR
CLR

508 :

0 DEVICE xX
DATA ooo T

IXX,D0D....000

HE DEVICE

CcCMP

000137

[NV

108:

208:

17760C
000015

88
£
n&
o
£R

SRR
5e
B3 FRE
R
W
(=)
[

WWWWwWwWwWwWwWwW

ineuT:

000152
000004
000017

PRGE &6

I = INPUT

;

000773

09:46

003040
0l23s4

OI1-FEB-78

BACKGROUND -- INPUT DISPLAY DARTA COMMAND

.SBTTL

00073S

BO6

TSTB

SEOM, (RS)

SCURS (DTARB)
SRDRQG (DTAB)

:SET EOM INDICATOR

xucnensm CURSOR POINTER
QUEUE REARD REQUEST

IF THE DX IS CURRENTLY ACTIVE
DXARCT

;IS DX ACTIVE?

COb

C-11-DZDX]_3QR(1
9:46 PAGE 67
on§8 c8nn8~o
8§E&an01-FEB-7
- xn9u§
14:19 RESPONDERaacucnoungc-Y11
36-?anfseW Dx11-B
czéQ?S.Pxx

3111

§f§§

004526

004S30

001402

000137

BEQ

002720

114

177776
gxx? OOYS3Y 013746 002720

3118
3119
3120

00OYS40
004S4Y
0045s2

012746
012737
010046

3124
3125

004562
004564

010446
010546

1
1
1

3126

4S5S4

004See

000340

010146
10246
10346

000137

00&SS4

177776

EXEC

DX 1S NOT ACTIVE

80s:

MOV

3i{s

80%

MOV
MOV
MOV

START ASYNCHRONOUS PROCESSING TQ SEND ATTENTICH

:YES, ATTENTION WILL BE TAKEN CARE OF BY D¥

CREATE PHONY INTERRUPT TO ALLOW DX TO ACT ON ATTENTION

PSW, - (SP)

sEXEC, - (SP)
8340, PSW
RO, -{SP)

MOV
MOV
MOV

Rl.-(5P)
R2.-(5P)
R3.-(5P)

IMP

O¥EXEC

MOV
MOV

:NO,

RY.-(SP)
RS’ -(5P)

éESg 888;

:PSW TO PUSH STACK

:RETURN ADDRESS T0O PUSH STACK
:INHIBIT INTERUPTS
{SET UP PUSH STACK FOR FAKE INTERRUPT

:START PROCESSING THE AT _NTION

D06

rnnn

TORMS L m-)

.SBTTL

NNNNNOoO;

BACKGROUND SUBROUTINES -- PRINT

FORMATTING

DUMP WORD IN EBCDITM ON TTY
CALLING_SEQUENCE
...... 2 CONTAINS WORD TO BE PRINTED
PC, EBCDMP
JSR

...... RETURN

REGISTERS 2 + 3 RRE DESTROYED BY THIS SUBROUTINE

gRis7E

Hgv

R2, WK

8IC

8177900, R3

MOVB

MOV

004620

804652

WK’ R3

EBCDTB(R3),
WK

:SAVE WORD TO BE PRINTED
:GET LO BYTE

;CgNVERT EBCDIC TO ASCII

MOV

WKI,R
1

:GET HI BYTE AND CONVERT

MOVB

EBCDTB(R3),WK1

;CONVERT CHAR TO ARSCII

MOV

8177400, R3

WK, R2

FALL THROUGH TO RSCII PRINT ROUTINE
DUMP WORD IN ASCII ON TTY
CALLING_SEQUENCE
...... R2 CONTARINS WORD TG BE PRINTED
PC, RSCOMP

...... RETURN

NO REGISTERS ARE MODIFIED BY THIS SUBROUTINE
TSTB

0130ss

MEE

011330
000036
0130SS
011346

004EB2
004666

LINECT

;NEW LINE?

BNE
JSR

108
PC,CRLF

; NO
;YES,

DECB
JSR
RTS

LINECT
PC,PRINT2
PC

;DECR LINE COUNTER
;PRINT 2 CHARS
;RETURN TO CALLER

MOVB

#30. LINECT

PRINT CR/LF

;60 CHRARACTERS PER LINE

DUMP WORD IN OCTAL ON TTY
CALLING SEQUENCE
...... R2 CONTAINS WORD TO BE PRINTED
PC,OCTDMP OR ODMP
JSR

...... RETURN

NN
MO

Bt Bt Bt Bt Bt Bt Bt Bt Bt Bt Bt Bt § 8 Pt Bt Bt et et Bt Pt Pt ot Bt Bt Bt ot Bt Bt Bt B

Bt et Bt Bt Bt Bt Bt Bt ot Bt Bt Pt Bt Bt Pt B

oo
oL
L L L fL Wi
L
L L 8(.}
n--0OWwm -um: £LWN-OWD vg:uu:umo.nm
NN LW 800‘""0\

Pt Bt Pt Pt Bt

s [ ———

WLWWWWWWLWWWLWLWLWWWWW
WWW WWW WWWW W WWW W WW W W WW W WL W WWW W WWwW W Wt www

MACY1]l 30A(10S2)
O1-FEB-78
09:46
PAGE &8
NEW Dx11-B RESPONDER
MRINDEC-11-DIDxI1-B
BACKGROUND SUBROUTINES -- PRINT FORMATTING
30-JAN-T8B 14:19
CIDXIB.Fl1

OCTOMP PERFORMS A CR/LF BEFORE PRINTING OCTAL DATA
NO REGISTERS ARE MODIFIED BY THIS SUBROUTINE
CO4870

004737

01133C

CTDOMP:

JSR

PC,CRLF

;GIVE A CRLF

000006
10%:

OCTEX:

000004

00s012
00S016
00S0e2e
005024
00S030
00S034
00S036
005040
00S042
00S044

RO, ~-(SP)
Re,-(SP)
RY,-(SP*
86 RY

ADD

8'0,RO

BIC

JSR

3221
3
3e23
32

MOV
MOV
MOV
MOV
CLR
ROL
ROL

HEXDMP:
HDMP
:

10%:

177760
000080
002071
000007
0113ee

#177770,R0

;:SAVE IMPORTANT REGISTERS
OCTAL DIG
;EXTRACT
WORKING R
;CLEAR T
;MOVE _HIGH ORDER BIT
;GET THE REMARINING B

;ONLY 3 LOW ORDER BI

R2,RO

:DATA TO WORKING REGISTER

10%

INO,

MOV
MOV
MOV
RTS

(SP)+,RY
(SP)+.R2
(SP)+ RO
PC

IT ON THE TTY

;ROTATE tHE NEXT OCTAL CHAR INTO POSITION
:ARE WE DONE?

PRINT ANOTHER CHARAC .ER

:RESTORE USED REGISTERS

;RETURN TO THE CALLER

OUMP WORD IN HEX ON THE TTY
CALLING_SEQUENCE

Re CONTARINS THE WORD TO BE PRINT-D
C, HE XDMP OR HDMP

........ RE YURN

HEXDMP PERFORMS A CRLF BEFORE OUTPUTTING THE DARTA
NO REGISTERS ARE MODIFIED BY THIS SUBROUTINE
JSR
MOV
MOV
MOV
MOV

ROL
ROL
ROL
ROL
MOV
ROL

ADD

CHP
BLE

PC, CRLF
RO, -(SP)

R2.-(SP)
RY.-(5P)
4. RY
R2
R2
R2
R2
R2,RO
RO

#177760,R0
#'0,RO

RO, &'9
208

ADD
JSR

87 ,R0
PC . PCHAR

MOV

(SP)+ R4
(SP)+,R2

DEC
BNE

RY
108

(SP)+,RO

;00 A CR LF
;SAVE THE WORKING REGISTERS
;4 CHARACTERS PER WORD

;ROTATE HIGH ORDER 4 BITS TO LOW ORDER = BITS

:TO WORKING REG

'GET THE LINK BIT TQO
:ONLY LOW ORDER 4 BITS
‘MAKE ASCII IF NUMBER

'SHOULD IT BE A-F?

INO,SHIP

*YES, MAKE ALPHA

-PRINT THE HEX CHARACTER

:ARE WE OONE”
'NO,

CONVERT AND PRINT NEXT CHARCATER

‘YES, RESTORE REGISTERS AND EXIT

PAGE &3

PC, PCHAR

DEC

BNE

09:46

FORMATTING

;MAKE RSCII
;PRINT

R2
R2
R2

BIC

c0$:

R2
RO

ROL
ROL
ROL

MOV

01133C

01-FEB-78_

BRCKGROUND SUBROUTINES -- PRINT
ODMP:;

177?770
000060
011368

EOB

MACY1l 30A(10%2)

N
mm
Vo

gi%F& LA

SEEaRE

882
ALY
988 ¥
S8R2LZERRRUSE8R ?

14:19

0000
O vt
e
Qnn
o

g3 iseies 939393007
e FEGERERSPN RERREe2

e bt bt Bt

e B

Bt Bt Bm Bt be

e B

pe e

:
R RRRRI WWWWLWWLWLWWWWWWWWWW 8
OBBI& REOR=
RoBS8SRRL2ON283BIRRED
W
nn v
P
-[
Ow NN LW

004754
004760

n
n

Dxil-B RESPONDER

01-FEB-78_
09:46
MACYil 30R(10S2)
PAGE 70
NEW Dxii-B RESPONDER
1-D20X1-B
FORMATTING
BACKGROUND SUBROUTINES - - PRINT
30-JRN-T8 [4:19
i

OCSC4é

000207

RTS

:RETURN

THE

CALLEF

GO6

x11-B RESPONDER
MACY1l 30A(1052) O01-FEB-7
SUBROUTI -- conpu?s gPecxero au?fsn LIMITS AND DE/ICE ADDRESSES£
BACKGROUND
.Pff D.Daé ?anNg ?u;xq
ggéxx C-11-D2DX

SUBROUTINES -- C

SPECIFIED BUFFER LIMITS aNC CEVICE ACC

SBTTL
GLln‘¥
--BACKGROUND
SET UP BUFFER LIMITS FOR ?E Eo 6

ggw;

;

gsu

324
3530

3543

3246
3247

CALLING SEQ

4331

ns?unu
IF NO ERRORS DETECTED IN BUFFER LIMIT SYNTAX
IF AN ERROR 1S DETECTED, CONTROL WILL BE
UPON cooo

:
:

ggga

ap- gf?fl §s OF FIRST PARAMETER
aa;o TO “CERR*

TO ABORT THE TELETYPE COMMANC.

X QTT/;b
;/}N
28MMAND STRING
ADDR?8 158
asc
5500 N

EACDR = END RDDR TO BE ounpso

SSEE

REGISTERS RS,

gggg

IF AN ERROR IS FOUND CONTROL IS PRSSED TO CERR

3259

00S0S0

326]

00S0S6

3264

00S066

3260

3262
3263
3265

3266

3267

gggg

00S000

005052

004737

005060
005062

001014
120427

005070

005705

gg;a

: YES, szr UP T/T LIMITS

RY, 81

120427

000117

001453
012601

000137

BEQ

CMPB

BEG

003026

00S112

010337

3281
3282

§122
005124

001370
004737

005116
005130
005132
005134
DOS140

120427

00S70S
001764
010337
0004S4

013120

0000SH

112204

013120

10 = OUTPUT BUFFER

‘YES, SET UP OUTPUT BUFFER LIMITS

(SP)+,R1

CERR

OCTAL LIMITS SPECIFIED

&LocT:

mMov

R3, SADDR

:SAVE START ADDR

BNE
JSR

GLERR
PC,COTB

:GET END RDDR

013122

3533
DOeisa
bo
e oooiad
3295
00Si€2
013737
013080

TMP

CMPB

RY ®",

RS
GLERR
R3, ERDDR
GLEX

:CHECK FOR COMMA ¢,
)
‘WAS SECOND PARAM GIVEN®
:NO, ERROR
:SAVE END RDDR
:PREPARE T0 EXIT

;

SET UP LIMITS OF TUMBLE TRBLE

ALMTT:

MOVB

e
MOV

(R2)+,R4

Bupt
TTPTR, SADDR

'YES, SET UP INPUT BUFFER LIMITS

MOV

00S142

GLAOT

;x =" INPUT aurgsn

SLERR:

15T
BEQ
MOY
BR

353?

RY, 8’0

NUMBER ENTERED

(ES OCTAL
AMS
.r TUMBLE TABLE

ERROR DETECTED - POP OFF RETURN RDDR AND GIVE ERROR

011540

3288
3289

GLAMIN

:GET rxnsr PARAME TER

;

3279

3292

GLATT

CMPB

144

3283
3284
3285
gggg

‘WAS AN OCTAL

BEQ

327¢
3278

3280

000111

005102

00Si0e

157

120427

001436

00Si04

:RESET BUFFER TYPE

PC,COTB

000124

gg;?
3272

JSR

GLOCT
RY,8'T

001425

R3 WILL BE DESTROYED.

ALIMIT: CLR

BNE
CMPB

005074
005076

011540

R4,

{TUCEcAL ENTRY
L

s i

9071
:EE rét

SEG

HOB6

MACY1l 30R(10%52)
OLl-FEB-78 09:4% PAGE 72
NEW Dxi1-B RESPONDER
BACKGROUND SUBROUTINES -- COMPUTE SPECIFIED BUFFER LIMITS
30-JAN-TB 14:19

MAINDEC-11-DZDX1-8

0CS160

062737

BBe1%8 B83sse

RDD

000”78

éflNC

AND DEVICE RDDRESSES

SEG Dg

SEG O

;BTSIZE-E.SQODR ;COH?%T? QSDZES?Ugg nggaDgPLth'E TT ENTRY

GLEX!

H
ug ‘0 HAIT
:égq

SET UP LIMI'S FOR INPUT BUFFER OF DEVICE O
00S17e
00S174

000118

00Se14

0130&4
000006
013120

682556

SLMIN:

MOVB

gza

:33
ggo

000741

(R2)¢ ==

RY, 8"

nusg BE

1IN

gane snoon : LPVEGBLENTP
L. o staTus TABLE
sxnar(kua
-oxspssoxEADDR ;DISPLAY SIZE + ROOM FOR LINE ACDRESS

SET UP LIMITS FOR OUTPUT BUFFER OF DEVICE O

ALmor:
o
o

P
e

WWww

000

000124

GLEX1:

MOV

CMP

ROV
oy
2898

(Ra)o Py

4y o't

SZE

oEC$
{ILLes s?na?iucv 0ANDSTATUSENDINGTABLADDRESSESS OF SPECIFIEC BUF
Sgggg(hw>bsaoon85"99?8
.Bé?Péss 8&§Ph2;7c?figu UFFERQCTER AND UPDATE POINTER

INSURE ENTRY PROPERLY DELIMITED AND RETURN TO CALLER

387382

3838eC?

0000SH4

SLEX:

cCMPB
g¢§

R4Y,8’,
c%tnn

i C
K FOR
N87 PROPERLY DELIMITED (ERROR
;E§$Sv

O1-FEB-78_09:46

PAGE 73

BACKGROUND SUBROUTINES -- COMPUTE SPECIFIED BUFFER LIMITS AND DEVICE RODRESSES
GDEV -- GET THE THE DEVICE NUMBER FROM THE HEX INPUT
CALLING SEOUENCE
......... 2 RDDRESS OF DEVICE RDDRESS IN HEX

........ ngfo&‘
NO ERRORS COMMAND
DETECTED1S ABORTED BY GOING
screo

R3 AND DEV (RD) WILL CONTAIN THE DEVICE ADDRESS
SCALED TO I - 8, NOTATION USED 8Y SYSTEM.
R2 WILL PCINT TO THE NEXT CHARACTER FOLLOWING DEVICE ACORE

LDEV:

00s302

00302e

10%:

008330

00S334
005336
00S340
005342
00S344
00S346
00S3S0
005354
00s3%e

013060

JSR

SUB
BMI
INC
CMPB
BHI
E$§

PC,CHTB

SOEV,R3
108
R3
R3, MAXDEV
108
Rg DEV

w
w

UPON VALID RETUR

: CONVERT THE HEX TO BINARY

: ~STARTING nooness
:ERROR ON INPUT
:MAKE BETWEEN1 AND 8
:1S DEVICE NUFBER T00 BIG?
:YES, GIVE ERR
{SET UP THE o:vxcs NUMBER

.SBTTL DX11-B ISR (INTEfiRUPT REQUEST LOGIC AND TUMBLE TRBLE DECODE LOGIC)

IMP

INPUT PARAM ERROR

CERR

ISR

DxXx11-8B

DX11 ISR AND RELATED SUBROUTINE REGISTER USAGE
RO
R1
R2

R3
R4
RS

DEV

DEVICE NUMBER
UN RSSIGNED
UNARSSIGNED

DTAB
11
112

RADDRESS OF CURRENT DEVICE TRBLE
TUMBLE TABLE ENTRY
!
TUMBLE TRBLE ENTRY e

THE ABOVE REGISTER DESIGNATIONS REPRESENT WHAT USUALLY WILL

BE CONTRINED IN A REGISTER DURING DX ISR PROCESSING.

HOWEVER,

RS SITUATIONS DICTATE REGISTERS MAY BE USED FOR DIFFERENT
PURPOSES.

bxISR:

MOV

MOV
MOV
MOV

;

RO, -(SP)

R1,-(SP)
R2,-(SP)
R3,-(SP)

; SAVE HRRDWARE REGISTERS

MOV

RY,-(SP)

¥g¥

I;;IR R2

;CHECK FOR ZERO T/T ENTRY UPON INTERRUFT

LOOP

; NON-ZERO -- WERE OK

MOV

BNE

RS,

NOTE -- AN

~(5P)

_INTERRUPT OCCURRED WITHOUT A TUMBLE TRBLE

ENTRY,

THE RSSUMPTION IS THEN MADE THAT THE TUMBLE TRBLE

ENTRY HAS ALREADY BEEN PROCESSED
JMP

DXEXIT

30-JRAN-T8B

106

MACY1]l 30R(1052)

NEW D\.{QB RESPONDER

-DI0xI-B_

2073
€073

NEW DY;I B RESPONDER

00S364
005270
00S37e
00S374

:19

013702

013060

000137

00&SsH4

9465
90 05 64 ©s ©¢ 6+ 55 5+ G4 06 S+ G5 B4 Ge Bt B S+ S S8 ES S G

1-020\1 B
30- JAN-TB

JOb

O1-FEB-78 09:46 PAGE 74
MACY1l 30R(10%2)
Ox1)-B ISR (INTERRUPT REQUEST LOGIC AND TUMBLE TRBLE DECODE LOGIC)

OO0P:

§Eg 28;
SEG

PROCESS ngBLETRBLE ENTRIES

VIENCE THE PROCESSING IS BEING PERFORMED

AT THE INTERRUPT LEVEL. IT IS SUGGESTED THAT IN
NORMAL PROCESSING ENVIRONMENTS THIS PROCESSING

RI
PRIORITY LEVELS
BE DISTRIBUTED TO LESS PRIVILEDGED

LEVEL IN RSX11-M.

SUCh RS THE FORK
THE

_INTERRUPT
?ERVICE L \Ils
PROC ESSING REGQU

BY THE DXllIN DXCS) AND

AT_ANOTHER LEVEL

HE INTERRUPT (DONE BIT
REL
DULE A _REQUE ST FOR_PROCESSIN
THE LEVEL SCHEDULED TO PERFORM

THE PROCESSING SHOULD BE HIGH ENOUGH

TO PROTECT AGARINST TUMBLE TARBLE OVERFLOW

THE TUMBLE TABLE ENTRIES ARE PROCESSED SEQUENTIAL.Y FROM THE
CIRCULAR BUFFER FILLED B THE DX. RS EACH ENTRY IS RETRIEVED
FROM THE UH?L
TRABLE IT IS ZEROED. IT IS THIS MECHANISM
THAT ALLOWS
PROGRAMMER TO DISCERN WHEN ALL ENTRIES HAVE
BEEN PROCESSED. WHEN ALL ENTRIES _HAVE BEEN
RETRIEVED FROM THE TUMBLE TABLE THEN THE NEXT RCTIO
A ZERO
IS PERFORMED TO THE DX. THE DX11-B NEVER ENTERS
IN TUMBLE TRBLE ENTRY 1.

MOV

TTPTR,R2

igi)

;ANY ENTRIES LEFT IN T/T?

JMP

DXEXEC

;NO,

gag

;GET T/T PTR

EXECUTE NEXT DX COMMAND

TUMBLE TRBLE ENTRY AVAILABLE FOR PROCESSING

RESET THE DONE BIT (RELIEVE INTERRUP

COPY TUMBLE TABLE ENTRY TO DUPLICRTE TUMBLE TABLE (FOR SYSTEM TESTS PURP

RESET TUMBLE TARBLE ENTRY
042777

020200

BIC

00s0ee

001000

: CLERR DONE

:SET UP PTR TO DUP T/T

MOV
ADD
MOV
MOV
CLR
MOV

R2,R3’
sTiSI2E.R3
(R2), (R3)+
(R2).TT1
(R2)+
(R2), (R3)+

:SAVE T/T ENTRY #l

CLR

(R2)+

:CLERR T/T ENTRY #2

MOV

00S0ee

#DONE, 9DXCS

(2 WORDS)

(R2).TT2

:CLEAR T/T ENTRY 81
:SAVE T/T ENTRY #2

CHECK FOR POINTER WRAP AROUND

c0$:
e

oee
0e0

001002
013702
0ice3?

00S434
005436
00s442

000777

“s

032702

005430

BIT

#TTSIZE-1,R2

BNE

20%

MOV
MOV

;AT _END OF BUFFER?
iNOTE -- POWER OF 2 BOUNDRY
:NO

TTADDR, R2
R2, TTPIR

:YES, RESET PTR
iSAVE T/T PTR

START PROCESSING TUMBLE ENTRY ENTRY
SAVE DEYICE RADDRESS
CHECK FOR SYSTEM RESET
VALIDATE

DEVICE

RDDRESS

NEH DX198 RESPONDER
8
HflINDE»-l{-DZDXI
30-JAN

CZDXIB.P

3443
3444
3445

KOb6

01-FEB-78 09:46 PAGE 75
11 30A( osa)
11-8 ISR tINTE RRUPT REQUEST LOGIC AND TUMBLE TABLE DECODE LOGIC)
NOTE -- IF SYSTEM RESET OCCURRED,

THERE IS NO GUARANTEE

THAT THE DEVICE ADDRESS WILL BE VALID.

177400
013106
000200
010000
oigsez2
103405

013067

BIC
MOV
BIC

0177400 DEV
DEV, COEYV
-oofie JDXCS

BNE
SUB

SDEV, DEV

MOV

00s00e

BIT

BMI
CMPB
BLO

172,DEV

osvsn§7 TT1

308

DEV, MAXDEV
40$

:GET DEV ®

:SAVE CURRENT DEVICE NUMBER

:CLEAR DONE

:SYSTEM RESET?

YES, PERFORM SYSTEM nzssr FUNCTION
i
:GET IN O-7 PANGE - IF VALID

: INVALID DEVICE NUMBER
:VALID DEVICE?
:YES, NOT TOO BIG

INVALID DEVICE RDDRESS - BITCH

AN_INVALID DEVICE flODRESS HILL GENERALLY INDICATE
A PROBLEM IN THE CONFIGURATION OF DX DEVICE
ADDRESSES. BASICALLY THE DX HAS BEEN STRAPPED
TO HANDLE DEVICE ADDRESSES WHICH OVERLAP WITH
OTHER DEVICES ON THE CHANNEL.
C0sSS10
00SS14
00sEle

004137
013762
000137

0115086

006538

JSR

3#2RD

R1,

INMES

6L(HES

:PRINT “INVALID DEVICE"
:ABORT DX11

COMPUTE RDDRESS OF SPECIFIED DEVICES STATUS TABLE
005522
00sSex

00s200
004737

01023C

INC

JSR

DEV

PC, SUDEV

;MAKE DEVICE NUMBER 1 -8

!SET UP RDDR OF DEV STAT TABLE

MACY

A(10S

LD&

PAG

DX11-B RESPONDER
TUMBLE 5:::&: DECODE LOGIC)
P Dx11-B ISR (ir‘nEB * 5éou9§1L cxg nflz
" 5 ?an"‘W ?.,:}95
czéx cofi -DZDX

3474

DECODE DX TUMBLE TRBLE STATUS ENTRY
r%oumc moc;s; ~gxcm£s THE ORDER IN WHICH
ms

:3!335
g:’f

;
:

3479
g:g?

:
:

mzs ORDER 1S IMPORTANT AND SHOULD BE ADHERED
TO FOR MOST EMULATIONS.

YSELRST:BIT
BEQ

#SELRST, TT1
TINDSC

;

34
3483

00SS30
005534

032704
001402

020000

g:g

%g&

8827

040000

E TABLE STATUS

ENTRY SHOULD BE DECODED.

seu:cnvc RESET?
:NO, TEST INTERFACE DISC

J48e
002843 83?0
039704 909008
%ggui
g:a'as
3487 005550 000137 006026

rooses ’ Eéo
LY

oIble
Tl
iS Caliiliye
Aeeat
%u-gx'"x'E?sm MEMORY
crc“gn
TNXM vri o Euo

30 %fi §2}S~
01 7 6102
3391
0100
3492 005572
1402
%3
oossoo“m 032:533 xco:oo“63
3495 005604 001402
37 0P2ED8 B32M3 B BEGC

TNXM:

.mg
TESEND: BIT
BEQ
TPARER " g'x’r’
BEQ
s B

sNXM, TT1

333 =6l BoliF ooeons
3503 00S636 2;0'4 gggggg
Sélg

6‘4%

000040

JMP

Sé’

BEq
TCUEND: gIT
TCHEND:

Béé

PINDSC

YES, PERFORM INTER DISC

NON- xx TENT MEMORY ERROR?

TESE"O
oessno 111

X1STENT
MEMORY ERRCR
uaésm?cug
3(:
2
E
}
:
HECK FOR PARITY ERROR
'o?ga’Sm?'"' ET“TncR
458 o S ——

:C:-J'lisg TTL

sSnREg 11
R
IcHend
:gflgzo TT1

08s RBECER" USO8 FBe
Dgg R CONTROL UNIT ENO
Cpfigg an
NT OL WIT END
CCUR

v4
353 387E

NEW DXi1-B
MARINDEC-11-DZDXI-B
30-JAN-78 14:19
CZDXIB. Pll

RESPONDER

MO6

O0I1-FEB-78

MACY1l 30A(1052)

09:46

SEG 0077

PAGE 77

SEG 0077

Dx11-B ISR (TUMBLE TRBLE ENTRY PROCESSING LOGIC)
.SBTTL

3506
3507
3508

DX11-B ISR (TUMBLE TARBLE ENTRY PROCESSING LOGIC)

SYSTEM RESET OCCURRED FROM_360

IS$TEEQTUS TABLES AND RESPECTIVE

CLERR AL

RESET DX ACTIVE FLAGS AND COMMAND CHAIN FLAG

? ;snr ?ov

0127

g:
{CRe
EtSB
CtR

004737

013067
013070

00S3e4

zos

;

MOVB

RY, (R1)+

;USE THE FILL CHARACTER

BNE
INC
cMPB
BLE
CLRB
CLRB

20$
DEV
DEV, MAXDEV
108
DXACT
CMDCHF

:NO, LO?P TILL DONE
:T0'NEXT DEVICE
:ARE WE DONE?
:NO, CLEAR NEXT DEV STAT TABLE
s CLEAR DX ACTIVE FLAG
cunxnxnc FLAG
;CLEAR C

IMP

LOOP

:PROCESS NEXT T/T ENTRY

DEC

BIC

004476

;
:
;

NOTE:

JSR
CLRB
CLRB
CLRB

IMP

FILLCH,RY
R2

#CUBUSY , JDXCS

:WHAT TYPE OF TEST?

IF 2848

uss EBCDIC SPACE

FRIEND TEST

-- USE CURRENT FILL CHARACTER

:ARE WE DONE?

Ressr CU BUSY FLAG

CHANNEL ISSUED R SELECTIVE RESET

BSELRT: JSR

000137

ADDRESS

BEQ

MOVB
20%:

THgRDRSPSN SYSTEM RESET
CLEDEVIC$R$TQ
BvTe

ESa ZE“
nn

gg S
8?
OEBCDSP RY

TST8

012534

:cEDE:S}
SSENSE(DTAB)
ogo;na;
Snx
2CUR2(BTAB)

;START AT FIRST DEVICE

ao REHRNSRL INPUT
St.&
NUHS&E ungagfitns ?n o%sanv
gE
nssunc 2848 oxncuosrxc TEST MO

MOV
MOVB

00
012532

1,DEV

SET THE DEVICE STATUS TABLE FOR THAT DEVICE + SENSE

THE SEL RESET IS ISSUED AGRINST THE CURRENT
ACTIVE DEVICE

PC,CDEVST

;CLEAR DEVICE STATUS TABLE

PC. CSPWST

{RESET SPW STATUS RESPONSE

DXACT
cnocur

:CLEAR DX ACTIVE FLAG
:CLERR COMMAND cunxn FLAG

sstnsstorne)
LOOP

:CLEAR SENSE BYT

INTERFQCE DISCONNECT WARS ISSUED FROM THE 360
A SPECIFIC DEVICE AND IS UNDER
HIS IS DIRECTED TO
360 PROGRAM CONTROL
IF THE DEVICE WAS RCTIVE

ITS DEVICE STATUS TRBLE WILL BE CLERRED

NOB&

SEG 0078
SEG 0078

MACY1l 30A(1052) O1-FEB-78 09:46 PAGE 78
NEW DX11-B RESPONDER
-11-DZDXI-B
i
DX11-B ISR (TUMBLE TRBLE ENTRY PROCESSING LOGIC)
Pl 1
30-JAN-78 14:19
VICE END SET IN STATUS BYTE
AND C
;
:

IF THE DEVICE xs NO

ggggas
32

004737
1057

010310
000000

PINDSC: JSR
1578

PC, CSPWST
SCMD(DTRB)

:nn T
oevxc

006040

004737

010256

JSR

VST

CL na THE

006036

00141

BEQ

006044
012763 000003 000000
006052 120037 013070
006056

006060

001002
105037

108:

013070

120037 013074
4 001002
0

006072 105037 013074

006102
006106

006110

NN EWN-0O

FRRERRRR
Y
38R

DO6114

000137

004137
013706

000137

005364

208:

011506

63?333

004737

010310

006126

004737

010402

006150

105063

MOV
CMPB

DEVICE STATUS TABLE
octos
SCMD(DTAB)
;
DEV
END
+ CHAN END
DEV,DXACT
:1S DEVICE USING DX NOW?

CLRB

CMPB

DXACT

BNE

DEV, CMDCHF
20%

RELERSE DX
HAVE CMD cunxn SPEC
ooss o:vxce

IMP

LOOP

iGET’ nexr T/T ENTRY

BNE

CLRB

10$

CMOCHF

,no

NEXT T/T ENTRY
ves czLEAR
FLAG

A NON-EXISTANT MEMORY CONDITION OCCURRED
THIS WILL USUARLLY TRAP OUT FIRST

ANXM:

JSR
. WORD

006536

332%53

IGNORE

sPu STATUS RESPONSE
ACTIVE?

:
:

P er aswean

006076

THE COMMAND WILL BE IGNORED

ACTIVE

DXA

:PRINT “NON EX MEM"
;ABORT DX AND RETURN TO EXEC

THE LRSTQE;?zgSFESET TO THE 36C WAS ARCCEPTED,

CLEAR DX

IF LAST OP WAS A WRITE PERFORM THE DISPLAY CONTROL ROUTINE
JSR

PC,CSPWST

°°6i35 12?337 000000 000011 10S:
532142 112763 000002 000017

JSR

gnga
MOVB

ggQO(orna) 81l uas nrruxsfigs TED?
82, SRORQ(DTAB) vss INDICATE 360 ACCEPTANCE

006154

CLRB

gACT

CMPB
BEQ

OXStPF, #'E
STPDX

000001

006160

105037

004737

013070

006176
006204

123727
001552

013066

0062

032704

000010

208:

010256

°°°}$3 38?383 0C0004
55&172 110037 013074

06212 001412

PESEND:

R1, INMES
nxhnsc

ggae

CLRB
JSR

000105

308:

Séé
MOVB
BIT

aéo

1heno(ome)
SCTL

SLEMD(DTAB)
CDEVST

sRESET rue SPW STATUS BYTE

oges LAST COMMAND REQUIRE 2260 DISPLAY EMULATION?
:YES, FORMAT THE DISPLAY

;CLEAR

CLEQR

DX ACTIVE FLAG

HE DEVICE srnrus TABLE

58hocun TT1
DEV, CMOCHF

ns COMMAND CHAINING SPECIFIED?
ves SAVE THE DEVICE NUMBER

8ISSREJ,TT

ség itz

:WAS STOP ON END SEQ SPEC?(SE)
:YES, DISRBLE THE DX
AN

;58? Exx%ss o

TECTED?

INIT SELECTION SEQUENCE WARS REJECTED BY DX (FAST _CU BUSY SEQUENCE)
IF

FREIND TEST _MODE
-- QUEUE CONTROL UNIT END
ON UNIT COHPLETING TRANSFER

IF 2848 DIAGNOSTIC TEST MODE -- QUEUE CONTROL UNIT EMD
’

.-.

BO7

30A(10S2)
O1-FEB-78_09:4% PAGE 79
Dx11-B ISR (TUMBLE TABLE ENTRY PROCESSING LOGIC)

MAC Yll

§E?
Ste

RESPONSE ON LOW ORDER CHANNEL ADDRESS

0‘ 2648 MVICE EMULATION IS EXPECTED TO ISSUE
ON HE LOW ORDER DEVICE RDDRESS
C?NYRO&‘?(

HOST OTHER
&Qb/g‘DEVICES ARE EXPECTED TO_ISSUE
UNIT END ON THE DEVICE COMPLETING THE OPERATION.
CONTROL

TST8
BNE
?g;

MOVB

IMP

005364

TSITYP

PROC
ESS SEP%TLY EF FRIEW
UNIT
B
ND ON
13
se ur TC SEND CUE ON LOW onoen CONTROLLER ADOR

CONTROL UNIT END
ooé rnc(orna)oueut
LOOP BACK AND PROCESS NEXT TUMBLE TABLE ENTRY

PARITY ERROR WARS DETECTED

011526
01306

013066
00000i

R1, INMES

;PRINT “PARITY ERROR"

CMPB

DXSTPF,#'P

PRRITY ERROR??
;STOP ON

_WORD

BISB
JMP

000002
oosele

01031C

JSR

BEQ

Prr er et e ws e

REGRERARILEESwoo ?52

wow O 2

0 1-8 RESPONDER

PARMES

YES saaLE THE DX
struux cuccx IN STATUS WORD
ssrnrtornai
oucux
cbnrxuuc WITH TUMBLE TABLE INTERROGATICON
TCHIS'

STPDX

CHANNEL INITIGTED SELECTION SEQUENCE

JSR

PC,CSPWST

CMPB

DXSTPF, 8’1

BEQ
BIT
3NE

CLRB

STPDX
8CMOREJ,TT1
208

011506

00eS36
00CCo0

;RESET ru: SPW STATUS BYTE

ou NEXT CHANNEL INITIATED SELECTION SEGUENCE
WAS STOP ON 1SS SPECIFIED(SI)

vcs DISABLE DX
:WAS’ COMMAND REJECTED BY DX?
:YES, COMMAND REJECTED BY THE DX

SET UP TO PROCESS IT

172

;RESET oevxcz aoonsss BITS

SWAB

TT2

:COMMAND TO L.0. BYTE

BEQ

508

1YES, IGNORE

CMP
BLE
JSR
.WORD

112,812
108
R1, INMES
IN¥LDC

:1S tHIS A VALID onnnnov
:YES, QUEUE TO BE EXECUTED
INO -- REPORT AN ILLEGRL COMMAND RECIEVED FROM THE DX

MOVB
BR

TT2,SCMD(DTAB)
Sos

;QUEUE COMMAND TO BE PROCESSED
iEXIT + PROCESS NEXT T/T ENTRY

7STB

002012

COMMO CHECKED BY THE DX

TT2 CONTRINS THE COMMAND TO BE EXECUTED

VALID COMMAND,

ooooo2

THE DEVICE NUMBER HARS BEEN VALIDARTED

HUS

CMPB
BEQ

112
772, sNOP
0s

DXAB

:TEST 1/0 connauo

:WAS COMMAND A NOP?
i YES,
IGNORE IT

:AND

RBORT THE PROGRAM

MAINDEC-11-DZDXI-B
CZDX1B.F11

NEW Dx11-B RESPONDER

30-JAN-TB 14:i9

MACY1l 30A(10S2)

co7

01-FEB-78

09:46

PAGE 80

Dx11-B ISR (TUMBLE TRBLE ENTRY PROCESSING LOGIC)
COMMAND WRS REJECTED, DETERMINE WHY

881383

0000ie

052763
000412
032704
001404

000100

DEVIC
5 g"mflvERROR
vis

1578
aéa

ONLF (DTRB)
gos

BIS

REQUIRED é" SENSE ang
$INTREQ, SSENSE (DTAB) ;SET INTERVENTION
mxnmso SELECTION PROCESS

DEVICE OFF-LINE -- RESPOND INTERVENTION REQUIRED SENSE CONDITION
0000G2

BIT

100000

BEQ

S0$

.Pmsn,rn

40$

sFINISH UP CHANNEL

A PARITY ERROR DETECT
‘WAS

:NO, MUST

ILLEGAL C

COMMAND WAS REJECTED BECAUSE OF A PARITY ERROR
SET UP BUS OUT SENSE RESPONSE

052763
000403

000040

BIS

000002

lBUSOUT,SSENSE(DTQB) ;SET BUS OUT FLAG

SOs

;EXIT

SE 8? égSE RESPONSE
T UP
s CO'%E
00e416

0se7e3

00c200

BIS

000002

#SCMDRJ,SSENSE (DTRB) ;SET CMD REJ FLAG

~HANNEL INITIATED SELECTION SEQUENCE COMMON EXIT LOGIC

IF SELECTED DEVICE HAS COMMAND CHARINING IN ARFFECT -- KILL IT

013074

WWWWWWWLWWWW
NN NNNNNNNN

013074
005364

3709

00442

O0E44E
00g4Se

105037
004737
103017

013070
010342

60%:
oo er es et vt e

12003?

CUEND

CMPB
BNE
CLRB
IMP

DEV, CMOCHF
608
CMOCHF
LOOP

ooss Gg;vxcz HAVE COMMAND cmmxm SPECIFIED”
T TUMBLE TRBLE ENTRY
COMMAND CHYAINING FLAG
THE
vss c%s
THE NEXT T/T ENTRY

CONTROL UNIT END OF DRTA TRANSFER WAS DETECTED
IF TRANSFER COMPLETE PREPRRE ENDING SEQ RESF
IF TRANSFER INCOMPLETE INCR BUFFER ADDRESS
DECR BYTE COUNT

CLRB
JSR
BCC

DXAC
PC nuxsno
PCHEX

F
:CLERR DX ACTIVE
:HANDLE MUX DATA *rnnnsren COMPLETION
*IF SEL CHAN OR MuUX D/T NOT DONE, MERELY EXIT

MUX DRTQ TRQNSFER COMPLETE

TREAT SAME RS SEL CHANNEL DONE

00e4c4

000404

PCHENI

105037
004737

——

COe4sSe
00e4ee

CHANNEL END WAS DETECTED
PREPARE ENDING SEQUENCE RESPONSE
3070
o342

PCHEND: CLRB

JSR

DXACT

PC,MUXEND

;CLEAR DX ACTIVE FLAG

{IF MUX CHANNEL HANTLE DATA TRANSFER

SE's CO80

SEG 0C8C

MRINDEC-11-DZDXI-B
CZDXI1B.P i1
3730

006466

NEW DXi1-B RESPONDER

30-JAN-78

14:19

123727

013066

000104

000003
?88588

000000
000014

ggggzg

goooce

pazts
deslt Qie7gs

3234 8864%¢

goeese 386782

MACY1l 30A(10S2)

D07

#6552-76
9:46
PAGE B1
ROCESSING LOGIC)

DX11-B ISR (TUMBLE TRBLE EN
PCHENL
:

PCHEX:

108:

CMPB
Q
VB

3h8°

DXSTPF,e'D

;STOP ON DATA TRANSFER DONE”/SD)

SIEBE scmpcotae); 58" eRd SEBEE RPEponse
XY T NE TABLE ENTRY

avr: EOUNT
snvsngznaxn
agngghsngv*crornéy

sgponc ssense o1 155, SELLERHEE SR P cRbi

3739
3740

§?Nl
74
Vi

STOP DX, SOMEONE WANTS TO INVESTIGARTE

3744

108037

013066

006536
006544

04erz7
105237

001100
01307¢

006550

000137

gloe1e

003724

;CLERR STOP FLAG

CLRB

DXSTPF

RABORT

CURRENT DX OPERATION

BIC
INCB

DXABFL

UNRECOVERABLE ERROR OCCURRED
SDXONLN!DXENB,BDXCE ?

THE DX

DX ABORT FLAG SO THE
DX REGISTERS WILL BE PRINTEC

DXEXIT
ISR (SELECTOR CHANNEL COMMAND EXECUTION’
.SBTTL DX11-B
EXIT FROM INTERRUPT

JMP

EXECUTE NEXT COMMAND FOR THE DX
006554
00eSe0
00eSeke

105737
01002

0013

ODXEXEC:

0l12s2e
007210

T1ST8

%
SEX

CHTYPE
SEX

CHQNNEL TYPE O=m, 1=S
EEH
L EXEC
IPLEXER EXEC

-- SELECTOR CHANNEL EXECUTIVE

SEX EXECUTES COMMANDS FOR THE DX TO A SELECTOR CHANNEL
I

ON A SELECTOR CHANNEL
A COMMAND WILL BE COMPLETED
BEF?RE QTTEHPT NG TS ngSUTg COMMAND ON ANOTHER
VICE,

013700

013076
010230

108:

000000

006604

013074

0066%&

oiozie
000017

000001

000011

000000

00ce12
006&2Hk
&34
8
6636
00eeH40

120037

308:

$0%:

DATA TRANSFERS ARE COMPLETED IN ONE BURST

00eSee
00es7e
006576

ISS-DATA TRANSFER-E

MOV

ssn.oev DEV

:GET SEL DEV #

so
ggocur

:YES, EXECUTE IT
ugs COMMAND CHARINING SPECIFIED

;

fio(o AB)

DXEXIT

ISET ?P o;v gvntus TRBLE ADDR

P ANY
'YES,

WAIT FOR COMMAND

*NO,

CONTINUE

sngaotorna).nx

;1S hrreurron TO BE SENT?

#11,SCMD(DTAB)
608
DEV
DEV, MAXDEV

;YES, SET UP TO SEND THE ATTENTION
nEno MANUAL INPUT
IFOR'T
'O NEXT DEV
‘MAVE WE TRIED THE WIGHEST DEVICE"

MAI
CZ0X1

C-11-DZDXI1~.Pl1

Dx11-B RESPONDER
14:19

000001
013078

MACY1l 30A(10% 2)

50%:

007020

BLE

508

CMP
ang

DEV, SELCEV
108

MOY

#1,DEV

DXEXIT

THERE IS A JOB TO DO,

£0os:

MOVB

SCMDTB:

00e726

01-FEB-78_

09:46_

PAGE 82

Dx11-B ISR (SELECTOR CHRNNEL COMMAND EXECUTION)

010eie

000000

EO7

DEC
ASL
MOV

JMP

.WORD
ORD

WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD

scn0(ovaa; RY

ves

RESTART AT FIRST DEVICE

:1S THIS WHERE IT ALL STARTED”
~ops TEST THIS oevx <

PEXIT == NO TRSKS PENDING
LETS DO IT

;COMMAND TO INDEX

osv SELDEV

:SCALE T0 0 - 11
:MAKE WORD ADDRESS
:SAVE CURRENT DEVICE ADOR

SWRITE
snnx

i1 = WRITE FULL BUFFER
:2 = READ MANUAL INPU

aschora<nu)

ESEQ
SENSCM
SWRITE
SRERD
ERASCM
CONUNE
SATIN
SSRMI

:EXECUTE THE COMMA

:3 = ENDING SEQUENCE
‘4 = SENSE COMMAND
'S = WRITE LINE ADDRESS
‘6 = READ FULL BUFFER
17 = ERASE conna«o
110 = CONTROL
UNIT END
(11 = ssno ATTENTION TO 360
112 = READ SHORT MANUAL INPUT

W= OWVOINICNLWU~-0OW .fl)

O
>2

BRBODD
88PUNY
0= 0= be s s bt Bt Bt Bt e () ...R

WWWWWwWW
OoOoOoOmomm

11-B RESPONDER
:19

FO7

Dx11-B ISR

SEG 0082
cE% CCes

OQ(&OSE) 01-FEB-78 09:46__PAGE B3
CHANNEL COMMAND EXECUTIOMN)

(SELECTO

--------------------------------------

-----

------------------------------------------------------------

WRITE COMMAND RECEIVED FROM 360
PREPA RE TO GET DATA FROM 360

BOTH WRITE AND WRITE LINE ADDRESS COME HERE

SINBF (DTAB),dDXBA_;SET UP BUFFER ADDRESS

006730
006736
006744
006750
006752
006756
006764
006772
006

PHYOFF , DXBA

:FOR VIRTUAL MEMORY -- OFFSET FOR PMYSICAL ACORESS

; COMPUTE DEVICE RDDRESS

DEVCON,Re2
DEV, R2

_
[ ?oxca
8-01SPS2-1,3DXBC:SET UP BYTE COUNT FOR MAX, WRITE LINE ADURESS
SCMD(DTAB) ' SLCMDIDTAB) ;SET WRITE FLAG

SSENSE (DTAB)

‘ct§“R stn§§ BYTE

SRBYTC (DTAB)

;RESET REMAINING BYTE COUNT

Dxex1t

:RETURN FROM INTERRUPT

DEV,DXACT

:START TRANSFER

8DXWR, IDXCS

READ MANUAL

éRHI:

01es3e

SSRMI:

010042
000017

INPUT COMMANDS

TSTTYP

:1S TEST FOR FRIEND?

003416

10%:

:YES,

SRORQ(DTAB)
108
ESEQ

‘WAS A READ
REQUESTED”
:YES, CONTINUE
:NC, 'TRERT AS A NOP -- END SEG ONLY

{RESET THE

SRORQ(DTAB)

003366
013104

c0s:

;DETERMINE ENDING RDDRESS

dDXBA,R?2
c0s

;COMPUTE BYTE COUNT
; INSURE VALID BYTE COUNT

Re, aDXBC

;SET UP DX'S BYTE COUNT

SRD10

; START THE RERD

EgEQ

PHYOFF , JDXBA

0033%e

; ILLEGAL

;FOR_MEMORY MANARGEMENT - OFFSET FOR PHY QDURESS

REARC COMMAND RECEIVED FROM 360
PREPARE TO SEND DISP BUFFER

003346
003340

SRERD:

SENSE BYTE

SMINS(DTAB),aDXBA :SET UP STARTING ADDRESS

.R2
SOUTB(DTAB)

SCURS(DTAB)
.R2

010042

TREAT ALL READS RS READ FULL BUFFER

SRERD

SSENSE (DTAB)

000002
000017

DX ACTIVE FLA G

$:SET

SOUTB(DTAB)

PHYOFF , 2DXBA

,dDXBAR

TO 360

:SET UP BUFFER ADDRESS

;FOR MEMORY MANAGEMENT - OFFSET FOR PHY ADORESS

CoOXIB.F11
3865

3866
3867

007134

007142
007iS0

NEW DXxil-B RESPONDER

30-JAN-78 14:19

nnxnosy-x‘-o‘oxx -B

012777

116363
013702

177040

000000
013110

003334

0CO0000CI

3872

007172

3874

007204

007176

oosos;

0Ser77

00C137

000014

00Q00S

O0102:i2

SRD1D:

MOV

003264

9:46 PAGE B84
8ExEcoTION
L E S Bnano

8-DISPSZ,J0XBC

:;SET UP BYTE COUNT

MOVE
MOV

SCMD(DTAB), SLcno!oraa) SAVE CODE OF LAST COMMANC
COMPUTE "DEVICE ADDRESS
oevcou r2

MOVE
CLR
8Is
IMP

DEV,D
snavrc< 9DXCS
199)
8DXRD,
Oxex1t

CLR

007123 x&gSs; §88882
367
13070
3871 007166 11003
3873

30A(}10S2)
MACY1l
| SELECTOR
Ox11-B 19RC

(3[37’

Sgtng(DTQB)

:CLERR SENSE BYTE

:SET DX ACTIVE FLAG
nessr
Rsnnxnxnc BYTE COUNT
'START
'RETURN FROM xuvsnpupv

0084
267% 2RES

HO?

MACY1l 30R(10S2)
OI1-FEB-78 09:4%
Dxil1-B RESPONDER
Dx11-B ISR (MULTIPLEXER CHANNEL COMMANDS)
4:19

PRAGE B85

SBTTL

DX11-B ISR (MULTIPLEXER CHANNEL COMMAMDS)

MEX--

MULTIPLEXER CHANNEL EXECUTIVE

MEX EXECUTES COMMANDS FROM THE DX ON A MULTIPLEXER CHANNEL
DEVICE
REQUESTS
Wl
TYE BEcue
REQYERTBUY
HULTIPLE BEVATE
TAPLEXER MULTIPLE
PNN bRl TIPLEXER

IF ADEVICE 1S NOT SERVICED UNTIL ALL OTHER DEVICES

DATA TRANSFERS ARE DONE IN 4 BYTE BLOCKS, SO RS TO NOT

HOG THE CHANNEL

007210

105737

013074

010212

007260

00s200

000017

000001

000011

0000C00

T4 0= s Bt Bt Pt s Bt e
OWO NN LW

001352
000137

013078

DXEXIT
MDEV

SRORQ(DTAB), 81

oiocie

LnngBSXICE ADDR THAT HAD A COMMAND
cgr
DEV STAT TARBLE

ves

408

EXEC x
Arrsufxon REQUESTED”
CONT INUE

#11,SCMD(DTAB) EQ QUEUE
ATTENTION
READ MANUAL INPUT
ron THE

50$

NO TARSK PENDING FOR_CURRENT DEVICE

THIS CODE

BUM TO INTERROGATE NEXT DEVICE ON CONTROL UNIT
WILL

A LOCKOUT

INC

REPERT S Q ENCES WHICH MAY HAVE RUN INTO

CONDITION IN

DEV

INCR TO

éOS:
MCMDTB:

007350

007502

WRAPPED AROUND?

DEV, MAXDEV

uas osvxc

CMP
BNE
JMP

DEV, MDEV
30$
DXEXIT

NO YoB HERE, HAVE WE CHECKED ALL DEVICES”
INO, EXAMINE NEXT DEVICE
:YES, EXIT FROM ISR

MOV

45$

#1,DEV

MOvB

SCMD(DTAB) ,R4

RLL o£v1ces HAVE BEEN INTERROGATED

s nsser THE oevxcs NUMBER

THIS DEVICE HARS A JOB TO DO,
116304

xr DEV CE NUMBER

cCMPB
BLE

45%:

CONTINUE

vss LERVE DX FREE

PC, SU Ev
SCHD(DTRB)
50%

MOVB

013087
000001

JMP

IS COMMAND CHAINING SPECIFIED?

108

CMPB

Leovor et asvsan

007256

CMDCHF

JSR
1578
B

000000

112763
000413

1STB

EXECUTE

COHHRNO TO INDEX

DEC

:SCALE

.WORD

MWRITE

;1 = WRITE FULL BUFFER

ASL
MOV
JMP

. WOR
WOR
WORD
WORD
WORD
WORD
WORD
WORD
WORD

RY
DEV, MDEV
IMCHDTB (RY)
MRMI
ESEQ
SENSCM
MWRITE
MREAD
ERASCM
CONUNE
SATTN
MSRMI

T0 O -

‘MAKE INTO uono ADDRESS
savs
ggnnenr ocvxcs ADDRESS
ECU
OMMAND
;g = Efl?
NPU
:3
= ENDING
SEQUENCE
:4 = SENSE COMMAND
;S = WRITE LINE RDDRESS
‘6 = READ FULL BUFFER
17 = ERASE connn
110 = CONTROL UNIT END
:11 = SEND ATTENTION TO 360
:12 = RERD SHORT MANUAL INPUT

§E? gges

107

MACY1l 30A(10S52) O01-FEB-78 09:4%
MAINDEC-11-DIOXI-B NEW Dxi1-B RESPONDER
DX11-8 ISR (MULTIPLEXER CHANNEL COMMANDS)
30-JAN-TB 14:19
CZDX1B.P11
0 st

PAGE B&

ssssRBRNNRINIRINNNICARNRNNciNnineis

ggga

B33s3333 330

gggg

;

3937

33S3ssssssssasassasasssesassRtesssaRRsRRRIRNRNNILIINNINIRGINICIIIYIRILIEIRNNIILISIYTS

3939

;

333é

3938

3940

3943
3944
3945
3946
3947
3948
3949

007352
007356
007360
007366
007374
007402
007410

00S763
001011
016363
163763
012763
016377
013702

000014
000006
013104
000741
000012
013110

3954
3955
3956

007436
007440
007444

002005
016302

000014

010277

003024

2959
3960

007456
007464

116363
110037

00000C
013070

gggg

007476

000137

010212

3950

007414

060002

000012
000012
000014

0023064

3951 007416 110277 003044
3952 007422 012777 177774 003046
3953 007430 026327 000014 000004
00S402

3958 007452 10S063 000002
3957

007446

000001

gggg
357

3371

007502

105737

012532

3972
3373
3374
3975
gg;g

007506
007510
007514
007516
88;352

001034
005763
001031
10S063
68?533

3978
2979

007530
007534

000137
10S063

010042
000017

20%:

3981
982

007546
007552

016302
066302

000010
000004

3984

007560

166302

000012

163763

013104

3983

3987

007556

007572

005302

rR2’

na hoxcn
#-4, JDXBC
:START BYTE couut AT 4
SRB?TC(DTRB),.H:1S LESS THEN4 BYTES LEFT?

NEG

CLRB
MOV

MOVE
MOVB

IMP

208
:NO, START TRANSFER
SRBYTC(DTRB)
,R2 :YES, USE REMAINING BYTE COUNT

sstnss DTAB)

CLERR SENSE BYTE

noxan JDXCS

svnnr THE Tnnnsren

JDXBC

scn0(orne> SLcnotoTaa) .SET uaxrs FLAG
ACT
SET ACYIVE
F

oxex1t

:RETURN FROM INTERRUPT

READ MANUAL INPUT COMMAND

MRMI

000014
000002
000017
10%:
208:

THIS WILL TRANSFER ONLY THE DATA ENTERED ON THE SCREEN TO THE 360
TSTB

)

TSTTYP

;:FRIEND OR 2848 DIRG?

BNE
TST
BNE
CLRB
ggga

MRERD
SRBYTC(DTAB)
MRERD
SSENSE (DTARB)
gggno(orne)

:FRIEND -- TRERT RS READ FULL BUFFER
:ANY DATA LEFT TO TRANSFER?
:BRANCH IF YES TO conrrnus
‘RESET THE SENSE BYTE
523 ngflggngensouzsrzo’

JMP
CLRB

ESEQ
SRDRQ(DTAB)

i NO '"RETURN AN ENDING SEQ RESP DE!CE
CLEAR THE READ REQUEST

MOV
ADD

SOUTB(DTAB).R2
SCURS(DTAB).R2

;COMPUTE' THE BYTE COUN
;END - START

SBUFA(DTAB) ,R2

conpurs THE BYTE COUNT

MOV
DEC

SUB

000012

SRBYTC(DTARB)
;WRITE IN PROGRESS?
108
YES, SEND OUT MORE DATA
sxhar<otna) saurh(orha) :SET UP BUFFER ADDRESS
i
PHYOFF .SBUFA(DTAB) : FOR'MEM MANG - OFFSET FOR PHY ADDREZS
#DISPS2+1 SRBYTC(DTAB) ;SET UP BUFFER FOR MAX SIZE
SBUFA(DTAB), aoxaa OUTPOT BUFFER ADDR TO X
osvco ,R2
cOMPUTE DEVICE ADDRESS

MOVB
MOV
CMP

BISB

MSRMI:

3980 007540 016363 000020 000012

NOTE--BOTH WRITE AND WRITE LINE ADDR COME HERE

BGE
MOV

:
0O7S02

PREPARE TO GET4 BYTES OF DATA FROM 360

RDD

3329

WRITE COMMAND RECEIVED FROM 360

MWRITE: TST
BNE
MOV
SUB
MOV
108:
MOV
MOV

3961 007470 152777 000003 002772
2964
3965

COMMANDS SPECIFICALLY FOR THE MULTIPLEXER CHANNEL

SuB

SMINS(DTAB), saurh(oraa) ;SET UP THE noonsss OF THE DATA
R2

PHYOFF, seurn(orné>

:FOR MEM nnnnc - orrssv FOR PHY RDDRESS

B RESPONDER

MACY1l 30A(10S2)

JO7

O1-FEB-78

09:46

DX11-B ISR (MULTIPLEXER CHANNEL COMANDS)

PRAGE 87

FALL THROUGH TO NORMAL READ BUFFER ROUTINE

REARD COMMAND RECEIVED FROM 360
=

—

PeRree0
WO
O

PREFARE TO SEND 4 BYTES OF DATA TO THE 360

000001

0000ie
0ooo1e
000014
002630

0Ceele
000004

SCMD(DTARB),SLCMD(DTAB)

BNE

MOV
SUB
MOV
MOV
ggg
MOVB
MOV
SEE

108
SEND OUT MORE DAT
sourazorna)
saurh(orha).SET
UP BUFFER noo ESS
PHYOFF . SBUFA(DTAB) :FOR MEM MANAG- OFFSET FOR PHY ADDCRESS
.oxspsz SRBYTC(DTARB) :SET UP TOTAL BYTE COUNT
SBUFA(DYAB), oxan SEND BUFFER ADDR TO DX
bnpur: DEVICE RDDR
o:vcon R2
RE boxcn
;OUTPUT THE DEVICE nooasss
:OUTPUT THE BYTE COUNT -4-4, 9
ggg?TC(DTRB) #4 :SEE IF REMARINING evre COUNT LESS THAN

ngz

gnevrc(orne).na:SET UP BYTE COUNT

MOV

R2, 3DXBC

15T

CLRB
MOVB

105063
110037

Sfivscgggg OF LAST COMMAND FOR DISPLAY CONTROL

MovB

SRBYTC(DTAB)

SSENSE (DTRB)
DEV, DXACT

; eD IN

4
:OUTPUT THE NEW BYTE COUNT -- LT

:CLERR SENSE AND SET DX ACTIVE FLAG
'SET DEVICE ACTIVE FLAG FOR SCF TWARE

BEFORE TRANSMIT IS STARTED SET BUSY FLAG IN DX11 STATUS
TABLE FOR DEVICE

MOV

010002
063702
060202

000137

-conpure ADDRESS OF SPL ENTRY

ggg

oevegu R2

BIS
BISB

#BSY, (R2)
sD¥RD 4 90XCS

:SET UNIT BUSY FLAG
:STRART THE DX READING

ADD

00cseH4

DEV,R2

JMP

srspu R2
DxexIt

noo IN SPW BRSE ADDRESS

MR INDEC-11-DZDXI-B

DXIB.P11

30-JAN-TB

14:19

KO?

MACY1l 30A(10S2)
OI1-FEB-78_ 09:46 PAGE 88
DX11-B ISR (MULTIPLEXER AND SELECTOR CHANNEL COMMANDS)

.SBTTL

DX11-B ISR (MULTIPLEXER AND SELECTOR CHANNEL COMMANDS)

-------------------------------------

PRESENT CONTROL UNIT END TO CHANNEL
007750
0077S6

152763
000434

000040

000003

£ ONUNE: BISB
BR

#CUE . SSTAT(DTAB)

stout

:PUT IN STATUS BYTE

:OUTPUT TO CHANNEL

.
.

SEND THE ATTENTION BIT TO THE 360

8ATTN:

BISB

007760
007766

152763
000430

000200

000003

#ATTN,SSTAT(DTAB)

STOUT

;PUT IN STATUS BYTE

;00TPUT TO THE 360

ERASE THE DISPLAY

éRRSCH: MOV

000010
012532

MOVB

FILLCH, R2

BEQ

012534

000004
000002
000003

TSTB

SOUTB(DTAB)
R4
8DISPSZ,RS
8EBCDSP | R2
TSTTYP

MOV
MOVB

10%:

R2, (RY4)+

BNE

108

DEC

CLRB
MOVB

000000

108

MOVB
CLR

SCURS(DTAB)

;SET UP BEG OF DISPLAY BUFFER
:SET UP COUNTER
:SET BUFFER FILL FOR 2848 DIAG
:1S TEST BEING RUN FOR 2848 RESPONDER

:YES, FILL BUFFER WITH EBCDIC SPACE

INO,

'USE CURRENT FILL CHARACTER

:MOVE FILL CHARACTER TO BUFFER
:DECR COUNTER

:NOT DONE,

DO NEXT CHAR

{RESET THE CURSOR

SSENSE (DTRB)
;CLEAR _SENSE BYTE
#CEDE,SCMD(DTAB)
; CHANGE COMMAND TO PRESENT END SEQ

FALL THROUGH TO PRESENT ENDING STRTUS

PRESENT ENDING STATUS TO CHANNEL

000003

00C014

152763

010042

“s

- A

NEW DXi1-B RESPONDER

BISB

#CE'!DE,SSTRT(DTAB)

PRESENT

STATUS TO CHANNEL

THE STATUS

;SET CH END + DEV END

IS BOTH PUT

IN THE DX11-B SPW TABLE

AND SENT TO THE CHANNEL. CONDITIONS CAN OCCUR WHICH
%gggsEgHE STATUS ENTRY TO THE CHANNEL TC BE

§E? gg
St

LO7

MAINDEC-11-DZDXI-B
NEW DXil1-B RESPONDER
MACY1l
89
connguosw
HANNEL PAGE
szggcrga 9:46
PLéxES RNB O01-FEB-7
(MUL 30A(10S2)
DX11-B ISR
14:19
30-JAN-78
czéx?s.Pxx

:ggg

018823

395 916955

zggg

010072

013702

43%a83

112763

STOUT:

013110

000002

4090

105737

4833
818182 826283
4096 010110 063702

:gg;

010114

10S012

:?33
:{ox

oioixs

iés;;;

3183

010136

000425

012526

los

4183 8181 2 110037 8?3890

:
20%:

:
012777

000002

g&vg

4115
0i0ie0 013702 013130 ooe
4114 gxoxsu osgogs

002322

:RETURN FROM INTERRUPT

DEV'DXACT

:ffg

010204

052777

00000S

002256

BIS

DO
R2, 3DXCA
s-1, 90XBC

#0XRD, 9DXCS

o IR IR

L et T B N

: TRANSFER 1 BYTE
:SET DX ACTIVE

:START TRANSFER

FLAG

EXIT FROM THE DX ISR

4124

010212

012605

OXEXIT: MOV

4126
4127

010216
010220

012603
012602

MOV
MOV

4130

010226

000002

4125 Q010214 012604

5555 Bx nc?xve FESk

MOVB

MOVB
MOV

:{gg

DXEXIT

002276

4157

8 v,okggr

BEV rR2'

002274
177777
013070

:CLEAR SPW STATUS ENTRY

B
RDD

110277
012777
110037

(R2)

Ec5n¢u92"n005§§s
o? SPW STATUS ENTRY
:OFFSET BY BASE OF SPW TABLE

;SET UP ADDRESS OF SENSE BYTE

010166
010172
010200

STSPW, R2

;$£gscron'$unnu§hv sutil B S0 TRt

8SSENSE, 9DXBA
DTAB, aDXBA

ADD

4115
4116

4117

CHTYPE

SENSE COMMAND DESIRED BY 360

SENSCM: MOV

060377

b IFRANEMTT THE STATUS

OUTPUT THE STATUS TO THE CHANNEL
noga
ss;g}torgg%,aoxosp-ogrzngsrg;ga TO CHANNEL

002326

4111

010140
gxoxqs

ESS
ADD

:igg
4110

1518

CLRB

885332

108 '

SUCHK, SSTAT(DTAB) ;YES, THEN SEND ONLY UNIT CHECK
(PROBABLY “BUSYTM)

013114

ooooo;

;OUTPUT DEVICE RDDRESS

CLEAR ANY PENDING STATUS IN SPW STATUS ENTRY

oioioo

o:gcgg.ne

IF MULTIPLEXER CHANNEL

3835

:oqa

£Q

MOVB

000CO3

4089

285

ngv
RTI

(SP)+,R

(gP)+:R§

(SP)+.R3
(S5P)+ R2
(

“+

;

;RESTORE REGISTERS

353 383

MO7

MACY1l 30A(10S2)
O1-FEB-78
MARINDEC-11-DZDXI-B
NEW Dx11-B RESPONDER
DX11-B ISR (UTILITY SUBROUTINES)
30-JAN-78
CZDXIB

;

CALLING SEQUENCE

JSR

vV s

RO =

PC, SUDEV

s e ngfun
R3

= ADDRESS OF DEVICE TABLE

ONLY REGISTER R3 IS MODIFIED BY THIS SUBROUTINE

SUDEV:

MOV
MOV
MOV

SUD10:

SUDEX :

aozvra DTAB
1,-(SP)
DEV,R1

DEC
BEQ
ADD

R1
Sgosx
#2000, DTRB

S?E

égp)+,nx

SuD10

:START AT DEV 1
:SAVE Rl
:DEC DEVICE NUMBER
;oous, EXIT
:INCR’
TG NEXT DEV TABLE

:TRY AGAIN

:RETURN TO CALLER

CLEAR DEVICE STATUS TRBLE
:
R
:

L3R
:

CALLING SEQUENCE
RO = EEV []
o
PC,CDEVST
J8R

e et RE YURN

R3 = ADDRESS OF DEVICE TABLE

ggfiDFOLLOHING TABLE ENTRIES ARE CLERRED

SSTAT

;

SBUFR

RBYTC

LCMD

ONLY REGISTER R3 IS AFFECTED BY THIS SUBROUTINE

LoEvsT: JSR

CLRB

)

CLRB
CLR
CLR
CLRB
RTS

PC, SUDEV

SCMD(DTAB)

SSTAT(DTAB)
SBUFA(DTAB)
SRBYTC(DTAB)
SLCMD(DTAB)
PC

:SET UP ADDR OF DEVICE STAT TABLE

;RESET CURRENT COMMAND ENTRY
:RESET
:RESET
‘RESET
:RESET

DEVICE STATUS ENTRY
CURRENT BUFFER ADDRESS POINTER
REMARINING BYTE COUNT
LAST COMMAND ENTRY
:RETURN TO THE CALLER

CSPWST -- CLEAR SPW STATUS BYTE
CALLING SEQUENCE

£ E RR/K
828

ol ol o
ol
Ll ol ol

a:umv-o.nm\amm.:wmo—o.nm\agm.:wg}-ga

o
o
g

o
o
o
o
o
o
o
g
N
o
o
o
o
o
o
o
ol o

NNNNNCOCOO
OO oo O

o
o
o
o
o
o o
o
LfLr Bl o

000
o
n
£
£
£LNV0O

000000000

@ maom MMOMOMNINNN
ong W= OWwoN

SET UF RDDR OF CEVICE STATUS TRBLE
R

S S
e S
e S S
S S Sy Sy
[P, R

PAGE

DX11-B ISR (UTILITY SUBROUTINES)

.SBTTL

4131
4132

09:4%

........ DTAB (R3) POINTS TO CURRENT DEVICE STATUS TARBLE
........ DEV (RO) CONTARINS CURRENT DEVICE NUMBER

JSR

PC,CSPUST

MAINDEC-11-DZOXI-B

NEW DXi1-B RESPONDER

nncvx* 30A(1052)

NO7

9§-rsa-78

09:46

PAGE 91

:{gg

DX11-BISR (UTILITY SUBROU
B fod it SR RETURN TO CALLER WITH DEVICE STATUS BYTE RESET

3%38

CZDXIB.P11

30-JAN-78 14:19

4191

010310

010546

4193

010316

001007

4192

010312

105763

000016

060505

013110
013114

4194
010320 010005
4195 010322 063705
4196

010326

4197

010330

063705

4193

010336

012605

4198

4200

010334
010340

105015

000207

ALL REGISTERS ARE PRESERVED ACCROSS THIS SUBROUTINE

tspPusT: MoV

TSTB

BNE

xs oevxs

RS, RS

:ADDRESS OF SPW STATUS BYTE

(RS)

:RESET SPW STATUS BYTE

108

DEV,RS
DEVLON,
RS

ADD

STSPW,
RS

CLRB

MOV
RTS

: SAVE Recxsrsn FOR SUBROUTINE USAGE

SONLF (DTAB)

MOV
ADD
ADD

108:

RS, -(SP)

(SP)+,RS

T EX x

LINE?

ce? osvxcs NUMBER AND COMPUTE
:RESTORE REGISTER

SEG
SEG

09:496

PAGE 92

MUXEND -- HANDLE DATR TRANSFER COMPLETIONS FOR MUx

‘leES“%Té) CONTRINS THE ARDDRESS OF THE DEVICE STATUS TABLE
MUXEND
........ ns?um c-gxr ser -- MUX
DATA TRANS DONE
SEL CHAN OR DATA TRANSFER NOT DONE

NO REGISTERS ARE AFFECTED BY THIS SUBROUTINE

: TSTB

oi2see

BNE

CHTYPE

; SELECTOR OR MTIPLEXER
CHANNEL?”

:SELECTOR CHANNEL -- EXIT

MULTIPLEXER CHANNEL
162763
003004

SuUB

000004

BGT

#4,SRBYTC(DTRB)

108

DECR REAMINING BYTE COUN

:IF > 1, DATA TRANSFER NOT COMPLETE YET

DATA TRANSFER COMPLETE ON MUX CHANNEL

062763
000241
00CeC”

CLR
SEC

000014

000004

WMNYr=es oo e

005063
000261
000404

SRBYTC(DTRB)
308

.INSI.RE REMAINING BYTE COUNT ZERC
;SET MUX TRANSFERCOMPLETE FLAG
;GOTO COMMON EXIT

DATA TRANSFER INCOMPLETE

RADD
CLC

RTS

84, SBUFR(DTARB)
PC

BUHP BUFFER_ADDRESS
RESET FLAG_TO INDICRYE MUX CHAN NOT DONE
RETURN TO THE CALLER

rata
o

?l-FEB-?G
MACY]
30R(10S52)
Dx11-B ISR (UTILITY SUBROUTINES)

(ST

-0

X11-B RESPONDER

4:19

B08

HQINOEC 11-0’0%1*3

CZDx1B.Fl11

NEW DXi1-B RESPONDER
4:19

cO8

.SBTTL

THIS ROUTINE IS ENTERED AFTER DATA HAS BEEN
RECEIVED FROM OR WRITTEN TO THE 360.

Sr
s as

DISPLAY CONTROL ROUTINE

WL @t

PC,DISCTL

........ RE YURN

.
THIS SUBROUTINE IS ONLY USED TO COMPLETELY EMULA"
A 2260’S DISPLAY. THIS ALLOWS THIS PROGRAM TO BE USED
WITH THE 2848 RESPONDER DIAGNOSTIC.

g = THE REHRINING BYTE COUNT (SflBYTC) IS USED T0

REC?IVED FROM THE CHANNEL.

/0
ETI
HflRRCTERS REMAINING IN
THE DX BYTE COUNT REGISTER
HE

NO REGISTERS ARE MODIFIED BY THIS SUBROUTINE

REREGERIR

999999999

4253

........ 3‘33?35) POINTS TO CURRENT DEVICE STATUS TABLE

CALL ING

000000000

4.,8

a5u]
MSHé

qasx

DISCTL THEN FORMATS THE DATA TO CONFORM TO
A 2260 DISPLAY SCREEN IF THE 2848 DIAG IS RUN

4239

4243
4ouy
usus
“ZE
4247
Yye4e
4249
4250
4es1
qsse
4253
4254
4255
4256
9257

Dxi1-8 ISR (2260 DISPLAY CONTROL SUBROUTINE)

4231
“a32

2% 8633

(éés8°8§é858v c%rfifif éfiaaSB??fi:,’““ Dx11-B ISR

: ggv

CMPB
BEQ
ggpa
CMPB
MOV

BEG

go 'f P)

;SAVE REGSITERS USED BY SUBROUTINE

INPUT NSD
Ském(oma)-cmni ungPERFOS
NUAL INPUT pnocesoun.s
M nsno
MI
SLS’CmflD(DTflB) ocnsknx9
WAS 1 xn
READ MANAUL INPUT
gucné(ome) .cmeso
uzs iA READ FULL BUFFER COMMAND”
YES. RESET CURSOR ON RERD FULL BUFFER
DRERD

THE COMMAND MUST HAVE BEEN A 360 WRITE

TSTB

BNE

DETERMINE TYPE OF TEST BEING RUN

TSTTYP

DISFRN

;TYPE OF TEST 0 = 2848

;FRIEND

| = FRIEND

FORMAT DISPLAY ALA 22860

MOV

SINBF (DTRB),R1

GET QDDR OF START OF

BNE

208

;NO,

CMPB

WRITE LINE ACDRESS COMMAND

NORMAL WRITE

FIRST BYTE OF DATA BLOCK

INC

MOVE
BIC

INPUT

SLCMD(DTRB),ICHN*LQ ;WRELAST CMD A WRITE LINE RDDRESS?

SRBYTC(DTAB)

(R1)+, R2
2177780, R2

IS CURSOR LINE RDDRESS

xuca BYTE COUNT

:GET LINE NUMBER
:GET ONLY LINE NUMBER

4288
4289

%4290
4291
4292
4293
4294
4295

4296
4297
42
42

010474

00S063

CLR

000004

Q10S00
010S02
810504
10812
010S14

005702
00140S
882753
5302
00077

523
ADD

0000s0

DEC
BR

CURS = LINE ® » LINESIZE

OEAR LINE COUNT

108

MAN

FER

ANY courxcunnrx
A 2260 DISPLAY
0 EMULATE
N

THE 0 CrmRACTERSaméI8 8680, Tofs Fo 81

oiosaa

06630;

8888?4

4309

810536

00S263

000014

4311
4312
4313

010544
010SS0
010554

0M27
6&
2700

177400
011754
177400

RECE1I

AND THEN BRACK TO EBCDIC.

10842

010560
010564
010£70
010574
010600

010802

112100

162700
116012
63
121227
001015

00S002
0000S0

010616
010622

S063
062762

0000CH
0000SO

010&i4

010630
010832

003373

005302
001373

4332

;COMPUTE DISPLAY RDDR

I:és

5avrc TRB)

;

SUB

MOVB

SCURS(D AB) ' R2
EC(oTaeSooxspégox R#L CHARS PROCESSED?

*NT THE BYTE COUNT

:SCALE INTO ASCII TRBLE RANGE

INC

nrotra(ROJ (R2) :COMPLETE
FOLDING BY RETRANSLATING TO EBCDIC
INCR CURSOR PTR

BNE

608

CMPB

‘

00S202
162763

SOUTB(DTRB) R2

o
g
C
ao
EII
NI
HOR
TIETY
B
MOVB
Tsokg) RO :STRIP
‘F?k?unsnc?es
INTO
ASCII
CHARACTER
SIGN EXTENSION BITS, IF ANY SET
01
BIC

D40
012354
000004
000025

010604
010606

MOV

RDD
S"P

s ws ar o

438e 01825 §

4339
4340
4341
4342

:30?

433S
4336
4337
4238

PAGE 94

;oone MORE DATA INTO DISPLAY BUF
ggs
sLINS2Z, SCURS(DTRG) incn TO NEXT LINE

Ri? IVED
THE
OF E cur B

Hggg 010516 016302 900010

4334

0S:46

MOVE DATA RECEIVED INTO oxvanv

:303

4332

SCURS (DTAB)

COMPUTE CURSOR FDDRESS

4383

4314
4315
43le
43.,
4318
4319
4320
4321
4322
4323
4324
4325
4326
4327
4328
4329
4330
4331

O0l1-FEB-78_

Dx11-B ISF (2260 DISPLAY CONTROL SUBROUTINE)

:300

4310

D08

SCURS (DTAB)

(R2), SNEWLNE

:WRS A NEW LINE SPECIFIED”

NEW LINE COMMAND - ADVANCE CURSOR TO BEG OF MEW LINE
URSOR = (CURSOR/LINESIZE + 1) # LINESIZE.

CLR
INC

R2
R2

:CLEAR LINE CTR
INCR LINE CTR

BGT
CLR

408
SCURS (DTAB)

KEEP DIVIDING
CLEAR CURSOR

DEC
BNE

R2
50%

SUB
ADD

sLINSZ, SCURS(oTné)

sLINSZ, SCURS (DTAB)

CHECK FOR WRAP AROUND
028327

002728
00S0&3
000722

000004

CMP

000004

SER

BLY

SCURS(DTAB), DISPSZ ; CURSOR OVERFLOW DISPLAY BUFFER?

208

gggns<oraa)

FRIEND TEST

IF SEPARATE

; CUR AOR OK, PROCESS NEXT CHAR

' OVERFLOW, '"RESTART CURSOR AT POS O

1,0 BUFFERS DON'T COPY

NPT TO OUTPUT BUFFER

(ST

CZDXI1B.P
4287

NEW oxqua RESPONDER

30-JAN-TB 1M4:

30A(10S2)

HQINOEC ll DZDXI-B

MAC Y1l

4343

4344

010652

ugus 018255

30-JAN-78 14:19
105737

1026

012533

wg:g 010670 812700 600360
¢

:ggg

4352

4353
4354

010874

010676
010700

012122

005300
00137S

MACYll 30A(10S2)

O01-FEB-78 09:46 PAGE 35
SUBROUTINE)
DXx11-B ISR (2260 DISPLAY CONTROL
:

B1SFRN: TSTB

MOV

:ggg

005063
000411

000004

4364
436S

010716
010720
010724
010730

016301

005301
112711
166301
010162

4377
437
4379

333?

4382
438¢

A RERD nauunL

INPUT WARS PERFORMED

MUST BE DELETED FROM THE SCREEN

:
:

000004

:RESET THE CURSOR
‘AND PREPARE T0O EXIT

TO EMULATE THE 2260 SCREEN THE START OF MANUAL INPUT CHARCATER

MOV

000100
000010

SCURS(DTARB)
DISCEX

DEC
MOVB
SuUB
MOV
SHORT

snxnsxoraa) Rl

R1
SsEBCOSP, (R1)
SOUTB(DYAB) ,R1
R1,SCURS(DTAB)
READ

MANUAL

;GET THE STARTING ADDRESS

:DECREMENT TO THE SMI CHAR
:BLANK OUT THE CHARACTER
:AND COMPUTE THE CURSOR POSITION

INPUT

WAS PERFORMED

NC ACTION REQUIRED BY DISPLAY CONTROL RCUTINE

BsrmI .

010734

4385

:ggg

4388

010734

012602

439]

010742

000207

4338

Patpans T0 RETURN TO CALLER

THE CURSOR MUST BE RESET TO THE BEGINNING OF THE SCREEN

bRMI:

4384

4389
4390

000020

DISCEX

nae WE DONE”
CONTINUE COPY

CLR
BR

;

010712

: INPUT TO OUTPUT

BDREAC:

:ggg

4372
4373
4374
:g;g

(R1)+,(R2)+

RO
108

A READ FULL BUFFER WARS PERFORMED

:
:

4368

§§nnsrsgu ng INPUT BUFFER ?o THE OUTPUT BUFFER

4366
4367

4371

DEC
BNE

Pnnnre /0 BUFFERS?
E
‘ ogv INPUT 10 ouer'

?sgs

{os:

010704
010710

MOV

xoaur
DISCEX

PERFORM COPY

4357

4361
:ggg

BNE

:ggg 010702 000414
4358

EOS

(010736
010740

012601
012&00

RESTORE REGISTERS AND RETURN TO CALLER

B1SCEX:

MOV

(SP)+,R2

RTS

MOV
MOV

(SP)+.R1
(5P)+ RO

:RESTORE SAVED REGISTERS
ETURN

THE

"Brr TELeTvee cconsoLE) INPUT TSR

CALLER

os
:ggg

:
:

TELETYPE INPUT HANDLER (ISR)
CONTROL PRSSES HERE ON A TELETYPE INPUT INTERRUPT

4336

DATA IS INPUT FROM THE CONTRCL CONSOLE AND STORED INTO

52?%P11

NEW DXil1-B RESPONDER

C-11-DZDXI-B

30-JAN-T8

14:19

MACY
30A(10%2)
OLE) INPUT
TELETYPE (C

FO8

THE TELETYPE INPUT BUFFER (TBUF).

WHEN ALL THE DRTA IS

Ng t NSThEn
BY
XECUTED

ENTERED, THE OPERATOR HITS A C/R TO
ac1x¢s FLAG S SF- AND THE C

PAGE 9%

09:46

01-FEB-78
ISR

THE F' OWING CONTROL FUNCTIONS ARE AVAILABLE FOR
CONVENIENCE.

OPERAT

LAST CHARAC
BELETE
BGCKSLRSH
;HIET
L) : DELETE LQST L INE

P-

B
S

)

)
=

pur

LIMETER

B
S
G

IPFUT
C&kENT

INE
MPORARILY STOP OUYP01 TO CONSOLE

NOTE

-- A _CONTROL
MUST BE ISSUED
RE SUME CONSOLE OUTPUT

ARFTER A CONTROL S TO

:SAVE REGISTERS

JTkB, RO
.177600 RO
TP

:GET TELE CHARACTER
xusuns axr RSCII
:BUFFER

§80§H NUVEN g

gg.CTL F

ggflTROL -P ?

RSTART
zg,-crL.s

vss ALLOW OPERATOR TO REENTER ALL PARAMETERS
NO
ngLTx
TEMPORALILY STOP CONSCLE OUTPUT?

0i3073

TTYSTP

vss SET FLAG TO STOP TTY ourpur

000021

T8‘ICTL.O

conrngk-?

013073
013071

PCTR

ol12se

PC,PROUT

0oooCc3

88-8x 8na 82
O

N Yelgla 33
8?8\)\1\) FRAQEEE #RE SRECoaa

RO, -(SP)

R1.-(SP)

1008

RESUME CONSOLE OUTPUT?

vss RESET CONSOLE STOP FLAG

100$

CHECK TO INSURE ourpur T0 RESUME

NO OUTPUT -- EXIT

RESTART CONSOLE OUTPUT

1008
ggtncrL £

AND' EXIT FROM THE INTERRUPT
cgnnano ABORT -- CTL C?

TCMACT

:1SA COMMAND ACTIVE”

TCMDAB
'58%‘-“‘

YES, SET RBORT FLAG
EE} UP BUFFER POINTER

TCMACT

TELE CMD cuansanv ACTIVE?

RO, (R1)+
ggsocn

srohs CHAR INTO BUFFER - INC PTR
LINE DELLIMETER -- C/R?

8 TBUF ,R1
TcMact

nsser BUFFER PTR
SET COMMAND RCTIVE FLAG
YES
oon? PRINT THE LINE DELIMITER

100%

0c0o17?7

AND EXIT FROM INTERRUPT

TTYSTP

-0

R S

e A

e e e Ba Pt Bt Bt Bt s Bt Bt Bt Bt Bt Bt Bt B Bt Ba e e B
e
OO0
e
oCL£O0L£0L
oo

e S

e B 0= = ) O O 000000

OOO000000000000000000000000000000000

OUMPS
D
-- FOR
COMMAND
DE ETE LRST CHRRQCTER

100$
RO..RUBOUT

YES,

TREAT AS A DELETE LAST LINE

IGNORE CHARACTER

A RUBOUT?

[ote
R

NEW Dxi1-B RESPONDER

-DZ0X1-B

M3IINDEC-11-DZDXI-B

C20x1B.P11

NEW Dxi}-B RESPONDER

30-JAN-78 14:19

4926? Ol1i%e
::
811153 012700
508
3i80000137
1598§ 000134
qqgg
4460 311133
011144 60473 011366
446l 011150 020027 000137
N

4462

:3?3
=

011159

O}fiss

001004

xauiw;

MACY1! 30R(1052)

408%:
508 :

012640

708:

012740

80§ :

000134

30§

0i2742

1008%:

goxgo«
012701

4470
4471
Y472

011204
011210
011212

020127
001003
012700

4469
4473

*H;H

4475
4476
<477

0il1200
011216

004737

000740

011220

010137

011226

012600

Cl1224
0ii23C

0i2el1

000002

011330

HOY
g::s
MOVB
JSR
CMP

BeR
gg*bc?L.u
#° \.RO
PC,PCHAR
RO s+

c::a

i(gl%efiénx'
I

BNE

608 :

811172
011174

01-FEB-78

TELETYPE (CONSOLE) INPUT ISR

4465
811129 889~ 3
4466 011166 020027 000134
Y467
w468

GO8

‘e

60%

SLE
CMP

763
RO, #""

JSR

PC,CRLF

BNE
MOV

CHP
BNE
MOV

80$
8TBUF Rl

09:46

PAGE 37

LETE_LAST CHARACTER
‘?OP TREAT
SNTROL-U’ ?SELE?E SREN¥ INPUT LINE
Y

rSgnr gEOELETE LAST LINE (BA ¥SLASH.
scnb THE CHARCTER BACK
DELETE LAST cunn -- BACK ARROW”
ss DECR POINTER avF -

YEE
“Sssgfi ?"°aES9 "f B
DELETE CUR LINE -- aacx SLASH?

’

NO
'YES, RESET BUFFER PTR

:NEW LINE FOR NEW COMMAND

R1. #TBUFE
1008
8\ RO

:WERE anxrs EXCEEDED”
NOPE EXIT
:THEY WERE -- TRERT RS A LINE RBORT

MOV

RI,TPTR

:SAVE BUFFER PTR

MOV

(SP)+.RO

MOV
RTI

308

(SP)+ Rl

‘RESTORE REGISTERS + EXIT

ISR

(CONSOLE)

OUTPUT

.SBTTL

4480

TELETYPE OUTPUT DRIVER (ISR)

OL£non
lle-&:gtJ

“=ZZ

bobobapara

448S
4-CE
4487

et
o pee e

ISR

=-- PRINT

CONTROL PASSES HERE ON A TELE OUT INTERRUPT
00000

4481
HHE
EEE]

PAGE 38

7576
BEG

APT

108

PC,PROUT

:CLEAR PRINT;R g Sy FLAG
anwr
none DATA
PANY
iNO,
EXIT
.cu#pur ANOTHER CHAR

OO0

09:46

01-FEB-78

Yy
ET I

TELETYPE

HO8

wWww

30-JAN-T8 i4:19

CZDOXIB.FPLI

MACY1l 30R(10S2)
TELETYPE (CONSOLE) OUTPUT

lalal

NEW Dxil-B RESPONDER

o
mm
(S

MAINDEC-11-DZDxI-B

.SBTTL

<483
mean

4490

4491

wn
“s

BEING INITIRTED.

IF_TELET:PE OUTPUT IS NOT CURRENTLY IN PROGRESS
A CHARACTER IS SENT TO THE TERMINAL
THE PRINTER BUSY FLAG IS SET AND

2737
0207

0i024e
0i270e
004737
gl2e0e
000207

013082

1STB

PIUFL

1578

TTYSTP

BNE

013073

BNE

0011Se

012744

013046

INCB
DECB
MOVE
INC
gnz

013046
20%:
()os
®s 0t @s as as 00 @s ws

Ll = L

(:)'-‘253’%:(:)'-(:l(:)iE;(:)gégt:)
Qo

e Bt P
e Bt et

BRUCSTRRRRAN
(l‘tiili‘t:ltigé;il\li;:-l:(:):‘zl\l

e
T

e et
e
P

bt e

NO REGSISTERS ARE MODIFIED BY THIS SUBROUTINE

0130s2
013571
001544
013046
013046

RLF:

MOV
RTS

208

20%

;1S

IT ausvv

:YES,

EXIT

uns CONSOLE OUTPUT BEEN SUSPENCED”
YES, RETURN IMMEDIATELY TO CALLER

PIUFL
PCTR
JPFPTR, 3TPB
PFPTR

no "SET BUSY FLAG
:DECR CHAR COUNTER
:QUTPUT NEXT CHAR
xncn PRINT FETCH POINTER

8PBFS,PFPTR

vgs nesrons TO START OF BUFFER

srprn,opars
PC

M
xnc ? WRAP AROUND?

:RETURN TC CALLER

A CR/LF

CALLING ssouencs
JSR

........ RE?unu

NO REGISTERS ARE MODIFIED BY THIS SUBROUTINE
MOV

-(SP)

MOV

.xbsaxs R2

MOV
RTS

<sb)¢ R2

JSR

PC . PRINt2

PRINT 2 CHARACTERS ON

CALLING _SEQUENCE

snvs THE R2 REGISTER

:D0A

:PRIN

RESTORE THE R2 REGISTER
:RETURN TO THE CALLER

THE

TTY

...... Re gg?g?éNS DATA TO BE PRINTED

(2 BYTES)

...... RE YURN
NO REGISTERS ARE MODIFIED BY THIS SUBROUTINE

v iti

RUL

O
0

........ RE tURN

IF TELETYPE OUTPUT IS CURRENTLY IN PROGRESS OR HAS BEEN SUSPENDED Br &
CONTROL IS RE URNED IMMEDIATELY WITH NO ACTION

000000000000

4506

IF NOT BUSY

CALLING SEOUENCE
PC,PROUT
JSR

4497
B
]
4500
4501
4502
4503
4504
4508

PAGE 933

TELETYPE OUTPUT HANDLING SUBROUTINES

SEND DARTA TO PRINTER,

4492
N3
4494
4495
445

mm
DTS

108

MACY1l 30R(10S2)
O01-FEB-78_
03:46
M3IINDEC-11 =020 X]-8
NEW Dxi1-B RESPONDER
TELETYPE QUTPUT HANDLING SUBROUJTINES
30-JAN-TB8 14:19
CZOXIE.Fll

PRINT2:

MOV

R2,P2BF

Rl MESG

JSR

_WORD

P2SF

.WORD
.BYTE

O
377,377

RTS

CHARACTER

CALLING SEQUENCE

........ RO CO:TRINS THE CHARACTER TO BE PRINTED
PC, PCHAR

........ RETURN WITH THE DRTA IN THE PRINT BUFFER
~NO
nry

[

NO REGISTERS ARE MODIFIED BY THIS SUBROUTINE
MOVB

JSR

_WORD

RTS

.BYTE

RO,P1BF

R1 MESG

PI1BF

0,377

;RETURN TO THE CALLER

(&]w)

PAGE 100

(ST

JO8

MACY1l 30R(1062)
O1-FEB-78
09:46
TELETYPE OUTPLJT HANDLING SUBROUTINES

uwn

B RESPONDER

MIINDEC

PAGE 101

PRMESG PRINT A CHARACTER STRING
CALLING SEQ

........ RE CONTRINS THE STARTING ADDRESS OF THE MESSAGE
PRMESG

JSR

Sfeeasis
SREERDSTRIRINER?

£t

e
B

s Pt Bt

s B
bm

ot ot Pt Pt Bt ot Pt

e e be e n B
b

e P
s Pt

e e bt B
m
B

5t Pt Bt

O000000000000000000

NCTE -- MESSAGE MUST BE TERMINATED BY A 377

NO REGISTERS RRE MODIFIED BY THIS SUBROUTINE
; SAVE REGS
Re,-(SP
MOV

MOV
MOV

R3. -(sp)
PP#TR F3

;GET PRINT QUTPUT POINTER

MOV
JER
CFPB
BEG
BR
MCV
MOV

PCTR
SS;'PBFE
#PBFS, R3
PC,PROUT
Pctn PMAX
308
108
na PPPTR
(S5P)+,R3

:END or nsssnce
vzs
hovs NEXT CHAR TO PRINT BUFFER
xncn CHAR COUNTER
as END OF BUFFER?
:YES, WRAP AROUND TO BEG OF BUFFER
:CAN'WE START PRINT
:IS PRINT BUFFER FULL”
‘YES, WAIT TILL noon AVAILABLE
:GET NEXT CHAR
‘EXIT, RESTORE PUT PTR
:RESTORE REGS

RT3

:RETURN TO THE CALLER

CMP3
BEQ

MOY/24

INCE
gne

MOV

(R2), 8377
408

(R2)+ (R3)+

(SP)+,RE

MESG -- PRINT A CHARACTER STRING ON THE SYSTEM CONSOLE
CALLING SEQUENCE
RI,MESG
JSp

"WORD

ADDRESS OF START OF MESSAGE

RE TURN

NOTE -- MESSRGE MUST BE TERMINRTED BY A 377

Dg\l\l\l
oo
Ln

(LT
o ¥ o

[y
—

00000

NO REGISTERS ARE MODIFIED BY THIS SUBROUTINE
MOV

MOV
JSR
MOV

RTS

R2,-(SP)

(R1)+,R2
PC,PRMESG
(s¢)+ R2

:SAVE REGISTER

‘GET ADDRESS OF MESSAGE ANC BUMP FOR RETURN
:MORE MESSAGE PROCESSING
‘RESTORE SOILED REGISTER
'RETURN TO THE CALLER

INMES PRINT A CHARACTER STRING
CALLING SEOUENCE
MES
JoR

. WORD nooaéss OF MESSAGE

09:4%&

rop
e

01-FEB-78_

TELETYPE OUTPUT HANDL ING SUBROUTINES

14:19

KO8

MIINDEC-11-DZDXI-B
30-JAN-78
CZDXIB.FP11

MACY11l 30AR(10S2)

NEW DX11-B RESPONDER

B RESPONDER

MACY1l 30A(10S2)

PBs

CcLroOoL£fNLO
UUUNN’-”?

e
et Pt

e Pt B
s
e

e et Pt Pt
Bt

00000000

$e B

8888%% 013130

LOS

O -FE?;ZE_ 09:46

TELETYPE OUTPUT HANDLING SUBROJ
Se @s We an ws @0 ws ws @

(1)
=

MIINDEC-11-DZDXI-B
30-JAN-7
CZDX1B.Pl11

PRAGE

102

RETURN

INMES IS U?ED FCR ROUTINE? AT THE ISR bEVSL AND EOES
VERLAYED IN
NOT CHECK TO SEE IF DATA WILL
TELEBUFFER

NOTE -- THE MESSAGE MUST BE TERMINARTED BY A 377

NO REGISTERS ARE MODIFIED BY THIS SUBROUTINE
MOV
M

R2,-(SP)

SAVE

PMAX

?gfi,m’;gx

:CHERT,

PC, PRMESG
(SP)+, PMAX

;USE STANDARD MESSAGE PROCESSOR
:RESTORE PRINT MAX

:RETURN TO CALLER

PMAX, - (SP)
+

(SP)+,R2

;nfl% MAKE VERY LARGE

MIINDEC-11-DZDXI-B

CZDX1B.P11

NEW Dxi1-B RESPONDER

30-JAN-TB 14:19

4eH42
4643

MACY11l 30A(10S2)

MO8

O1-FEB-78

09:4&

PAGE 103

UTILITY SUBROUTINES (CONVERT OCTAL OR HEX TO BIMARY)
.SBTTL

UTILITY SUBROUTINES (CONVERT OCTAL OR HEX TO BINRRY)

COTB -- CONVERT ASCII OCTAL TO BINARY (COTB®

3239

??%%?.& SE Esnssnooness OF FIRST CHRRCTER TO BE CONVERTED

UPON RETURN THE ;O%LOHING Rccéargg§ gILLS$O?lféNCHQR

4648

gggg
:gsx

4525

;
;

4654

4655

:23? 011540 005003
4658
4659

011542
011544

005005
112204

é.,%
thggs
4663
011560

410

4660

oiisws

120427

4B6Y

oifissa

uqe;ou

467

011572

303

471

011602

000207

4666 811?98 882383

4ees 0ii27e DBaoa0e
4633 911208
00o%e:

tote:
000067

108:

000060

177770

208%:

JSR

PC LOTB

i RETURN

Rs
z gsunnY RESUL o} 5 bfl
RY = (BITS 0-7) FIRST Non-ocrnL CHARACTER
=

CLR

CLR
MOVB

cgga

RS = NUMBER OF CHARACTERS CONVERTED

RS
(R2)+,RY

Rgt' »

Enpa
BLT

S n'o

ASL

géf

aé????O,RH

RSL

M
ie
RTS

P
138
PC

;csr NEXT CHAR

‘55 Eg T?»

'CHAR
LTsxxr07
vss

;T
NEEEUL§ SYTS

?R"a‘%‘m “cssnST
NE
nsrunn TO anLG

SEG 8133

SEG

1%
Xil-B
~JAN-78 14:19

g MEH Duslq® RESPONOE

NO8

01-FEB-78__09:46_
MACY11
30R(10S 2)
UTILITY SUBROUTINES ( ONVER

PAGE 104

T OCTAL OR HEX TO BINARY)

CHTB -- CONVERT ASCII HEX TO BINARY

L .R2 PC,CHTB
zogEgDRESS OF FIRST CHARCTER TO BE CONVERTED

CALLING_SEQUENC

JSR

UPON RETURN

;

b RE YURN

R2 = NEXT CHAR POSITION NOT CONVERTED

R3 = BINARY RESULT

oonNooc

ERORESEER4548 -—.—-—-SQ
oo

J
O
D
e

oo
N
o
oo
L

) S
e

W
e

U U
e e S

Y NN
e

NG WG
e

I W U
T =y e

0000000000000000000000

:
:

RY = (BITS 0-7) FIRST NON HEY CHARACTER
RS = NUMBER OF CHARACTERS CONVERTED

005003

HTB:

CLR

112204

108:

MOVB

005005

162704

100422
020427

002410
162704

020427

002012
020427
002407
006303

006303
303
006303

060403
005205
000752
005302
112204

000207

CLR

R3
RS

(R2)+,RY

;GET THE FIRST CHARACTER

000012

BMI
CMP

308
RY, #10.

INOT A VALID HEX CHAR
:1S RESULT STILL GT 107

000007

SuB

87 ,RY

000060

SuB

BLT

000020

000012

208:

30%:

#’0,R%

208

CMP

R4’ #16.

ASL
ASL
ASL

R3
R3
R3

RTS

BGE
CMP
BLT
ASL
ADD
INC
BR
DEC
MOVB

308
RY, 810
308

R4,R3
RS
108
R2
(R2)+,R4

:SCALE RELATIVE TO ASCII ZERO

:YES, WE MAVE A VALID HEX DIGIT
;1S IT A LETTER?

iNO, INVALID CHAR
:AND GT 10
:NO, ILLEGAL C
:MAKE ROOM FOR NEW ENTRY
; INSERT NEW ENTRY
:INCR CHAR COUNT
*AND CONVERT NEXT CHAR
:GET THE ILLEGAL CHARCTER
:AND PUT IT RY

:ITS TIME TO RETURN TO THE CALLER

SEC 0104

SEG 0104

.SBTTL

09:46

PRGE 105

PROCESSOR ERROR TRAF HANDLERS

TRAP CUT ROUTINES

MEMORY TIME OUT ROUTINE

ouTrt

HE PRINT ROUTINE

®=

IPHTO R2

MOV

own

012702
000404

OUT ROUTINE

CLR

‘J‘J‘J*Ja::f:f:f‘i‘Q
ififf’flggnna~nncnfiig

Bt Pt B
s Bt Bt Pt B
Pt Bt

£
~N
n
~N

Bt Pt Bt Pt Bt ot Pt Bt P

0000000000

MEMORY MANARGEMENT TRAP OUT ROUTINE

MMSRO
sPMMERR, R 1

MOV
RESET
CLRB

PIUFL

JSR

PC, PRNESG

BNE
HALT

1os

CLR

1578

IMP

PSW

PCIR

START

:CLEAR THE MEMORY MANAGEMENT BIT

:SET UP RDORES OF ERRNR MESSAGE
DEVICES
:CLEAR ALL
:CLEAR PRINT IN USE FLAG

:PRINT THE ERROR MESSAGE

:1S PRINTING DONE”
:YES,

HALT

e
A |
nL
L
oL

aleles)

[apa——

£
~
W
£

INVALID UNIBUS ADDRESS TRAP

CMP
000137

CLR

Ine

(SP)+, (SP)+

: POP rue PUSH STACK

NEWPRM

'ASK OPERATOR TO REENTER THE DATA

PSii

:LOWER PROCESSOR STATUS TO ALLOW INTERRUPTS TO CUM

:CLEAR_THE PRUCESSOR STATUS WORD

)

Ol-FEB-78

PROCESSOR ERROR
T AP HANDLERS

B09

NEW Dh{;fl RESPONDER

30-JAnN-T8

30&(1053'

AN
mm
Vo

HJXK%C
11 -DIDXI-8

MaC Yil

4Tyl

.SBTTL

474

;

4745

3233
4746

9748

4750

811784 ouowso owiso2 o42sOM
011752

043508

012010

024452

056473

S 1QIR

033466

758
wggé giéoaa
4754

4755

4759

012014

oiauua

7wg§

oausgo

§§2? ¥

027136

4765

4766

4767

012102

D121l

012114

4768
4763

012122
012130

0S4127

4771

0l2142

033466

4772
4773

121

4774

012150
012154
D2l

4777
4778
4779
4780
4781

023500
040440

*~0123456789:83'="

:30 - 3F

LASCI1 / ABCDEFGHI?.<(4!/

.40 - YF

guz1is

LASCII

“8JKLMNOPQR+$#);
1"

;50 - SF
;60 - &F

ligl
4

052123

022l

055131

026042

053125

JASCII

*-/STUVWXYZ",%[>?"

032464

LASCII

"0123456789:83 =\

;70 - 7F

042504

LASCII

.80

047115

LASCII

“BJKLMNOPQR+$#);
1"

.90 - 9F

0s3ias
026042

JRSCII

'-/STUVWXYZ" ,%[>?’

:A0

032464

LASCII

“0123456789:
83" =\"

:B0 - BF

042504

.ASCII

~ ABCDEFGHIt.<(4!/

:C0 - CF

gu7iis

LASCII

“BJKLMNOPGR+$#);
1"

.00 - DF

053125

JRSCII

' -/STUVHXYZ", %l>?"

:E0 - EF

032464

LASCII

"D123456789:83'=."

;#0

470

021472

0l22b2
012270

043506
024074

044510
027453

027136

1121

022137

113

031462
041502

4790

012310

024482

056473

4792
4793
4794
4795
479

Q012322
012330
012334
(012342
012350

0S4127
055445
030460
032466
023500

055131
037476
031462
034470
056075

4791

012314

027465

:00 - OF

LASCII

fRR 032464

4786
4787

Qige7y

LASCII ~ ABCDEFGHI?.((+!/

021472

4789

¢ecoTs:

034470

034470
056075

4788

NGTE -- BACKARROW IS USED TO DENOTE A NEWLINE

.20 - 2F

033466
023500

012254

'-/STUVMXYZTM,%[>?"*

0l2242
012250

4785

EBCOIC TQO8CHAaCPOF
o BEVERE I INpI#® Rro m &4 cHaracTER 327

JASCII

4783
4784

030460

0S83125

0S1121
056473
D052ied
055131
037476

012234

CODE CONVERSION TABLES

123

0S0117
0249452
Q27uss
0S4127
0SS445

4782

PRGE 106

10 - IF

012202
012210
Qigely
0l2222
012230

0
QUS04

09:46

JASCII “BJKLMeOPGR+$»);
1"

833593

gi2170
012174

O01-FEB-78

75}
832343

056075
041502
044510

4775
4776

co9

oi4i

4761 815833
83?253 042504
3;23 812070 g;w07u oeouég 4764

10§2)

052123

027136

022137

026042

021472

ABCDEFGHIt.<(4!/

cooe convensin PaslPE
Y

[ 8

W Dx11-B RESPONDER

C-11-DZDXI-

Ll’a

P11 - 30-Jan-c8 1u:ie
CIONTB

M3IINDEC-11-DZDXI-B NEW Dxi1-B RESPONDER
MACY1l 30A(1052)
CODE CONVERSION TRBLES
30-JAN-78 14:19
C2Dx1B.P11
4797

u;gg

12354

i
4803 012364

3
115

494807

5&3
363

:eo«

§{aagg

4808

012377
012402

4809

116

15374

gxauow

981, Oisaiz
481 gxawxw
9814 Oisusz
4815 glewaq
481
4817

12427
012432

4819
qgso
4821

012437
81 Y442
012444

4818

4822

4823

:ggg

012434

012447

115,135,134,116,153,140,113,
141 ;250-257

362
365

LBYTE

360,361,362,
263, 364, 365, 366, 367 ;260-267

371

178

.BYTE

370.371,172,136,114,176,
156, 157 ;270-277

.BYTE

174,301,302,
303, 304, 305, 306,307 ;300-307

.BYTE

310,311,32:,322,323,324,325,326 ;310-317

.BYTE

327,330,331,342,
343, 344, 345, 346

.BYTE

2
347,3S0,3S1,155,177,137,112,025 ;330-33°

.SBTTL

PROGRAM CONSTANTS AND VARIABLES

140

1®
302
8
321

327

330

331

112

:ggg

23
326

343
gq
S
17?7

0es

324

344
351

137

4828

012454

177560

tus:

4830

012460

177564

TPS:

4829

3S§é

ASCII TO EBCDIC CONVERSION TABLE

JBYTE

15?

143
301
37
11

155

012452

0124566

012462

177562

177S6e

PAGE 107

B
134

B1385

1%
174
398
310
3492
gq
Y4

09:46

100,117,152,173,133,154,120,175 ;240-247

152

366

322
325

OL-FEB-78

AToETB: .BYTE

117

364
367

370

D09

;320,327

CONSOLE UNIBUS ADDRESS CONSTANTS
.WORD

177560

; KEYBOARD CONTROL srnrus REGISTER

.WORD

177S64

anursn STATUS/CONTROL REGISTER

TKB:

.WORD

TPB:

-WORD

1775g2

177586

KEYBOARD DATA BUFFER

:PRINTER DATA BUFFER

4833
R

4835

:ggg

4838

012464

000000

DX REGISTERS - ADDRESS GENERATED BY INITIALIZATION

OxDS:

.WORD

:DEVICE STATUS --

4890
484 ] 012438
31537 909900
#-8888

DXCS:
X05:

[HORD
.WOR

c°2'?2"f
9 ?8&‘?#‘8‘%2%32
TUS e

4843
4844

812w7s
012500

000000
000000

DXBC:
DxMO:

.WORD
.WORD

O
O

BYTE COUNT
'MAINTANCE OUT

4847

012506

000000

DXND

WORC

4842

484S
4846

4848
4843
48S0

012474

000000

012502
012504

000000
000000

812510
Q0l2€12
012514

000000
000000
000000

DXBA:

DxMI:
DXCB

DXESi:
DXMOB:
D¥ES2:

.WORD

.WORD
WORD

.WORD
.WORD
.WORD

O
O

O
O
O

BUS noon s

nnxurnucs IN
:CONTROL
BITS

:NPR DATA

:EXTRA SIGNALS
'BUFFERED BUS ouT
'EXTRA SIGNALS

PAGE 108

0000000000

. WORD

: WORD

wWwww
nrLwh

[

Y W

00000000000

CONF IGURATION CONSTANTS

EST

SEPERRTE 1/0

FILL CHARACTE

(EXTRA

SYSTEM PUSH STACK
=.+100

SYSTEM VARIRBLES
THE FOLLOWING VARIARBELES ARE RESET UPON STRART-UP

00
000000000 00000000

[=]
0
o

b =

NNNN

BR
oL o—»v—no—t—g»—o—o—u—»—v—
UNHOVEI

o
0
(=

.WORD

; DUMMY

;START OF TELETYPE INPUT BUFFER

;ENC_OF TELETYPE INPUT BUFFER

:TELE _IN
PTR
iSTART OF PRINT BUFFER

;END OF PRINT BUFFER

:PRINT FETCH

PRINT PUT PR’

PRINTER IN USE FLAG
:
TELE COMMAND ACTIVE FLAG g = NON-ACT
TEL COMMAND ABORT I = ABORT
LINE CTR - CHARS - LINE

uonx Loc

WORK LOC

TUHBLE TABLE PTR

iBEG OF TUMBLE TRBLE
STQRT OF DEVICE TABLES
STOP FLAG

HIGHEST DEV s 1-8
DXRCYX VE F

;COMMAND CHRIN FLAG
:DEV ®& IN MPXR EXEC

(SIS
w(w

09:46

O1-FEB-78

PROGRAM CONSTQNTS AND VARIABLES

OO0

EOS

4:19

1 30A(10%2)

W DX11-B RESPONDER

M3IINDEC-11-DZDX1] g
CZDXIB.P11

4309
4910
4311

013100

4916
4917

013114
013116

4S21

013126

013102

NEW DXxi1-B RESPONDER

30-JAN-78 14:19

013076
0000
0000

MACY1 1l goa<xosa)

FOS

01-FEB-78

PROGRAM CONSTANTS AND VARIABLES

SELDEV
VBUFAR:

=
.WORD
.WORD

MDEV

STSPW:
DSTOFF:

.WORD
.WORD

O
O

VEND:

WORD

PBUFR:

09:96

PAGE 109

:DEV ® IN SEL EXEC
:VIRTUAL BUFF RDOR- IN

;PHY?ICRL BUFF RDDR - IN

SEC
210%
$E5 0109
,000°'S

,000°S

4315
21310 800000
8131?8
4914
4918 013112 ggoooo

COEV:
(MORD
.WORD
DEVCON:: | .WORD

OO©

: CUNRENT RDDE
“OX_DEY73"E"OR
NTERE NUMBER
SERVICE = ROUTINE
STARTING DEvV NUMB oé
:DEVICE
.Ex;suogg noonsgs gxrs ron THE DX CONTROL BEGISTER —- 1%

4918
4919
43920

SADDR:
EADDR:
DMPADR:

O
O
O

:TELETYPE COMMAND s TING BUFFER aoongss
:TELETYPE COMMAND ENDING BUFFER ADODRES
"POINTER TO DUMP ROUTINE CURRENTLY BEING UTILIZEC B¢ TEL

4322
4923
4324

013120
013122
013124

0000

000000
0
0
000000

:ggg
‘

4927
4928

013130
013132

000102

000000

PMAx:

FTIMFL:

.WORD
.WORD
.WORD

3
HE
PSW ne B
:OFFSET TO THE DST
e

THE FOLLOWING VARIABLES ARE NOT RESET ON START-UP

.WORD

PBFE-PBFS
O

512£ OF PRINT

FIRST TIME FLAG

BUFFER

~
32
n e tflg \gmm \J? mn

un
-

~
We-Mn

o
£
n

O+
NO—=

02651l

ow4Sie

052502

212

0S1i22

gxe

O42524

UNMSG:

SYSTEM MESSAGES
215,212
.BYTE
"ASCI1 /DZDAI-B
.gvr

.BYT

77,377

15 212

"ASCI1 /UNIBUS ADDRESS -OCTAL- :
.BYTE

377

.BYTE

377

215,212PT VECTOR ADDRESS -OCTAL- :
'§¥$2 /INTERRU
VECTMS " "ASCI1

5 212ADDRESSES -HEX= (XX,
12 w2503 DEVMES " '§¥$"
XX ):
/Sévlcs
.ASCII
owss3E
377
.BYTE
15,212 TYPE (M OR §): /
'E¥$" EMARNEC
212
T8 owasie CHTYMS * -RELT1
ovr
377
BYTE
215,212 MANAGEMENT (Y OR N,: /
'E¥$N /nénosv
1 osusaz MMMES © R
047E1€
377
.BYTE
15,212 RELOCATION, IF SPECIFIED - IN EVEN ,000°S -CCTAL- :
'§¥$E /§g§¢5n
212 0S110% BFREMS h :S$$é‘
043108
212

042511

212

040520

FIOMS:

FILLMS:

.BYTE

515 212

.BYTE
EVEN

377

"ASCI1 /FRIEND (F) OR 2848 DIARG(D): ~
.BYTE

215,212

.BYTE

377

.BYTE

215,212

"ASCII /SEPARATE I-0 BUFFERS (Y OR Ni: -EVEN

020116

054105

07
044522

215
0S4524

PARMES: .BYTE
207,207,215,212
"ASCI1 /PARYTY ERROR/

207
04214
21is

215
040507
377

ILLMES: .BYTE
‘ASCI1
.BYTE

pababa

Pataba

Bababa

000

040522

.EVEN

000

212

042116

TESTMS:

0S0l24

bapabs

207
212

0S212%
215

NxMMSG: .BYTE

377

’EUES

377

"ASCI1 /OUTAUT BUFFER FILL CHARACTER -HEX- : ~
207,207,215,212

"ASCII /NON’EX-FMEM ERROR-

ECEE

215,212,377

212,215,377

207,207,215,212
/ILLEGAL DEVICE NUMBER
212,215,377

ron
s

[)

PAGE 110

NEW Dx11-B RESPONDER

000

212
OS4104

:
§tMsG:

09:46

MESSAGES
BEX

OO0

Pahaba

000

bababa

000

bobaba

000

Papaba

000

bababe

000

bababa

000

bababa

000

bos boo bo o bos bo

000000

.SBTTL
.NLIST

OI1-FEB-78

(R}

MACY1l 30R(1052)

19:18

MESSRGES

Dxi1-B RESPONDER

GO9

INVLDC:

O46440

PNOMM:

207
0si1i?

PMTO:

207
0s111?

/CURRENT DEVICE NUMBER
377

NVAL?D'E CSnnnno/

212,215,377

NO MEMORY MANAGEMENT AVAILABLE
/
25§§Zx
.BY

IEE%Zx SHEARAE TS,
els,212,207,207

sggfionv MANAGEMENT ERROR/
215,2

/;vsrzn INITIALIZED, TYPE “R"TM TO ENARBLE DX~

/D*té B 2848 EMULATOR TEST PACKAGE - OPERATIONAL INFORMATION
<CR> <LF>
MMAND/

,XX

&
E TABLE IN CQODE "C" <«CR>¢
DUMP TU
DUMP INPUT BUFFER FOR DEVICE XX IN C“DE - '~CR
DUMP QUTPUT BUFFER FOR DEVICE xX IN CODE *CTM~ fl» 5?

FILL BUFFER COMMAND/
<CR> <LF>

FIN,HH, XX FILL INPUT BUFFER ON DEV XX WITH HH/¢CR>‘LF>

FOT,HH, XX FILL OUTPUT BUFFER ON DEV XX WITH HH-/<CR, LF)

HELP

[

THIS T XT/<C

><L

KXLL DEVICE ON THE DX/<CR><LF>

KILL EVICE XX/ ¢(CR» <LF>
>
ENRBLE DX (RUN)/<C

ono

R)(#F)

RUN TEST/<CR><LF>
DISABLE DX (STOP)/<CR><LF>

\ RN SNSNSNSESNSESS NN

SD
SE
SI
SP

STOP IMMEDIATELY/<CR><LF>

STOP
STOP
STOP
STOP

AFTER
AFTER
ON NEXT
ON NEXT

CR> <LF)>/WHERE: /<CR><LF>

“C" 1S CODE FORMART

XT DATA TRRNSFER/(CR <LF>
XT ENDING SEQUENCE <CR»«LF.
SEL SEQ (ISS)/<CR><LF>»
PARITY ERROR/<CR> «LF>

OCTAL/<CR><LF>

EBCDIC/<«CR><LF>

XX IS Dx-ll DEVICE NUHBER

ASCII/<CR> <LF>
X/<CR> <LF>

N HEX/<CR><LF>

“HH" IS
A HEX CHQRRCTER/(CR><LF><LF>
CHRRA! $RE/<CR>(LF>
?NS?LE CONTROL
<LF>
<CR)>D/
OMMAN
(tC) ABORT CURREN
OSIHSS

/CTL-P
/CTL-Q
/CTL=-S

(tP) REQUESTS THE REENTRY OF CONTROL PARAMETERS
CR.<LF.
(tQ) RESUME OUTPUT AFTER TEMPORARILY STOPP‘Nu Bw (?S)7«CR>
(1S) TEMPORARILY STOP OQUTPUT TO CONSOLE-<C
LF

<LF

repe

o pe

N
mm

llI

PARGE

707 207

g8 R— BER

.BYTE

09:4&

EXX

]

[l alal al
VL L R [
oL rLWww
NN
WO
e LGN
S= =N

ngcfx

01-FEB-78

020055
0040
0040

8 RR

0410SS

FORSESRROR

@ RO
R

nnnnnn
e
L
W
nerLrw
—
N
N el
el o

046505

.RSCII

.BYTE
.E¥$N

HOS

30A(1082)

OO0

Y-

1S
o44S14
377

WL NN

s
et Bt Bt Pt Bt s Pt ot Pt ot Bt Bt Pt Pt Pt
s Pt Bt e et et Bt Bt ot Bt Pt Bt Pt ot
e e Bt Pt Bn Bt B

STPMES:

98-8 i & 2 &g%&Qeootou
o
in 2in "NJ\I’-’-'JF-F"LCCD'-’-E§

e 2

oL£
N WO N>

] 2

£
UMW
*= N W

Pt Bt ot a B

et Bt e

00000000

OO00000000000000000000000000000000000000

$t s

047108

0o
L
~o

Bt Ba e

s e

MACY1l
MIINDEC-11-DZDXI-B
NEW Dxi1-B RESPONDER
30-JAN-78
CZDX1B.P11
:
MES SAGES

TT -=)YNy >o<

[3d Ui}

A o

T- YL1l) -wa

LM—om0ASNDW-0=(=V(-"=]1]&]}

])[1505(=2].G&3m4*
M3IIN

LTrMomMqDLT a'Q}x &-.M—TUN Q0(&-) uNen0

QJ~wiOagFMOWaGm4OoozMQOF vw&aa>

'l.

LVW S bDo-214-~ no
w0(&@)] Ve|oaW W@L
481- V-X)4 e T4

I5b»&%s

(=] xw- £-

TMm

‘8

ox Q
T& o

109

22U

e W Q

WJ 'S

evdq4e

.- n¥

(A'TAY]

[GAITA U

ACCESS
ATOETB
ATTN

0C40SC

2708

29798

012354

3095

4315

004636

ASCOMP

= 000200

eBY?

2090s

3lels

4044

e3ee

49308

012530

2349

e4ee

2424+

3553 X 13188

5373'

3449#

4913

S0ics

3268

373p

20S1s
20478
2049
2cs9

3500

2746#%

BUFRE

BUSOLT= 000040

CDEVST

010256

SEDE - 000003
CERR

CHEND =
CHENDS=
CHIS
=
CHTB

003026

000040
001000
000200
0i 1604

2l04s

2737

cb34s

E:¥¥gé 8%3332

55;2 *

CMDCHN=
CMDREJ=
CMRERD=
CMRMI =
CMSRMI=
T =
CMWTLA=
CONEND

000004
000001
06
02
000012
000001
00S
012535

20S4s
20S6s
20348
2032
203Ss
20318
2033
48568

= 000015

19718

CMDCHF

013074

EOTE" B11240
CR

CRLF
CSPUST
CTL.C =
CTL.P =
CTL.Q =
CIL.D =
CTL.U =
C
SY=
CUE
=

011330
010310
000003
000020
000021
023
00002S
000400
O

DEVCCN
DEVMES
DISCEX

013110
013300
010734

S 2 28000

2425

242k

48628

3047

3514

3547

2568

3603

4171w

2792

2859

2984

3072

3273

3353

3497
2618

2322

3348

468Ss

3535#

35S51#

3701

3703+

3777

36831

4907

2b46

2782

3003

3088

4443

4930

3867

3949

4004

4020

4082

4113

4195

43148

3323

3522

3826

3865

3947

4002

4052

4307

3690

3023

2733

gggg:
3604
3656
4265
4261
4263

3759

uoe2

4023

3573

4212

48608

3282

ues7e

3182
3594

3el7
3652

3575+

3606#

4278

3033

3979

2190
2738
19748
197Ss
19768
19778
19788
20708
20928

2b6b
3515
4439
4425
4432
4428
Y457
3536
4037

2249
4308

4930#
434S

503cs
2S40*

SES

48C0s

Q13436

BFREMS

SEQ

PAGE 114

2938

3260

2204

2227

226b

2324

2293
oS41*

w07
3025

30S0

3823

435S

4362

43688
3310

2810
3548

3163
3565

DISPSZ= 000740

sgg:l

sgsg

3074

3084

DMPADR
013124
DONE
= 000200
DREAD
010704
ORMI
010712
DSRMI
010734

2860#*
c071s
4266
4262
4264

2878
3421
4361
4371%
43828

2895
3450

4320

4469
41918

452Es

Wiy

MACY1l 30A(10%2) Ol1-FEB-78 09:46
TRBLE -- USER 3YMBOLS
CROSS REFERENCE

W Dx11-B RESPONDER

repe

XIl-

-11-

9252?5?911 DZD3O-§RN§$8 14:13

JO9

01311 6

DSTOFF
DTUMTB
DUMP

003632
003432

4317

3822*

3846#*

38S0

39S1#%

3865#

4006#

28938
84S

2745%
4103

3119
Y117%

8735

012474

oxcg

gigggs

3322!

3869

DXCS

012470

2732

2734%

2735%

2756#

XDS
012464
DXENB = 000100
DXES1
012510

2406
2072
484G

2816
2758

4838#
2809

3751

DXEXIT

3386

3754

3779

3790

2732

2758

3751

3873

4024

4118

DQRCTL 0%3070
gxgg

012476

DxC

DXEXEC ODGEsd

0l021e

DXISR
DXMI
DXMO

259

3821#%

3733

468

3831#*

3036

382b#*

3873#%

3wy

3%33!
E)
B

JBS4#
391*

37598

3SS0#*

4o24#*

3570

3572#

3602*

3713

3728+

38293+

3871

3952

3855#

3863#

3864#

4ol12#

4003#*

4ilb#*

4110+

48438

4111+

411S»

4007#

3948+

40B4#*

3957#*

2757%

2758%

4118»

2809

4840s

2822*

2823#

3421

3832

3874

3893

3914

3362

4028

3322+#

3322»

43138

296S

4102#

48398

2416
484Ss
HEAG
Y

DXND
012506
DXONLN= 001000

48478
20698

DXRD
=
DXRST =
DXST
=
D;E;PF

D0D0O0O0S
000001
000007
gégggg

20798
20778
2080s
gggg:

4102
gggi

ggg?

3654

3730

R
3744

43008

013122

cB876%

2882

2934#

2940

3285*

3309*

3310#

3523
4312

40S3
47488

4373

2486

2536

48598

DX0S

pleslie
0l2472

EBCDMP
(004572
EBCDSP= 000100
EBCDTB
011754

DEV

ENABLE

012524

004222

PAGE 11S

2473

28s0
20198
3142

2247 %

4101#*

31398
2362
3145

cesSex

48418

2260%

226l

30228

EQPCHK=
20
ERARSCM
007770

210Ss
3805

3736
3929

40oS1s

EXEC

002720

g%gg

g??gl

2696

2759

2804

3378

wOTis
2824

2886

290&

2942

EXECMD
FILL

003042
003716

2687
2711

27008
29218

FILLME
FIOMS

013636
013574

2393
2379

2367#%

2395#*

2564

2923+

2939

352k

40S6

4B86SH

GDEYV

005302

2131#%

4930
4930#

2866

g182

2199#

2S77%

4928

2183
32728
3286

2190s
3281
33288

3069

334Ss

3284

3294

3306

3319

= 0001Se

E2EQ. - 0100498
FILLCH
FTIMFL

GETPRM
GLERR
GLEX

GLEX1

GLIMIT

012534

013132

O00l1&2
00S104
00s272

00S270

0080S0

4014»
-

34S0#

353k

3781

$104

4124

3003

3031

4iics

484z
—

48498

2709

EOM

3960+
i

2021l

801"

2362#*

3298

2848

3104

3944

2924

3311
2321

3es2

3022

33248

3259s

3925

3046

3323

30S4

bep
o

09:46

00S334
012502
012500

DXMOB

33728

O1-FEB-78

CROSS REFERENCE TABLE -- USER 5YMBO.S

3028

2482
2862
2707

KOS

gééxl ?P%{ 0‘036-?QN§§8 ?%:19

MACY1l 30A(10S2)

Dxil-B RESPONDER

(AT}

mim

-11-DZDXI~-

00S172
00Se32
00Sive
11e
760

GLMIN
GLMOT
GLMTT
GLOCT
HDMP

HELP
04
002551
HELPLN=
014300
HELPMS
HEXDMP
004754
ILLMES
3762

3266
3268
3264
3262
eBlY

-FEB-78

09:496

PAGE

2951
43308
4930
3217s
49308

INI

002026

2184

2364

2380

2382

2394

c404s

INOCT
INPUT

00263
%3230

20l
e71s

eea4
30678

2e’6

2304

232l

2359

2378

2633

4344

YBb4s

INRS
INTREQG=
INVLDC
I0BUF
ISSREJ=

KILL
KILLEX
KISARD=
KISAR7=

KISDRO=
LF
=

36
000100
014050
012533
000010

4266
3c4
172340
172356

172300

2619
2103s
3670
e377%
e0S3s

717
OS4s
19628
19638

19648
19728

eb34s
82
4930s
2385%
3610
30468
2437
2448

2438
4930

LOOP

MAXDEYV 013067

005364

3380

2539

3558

3S04

2743

3537

3349

4S5

3576

3532

3631

3785

3704

MESG

Ylls

011472

elsl

2293

2340

2586

e8ll

4546

4Se4

Yells

2334
2452
3974

e4e?
4723
3997

48ebls

2207
2282
2349

2209

eell

ez2le

4740

2988

3le2s

X
MMERR
MMMES
MMRESP
MMSRO =
MREARD

007210
011700
013376
012527
177572
007600

3761
2160
2305
2303
19658
3928

38918
47238
4930
2311%
2313%
3972

MTO

011672

2158

2404

47168

7352

3923

3927

39438

MRMI
MSRM

MWRITE

S02
007502

010342

3924
3932

3714

3970
3971s

3729

NEWLNE=
NEWPRM
NEWP10
NEWP20
NOLIN =
NOP
=

000025
001174
001460
001704
000014
000003

e0lB8s
21998
2250
2323
c0c3s
20178

4317
2205
22758
2339
2024
3665

OCTDMP
CCTEX

004670
DO4744

c8ls
3199

285k

NXM
= DO40000
NXMMSG
013706

c042s
3584

ll&

34e8
4930#

4ai2s

3909

3737

4301»

ope

30A(10%2)

3304s
3317w
3292
32798
3clBs

e’13
e9se
2951
2853
3467

LOS

CROSS REFERENCE TABLE -- UgéR EYHB .S
MACY1l

>ap
e

RESPONDER

(TS

W DX11-B

ggéXIBFPii DZD35-?QN!gE 14:19
NDEC-11-DZDXI-

MIINDEC-11-DZDXI-B

CZDXIB.P11

946 7Y
R =
00
PARMES
013736
Sggz

GBese
PCHEX'
PTRS
B958%)
PCUEND
PESEND
PFPTR
PHYOFF
PINDSC
PISR

PIUFL
PMAX

PMME

006442
006114
813046
13104
006026
011232

013052
813139

1416

PMTO
PNOMM
PNXM

014143
0i4102
006102

PRINTZ2

8113%6

PSYSRT

00S&50

PPRARER
PPPTR

NEW DX11-B RESPONDER

30-JAN-78

14:19

5331
3638

4S13

174

42S#%

2960

3684

30R(10%52)

PAGE 117

SEG Oll6

SEG Ol16

3734
4927

2278
Y460

49188

4927

4Sb 38

4435

4S10#*

4585+

4530

4729

43038

3¢

355"

3987

4001

4112

912e

4530

4S4Ss

4727%

4739

2894
3296#%

898
3308#

2900%
3309

2301#
3321#%

2933#*
3322

2935

3980#*
3630*

4001
*

4003

4172#%

3987
3732

4000#*

4062*

3984
3672%

3329

3994

3319*

Y4726%
4639*

006244
0130S0

PRME
11404
PROUT
011252
PSELRT
005776
PSW
= 177776

P1BF
P2BF
QCUE

MOS

09:46
01-FEB-78
CROSS REFERENCE TRBLE -- USER SYMBO.S
MACY1l

011402
011362
= 000010

SG
0l4eeH
RSTRART
001002
SHEOUTz OOO{I?

893148

SATTN
007760
SBUFAR = 000012
SCMD
= 000000
SCMDRJ =
0200
SCMDTB
006704
SCURS =
SDEV
012522
SDEVTB
13064
SELDEV=
0130786
SELRST=
020000
SENSCM
010140

2484

SINBF = 00000&

3821

4899
49098

006566

3775

3338

2537

2540

3346

394S

4277

4346

3782*

Y361
#
3453

4918

2985*
4174%

2986
4228#

299!

3794

3827

3866

383

3848

3982

40e0#

*
4287

4375#
48589

1-DZDX1-8

3601#*

30A(10S2)

3827#

3866#%

3518»
3677
3079

£0

[ B &8888

—qd

3595
3081
2741#%
30

NOS

01-FEB-78 09:4%
CROSS REFERENZE TRBLE -- USER SYMBOLS
MACY1i

8”: =8
&

)

0-JAN-78 14:19

v iy

eg o g &2 227
3 82 3 38

NEW DX11-B RESPONDER

SEQ 0117
SEG 0117

PAGE 118

4176#

4eel

4263

42eS

4278

3847

38e3

3981

4000

40S1

430S

4347

3953
4309*
3842

395S

3973

39686#*

3998

4002#*

4008

384S#*

3898

3976

3979#

3690#*

3696#

373b#*

3828#

3841+

3870#

3358#

408S

4087#*

4101

Y4173+

3959

3997%

3980

4371

SRRgNe
On L5508
mnm::o°V§$8:2mg
S TR

3731
3052
3629

TSELRS

4022
3774

37448

4096
3895

3821

= 1=t=t ettt

ooooooo

—g”S”Bzg” g8

S
S;KSTO:

4830#
S

2682

2997

4464

4468

4882

3642
2670%
2bq1*

2676
2884

%
2987
2904

4441

HsE
48938

H4ySa*

Y47y

48ess

4443

4832

3626

3839

3971

“0S4

4272

3378
Sggg.

41l
2898

3437
2900

4897s
32%

3423

3433

2490

30S3

3641

408<

«087

48728

48”2

4882

48638

Y34w

5537
2530

2600

2601

2313!

cclys

240s

48Sts

eee
e4ychbs
2525
cce3s
ee2s
2166
2168
3139+
3143

47388
24S3#
S2s
235*
49308

cllile

2l19s

20968
20468
78

2S76%

2499

43308

4S11ls
4857s

4321
166
140
314S#
2756

00C

P11

CORE USED:

7¥

42E3

3146

48SSs

26038

3370

48878

48E83

4530s

ropa

?MS. 3
£,

.- 93.

59500

PRAGE 119

)
mm
LTS

B10

Ql-FEB-78 09:46
MAC Y1l 30A(10S52)
W Dx11-B RESPONDER
CROSS REFERENCE TRBL E -- USER SYMBO.S
-78 14:19

Cl0O