Digital PDFs

AH-8777B-MC-B01

April 1978

120 pages

Original

5.1MB

view download

OCR Version

4.4MB

view download

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

OCR Text

RESPONDER

CZDXIBO

AH-8777B-MC

copvricHTo72.78

FICHE1 OF1

APR 1978

MOEEREN

MADE IN USA

BO1
EOF 1CFFP2BSED
POP
C<On1B.DCOC

@ 0002

~JAN-T8

OsHDRICZD X1BSEGQ
OI-FEB-78
MACrT1l 30R(10Se)

Q001CJ00
~80330
POP10 411
MARINDEC-11-DZDXI-B_ _NEW DXx11-B RESPONDER

14:26

OPERRTING PROCEDURE

.REM

IDENTIFICATION
PRODUCT

CODE:

AC-8776B

PRODUCT

NAME:

CZDXIBO

RELERSE

DRTE:

MARRCH

MAINTAINER:

MC
Dx11-B

RESPONDER

1978

DIAGNOSTIC

ENGINEERING

THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE
NOTICE AND SHOULD NOT BE CONSTRUED RS R COMMITMENT BY

WITHOLT
DIGITAL

EQUIPMENT CORPORATION.
DIGITAL EQUIPMENT CORPORATION ASSUMES
NO RESPONSIBILITY FOR ANY ERRORS THRT MARY APPERR IN THIS MRNUAL.
THE SOF TWARE DESCRIBED IN THIS DOCUHENT IS FURNISHED TO THE
PURCHASER UNDER
R LICENSE FOR USE ON
R SINGLE COMPUTER SYSTEM
AND CAN BE COPIED (HITH INCLUSION OF DIGITAL'S OLT NOTICE)

OMLY FOR USE IN SUCH SYSTEM,
IN WRITING BY DIGITAL.

EXCEPT RS MRY

OTHERWISE BE

PROVIDEL

CIGITAL EQUIPMENT CORPORATION RSSUMES NO RESPONSIBILITY FOR
USE OR RELIRBILITY OF ITS SOF TWRRE ON EQUIPMENT THRT IS
N
SJPPLIED BY DIGITAL.
COPYRIGHT

(C)

1972,1978

BY DIGITAL

EQUIPMENT

CORPORRTION

THE

09:4%

0 Qe 100 914
PA GE !

782330

584 03Ci

COl

THES
YSTEM ;SST
PROGRQH EX;RC%SES THE
NTERFQCE B TWEE"
OMMUNICATING VI
M 360-3
P-11
THE PROGRAM EMULARTES AN IBH CRY
DXil-B CONTROL UNIT
(2260) AND ITS CONTROL UNIT (2848) COMMUNICATINC OVER
EITHER A MULTIPLEXER OR SELECTOR CHANNEL.
THE 360 37C
EXERCISES THE INTERFACE BY RUNNING STANDRRD iBM DIRSNOSTICS DESIGNED TO TEST THE 2260 2848;
FRIEND OP THE

)

GENERAL DESCRIPTION

-020NI- B

NEW Dxil-B RESPONDER

30-JAN-T8 14:26

2848 RESPONDER.

MACY1l 30R.I0S2)

DOl

QPERATING PROCEDURE

COl) FEB-78

JUP TO EIGHT 2260°S MAY BE EM._RTED

SIMULTANEOUSLY BY THE PROGRRM.

BASICALLY THE SYSTEM TEST PROGRAM COLLECTS THE TEST

PARAMETERS NEEDED VIR
R QUESTION AND RESPONSE TUTORIAL

METHOD:

VALIDATES THE PARAMETERS AND THEN INITIALIZES

THE
SYSTEM.

RFTER THE Evsr
M un

e;en {NéT;QLI ED THE

OPERATOR IS THEN REQUIR
7
T°8Y
IYPING
AND THEN THE 360,370 escxns T0 TEST A 2260./2848.
THE SYSTEM TEST PROGRAM ONLY RECOGNIZES BARSIC
E
RRORS

SUCH RS,

PARITY ERROR,

ILLEGAL DEVICE RDDRESS,

ETC.

WITH THE 360 DIAGNOSTYC TESTING FOR MORE DETRILED
ERRORS;

SUCH AS,

TIMING PROBLEMS,

THIS PROGRAM COMPLETELY

REPLACES AND

EQUIPMENT

LLB]

MD-11-DZDXC.

REQUIREMENTS

PDP-11

COMPUTER

DX11-B 360

ONE

370

CONSOLE

SEQUENCING ERRORS,

WITH

MINIMJM

INTERFRCE

TELETYPE

£77.

OBSOLETES

MEMORY.

OPTION.
EQUIVALENT.

STORRAGE
THE

_TEST

PROGRAM LOADS

INTO

LERST ANOTHER 4K FOR DATA BUFFERS.

MEMORY

AND

WITH 4K

REQUIRES

OF MEMORY

FOR DATR BUFFERS, UP TQ SIX DEVICES (b) MAY BE EMULR
ATEC.
"0 EMULATE EIGHT 2260-/2898 DEVICES 8K OF MEMORY FOR DRTG
BUFFERS

IS REQUIRED.

STORRGE MAP
THE

FOLLOWING

THE

MAP

ILLUSTRATES

DX11-B SYSTEM TEST PROG

THE

USAGE

G-777

i
1
I

INTERRUPT

1000-17777

I
I
I

DX11-B TEST PROGRAM

7G=X?77

SPW

TABLE

VECTORS

MEMORY

MAP

1256 WORDS)

I
I
1

(4K WORDS)

S
1
I

1
§

09:4b

PASGE @

00¢

NEW D%il1-B RESPONDER

30-JAN--8 14:26
x

-X17°7

1000-x1

%
1

\2000-%X2777

O01-FEB-78

OPERRTING PROCEDURE

TUMBLE TRBLE

i
I

(256 WOFDS)

DUPLICATE TUMBLE TRBLE

.3000-X337T

I
I
I

DST TABLE

I
I
I

. 3420-%34"5

1
1
1

I
SOFTWARE DEVICE STATUS TABLE (DEV O)1
31 WORDS)
I

2 34TH- 43T

1
1
1

INPUT BUFFER

% 4440-XE377

I
1

(256 WORDS!

(128 WORDS)

1
' O]
1

(241 WORDS)

OUTPUT/DISPLAY BUFFER

(DEV O)1

(240 WORDS)

¥SU4OG-X5475

YENTH-XB437

INPUT

¥B40-x7377

I
1
I

OUTPUT/DISPLAY BUFFER
(DEV
(240 WORDS)

1
1
1

I
THE RBOVE SOF TWARE aurrsa LAYOUT
I
(DEVICE STATUS TRBLE,
INPUT BUFFER +I

1
I

160000-177777

SOFTWARE DEVICE STATUS TABLE (DEV 111
(31

BUFFER

(241

WORDS)

1
131
1

OUTPUT BUFFER) WILL 8E REPERTED FOR 1

EARCH DEVICE SPECIFIED (UP TO 8).
EACH DEVICE EMULATED REQUIRES 5i2
WORDS

(2000 OCTAL)

BUFFER SPACE

I
I

1 TTTTTTTTTTTTTTTTTTTTTTTTT
§

UNIBUS ADDRESSES

- —

NZTE

WORDS)

"x*

THE

DEFAULT

DETERMINED

——

—

THE

BUFFER

*/*

INPUTTED RT SYSTEM CONFIGURATION
VALUE

PHYSICAL ADORESS.

—

RE%gCQTION

20000.

*X*

—

FACTOR

IS RLWARYS R

0S:46

PRGE 2

I
mm
[alwl

?Jfi

I NDEC- 11-DZDXI-B
Dx 1B.D

EOL

MARCY11 3 ORA(10S52)

0004

% 0004

-DIDX1-B

NEW DXil-8 RESPONDER

30-JAN-TB 14:26

FO1

MRCY1] 30R(10S2)

O1-FEB-78

OPERATING PROCEDURE

0S9:46

LORDING PROCEDURE

THE STANDARD PROCEDURE FOR LORDING RBSOLUTE BINRRY TAPES
IS

TO BE USED.

STARTING RDDRESS

FOR

ABSOI.UTE

12k
16K

037500
057500
077500

24k
28K

137500
187500

c0oK

u.g

STARPT

4.1

CONTROL

4.2

STRRTING

LORDER

117560

PROCEDURE
SWITCH

SETTINGS

NONE

RDDRESSES

1000 OR 200 NORMAL STARTING ADDRESS.

FIRST

TIME

RFTER

ONLY,

THE

FOR

PROGRAM

THE

REQUESTS OPERATOR TO ENTER TEST PARAMETERS.

ERCH SUCESSIVE RESTRRT USES
HAVE

BEEN PREVIOUSLY

THE PRRAMETERS WHITH

ENTERED.

1002 RESTART ADDRESS WHICH REQUESTS OPERATOR TO ENTER
PARAMETERS AGRIN.
NOTE:

AT_ANY

TIME WHILE

-3.2

TO REENTER

OPERATOR

IS RUNNING,

A CONTROL

THE

TEST

PARAMETERS.

ACTION

INTO MEMORY USING ABSOLUTE

LORD ADDRESS 200.

LORD PROGRAM

PRESS

THE

THE SYSTEM
PARAMETERS

LORNER.

START

PROGRAM

WILL

TYPE

CUT

NOW REGQUESTS
NECESSARY TO

"DZDXI-B

THE
RUN

NEW

DxX11-B

OPERATOR TC
THE TEST.

ENTER

RESPUNDERTM
THE

ENTERING TEST PARAMETERS

BEFORE ANY
METERS

PROGRAM START

)

PROGRAM AND/OR

INITIAL

PROGRAM

TYPED ON THE TTY KEYBORRD WI.L ALSO REQUEST THE

OPERATOR

THE

TEST

TESTS MAY BE RUN OR WHENEVER A

DESIRED,

THE

OPERATOR

WIL.

CHANGE

REQUIRED

IN PARA-

ENTER

(P,

PARGE 4

MAINDEC- -D
cDxI-B
30-JAN-78 14:26
ScOn1B. D

6é

LPERQ’ING PR

RLL THE TEST PRRAMETERS.

OR(10€2)

GOl

O0O1-FEB-78

EOURE

THE ENTERING OF THE PARAMETE RS

1S DONE VIR THE CCNSOLE TELETYPE IN RESPONSE 7O R SERI ES

[

QUESTIONS.

GENERAL RULES FOR ENTERING PRRAMETERS
A.

RL% :RRRHETERS MUST BE DELIMITED BY A CHRRIAGE RETURN

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

[da)

“(

).l

IT MAY BE

CORRECTED BY

YO DELETE THE LRST CHRRRCTER(S)

USING RLBOUT(S,

HITTING CONTROL-U

(tU)

TO DELETE THE ENTIRE ENTRY

YO SELECT THE DEFRULT PARAMETER ENTRyY,

RETURN

(C/R)

IF _THE PROGRAM DETECTS AN ERROR

IN AR PARAMETER

LIV}

REPEAT THE QUESTION RGAIN AND REQUIRE
REENTER THE PARARMETER.
PRRAMETER

TYPE CRRRIRGE

ONLY.

THE

1T WILL

OPERATCR

T0O

DEFINITION

“JNIBUS RDDRESS
REQUESTS

-0OCTAL-*

USER

ENTER

ADDRESS

ON _THE UNIBUS. THIS MUST BE
BETWEEN 176200 AND 177700.

R B

WHERE

DIGIT

THE

RESIDES

OCTAL

NUMBER

DEFRULT UNIBUS AODRESS =176200
"vECTOR RDDRESS -OCTAL-"
REGUESTS USER TC ENTER THE VECTOR
RS A 3 DIGIT OCTAL NUMBER BETWEEN

DEFAULTY
"“DEVICE

VECTOR ADDRESS =

RADDRESSES

(XX,XX)

ADDRESS FOR THE
300 AND 770.

OUx

300

=-HEX-*

REQUESTS THE USER TO ENTER THE 360 CHANNEL RDDRESS(ES) OF
THE 2260(S) TO BE EMULRTED BY THF TEST.
IF MORE THAN ONE
DEVICE IS TO EMULATED,
THEN THE USER ENTERS IN THE

RANGE OF ADDRESSES T0'BE EMULATED:
--THIS INDICRTES THAT UNITS RO, Al,

USED IN THE TEST.

SUCH RS, “R0O,R3"
A2, AND A3 CAM BE

THE UNIT nobnesses ARE 10 BE

ENTERED

IN MEX BETWEEN 00 AND
F

DEFAULT

DEVICE RDDRESS =

A RANGE

DEVICES IS GIVEN, THERE CAN NOT BE nonz THAN e TOTAL.

"THANMNEL

TYPE

REQUESTS

(M OR
THE

1G, 10

S)*

USER

INCITATE

WHART

TrPE

360

CHRANNE.

C3:46

PAGE S

; 88t

NEW DXxil-B RESPONDER

HO1

O1-FEB-78

MACY1l 30R(10S2)
MRINDEC-11-DZOXI-B NEW DXil-B RESPONDER
CaDX1B.DOC
30-JAN-T8 14:26
OPERATING PROCEDURE
THE DX 1S INTERFRCED TC:
S = SELECTOR CHRNNEL.
DEFAULT CHANNEL
“MEMORY MANAGEMENT

= S,
(Y

M = MULTIPLEXER CHANNEL,

SE_ECTOR CHANNEL

OR N)*TM

REQUESTS THE USER TO INDICARTE

WHETHER THE PROGRAM IS T0

$SE lgg HSHOR;OHQNQGENENT OPTION.

DO NOT USE MEMORY MANRGEMENT

DEFAULT OPTION = N,
"BUFFER RELOCRTION,

IF SPECIFIED -

IN EVEN

REQUTSTS THE PHYSICAL ADDRESS OF WHERE

FIRMWARE

BUFFERS

(TUMBLE

TARBLE,

SPW +

SOF TWARE DEVICE BUFFERS ARE TO RESIDE.
ADDRESS
IS ENTERED
]IN OCTAL THOUSANDS,

,000'S -OCTARL-"
THE Dx

DST)

AND

THE RELOCATICN
AND MUST BE

ON A 2000 BYTE RDDRESS BOUNDRY. EG: PHYSICAL RDDRESS
100000

IS ENTERED RS

NOTE:
TO_ANY

100.

THE BUFFER CANNOT BE CLOSER THAN 24000(8)
200003
BOUNDARRY OR TO THE I/0 PAGE.
THE

THE DX ?S NO CflgflgLE OF HAVING THESE BUFFERS

CROSS A 200000 BOUNDARY.
IT 1S POSSIBLE TO OVERLAY THE ABSOLUTE
WHICH RESIDES IN THE HIGHEST ARVAILABLE
OF THE FIRST 28K OF METMORY.
CEFAULT
“FFIEND

(F)

BUFFER
OR

REQUESTS

RUN ON

ADDRESS

2848

THE

DIAG

USER

360;

I FRIEND MODE,

= F

SEE

FEIEND MODE WILL
JSED WITH *CTP’.
NOTE

PARA

ZHANNEL COMMANDS:

THE

(2000609

(D"

INDICARTE

RESPONDER CIAGNOSYICS.
DEFRULT OPTION

LOQDER
4k (10)

IBM'S

WHAT

TYPE

FRIEND OR

TEST

WILL

THE

2848

FRIEND
5.0

THE

2848

FOR LIST
SAME

COMMAND

RESPONDER

PARAMETERS ARE

WAS

VALID

1BM

STRINGS

NEEDED,

FORMERLY

SELECTED,

THE

SYSTEM

WilL BE INITIALIZED AND CONTROL PRSSED TO
THE

"SEPARATE

I-0

MONITOR.

BUFFERS

REQUESTS THE USER
AND _OUTPUT BUFFER

UNIT
THE

EMULATED.

MONITOR

COMMANDS

4.4.

OR N)*

TO INDICATE WHETHER SEPARATE INPUT
SHOULD BE MAINTRINED FOR ERCH CRT

SEPRRATE

TRANSMISSION

SEE

THE

INPUT. QUTPUT

SAME

DARTA

BUFFERS ALLOW

PATTERN

THE

09:46

PRGE 6

SEG 0007
<E% 0007

MAINDEC-11-DIDXI-B

NEW DX11-B RESPONDER

30-JAN-78 14:2b

<<D21B.TOC

101

MACY!l 30R(10%2)

Ol1-FEB-78

OPERATING PROCEDURE

360 370 INDEPENDENT OF WHRT DATA IS RECEIVED.
THIS IS USEFUL

IN DETERHINXNG THE CRUSE OF BRD

DRTR BEING TRANSMITTED.
NOTE -- MOST TESTS USING ’FRIEND' WILL NOT UTILIZE
SEPQRQTE 1/0 BUFFERS. THESE RARE ONLY FOR SPECIAL
SITURTIONS RS MENTIONED RBOVE.
DEFRULT OPTION = N,
NOTE --

"OLTPUT

BUFFER

NO USE THE SARME

IF THE SAME

I-0 BUFFER WAS SPECIFIED,

THE MONITOR.

SEE MONITOR COMMANDS
&

FILL

CHRRACTER

-HEX-*

THE CHARGCTER WHICH IS USED
THIS CHARRACTER 1S ENTERED IN

DEFAULT FILL CHARACTER = 40,

[ Y]

)

SYSTEM
AFTER

MORE PARAMETERS ARE NEEDED, SO THE SYSTEM
WILL BE INITIALIZED AND CONTROL Pnssso T0

REQUESTS THE USER TO ENTER
Lng%bb THEF?UTPUT BUFFER.

"OW ALL
“éh&
BE

I-0 BUFFER

AN EBCDIC BLANK

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

THE

TEST

PARAMETERS

INITIALIZED AND CONTROL

HAYE

PASSED

BEEN

ENTERED

THE

SYSTEM

TQO THE MONIYOR.

BEFORE

BEEN

ENTERED

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

MONITOR
RFTER

COMMANDS

THE

TEST

PRRAMETERS

HAVE

SUCESSFULLY

THE SYSTEM IS CONFIGURED AND INITIALIZED, THEN CONTRGL 1s
PASSED TO THE MONITOR. ONCE IN THE MONITOR THE OPERATOR
IS FREE

NOTE

THE

ISSUE ANY COMMAND LISTED BELOW.
OPERRTOR

BEFORE RANY

MUST

ENRBLE

THE

GENERAL RULES FOR ENTERING MONITOR
~.

fi%%/S?EMQNDS

I
IT

(RUN_COMMAND)

TESTS MAY BE PERFORMED WITH

MUST

USING RUBOUT(S)

TYPING

CONTROL-Y

TO DELETE
(tU)

360

370.

COMMANDS

CELIMITED BY

A TYPING ERROR ISBeETECTED
MAY BE CORRECTEL

THE

BEFORE
THE

CARRIAGE

ENTERING

LAST

DELETE

RETURN

THE

THE
C

CHRRACTER(S).
ENTIRE

LINE.

09:4&

PAGE T

§E? 8808
Sk'e

MRAINDEC-11-DZDXI-B

NEW DXil-B RESPONDER

30-JAN-78 14:26

C<Dx18.00C

MARCY11 30A(10S2)

1IF A USER WISHES TO ABORT A COMMAND,

SUCH RS DUYPING

DATA TO THE TELETYPE CONSOLE, HE DOES SO BY TYPING
CONTROL-C

(#C).

CONTROL-S

(tS)

SIGNALS THART CONSOLL OUTHUT SHOULD BE

CONTROL-Q

(tQ)

IS USED TO RESUME CONSOLE OUTPUT RFTER

TEMPORRRILY

(")

SUSPENDED.

POSITION

THE OPERARTOR

pi]
wn

ENTIRE

TRIES

(?),

TO ENTER DRTA WHILE A COMMAND

LINE.

TYPING CTIL-P

AND

NEW

ENABLE

THE

RUN

INITIALIZES

CLEARS ALL

ENRBLES
THE

CRUSES

PARAMETERS

THE SYSTEM TO BE REINITIALIZEC

REQUESTED.

MONITOR COMMANDS
FOR

COMMAND

DISRBLE

(tP)

TEST

DESCRIPTION OF

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

(#)

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

Ol-FEB-78

OPERATING PROCEDURE

IT HRS BEEN STOPPED VIR A CONTROL-S.
THE MONITOR MODE 1S DENOTED BY THE ARSTERICK

JO1

TESTING

DOES

THE

RUN COMMAND

FOLLOWING:

TUMBLE TABLE

ENTRIES.

THE DX BY SETTING
DX

THE APPROPRIATE

BITS

IN DXCS.

STOP CUMMAND

THE_STOP COMMPND ALLOWS
A SPECIFIC EVENT.
THIS

THE USER TO DISABLE THE DX
MAY EITHER BE IMMEDIATELY,

AFTER
ARFTER

AN_INITIAL SELECTION SEQUENCE, ARFTER A DATA TRANSFER,
AFTER AN ENDING SEQUENCE, OR ON A PRRITY ERROR.
THE

FORMS

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

THE

---~
---

STOP

STOP
STOP
STOP
STOP
STOP

COMMAND

ARE:

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

HAFTER THE CONDITIONS OF STOP RRE
ABLED.
TYPE “R*” TO CONTINUE.
Thz FOLLOWING WILL BE PRINTED ON

TELET“PE:

MET,

THE

CONSOLE

WILL

DIS

03:46

PRGE 8

MARINDEC-11-DZIDOX1-B NEW DYil-B RESPONDER
MACY1] 30AR(10S2)
OPERATING PROCEDURE
30-JAN-T8 14:26
<<OZ1B.DOC

SXXXXXXKTM
SXXXXXXTM
"XXXXXKT
XXX XKX
EXXXXXXTM
“XXXXXKX
“XXXXXX

THE
THE
THE
THE
THE
“HE
THE

CRXAXXXTM
“XXXXXXTM
SXXXXXXTM
XXXXXXTM
“XXXXXXTM
-

Ol-FEB-78

THE
THE
THE
THE
THE

DXCA
DXCS
DXOS
DXBR
DXBC
DxMO
DXMI

IN
IN
IS
IN
IN
IN
IN

OCTAL
OCTAL
OCTAL
OLTAL
OCTAL
OCTAL
OCTAL

DXCB IN OCTAL
DXND IN OCTAL
DXES1 IN OCTAL
DXMOB IN OCTAL
DXES2 IN OCTAL

DUMP COMMAND
THE

DUMP

BUFFERS,

COMMAND

ALLOWS

USER

DUMP

VARIOUS

TABLES OR CORE LOCATIONS ON THE CONSOLE

R VARIEYY OF FORMATS.
SYNTAXES

THE

DRTA

TELETYPE

THE FOLLOWING DESCRIBES THE

THE DUMP COMMAND:

DTT.0

DUMP TUMBLE TARBLE
DUMP TUMBLE TRBLE

CTT.H

IN OCTAL
IN HEX

THE DUMP TUMBLE TRBLE COMMAND REFERENCES
R DUPLICATE TUMBLE TABLE MAINTRINED

EXCLUSIVELY FOR THIS FUNCTION.
TABLE

DUMPED

IN REVERSE

THE TUMBLE

CHRONOLOGICAL

ORDER AND PRODUCES THE FOLLOWING REPORT:
XAXX XX

772
TT1
TT2
TT1

XXXX XX
XXXX XX
XX XX XX
ETC

DUMP

JE,

INPUT
INPUT
INPUT
INPUT

-----

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

BUFFER
BUFFER
BUFFER
BUFFER

FOR
FOR
FOR
F0
F

05548555, EEEEEE, 0

DUMP QUTPUT BUFFER ;

DSS555S
. EEEEEE . H
DSSS5
| EEEEEE
SS
.E
DSSSSSS
| EEEEEE . R
“OTE

-=-

D
D
D
o)

;

DOT A’ XX

THE

N
N
N
DEVICE

09:46

THE CURRENT DEVICE ARDDRESS IN _HE~
THE DXDS IN OCTAL - PROBRBLY ZERO

“CURRENT DEVICE -~ XXTM
XXXXXX

KO1

ADDRESS

HEX

;

WI_L DEFAULT TO 1ST DEVICE (CRT) # IN THE D
SSSSSS IS THE STARTING MEMORY ADDRESS IN OCT
EEEEEE IS THE ENDING MEMORY ARDDRESS IN OCTAL

PRGE 9

SEG
0013
<E% 0010

-DIDN1-

LO1

Ngu DxAé 8 RESPONOER’PERQ*INEnggééEBBQéIOSE)

01-FEB-78

30-JAN-

FILL

COMMAND

THE FILL COMMAND RLLONS THE USER TO FILL THE INFUT OR OUTPUT FOR
R DEVICE WITH
R SPECIFIC DATA PRTTERN.
THE FOLLOWING
DESCRIBES THE SYNTAx FOR THE FILL COMMAND.
FIN YY, XX

FILL

XX
YY
n

=
=

THE
THE

HELP

THE

INPUT BUFFER FOR DEVICE

XX WITH ¥

FILL OUTPUT BUFFER FOR DEVICE Xx WITH Y/

EQEY XX

DEVICE ADORESS
FILL CHARACTER

IN HEX
IN HEX

COMTMMARND

HELP COMMAND PRINTS

OUT

A SYNOPSIS

THE

MONITOR COMMANDS AND CONSOLE CONTROL CHARRCTERS
AVAILABLE FOR OPERATING THE OX11-B SYSTEM TEST
PROGRAM. THE SYNTRX OF THE HELP COMMARD 1IS:
H

INPUT
THE

ONLY
THE

INPUT

COMMAND RLEONS ;

AND SEN

VALID WHEN

SYNTAX

D---D

THE

u ER

TO_INPUT

360,

_DATA

THE

COMMAND

FSR

SRME

MANNER

THE INPUT COMMAND IS

IS:

BEING RUN.

IN HEX

IS THE DATA TO BE SENT TO THE
BE CONVERTED TO EBCDIC BEFORE
360.

ENABLE R Dx-11

1BM 2848 DIQGNOSTICS ARE

INPUT

DEVICE RDDRESS

THE

MESSRGE

HE WERE ACTUALLY ON R 2

IXX,D---D
WHERE
:
X¥ IS THE

HELP

COMMAND

PARTICULRR CRT

RS IF

OUT

360.
THE DATR WILL
BEING TRANSMITTED 710

DEVICE ARDORESS

THE ENABLE COMMAND TURNS
TO AN ON-LINE STATUS.
R

THE DEVICE INDICATED IN THE
DEVICE ADDRESS ONLY BECOMES

OPERRND
OFF-

LINE VIR ThE “KTM COMMAND.
THE DEVICE ADDRESS MUST BE ENTERED
IN HEX AND BE WITHIN THE LIMITS SPECIFIED BY THE TEST
PARAMETERS.

THE

Exx
v

SYNTRX OF

THE

ENRBLE DEVICE

DISABLE

Dx11-8

DEVICE

COMMAND

SETS

THE

KILL

“HE

SYNTRX

ENARBLE

COMMAND

IS:

ADDRESS

THE

DEVICE

INDICRTED

OFF-LINE

STATUS.
THE
DEVICE ADDRESS ENTERED MUST BE IN HEX AND BE
WITHIN THE LIMITS SPECIFIED BY THE TEST PRRAMETERS.
R
DEVICE MARY ONLY EE NRBLED QGQIN VIR THE "E*” COMMARND.

(F 44

COMMAND

1IS:

DISABLE OEVICE »~

09:4%

PRGE 10

’

%9 8911 |

MRINDEC-11-DID2I-B

2<Dx1B.DOC

NEW D¥11-B RESPONDER

30-JAN-"8 14:26

MRCY11 30A(1052)

QPERATING PROCEDURE

R -- ACCESS AND DISPLAY LOCATIONS

MOl

O0I1-FEB-78

09:4b6

(QUICK LOOK + CMANGE)

THE ACCESS COMMAND ALLOWS THE USER T0 DISPLAY RND RLTER
MEMORY _LOCRTION ggéhéflq g PROGRAM Ig RUNN

991 T”Eg“°?§§
IN OCTAL,

HO?HE EBDH gg us*u
txrn n%3ubE ACCESSE

NTERS

THE PROGRAM RESPONDS BY PRINTING THE CONTENT

OF THE REFER NSS?OhOCGTI
N IN OCTAL ON THE CONSOLE TELETYPE.

THE

OPE

MAY

CHANGE THE CONTENTS OF THE LOCATION BY TYPING IN THE
NEW CONTENTS IN OCTAL, DELIMITED BY
R (C/R).
THE

%TnggNuéh STHEN OPEN’ THE NEXT LOCATION AND DISPLRY
5.

C.
THE

TYPE A (C/R) ONLY.
THIS WILL NOT RFFECT THE CONTENTS
OF THE CURRENT LOCATION.
THE SYSTEM WILL UPEN THE
NEXT LOCATION AND PISPLAY ITS CONTENTS.

TYPE 6/)

MON

SYNTAX

AYYYYY
NCTE:

5.C

SLRSH FOLLOWED BY R
THE

SPACE

ACCESS

COMMAND

(C/R)

TO ESCRPE TO THE

IS:

ACCESS + DISPLAY LOCATION
BETWEEN *“R*TM AND LOCATION.

YYYYY

OFERARTING PROCEDURE
REFER

SECTION

4.4

“MONITOR

COMMANDSTM

FOR

DETRILS.

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

FOR

OPERATING

THE

18M

SYSTEM.

IN FRIEND OR 2848 DIARG.MODE,
COMMAND
OCTAL
00
01

02
03
o4
05
D&
97
12

#*DATA
FOR

£.3

ERFORS

FOLLOWING

IBM COMMANDS RRE

DESCRIPTION

HEX
00
01
32
G3
o4
0s
06
07
oA

TEST 1.0
WRITE FULL BUFFER
*READ_MANUAL INPUT
NO OPERATION
SENSE
WRITE LINE ADDRESS
READ FULL BUFFER
ERASE
*READ SHORT MANUAL

THE OUTPUT

THESE

THE

COTMMMANDS.

BUFFER

IS ONLY

INPUT

TRANSMITTED ONCE

VALID;

PAGE 11

O0I1-FEB-78

03:46

ERROR HRLTS

THERE ARE ONLY TWO CONDITIONS

MEMORY MANAGEMENT ERROR)

(MEMORY

TIME-OUT RAND

WHICH WILL CAUSE THE PROGRAM

70 HALT OUTSIDE OF THE TRAP CATCHER.

BOTH ERRORS

ARE RCCOMPANIED WITH A DESCRIPTIVE MESSAGE KELATING

THE CRUSE OF THE ERROR. RECOVERY FROM ANY SYSTEM HALT
REQUIRES THE OPERATOR TO RESTART THE PROGRAM AT LOCATION 200.
SEE ERROR MESSAGES FOR DETAILS.
6.2

DX ERRORS

UPON RECEIPT OF AN ILLEGAL DX CONDITION (INVALIO DEVICE ADDRESS,
INVALID DX COMMAND,
NON EXISTENT MEMORY ERROR) THE SYSTEM WILL

PRINT R DESCRIPTIVE ERROR MESSRGE AND DISABLE THE DX.

THE USER MAY THEN EXAMINE THE STARTE OF THE DX. NOTE
THAT THE DX MUST BE ENRBLED BEFORE MORE TESTS CAN BE
PERFORMED ON THE 360,370 (RUN COMMAND). RFTER THE DX
HAS BEEN DISABLED THE FOLLOWING WILL BE PRINTED ON THE
CONSOLE TELETYPE:

“CURRENT DEVICE -- XX"

THE CURRENT DEVICE ARDDRESS

“XXXXXXTM
AXXXX X
SXXXXXXTM
XXXXX X
XXX XXXTM
XXXXXXTM
XAXXXX
EXXXXXXTM
EXXXXXXTM

THE DXBA IN OCTAL
THE DXBC IN OCTAL
THE DXMO IN OCTAL
THE DXMI IN OCTAL
THE DXCB IN OCTAL
THE DXND IN OCTAL
THE DXES1 IN OCTAL
THE DXMOB IN OCTAL
THE DXESe IN OCTAL

“XXXXXXTM
“XXXXXXTM
“XXXXXXTM

THE DXDS
THE DXCS
THE DXO0S

IN HEX

IN OCTAL -- PROBRBLY ZERO
IN OCTAL
IN OCTAL

NOTE -- THE DX WILL _NOW BE IN A DISRBLE STATE REQUIRING
THE USER TO ENRBLE _THE DX VIR THE RUN *“R” COMMAND BE ORE
COMMUNICRTIONS TO THE 360 CAN RESUME.

ERROR MESSAGES AND SUGGESTED CORRECTIVE
“MEMORY

TIME OUT*"
THE MEMORY

TIME

OUT

ERROR

EXECUTED THRU_LOCRTION 4.
THIS

ERROR.

DENOTES
THE

*MEMORY

THE

THRT AN

MEMORY

INDICATES

TRAP WRS

THE SYSTEM HALTS RFTER

TIME

OUT

ERROR

NORMALLY

ILLEGAL RADDRESS WAS REFERENCED AND

SYSTEM SHOULD PROBRBLY Bt

MANAGEMENT ERRORTM
THIS _ERROR INDICARTES

LOCRTION 250,

RCTIONS

TRAP

RECONFIGUFED.

WAS EXECUTED

THE MEMORY MANARGEMENT

THRU

TRAP VECTOR.

ESED§¥?8§" WiLL HALT AFTER REPORTING THE ERROR

“ILLEGAL

DEVICE

NUMBER"

PRAGE

SEG
SES

o0
00

NOL

MRCY1!l 3CR(1082)
NEW DX!11-B RESPONDER
MAINDEC-11-DZOXI-B
30-JAN-78
i4:26
OPERATING
PROCEDURE
C
C<DX1B.D0O

MACY1! 30A(10S2)
NDEC-i1-DZDxI1-B NEW Dx11-B RESPONDER
QPERATING PROCEDURE
30-JAN-T8 14:26
<<O%1B.DOC

BO2

Ol-FEB-7?8

03:46

THIS ERROR INDICARTES THRT R TUMBLE TRBLE ENTRY

R DEVICE RDDRESS OUTWRS MADE WHICH CONTRINED
SIDE THE VALID DEVICE RDDRESSES SPECIFIED BY THE

THIS CONDITION WILL NOT

NOTE --

TEST PQRRHETERS

R SYSTEM RESET FROH THE 360.
OCCUR ON
6.3 FOR FURTHER DETRILS ON DX ERRORS.
“INVALID DX COMMAND"

THIS ERROR

INDICARTES THRT AN

SEE SECTION

INVALID COMMAND WAS

THIS ERROR CAN ONLY OQCCUR
DETECTED FROM THE 360.
N AN INITIAL SELECTION SEQUENCE.
SEE SECTION
6.3 FOR FURTHER DETARILS ON DX ERRORS.
"NON

EX~MEM ERRORTM

THIS ERROR

INDICARTES

THART

NON-EXISTENT MEMORY

ERROR WAS DETECTED IN R TUHBLE TABLE FROM THE

DX.
SEE SEC TION 6.3 FOR FURTHER DETRILS ON DY
ERRORS.
"PARITY ERRORTM

THIS ERROR INDICQTES THAT A PARITY ERRCR WRS DETECTED 8Y THE DX
0 STOP THE DX
WHEN
A _PARITY ERROR 1S DETECTED THE USER SHOULD

CONSULT THE “STOPTM COMMAND:

~.o

RESTRICTIONS

MULTIPLE

SEE

MEMORY REQUIREMENTS
DEVICE

ONLY B DEVICE

OVER THE DX.

FEM

8. c

(SECTION 2.2)

ARDDRESSES

ADDRESSES MAY BE

ALL

EXERCISED

SIMUL TANEOUS.

THE DEVICE ADDRESSES MUST BE CONTIGUOUS.

PROGRAM DESCRIPTION

FURPLSE
-------

THE PURPOSE OF THIS
ON FUNCTIONALITY OF

DX11

PROGRAMMING.

PROGRAM IS TO GIVE INSIGHT
THE HARDWARE AND TO GIVE AN

WILL,

BY DEFAULT,

PROVE

EXAMPLE

ON “WHICH SIDE OF THE FENCE" R PROBLEM L}ESSOFTWARE OR HARDWARE

THE

FOLLOWING

MEZG:

TrmIS

ROUTINE

~O0¥S

TO SEE

PACKS

IBM.

R DESCRIPTION

1/0

--=-==----

OUT

MESSAGE

(S BROKEN DOWN BY

-------- KEYBORRD

,DEC

THE

NERREST

PRINTER
THE

TYPE

PRINTER

IS BUSY

THE

PROGRAMMING

DISCRIPTIVE

NOT,

TECHNIQES

ROUTINE-

BUFFER

ARER

PRINTS ANC

USECD-

PAGE 13

RESTORES BUFFER RRER UNTIL MESSAGE

IF BUSY,

A(10S2)

IT PRCKS BUFFER ARER UNTIL FLLL,

WRITItG FOR

INTERWERVING.

TO PRINTER

BRSED UPON

USES PROUT:

PROLT:

THIS ROUTINE SENDS
IS BUSY OR NOT.

ThIN:

THIS ROUTINE ACCEPTS CHARACTERS FRUM KEYBORRD AND STUFFS
THEM AWAY IN TBUF, BUT FIRST, IT CHECKS FOR CERTARIN CON-

TROL

DRTR

O01-FEB-78

IS COMPLETE.

THE OTHER PRINTRBLE TRSK TO COMPLETE.
THIS RAPPROACH PROHIBITS MESSAGE

coe

TTY

FLRG

CHARACTERS.

JUMP

YO RESTART

- WHEN COMMAND

- WHEN COMMAND (TCMACT)
8 RESET BUFFER PTR.

(TCMDRB)

FLAG

RESELECT

(TCMACT)

PARRMETERS.

RCTIVE

= SET RBORT

NOT ACTIVE

= PRINT

A C/R DELIMITS TTY COMMAND - TCMACT IS SET - NOW IF rOU
CONTINUE TYPING - TCMACT BEING SET WILL NOW THROW RWAY
THOSE

SrSINT:

CHRARACTERS.

THIS ROUTINE CLERRS THE
PRINTER VECTOR RRERS.

EEEESUP MEMORY
CLERRS OUT

D)X

WORLD,

SYSTEM BUFFER RRER 8

VECTOR

SETS

TTY KEYBORRD

TIME OUT & MEMORY MANAGEMENT ERROR VECTOR

----GETS DX ADDRESS
~--=GETS

THE

SETS UP

CHECKS FOR LIMITS

TTY BUFFER POINTERS.

SAVES

IN UNRDDR:

DITTO

SS
T

I N HE/ - ACCEPTS RANGE
EXCEED 8 - SEPARATED Br

OF DEVICE
R COMMR

09:46

PAGE 14

uun

pROGRAM DESCAPTTON
MACY

NEW Ox1i-B RESPONDER

Q)
mm
v

SSONIB.DIC - 30-JAN--8 14:26

MRINDE--11-DZDNI-B

SAVES STARY DEV RDC IN SOEV
SAVES ENC DEV RDD IN EDEV
----CHECKS FOR LEGAL
----GETS CHANNEL

TERMINRTOR

TYPE

IE.

C R

M OR S

----GETS ANSWER WHETHER MEMORY MANRGEMENT?

OR N

SET UP VECTOR 4 AND TEST FOR EXISTANCE OF MEMIRY

IF YES,

MANAGEFENT.

----3ET BUFFER RELOCATION

CHECKS

FOR MULTIPLE

CHECKS

TO SEE

MENT

TEST

----FILL

SAVE

1-0 BUFFERS?
IOBUF:

CHRARACTER

CLTB:

WRS

SPECIFIED.

- STORE

2848

JJUMP

IN TSTTYP:

INITY

HEX

MANARGEMENT

MANAGEMENT

CLERR WORLD
TYPE
HALT

M/M

FILLCH

MEMORY

IS VALID WITHIN MEMORY MRNAGE-

WHETHER

QUESTION,

----- MONITOR

2000

TYPE - FRIEND OR 2848

ARSK

IF NUMBER

AND COMPARES

~---SEPARATE
STORE IN
IF Y ASK

IhITRY:

(T+'OUSANDS)

CHECKS FOR BOUNDRRY 20000 OR GREHTER

FRIEND

MMERR:

,000°S

----GET

HTMM:

OUT

ERROR

SETUP

SUBROUTINES

----

AVRILABLE.

TRAP

OUT

ROUTINE

MESSAGE

PRINTS MESSAGE C/R - DEFRULTS.

WRITS FOR

INPUT

GETS

GOBBLES CHRRACTERS FROM INPUT BUFFER ARER - CONVERTS 10
OCTAL AND SAVES RESULT IN R3 - THIS ROUTINE COES NO
CTHER CHECKFING THE CODE FOLLOWING UNIT EXRAMINE R3 FCR

PAGE IS

09:46

0i-FC8-78

[3]
w]

DOe

MARCY11l 30R(10S2
MRINDEC-11-DIDXI-B NEW DXil-B RESPONDER
PROGRAM CESCRIPTION
30-JAN-T8 14:26
<<OZIB.DCC

QINDEC -

ZDx1B.

Dé

NEW DXil1-B RESPONDER

-DIDN\1-B_

30-JAN-T8 14:26

EOZ

A
1 ??Q(IUSEJ

O1-FEB-78

PROGRAM DESCR P
MACY]

VARLIDITY.

IHT3:

GOBBLES CHARRACTERS FROM INPUT BUFFER RREA CONVERTS HEX 8
TO OCTAL AND SARVES RESULT.

STORES AWARY TERMINRTOR

IN RY

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

INIT:

SET

UP MEMORY TIME OUT

INITIALIZATION----

TRAP

----SET UP DX RADDRESS TRBLE.
SET JP VECTOR ADDRESS WITh
3¥Iggboo“gs BUFFER RELOCATION SPECIFIED - IF NOT START

----TEST

FOR MEMORY MANAGEMENT.

----1F YES - SET UP MEMORY HANAGEMENT REGISTFRS AND ENRBLE
MEMORY MANAGEMENT.
----SET UP SPW TABLE
LORGC DX0S WITH BUFFER OFFSET (DEFRULT = 20000)
CALCULRTE ADDRESS OF DST TABLE - SAVE AT DSTOFF
--=-=SET UP SPW TABLE
MOVE DST RDORESS

- MOVE UCHK FOR
TO VALID DEVICE

INVALID DEVICE
#°S

SPU TRBLE = 400(B)
-~--CLR
T

CTY

TUMBLE
=

TARBLE

400(8)

= 400(8)

DUPLICATE

----COMPUTE

FILL

TARBLE.

WORDS

REMAINDER DST =
DST = 1@8. NORDS
UP

WORDS.

WORDS

---—SET UP DST TABLE
FIRST 11. BYTE LOCQTIONS FILL

----SET

TUMBLE

#'S

256

IN WITH

BYTES

CHARACTER

MAX NUHBER

SRVE AT MAXCDEV
CEVCON = FIRST DEVICE

DEVICES

-1

VALIC

COMMANDS.

09:46

PAGE

MRINDEC-11-0C2D2]-B8 NEW Dx.}-B RESPQCDEF
MACY]] 30AR(10S2)
PROGRAM DESCRIPTIOM
30-JAN-T8 14:26
CeDn1B.OCC

FOe

Ql-FEB-78

---=-STRRT SETTING UP DEVICE BJFFERS
SAVE ADDRESS AT SDEVTB
MAKE THE FIRST DEVICE = 0O

IN THIS

CLERAR DEVICE STRTLS BUFFER TABLE 3

----CRERTE 8 SAVE ADDRESS OF
BUFFER RRER.

TARBLE

INPUT BUFFER

INPUT DISPLRY BUFFER IN DEVICE

CREARTE 8 SAVE RADDRESS OF OUTPUT-DISPLAY BUFFER IN DEVICE

BUFFER RRER.

---=FILL OUTPUT-DISPLAY BUFFER WITH FILL CHRRACTER
NOW CHECK

IF ALL DEVICES HAVE HAD THEIR DEVICE

BUFFER TRBLES GENERRTED INT1S0:

IF NOT,

REPEART

REMEMBER MEMORY MANRGEMENT HAS BEEN

STRTUS

INT130:

TURNED

THRU

ON-

<REATE EXTENDED ADDRESS BITYS AND SAVE RT XADDR:
SET
FIRST TIME THRU FLRG - QUESTION- ANSWERS WILL ONLY BE
GENERATED IF LR 1002 8 STARRT. OR HITTING ¢S ON TTY KEYBORRC

-------- THE EXEC: SYSTEM
‘A WAIT ROUTINED

EXECUTIVE

BRCKGROUND

t-E-:
Z.R SYSTEM FLRGS
----ANY COMMANDS TO EXECUTE?
IF YES GO TQ EXEC20.
OX RABORT AN OPERATION - IF NOT SPIN HERE
----QLWAYS

COME

HERE

AFTER

TELETYPE

INPUT HAS SET

THIS ROUTINE DISPRTCHES YOU TO THE
NOT AN QCCETTS?EEQ$EETEM COMMAND =

---TrPICAL

TIMMENT

DID

THE

TCMACT

COMMAND TYPED IN ° RETURN TO EXEC.

)

COMMANDS---

"ENTERED VIR TTY KEYBOARD)

--------

(£9:46

PAGE 17

RLN:

IHECK

IF YES,

1S ENRBLED

TYPE ? AND

BELL)--RETURN TO EXEC _AND

WRIT FOR ANCTRER TTY ZOMMRND.

IF NO, CONTINUE

RETURN TO EXEC.
CLR DXCS
INC DXCS -

CLR DEVICE STARTUS BUFFER

TRBLE

(SCMD

SLCMD

SSENSE
SSTAT
SBUFR
SRBYTC
SRDRQ@
SMINS)

THIS FOR ALL DEVICE

MRXDEV:
)

CLR DXARCT,

CMDCHF,

SOUBF,

SINTB,

(NOT SCURS,

STARTUS BUFFER

SONLF®

TRBLES

(BARSED ON

DXRBFL

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

TABLE

CHECK FOR CHANNEL TYPE
IF

SELECTOR CHRANNEL

SET

INTERRUPT ENRBLE &

OILINE

IN DXCS

TO EXEC

COMMAND
PICK
WHAT
T/FP

UP
IS
=

NEXT TTY INPUT CHARACTER FOR
IT”
CRUNCH DX,
CONVERT AND PRINT

]

THE

MODE.

CURRENT

DEVICE

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

(]

o
x

REYURN

n
4
QO

SET BUSY ENABLE

SET

SET GO, RETURN YO EXEC.

THE STOP FLAG

TAFEN

PLACE,

(DXSTPF),

NOT

WRIT

TEST WHETHER STOP HAS

UNTIL

UXSTPF

HAS

BEEN

CLEARED ( TYPICALLY YHE PCHEND: ROUTINE WILL CLEAR
O»STPF

(DXISR:),

DISRBLE D¥

RETURN

T0 EXEC

09:46

PAGE l2

[FANU

01-FEB-78

PROGRAM DESCRIP

ST
SIS

30-JAN-78 14:26

GOe

Y1l %?8&10521
MARCYI

L S

c<On1B.oCC

NEW DXil-B RESPONDER

LI
mm

MRINDEC-11-DZDXI-B_

NEW Dx11-B RESPONDER

M INDES -11-0DIDxI-B

v&D\ IB ool

30-JRAN-T8 [4:26

MACY1l 30R(1082)

HO2

0Qi-FEB-78

PROGRAM DESCRIPTION

SAME RS D

EXCEPT

(TYPICALLY PESEND:

SKRME RS 0

EXCEPT

(

ROUTINE

PCHEND:

RCUTINES WILL CLEAR DXSTPF

09:46

PAGE 13

(DXISR:))
‘

(DXISR:))

WILL CLERR DXSTPF

ANY OTHER CHRRACTER = AN

TYPICALLY PCHIS:

ILLEGAL CHARACTER

DJMP COMMAND

JuMP.

PICK UP THE NEXT SEQUENCE OF OCTAL NUMBERS OR NEXT CHRRACTER

FROM

TTY

INPUT

BUFFER

aIMIT: +sr EHEEK IF
MINE

ARER.

THEY nng ocrn& NUMggns IF_YES,
IF

IF NOT ONE OF THESE ~TTYPE ERhon ntssncz

«SAVE

IT)

OCTAL

-CHECK

NUMBERS,

FOR 2ND

1ST

ADDRESS

=I" - NOW CHECK FOR
N - CREARTE
OF DEVICE O INPUT BUFFER TRBLE
SINBUF (DEV 0) = SADDR
SRDDR + 4B8l1. = ERDDR

0" - NOW CHECK FOR T
ADDRESSES OF DEVICE O
SQUTB (DEVO) = SADDR
SADOR + 479. = EARDDR

STARTING 3

PRINTING)

IF_

NOT

UNTIL

DUMP

BEGIN OF

CHECK

ENDING RDDRESSES

- CRERTE STARTING AND
OUTPUT BUFFER TARBLE

TNGEveRsE s Geed abBrEss 1R onpno&
SEE

SRDDR

+1000)

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

CRERTE STRRTING RDDRESS

CF DUPLICATE TT (TTPTR
(SAVE) DTT2 = SADDR

CHECK

GIVEN

DUMP

DTT

FOR

IS
S

A DEVICE

NOTY JU?T DUMP DEFARULTED LIMITS GET

ENDING

THE
HEX,

OCTAL)

ES&T?NUES
DUMP ING
UMP

SPECIFIED

THE DEVICE

CRUNCH

“CHTENTS OF SALOR & EADDR TO POINT YO THE PROPER DEVICE
8

SPECIFIED.

ZONVERT

AND

DUMP

RETURN Y0 EXEC.:

IT,

2ND ADDRESS GIVEN = ERDODR.

NOW SET
CORRECT

(SAVE IT);

STOPPING

JEARDDR

_OhvING FIR MORE COMMANDS TC EXECUTE.

THE

NEW DZi}-B RESPONDER

MAINDEC-11-CIDXI-B

30-JAN-"8

caOnIB.CCC

14:26

MACYil

PROGRAM

30RA(10S2)

102

01-FEB-78

DESCRIPTION

09:46

Ficl COMMARND

PICK UP CHRRACTERS FROM TTY INPUT BJFFER AREA - PERFORMS
VERY SIMILAR TO THE CUMP COMMAND EXCEPT IF FILLS RRER WITH THE

Eiol:

(FILLCM)

SPECIFIED FILL CHRRACTER

LSE ONLY THOSE FILL COMMANDS RS SPECIFIED IIv THE TEXT - RNY
CTHERS MRY OBLITERARTE

THE CORE.

BRSICALLY THIS IS JSED TO FILL THE OUTPUT OR INPUT BUFFER RRER
WITH FILL
o JESS
~_ES3S:

CHARARCTER

<OMMRND

JPENS CORE LOCRTION

* RETURNS YOU Tb
-VERY

£RBLE

EwBLE:

(FILLCH)

RLLOE%EG IT T0 BE MODIFIED WITH NEW CONTENTS.

SIMILAR

Ca A C/R OPENS NEXT LJCATION ETC.

“0DT*

DEVICE
GETS THE TYPED DEVICE 8 IN HEX
CLEARS THRT DEVICES STATUS TARBLE
CLR SSENSE,
CLR SONLF

RETURN TO EXEC

»lee
Face:

CEVICE

GETS THE

TYPED DEVICE

MOVES R *1%

INTQ

SON

MOVES R _UNIT CHECY

RETURN

EXEC.

INTO

IN HEX
THE SPK TABLE

INPJUT COMMAND
NFUT

CHECK FOR FRIEND OR 28487 - 2848 ONLY
In HEX FROM TTY INPUT BUFFER.

GET

DEVICE

PUT THE START CHARACTER IN DEVICE BUFFER AREA (SMI=1)2)
SAVE DRATA LOCQTION (SMINS)
INC CURSOR POSITION
CHECK FOR END OF SCREEN (SCURS=478.) IF rES,
PUT EOM

EQM=152) IN THE BUFFER ARER,

PERD

REQUEST

PJUSH STRCK

(SRDRG)

(CREATE

PHONEY

INC CURSOR POSITION, QUEUE

INTERRUPT,

PRGE 20

MRINDEC-11-DZDX1-8

SZD»1B.DOC

NEW DXil-B RESPONDER

30-JAN-TB 14:26

MACY 1%

PROGRAM DESCR

%?8(1052)
N

Joe

0i-FEB-78

(09:46

JUMP DXEXEL

----- TYPICAL TT1 (TUMBLE TARBLE) ENTRIES---(THESE SERVICE ROUTINES ARE SELECTEL BY

THE DXISR
(TT1=DXDS) IS EXRMINEC.

ROUTINE WHEN THE TUMBLE TARBLE ENTRY

SYSTEM RESET
PSYSRT:

CLEAR DEVICE

AREA WITH

FILL

STATUS BUFFER
CHAR.

TABLE.

SETUP DISPLARY BUFFER

THIS FOR ALL DEVICES

CLR ACTIVE FLAGS.

LR CUBUSY IN Dx¢s

PROCESS

NO MORE

CMD CHRINING FLAG

ENTRY

TT ENTRIES

(DXRCT & CMDCHF)

TC DXEXEC.

SELECTIVE RESET
FSELRT:

CLR DEVICE STRTUS BUFFER
FOR THRT DEVICE + SENSE

IS A SEL RESET

PROCESS

INTERFACE

FINZCSZ:

ANY

TRBLE

ISSUED AGARINST THE CURRENT ACTIVE DEVICE.
ENTRIES

THEN

DXEXEC.

DISCONNECT:

IF DEVICE WRS ACTIVE,

ITS DEVICE

STRTUS

CLERRED - IF NOT ARCTIVE,

IGNORE CMD.

IN SCMD

RCTIVE

QUEUE

-TYPICALLY IBM
THO THE DEVICE

IF ACTIVE DEVICE - IF

CE!

WILL INTERFACE DISCONNECT
WRS NOT ACTIVE)

TABLE

WILL BE

DEVICE

EVEN

CHECK FOR CMDCHF: 8 DXARCT: FOR THRT PRRTICULAR
YES,
CLR BOTH FLAGS - ONLY ONE DEVICE RT A TIME

CAN HAVE CMD CHAINING AND/OR DX ACTIVE SET.
IF

NO MORE

TT ENTRIES

- GO

TO DXEXEC.

STATUS ACCEPT
PESENT:

WRS

WAS

LRST

ATTN

CMD

WRITE?

RCCEPTED”?

YES,

SO,

FORMAT

SET

INPUT REQUEST)

SRORG

THE

DISPLAY

(RERD

IF NO, CONTINUE
CLR OUT SLCMD (LAST CMD)(SET ONLY ON A WRITE)
CLR DXACT DXACTIVE FLAG
ceF DEVICE STATUS BUFFER TABLE

(DISCTL

MANUAL

PASE 2!

TEST FOR CMDCHN

(TT1)(DXDS)

IF YES,

SAVE DEVICE

CMD CHARIN)

(STOP ON ENDING SEQ)

giE;Eér NGO,

FNxM:

STOP

MEMORY
THE

SET_RBORT

C9:46

IN CMDCHF (ONLY ONE DEVICE RT R TIME CAHN

WAS A SE SPECIFIED?

NCN-EXISTANT

O1-FEB-78

FATAL

FROM

- IF YES,

CRUNCH

AND NO MORE TT ENTRIES GO TO

ERROR

INTERRUPTING

FLAG

EXIT FROM DXISR - GO TO MONITOR WRIT STATE(EXEC).
(DO NOT PASS THRU DXEXEC ROUTINE

PARITyY

FFRRER:

JUSYT RBORT)

ERROR

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

IF _NO

RETURN

(PRARSTP:

TO DXISR

=>0)

AND

QUEUE R UNIT rCHK
CONTINUE

CHECKING

T0O

YES

TQ SSTAT
TT!

(STRTUS WORD)

EVERYTHING OK UP TO THIS POINT
CHRANNEL INITIARTED SELECTION SEQUENCE
PCHIS:

WARS

YES,

CMDREJ®

(STOP

ISS)

CRUNCH DX

SPECIFIED”?

"YES, IS DEVICE ONLINE?

NO,

SET

INTREG

IN SSENSE

CMOCHF? IF YES, CLR CMDCHF.
ANY MORE TT ENTRIES? - IF NO, GO TO DXEXEC
CMDREJ?

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

IF NOT, "MUST BE ILLEGAL CMD - SET _BUS OUT IN SSENSE
IF

CMDCHF?

YES,

SET

CLR

SCMDRJ

(COMMAND REJECT)

IN SSENSE

CMDCHF

ANYMORE TT ENTRIES, NO, GO TO DXEXEC

CMDREJ?

NO,

THEN PROCESS

CMD

(TT2

CONTRINS CMD)

THIS A TIO CMD?

YES,

IGNORE,

CHECK

CMOCHF

ETC,

THIS A NOP CMD?

1IF

YES,

IGNORE,

CHECK

CMODCHF

ETC,

THIS

ANYMORE TT? NO? GO TO DXEXEC

TT ENTRIES?, NC GO' TO DXEXEC

VALID

CMD?

YES

RBORT DX(DXRB:)....EXIT
RETURN TO EXEC:

- GUEUE CMD

(TT2)

FROM

1O SCMD

DXISR

PRGE 22

QO
00
n
[(WIN

NEw DXil-B RESPONDER
PROGRAM DESCRIPTIO"
30-JAN-TB 14:26

=11 -DDN]1-B

.DOC

KOe

unn
mm
[3TM

MACY1l 30A(10S2)

NEW DX11-B RESPONDER

-DIDX1-B

30-JAN-78 14:26

LC2

Ol-FEB-78

PROGRAM DESCRIPTION

C(C9:46

CLR CMDCHF

YES,

IS CMDCHF SET”

MACY1l 30R(10%2)

ANYMORE TT ENTRIES, NO? GO TO DXEXEC

CHANNEL END,

PREPARRE ENDING SEQUENCE RESPONSE

CLR DXRCT

WAS STOP ON DATA TRANSFER DONE?
NO,

QUEUE

CEDE

WAS

THERE R PARITY ERROR?

YES,

SCMD

STOP DX

SUBTRACT DXBYTE COUNT (DXBC) FROM SRBYTC
IF

YES

DXEXEC

QUEUE EQPCHK TO SSENSE (EQPCHK = 20 )

ANYMORE

CONTROL

ENTRIES”?

NO,

UNIT END
CLR DXARCT

USED TO KéEP TRACK OF REMAINING BYTE COUNT (SRBYTC)

AND TO KEEP TRACK
JUMP TG PCHEND:

===

DxISR

(DX118

INTERRUPT

THE DX SHOULD MAKE
THRU WHEN PSW IS <«
w

CURRENT

ENTRIES
DX11B

BUFFER POINTER

(MULTIPLEXER CHRNNEL
)

SERVICE

ROUTINE)

INTERRUPTS

--VECTORING

CHECK IF ZERO TT ENTRY UPON INTERRUPT
IF ZERQO - ASSUME TT ENTRY HAS ALREADY BEEN PROCESSED
RETURN FROM INTERRUPT
IF_NON-ZERO

CLEAR "DONETM

(DXCS)

FOR EVERY TT

ENTRY

- SAVE FIRSY TT ENTRY IN DUPLICATE TT (DTT1) 87TI.

SAVE SECOND TT ENTRY
CLR BOTH TT ENTRIES

MHOTE:
PICK

THE

IN DUPLICARTE TT
TO SIGNIFY THAT

TTércggggINS CONTENTS OF
UP DTT2 AND

ORDER

IMPCRTANT.

CHECK

WHICH

CHECK

THE

DXDS...TT2 CONTRINS CONTEMTS

FOR VALID DEVICE

FIRST

(DT72) &87T2.
THEY WERE PROCESSED.

TUMBLE

TRBLE

(TT2=DXCR)

ENTRY

ETC. THEN CHECK FOR CHANNEL INITIARTED SEGUENCE,
CONTROL UNIT END.
FOR A

(PERFORM RCCORDING TO TT1

¢«

CHECK

SELECTI/E RESET?

YES,

SYSRST

TT1

(DXDS)

GO TO SYSTEM RESET

DXDS

PROCESSED

FOR SYSTEM RESET , PARITY ERRORS

(PSYSRT:)

CHANNEL END,

(DXDS))

PRAGE 23

MRINDEC-11-DZDXI-B NEW DX11-B RESPONDER
MACY1l 30R(10S2)
PROGRAM DESCRIPTION
30-JAN-78 14:26
CZDx18.00C
CHECK FOR INTERFACE DISCONNECT? (DXDS)

NON-EXISTAN} MEMORY> (DXDS)

STATUS RCCEPTED? (DXDS)

PRRITY ERROR? (DXDS)

093:46

PRGE 24

IF YES,GO TO PINDSC:

IF YES,

GO TO PNXM:

IF YES,

GO TO PESEND:

(DXDS)
CHANNEL TRt IATED SEQUENCE? (EVERYTHING
OK UP TO THIS PGINT).
IF YES ,

CHANNEL

END?’

GO TO TCHIS:

(DXDS)

IF YES,

GO TO TCHEND:

IF YES,

GO TO TCUEND:

CONTROL UNIt END? (DXDS)

INITIAL SELECTION SEQUENCE REJECT? (DXDS)

NO?

O0l-FEB-78

GO TO PSELRT:

IF YES,

MOe

IGNORE

ENTRY...TRERT

STACK

STATUS

GET NEXT TT ENTRY AND DO REST OF RBOVE.....

IF,

HOWEVER

INITIAL SELECTION SEQ WRS REJECTED ,ENTER A QUEUE CONTROL
UNIT END TO 360 (QUEUE R CUMTROL UNET END(QCUE=10) TO SCMD OF PROPER DEVICE
STATUS BUFFER TABLE)
-YOU WILL STAY IN THIS SECTION OF CODE
HAVE BEEN PROCESSED. WHEN THERE ARE NO
PROCESS ....JUMP TO DXEXEC:.

---DXEXEC:

OVERVIEW

(
OF

UNTIL ALL TT ENTRIES
MORE TT ENTRIES TO

CMD DISPATCH SECTION
THE DXISR) ---

OISR HAS THE PRIORITY LEVEL RT 7 PREVENTING ANY MORE INTERRUPTS.
- IT HAS PROCESSED ALL THE TT ENTRIES BEFORE GETTING INTO THIS CODE
REMEMBER;

THROUGHOUT

THE

DXISR_INTERRUPT

SERVICE

ROUTINE,

RS A RESULT OF SERVICING TT ENTRIES, THE_ PROGRAM HAS
BEEN SETTING LR PUTTING SPECIFIC 8°5 IN THE DEVICE’S

STATUS BUFFER RREA.
THESE COMMANDS OR WHATEVER WERE
BEING QUEUED FOR DXEXEC: PROCESSING.
HOPEFULLY,
RS THE

WAS SERVICED SOME OF THESE WERE CANCELLED OR CHANGED TO

REFLECT THE TRUE STRTUS THAT MUST BE
PRESENTED TO THE 360
CHANNEL.
(I KNOW THAT MAY BE DIFFICULT TQO REMEMBER).
WELL,
NOW IS THE TIME TO PROCESS THESE QUEUED COMMANDS.
YOU CAN EXIT FROM THE DXISR: BY SEVERAL PATHS; EXECUTING
R COMMAND,
SEND “ATTENTIONTM,
COMMAND CHAINING, OR A

SYSTEM RESET,

THE
WAS

INTERFACE DISLONNECT, ETC..

DXEXEC: ROUTINE FIRSY DETERMINES WHETHER
SELECTOR OR MULTIPLEXER (CHTYPE = "MTM OR

THE CHANNEL
*STM)

§EO g0es
SE% 00e2S

NEW DX11-B RESPONDER

MRINDEC-11-D2ZDXI-B

CZDx18B.00C

30-JAN-78 14:26

RERD

SHORT

TYPICAL

MANUAL

INPUT

MULTIPLEXER

(FOR ERCH DEVICE

®)

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

COMMANDS

WRITE FULL BUFFER
RERD MANUAL INPUT

ENDING SEQUENCE
SENSE COMMAND

(SCMD
(SCMD

ERRSE COMMAND
CONTROL UNIT END
SEND ATTENTION

(SCMD
(SCMD
(SCMD

RERD

SHORT

MANUAL

(SCMD
(SCMD

INPUT

(SCMD

==--SELECTOR/MULTIPLEXER
---IS

SELECTOR CHANNEL

THERE

ANY COMMANDS

NOe

O01-FEB-78

= 1)
= 2)
= 3J)
= 4)
= S)
= b)
= 7)
=10)
=11)
=12)
(FOR

(SCMD
(SCMD

WRITE LINE RDDRESS
RERD FULL BUFFER

SEX:

10S2)

PROGRAM DESCR1IP

TYPICAL SELECTOR COMMANDS
WRITE FULL BUFFER
RERD MANUAL INPUT
ENDING SEQUENCE
SENSR COMMAND
WRITE LINE RDDRESS
READ FULL BUFFER
ERASE COMMAND
CONTROL UNIT END
SEND RTTN TO 360

MAC Y1l

ERCH

DEVICE

#°

= 1)
= 2)
= 3)
= Y)
= 5)
= b)
= 7)
=10)
=11)
=12)

COMMAND DESCRIPTION ----

---TO

EXECUTE

(PER

DEVICE)?

NO,

CHECK

FOR COMMAND CHAINING; IF YES, EXIT FROM THE DXISR - WA1T
FOR THE INTERRUPT (REMEMBER, ' YOU MUST EXIT IN ORDER TO

DROP THE PROCESSOR LEVEL).
PROCESS NEW TT ENTRIES.

RESULTANT DXISR

INTERRUPT

WILL

IF CMOCHF = O CHECK TO SEE OF THE RATTENTION FLAG_ (SRDRQ)
FOR THAT DEVICE IS SET.
IF YES,
QUEUE R “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

ggg;xgglgsscxnso BY THE COMMAND.

(SCMD=XX):

THAT

WHEN COMPLETE...EXIT

09:4%6

PAGE 25

MAINDEC

NEW DXil-B RESPONDER

11-DZDX1-B

30-JAN-T8 14:26

<ZDn1B.D oC

BO3

O1-FEB-78

MACYl} 30R(10S52)

PROGRAM DESCRIPTION

------ DESCRIPTION OF COMMAND ROUTINES (SELECTOR ----WRITE LINE RDDRESS
WRITE

FULL

BUFFER

SWRITE:

SET UP THE RDORESS OF INPUT BUFFER RRER (SINBF)

INTG DXBR

SUBTRACT PHYSICAL OFFSET
SET BYTE COUNT IN DXxBC
SET DEVICE ROORESS IN DXCR
SAVE COMMAND (SLCMD ¢----- SCMD)
CLR SSENSE

SET DEV ACTIVE FLAG (DXACT)
SET_INPUT FUNCTION 8 GO IN DXCS
EXIT FROM DXISR AND WRIT FOR NEW TT ENTRIES
THE

SAVING OF

SEQUENCE
RERD

COMMAND

SRERD:

SLCMD

(PESEND)

(REARD

FULL

SIGNIFIES

THRT

THE

ENDING

SET UP THE RDDRESS OF THE OUTPUT BUFFER RRER

INTO DXBR.
SET BYTE

SUBTRACT PHYSICAL
COUNT IN DXBC

SET DEVICE ARDDRESS

OFFSET.

?gsgéé

)IS

(S0UTB)

IN DXCR

SET DEV RCTIVE FLAG (DXARCT)
SET OUTPUT FUNCTION & GO IN DXCS
EXIT FROM DXISR AND WRIT FOR NEW
MANUAL INPUT
SHORT MANUAL

(DISCTL)

BUFFER)

CLR SSENSE

PERD
FEARD

PRESENT

IT MUST FORMAT THE DISPLARY

TT ENTRIES.

INPUT

IT FRIEND?

YES,

TREART

RS REARD FULL

BUFFER

DID YOU SPECIFY A READ REQUEST? NO? ASSUME THE

360 GAVE AN UNSOL ICITATED REQUEST

AN ENDING SEQUENCE

é[ Rgflg
REQUEST

(ESEQ:)

WRS SET-PROCEED

(POLL)

AND SEND BRCk

SAVE LQST COMMAND
SET UP STRRTING ADDRESS - MOVE SMINS
SUBTRACT PHYSICAL OFFSET FROM DXBA
CALCULATE BYTE COUNT AND SET DXBC

TO DXBR

IF BYTE COUNT IS ERRONEQUS - JUST SEND AN ENDING
COMPUTE DEVICE ADDRESS AND SET DXCR
CLR SSENSE
SET DEVICE RCTIVE FLAG (DXACT)
SET OUTPUT FUNCTION AND GO IN DXCS
EXIT FROM DXISR AND WRIT FOR NEW TT ENTRIES.
PFECSENT

ENDING

ESES:

GUEUE CE &
CRALCULRATE

STATUS

CHANNEL

DE TO SSTAT
DEVICE ADDRESS

ANC

SET

DXCA

SEQUENCE

(£9:46

PRGE 26

?QNNE“ Dx‘é B RESPONDEPPROGRRH ngefiip??fl(lflsa)
HQXNOECEéé 'D\I

co3

01-FEB-78

<DZIB.

CHECK FOR UNIT CHECK

UNIT

CHECK

IF NO,

ONLY

MOVE SSTRT

BIT SET.

IF YES,

09:46

QUEUE SSTRT WITH

T0 DXxQ0S

s TT ENTRIES.
g 00TFOR NEW
CHIION
3iarte
SE]
XIT
M DOXIS
ND W
PRESENT

CONTROL

CONJNE:

R CONTROL UNIT TO SSTA
QUEUE
CR CULQTE oev;cg
oon5§§ QN? ssr OXCR

CHECK

UNIT

END

IF YES, QUEUE SSTRT WITH UNIT CHECK
IF NO,
MOVE SSTAT TO DX0S

ONLY

SET SYATUS FUNCTION& GO TO DXCS

SET DEVICE ARCTIVE FLRG (DXACT)
EXIT FROM DXISR AND WAIT FOR NEW TT ENTRIES.
ERASE

COMMAND

EFRSCM:

MOVE AN EBCDIC SPACE THROUGHOUT OUTPUT DATA BUFFER

CLERR CURSOR POSITION
CLERR SSENSE

(SCURS)

DO AN ENDING SEQUENCE

QUEUE
A CE
8 DE TO SCMD

SENSE

(CRUNCH WHATEVER WARS

(ESEQ

IN SCMD)

COMMAND

SENSCM:

MOVE THE RDDRESS OF THE SENSE BYTE (SSENSE)
COMPUTE DEVICE ADDRESS AND SE DXCAR

SET UP TO SEND ONE BYTE TO DXBC
SET DEVICE RCTIVE FLAG (DXACT)
EXIT FROM DXISR AND WAIT FOR NEW

-----

ME
.

(SOUTB.

MULTIPLEXER

CHANNEL

DXBR

TT ENTRIES

----

IS COMMAND CHAINING SPECIFIED’

(CMDCHF)

YES,

EXIT FROM

DXISR T0O RLL WPSW =0

IF NO, PICK UP LRST DEVICE ADDRESS

SYSTEM RESEY,

SELECTIVE

RESET,

GO
IF

AND FIND OUT IF
“RTTENTIONTM IFF

THAT HAS
A COMMAND EXECUTED -'MAS 1T BEEN EXECUTED?
INTERFACE

CISCONNECT

(TYPICALLY

STATUS ACCEPYED, CHRNNEL END, "OR CONTROL UNIT END wiLL
TERMINATE DXACT INA COMMAND' SEGQUENCE)
TO_
DEVICE
NOT, GQUEUE

THERE IS A JOB TO DO
RTTENTION IS REQUESTED

(SRORG=!

PARGE 27

ok2 BBk

NEW DXil1-B RESPONDER

MRINDEC-11-DZDXI-B

30-JAN-"8 14:26

£ZbX18.00C

D03

O01-FEB-78

MARCY1! 30A(1052)

PROGRAM DESCRIPTION

-G0 EXECUTE COMMRND.

THOSE THART ARE COMMON TO THE SELECTOR CHANNEL WILL HNOT
BE EXPLRINED HERE - REFER BACK TO SELECTOR
WRITE

FULL

MWRITE:

BUFFER

IS THERE A WRITE IN PROGRESS? (SRBYTC)
IF NO,
SET UP DXBR (DXBR (--=--- SUBFR)

SET UP BYTE COUNTER (SRBYTC)

SET UP DEVICE ADDRESS IN DXCA
SET UP FOR 4
BYTLS MAXTMUM TRANSFER

LR SSENSE
SAVE COMMAND (SLCMD (---=-- SCMD)
SEY DEVICE ACTIVE (DXACT)
SET INPUT FUNCTION 8 GO IN DXCS
EXIT FROM DXISR AND WAIT FOR NEW

THERE WAS R WRITE

éT:éL SRBYTC = 0O,

ENTRIES

IN PROGRESS JUST CONTINUE AS RBOVE

THEN SET UP TO MARXIMUM INPUT BUFFER

[

SRBYTC

ROUTINE

SBUFR
R

IN D¥BC

360

IS DECREASED BY

WRITE

(PREPARE

INCREARSED
(MUX)

WILL

THE FOLLOWING

CONTROL

THE

UNIT

SAME

TRANSFER

END

TT ENTERED

(PCUEND))

ROUTINE

(PCUEND)

BYTES

TIME

THE SAVING OF SLCMD SIGNIFIES TO THE PRESENT ENDING
SEQUENCE (PESEND) THART IT MLST FORMAT THE DISPLAY
(DISCTL)

READ

COMMAND

MREAD:

SAME BRSICALLY AS MWRITE EXCEPT
OUTPUT FUNCTION & GO IN DXCS

PEAD MANUAL INPUT
HMSrMT
FRIEND OR

IF
IF

_5eS

SOUTB AND

SETS

COMMAND
2848

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

QUEUE AN ENDING SEQUENCE TG CHANNEL (ESEQ:)
IF RERD REQUESTED = YES (SRDR@ =1)
CONTROL (SLCMD)
COMPUTE RDDRESS OF OUTPUT BUFFER
COMPUTE THE BYTE COUNT
GO TO RERD (MRERD:)
HWITE:

AFTER

TRANSFER

THE

BYTES,

THE

SAVE

DXBC

CMD

WILL

FOR

DISPLRY

DECREMENT

CRERTING A CONTROL UNIT END TT ENTRY (PCUEND:)
SFEYTC WILL BE DECREMENTED BY 4 ANG SBUFA WILL

T0O

ZERO

09:46

PAGE 28

-B_

NEW Dxi1-B RESPONDER

3é-JQN-78 14:26
b

EO3

OQOLl-FEB-78

MARCY1} 30R(10S2)

PROGRAM DES~RIPTION

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

MULTIPLEXER RERD CR WRITES
FUNCTIONING

CORRECTLY.

-=-MISCELLANEOQUS

ASCOMP:
EBCOMP:

ROUTINES

IF THE D¥ HRRDWARE

---

THESE ROUTINES SPIT OUT THE CHARARCTER
EQUIVALENT OF THE ORIGINAL OCTAL BYTE
IN RSCII, EBCDIC. HEXIDECIMAL , OR GTTAL..

g§¥8:g:

ZISPLAY

CCNTROL ROUTINE

CISCTe:

WRS

IT A READ MANUAL

INPUT

COMMAND

(SLCMD=2)

YES,

PICK

UF SMINS. BRCK UP. BLANK CHARACTER, SAVE SCURS 8 REYURN
SMINS:
SMINS:
SMINS:
WAS

LORDED IN INPUT COMMAND (ENTER DARTAR ON R 7260 SCREEM:
USED IN RERD MANUAL INPUT COMMAND
USED IN PERFORM REARD MANUAL COMMANDS
R

SHORT

YES,

JUST

NEITHER,

THE

WRS IT FRIEND
IF FRIEND AND
COPY INPUT
iF FRIEND AND
DON'T COPY

2848,

READ

RETURN

MANUAL

INPUT

(SLCMD=12)

COMMAND MUST HAVE BEEN R 360 WRITE.

OR 28487
NOT SEPARRTE 1/0 BUFFERS (10BUF=0
BUFFER TO OUTPUT BUFFER
SEPARATE 1,0 BUFFERS (IOBUF=1)
INPUT BUFFER TO OUTPUT BUFFER

GEY ADDRESS OF START OF

INPUT

(SINBF)

wAS YHE LAST CMD A WRITE LINE ADDRESS? (SLCMD=S,

D¥ ABORT
LXRB:

CLERR CX INTERRUPT ENRBLE TO PREVENT
SET _THE DXRBLE FLRG TC RBORT

RANY MORE

(TYPICALLY

(NON

EZIT FROM DXISR

CAUSED

BY A

SYSTEM ERROR

INVALID COMMAND:
----DEVICE STATUS TARBLE FLAGS-----

INTERRUPTS

EXYISTANT

MEMORY,

0[93:46

PAGE

INDEC-11-D2DxI-B_NEW CXi1-B RESPONDER

30-JRAN-TB 14:26

CZéX?E.DCC

MAC11] 30R(10€2)

PROGRAM DESCRIPTION

DESCRIPTION OF THE DEVICE STARTUS TRBLE FLARGS.

FO3

(Ol-FEB-78

C9:46

."HERE IS

ONE FJLL SEY PER SPECIFIED DEVICE.

THEY RRE BROKEN DOWN TO THEIR POSSIBLE CONTENTS

)

HOW THEY ARE USED BY THE PERTINENT ROUTINE

(CLOSEST

SIGNIFICANT ROUTINE)

3) R LISTING OF WHART ROUTINE CLERRS THE FLRG,
OR SET THE FLRG, OF USES THE FLAG.
THESE FLAGS RRE USED ACTIVELY BY
CF SIGNIFICANT EVENTS.

SWRITE:

SRMI:

MWRITE:

N LW
n—0o0

----

¢====

MRMI:

«==== SENSCM:
----- SWRITE: 3 MWRITE:
'---- SREAD: & MRERD:
(=== ERRSCM:
CUE

(=———

«-=--

#
HOW

PROGRAM

"ATTENTION

GSRMI:

GENERATED

MSRMI:

COMMANDS-

IBM 360/370 COMMANDS

THE

PROGRAM

TO VEEP

WERE

TRACK

REMAINING

(TT2 ENTRIES)

RESULT

JSED

PESEND: USED TO QUEUE INFORMATION IN SRDRQ 3 SLTMD FOR
LATER PROCESSING
MEX: 8 SEX: USED TO PERFORM THE 360 CMD - SET UP DX AND DO
MWRITE:
MSRMI:

SET UP

1IN

CLERRED

1IN

TISSRJ:

PESEND:

CDEVST:

(RUN:,ENRBLE:,

P/ISS:

SWRITE:

PINCSE:

PUHENL :

& SWRITE: USED TO SAVE LAST COMMAND IN SLCMD FOR LATER
PROCESS ING
8 SSRMI: USED TO SAVE LAST COMMAND IN SLCMD FOR LATER
PROCESSING.

USED
SEX:

& MEY:

SSRMI:

& MWRITE:

3 MSRMI:

WILL:,PSYSRT:
. PINCSC: .

PESEND:)

PAGE 30

IH:EE
8y Dol
T L1-DIDR 30-JAaNRINDEC
coONIB. LG
-

Dxil-B RESPONDER

11-DIDNI-

GOJ

PROGRAM DESCREPTION
MACY

R(10€2)

O01-FEB-78

ERRSCM:

SSENSE

. ---- INTREQ
----- BUSOUT
«==== SCMDRJ

=100
=40
=200
=20

(==-== EQPCHK
~“Jii USED

LSED BY

SET UP

360 WHEN REQUESTING A SENSE

1E.

SENSCM:

JSED

FmiS:

MOV
IN

CLERARED

SENSCM:

PIHENC:

CMD

#SSENSE.J0xBR

1IN

RUN:

ENABLE

PSYSRT
PSELRY

SWRITE
SREAD
ERASCM

MWRITE
MRERD:

SSTAT
€T AT

. —---

UCHK

---—-

ATIN

---- CE!'DE

(==== CUE

200

=40

MW JSED

~SED BY

360 WHEN REQUESTING

STATUS

:WITH EXECEPTIOM

gfigfggoastcnonous PRESENTING OF STATUS (ATTH) TO

"IE. STOUT: MOV
SEY

JSED

1IN

SSTAT,a0X0S
CLERRED

09:4%

PAGE 3.

HO3

MACY1]l 30RA(10%2)
NEW DXi1-B RESPONDER
MRAINDEC-11-DZDx]1-B
PROGRAM
DESCRIPTION
14:26
30-JAN-"8
<<Ox1B8.00C

PFRRER:

ggv?n:
N

STOoUT:

pésknb: )
:

SCURS

09:4¢

PSYSRT:

SCURS

O1-FEB-78

ORI

«---= ANY 8 FROM O TO 479,

(CURSOR POSITION:

HOW USED

INPUT:

USED TO CARLCULRTE CURSOR POSITION TO CREATE OUTPUT TRBL.E

MSRMI:

(FOR

SINBF

CINBF
HOW

IBM RERD)

SSRMI:

USED

TO CALCULATE BYTE

COUNT FOR USE

USED IN

CLERRED IN

INPJT:
SSRMI:

PSYSRT:
DISCTL:

dDXBC

ERRSCM:

-y

-~~~ RDDRESS OF DEVICE

INPUT

DISPLRARY BUFFER

_ISED

OUMF:

JSED BY PROGRAM DUMP COMMAND TO RSCERTAIN BOUNDARIES
OF THE INPUT BUFFER
UISCTL: USED BY PROGRAM TO CALCULRTE BOUNDARIES FOR INPUY BJFFER
MUWRITE:

SET

INIY:

SWRITE:

USED

InTidcC:

DuUMP
)§)
CISCTL:

PROGRAM

SWRITE:

MWRITE:

~QALCULATION

PAGE

18.0CC

30-JRAN-"8 14:26

SaUTB

EC.7B

HOW

s---

PROGRAM

MACY1l 30R(1082)

DESCRIP TION

103

O01-FEB-78

09:4%

10D

ADDRESS OF DEVICE OUTPUT/DISPLAY BUFFER

JSEC

DUMP:

USED BY PROGRAM DUMP COMMAND TO RSCERTRIN
BOUNDARIES OF THE OUTPUT BUFFER
INPUT: USED TO CRLCULATC STRART OF DRTA LOCQTION FOR

LOADING OF THE OUTPUT BUFFER FOR
R SUBSEQUENT

IB RERD
CiSCTL: USED BY PROGRAM TO CALCULATE BOUNDARIES FOR OUTPUT BUFFER
MRERD: 8 SSRMI: 8 MSRMI: USED TO CALCULATE BYTE COUNT FOR
DXBC (1BM REARD)
PSYSRT:

ERASCM:

SEY UP

INIT:

(INT140:.

MSRMI:

USED

TO CLEAR

OUT

OUTPUT BUFFER

USED TO CLERR OUT BUFFER ARER

USED

ARER

(WITH FILLCH)

(WITH EBCDIC SPRCE =

DUMP:

8 MWRITE: 8 MREAD: USED TO KEEP TRACK OF CURRENT
BUFFER ADDRESS , INCLUDING MEMORY MANRGEMENT-LORDED IN DXBR
ALSO USED TO CALCULATE BYTE COUNY (SRBYTC)-LORDED IN Dx¥BC

100)

PARGE 33

QIO
mm
AT

=11 -DIDZ]1-B_

NEW DXi1-B RESPONDER

~034

JC34

MACY1l 30R(10S2)
NEW Dxil-B RESPONDER
MRINDEC-11-DZDX1-8B
PROGRAM DESCRIPTION
cZDn1B.COC
30-JAN-"8 14:26

JO3

O1-FEB-78

1IN

SET UP IN

USED IN

CLERRED

PCUEND:
MWRITE:

MRITE:
MRERD:

ENABLE: KILL:,PSYSRT:

MREQD:
MSRMI:

SONF

(1)

(=== CNL INE
--=-= CSFFLINE

=0
=1

USED

JUF

ENRBLE:

KILL:

IF DEVICE IS OFFLINE-QUEUE AN INTERVE!""ION REGUEST
TO IBM CHANNEL (SSENSE)
-~ WHEN CHANNEL TIMES OUT WHEN DX DIDN'T RESPOND IT WILL PROBABLY SEND A SENSE CMD , THEREBY
READING THE SSENSE

USED

= O

PCHIS

SRDRQ

SPCRY%

(179

¢~--- READ REQUEST
(-

(====

LERRED

REQO

REQUEST

ACCEPTED(360!

PHIS:

SET

PINLSC: . PESEND:

MSRMI:

SONLF

HOW

CDEVST: « RUN:

09:46

PRGE 34

MARINDEC-11-DZDXxI-B NEW DXii-B RESPONDER
MACYll 30A(]10E2)
PROGRAM DESCRIPTION
30-JAN-TB 14:26
CoDn1B.DCC

KO3

(QO1-FEB-78

D35:46

HOW USED

MEX:

8 SEX:

MSRMI:

USED TO FORCE RN RTTENTION (11) RESFONSE

IBM CHANNEL

BSSRMI:

USED TO DETERMINE

IF AN UNSOLIiCITATED

IBM READ HRD TRANSPIRED-- IF YES,

ENDING SEQUENCE

SET UP

INPUY:

= |

PESEND:

SMINS

USED IN

CLERRED IN

SEX:

RUN:

& MEX:

SSRMI:

SMINS

<---- ADDRESS OF

QUEUE RN

PSYSRT:
SSRMI:

20)

THE DATR POINTER

(MANUAL

INPUT RERD?

HOW USED

DISCTL:
MSRMI:

§EI_UP
INPUT:

USED TO CALCULRTE
SSRM]I:

USED

FOR

USED

DISCTL::
SSRMI: 3

THE

RELATIVE

STRARTING

DRTR

CURSOR POSITION

RADDRESS

CLERRED
MSRMI:

RUN:
PSYSRY:

FOR DXBR

(SCURS!

PAGE

HQCYI& ?0‘2(1052)
NEW DXil-B RESPONDER
MRINDEC-11-DIDXIPROGRAM DESCRIPTION
30-JAN-"8 [M:19
CIOn1B.Fli

i9u4s

1946
18497

.TITLE

.ENRBL
.ENNBL

LO3

01-FEB-78

MAINDEC-11-D2D»I-B
RBS
AMA

(03:46

PRGE 37

NEW 0~11-B PESPCNGEP

MAINDEC-11-D2DNI-B

CZDXIB.P11

NEW DX11-B RESPONDER

30-JAN-T8 14:19

1948

194S

1382

900000

1953
1954
iqss

006001
000002
oooooa

1959

000006
000006

.SBTTL

SYSTEM EQUATES

Ri
R2
R3

=
=
=

R6
SP

=
=

KISAR?

MMSRO

177572

TELETYPE

CHARACTER EQUATES

136
19§§

999907
17234

Py
K?SQRo ==

1964

172300

KISDRO

1963

196S

1966
1967
1968
ig%g

172356
177572

09:46

;

PARGE 38

PROGRAM EQUARTES AND DEVICE ASSIGNMENTS

83888<

{dek
1858

O1-FEB-78

PROGRAM EQURTES AND DEVICE ASSIGNME
VTS
:

1950

19€E]

MACY1l 30R(1052)

MO3

%1
:
%3

“6
23

12777
{5254

172356
172300

1971

000015

¢r

;cnanxngE RE TURN

1973
1974

000045
000003

SPACE
crL.g

=
=

\0
3

: SPACE CHARACTER
;CORTROL g

1977
197
1979

000023
000025
00017~

CTL.8
CTL.U
RUBOUT

=
=
=

23
25
177

1372

{d%e

000012

838857

ILINE FEED

i &BNTRSE B

:CONTROL
:CONTROL
:RUBOUT

S
U

NO3

MRCY1l 30R(10S2)
0l1-FEB-78
09:46
NEW DX11-B FESPONDER
MRINDEC-11-DZDX1-B
PROGRAM EQURTES AND DEVICE ASSIGNMENTS
30-JAN-78 14:19
C20X1B.P11

PAGE 39

RS
EBERI A4F
ERERRR
AFRRRSFRREERSIS
ERBERR
SR RRARRERFRRERFFR
CRFBRRERRERR

E&
B
P®

DEVICE BUFFER LFYQUT

H
R
P ¥

LOC
LOC
LoC

(1 PER DEVICE),

Lttt

-ttt

L L L

Lt S g L e Ll Sl a

0-61 = DEVICE STRTUS TRBLE
62-543 = DEVICE INPUT BUFFER
= DEVICE OUTPUT/DISPLAY BUFFER
654- 1023

s
¥
*

¥
#
»

§¢§§§l¢i§;§§!§§§lliiiiiiiiiliiliil&liiiill;;l;ii;v;;r;;;¢;¢;;;f¢

LAYOUT OF DEVICE STATUS TRBLE

000000
000001

00000e
000003
C00004
000008
000G10

goooiz
000020

000000
000003
000004
000005
000003

001000

000001
000002
00000s
000006
0oogie

scno
SLCMD
SSENSE
SSTAT

=
=
=
=

SINBF
SOUTB
SBUFA
SRBYTC
SONLF

=
=
=
=
=

SMINS

LOCATIONS 22-77 ARE AVAILABLE FOR EXPANSION PURPOSES

OTHER

DX EQUATES

bev
DTAB
TT1
TT2
CEDE
QCUE
NOP
NEWLNE
EBCOSP
SMI
EOM
LINSZ
NOLIN
DISPSZ
TISIZE

=
=
=
=
=
=
=
=
=
=
=
=
=
=

RO
R3
R4
RS
3
10

360 COMMAND EQUATES

AMWRT
CMRMI
CMWTLA
CMREAD
CMSRMI

=
=
=
=
=

SCURS

SRDRQ

0
1
2
3

: CURRENT DEVICE COMMAND
:LAST COMMAND, IF WRITE
'DEVICE SENSE BYTE (NOTE -- MUST BE EVEN BYTE . OCATION
:DEVICE STATUS

&
10
12
14
16

:ADDRESS OF DEVICE INPUT BUFFER
'ADDRESS OF DEVICE OUTPUT BUFFER
: CURRENT BUFFER PTR
:REMAINING S8YTE COUNT
'DEVICE ONLINE - INDICATOR O=ON-LINE 1=OFF-LINE

!START OF MANUAL INPUT DRTA

1?7

:CURSOR POSITION

:RERD _MANUAL INPUT REQUEST -- IF NON-ZERC

25
100
112
152
40.
12.
NOL IN#L INSZ
Sie.

2
g
6
12

; CURRENT DEVICE NUMBER
:ADDRESS OF CUR DEV STATUS TABLE
STUMBLE TABLE ENTRY 1
:TUMBLE TRBLE ENTRY 2
:CHAN END & DEV END
'CODE TO QUE CONTROL UNIT END
:NOP COMMAND
INEW LINE cunnncrsn
:EBCDIC SPACE
C
:START OF nsssncs INDICATOR
:END OF MESSARGE INDICATOR
!NUMBER OF CHARACTERS PER LINE OF 226C ODISPLAY
INUMBER OF LINES PER 2260 DISPLAY
:NUMBER OF CHARACTERS ON THE DISPLAY
:NUMBER OF ENTRIES IN TUMBLE TRBLE

:WRITE DATA (FROM 360 TO PDP-11)
IREAD MANUAL INPUT (PDP-11 TO 360)
‘WRITE LINE RDDRESS (360 TO PDP-11)
*READ FU'.L BUFFER (PDP-11 T0 360)
- }SHORT R;QD MANUAL INPUT (PDP-11 TO 360)
\

PROGRAM

PAGE 4O

Dx REGISTER ASSIGNMENTS 8 LAYOUTS
DXDS OR TUMBLE TRBLE ENTRY 1

PARER
NXM

SELRST
SYSRST
INFDSC
UCHKS
CHENDS
BYSS
CHIS
ESEND
CHEND

£00002
300Ca1

CUEND
1SSREJ
CMOCHN
STKSTB
CMOREJ

100000

4Q0oL0

20000
10000

4000

2000

1000

(TTi)

;PARITY ERROR DETECTED

:NON EXISTENT MEMORY CONDITION

;1BM SELECTIVE RE SET
RESET
:1BM SYSTEM

: 1BM_PROGR

)

D INTERFACE DISCONNE.T

UNIT CHECK WAS PRESENTED TO THE CHARNNEL

HANNEL END WAS PRESENTED TO THE CHANNEL

400
200

BUSY WAS PRESENTED TO THE CHANNEL
:CHANNEL INIT SELECTION SEQ WAS COMPLETEC

:CHANNEL SPECIFIED COMMAND CHAING

100
40
el
10
e
1

:CHANNEL ACCEPTED LRST STATUS
:CHANNEL DATA TRANSFER E!
;DX DATA TRANSFER END
SINIT SELECTION SEQ WAS REJECTED

:CHANNEL COULD NOT ACCEPT LAST STATUS
: CHANNEL COMMAND WAS REJECTED

DXCA OR TJUMBLE TABLE ENTRY 2

(772,

BITS 15-8 = COMMAND (IF AN:
BI17S 7-0 = DEVICE RDDRESS

D»CS CONTROL UNIT STRTUS REGISTER
4000

004000
001000
000400
000200
000100

1000
400
200
100

;BUSY RENRBLE - FOR SELEZTIR

;ON-LINE INDICATION
:CONTROL UNIT BUSY
:DONE FLAG
: INTERRUPT ENRBLE

THRNMNELS

UG
—

BITS 4+3 ARE SET IF EXTENDED ADDRESS 1S UJSED
BITS 2-0 ARE THE FUNCTION TO BE PERFORMED
000001
000003
00000S
000007

;OX RESET_COMMAND

:WRITE DATA TO THE 360
:READ DATA FROM THE 360
;SEND STATUS T0 THE 360

D¥DS OFFSET RAND STATUS REGISTER

BITS 15-10 OFFSET OF SPW TRBLE
STATUS REGISTER DEF (SSTRT) - STRATUS BYTE
000200
000100

ATTH

STAMCD

100

{RTTENTION

:STATUS MODIFIER

32¢

Qo)
Q
£
[&

BO4

09:46
Ol-FEB-78
MACY1l 30R(10%2)
EQUATES AND DEVICE RSSIGNME
175

[TAIV])
mm
[ 1 W]

O
om
L LLWWWy
n—owumn-I1c

4:19

—

rND
O
NONNI/MNIY

N i1-B RESPONDER

" LWwhs--0Onm

0C0040
000020

BABRAS

CUE

BSY

00000e
000001

2848 SENSE BYTE
000200
000100
J00CH40

300023

(')

>—e

mun
<y

DO
ZD

PROGRAM

—4—

NEW D\‘laa RESPONDER

30-JAN-T8

;CONTROL UNIT END

gHgNNEEND

END
EVICE
;UNIT CHECK

{UNIT EXCEPTI
(SSENSE.,

DEFINITION

200

;COMMAND REJECT

:EQUIPMENT CHECK - PARIT< EPROR DUR DRTA

=
=

100
40

2 88!

£OAETBRE 18710 PR N

—~nL—nL
0Ooo0

firuruiu
g
Y
Paredera
= - JOO00
000000V

2092

<Dx1-8

Ne—

CZDXIB.F

oD
coO
D~

MRINOEC-1

co4

iDEVICE OFF-LINE - INTERVENTION REG
:BUS QUT -- PARITY ERROR DURING CHIS

M TR

.SBTTL
THE

000000
000002

TRAP

PAGE 42

IS LORDED

INTC LOW CORE

:FOR MEMORY MRNAGEMENT

HALT

HRLT

.RtPT

: TRARP CARTCHER

. WORD

HALT

3§§8°

Cs
Q)
[@]
1¢ 1]
@)
©)

.ENDR

0C1000

STARY

;ESTABLISH LOC 200 STARTING RDORESE

(09:46

£ L
nn

O01-FEB-78

CRTCHER

TRAP CARTZHEF

.=0

000000

D04

30R(10S2)

[TAIY))
mm
(NI
a]

Lol

o pe

MUY= be e t = b b pe b ba e OO
- OO
NELWNV—-0OWwom 0

}/2

4O
M

Oee

P abdadpapape Pt paPoph oPo Pt Pt po bt bs pa

mfufuru
v ) furfuivVVVVBL

MACY1l
NEW D%i1-B RESPONDER
-p2DOx1-8
TRAP CRTCHER
30-JRN-"8 14:19

S A

NN LW~ OO0ONCAVLWNN-OWONCNIWL-OOVO
NN S WU—-OWOM I

s Dt Pt Dt Pt P Dot Pt Pt ot D =t Pt ot Pt Pt Pt Pt Dot ot Pt Pt Pt Pt Pt Pt Pct Pt P Pt Pt Pt Pt Pt Pt Pt D 4 P Pt Pt Pt P Pt Pt Pt Pt Pt Pt Pt Pt Pt Pt Pt Pt e

NNNNNNNNOC
OO
VININININNINUINL L £ £ £ £ £ £ £ LWWWWWWWWWwwWwuuunumn

OO IV £ W mg

o
]
yz

L DYV VY VL VTV IV TVU U
RN
U D VLTV
VYRR UTULML UV VTV R RV
VRV
VRNV

C-11-D2DXI-B
P11

NEW DXil-B RESPONDER

- 30-JAN-=8 i4:19

EOY

MACY1l 30RA(1052)

PROGRAM START-UP SEQUENCES
_SBTTL

O1-FEB-78

PAGE 43

PROGRAM START-UP SEQUENCES

NORMAL SYSTEM START LOCATION

--1000

:NORMAL START UP

START: ésxooo SYSINT

001003 886382

03:46

:
RESTART ADDRESS -- REENTER ALL PARAMETERS -- 1002
RSTART: CLR
FTIMFL
.RESET FIRST TIME FLAG TO FORCE PAPAMETER REEMTFY

00iC02 005037 C13132

SYSTEM GENERALIZEC INITIALIZRTION PPOCEDURE
SET-UP

001012

001514
061020
001024
001030

001034

Ci2706
000005

012700
012720
Gleve0
012720

012710

012636

SYSTEM GENERATED TRAPS

:
:

C.EAR ALL LIVE SYSTEM VARIABLES
SET UP TELETYPE INPUT - OUTPUT BUFFERS

TELETYPE (CONSOLE) VECTORS ¢ STRTUS REGISTERS

&YSINT: MOV

RESET

000060
010744
000340
011232

TRAP/VECTOR AREA

:
01006

STACK POINTER

8SSTACK, SP

SET UP CONSOLE VECTORS

)

MOV
MOV
MOV
MOV

000340

MOV
:

%60, RO
sTKIN, (RO)+
#8340, [RO)+
sPISR, (RO)+

#340, {RO)

:SET UP THE STACK POINTER
'RESET ALL DEVICES

.START OF CONSOLE VECTORS
:BEG OF TELE INPUT ISP
‘NEW PROC STARTUS
‘BEG OF TEILE PRINT ISR

:NEW PROC STRTUS

SET UP MISC TRAPS

OC10N0

012737

0Olieb72

000004

MOV

8MTO, 4

:MEMORY TIME OUT TRRP

0010S4
001062

012737
012737

011700
000340

000250
0002€e

MOV
MOV

sMMERR , 250
8340, 282

:MEMORY MANRGEMENTM ERROF

001046

001070
001074
001100

001102
001104

012737

012700
012701
10S020

000340

000006

012636
000272

MOV

CLERR ALL VARIRBLES

’

MOV
MOV
CLRB

108:

005301
001375

:
201106

001114
001122

012737

0ig7?37
Cl1e727

012640

012744
D0la744

#3406

012742

DEC
BNE

MOV
MOV

R1
108

: DONE
?
:NO, CONTINUE CLERRING

SET UP TELE BUFFER POINTERS
MOV

013046
013050

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

ENRBLE

8TBUF, TPTR

sPBFS . PFPTR
#PBFS PPPTR
T77

:TELE INPUT POINTER
:TELE OUT FETCH PTR
STELE OUT PUT PTR

FoY4

oCcLroxL
mmm:gu
o

e Pt Pe
o Pt

LY
Y Sy oY

000000
000080

NODMO@DM-1-)
LW—-OWwm

MU
rapabespapapope

Oese
WP

—O
M

1-B RESPONDER
MRCY]1l 30R(10S2) (Cl-FEB-78
PROGRAM START-UP SEQUENCES
19
000100
000100
Toen

01313

00eCeb

011316
Q011314

BIS
8IS
C.R

8100, 37TKS
8100.37FS
PSW

BEG
JMP

GETPRM
THI

TST

FTIMFL

09:46

PRGE 44

:ENRBLE TELETYPE INPUT
;ENRBLE TTY OQUTPUT INTEPRUPTS
;CLERR THE PROCESSOR STARTUS WORC

SEG 08““
SE% CC49

;FIRST TIME THROUGH? fMUST PRRAMETERS BE RFEENTEPEL®
:YES, FORCE USER TO ENTER ALL PAPAMETERS
iNC, RESTART TEST JUSING SAME PARAMETEES

TOTAL SYSTEM RESTART

SEG 204S
SE% CCus

(REQUEST NEW RUN TIME PRRAMETERZ

INFOPMRTIOM

HERE WE ;YQRT GFTHERING THE TEST
~joeor
o n)

[y ey

oo b

000
000

RINT START-UP HERALD MESSAGE

pO47T37T

JSR
JSR
. WORD

PC,CRLF

Z%HEESG
G

GET D¥11 UNIBUSS ADDRESS

;RESTORE THE

CRRRIRGE

:PRINT START-UP MES3G

rQCTAL RDDRESS INPUT

LID UNIBUS ADDRESSESS (176200- 177 602

non

1313
~b20
Cee3

O'-‘C)

nNO—~0»-0O

U
PUN Y Ay
e ——0 0

DEFQULT UNIBUS RDDRESS
Clasie

QEHPRH:

00001s
176200

2cl0

001174
0lesis
01i23e

;RESET FIRST TIME PARAMETERS

JSR
. WORD
. WORD
cMPB
BNE
CMP
BLY

S&hégocf

:FET UNIBUS RDCRESS

MCV

00000+
% ¥

MOV
LR

001254
DCl1eeo

FTIM

GT
BIT
BNE

000037

GET

aews

00263

#CR

uw au

NELPAN
837, R3
NEWPRM

8] 77000

NEWPRM

aNEWPRM 4

R3, UNADDR
JUNADDR
THE Dx11

S ILLEGAL

RESS

770007

(SET UP ?Rn ou TO VALIDATE RDDRESS

:SAVE UNIBUS ADDRESS
:VALIDATE THE UNIBUS RDDRESS
:TRAP WILL OCCUR IF INVALID UNIBUS ROCRESS

INTERRUPT VECTOR ADDRESS (OCTRL RADDRESS [INPUT:

.300vtcvno

(300 - 7700

:RESTORE _MEMORY TIME-QUT

TRAP

;SE§ ug DEFRULT V c?os ACDRESS
:GET VECTOR ADDRESS

:ADDRESS OF THE DEFAULT ENTRY

10 8CR

uns LIEE ERLIHITED PROPERLY °

10¢

TOO Lou GIVE AN ERROR AND REENTER

012Se’

R3, VECTAD

108

é 288 nHER
nnxt suas wo OCTQL uono BOUNDR¢

VALID VECTOR RDDRESSES
DEFRULT VECTOR ADDRESS

000oC!

.ADDRESS OF DEFAULT ROUTINE

:WARS LINE osanxrso PROPERLw

R3,

R3, 4770
10¢
81 ,R3

FORCE ALL PRRMS T2 3E ENTE

'NO, TELL HIM RE
.
——
vatxo unxeus nooa §S? asrussn 176eC0 ANC L7TCC

R3, 8300

000770

:SET UP DEFAULT ADDRESS

N upnn
R3, 8176200

00001s

000300

D013Se
C10337

0s:

.175200 UNADDR

Ri.INOCT
vEtTns

000000

004137
01323e
001344
120427

812833

Pooc

127237

318737 84450

176200

CLR

MOV

mMP

177000
n n oo
n n Ny
n)ufy
n MINUNU)S=
b= pe b b2 bt pos pa ps
W --0OWom 40 N LWy

GO4

MACY11l 30R(1052)
Ol-FEB-78 09:46 PRGE 45
SYSTEM RESTART (REQUEST NEW RJUN TIME PRRAMETERS
.SBTTL

0000000

PUS—= 5= 0o bt bo

MR RN MR RN

DR
Dv
s bos Bt Pt Pt Pt s oo Pe [ )

OV D OL0 DD DO DD
m M o]
OwoN LWM-O0m- I n

NEW D¥il-B RESPONDER
MAINDEC- 11-D2D x]1-B
TOTAL
30-JRN-"8 i4:19
cZ0x18B. el

CHECK VECTOR ADDRESS BETWEEN 300 AND ~~0

LT 770
:YES, REENTER
:WORD ADDRESS”
:NO, REENTER
:SRVE IT

SET STARTING AND ENDING DEVICE CHRANNEL RDDRESSES
JALID DEVICE CHANNEL RDDRESSES
DEFAULT DEVICE CHANNEL ACDRESS

(0Q - FF)
10.10

(HE=

INPLT

2265
2266
2262268
2269
227c

2evi
2272
2273
2274
2275
2276
2277
2278
2279
228C
2281
2282
2283
2284
2285
2286
2287
2z8e
2289
2290
229
2292
2293
2294
2295

o0cbau

001404
001410
001412
00i416
001420
001424
£Gi¥30
001436
001440
001444
0C1450
0Ci452
OCiv36

n--

318255

0s:

09:46

PRGE

EITHER ONE OR TWO RDDRESSES MAY BE SPEZIFIEL.

285

.58 égEV

:DEFRULT TO HEX ADDRESS 10

JSR

RI, INHEX

:GET DEVICE RODRESSES IN HE~

. WOR

DEV"ES

CME

:ADDRESS OF THE DEFAULTM ROLTINE

WP |

187
BMI

R
20s%

BGT
CMPB

208
ga‘o'.

_
: ILLEGAL ENTRY
"MORE THAN ONE DEV” (COMMA, PARRAMETER ZE_IMETER.

JSR

PC,CHTB

:GET ENDING DEVICE

BGY
SUB
cMP
BGY
CMPB

208
SOEV,R3
R3, 87
ot
sCR

:YES ;
:MORE HRN 8 DEVICES”

:BE SURE POSITIVE

;AND NOT GREATER THAN 377 -- HEX FF

R3, 8377

MOV
CMP

R3EDEV
sotv EDEV

:SAVE ENDING ADDRESS
. 1S svnnv LT END?

YES, ERROR
' WAS'DEVICE ADDRESSES DELIMITEL FPLPERAL

:NO, REENTER

ao!

BNE
GET

:SAVE START DEV ADDR

Rg.socv

BNE

306133z

7ML«

R3, SOEV

cMP

Ji2E._+

MOV
MOV

00037~

1T 1S USED RS THE STARTING AHD
AERS
RAEE
PEER
ARGS
BPR

NOTE:

. WOR

0iase2
0125eH

TYPE OF 360,370 CHANNEL
M

MULTIPLEXER CHANNEL

S = SELECTOR CHRNNEL
DEFAULT IS 'S*, SELECTCR CHANNEL
0C146C
001464
001470
0Q1472
001474
001500
001502
001506
001510

001519

BoBNONB-00

2255
2256
2257
2258
2259
2260
2261
2262
2263
2264

BOOOSO
000eC

001344
001352
001380
00! 364
00i366
061370
001374
001400
001402

Q- Oy

324¢c

224§
224*
2248
2249
225C
2251
2252
2253
c284

Ol-FEB-78

TOTAL SYSTEM RESTART (REQGUEST NEW RUN TIME PRRAMETERS!

2241
2242

ssid

HOY

CiasSet
002632

CHTYPE
R1, INOCT

Q=M

.WORD
¢MPB

S0S
RY,8'M

;DEFAULT TQ SELECTOR CHANNEL
M? -- MULIPLEXER CHANNEL --

_WORD

090115
000123

Oiesze

CLRB
ISR

S0s:

CHYYMS

BEQ
CMPB
BNE

%S
Nsupxo

608

INCB

sot

YES MULTIPLEXER CHANNEL
167 - SELECTOR CHANNEL -:NOT S ORM -- ERROR
:SELECTOR CHANNEL

CHTYPE

MEMORY MANAGEMENT

:GET CHANNEL TYPE

:GET MEMORY MANAGEMENT FACILITIES

TIME-OUT TRRAP HANDLER

USED ONLY FOR PRRAMETER ENTRY PROCESS

001516
2J01E20
00iSe4
061835

02262t
00c337
204137
Cl4]30e

177776
011472

&cs.

cHP

CLR

JSR

_WORD

(SP)+, (SP)+

PSW

R1,MESG
PNOMM

DUMP PC AND PSW SAVED BY INTERR.FT

: TURN DOUN PROCESSOR STRTUS

'PRINT “NO MEM MANAGEMENT AVAIL"
:ASK

HAVE

QUESTION

REENTEFREC

£
F

1M: 8

30R(10S2)

MRINDEC-11-ClDN1-B
30-JRN- 8
IZDnIB.Fil

MACYL1l

JNnN
mm
[Q]w]

NEW Dxi1-B RESPONDER

MAINDEC-11-CSDNI-B

2DRIB.F11

NEW DX:1-B RESPONCER

33-JAN-"8 i4:19

2297

furururuuUV VUMD
WWwWwWwwwwiwwwwww
PUNUMUS
0 e b e b s pe 0t s Pe
N—-0DO1IN L WO

001532
001536
001542
001544
001546
001552
001554
001560
001562
001566
001574

105037
004:37
013376
001600
120427
001412
120427
001364
105237
012737
305037

0laseT
9002632

ocrennxns xr MEMORY MANAGEMENT 1S TO BE USED
YES, MEMORY MANARGEMENT TO BE usco
N = NO,'DO NOT USE MEMORY MANAGEMENT

tos:

CLRB
JSR
_WORD
.WORD
¢MPB
BEQ
CMPB
BNE
INCB
MOV
CLR

0001:6

000131
012527
00iSie
17572

0OCOO4

:
004137

002632

001606
001610

001704
120427

00001S

2327

001622

001366

2329

001630

002763

001604

013435

nlel ¥

R1,INOCT

:GET BUFFER RELOC. IN ,0030'5S

- WORD
CMPB

NEHP?O
sCR

; ADDRESS OF DEFAULT ROUTINE
uns LINE DELIMITED PROPER_:”

_WORD

BFREMS

TST
BMI
CMP
BGE
7578

R3
708
R3, 8734
708
MMRESP

0203z

2330
233!
2332
2333
2334

001632
001634
001636
001642
00le44

2336
2337
2338
2339
234C
234]
Sg:g

001652
001654
001660
00i6e4
001666

2344

00l&72

017051

2247

001676

020327

001650

001674
001702
001734

005703
10076l
020327
002356
108737
001412

010304
042704
020427
003407
004i37

BNE

000G22

BLT

000734
01252
0OCECH
00CIcSH
011472

BEQ

.WORD

000134

_ _
01253C

708
70¢

820

REENTER
nuST BE R MULTIPLE OF 2000

:ILLG BUFFER CONST -- LT 20000

!1S NUMBER NEGRTIVE”
YES REENTER ADDRESS
: 16 ADDRESS TOO LARGE’
'YES, REENETER ADDRESS
: WAS' MEMORY MANAGEMENT SPE-IFIELC”

718

:NO,

CHECK

FOR 28K

MOV
R3,RY
‘PUt VALUE IN WORK REG
BIC
8600, R4
: IGNORE ADDRESS EXTENSION BITS
CMP
RY, si5y
:1S IT TOO CLOSE TO 200000 BOLNDAR:"
BLE
NEWP20
:BRANCH IF OK
an
RI,MESG
PRINT ERROR.
CANNOT SET BUFFER S%
:CILOSE TO
R aooooo BOUNDARY THAT'A CARRY WOULD BE NEEDED TO CHANGE
:égENgéggggso RDDRESS BITS.
THE DX CANNOT WORK ACROSS 200000

000741
002336
0i0337

20 ---(20000;

JSR

R3,

g3te

,000°S

(20000 THROUGH 734000)

CMP

23€1

{GET UP TRAP TO TEST MEM(
v MANALEME".T
:CHECK FOR MEMORY MANAGEMEN~

VALID RELOCQTION ADDRESSES (20 - 700)

2328

2248
Sggg

IN? --DO
NOT USE MEMORY MANAGEMENT
xr EQ NO MEMORY MANAGEMENT
2 —-MEMORY MANRGEMENT YO BE USED
e ROR
:MEMORY MANAGEMENT SPEC
_

GET BUFFER RELOCARTION IN OCTAL

ot
8] ,R3

5332

:DEFAULT aourxne RDDRESS

nnnssp
255§ 4
MMSRO

BNE
BIT

2335

:DEFARULT TO NGO MEMORY MANAGEME*i~
:GET MEM MANARGEMENT

MMRE SP
R1, INOCT
MMMES
70S$
RY, 8'N
7o
RY, 8°Y
[Xo! 3

2325 001614 001371
2326 001616 032703 00000i
00ieed

SEG
3
38:7?

DEFAULY IS "N°', DO NOT USE MEMORY MANAGEMENT

DEFAULT RELOCATION ADDRESS

001600

2323
2324

:
:
:

gggé

2303
2304
2305
2306
2307
2308
2309

O0l-FEB-78 09:46 PRGE 47
TOTAL SYSTEM RESTRRT (REQUEST
YEW RJUN TIME PARAMETERS
;

2298
2299
2300

104

MACY1l 30A(10S2)

718:

70$

TOOC

: ADDRESS

cMP

R3, 8134

«NO,

BGE
NEWP20: MOV

)
:

GET TYPE

708
R3, BUFREL

TOO CLOSE

:ASK FOR INPUT RGRIN

MESSAGE

IS IT TOO CLOSE YO I/0 PAGE"

:YES, "REENTER THE RDDRESS
:SAVE REL CONST

OF TEST TC BE RUN

JO4

MAINDEC-11-DZD21-8 NEN Dxi1-B RESPONDER
MACY1]l 390R(10S2) Ol-FEB-78 09:46 PAGE 48
TOTAL SYSTEM RESTART (REQUEST NEW RUN TIME PARAMETERS
30-JAN-"8 14:19
cZDXIB.F11
2353

;

2358

2354

2358
2359

2360
236)
2362
2363

2364
2365

2366
2367
gggg

001710
001714

001720
001722
001724
001732
001736
001740
001744
001746
001752

105037
004137

013534
0017S2
112737
120427
001433
120427
001361
105037
108237

012532
002632
000100
000104
000106
012534
(0125832

40s.:
0£i2534

1008:
.
:

237

378
2377 001756 105037 012533
2378 001762 004137 002632

;

2373
2374

2380
2381

001766

:
:

li0s:

013574

001770
001772

002026
120427

002000
002004

120427
001364

2382 001776 001413
2383
2384

000116

Sgg?

004137

002824

2394
2295

002020
002022

00202k
110337

012834

002016

013636

FRIEND

TSTTYP
R1, 4NOCT

TESTMS
100$
csaccsp FILLCH
RY, 8'0D
InNtT
RY. 8'F
904
FILLCH
TSTTYP

:RESET TEST TYPE
:GET TEST TYPE
:DEFAULT TO FRIEND

:FOR 2848 SET FILL CHAR TO EBCDIC SPACE
:D> --2848 RESPONDER DIAGNOSTIC -:YES, 2848 TEST
{F7 -- FRIEMND TEST -:ILLEGAL ENTRY
'FRIEND MODE -- DEFAULT FILL CHAR TC MULL
:SET TEST TO FRIEND

TEST ONLY

DETERHINE IF SEPARATE INPUT / OUTPUT aurrsns ARE TO BE USED
= YES, MAINTAIN SEPARATE INPUT / OUTPUT BUFFERS
NO.
'USE SAME BUFFER FOR INPUT AND OUTPUT

DEFQUL? IS 'N', NO, USE SRME BUFFER FOR INPUT / QUTPUT
cLRB

JSR

Rl xuocr

:0 =

- WORD
CMPB

INIT
RY, 8'N

:DEFRULT TO
N
:N? == NO
nns

RY #°Y
1108

--YES, SEPRRATE 1/0 BUFFERS-ERROR REQUEST INPUT AGRIN

INCB

:
:

002012

_WORD
.WORD
MOVB
CMPB
BEQ
CMPB
BNE
CLRB
INCB

CMPB
BNE

2387
2388

2392

CLRB
JSR

BEQ

000131

2389

DEFRULT = 'F°, FRIEND

_WORD

gggg 002006 10S523T 012533

2393

F = FRIEND

237
2371

2379

D = 2848 RESPONDER DIAGNOSTIC

gggg

SEG
0048
€En CC48

FRIEND

108U

FIbmsS

INtT

108UF

= YES

-sspnnnfs 1/0 BUFFERS?
1/0 BUFFER --

xr EQ uée SAME 1/0 BUFFER FOR INPUT AND OUTPU”

:SET stpnnave 1-0 BUFFER INDICATOR

TEST MODE ONLY

GET BUFFER FILL CHARARCTER (HEX INPUT REQRUIREC.
ANY VALUE WILL BE RCCEPTED

JSR

R1, INHEX

.WORD
MOVB

INIT
R3,FILLCH

_WORD

FI(LMS

:FILL CHRRACTER

NE W
MARINDEC-11-DIDx1-B
30-JAN-T
CZDxIB.P 11

Xil -B
4.19

RESPONDER

PROGRAM

MACYL1l

PP 01 40 a0 0t @8 w0

09:46

PRGE

PROGRAM INITIRLIZRTICN

INITIRLIZRARTION

MEMORY MANNGEMENT REGISTERS

SET UP ALL DX BUFFERS,

AND DX REGISTERS

:SET UP MEMORY TIME OUT TRAP

aMTO,
4

NIT:

;SET UP DX UNIBUS ADDRESSES

UNRDDOR, R1
8DXDS, R2
813.,.R3
R1, (R2+
(RI)+

|@]
W

»U’lU"OfSNUN

Q0000000
QOO+
== 4o e e

002056

000004

Gl -FEB-78

INITIRLIZARTION

.SBTTL

23%e
2397

KOY

30R(10S2)

108:

; 13 _RDDRESSES (REGISTERS)

iSET _UP UNIBUS RDDRESS
:INCR TO NEXT DX REGISTER
; DONE?

R3
108

'NO, SET UP NEXT REGISTEf

UP DX VECTOR ADDRESS
002L60
00z06M
002070

MOV
MOV
MOV

0i2520
005334
000340

VECTARD,R!

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

COMPUTE ADDRESSES OF

;TRAP

TO DX

ISR

:SET UP PROC STATUS AT INTER.
DX BUFFERS

CURRENTLY THIS INCLUDES DRTR RRER,

002130

wwrn
N
oo0w
noo

000020
012530
012530
o0l1as27

[a]e]e]

012530
20$:

ST
BNE
MoV
MOV
MOV
7578
BEQ

TUMBLE

TABLE.

BUFREL
20$

HRS BUFFER RELOC SPECIFIEC

BUFREL, PBUFR

:SAVE PHYSICAL RDDRESS
:SAVE VIRTUAL RDDRESS
:WAS MEMORY MANAGEMENT SPECIFIEC”
:NO, SET UP BUFFERS

820, BUFREL

BUFREL. VBUFR

MMRESP’

408

YES

MAKE BUFFERS START AT 2000C

MEMORY HRNQGEHENT WAS SPECIFIED
SET UP KERNEL REGISTERS
0-17 777 _= PROGRAM
20000-157777 = BUFFERS (VIRTUAL ACDRESSES
160000-1777277 = UNIBUS RDDRESSES

ONLY I SPACE REGISTERS WILL BE USED

002132

#K ISORO. RS

077406
013100

PBUFR,
R3

077406
000200
172356
002208

012714
0l1271¢c

sKISARD, R4

172340
172300

007600
077406

(R4)+
877406,

(RS)+

R3
R3

308:

R3,

(RY)+

o??wos (RS)+

#200,R

Rq‘ukxsnnr
30
#7600,

(RY)

877406, (RS)

; 1-SPACE PAR
x space PDR
R 0-1777?7 = PR 0-17777

sq BLOCKS UNLIHITED RCCESS
:PHYSICAL ADDR * 2-6

;SET_UP PR FOR VA 20000-157777

;64 BLOCKS, UNLIMITED RCCESS
: INCREMENT' TO NEXT 4K BANK

:ALL BUFFER RDDRESSES SET UP?
iNO, SET UP NEXT REGISTER
:S5EY UP UNIBUS ADDRESS REGISTER
;69 BLOCKS,

UNLIMITED RCCESS

RND

=Pl TRBLE

NEW DXil-B RESPONDER
NRINDECII-DZDXI -8
PROGRAM
30-JARN -778 14:19
c<Dx1B.P

2452
24583

00e2le
00ce20

0 1 e~37
O 1 er3?

000001
000020

MOV

177572
013102

LOY

MARCY1l 30A(10S2)
INITIALIZATION

MOV

Ol-FEB-78

81, MMSRO

820, VBUFA

09:46

PAGE SO

SEQ 00SC
€€, GOSO

.ENRBLE MEMORY MANAGEMENT

:TO 8K BANK OR 20000 AND UP

START SETTING UP SPW TRBLE

1 ENTRY PER DEVICE (256 DEVICES)
ENTRY DE CRIPT ON
VALID DEVICE NUMBERS

BITS 1508 'OOFFSET TO DST TABLE (PHYSICAL ~OCF

----FOR INVQLID DEVICE NUMBERS
BITS

15-8 0

70 = 2 -- UNIT CHECK

THIS TQB%E ég
REFERENCED ON EACH 360 ACTION TO DF TERMINE
VICE NUMBER IS VALID. THIS RUTGMATICALLY DONE
BY THE DX CONTROL UNIT

2473

002226
002232
0oca34
002236
002240

40s:

01370S

MOV
SWAB

CLRB
ASL
MOV

MOV
SWAB

CLRB

002332
002336

RS
RS
RS, 0X0S

:OFFSET

vnOrn R1

TO SPW TABLE

:COMPUTE VIRT ADDR OF SPW TABLE
: #1000

RSL

MOV
SUB
ADD
MOV
CLR
CMPB

R1.PHYOFF
RS’ PHYOFF
#3000, RS
RS, DStoFF
DEV
DEV, SDEV

:COMPUTE TH; OFFSET FOR PHYSICAL RDODRESSES
:VERSES VIRTUAL ADDRESS - FOR MEM MANAGEMENT
:COMPUTE THE OFFSET TO THE DST TABLE
:SAVE OFFSET TO DST TABLE
:STARY AT DEVICE O
IS DEVICE NUMBER VALID

ggv

;SQ(R1)¢

;VALID DEVICE DST OFFSET TO ENTRY

SUCHK, (R1)+

; INVALID DEV # UNIT CHECK

DEV, #256.

;ALL DEVICES DONE?

MOV

50%:

s COMPUTE OFFSET PHYSICALLY
: #1000

FBUFA,RS
RS

BLT
CMPB
BGT

000002

MOV

000400

cMP

R1,STSPW

609%
DEV,EDEV
60S

INC

DEV

BNE

S0$

:SAVE START OF SPW TARBLE

; NO

:T0 NEXT DEVICE

INO, SET UP SPW FOR NEXT DEVICE

NEXT SET UP TUMBLE TABLE AND DUPLICRTE TUMBLE
002340
D0c344
002350
002354
002356
002360

MOV

80%:

MoV
MOV
CLR
DEC
BNE
SET

R1, TTRDDR

R1.TIPTR
sTts12e,R2
(R1)+
RE
80$
UF DST

TO ENTRY

TRBLE

; TUMBLE TABLE PDDRESS

: TUMBLE TRBLE FETCH POINTER
:CLEAR T/T + DUPLICATE T-T (WORD PCINTER
:CLEAR NEXT WORD
;:DONE?
iNO, CLERR NEXT WORD

TARBLE

THE DST TABLE IS USED_TO VERIFY COMMANDS FRPOM THE
360, THIS IS DONE BY THE HRARDWARE
THE

DST

TABLE

IS A BYTE

TABLE.

BrTE

PER P3SSIBLE

NEW DX11-B RESPONDER
MAINDEC-11-D20x1-B
PROGRAM
30-JAN-"8 14:19
CZDx18 .Pll

PAGE

THE ENTRY IN THE DST TRBLE IS

ws
G
@0

es
G
B
B

90t

BRARE KakmBRD

COMMAN
2°§
uEg?EFL NE ngggsss

CE!DE

g53
8

WRITE gurrsn
READ MANUARL INPUT

1
c

SHORT READ MANUAL INFLT

ALL OTHER COMMANDS ARE RESPONDED WITH UNIT CHECK

MOV

#13,R2

DEC
BNE

R2
INITIO

MOVB
DEC
BNE

. (R1)+
#UCHK
R2
1008

MOV
INIT 10: Move

000365
000002

09:46

Z
g}
THE FG LL 85?; TSPE”E E?gi RS FSPOv NVALID
AND RESPONSE
%é COMMANDS Béscn?priou
conngno
TEST 1,0

002410
0o2c412

000013
00es610

O0l1-FEB-78

INITIALIZATION

COMMAND 0-255.

®s

812702
012703
11232l
005302
001375
012702

MOY

30R(10S2)

2208
2509

MACYl]l

100% .

001374

MOV

:NUMBER OF VALID 360 COMMANDS

sVCHMDTB,R3
(R3)+, (R1.+

:VALID COMMAND TARBLE
170 DST TARBLE

8245, R2

*MOVE UNIT CHECK TO IN/ALID ENTRIES

:DONE?
:NO,
MOVE

IN NEXT RESPONSE

COMPUTE MAX NUMBER OF DEVICES
0o2414
002420
002424
002426

013703

EDEV,R3

MOV

sug

SOEV.R3

MOVB

R3, MAXDEV

TNC

002432
002440
002444

MOV
DEZ

013110

MOV

013076

:START AT DEVICE NUMERO UNO

sptv, DEVCON
DEVCON

:SET UP DEVICE NUMBER -1

81,SELDEV

: INIT DEVICE NUMBER FOR MUX AND SEL EXECUTORS

NOTE -- THE DEVICE BUFFERS ARE USED BY THE SOFTWARE ONLY TO CONTAIN
PCINTERS RND INPUT RND OUTPUT DRTR FOR ERCH DEVICE;
------------------------------------------------------------------------

START SETTING UP DEVICE BUFFERS
002452
002456
002460

002520

C13064

R1,SDEVTE

;SAVE START OF DEVICE BUFFERS

MOV

R1,DTAB

iSAVE ADDR OF DEVICE STATUS TABLE

CLR
noy

000420

000006
000076
00c0iC
001040
004740

MOV

DEC
BNE
000006

000c10

DEV

?SZ§.,R2
+

R2
1228

MOV

DTAB, SINBF (DTRB)

MOV

DTAB, SOUTB(DTAB)

MOV

#DISPSZ,
R2

ADD

iDEV_ 8 O

:CLEAR DEVICE STATUS TABLE + INPUT BUFFER
; DONE?
iNO, CLERR NEXT WORD

862, , SINBF (DTRB)

#544.

SOUTB(DTAB)

; COMPUTE ADDRESS OF

INPUT BUFFER

;COMPUTE ADDRESS OF OUTPUT BUFFER

852)

NEW DXil-B RESPONDER
i{ DZOXI- B_
MRINDECPROGRAM
30-JAN-78 14:19
113721
005302

FILLCH, (R1)+
R2

012534

1258
DEV
DEV, MAXDEV

013067

1208

013100

012737

R
8177747, RS

177747
gl3l12
000001

RS, XADDR
81 FTIMFL

004137
0l4eeH
000137

0l14?e
00c720

09:46

PRAGE 52

;FILL OUTPUT/DISPLAY BUFFER
; DONE?

s NO

;HAVE ALL DEVICE BUFFERS BEEN SET JP”

;NO,

SET UP NEXT DEVICE BUFFERS

:SEt UP EXTENDED RDDRESS BITS

H.0.
;SAVE ONLY

2 BITS

:SAVE EXTENDED RDORESS BITS FOR DX CONTROL REG
:SET FIRST TIME THROUGH FLRAG

INITIALIZATION COMPLETE
TELL OPERARTOR WE ARE ALREARDY TO GO
NOTE:

RT THIS POINT THE DX HRS NOT BEEN STRRTED
AND THE OPERATOR MUST TYPE R (RUN COMMAND)
TO THE SHOW UNDER WARY

R1,MESG

; TELL

EXEC

;GET THE SHOW ON THE RORD

RNMESG

OPERATOR WE RARE RERDY TO GO

o]
002624

wei

I W

WE
s me

VALID COMMAND TRBLE
NN LWh—-0O

002576

®s@s

002570

01-FEB-78

®s

002524

NO4Y

TEST I/O
WRITE BUFFER

REQD MANUAL

INPUT

SENSE COMMAND
WRITE LINE ADDRESS
READ FULL BUFFER
ERASE COMMAND
0 = INVALID
é = INVALID
SHORT READ MANUAL

INPUT

2604

30-JAN-"B [4:19

5282

PAGE 53

_SBTTL

INITIALIZATION PARAMETER INPUT AND CONVERSION ROUTINES

SEG

ZE%

INHEX -- PRINT MESSAGE, WAIT FOR INPUT, GET IT AND CONVEPT THE HE~ 77 BI%AR<

:
:

CALL ING seousncs
HEX
JSR

gg{é

261C

o613
2614

:
:

.- WORD
WORD

RDbkESS OF MESSAGE TO BE PRINTED

agoaess OF DEFAULT ROUTINE
R2 = NEXT CHAR POINTER
R3 = BINARY RESULT

RY = (BITS 0-7) FIRST NON-OCTAL CHARACTER

2615

09:46

INITIALIZATION PARAMETER INPLT AND CONVERSION RCUTINES
:

e60v

o6
2609

O1-FEB-78

RS = NUMBER OF CHARZTERS CONVERTED
.MOVE RDDRESS OF CONVERSION ROUTINE TG RS
8CHTB,RS

:
trHEX:

MOV

ggs;

INOCT -- PRINT MESSRGE, WAIT FOR INPUT, + GET IT AND CONVERT OCTALL ~0O BIMARY

2623
2624

:
:

CRLLING seouzcs
JSR
INOCT

gg{g
2618

Sgég

00zb2%

00263C

(12705

300%02

011604

2625
gggg

. WORD noontss OF MESSAGE TO BE PRINTEC

- WORD aoossss OF THE DEFAULT ROUTINE
R2 = NEXT CHRR PTR
R3 = BINARY RESULT

:
:

2628
2625

INRS

2633

002632

012705

011540

tNOCT:

MoV

R4 = (BITS 0-7) FIRST NON-OCTAL CHRRACTER
RS = NUMBER OF CHARS CONVERTED
.SET UP_RDDRESS OF THE CONVERSION ROUTINE
8COTB, RS

2635

002640

004737

Gil404

108

JSR

PC, FRAESG

(R1)+'R2

:GET nooaess OF THE MESSAGE

105737
001367

013054

()
BNE

TCMDAB
108

:COMMAND RBORT
:YES, REASK OUESTION

:
:

2630
§§§é

2634

002636

012102

2636
002644 105037 0130S3
2637 002650 105037 013054
2638
2639

2640

002654
002660

002662

105737

INRS:

308:

013053

MOV

CLRB
CLRB
TSTB

TCAACT
TCMDAB

RINT THE DESIRED MESSAGE
:RESET
nérxvz
FLAG
‘RESET RBORY FLAG

BEG

30$

TCMARCT

uns ENTRY COMPLE TED”?

#TBUF ,R2

WARIT
RDDRESS OF asc or INPUT BUFFER
c? UP

002670 012702 012640
2642
2643 002674 0047165

MOV
JSR

PC, 9RS

co~vsn1 INPUT TO BINAR

2645
2646
2647

BNE
CMPB
BNE

40$
R4, 8CR
5] ;

:NOT DEFAULT TAKE NORMRL RETURN
: ILLEGAL cunR nusr BER C/R
*17S NOTA DEFRUL

2641

2644

2648

2649

2650
2ec€l

002666

001772

002676

005705

002700
002702
002706

002710

002712

002714

002716

001005
120427
001002

157

0C001S

011101

000201

005721
0£0Ca0l

MOV
40S$:

(R1).RI1

RTS

)

RYS

75T

(

Ri+

:LOOK FOR DEFAULT RESP --

'--ZTAKE THE DEFRULT RE TURN
. INCR FOR NORMAL RETURN

Www

CZéAIB.PII

MNEW Dxil-B RESPONDER

BOS

236

MRINDEC-11-DZONI-B

MRCYI1 30R(10S2)

COS

"RNOES14-C0y

.SBTTL

265

54 668y |

e c [PPhe 3

SanRg PuifeB RESPONDERG,c\ crouBCHéle Y9BE | B8RkaNE 5T ERRTE e R

BACKGROUND TELETYPE COMMAND DISPARTCHER

(EXECUTIVE

SYSTEM EXECUTIVE /BRCKGROUND

THE SYS EXEC EXECUTES THE SYSTEM TELETYPE COMMANCS
ENTRY TO_TH

TE&ETYP;
connn~o EXEC 1S PERFORMED

Y EXECUTIN

UMP

YO E

THE CALLER

SHOULD NOT EXPECT ANY REGISTERS 10 ae SAVED OR CONTPROL

RTS

PCED

TO HIS PROGRAM

ENTRY TO THE TELETYPE COMMAND EXEC CAUSES THE STACK PCINTER
TO BE RESET:

THUS,

MOST COMMAND HANDLERS WILL MNOT

266k
2bb”
2668
2bb3
26”0

00000000

WITH LEAVING UN”POPPED" DATR ON THE STRCK.
002720
002724
002730
2734
02740

¢xEC:

109:
c0s$:

2678

JSR

PC,CRLF

:PRINT CR/LF

MOV

JSR

PC,PRINT2

CLRB

TCHMACT

TCMDRB

: RE E- STQBLISH
PUSH STACK
TELE CMD ACT

:CLERR TELE CMD ABORT

7518

DXABFL

:0ID

§7098x

308

YES

MOV

002776

012640
177400
0C3044

26390

308:
40$:

BEQ

RESET

20%

578

BNE

MOV

MOVB
BIC
MOV

CMP
BEQ

DX ABORT AN OPERATION 7

THER

108

1S A

INE COUNTER

no co~rrnus

CMRCT

CMP
TsT
BNE

003024

:CLEAR

LINECT

002774

RINT # -- DENOTE COMMANG MCZE

csSTncx SP

CLRB

THERE
eb82

s’ RO

TELETYPE

COMMAND

8TBUF ,R2

(R2)+ R3
£177400,R3
sTCMDTB. RY

R3, (R4)4
EXECMD

(R49)+,RY
(RY)
408

12 PRINT THE DX REGISTERS
COMMAND T0 EXECUTE

EXECUTE

"WRI

ncnxn IF NOTHING TC D3

TO BE

EXECUTED

:SET UP PTR TO START OF TELE BUFFER

:GET COMMAND IDENTIFIER
:SAVE L.0. BYTE
:SET up PTR TO COMMAND TABLE

:DOES connnuo MATCH TABLE ENTFR-"
'YES. WE GOT A MARTCH - STARTM EXECLTICN
:INCR TO NEXT COMMAND
'END OF TRBLE?
'NO, TEST NEXT ENTRY

COMMAND ERROR - NOTIFY OPERATOR WITH ? AND “BELL"
2694
€695
2696

003026
003032
003036

137607
01134¢
002720

AERR:

MOV

JSR
JMP

8137607

:PRINT

ExEC

:RETURN TO EXEC

PC anufa

AND “BELL"

EXECUTE COMMAND
€700

003042

000124

¢xeECMD:

IMP
TELETYPE

2704

270
270t
e7C?7

DO03044

003046
0030Ss90
0030ee

000101
004050
0C0104
Do343¢e

tcmoTB:

.WORD

J(RY)+
COMMAND

TABLE

:A = RCCESS

.D = DUMP

_WORD

ACCESS

. WORD

oumMP

JWORD

sEXECUTE COMMAND

DOS

= ENRBLE DEVICE
:E

. WORD
. WORD
. WORD
.WORD
. WORD

[72 I

«I

N~ T

= FI.L
F

oun -0
—unC
0

CIom e
£
OO MU
PG = (s
O % W
WO

oMU
o
IR T RE Jat v Ink INE N I
I
Y I | ~3 ]
PUN)INY S e 0t Pt b B2 s e s b= (D) |®)
fs--0VONOCNLWN—O
Wa

PAGE SS
MACY1ll 30R(10S2)
09:46
Ol-FEB-78
NEl Dwil-B RESFINDER
MRINDEC-11-0ZDx1-B
BACK GROUND TEILETYPE COMMRND DISPATCAHER (EXECUTIVE)
CZOXIB.P11
30-JAN-"8 [4:19

HELP

COMMAND

INPUT
KILL

RUN

STOP

;sEND OF

TARBLE

EOS

MQINDEC-11-DZOx1-B Neu x1-B RESPONDER
MACY11l 30R(10S52) Ol1-FEB-78
BACKGROUND -- RUN COMMAND
19
30-JAN--8
CZDXIB.P11
5753
-4

]

_SBTTL

09:46

PAE €6

BACKGROJND -- RJN COMMAND

SZSE

R = RUN COMMAND

o~or
2728
2°29

:
:
:

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

S;g?

003112

032?77

001000

2734
2735
Fhe
2737
2738
2739
2°40
2741

003122
003126
003132
003136
003142
003146
003152
003156

005077
005:7?7
012700
004737
004737
105063
105063
005063

007342
007336
000001
010256
010310
000002
000017
000020

2742
2743
2744
2745
2746
2747
748

2749
2750
2751
2762
27S3
2754
2785
2756

2787

2755
Z~3S

OVER THE DX.

732

2733

SE% CCSe
2056
€€

063120

003162
003164
003170
003172
003176
003202
003206

003212
003216
003322
003224
003226
003230

001342

005200
120037
003762
105037
105037
105037
013701

010137
012702
005021
005302
001375
012737

003236

.
0S3777

0032s2

052rr7

003244

(QC3ees

00~350

RUN:

BIT

108:

CLR
INC
MOV
JSR
JSR
CLRB
CLRB
CLR

013067
013070
013074
013072
013062

BNE

;1S DX ENRBLED’

J0XCS
J0XCS
81,0EV
PC.COEVST
PC' CSPWST
SSENSE (DTARB)
SRORQ(DTARB)
SMINS (DTARB)

SINTYIALIZE THE DX
'SET GO
!START CLEARING DEVICE TABLES
:CLERR DEV STATUS TABLE
L
'RESET THE APPR € W STATUS ENTRY FOR THE OE.IZE
: CLEAR SENSEBYTE
'CLERR THE RERD REQUEST
'CLEAR THE START OF MANURL INPU”

:YES,

ERROR

INC
CMPS
BLE
CLRB
CLRB
CLRB

DEV
DEV, MRXDEV
10%
DXACT
CMDCHF
DXABFL

:INCR TO NEXT DEVICE
:RRE WE DONE
INO, DO NEXT osvxcs
:CLEAR DX ACTIVE
F
:CLERR COMMAND cunxnxnc FLAG
CLERR DX RBORT FLAG

R1.TTPIR
sT¥s12E, R2
(R1)+
R2
20s
81, MDEV

'RESET THE SOFTWARE T/T POINTER
!SET UP CLERR consrnnr (WORD COUNTER
:CLEAR T/T AND DUP
:ARE WE DONE?
INO, KEEP ON CLERRING
:INIT THE DEVICE NUMBER FOR MUX

MOV

013060
001000

8DXONLN,dDXCS

CERR

rrnoon R1

GET THE TUMBLE TRBLE ADDRESS

000001

013076

MOV
MOV
CLR
DEC
BNE
MOV

013112

007224

BIS

AADDR, DXCS

001100

007210

BIS

.oxsna'oxoan J0XCS ;ENRBLE THE DX

052777

00400C

000137

002720

208:

0Gr216

308:

B1S

IMP

#BSYEN, JDXCS

EXEC

; AND SEL EXECUTOR ROUTINES
‘SET UP THE EXTENDED ADDRESS BIT3

:SEL CHANNEL - SET BUSY ENRBLE

naxnosv-xx-DIDNI-B

oONIB.FL

NEW D¥i1-B RESPONDER

33-JAN-78 [4:19

S'eo

MRCY1] 20R(1052)

BACKGROUND -- STOP COMMAND

2763

2762
E:EE

2768

2769
2770
2771

2"y

SZ;@,

277s
R4

Frand

gzgo

003264
D03:266
003272
003274

2°86

003302

111204
120427
001422
120427

000015

120427

00010S

003300

001413

2787
2788
2789

003306
003310
003314

001410
120427
001405

2791
2792
5333

003322
003324
003330

001402
000137
110437

003316

120427

&~cP:

000104

-£5, OC§°

BACKGROUND -- STOP COMMARND

ARFTER THE NE~*

“wIZ

NEXT ENDING SEQUENCE

THE FOLLOHING ronnars ARE ALLOWED

S(C/R)

STOP DX IMMEDIRTELY

sx(r/a) -- STOP DX AFTER MNEXT INITIAL SELECTION SEGUENZE
SD(C/R) -- STOP DX AFTER NEXT DATA TRANSFER 1S COMP_ETEC
SE(C/R) -- STOP DX AFTER NEXT ENDING SEQUENCE IS PECEI/EC
SP(C/R) -- STOP ON NEXT PARRITY EROR RECEIVED FROM CHANMNE.

STOP WAITS UNTIL THE SPECIFIED CONDITION IS MET. THEN, THE

DX 15 DISABLED AND THE DX STATUS REGISTERS ARE

DUMPED ON THE CONSOLE TELETYPE.

A RUN COMMAND (R) MUST BE EXECUTED BEFORE ANY MORE

ACTIONS WILL BE PERFORMED ON THE DX.

c8Cl
gggg
GO2720

2806

gggg

042777
004737
004137
014016

00010C
011330
011472

2614
26:c

002364
003370

004737
012703

004760
0G0OIS

003360

013702

013106

007122

10¢

' YES, SET STOP FLAG

‘E = AFTER THE NEXT ENDING SEQUENCE

108

BEQ
JMP
MOVB

108
CERR
RY,DXSTPF

YES SET STOP FLAG
: ILLEGAL FORMAT -- GIVE ERR.F
:SET THE STOP FLRAG

WHEN THE STOP CONDITION IS SATISIFIED,

UNTIL IT IS SATISIFIED OR ANOTHER REGUEST

RY,

#'P

="STOP ON PARITY ERROR"?

THE Dx ISR WILL RBORT ALL DX ACTIVITY ANC
SETA FLAG CAUSING ALL DX RELISTERS TO BE
DUMPED BY "STOPDXTM, BELOW
THE STOP CONDITION WILL REMRIN

IN EFFECT

SUPERCEDES

)

JMP

STOP THE DX AND PRINT THE REGISTERS

J03340
003346
003352
003356

RY, 8°'E

CMPB

00302
013066

2809
2810
2811
28l2

CMPB

;GET THE TYPE OF STOP INDICATED
i IPMEDIATELY?
ves oxsnaL DX AND PRINT REGISTERS
:D
= AFTER
NEXT onrn TRANSFER?
:YES, SET STOP FLAG
i1
='AFTER THE cuxs SEQUENCE
vss SET STOP FLRAG

000120

2800

2300137

(R2) R4
Ry, stk
srbpox
RY,8°0D
10¢
RY #°']
108

:
;
;

£C3334

MOVB
CMPB
BEG
CMPB

BEQ
CMPB
BEG

000111

2796
2797
S%gg

2813

B 2057

AFTER THE NEXT DATA TRANSFER COMP_ETINN, OR AFTER “HE

BEQ

2795

588;

PARGE ST

2781
2782
2783
2784

2790

09:46

STOP DISBLES THE OX IMMEDIATELY,

:
:
:

gzgg

Ol-FEB-78

S = STOP DX COMMAND

2-67

2785

.SBTTL

2764

FOS

IT.

EXEC
NOTE

&ToPDX: BIC
JSR
JSR
.WORD
MOV

JSR
MOV

:RETURN TO THE EXEC
THE PRINT OUTS WILL BE

IN OCTAL

8DXENB, JDXCS
PC, CRLF
RI nssc
STPMES

:DISABLE THE DX
'START AT NEW LINE
!PRINT “CURRENT DEVICE ~-- *

PC, HOMP
213..R3

:DEVICE NUMBER IN
HEX
'PRINT "HE 13 DX REGISTERS I' 517mc

CDEV, R2

:CONVERT

AND PRINT

THE CURRENT

003374

005303

L
10503
O0a3kee

00s07?
00S277
00Cc137

Oi24éH

004670

013072
007046
00TM04c
pgeret

108:

MOV

'?§°s'"éa

8c.6c70r9
e

108
DXABFL
LS
aD¥CS
ErEZ

09:4b

PRGE S8

N1V}
mm
[T

GOS

MACY1l 30R(10S2)
01-FEB-78
MARINDEC-11-DIDx1-B
NEW Dxil-B RESPONDER
BACKGROUNC -- STOP COMMAND
30-JAN-T8 14:19
2<Ox1B.FP11

:STRARTING POINT

JGET THE RSGI?T?R COMTENTS
:ARE

INO.

PRINT
00

OCTAL

DUMP NEXT WORC

‘YES. RESET THE RBGRT FLAG
‘RESET THE O~
RN

RETURN

773

YHE

E-ET

HOS

MACY1ll 30R(10S2)
OL1-FEB-78
NEW D‘i}-B RESPONDER
MAINDEC-11-DI0%1-B
COMMAND
DUMP
-~
BACKGROUND
[4:19
30-JAN-"8
<ZDn1B.P1I
.SBTTL

282%
2826

BACKGROUND - - OLMP COMMANC

THE DUMP COMMAND DUMPS THE SPECIFIED DATR RREA ON THE
CONSOLE TELETYPE IN THE SPECIFIED FORMRART.
THE

834
835
283¢

ARE
AVAILABLE:
gn?Ls gna%E Isrcggsry »
ou:; Bg:L?cgvsr
U
IN L 8855 7
gon B¥v?EE YYGIVEM
ump 3u73u7 BUFFER OCTAL
LIMITS

WING COMMAND SYNTRYES

. 0LL81¥.x
M, X, YY
BéT'x'YY

0555545, EEEEEE, X DUMP BETWEEN THE
N

CQDE

WHERE: X = A-ASCII E-Eecoxc. H-HEX, 0-OrTAL

2837
2836

YY = THE DEVICE ADDRESS IN'HEX

2829
2845

THE DUMPS RARE PERFORMED IN R COLUMN FASHION FOR
OCTAL AND HEX MODES (ONE WORD PER LINE) AND IN R LINE
FRSHION FOR RSCII AND EBCDIC MODES (60 CHRRACTERS PER LI'E

2841
284¢
2843

Dgwu

0C3432

004737

00S0SC

QUHP:

JSR

PC,GLIMIT

SEus B83au8 D833 BEgedt

MOV

#ASCOMP, RS

sgel 933428 948033

MOV

10
Tas"
"
sEBCOMP, RE

IYES,

BEQ

;. YES, CONTINUE DUMP

2852
2853
2854
2855
2856
2857
2858
2859
2860
2861
2862
2863
284
e86S
286t

37 4283

PAGE S9

OUMP COMMAND

283G

2845

09:46

003462
003464
003470
003474
003476
(003502
003506
(003510
003514
003520
003522
003524
003S2e
003532
003534

001414
012705
120427
001407
012705
120427
001462
000137
010537
005700
001043
1
12
001ClY4
00

BEQ

BAd%aE

CMPB

MOV
CMPB

CO47S4
OCO110

138:

(R2)+,RY

RY.8'E

.GET BUFFER LIMITS

.GET DUMP MODE R-/E/0 M

(SET ¥P FOR RSCII DUTMP

.
;Xésx ?§g¥x,unp
EBCD:C DUMP
FOR

;sgr ¥

:15

eBCODIC?

BEQ

SHEXDMP , RS
RY. 8 H
10

CHMPB
BEQ
IMP

RY_ 8'0
10¢
CERR

:1S IT OCTAL?
CONTINUE DUMP
'1LCEGAL ENTRY -- ERROR

RY &',

: 1S NEXT PQSITION A COMMA

PC,GDEV

:GEY THE DEVICE NUMBER -- I =E-

MOV

004670
000117

00302t
0Oi3loy

MOVB

80CTDMP , RS

MOV
157
BNE
MCVB

RS, DMPRDR
RO
DTUMTB
(R2)+,RY

BNE

soé

CMPB

JSR

:SET'UP FOR HEX DUMP
:7IS 1T HEX?

:YES,

CONTINUE DUMP

"SET'UP FOR OCTAL DUMP

'YES,

:SAVE ADDRESS OF DUMP ROUTI'E
‘WRS THIS A TUMBLE TARBLE CuMP"
:YES, DUMP THE TUMBLE TRBLE
:WAS'A DEV 8 SPECIFIED

:NO,

DUMP GIVEN LIMITS

COMPUTE RELOCATION CONSTANT FOR DEVICE
2870
eB?1
287c

003S43
003542
003544

005004

28?5
2876

0035S4
003560

€878
2879
gB2C

003€70
003€74
0J3e0C

0e0437
060437
D17?02
004777
105737
0C137S

CLR
CEC

RY
R3

s RELOCRTION CONSTANT
:DONE ?

002000

ggo

5ggoo,nw

: 70 NEXT DEVICE TARBLES

013120

ADD
RDD

R4, SADDR
R4, EADDR

JSR

PC, JDMPADR

BNE

£03

007330
0i3C7.

BEQ

MOV

3 -

40$

JSADDR, R2
PCER

'YES,

ADD TO START + END ADDRESSES

:ADD RELOCAT TO START ADDRESS
;RDD RELOCAT TO END RDDRESS

:GET WORD

: CONVERT ANC DUMP IT

I10S

WRINOE~-11-C2DNI-B NEW DZ.1-B RESPONDER
MRCY1!l 30A(10S2) Ol-FEB-78
BRCK GROUND -- DUMP COMMAND
30-JRAN-"8 [4:19
I2bx1B. P11
2881

2882
2683
2884
26885
sgg%

003602

003610
003616
003620
QJ03be4
0C362®

0J62737

023737
003003
}10S"3"
001°5”
0J00137

000002

013120
0130c4
0gereC

013120

gggé

;

2893

003632

2895

003642

003636

012700

Q017702

304777

2897

003652

€899

003662

2301
2902

003672
003700

2904

003704

2900

2903
280

23C6

003137S

BEG

ImMP

4TLMTB: MOV

007ese

JSR

3 ¥

108:

MOV

7578

BNE

0036S4

032737

0007??

013120

BIT

003664

062737

001000

013:e2C

ADD

003702

(03710

233712

001003

162737
00S300

001403

000002

108737

013054

GOC137

0oGerec

001782

013120

20%:

INCR TO NEXT WORD

SQbDR EADDR
TCHOQB

:DUMP DO NE
:YES, EXITRBOPT?
: COMMAND

ExEC

:YES, RETURN TO E>EC

S0S

:NO,

PRINT NEXT WORD

8TTSIZE-2,R0

:SET UP COUNTER TO DUMP ENTIRE TUMBLE "~2._%

PC, JOMPALUR

THE CONTENTS
;IS PRIN* RINT
COHPLETE

9SRDDR, R

PCYR
109

:GET STQRTING ADDRESS
:NO,

WRIT TILL DONE

#TTSIZE-1,SARODR ;CHECK FOR WRAP ARCUND

BNE

c0s

SUB
DEC

la SAODR

8TTSIZE, SARODR

;:WRAP AROUND TO TOP CF TARBLE

BEG

305

:7ES,

BEG

7878

30%:

82, SAODR

PARGE 6D

DUMP THEZ DUPLICATE TUMBLE TRBLE IN REVERSE SEQUEMCE

J0040C

J0TeSe

289% 003646 iuS737 013071
2898

CMP
BGT
1578
vl ¥

2888
2889
289C

2894

A_DD

Cl3lee

09:46

IMP

TCMDAB

EXEC

:DECREMENT TO NEXT ENTRY
:HAS ENTIRE TUMBLE TABLE BEE" CUMPECZ"
EXIT TO THE EEC

QRE "WE TO ABORT?
:NO,

FEEP ON DUMPING

;'u¢ BACK TQO Tk ErE:

e 2380
£, el

MRINDEC-11-DIDNI-B
NEW DXi1-B
30-JAN-78 1%:19
C<DNIB. Fil

JOS

BACKGROUND -- FILL COMMAND

0I-FEB-78

03:46

PALE bl

BRCKGROUND -- FILL COMMRND

FILL COMMAND
THE FILL COMMAND LOADS THE SPECIFIED BrTE
INTO THE GIVEN DRTA ARER.

:
:
:
:
003716
0037ee
003726
003732

003736
003740

004737
004737
1iC337
004737

00s050
011604
012534
005302

00Ss004

DO37EE
0c377
pa3776
00o-00s

oy
oo

s
P
e

WwWa)

003762

e
e

002000
000

o nn LU oY)
VoIV
JVo Vo) VolVe} DO DO D DD O DDD £
ps ps pa e|&
o nn TUP=cpepepetue
onctw N0
N L W0 O

MACY1) J0R(10S2)
.SBTTL

2907
2908

2927

RESPONDER

012534
013122

002720

FILL:

FOLLONING SYNTAXES nRE AVAILABLE FOR THE FILL COMMAND:

WHERE:

FIN, XX, YY

FOT.XX.YY

XX IS THE FILL CHARACTER IN HEX

YY IS THE DEVICE ADDRESS IN HEX

JSR

PC,GLIMIT

MOVB
JSR

R3.FILLCH
PC. GDEV

JSR

FILL INPUT BUFFER FOR DEVICE Y¢ WiTH /7

FILL OUTPUT BUFFER FOR DEVICE vY WITH 4~

PC.CHTB

:GET BUFFER LIMITE

.GET THE FILL cunncrsn

:SAVE FIL
'GET THE osvxre ADDRESS

COMPUTE RELOCARTION FOR DEVICE

ios |

Sfig
BEQ

20%

ADD

RY, SADDR

208:

ggo

ACD
MOV

'8200 RY

R4’ ERDOR
SAODOR, R1

DONE ?

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

'ADD RELOC CONST TG END ADDR

FILL BUFFER WITH SPECIFIED CRHARCTER

30s:

MOVB
CMP

FILLCH, (R1)+
R1, EADOR

JNP

EXEC

8LOS

308

:FILL CHRRACTER
:DONE?

:NOPE. FILL NEXT CHAR
:DONE. RETURN TO EXEC

KOS

MACY1l 30A(10S2)
OI1-FEB-78
NEUW Oxil1-B RESPONDER
MARINDEC-11-DIDXI-B
BACKGROUND -- HELP COMMAND
30-JAN-T8 14:19
C20X1B.P11
.SBTTL

014300
002ss1

112100
123727
003374
004737
105737
001002
005302

296S

004044

090137

Q04042

001364

013071
011366
013064

aoe~ae

slojefelol]

PAGE &2

BRCKGROUND -- HELP COMMARND

THE HELP COMMANC PROVIDES THE OPERATOP WITH & SYNOPSIS “F

COMMANDS WHICH MAY BE USED FOR OPERATING THIS SYSTEM.
THE SYNTaX FOR THE HELP COMMAND

MOV
MOV

SHELPMS, R1
SHELPLN,R2

IS:

:SET UP ADDRESS OF HELP MESSASE
;LENGTH OF HELP TMMESSAGE

START OUTPUTTING THE HELP MESSAGE UNDER OUR CONTROL
SO THE COMMAND MRY BE RBORTED QUICKLY.
uied
R

2963

004014
004016
0p40e4
004026
Q403e
004036
004040

2964

m
r
0

012701
012702

004004
004CI10

o s @

2947
2948
2349
2950
2951
2952
2953
2954
295s
2956
2957
2958
2959
2960
2961
2962

Tor ac o000 00 as an

2943
2944
294S
2946

09:46

MOVB

CMPB

BGY
JSR

1518

BNE

(R1)+,R0

PCTR, by

15§
PC, PCHAR

TCAHDARB

208

OEC

IMP

EXEC

BNE

108

:GET BYTE TO OUTPUT

!MORE THEN FOUR CHARACTEF. IN OUTPJT BUFFER""
:

YES, WAIT TIL DOWN AR LITT.E
-PRINT IT ON CONSOLE

:HRS OPERATOR INDICATED A DESIRE TO S7GC=°

YES,

ABORT HELP MESSRGE

:HAS ENTIRE MESSAGE BEEN OUTPUTTED?”
:NO,
OUTPUT ANOTHER BYTE
YES, RETURN TO THE EXEC_TI/E
'

§Eg 8062
cE%

MAINDEC-11-DZD21-8

(18. Pil

NEW D\‘IQB RESPONDER

30-JAN-"8

LOS

é
-FEB-78
MACY1ll 30R(10%2)
BACKGROUND -- RCCESS COMMAN

@s @0

.SBTTL

004050
004054
oo40S6
004060
04064
04066

D04737
00570S
001403
032383

80013
00

010337
013702
105037

011540

ACCESS:

RCCESS SPECIFIEC LOCRTIONS AND CHANGE

Z-"RETURN

PC,COTB

CERR

000137

EXEC

MODE

:GEY rnc START ADDRESS

‘WASA VALID ADDRESS snrsnsov
.
:NO, GIVE OPERATOR AN ERF
:WAS RDDRESS spscxrxso uoao ADDPESS”

Y S,

R3, SADDR
SAODR, R2
Tcmact

snve STRRTINC noonss
:GET OBJECT WORD
:CLERR TELE ACTIVE FLAG

PC OCTOMP

Oo421e

IF DESIRED

BRSICALLY THE FOLLOWING ACTIONS ARE PERMITTED:
AXXXXX
== OPEN AND PRINT SPECIFIED OCTAL LOCATI Ot
[ XXXXXX)(C/R) -- CHANGE CURRENT LOCRI%QH IF CATw
v
SPECIFIED [XXXXXX] AND OPEN NEXT LOCATION

003026

c0%:

%E% 8823

THE ACCESS COMMAND IS R QUICK LOOK AND CHANGE
ROUTINE MAINLY USED FOR PROGRAM DEBUGGING.

000001

013083

PAGE B3

BRCKGROUND -- RCCESS COMMAND

RS
3
#1,R3

10$:

09:46

PC,PRINT2
9SADDR, R2
PC oonfi
R2
PC PRINT2
58hnc7
#TBUF ,R2

opsnogps *ero

GIv

ERATOR AN snnon xuoxcnrx

:PRINT ADDRESS

:PRINT 2'SPRCES

i
:GET CONTENTS OF OBJECT LICATILY
IPRINT CONTENTS IN OCTAL
'PRINT & SPACE

ggrzve COMMAND?
SET UP INPUT BUFFER ADDRESS

012640
011540

PC cots

uns Locn1é0N CHANGED?

000057

30%
RY, 8’/

ves

STORE IT
exITTO EXEC

000015

RY, #CR

GO TO NEXT

:RETURN TO THE EXEC

so$

0oe712
oooooe

30%:
40%:

404
108
R3, 3SADDR
:ggsnoon

0027e0

S0$:

EXEC

IN OCTAL

QNY CHANG

EXEC
Yes RETURN T0 LOCATION?

ES OPEN_AND PRINT NEAT LOC.
.
ROR PRINT CONTENTS OF CURRENT _Z-.
cunnc OPEN LOCRTION
:OPEN NEXT LOCARTION

MRINDEC-11-DZOXI-B

CZOXIB.F11

NEW DXil-B RESPONDER

30-JAN-"8 14:19

381?
1

MOS

MACY1l 30R(1052)

O1-FEB-78

BACKGROUND -- ENRBLE DEVICE COMMAND
;

_SBTTL

09:46

PAGE &4

SEG 0064

ZES 0064

BACKGROUND -- ENABLE DEVICE COMMAND

ggig

£ = EMRBLE DEVICE

3014

THE ENRBLE COMMAND TURNS THE DEVICE SPECIFIED INTO AN
ON-LINE MODE. THIS IS ONLY NECESSITATED BECAUSE R KILL
COMMAND WAS PERFORMED ON THE DEVICE IN QUESTION.

3018

3020

3015
3018

:
:

3019

3022

004222

004737

3024
3055

004232
004234

010005
063705

3029

004252

3C21

004262

3023

004226

3030

004240

004256

EXX

-- ENABLE DEVICE RDDRESS
X

THE DEVICE ADDRESS (XX) *WUST BE ENTERED IN HE/

005302

ENABLE: JSR

013110

MOV
ADC

DEV RS
oevtou RS

105063

000002

CLRB

SSENSE!DTAB)

000137

002720

004737

010256

3027
004242 063705 013114
3028 004246 013715 013116
3026

THE ENABLE COMMAND HAS THE FOLLOWING SYNTAX:

D60S0S

105063

000016

ISR

ADD
MOV
ADD

CLRE

JMP

PC, GDEV

PC . CDEVST

STQPu
RS
DSTOFE . (RS)
RS

SONLF (DTRB)

EXEC

.GET THE osvxce NUMBER
:CLEAR

DEVICE STATUS TABLE

. COMPUTE' THE noon SS OF THESPW TRBLE ENTRY
' COMPENSATE FOR OFFSET DE.ICE noonsss
:ENABLE THE DEVICE NUMBER
:RETURN TC THE EXEC

NOS

MACY1l 30R(1052) Ol-FEB-78
MRINDEC-11-DZOxI-B NEW DX11-B RESPONDER
-- KILL DEVICE COMMAND
BACKGROUND
14:19
30-JAN-78
C2Dn1B.P11
.SBTTL

gggg

3832

:
:

3036

09:46

PARGE &S

BRCKGROUND -- KILL DEViCE COMMAND

= KILL AR DEVICE
THE KILL COMMAND DISRBLES THE SPECIFIED DEVICE RADDRESS FROM

3037
303
3039

:
:
:

PERFORMING TRANSFERS OVER THE DX. 1T PUTS THE SPECIFIED
DEVICE ADDRESS INTO AN OFF-LTNE STATE. AN ENABLE CCMMAND
MUST BE ISSUED BEFORE DRTR TRANSFERS MAY BE PERFORMED WITH

3042

THE KILL connnno HRS THE FOLLOWING svntnx

KILL:

383?

3043

3833
3046

;

THE DX FOR THE SPECIFIED DEVICE ADDRESS.

3047
3048
3049
3050

004266
004272
004276
004304
004306

004737
004737
112763
010005
063705

£0S302
010256
000001

013110

JSR
JSR
MOVB
MOV
ADD

3053
3054

004320
004324

012715
000137

000002
002720

MOV
KILLEX: JMP

3082 004314 063705 013114
3051

004312

060S05

0GOO16

THE DEVICE RDDRESS (xx) MUST BE ENTERED IN HEX

-- KILL DEVICE ADDRESS
X

RDD
ADD

PC, GDEV
PC.COEVST
81 SONLF (DTRB)
DEV,
RS
DEVLON, RS

:GET THE DEVICE NUMBER

#UCHK. (RS)
EXEC

:MAKE THE DEVICE OFF-LINE SEND UNIT CHECK
{RETURN TO THE EXEC

srspu RS

RS, RS

:COMPUTE THE ADDRESS OF THE SPW TABLE
: COMPONSARTE FOR OFFSET DEVICE ADDRESS

MAINDEC-11-D2021-B

CZéx?g.Pll

NEW Oxil-B PESPONDER

3C-JRAN-"B i4:19

3056

MAC /1] 30R(1052)

09:4%
DATA COMMAND
BACKGROUNL -- INPUT CISPLAYO01-FEB-78
:

305*

BO6

3% 2066
COBE
SE%

PAGE 66

BACKGROUND ~-- [NPUT DISPLAY ORTR COMMAND

_SBTTL

I = INPU

THE INPUT COMMAND IS USED TO ENTER DRTR OHTO
& 2260

3058

;

3065

SCREEN AND THEN SEND IT TC THE 360 VIA THE READ MANUAL INPLT

3063
3064

:
:

THE INPUT COMMAND HAS THE FOLLOWING SYNTAX:
-- SEND DATA DDD TO DEVICE xX
IXX.00D....000

3059
gggé

3065

3066

3067

3068
3069
3070
30”71
3072
30°3

004330

004334
004336
004342
004346
004350
0043S4

105737

00100S
004737
120427
001402
000137

004”37

ine_r:

012532

005302
000054
203026
010230

3C79 004360 GCe2632?7 000004 000~3+
3075 004366 00237
3076 004370 032763 00GO01 0200004
3077

004376

001002

3079

004404

016305

3078

3080

3081

004400

004410

00O44iM

005263

000004

066305

000004

112725

000010

0O44e4
004430
004436
004440
00<4442

005263
026327
001423
112204
042704

3089

004452

001415

3092

004462

3088

3090
3091
3093

004446

000304
000004

00001S

004454
004460

020427
002410

000040

004466

003005

020427

000137

162704

003040

004470

3096

004500

000751

004504

000773

40%:

17760C

(20427

3094

000735

3097

603 :

gggg
3100

g{gg

3101

3104

3105
3%89

;

004506

004512
004516

112715

00S263
105263

000152

000004
000017

gigg
311C

0O4s22

108737

013070

108
PC, coev
RY
aot
CERP

JSR

UDEV

;1" LEGAL ON FRIEND TEST

:FRIEND -- GIVE RN ERROK
'GET THE DEVICE
NUMBER
{THE NEXT CHAR MUST BE R .OMM&
SIT 1S, CONTINUE
:AN ERROR WAS FOUND GIVE INDICATION

)
:SET UP THE DEVICE STATUS TABLE PCINTERS

cre
BIT

scbns<0799> .oxsbsz 4 :ARE uc RT rue ENC OF THE BUFFER”
108
CIVE
s
01 SCURS (DTRB) srnkr INPUT on svsu BYTE RDDRESS
308

:START SOM ON ODC BYTE ADDRESS

MOV

SOUTB(DTRB), RS

conpure STARTING RDDRESS

MO B

MOV

RS sfixus<oTae)

s ART CHARACTER TO BUFFER

CMP

R4,

;sno OF

INC

SCURS (DTARB)

RDD

scuns<otne> RS

8SMI

INC
CrP
BEQ
MOVB
BIC

:INCR CURSOR TO ODD BYTE RDDRES

:SAVE START OF DATA LOCAY xon

SCURS (DTAB)
: INCREMENT cunson POSITION
SCURS(DTRB), .oxsfisz-3 .ARE WE
AT THE END OF BLFFEF
7CS
YERMINATE INPUT
(R2)+,RY
cer NEXT xnpurreo CHARACTER
2177600, R4
ISAVE L.O0. 7 BITS
70$

sCR

INPUT’

YES, SET UP
T

CMP
BLY

RY, 8SPACE
608

: CAN’ CHARAC TER ae convsn ED"
:NO, MUST BE BETWEEN 4G - 137

BGT

60¢

;NQ,

qos

sos

CMP

508 :

005004

TSTTYP

578

BNE
JSR
CMPE
BEQ
IMP

BEQ

3095 00474 116425 O0Ol23c4
004802

THE DEVICE RDDRESS (XX) MUST BE ENTERED IN ME,

BNE

000112

COMMANDS

BGE
308:

3082 004420 010563 000020

3083
3084
3085
3086
3087

108 :
208

SuB

#SPACE R

MOVB

MUST BE BETWEEN 40 - 137
SCALE DOWN FOR INDEXING

nroevatnq) (RS)+: co~vsn1 CHARACATER AND MOVE TO DISP_Ar BUFFER

CLR
SET

8°'+

:GET

AND CONVERT NEXT CHARACATER

' ILLEGAL CHARARCTER -- TREAT AS SPACE

TO EXIT

SET EOM INDICATOR

QUEUE READ MANUAL INPUT REQUEST

208 :

MOVB

SEE IF THE DX 1S CURRENTLY ACTIVE

)

TSTB

INC
INCB

8EOM, (RS)

SCURS (DTAB)
SRORQ(DTAB)

OXARCT

:SET EOM INDICATOR

' INCREMENT CURSOR POINTER
:QUEUE RERD REQUEST

;1S C» ACTIVE"

Uo NS AU£ PORUNY
WY~ M)
O 0
WM
5e 0o N
s s 00LW
Ps ps $=a
e
fi

»2

Ore

L e R Y Y o Y Y Y Y X Sy Sy SRy Ny

WWWWWWwWWWwWWwWwWwWww

P11 36—§a~§§e 14:19

W Dxil-B RESPONDER

C-11-DZDn]-

004526

004530

001402

000137

BQCucRoung -- 1N9u§ 8?5&LRY oa§8 cgnngmo
CY1l 3QR(1QS2)

BEQ

IMP

002720

004534

0G4S40
004844
0045s2
4SS4

468¢

60
004Seb2
004564

004566

013746

012746
012737
010046

17777

002720
000340

010146

00C13~

0J655+

:NO,

80s:

MOV

sExEC, - (SP)
8340, PSu
RO, -lSP)

MOV

Re.-(5p)

JMP

PRGE b7

Ré-“

:RETURN ADDRESS TO PUSH STACK
: INHIBIT INTERUPTS
ISET UP PUSH STACK FOR FAKE INTERRUPT

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

O¥ExEC

éf& 882; |

START ASYNCHRONOUS PROCESSING TO SEND ATTENTICH

CREATE PHONY INTERRUPT TO ALLOW DX TO RCT ON ATYENTION
:PSW TO PUSH STARCK
PSW, -(SP

MOV
MOV
MOV
MOV
MOV
MOV

9.46

:vES, RTTENTION WILL BE TRKEN CRRE COF BY DY

DX IS NOT ACTIVE

MOV

(010246

010346
010446
010546

1-77T6

80%

EXEC

01-FEBR-7

:START PROCESSING “HE AT _NTICN

DO6

MACY1]l 30R(10S2)
Ol1-FEB-78
09:46
PRGE 68
TMEW DXil-B RESPONDER
MAINDEC-11-D2D 2]-B
BRCKGROUND SUBROUTINES -- PRINT FORMRTTING
30-JRN-T8 14:19
CoDAIB.FPLI

FORMATTING

CALLING_SEQUENCE

...... R2 CONTAINS WORD TO BE PRINTED

JSR

PC,EBCOMP

...... RETURN

[t Bt 0
Bt B
e Bt Pt ot Pt Dot Pt P
Pt Bt Bt Do Bt Bt

oonnnnnNNNINL L L L1 L L £ LWWW

s Bt Bt Dt § =0 Pt et Pt Pmm Bam Pt Pt Dot Pt Pt Dt Bt Bt Dt Pt Bt B
Pt e et Dt 5t Bt Dt Bt

BACKGROUND SUBROUTINES -- PRINT

DUMP WORD IN EBCD1TM ON TTY

e Bt PP

mmm\:v\:vfl\)\luv\w‘c‘mc‘c‘ma*g;
QDO I
LW ODDNTCNLWN—O
OO NN L WO
VM~ 10U L W OW N0 WUUM
L WO

[ATRINRTNINININININISISIRIRTNINNININIRINININIRTAT
R INIRINININIAIRINIRININININIA NISIR RINININ A RINTIN N N)

.SBTTL

REGISTERS 2 ¢+ 3 RRE DESTROYED BY THIS SUBROUTINE

£ BCOMP: MOV

BBieE 713587 813826
01

)

004602
4606

QTE?O;
i

IT?HOS
g

004620
og4e2H
po4632

042703
116337
13702

177400
011754
0130S

4519

113;83 8150&?

MOVB

3IC

MOV

C130%6

WK’ R3

81%7490C,R3

:acofg(haj,ux

:SAVE WORD TO BE PRINTED
:GET LO BYTE

: CONVERT EBCDIC 70 ASCII

MOV

WK1, R

:GET HI BYTE AND CONVER?

MOVB

EBCDTB(R3)
WK1

;CONVERT CHAR TG ASCII

BIC

0130587

R2, WK

MOV

8177400, R 3

WK,

FALL THROUGH TO RSCII PRINT ROUTINE
OUMP WORD IN ARSCII ON TTY
CALLING SEQUENCE
...... R2 CONTAINS WORD
PC, ASCOMP
JSR

TG BE PRINTED

...... RE TURN

NO REGISTERS ARE MODIFIED BY THIS SUBRGCUTINE
004636
004642
004644
004650
DO4656
DO4ER2
CO466E

S
105737
001!
004737
112737
105337
004737

1578
B

0130SsE
011330
000036
01305S
D11346

MOVB

013055

DECB
JSR

LINECT
108
PC.C RLF

;NEW LINE?
:NO
:YES,
PRINT CRLF

:E,PRINTE

:DECR LINE COUNTER
:PRINT 2 CHARS
'RETURN TO CALLER

830. LINECT
LINES T

DUMP WORD

160 CHARACTERS PER LINE

IN OCTAL ON TTY

CALLING SEQUENCE
...... R2 CONTRINS WORD TG BE
PC.OCTOMP OR ODMP
JSR

FRINTED

...... RETURN

OCTOMP PERFORMS A CR/LF BEFORE PRINTING OCTAL DRTA
NO REGISTERS RRE MODIFIED BY THIS SUBROUTINE
Z04e7C

0C4737

0611330

CTOMP:

JSKR

PC.CRLF

:GIVE & CRLF

004674
004676
004700

30-JAN-"8B
0:0046
010246
010446
0le~04
00S000
0C6102
006100
042700
062700
004737
006102

14:19

ODMP:

MOV
MOV

000006

177770
000060
011366

EOB

PRGE &3
03:46
01-FEB-78_
FORMATTING
BACKGROUND SUBROUTINES -- PRINT
MACY11l

10%:

30R(10S2)

RO, -(SP

.SAVE

86 . RY
RO
R2
RO

:EXTRACT b OCTAL DIGITS
:CLEAR THE WORKING REGISTER
.
:MOVE HIGH ORDER BIT 10 C-BIT
:GET THE REMARINING BIT STILL IN _i'w

PC,PCHAR
gs

-PRINT IT ON THE TTv
;ROTATE }HE NEXT OCTAL CHAP INTO POSITION

R2.-(SP
RY.-1SP

8177770,R0
8°0,RO

IMPORTANT REGISTERS

:ONLY 3 LOW ORDER BITS
:MAKE RSCI]

NEW Dxil1-B RESPONDER

004740
004742
004744
004746
Do47S0
oo47se

QLTEX:

®s

004754

004760
004762
004764
004766
004772
DO4774
004776
005000

00s00e
005004
005006
00s0i2
005016
005022

005024
005030
005034
005036
005040
J0ECHe
J0E344

004737

01133C

000004

HEXOMP:

HDOMP:

10%:

MOV
MOV
MOV
RTS

Re,RO
RY

108

(6P s+ ,RY

(SP)+.R2
(SP:+ RO

000007
011386

OUMP WORC

PRINT ANOTHER CHARAC( ER

:RESTORE USED REGISTERS

:RETURN TCO THE CALLER

IN HEX ON THE TTY

CALLING SEQUENCE

...... R2 CONTAINS THE WORD TO BE PRINT<D
PC,HEXDMP OR HDMP

RE YURN

HEXDMP PERFORMS A CRLF BEFORE OUTPUTTING THE ORTRA
NO REGISTERS ARE MODIFIED BY THIS SUBROUTINE
PC,CRLF

RO.-(SP}

R2.-(SP
R4,-(SP;

84
ES

R2,R0
R
8177760,R0
¢'0,R0

20$:

INO,

R2
Re

177760
000060
002071

:DRTR TO WORKING REGISTER
;ARE WE DONE”

:D0 A CR LF

!SAVE THE WORKING REGISTERS
.4 CHARACTERS PER WORD
_
:ROTATE HIGH ORDER 4 BITS TO LOW JRDER % BITMS

: TO WORKING REG
{GET THE LINK BIT TQQ
:ONLY LOW ORDER Y4 BITS
:MAKE ASCII IF NUMBER

RO, &°'S
20¢
87, RO

:SHOULD IT BE A-F?
:NO,SHIP IT
:YES, MAKE ALPHR

;ARE WE DONE”?

(SP:+.RY

:YES, RESTORE REGISTERS AND EXIT

PC . PCHRR

108

(SP)+.R2

‘SPY+ RO

-PRINT THE HEX CHARACTER

*NO,

CONVERT AND PRINT NEXT CHARCATER

A
mm
Ve

(@]

—~O
MM

R
DODODOLODOTDDDMDPOD
833 NOONILWw-0OWwooNoCNLW

rD
O
> Z

WWLWWWWwLWWwwWwWwWwWwwWwL

11-DI0XI-8

T
RN IS
3239

0OCSC4s

MEW D218 RESPONDER

J0GeCTM

14:19

FO6

PARLE 70
09:46
FEB-?B
ClJ0R(10E2,
FIORMATTING
BRCK GROUNC SUBRQUTINES -- PRINT
MACY
|1

RTS

(FETURN

THE

Zh_ EF

4G
o48

:
:

3244
-+

CALLING SEQ

P RE?URN IF NO ERRORS DETECTED INBUFFER LIMIT SrNTA~

329"

2S5
3587
352:
ggga

IF AN snnoa IS DETECTED, CONTROL WILL BE

EE D TO “CERR*
upou GOOD
URN:

::
::

TO ABORT THE TELET(PE COMMANC.

X
H
"G
- SeerQTn;/;b
1 ;/¥N MMANC STRI'G
S
€
ROTS
B
olpES
encon = END nooR T0 BE ounpeo

35?2

REGISTERS RS,

éggg

IF AN ERROR 1S FOUND CONTROL IS PASSED TO CERR

3269

005050

005000

3262
3263

005060
005062

001G14
120427

000124

BNE
CMPB

GLOCT
RY,8'T

3265

005070

120427

0GO11i

CMPB

RY,

120427

000117

3260
3261
3264

005052
005056

005066

004737
005705

001425

3266

005074

001436

gggg

005102

001453

3267

005076

ALIMIT: CLR

011542

JSR
157

BEQ

CMPB

BEG

35;1
3272

3273
3274
3275
327

005104

00SiCe

(012631

O00CI37

003026

3279

00S1i2

0103372

3281
3282

005122
005124

001370
004737

3280
3283
3284
3285
gsgg

005116

005130
008132
005134
00S140

120427

00570S
001764
010337
0004S4

013120

000OSH

3292

3533
Docicn
bB73eg
Dooia
3295
GOSIf2
013737
01306C
=

G13i20

GLATT

vss SET UP T/T LIMITS

#°]

GLMIN

R4, 8°0

GLAOT

rss OCTAL PRRRHS
=" TUMBLE TABLE
:1

INPUT BUFFER

IMP

='GUTPUT BUFFER

vss SET UP OUTPUT BUFFER LIMI

(SP)+,R1

CERR

OCTAL LIMITS SPECIFIED

gLocT:

mMov

R3, SRDDR

:SAVE START ADDR

BNE
JSR

GLERR
PC,COTB

:GET END RDDR

CMPB

R4 w",

RS
GLERR
R3,EADDR
GLEX

:CHECK FOR COMMA ',
:WAS SECOND PARAM GIVEN"
INO, ERROR
:SAVE END RDDR
:PREPRRE T10 EXIT

SET UP LIMITS OF TUMBLE TRBLE

&LMTT:

mMOVB

cres
MOV

(R2)+,RY

Buact
TTPTR, SADDR

vss SET UP INPUT BUFFER LITMI"Z

013122

112204

:GET FIRST PRRAMETEFR
.
'WAS AN OCTAL NUMBER EMTEREC

MOV

;

00Si42

:RESET BUFFER TYPE

PC,COTB
RS

GLERR:

ST
BEQ
MOV
BR

gggg

ERROR DETECTED - POP OFF RETURN ADDR AND GIVE ERRCF

011540

3288
3289

R3 WILL BE DESTROYEC.

gs;g

R4,

TLBEGAC EnTRy
L

%Sqé

3;&"'“2= nooagss OF FIRST PRRAMETER

‘¢

3243

(A IV)]
mm
[N

ancwcnoumo SUBROUTINES -- COMPUTE SPECIFIED BUFFE® _IMIT2 anl E-

GLiniT -- SET UP BUFFER LIMITS FOR TELE COMMANDS

.SBTTL

§§qg

()

C-11-DIDr1W DXi1-B RESPONDER
MACY1] 30R(10S2) OLl-FEB-78 03:4% PAGE 7!
e
suénoutxnss —- COMFUTE SPECIFIED BUFFER LIMITS ~MT DE/IZE ALOFESZES
BACKGROUND
ggéxx .Pff D.Daé-?a~5§e ?n?iqa €

GOb

0CS1e0

é¢

BB2is8 BBgI3N

09:4%6

PAGE 72

8TTSIZE-2, SRODR ;COfl?gT; QgD:SS?UgS ?PEZBDEPL._Q'E TY ENTRY(

GEEXI

:égq Ug §0 E/XT

SET UP LIMI S FOR INPUT BUFFER OF DEVICE O

013064
000006
g13ieC
000741

36230

;

874704

005206

[Py,

Boass

MOvVB

000116
[yt

liz2a04
12n4e7

000

00S517e
00S174

(R2;¢ R4

gnza

RY. 8"

MOV
MOV
ACD

xnar(kq) snoon
snoon
EAD
EEéSPSzox Fao0R :DISPLAr SIZE + ROOM FOR LI'¥€ AODRESS

MOV

ngVT

nusg BE x~

ék* EgbnNEPDEV O STATUS TRBLE

SET UP LIMITS FOR OUTPUT BUFFER OF DEVIZE O

nnn
Y

el
DY

e b

000

00se3e

ToPE

RacaH

MOV

SADDR ERDbR

A
MOV

2888

§BEC$
v 0RNDSTATUE xnckSoncsssss OF SPECIFIEC BJF
souve(kw) SADDR ILLE“gERgNT
conpu?g s? ??NG
[]

.Béspga +ERDOR §2é PhQ;YCINPU?CHSRQCTER AND UPDRTE POINTER

INSURE ENTRY PROPERLY DELIMITED AND RETURN TO CALLER

BNE

CMPB
—_——————

===

RTS

GLERR

RY,8°,

RO PROPERL* DELIMITED .ERRCR:
NEEY NOY

.cH

3~
nn

O01-FEB-78

BACKGROUND SUBROUTINES -- COMPUTE SPECIFIED BUFFER LIMITS ANU DE/IZE RCORPESSES
/DD

0262737

HOG6

[T
Q]

14:19

329

30-JAN-T8

MACY1l J0R(10S2)

(@16

CoDx1B8.P11

MNEW D¥i1-B RESPONDER

MRINDEC-11-D2ZDOx1-B

MGINDEC-i:1-02C
Ell

NEW D~.1-B RESPONDER

-B_

as--JRh-"8

14:19

106

PAGE 73
O0Ol-FEB-78__09:4b
BACKGROUNC SUBROUTIN ES -- COMPUTE SPEZIFIED BUFFER LIMITS ANU DE/IZE ARUODPESSES
MACy11l

30R(10S 2)

GDEV -- GET THE THE DEVICE NUMBER FROM THE ME~ INPLT
CALLING SEQUENCE

......... 2 = ADDRESS OF DEVICE RDDRESS 1N HEX
DEV

........ Rsfunu IF NO ERRORS COMMAND
DETECTED1S ABORTED BY GOING
If ERROR78£IEE;E°

UPON vaon RE TURN

R3 AND DEV (RO) WILL CONTAIN THE DEVICE RDDRESS
SCaLED 10 I - B, NOTARTION USED 8Y SYSTETM.

R2 WILL PCINT TO THE NEXT CHARRCTER FOLLOWING DEVICE ALCRESS
ADEV:

005307
005306
00s3ie
00S314
005316
005322
pos324
005326
00Ss330

JSR

108:

: CONVERT THE HEX TO BINRRY

108

:ERROR ON INPUT

:~STARTING ADDRESS

SOEV,R3

INC
CMPB
BHI
S$§

R3
R3, MAXDEv
108
R3 DEV

.SBTTL

OX11-B ISR (INTERRUPT REQUEST LOGIC AND TUMBLE TABLE CEZSDE L3311

BMI

00332e

PC,CHTB

SuB

Inp

CERR

RO
R1
R2

R3
RY

INPUT PARAM_ERROR

ISR

Dx11-8B

DX11

{MAKE BETWEEN 1 AND 8
115 DEVICE NUPBER TO0C BIS”
:YES, GIVE ERR
:SET UP THE oevxcs NUMBER

ISR AND RELATED SUBROUTINE REGISTER USRGE
DEVICE NUMBER
UN RSSIGNED
UNRSSIGNED

DEV

DTARB
7171
712

RDDRESS OF CURRENT DEVICE TARBLE
TUMBLE TABLE ENTRY !
TUMBLE TRBLE ENTRY 2

THE RBOVE REGISYER DESIGNATIONS REPRESENT WHRT USUALLY WILL

A REGISTER DURING DX ISR PROCESSING.
BE CONTRINED IN

HOWEVER,

005334

000000000
OO > = b b e e 90—
—NWOO0O000

gangégggTIONS DICTATE REGISTERS MAY BE USED FOR DIFFERENT

4r1cR:

446

005354

013060

MOV

MOV
MOV
MOV
MOV
MOV

¥g¥
BNE

RO, - (SP)

: SAVE HARDWARE REGISTERS

Igsrn,ae

:CHECk FOR ZERO T.T ENTRY UPON INTERRULP~

LOOP

:NON-2ERO -- WERE OK

Rl.-(5P)
R2.-(SP)
R3.-(5P)
RY. -(SP)
RS - (SP,
)

NOTE -- AN

INTERRUPT OCCURRED WITHOUT
R TUMBLE TARBLE

ENTRY,

THE RSSUMPTION IS THEN MADE THRT THE TUMBLE TRBLE

ENTRY'HAS ALREADY BEEN PROCESSED
JMF

DXEXIT

JOb

Ol-FEB-78 09:46 PRGE 74
MACY1l 30R(10%52)
MRINDEC-11-DZD1-B
Dxil-B RESPONDER
OX1J-B ISR (INTERRUPT REQUEST LOGIC ANC TUMBLE TRBLE DECODE LIGIZ.
30-JAN-T8 i4:19
cZDx1B.F11
PROCESS

TUMBLE

559 287%
SE%

TARBLE ENTRIES

FOR CONVIENCE THE PROCESSING 1S BEING PERFORMED
RT THE INTERRUPT LEVEL. IT IS SUGGESTED THRT iTM
NORMAL PROCESSING ENVIRONMENTS THIS PROCESSING

BE DISTRIBUTED TO LESS PRIVILEDGED PRIORITY LEVELS
LEVEL IN RSX11-M.

SUCk RS THE FORK

THE INTERRUPT SERVICE LEVEL PROCESSING REGQUIRED

BY THE DOX11-8 1S TO RELEIVE THE INTERRUPT (DONE BI~
IN DXCS) AND SCHEDULE A REQUEST FOR _PROCESSING

AT ANOTHER LEVEL.

THE LEVEL SCHEDULED TO PERFORM

THE PROCESSING SHOULD BE HIGH ENQUGH
TO PROTECT AGRINST TUMBLE TRBLE OYERFLOW

THE TUMBLE TABLE ENTRIES RRE PROCESSED SEQUENTIAL.Y FROM THE

[racwesveasas as

CIRCULAR BUFFER FILLED BY THE DX. AS ERCH ENTRY IS RETRIEVED

FROM THE TUMBLE TRBLE IT IS ZEROED. IT IS THIS MECHANISM
THRT ALLOWS THE PROGRAMMER TO DISCERN WHEN ALL ENTRIES HRVE
BEEN PROCESSED. WHEN ALL ENTRIES HAVE BEEN
RETRIEVED FROM THE TUMBLE TRBLE THEN THE NEXT ACTION

1S PERFORMED TO THE DX.
IN TUMBLE TARBLE ENTRY

THE DX11-B NEVER ENTERS A ZERGC

MoV

TTPTR,R2

igg)

; ANY ENTRIES LEFT IN T/7?

;:GET

T/T PTR

JMP

DXEXEC

;NO,

EXECUTE NEXT DX COMMARND

ggg

TUMBLE

TRBLE ENTRY AVAILABLE FOR PROCESSING

RESET THE DONE BIT

(RELIEVE INTERRUPT)

COPY TUMBLE TABLE ENTRY TO DUPLICATE TUMBLE TABLE (FOR SYSTEM TESTS PURP
RESET TUMBLE

BIC

ADD
MOV

MOV

CLR
MOV

MOV

CLR

8DONE , JOXCS
RE,R3

TARBLE ENTRY

(2 WORDS)

; CLERR DONE
;SET UP PTR TO DUP T/7

aTtSIZE R3
(R2), (R3)+

:SAVE T/T ENTRY 8l

(R2)+

:CLEAR T/T ENTRY 8l

(R2).TTI

(R2), (RI)+
(R2).TT2

(R2)+

:SAVE T/T ENTRY

:CLERR T-/T ENTRY 82

209%:

——

CHECK FOR POINTER WRAP AROUND

BIT

#TTSIZE-1,R2

BNE
MOV

20%
TTADDR, R2

MOV

START

R2, TTPIR

;AT _END OF BUFFER?
'NOTE -- POWER OF 2 BOUNDRY
iNO
:YES,
RESET PTR

:SAVE T/T PTR

PROCESSING TUMBLE ENTRY ENTRY
SAVE DEYICE RDDRESS
CHECK FOR SYSTEM RESET
VALIDARTE DEVICE ADORESS

33-JRN 78

i4:19

Macyll 30R° 10€2)

01-FEB-78

PAGE 75

09:46

D¥11-8B ISR (INTERRUPT REQUEST LJGIC AND TUMBLE TRBLE DECODE LGGIC.

3443

THERE 1S NO GUARANTEE

NOTE -- IF SYSTEM RESET OCCURRED,

3444

THAT THE DEVICE ADDRESS WILL BE VALID.

J0S446
00s450

010500
Q42700

177400
013106
000200
010000

005002

103405

T12,DEV

:GET DEV

BIC

noohs aoxcs

:SAVE CURRENT DEVICE NUMBER

BIT
BNE
SuB
BMI
CMPB

0iaSee
013067

BLO

3177400 DEV
DEYV

#SYSRST TT1
PSYSRT
SDEV, DEV
308
DEV, MARXDEV
40$

:CLEAR DONE

:SYSTEM RESET
:YES, Psnronn SYSTEM RESET FUNCTION
:GET IN 0-7 PANGE - IF VALID
: INVALID DEVICE NUMBER

:VALID DEVICE?

:YES,

NOT TOO BIG

INVALID DEVICE ADDRESS - BITCH

005506

MOV

BIC
MOV

3448
3446
Ty
kIl
3448

KOB

004137
813762
00G137

011506

308:

006536

QN INVALID DEVICE ADDRESS WILL GENERALLY INDICATE
A PROBLEM IN THE CONFIGURATION OF OX DEVICE
ADDRESSES. BRSICALLY THE DX HAS BEEN STRAPPED
TO HANDLE DEVICE ADDRESSES WHICH OVERLAP WITH
OTHER DEVICES ON THE

INMES

JSR

R1,

DXAB

_WORD

ILLMES

CHANNEL.

:PRINT “INVALID DEVICE"
:RBORT DX11

COMPUTE ADDRESS OF SPECIFIED DEVICES STARTUS TABLE
50s20C
CO-<737

01023C

408:

INC

JSR

DEV

PC, SUDEV

:MAKE DEVICE NUMBER 1 -8

'SET UP RDOR OF DEV STAT TABLE

00
[a]a)
NN
unn

IZCxIB.F

NEW Dxi1-B RESPONDER

U]
mm
[QI

-0ID%1-B
flQINDE~-11

DECODE DX TUMBLE TRBLE STATUS ENTRY

THE FOLLOWING PROCESS INDICATES THE ORGER IN WHITH
THE TUMBLE TRBLE STATUS ENTRY SHOULD BE DECODEL.
THIS ORDER IS IMPORTANT AND SHOULD BE RDHEPED

005530
00SS34
005536

8327CH

020000

YSELRST:

005776
004000

TINDSC:

006026
040000

THXM:

006102
000100

TESEND:

006114
100000

TPRRER:

06244
00200

TCHIS:

006274
000040

TCHEND:

006456
000020

TCUENDC:

00e4Y42

D 0D el 0D 40 00 (D D ¢« D D~ MWD < MW
DD
M« IMe1 M4 T M-I M
T Mo
M
T Mot
VO
VO 400 “ VO VO AVOAVOHVO

TO FOR MOST EMULRTIONS.

8SELRST, TT1

8INFDSC,TT}

INXM

TTl

oessno TTl
PESE
o

apa?gn,rvx
E

8CHIS

TT)

.CHEND TT:
#CUEND, TT1

EELECTIVE RESET?

YEQ PERFORM SELECTIVE RESET
xnrtnrnceoss¢
N-= SXIETENT MEMOK
vsé PERFORn INTER DISC
TEST

INTERFRCE

DISC

NON EXISTSNT MEMORY ERROR®

EXISTENT MEVMCR( ERRZE
NONpRocgszCCE
Ysé
PTE
‘WARS'STATU

!NO, CHECK FOR PQRIYY ERROR
YES, PERFORH Ernrus ARCCEPTM
:DID'R PARITY RROR OCCUR~?
iNO, CHECK FOR
C
Y%é PROCESS PQR*TY ERROR
CHANNEL “STAR

ELECTICN SES

YSS c“fi%cesgnsgt? ibNogEgJ n%g
:DID CHANNEL END OCCUR

{YBe, “PRECESS cANNEL
€T o

A CONTROL UNIT END OCCUR”
:DID
'MO.
IGNORE ENTRY -- ASSUME STACK

" ES. PROCESS CONTRO. UNIT END

STAT.>

(@ W]
0
NN

BUASRE UPATFER-TR 0398 aPRO8 2P pEcODE Lonlr

(

[

ISR

[

NEW DXil-8 RESPONDER
-02D> I~
Dx11-B
30-JAN-

LOB6

NEW DXil-B RESPONDER
Dx11-B
30-JAN-78 14:19

MRINDEC-11-DZDxI-B

CZDx18B. Fll

30R(i0S2)

MARCY1l

0NS7e4
005730
00S732

—ps =+ 2s 00 00 o
O

PAGE

PROCESSING LOGIC

RESET DX ARCTIVE FLAGS AND COMMAND CHARIN FLAG
s1,0EV

PC CDEVST

SSENSE(DTQB)

; STARTY AT FIRST DEVICE
;CLEAR DEVICE STATUS TARBLE

iRESET SPW STATUS WORD UPON SYSTEM RESET
‘CLEAR SENSE BYTE
:CLEAR THE READ REQUEST
OF MANJAL INPUT ADDRESS
:CLEAR ns ges

SRDRQ(DTAR)
SMINS(DTAB)
‘RESET T
SCURS (DTAB)
SSTRT(DTRB)
c ERR THE svnrus
SO?TS(?TRB),RI ET UP TO gts

4DISPSZ,Re
R4
SEBCDSP,
TSTTYP
20$
FILLCH,RY

RY, (R1)+
R2

20$
DEV
DEV, MAXDEV
0s
DXACT
CMDCHF
sCUBUSY, JDXCS
LOOP

013067

W er et e aras

004476

SELRT

SE% 0077

CLE ng DEVISE ETQTUS TABLES AND RESPECTIVE

SYSRT
S:

013070
013074
0004U0
00S364

5EG 0077

SYSTEM RESET OCCURRED FROM_36C

012534

004737
004737
195063
105037
105037
000137

19:46

Dx11-B ISR (TUMBLE TRBLE ENTR:

005736
00S740

005776
006002
006006
00&012
006016
006022

0l1-FEB-78

ISR (TUMBLE TABLE ENTRY PROCESSING LOGIC)
.SBTTL

012700
004737
0Q4737
105063
105063

MOb

ET UP NUM

REGISTE

DISF._AY BUFFER

OF cunnncrERs IN DISPLAY

nssune 2848 DIAGNOSTIC TEST MODE
"WHRT TYPE OF TEST
IF 2848,

USE EBCDIC SPACE

FRIEND TEST -- USE CURRENT FILL CHARACTER

:USE THE FILL CHARACTER

:ARE WE DONE?
*NO, LOOP TILL DONE
:TO' NEXT DEVICE
:ARE WE DONE?

:NO,

CLEAR NEXT DEV srnr TABLE

F
:CLEAR DX ACTIVE
CLEQR COMMAND CHRINING FLAG
RESET CU BUSY FLAG

PROCESS NEXT T/T ENTRY

ISSUED
A SEL ECTIV E_RESET
RESET THE DEVICE ETRTUS TABLE FOR THART DEVICE
THE SEL RESE TIS1 SSUED ARGRINST THE CURRENT
ACTIVE DEVICE

CHANNEL
NOTE:

JSR
JSR
CLRB
CLRB
CLRB
JMP

PC,CDEVST

PC' CSPWST
sstgsstorne)
CMOCHF
LOOP

SENSE

;CLERR DEVICE STRTUS TABLE

{RESET SPW STATUS RESPONSE
iCLEAR SENSE BYTE
:CLERR DX ACTIVE FLAG
; CLEAR COMMAND CHRIN FLAG

INTERFACE
?éSCONNECT WAS ISSUED FROM THE 360
R SPECIFIC DEVICE AND IS UNDER
IS DIRECTED TO
360 PROGRAM CONTROL

IF THE DEVICE WAS RCTIVE
ITS DEVICE STATUS TARBLE WILL

BE CLERRED

NOB

MACY11 30R(10S2) O1-FEB-78 09:46 PRGE 78
MARINDEC-i1-DZDxI-B NEW DX11-B RESPONDER
DX11-B ISR (TUMBLE TARBLE ENTRY PROCESSING LOGIC)
30-JAN-T8 14:19
CZDx1B.PIl1

3562
ggga
Y4

3565
3566

006026
006032

004737
105763

3571
3572
3573
3S74
3575
ggz?
{

006056
006060
006064
006070
006072
006076

10
105037
120037
001002
105037
000137

010310
000000

013070
013074
013074
005364

PC, CSPWSTY
SCMD(DTRB)

006110

004137
013706
000137

011506

3591

0D06114

004737

010310

3597
3598
3533

006126
006132
006140

004737
126327
091003

010402
000000

000011

000002
0OO00O!

000017

3600
3b0i
3602

3603

gggg

006142
006150
006154

006160

882};3

68?583

112763
105063

105037

013070

88?383

0Goo0o4

004737

006204

0015852

3610

006206

032704

3bl1

%13
3614

3b1%
3e16

3617

J0e2l2

00INi2

DXARB

:PRINT "NON EX MEM"

:ABORT DX AND RETURN TO EXEC

THE LAST STATUS SENT TO THE 36C WAS RCCEPTED,

;

IF LAST OP WAS A WRITE PERFORM THE DISPLAY CONTROL ROUTINE

10%:
20%:

010256

3606 006172 110037 013074
3607 006176 123727 013066 000105 30%:
gggg

R1, INMES
NXMMSG

PESEND:

000001

:NO
:YES, RELEASE DX
:DOES DEVICE ans cno CHAIN SPEZ?
:NO, GET NEXT T/T ENTR
:YES, CLEAR FLAG
:GET 'NEXT T/T ENIRY

JSR
_WORD

3594

cctoe SCMD(DTRB):QUE
DEV END + CHAN END
;IS DEVICE USING DX NOW?

PNXM:

JMP

gggg

THE DEVICE STATUS TABLE
CLénR GNORE

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

006536

3590

882{58

BNE
CLRB
CMPB
BNE
CLRB
JMpP

DEV,DXAC
108’
DXRCT
DEV, CMCCHF
208
CMDCHF
LOOP

VST

:CLEAR THE SPW srnrus RESPONSE
IS oevxcs ACTIVE”?

:
:

3587
3588
3589

gggg

MOV
CMPB

;

006102
006106

BEG

JSR

20s%:

3580
gggé

gggg

PINDSC: JSR
TSTB

108:

3578
3579

3583
35684

AND CHAN END ! DEVICE END SET IN STATUS BrTE
IF THE DEVICE IS NOT ACTIVE THE COMMAND WILL BE ISNOPEC

006036 001417
010256
004737
006040
3568
3569
006044
012763
000003 000000
3570 006052 120037 013070
3567

;
:

000010

ACTIVE FLAG

JSR

PC,CSPWST

SLtno(oTae)

ogss LRST COMMAND REQUIRE 2260 DISPLAY EMULATION®

JSR
CMPB
BNE

PC DISCTL
SCAD(DTAB),#11
20%

:YES, FORMAT THE DISPLAY
:WAS'ATTN ACCEPTED?
:NO, CONTINUE

DXACT

:CLEAR DX ACTIVE

58§ocnn TTL

uns COMMAND CHARINING SPECIFIED”

5?58

MOVB
CLRB
CLRB

;

:YES,

INDICATE 360 ACCEPTANCE
FLRAG

£C,CDEVST

MOVB
CMPB

DEV, CMDCHF
oxs?Pr %'E

YES SAVE THE DEVICE NUMBER
:WAS STOP ON END SEQ SPEC?(SE)

#ISSREJ,TT!

;WAS AN

gég

BEQ
BEQ

;

#2,SRDRQ(DTRB)
SLLMD(DTRB)

:RESET THE SPW STATUS BYTE

JSR

BIT

;

CLEAR DX

STPDX
50%

)

:CLEAR THE DEVICE STATUS TABLE

:YES, DISARBLE THE DX

Tss REJ DETECTED?

:NO, EXIT

INIT SELECTION SEQUENCE WRS REJECTED BY DX (FARST CU BUSY SEQUENCE,

IF FREIND TEST MODE -- QUEUE CONTROL UNIT END
ON UNIT COMPLETING TRANSFER
IF 2848 DIAGNOSTIC TEST MODE - QUEUE CONTROL UNIT END
3

B RESPONDER

MACY1l

BO”

30R(10%2)

O01-FEB-78

ISP TJMBLE TABLE ENTRY

Ox 11-B

09:46

PRGE 79

PROCESSING LOGIC.

RESPONSE ON LOW ORDER CHANNEL RDORESS
THE 2648 DEVICE EMULATION

IS EXPECTED TOQ

ISSUE

A CONTROL UNIT END ON THE LOW ORDER DEVICE RDDRESS
OF THE CONTROL UNIT,

MOST OTHER 360,370 DEVICES ARE EXPECTED TG_ISSUE

Lhe—

Gougou
NG \Jgg\l

88285

CONTROL UNI~ END ON THE DEVICE COMPLETING THE OPERATION.

TS1B

312832
090001
0.0230
0co010
005364

BNE
?8;

mMove

000000

JMP

TSTTYP

:FRIEND --QUEUE ZU END ON BUSY UNIT
aET UP TC SEND CUE ON LOW ORDER CONTROLLER ROOR

LOOP

LOOP BACK AND PROCESS NFxT TUMBLE TABLE ETFr

OOCUE SPHC(D’QB)QUEUE CONTROL UNIT END

PARITY ERROR
006244
006250
006252
006260
006262
006270

0130e6

000120

000002
oosele

000003

004737

01031C

123727
001511
032704

013066

001022

00000

000111

JSR

. WORD

¢MPB
BEQ

BISB
IMP
Preeceserveanan

006274

011536

CHRANNEL

WRS DETECTED

INMES

Pnhnss

DXSTPF,8'P
STPDX

10500%
000305
105705
001437
120527

J0301e
D11S06

S3e3e0

110563
0004c!

006536
005Coo

srop ON PRRITY ERROR??
DISARBLE THE D>

IN STRTUS WCRD
CHECK
str UNITWITH
SLICHK , ssrnr<orae$CONTINUE
TUMBLE TRBLE INTERRLGATICH

INITXQTED SELECTION SEQUENCE
THUS FRR THE DEVICE NUMBER HRS BEEN VvALIDATED

AND THE COMMAND CHECKED BY THE DX

TT2 CONTRINS THE COMMAND TO BE EXECUTED

JSR

PC,CSPWST

:RESET THE SPW STATUS BYTE

CMPB
BEQ
BIT
SNE

DXSTPF,s'1
STPDX
SCMOREJ, TT1
208

:WAS STOP ON 1SS SPECIFIED'SI)
:YES, DISABLE DX
:WAS’ COMMAND REJECTED BY DXx°
:YES, COMMAND REJECTED BY THE DX

SON NEXT CHANNEL INITIATED SELECTIDN SEGUENCE

SET UP TO PROCESS

CLRB
SWRB

172
TT2

BEQ
CHMPB
BEG
CMP
BLE
JSR

50%
TT2, 8NOP
508
T12.812
108
R1, INMES

112

rssv 1/0 connnncv

mP
MOVB
BR

DXRB
TT2,5CMD(DTAB)
SCS

:AND RABORT THE PROGRAM
:QUEUE COMMAND TO BE PROCESSED
SEXIT + PROCESS NEXT T-T ENTR

IsTB

000003

:PRINT “PRRITY ERROR"

TCHIS'

VALID COMMAND,
006316
006320
006

:PROCESS SEPARETLY IF FRIEND

408
DEI\:’)E
ll

;RESET DEVICE nooasss BITS
COMMAND TO
L
BYTE

:YES, IGNORE
:WAS COMMAND A NOP?
;vss IGNORE I7
:1S tHISA VALID COMMAND”
:YES, QUEUE TO BE EXECUTED
INO - REPORT AN ILLEGAL COMMAND RECIEVED FROM THE D«

MAINDEC-11-DIDX1-B
CZ0r1B .Fll

NEW Dx11-B RESPONDER

30-JAN-"8 14:i9

MACY1l 30R(10S2)

co7

O01-FEB-7?8

COMMAND WRS REJECTED,

8Be3eE 48738

000016

052763
gogu41i2
032704
001404

300100

006370
006376
006400
006404

0000Ce

1518
BEG

gg:LF(DTQB)

PAGE BO

S0$

DETERMINE WHY

; IS DEVICE ON LINE?
YES, TEST PARITY ERROR

DEVICE OFF-LINE -- RESPOND INTERVENTION REQUIRED SENSE COMCITICN
SINTREQ, SSENSE (DTAB) :SET INTERVENTION REQUIRED Ity SENSE BrTE
8IS
BIT
BEG

100000

09:46

Dx11-B ISR (TUMBLE TRBLE ENTRY PROCESSING LOGIC

SPRRER, TT1
408

sFINISH UP CHANNEL INITIRTED SELECTIOM PROCESS

;WAS R PRR]TY ERROR DETECTED”
;NO, MUST BE ILLEGAL COMMAND

COMMAND WAS REJECTED BECRUSE OF R PARITY ERROR
SET UP BUS OUT SENSE RESPONSE

006406
006414

00000e

352763
poow0o3

BIS

8BUSOUT ,SSENSE (DTAB)

Sos

JEXIT

;SET BUS OUT FLRAG

INVALID COMMAND RECEIVED FROM 360
SET UP COMMAND REJECT SENSE RESPONSE
DOE416

pseres

00Cc200

000002

BIS

#SCMORJ ,SSENSE (DTARB)

;SET CMD REJ FLARG

CHANNEL INITIATED SELECTION SEQUENCE COMMON EXIT LCGIC
120037
00.002
105037
000137

013074
813074
005364

BNE
JMP

LOCP

CcHMPB

CLRB

CMCCHF

:vES, CLEAR THE COMMAND CHRINING FLRG

{AND GET THE NEXT T/T ENTRY

CONTROL UNIT END OF DARTR TRANSFER WARS DETECTED
IF TRANSFER COMPLETE PREPRRE ENDING SEQ RESF
IF TRANSFER INCOMPLETE INCR BUFFER ADORESS
00E<u4e

00644E
poe4se

105037
004737
103017

DECR BYTE COUNT

fengret

OWONTMN
L W)

'Uwpp‘p.—ypowp.

WWWWWWWWwhIW
NN NNINNNNNYN

po6424
006430
0ob432
006436

IF SELECTED DEVICE HAS COMMAND CHRINING IN AFFECY -- KILL IT
:DOES DEVICE HAVE COMMAND CHRINING SPECIFIED?
DEV,CMDCHF
:NO, GET NEXT TUMBLE TRBLE ENTRY
60$

3070
0342

PCUEND: CLRB
JSR

BCC

DXACT

PC, MUXEND
PCHEX

:CLEAR DX ACTIVE FLAG

:HANDLE MUX DATA TRANSFER COMPLETION
!1F SEL CHAN OR MUx [-T NOT DONE, MEREL

MUX DRTAR_TRANSFER COMPLETE
TRERT SAME RS SEL CHRNNEL DONE
00eu4EH

030N04

PCHEN.

CHRANNEL END WRS DEng T E o}
PREPRRE END
G SEQUENCE RESPONSE
C0eu4se
00e4ee

105G37
00ou737

BCHEND: CLRB
JSR

DXACT

PC.MUXEND

;CLEAR DX ACTIVE FLRG

;IF MuX CHRNNEL HAr" _E ODRTR TRANSFER

E~IT

MAINDEC-11-CZDx1-B

C2Dx1B.P1I

006466

NEW DXi1-B RESPONDER

30-JAN-T8 14:19
123727

013066

000104

3 Sé BB8i%e 99334% onooooa oooooo
3733 006504 167763 003766 000014
1
grgs 882?15 88 8“

100000

D07

MACY1] 30R(}1052)

O0i-FEB-78

09:46

PAGE Bi

OXi1-B ISR (TUMBLE TABLE ENTRY PROCESSING LOGIC)
PCHENL: CMPB

FCHER:

BB ABETST BRESED 00O o
$3
>38

DXSTPF,8°'D

:STOP ON DARTR TRANSFER DONE” SC.

SCEBE.scmpcotas;:dbe’ eRAEEEEREEpoNSE

B5%
SUB

gnnxn& 8 arregounr
aoxgc SR YTLfDTQé) snvs

LBSSE”SE‘D*“Sép' gh2e 3ELRBRHAE RERY HINeRERT

IT
£EQ

sPARER.T

108

S
0’
TABLE ENTFRY
NO PROCESS NEXTROR TUHGLE

739

33:0

§;=‘

g;:g

006532

10503T

01306b

3746
3747
748

g;gg

3762

3753
37S4

g;gg
3760
%;25

&TPDx:

CLRB

:
:

ARBORT

04277

001100

00BSSO

000137

010212

006544

10S237

013072

003724

OxRB:

:
0oesSSY

00eS6C
006S62

105737

001002
000137

012526

007210

3;90

g;;é

:
006SEE

013700

3778

006610

001402

3780
3781

3782
2782
3789

2785

CURRENT DX OPERATION

UNRECOVERRBLE ERROR OCCURRED

00eS72
006576
006602
006604

004737
105763
001030
105737

00eei2

000137

006624

001004

006636

005200

006616
006626
Q06634
00ee4C

126327

SDXONLN' DXENB, 3DXCS ox:neLs THE DX

INCB

DXRBFL

:SET'THE DX ABORT FLAG SO THE

ImP

DXEXIT

EXIT

ox Rscxsrsns WILL BE PRINTEC
FROM INTERRUPT

EXECUTE NEXT COMMAND FOR THE DX
BNE
JMP

3283

3773

BIC

OXEXEC: T1STB

3779

:CLERR STOP FLAG

.SBTTL DXI1-B ISR (SELECTOR CHANNEL COMMAND EXECUTICN,

gzgg

3774
3775
3776
3777

DXSTPF

006S36

g;gg
37S9

STOP DX, SOMEONE WANTS TC INVESTIGATE

37S]

013076

8 :

010230
000000

108:

SEX

CHTYPE

:CHANNEL TYPE 0=M,

SEX
MEX

-- SELECTOR CHANNEL EXECUTIVE

SEX EXECUTES COMMANDS FOR THE DX TO A SELECTOR CHANMEL

SEV?CE -DRTA TRSNEFES
MOV

SELDEV,DEV

:GET SEL DEV

308

:NO

013074

PC, SUDEV
SCAD(DTAB}
608
CMDCHF

010212

JMP

DXEXIT

BNE

408

BEQ

000001

1i2763
000413

0000i11

000000

120037

"Je7

30%:
403 :

DATA TRANSFERS ARE COMPLETED IN ONE BURST
JSR
1518
BNE
1578

000017

1=5

:SELECTOR CHANNEL EXEC
SMUCTIPLEXER EXEC

£MPB

SRORQ(DTRB) . #1

MOVB
BR

#11,5CMD(DTAB)
608

~MPE

DEV, MAXCEV

INC

DE/

ISET UP DEV STATUS TABLE ADOR
:ANY JOB TO DO
*YES, EXECUTE 17
‘WAS’ COMMAND CHARINING SPECIFIEC
'YES,

WAIT FOR COMMAND

xs ATTENTION TO BE SENT?
*NO,

CONTINUE
:YES, SET UP TO SEND THE ATTENTION
:FOR THE RERD MANUAL INPUT
170 NEXT DEV
'HAVE

TRIED

THE

HIGHMEST

CE.ICE"

Vit

EOQ7

01-FEB-78 09:46 PAGE 82
MACY1]l 30A¢ os
MAINDEC-11-DZD2I-B NEW Dxi1-B RESPONDER
COMMAND EXECUTION)
CHRNNEL
(SELECTOR
ISR
Dx11-B
30-JAN-78 14:19
CDXIB.PIL
3786

378"
3788
3°89
g:g?

006644

006646
006652
006656
J06660

003402

012700
020037
001345
000137

000001
013076
010&:

3335

3794

006664

116304

000000

000174

013076
006-04

3795
3796
3797

006670
006672
006674

005304
006304
010037

006704

006730

3798

3800
3801
3802
3803
3804
3808
3806
282~
382

006700

006706
006710
006712
006714
006716
006720
006722
00724
ZZerée

007020
010042
010140
006730
007120
00777
0077SC

00776
02322

BLE

508%:

MOV
CMP
BNE
IMP

508

81,DEV
DEV, SELCEV
108
DXEXIT

THERE IS R 0B TC DO,

Los:

MOVB

DEC
RSL
MOV

JMP

SCMDTB: .WORD
_WORD
.WORD
-WORD
WURD
.WORD
.WORD
"WORD
"WORD
_WORD

' YES. RESTART AT FIRST DEVIZE
:15 $HIS WHERE IT ALL STRRTEC"
'NOPE, TEST THIS DEVICE
'EXIT -~ NO TRSKS PENDING
LETS DO IT

SCMD(DTRB)
, R4

;COMMAND TO INDEX

9SCHMDTB(RY)

:EXECUTE THE COMMAND

RY
R4
DEV, SELDEV
SWRITE

SRMI
ESEQ
SENSCM
SWRITE
SRERD
ERRSCM
CONUNE
SATTN
SSRMI

:SCALE 70 0 - I
:MAKE WORD RDDRESS
:SAVE CURRENT oevxcs ACOR
:1 = WRITE FULL BUFFER

:2 = RERD MANUAL INPUT
:3 = ENDING SEQUENCE
:4 = SENSE COMMAND
:6 = WRITE LINE ARDDRESS
:6 = READ FULL BUFFER
:7 = ERRSE COMMAND
210 = CONTROL UNIT END

{11 = SEND RTTENTION 70 36C
Y12 = READ SHORT MANUAL IHFL”

OX11-B

MACYLl] 30R(}1052)
Q0I1-FEB-78
(SEL ECTOR CHANNEL COMMAND

ISR

09:46_ PAGE 83
EXECUTION)

SEY 2082
ce5 CCL83

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

WWWWWWWWWwW
ODOOOMOOOONMOEM
[otetetatptwtndwdut
o
oML WwW-—-0Ow

O
> 2
ST
M

DYR};B RESPONDER

FO7

----

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

WRITE COMMAND RECEIVED FROM 360
PREPARRE TO GET DATA FROM 360

BOTH WRITE AND WRITE LINE ADDRESS COME HERE

006730
006736
006744
006750

003536
003s3C

éHRITE: MOV

SINBF .DTRB) &DXBAR _;SET UP BUFFER ADDRESS

PHYOF F, 3DXBA

suB

003s1i2
0000C!1

R2,

SCMD(DTAB) .SLCMODTAB) ;SET WRITE FLAG
;CLERR SENSE BYTE
SSENSE (DTRB)
:SET DX ACTIVE FLAG
DEV,DXACT
:RESET REMAINING BYTE COUNT
SRBYTC(DTAB)

00341s

PERFORM

READ MANURL

1578

T1STTYP

0C7.2¢

INPJT

COMMANDS

:1S TEST FOR FRIEND?

TRERT ALL REACS AS READ FULL BUFFER

SRERD

:YES,

SRORQ(DTRB)
108
ESEQ

:WAS A READ REQUESTED”
:YES, CONTINUE
;NO, TREAT RS A NOP -- END SEG OMLn

SSENSE (DTAB)

:RESET THE SENSE BYTE

SRDRQ(DTAB)

10%:

SMINS(DTRB),3DXBR ;SET UP STARTING ADDRESS

ggURS(DTRB).RE

SOUTB(DTAB).R2

;DETERMINE ENDING RDDRESS

003400

dDXBR,R?2
c0$
ggEQ

;COMPUTE BYTE COUNT
; INSURE VALID BYTE COUNT
; ILLEGAL

Re, 3DXBC

:SET UP DX'S BYTE COUNT

SRD10

:START THE RERD

003366
013:04

c0s8:

PHYOFF , JDXBR

053356

RERC

007120

:RETURN FROM INTERRUPT

000004

010042

007110
DO7116

:START TRANSFER

8DXWR . JOXCS

000002
000017

010042

90XCA

DXEx1?t

¢RMI:
SSRM]:

g12s3e

;COMPUTE DEVICE RDDRESS

8-01SPSZ-1,3DXBC;:SET UP BYTE COUNT FOP MAx, WRITE _IME ADURESZ

003454

007020

.FOR VIRTURL MEMORY -- OFFSETM FOP PHY3ICAL ADDRESS

gggcgg,ne

MOV
ADD
MCvB
MOV
MovB

003346
0C334C

&REAC:

MOV

suB

:FOR MEMORY MANAGEMENT - OFFSET FOR PHY ADCRESS

COMMAND RECEIVED FROM 360
PREPARE TO SEND DISP BUFFER

SOUTB(DTAB)

PHYOFF . aDXBA

,dDXBR

YO 360

:SET UP BUFFER ADDRESS

;FOR MEMCRY MANAGEMENT - OFFSET FIR FHY QCLRESS

"HANDE~-1‘-CZD\I -8
cZCx1B. Fll

007134
007142

NEW Dxi1-B RESPONDER

30-JAN-"8

14:19

01277
116363

177040
000000
013110

003334
200001

13070
00326+

_PRGE B4
9:46_
EXECUTION)

MRCY 11 30R(1052)
1-FEB-78
«SELETT OR CHANNEL COMMAND

Ox11-8

ISR

SFC10:

MOV
HOVB

UP BYTE COUNT

:SET
8-01SPSZ,30XBL
a) SAVE CODE OF LAST COMMATNC
scno(oraé; SLcno?orn
conPUYt DEVICE ADDPESS

DEVCON,F
DEV Re

SEENgE(DTQBJ

30
002

0iCeiz

GO7

DEV,OXACT
SRBYTC (DTAB)
8DXRD, JDXCS

Oxex1t

:CLEARR SENSE BrTE
:SET DX ACTIVE FLAG
RESET REHRINING BrTE COUNT
: STARY

RETURN FROM

INTERRUPT

27 230

NEW
MRINDE
S -31-C3D \]-B_
3C-JAN-T8
ZCxIB.F li

Dx.l-B RESPONOER
O¥1:-8
14:19

36-8

38-9

HO7

MACY1l 30R(10S2) OI1-FEB-78 09:4%
ISR (MULTIPLEXER CHANNEL COMYANDS;
.SBTTL

DX11-B ISR (MULTIPLEXER CHANNEL COMMANDS)

MEX--

MULTIPLEXER CHANNEL EXECUTIVE

MEX EXECUTES COMMANDS FROM THE OX ON A MULTIPLEXER ZHAMNNEL

N » MULTIPLEXER MULTIPLE
DEVIGCE REQUESTS Wl
A ??HE 8UT 55 SECLP
. §Hxs WILL Snguxéffi
?NTERLBBV&D
UNTIL ALL OTHER DEVICEZ

IF A DEVICE 1S5 NOT SERVICED

;

BEFORE IT.

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

:
:

013074

00~ci0

010212

0c7ess

126327
001004
112763
p0O0413

000017

0000G1

000011

000000

1578
BEG

108

Pt - @ P
e P
Pt Pt Pt Pt

DO N LWy

WWLWWWWWW
OO DOOOODD

007302

000137

013087

000001
013078

007344
007346
0073EC

116304
BOS304
0063CH
010037
000174

007c0e

MOV

MDEV, DEV

:GET LAST DEVICE ADOR THAT HAD & CIMMAMND

BNE

508

:YES,

EXECUTE 1T

BNE

INO,

CONTINUE

JSR
15718

DXEXIT

PC, SUDEV
SCHD(DTRB)

SRORQ(DTAB).#1
811,SCMD(DTRB)

508

:YES, LEAVE DX FREE

:COMPUTE RDOR OF DEV STAT TRB.E
:ANY JOB TO DO?

:IS ATTENTION REQUESTEC”
;YES, QUEUE RTTENTION

:FOR’THE RERD MANUAL

INPUT

NO TASK PENDING FOR CURRENT DEVICE

THIS CODE WILL REPEART SEQUENCES WHICH MAY HAVE RUN INTO

408 :

45%:

glo2le

:
007306
D0?312
007314

CHANNEL

: 1S COMMAND CHRINING SPECIFIED”
*NO,
CONTINUE

MOV8

:
005200
120G37
003402

THE

CMDCHF
108

CMPB

007260
p07262

HOG

MEY :

308

000000

SEG 0085
ZE% 008S

PAGE 85

ol ¥

BUMP TO INTERROGATE NEXT DEVICE ON CONTROL UNIT

A LOCKOUT CONDITION IN THE DX.
INC

DEV

: INCR TO NEXT DEVICE NUMBER

BLE

453

INO,

SEE iF ALL DEVICES HAVE BEEN INTERRGGATED

'NO,

EXAMINE NEXT DEVICE

CMPB

'WAS DEVICE NUMBER WRAPPED AROUND?

MOV
CMP

s1,DEV
DEY, HDEV

‘YES, RESET THE DEVICE NUMBER
!NO OB HERE, HAVE WE CHECKED ALL DEVIZCES®

IMP

OXEXIT

:YES, EXIT FROM ISR

BNE

308

THIS DEVICE HARS A JOB TO DO,

MOVB

DEC

ASL
MOV
MCMDTB:

DEV, MAXDEV

JMP

.WORD

WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD

SCMD(DTAB).R4

RY
DEV, MDEV

dMCHMDTB(RY)

MWRITE

MRMI
ESEQ
SENSCM
MWRITE
MREARD
ERASCM
CONUNE
SATTM
MSRMI

EXECUTE IT

;COMMAND TO INDEX

'SCALE TO G -

*MAKE INTO WORD RDDRESS
:SAVE CURRENT DEVICE AOURESS

:EXECUTE THE COMMAND

= WRITE FULL BUFFER

12 = READ MANUAL INPUT
'3 = ENDING SEQUENCE
‘4 = SENSE COMMAND
:5 = WRITE LINE RDDRESS
'6 = READ FULL BUFFER
17 = ERRSE COMMAND
'10 = CONTROL UNIT END
:11 = SEND ATTENTION TGO 360
:12 = READ SHORT MANUAL INP_T

107

MACY1l 30R(10S2) OI1-FEB-78 09:46
MAINDEC-11--DIDNI-B MNEW ox.x-a RESPONDER
Oxi11-3 ISR (MULTIPLEXER CHANNEL COM1RNDS:
19
35-JAN-78
2Dx1B.P11

PARSE BE

ggga

::3:::;:3::::;;::;::::::::::::::‘::::;:3;:;::;::;;2;3:;3::;:;::'"::::2:::::

393S

COMMANDS SFECIFICALLY FOR THE MULTIPLEYER CHANNEL

3937

;

WRITE COMMAND RECEIVED FROM 360

3936

3938

3939

3945
3345

394

3943

:
:

060002

R R A R R R R A

PREPARE TO GET 4 BYTES OF DATA FROM 360
NOTE--BOTH WRITE AND WRITE LINE ADDR COME HERE

3945 007360 016363 000006 000012
3946 007366 163763 013104 000012
3947 0073?74 012763 00074: 000014
3948
007402 016377 000012 003064 10%:
3949 007410 013702 013110

BNE

MOV
suB
MOV
MOV
MOV

SEND OUT MORE DARTR
SIhBF(DTQB)
saurA(crhe)
.SET UP BUFFER ADDRESS
.
PHYOFF . SBUFA(DTAB) : FOR MEM MANG - OFFSFT FOR PHY RDDREZS
SDISPS231 SRBYTC(DTAB) ;SET UP BUFFER FOR MARY SIZE
SBUFA(DTAAB),
aDXBRcbnpure
ourpor DEVICE
BUFFER ADDRESS
ADDR TO X
oevcon R2

3951
3952
3953

0GC7416
007422
007430

110277
012777
026327

00304
177774
000014

MOVB
MOV
cMP

RS, 9DXCA
#-4 DXBC
:START BYTE COUNT AT H
SRBYTC (DTARB) , 84 xs LESS THEN 4 BYTES LEFT”

3356
3957

007444
007446

00SH0e
010277

003024

3954

007414

R R R R R

MWRITE: TST

3950

005763

000014

3944

007352

007356

(007436

001011

002005

3955 007440 016302 000014
3958
2959
3960

007452
007456
007464

105063
116363
110037

000002
000000
013070

000137

0i02l2

(003046
000004

000001

8GE

MOV
20%:

3961 007470 152777 000003 00277

gggg

007478

RDD

NEG
MOV

SRBYTC.DTARB)
108

HRITE IN PROGRESS?

DEV,R

208

START TRANSFER

SRBYTC(DTQB) R2 vss USE REMARINING B1“E CONT
R2
R2, dDXBC

CLRB
MOVE
MOVB

SSENSE (DTRB)
CLERR SENSE BYTE
scnotorna) SLCMDIBTAB) :SET WRITE FLAG
DEV, DXACT
:SETT AactIVE FLAG

IMP

OxexIt

BISB

ooxan JOXCS

:START THE TRANSFEP

‘RETURN FROM INTERRUPT

2964
2365

READ MANUAL

gggg

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

MRMI

gggg

3570

3971
3972

3973
3374
3975
2976
3977
3978
2979

00?502
007506

007510
007514
007516
007522
007526
007S30
007534

007502

105737
001034

012532

005763
001031
105063
105763
001002
000137
10S063

00001N

MSRMI:

000002
000017
010042
000017

3980 007540 016363 000020 000012

3981
3982

007546
007552

016302
066302

000010
000004

3984

007560

166302

000012

10263
63763

000014
013104

3983

398S

007556
00754

005302
100761

108:
208 :

)

TSTB
BNE

ISTTYP
MRERD

MOV

SMINS(DTAB), saurh(orna) :SET UP THE nonasss OF THE DRTA

DEC

TST
BNE
CLRB
TST8
BNE
JMP
CLRB
MOV
ADD
SuUB
BMI

000C!2

INPUT COMMAND

MOV
suB

rnxeno OR 2848 DIRG?
FRIEND -- TRERT RS READ FUL.

BJFFER

SRBYTC(DTAB)
MRERD
SSENSE (DTARB)
SRORG (DTRB)
208
ESEQ
SRDRQ (DTARB)

nnv DATA LEFT TO TRANSFER”
:BRANCH IF YES TO CONTINUE
:RESET THE SENSE BYTE
:WAS THE RERD REQUESTED”
1YES, CONTINUE
:NO, 'RETURN AN ENDING SEQ RESP DE!-E
CLEAR THE READ REQUEST

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

;COMPUTE' THE BYTE COUN
:END - START

saurncorne) R2

;COMPUTE THE BYTE COUNT

NEGARTIVE

SOMETHING

WRONG

RE SRBYTC(DTARB) SQVE FOR RERD DRIVER
PHYOFF, SBUFQ(DTRQ) ;FOR MEM MANAG - OFFSET FOR PMY RDDRESS

o
(]
O

i1-B RESPONDEF

MACY1! 30R(10S2)

OQl1-FEB-78

09:46

Dx11-B ISR (MULTIPLEXER CHRNNEL COM1RNDS)

PRGE B7

éE

FALL THROUGH TO NORMAL READ BUFFER ROUTINE

RERD COMMAND RECEIVED FROM 360
PREFRRE TO SEND 4 BYTES OF DATR TO THE 360
007600
007606
067612
007614
007622
007630
007636
007644
007650
007652
0076S6
007664
007672
007674

6377

000000
000014

000001

000010
013104
000740
Qo001le
013110

00001e
00001e
000014
002630

00c610
177774
000014

MOVB

1ST

BNE

MOV

108:

0oeble
000004

000014

116037

002570
GO000e
013070

c0s:
@s
er

007724
007726

010002
063702
060202
063702
0Sezie
1527?77
300137

007716
007720

oicele

00ese+

SRBYTC (DTAB)
108

:SAVE CODE OF LAST COMMAND F3P CISPLART CINTROL

:READ IN PROGRESS?

:YES,

SEND OUT MORE DATA

SOUTB(DTAB) ,SBUFA(DTAB) ;SET UP BUFFER ADDRESS

PHYOFF SBUFAT(DTARB) :FOR MEM MANAG - OFFSET FOR PHY ADCFESS
#DISPS2.SRBYTC(DTABY ;SET UP TOTAL BYTE rOUNT

SBUFA(DYAB), 9DXBR :SEND BUFFER ADDR TO DX
DEVCON, R2
:COMPUTE DEVICE ARDDR

DEV, R2

ggz

gga?TC(oTne)..q !SEE IF REMRINING BYTE COUNT LESS THAN 4

ngz

agBYTC(DTQB),RE :SET UP BYTE COUNT

MOV

R2, 9DXBC

:OUTPUT THE NEW BYTE COUNT -- LT 4

mMovB

DEV,DXRCTY

:SET DEVICE RCTIVE FLAG FOR SCFTUWARE

CLRB

R2, dDXCR
#-4%, JDXBC

SSENSE (DTRB)

:OUTPUT THE DEVICE ADDRESS
:0UTPUT THE BYTE COUNT -4-

:CLERR SENSE AND SET DX ACTIVE FLRG

BEFORE TRANSMIT IS STARTED SET BUSY FLARG IN DX11 STRTUS
TABLE

FOR DEVICE

MOV

DEV,R2

: COMPUTE ARDDRESS OF SPW ENTRY

ADD

R2, R2

ADD

013114

SCMD(DTAB) .SLCMD(DTAB)

ADD

013110

00002C
00000S

SuB
MOV
MOV
MOV

MOVB
MOV

007712

000~-000~
e
- O O

SOx1B.P

[

MAINDEC-

JO7

BIS

g8ISB
IMP

DEVEON, R2

STEPUW, R2

8BSY, (R2)

sO¥RO . aOXCS

OxEXI?

:ADD IN SPW BASE ADORESS
'SET UNIT 8USY FLAG

:START THE D> READING

Land

NEW Dxil-B
MRINDEC -11-020 XI-B_
30-JAN-"8B 14:19
cZbx1IB. Pl1

RESPONDER

KD(’

MACY1l 30R(10S2)

OQOl1-FEB-78

09:46

PRAGE B8

DX11-B ISR (MULTIPLEXER AND SELECTOR CHRNNEL COMMANDS)
.SBTTL

DX11-B ISR (MULTIPLEXER AND SELECTOR CHANNEL 7 OMMANDS)

................

............................................................

PRESENT

0077S0
0077Se

007760
007766

152763
000434

152763
800430

1
1
1
1
1
1
1

000200

182763

000014

#CUE . SSTAT(DTAB) :PUT IN STATUS BYTE

000003

é
8aTTN:

SEND THE ATTENTION BIT TO THE 360
BISB
®ATTN,SSTAT(DTAB) ;PUT IN STATUS BYTE

ERASE THE DISPLRY

sTout

sDISPSZ, RS
SEBCDSP, R2

1578

TSTTYP

MovB

FILLCH, R2

000063

;SET UP BEG OF DISPLAY BUFFER

;SET UP_COUNTER
;SET BUFFER FILL FOR 2848 DIRG
;IS TEST BEING RUN FOR 2848 RESPONDER

108

;YES, FILL BUFFER WITH EBCDIC SPACE

MOVB

R2, (R4Y+

*MOVE FILL CHRRACTER TO BUFFER

BNE

108

:NOT DONE,

BEQ

NO,

USE CURRENT FILL CHARACTER

‘DECR COUNTER

DEC

DO NEXT CHAR

'RESET THE CURSOR

CLR

SCURS (DTRB)

mMove

#CEDE, SCMD(DTAB)
;: CHANGE COMMAND TO PRESENT END SE2

CLRB

030000

;00TPUT TO THE 360

SOUTB(DTARB),RY

MOV
Move

108:

:8UTPUT TO CHANNEL

STOUT

ERASCM: MOV

FALL

010042

TO CHRNNEL

LONUNE: BISB

012534

000004
000002
000003

UNIT END

000003

000010
000740
000100
012532

Q0000000
00000000
WL NN+
4= 1

00000000

007770
007774
010000
010004
1

000040

CONTROL

SSENSE (DTAB)

:CLEAR SENSE BYTE

THROUGH TO PRESENT ENDING STRTUS

PRESENT ENDING STATUS TJ CHANNEL

£SEQ:

BISB

#CE'DE,SSTRT(DTAB)

PRESENT

STRTUS

;SET CH END + DEvV END

TO CHARNNEL

THE STATUS

IS BOTH PUT

THE

DX11-B SPW

TABLE

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

Ma CYl!l
MRINDEC-11-D2D0x1-B
NEMW Dxil1-B RESPONDER
Ox11-B ISR
30-JAN-78 14:19
CZDXIB.F11

LO?

Ol-FEB-78

30R(10S2)

09:46

PAGE 83

(MULTIPLEXER AND SELECTOR CHANNEL COMMANDS)

4082
4083
4084
408%
4086
4087

4088
4089
4090
<091
4092

4093

013702
060002
1102?77
132763
001403
112763

002404
00000e

a000c3

DO000e

000C03

010100

10S737

10106

60202

0191.0
010114

01004

063702
10S01c¢

15718

BNE

ADD

ADD
CLRB

013114

000003

ODIC136

MOVB

002346
002336

00042S

4107

4115
4lle

4117
4118
4119

sULHK SSTQY(OTQB) OISTHE UNIT CHECKBéT SET?

MOVB

012526

4185 8181 2 110037 B938%¢

4ile
4113
4114

BITB

xC
R, dDXC

108

RANSMIT THE STA

BUCHK , SSTAT(DTAB} :YES, THMCN SEND ONLY UNIT CHECr

CHTYPE

SELECTOR cnnnwva

Re, R2

STSPW, R2
(R2)

:OFFSET BY BASE OF SPW TRBLE
:CLEAR SPW STATUS ENTRY

55;2}(°TQE§ aoxospkogT§¥TTSngg§NTE CHANNEL

DEV kgg

; Bx nc?xvs FLAG

RETURN FROM INTERRUPT

OXEXIT

SENSE COMMAND DESIRED BY 380
010140
010146

9Qlez??
060377

010152
010160
010164

013702
060002

010200
Q010204

110037
08277

010166
G0l0l72

183777

110277
012777

000002
002322
013104
013110

002274
1772277
013070
00000s

002326

SENSCH: ggg

SUB

002314

MOV
RDD
MOVB
MOV
MOVB

002276

BIS

002256

Bssensskgoxen

:SET UP ADDRESS OF SENSE BYTE

osvcou R2
DEV,R2’
R2, 9DXCA
u-1,30xBC
oev DXACT

:COMPUTE DEVICE ADDRESS

pHvotr JDXBA
sOXRD, IDXCS

:FOR MEMORY MANAGEMENT - OFFSET FOR PHY ADCRESS

: TRANSFER 1 BYTE
:SET DX ARCTIVE FLAG

:START TRANSFER

4120

yiel
4l2e
4123
4i24

4125
4126

4127

+lee
4129
4.30

IN SPW TABLE

SPW STRTUS ENTRY
S§S OFSTATUS
E noonCLERR
conPu g

208

OUTPUT THE STATUS TO THE CHANNEL

4108
4109
4110
4111

;OUTPUT DEVICE RODRESS

(PROBABLY *BUSY*")

4096
4097
4098
4099
4:00

<i0S
4106

DEVCON, R2

DEV Ra

CLERR ANY PENDING STATUS IN SPW STATUS ENTRY

810104

4i04

MOV

ADD

IF MULTIPLEXER CHANNEL

4094

4093S

STOUT:

0i3110

EXIT FROM THE DX
0l

0l
Ol

0l
Ol
0l

012605

012602

4
&
e
4
&

Q012604
012603
01260l
012660
0000GCe

OXEXIT:

MOV

MOV
MOV
MOV
MOV
MOV

RTI

(SP)+,RS

(SP)+ R4
(SP)+ R3
(SP)+,R2
(SP)+,Rl
(SP)+,R0O

ISR

;RESTORE REGISTERS

MAINDEC-11-D2DXI-B

CZDx1B.P11

NEW DX11-B RESPONDER

30-JAN-T8 14:19

MRCY1l 30A(10S2)

4132

Yi3N

4133

4135
4136
4137
4138

:iag
414

4143
4144

010230
010234

013703
010146

4146

010240

00S301

4145 010236 010001
4l47
4i48
4i49
4150
415]

4152
4153

010242
010244
010250
010252
010254

001403
062703
000773
012601

013064

:
s
;
D

CALLING ssausncs
.. RO
= DEV

JSR
..

PC, SUDEV
RETURN

R3 = ADDRESS OF DEVICE TRBLE

ONLY REGISTER R3 IS MODIFIED BY THIS SUBROUTINE

SUDEV:

MoV
MOV

SuUD10:

DEC

SUDEX:

MOV

BEQ
ADD
BR
MOV
RTS

sosvre DTRB
(SP)

oEO Rl

suosx
#2000,DTR3
SuUD1O
SP)+,R!

:START AT DEV 1
:SAVE Rl
; DEC osvxce NUMBER

:DCNE, EXIT
S INCR’ TO NEXT DEV TABLE
:TRY AGRIN
:RETURN TO CALLER

41584

;

CLEAR DEVICE STATUS TRBLE

4157

;

CALLING ssousnce

4160

L. RE YURN

:igg
4158
4159

S
:

4161

;

4162

.
JSR

RO
= DEV
PC coEvsr

R3
= ADDRESS OF DEVICE TRBLE

4163

THE FOLLOWING TABLE ENTRIES RRE CLERPED

SCMD

4165
4166
:igg

;
;
;

SBUFRA
SRBYTC
SLCMD

:i%g

4164

4171

010256

004737

010230

4173
4174
4175
4176

010266
010272
010276
010302

105063
005063
005063
165063

000003
000012
000014
000001

4172

:i;g

010262

C10306

105063

000207

00C0OCOC

LDEVST:

PAGE 90

DX11-B ISR (UTILITY SUBROUTINES

SET UF RDDR OF CEVICE STATUS TRBLE

0202000

000207

09:4

wxwé

O01-FEB-78

OX11-B ISR (UTILITY SUBROUTINES)
.SBTTL

4131

MO7

SSTATY

ONLY REGISTER R3 IS RFFECTED BY THIS SUBROUTINE
JSR

PC, SUDEV

CLRB
CLR
CLR
CLRB

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

CLRB

RTS

SCMD(DTAB)

SET UP RADDR OF DEVICE STAT TABLE

;RESET cORRENT COMMAND ENTRY

‘RESET
:RESET
:RESET
:RESET

DEVICE STRTUS ENTRY
CURRENT BUFFER nooaess POINTER
REMRINING BYTE COUN
LRST COMMAND ENTRY
RETURN TO

THE

CALLER

4179
4180

;

CSPWST -- CLERR SPW STATUS BYTE

4183
4184
4185

;
D
P

CALLING ssouence
.. DTRAB (R3) POINTS TO CURRENT DEVICE STATUS TABLE
... DEV (RO) CONTARINS CURRENT DEVICE NUMBER

:igé

4:8E

JSR

PC,CSPWST

NEW DXLl B RESPONDER
MARINDEC-11-DZOX1X11-8
30-JRN-T
9
cZbalB.Pl1

30A(1052)
01-FEB-78
(UTILITY SUBROUTINES)

MACY1]l

ISR

09:46

PAGE 91l

RETURN TO CALLER WITH DEVICE STRTUS BYTE RESET

ALL REGISTERS AFE PRESERVED ACCROSS THIS SUBROUTINE
0000000000

4187
4188
4189
4190
4191
4192
4193
4194
4195
4196
4197
4138
4199
4200

NO?

sofiLr(oTne)
ogvton RS
(SP)+,RS

; SAVE _REGISTER FOE SUBROUTINE USRKGE

ON-LIN
115 DEVICE EXIT

:NO, JUST
:GEY DEVICE NUMBER AND COMPJTE
; ADDRESS OF SPW STATUS BYTE

;RESET SPW _STATUS BYTE

:RESTORE REGISTER

0>11-8

CI-FEB-78

MACYl]l 30Ar10S2)

ISR

(UTILIT:

SUBROUTINES

03:46

PAGE 3¢

MUXEND -- HRNDLE ORTR TRANSFEP COMPLETIONS FOR MU~/
CALLING SEQUENCE

........ R3 (DTAB) CONTRINS THE RDDRESS OF THE DEVICE 3TATUS TRBLE

JSR

PC , MUXEND

........ REYLAN

C-BIT SET

- MUX DRTA TRANS DONE

C-BIT RESET - SEL CHAN OR DRTA TRANSFER NCT DONE

NO REGISTERS ARE AFFECTED BY THIS SUBROUTINE
105737
001006

012526

MUXEND: 1518

BNE

CHTYPE

MULTIPLEXER

162763
303004

000004

SUB

8GT

;SELECTOR OP MULTIPLEXER CHANNE_”>

:SELECTOR CHANNEL -- EXIT

CHANNEL

84, SRBYTC(CTAB)

108

;DECR RERMINING BYTE COUNT

2IF > 1, DARTR TRANSFER NOT COMPLEYE 1E~

DATA TRANSFER COMPLETE ON MUX CHANNEL
005063
000261
000NN

00001~

CLR

SEC
BR

SRBYTC (DTAB)

30$

: INSURE REMAINING BYTE COUNT ZERC

:SET MUX TRANSFER COMPLETE F._AG
:GOTO COMMON EXIT

DATA TRANSFER INCOMPLETE
062763
000241
000ego”

000004

ADD

#4,SBUFA(DTAB)

;BUMP BUFFER ADDRESS

RTS

RETURN T0 THE CALLER

cLe

RESET FLAG TO INDICATE MUx CHRN NJTM CIME

a8
R

14:19

(91w

Dxi1-B RESPONDER

BO8

MIINOEC-11-DIDXI-B_NEW Dxil-B RESPONDER

CZOx1B.P11

30-JAN-78

4: 19

co8

ox11-8 1080 38381 4BCRY <BATREE €BarB0i TRe PR -

4231

.SBTTL

Dx11-8 ISR

2E% 8833

(2260 DISPLRY CONTROL SUBRCGUTINE

DISPLAY CONTROL ROUTINE

THIS ROUTINE 1S ENTERED RFTER DATA HAS BEEN
RECEIVED FROM OR WRITTEN TO THE 36C.

DISCTL THEN FORMATS THE DATAR TO CONFORM 10O

A 2260 DISPLAY SCREEN IF THE 2848 DIAG IS RUN

........

PC,DISCTL

Re tuRN

TH1S SUBROUTINE

1S ONLY USED TO COMPLETELY EMULR _
THIS ALLOWS THIS PROGRRM T0 BE USED
WITH THE 2848 RESPONDER DIAGNOSTIC.

NOTE

000001

0oo0o2

000001

ooocie

000001

000006

THE REMARINING BYTE COUNT

iNDiCRTE T

(SRBYTC)

IS USED TO

NUMBER OF CHARACTERS RECEIVED FROM THE CZHANNEL.

T
IS SET
RT
THE COMPLETION OF AN 1/0
TRANSFER TO THE NUMBER OF CHRRACTERS REMRINING IN
THE DX BYTE COUNT REGISTER.

NO REGISTERS RRE MODIFIED BY THIS SUBROUTINE

000000000

4257

ereraroiacaraseeas

A 2260°S DISPLRY.

ISCTL:

MOV

MOV
MOV
CMPB

BEQ
CMPB
BEQ
CcCMPB
BEQ

RO, - (SP)

Ré,-(SP)
R2,-(SP)

; SAVE REGSITERS USED BY SUBROUTINE

B) ;WAS IT A READ_MANUAL INPUT COMMAND’
. sCMRMI
SLEMD(DTA
PERF ORM READ MANUAL INPUT PROCEEDULPE
-1F ' YES,
SLCMD(DTAB) , sCMSAM] ;WRS 1 ; A g SHORT RERD MANAUL INPUT®

DRMI

QSRné

s IF YES

DRERD

;YES, RESET CURSOR ON RERD FULL BUFFEF

LCMO(DTRB;
, sCMREAD ; WRS

TR REARD FULL BUFFER COMMAND"

THE COMMAND MUST WAVE BEEN A 360 WRITE
DETERMINE TYPE OF TEST BEING RUN
0lesae

1S18
BNE

TSTTYP
DISFRN

;TYPE OF
;
FRIEND

TEST O

2848

FRIEND

FORMAT DISPLAY RALAR 2280
000006
000001

000035

MOV
CMPB
BNE

CINBF(DTRB),R1

:GET ADDR OF START OF INPUT

20$

;NO,

B) ;WARS LAST CMD A WRITE LINE ACORESS®
, sCMWtLA
SLCMO(DTA

WRITE LI NE RODRESS COMMAND

NORMAL WRITE

FIRST BYTE OF DATA BLOCK

00Se63
11210¢e
042702

000014

177760

INC
MOVB
BIC

IS CURSOR LINE RDORESS

SRBYTC (DTAB)

: INCR BYTE COUNT

81777¢0,R2

:GET ONLY LINE NUMBER

(R1)+

:GET LINE NUMBER

48T

4288
4289

010474

4290
42914

00s0e3

000004

CLR

los:

00s~”02
00oaooso

O1-FEB-78

09:4&

Dx11-8 ISF (2260 DISPLARY CONTROL SUSROUTINE.

300004

PRGE 94

SCURS (DTRB)

COMPUTE CURSOR FDDRESS

CURS = _INE s # LINESIZE

157

-00NE’

BEQ

20s$

gsc

xgs

ADD

MORE DATA INTO DISPLA

sL1I1S2, scunsrorné)
1~cn TO NEXTLINE
DEAR LINE COUNT

MOVE DRTR RECEIVED

BLF

INTO DISPLAY BUFFER

THE DRTRA R CEIVED HRN( BE RNY CONFIGURRTION
A 2260 DISPLQ{
. TO EMULRTE
OF EIGHT BITS
HQRQCT
RECEIV
Y CHARRCTE US D

S "Fg gED“INTO NNE OF
THIS FOLDING
2260
BY THE

IS PERFORMED BY RANSLATING THE CHARACTEF TG ASCII

300010
000004
000014

208:
000741

000014

Bt P

016302
066302

Q0000

Pt Bun Pt St et Pt Pt Pt Pt P
Pt 5

QQo00Q00

000000000000
00

AND

574

TO EBCDIC.

;COMPUTE DISPLAY ARDDR

MOV

SOUTB(DTRB),R2

gu§s

Bagvvc(ovnes.oxspé§¢1 9§L CHARS PROCESSED”

RDD

SCURS (DTRB) . Re

THE BYTE COUNT
xncheneur
SGET THE NEXT BYTE RECEIVED AND BUMP PGINTER

MOVB

INC

(DTARB)
SRBYTC
(Ri)+ RO

MOVB

eecove(ho> RO

MOovB

QTOéTB(RO) (R2) ;COMPLETE FOLDING BY RETRANSLATING TO EBCOIC

BIC

177400
011754
177400
000040
0123%4
000004
00002<

THEN BRCK

BIC
suB

INC
gggs

.177400

STRIP SIGN EXTENSION BITS (IF ANY)
FOLD CHARRCTEN INTO ASCII CHARACTER SET
srnxp SIGN EXTENSION axrs IF ANY
SCRLE INTO RSCII TRBLE
R ANGE

SCURS (DTAB)
éfifi’ sNEWLNE

xncn CURSOR
P
1WAS A NEW LINE soscxrxsov

8177400, RO

NEW LIME COMMAND - ADVANCE CURSOR TO BEG OF MEW LINE

Do Ds Pms Pma

s Bt Pua

CURSOR =

0000S0

000034

0000CH4
0000S0

000004

409%:

S0s:

Q201373

CLR

INC
SuB

BGT
CLR

ADD

DEC
BNE

(CURSOR/LINESIZE +

:CLEAR LINE CTR

408
SCURS(DTAB)

KEEP DIVIDING
:CLEAR CURSOR

# LINFSIZE.

:INCRLINE CTR
Re
8L INSZ, SCURS(DTQQ)
sLINSZ, SCURS (DTRB |

R2
o]3

CHECK FOR WRAP AROUND
026327
00072z

000004
000034

000740

&os:

cMP

BLY

SER

SCURS(DTARB), ooxspsz

208

gggnsrornax

FRIEND TEST

CURSOR OVERFLOW DISPLAY BUFFER®

UR&OR OK, PRGCESS MEXT CKAR

oveanou "RESTART CURSOR AT POS G

IF SEPARATE 1.0 BUFFERS DON'T COPY

NPUT YO OUTPUT BUFFER

14:19

30-JAN-78

D08

cZbx1B. PLl

MACY1l J0R(10S2)

mim

MIINDEC-11-CIDXI-B

NEW D%il-B RESPONDER

MIINDEC-11-DIDX1-B_
MNEW DXil-B RESPONDER
30-JAN-T8 14:19
Ox11-B
SZOnIB Pll
4343

ISFRN:

012533

4344

4345
4346
4347
4348

7578

10BUF

;SEPARRTE

35S

1-0 BUFFERS®

BNE

DISCEX

;YES, DON'T COPY INPUT TC OLTPLT

MOV

801sPsZ -2, Rb

;:TRANSFER THE INPUT BUFFER TG0 THE JULTP_T BLFFEF

MOV
MOV

000006
000310
000360

4349

EOS

MACY1l 30R(10%2)
OI1-FEB-78_
09:46_
PALE
ISR (2260 DISPLAY CONTROL SU3ROUTINE.

SINBF (DTAB) Rl
SOUTB(DTRB),R2

;SET UP INPUT BUFFER RDDRESS
;SET UP OUTPUT BUFFER RADDRESS

PERFORM COPY

4355
4351
4352
4353

MOV
DEC

(R1)+,(R2)+
RO

DISCEX

BNE

¢ INPUT _TOQ QUTPUT
;ARE WE DONE®

;NO,

108

CONTINUE COPY

:PREPARE TO RETURN T0O CAL._ER

R RERD FULL BUFFER WRS PERFORMED

THE CURSOR MUST BE RESET TO THE BEGINNING OF THE STREE®

CLR
BR

000020

Lo
_TRTR TR TN

000004

RMI:

A RERD MANUAL

INPUT WAS PERFORMED

TO EMULARTE THE 2260 SCREEN THE START OF MANUAL INPUT CHARCATEF

MUST BE DELETED FROM THE SCREEN

MOV

SMINS(DTARB)
,R1

;GET THE STARTING RDORESS

DEC

;DECREMENT TO THE SMI CHAR

sus

SOUTB(DYAB),R1

;AND COMPUTE THE CURSOR PCSITION

MOVB

000100
000Q10
000004

;RESET THE CURSOR
;AND PREPARE 10O EXIT

SCURS(DTARB)
DISCEX

MOV

sEBCDSP, (R1)

R1,SCURS (DTAB)

A SHORT REARD MANUAL

;BLANK OUT THE CHRRACTER

INPUT WAS PERFORMED

NC RACTION REQUIRED BY

010734

DISPLAY CTONTROL RCUTINE

6SRMI:
-

1]
’

RESTORE REGISTERS AND RETURN TO CRLLER

OISCEX:

MOV

(SP)+,R2

;RESTORE SAVED REGISTERS

RTS

.RETURN TO THE CALLER

MOV
MOV

.SBTTL

TELETYPE

(SP)+ ,R]
(SP)+ RO

TELETYPE (CONSOLE) INPUT ISR
INPUT

HANDLER

(ISR)

CONTROL PRSSES HERE ON R TELETYPE

INPLT INTERRJPT

DARTA IS INPUY FROM THE CONTRCL CONSOLE AND STORED

INTO

FO8

MACY1] 30R(10S2) O01-FEB-78
MIINDEC-11-DSDNI-B NEW D%il1-B RESPONDEF
TELETYPE (CONSOLE) INPUT ISR
30-JAN-=8 [4:19
c2001B.P1:
4399
%400

:
:

THE TELETYPE INPUT BUFFER (TBUF). WHEN ALL THE DAT& 1=
ENTERED, THE CPERRTOR HITS A C/R T0O ENC THE LINE
3

SYSTEM,

w401

uugg

w4404

AN GCTIVE FLAG S SF- AND “HE COMMAND EXECUTEC B THE

'-0482

THE FALLOWING CONTROL FUNCTICNS ARE &VAILABLE £=

OPER(.TOR CONVENIENCE.

w40~

C’‘R

4409

“4

4408

4410
4431
442

4413
qula

Yyy17
010744

010046

4422
4423
4424

010750
(010754
010760

017700
042700
013701

010770

001002

4421l

4425

4426

4427
4428

010746

010764

010772
010776

010146

020027

4430

011004

4432

011012

4433
4434
4435

4<436
4437

4438

4439

011010

020027

00002:

0110i6
011020
Q11024
011030
011032

011036

Q11040

0O0SO3

001010
105037
105737
001473
004737

011252

020027

0000C3

105737

013053

105237

013054

000470

Oli1044

Q001011

Y442

011052

001457

011060
011064
011070

012701
0006137
105737

011076

1100621

011046

4443

(G110S4

4447

011074

4444
444
444€

4y44g8

4449

(011100

001051

020027

4450
4461

011104
011106

001005
012701

<453

0ill1le

00C440

y4€2
44€4

011112
011:20

013073
013071

105237

02C02”

012640
011220
013053

013053
0GO177

INCB

TTIYSTP

YES, SET FLAG TO STOP TTY OLTPUT

BNE
B8R

CMP

BNE
CLRB
7S18B
BR

cMP

1008

AND EXIT FROM INTERRUPT

1008

RO, 8CTL.C
0%

MOV
JMP
1578

#TBUF ,R!
100$
TCMACT

NO conrxuo

1008
PC,PROUT

108
ITYSTP
PCTR

BEQ

RESUME CONSOLE OUTPUT?

iNO, CONTINUE
:vES, RESET CONSOLE STOP FLAG
:
CHECK TO INSURE ourpuv T0 RESUME
:

NO OUTPUT -= EXIT
RESTART CONSOLE ourpuv

AND'EXIT FROM THE INTERRUPT

.bonnnuo RBORT -~ CTL C?

TCMACT

xs A COMMAND ncrxvs*

TCMDAB

'YES,

1008

:YES,

IGNORE

ane

DELLIMETER

MOVB

RO, (R1)+

BNE
MOV

30$
8 TBUF R1

160$

' CONTROL-Q,

BNE

CONTROL -p 2

RO, 8CTL.O

BNE

INCB

3C3:

:GET TELE CHARAC TER
: INSURE ?2-BIT ARSCII
:BUFFER PTR

YES, ALLOW OPERATOR TO REENTER AL. PARAMETERSZ
:CONtROL-S , TEMPORALILY STCP CONSCLE JUTPUT"

CMP

012640

9TkB, RO
#177600,R0
TPTR, RI

RSTART
RO, 8CTL.S

INCB

000015

:SAVE REGISTERS

Rl,-(SP)

IMP
CMP

1518

20s:

RO, - (SP)

RO, slTL.F

BEQ
JSR

108:

TO CONSOLE

CMP

BNE

£3:

= RESUME OUTPUT

RESUME CONSOLE ouTPUT

MOV
BIC
MOV

3%:

= DELETE CURRENT INFJUT LINE
.
= TEMPORARILY STOP QUTPU"
TGO CZONSIE

NOTE -- A CONTROL @ MUST BE xssuso RFTER A CONTRO. S TJ
MOV

000020

0:3073

4440

444]

(CTL-@)

001502
177600
012?42

105237

4429 011002 001003
4431

:
;

Hin: o mMov

001002
000022

DELETE LAST CHARACTER

= (BACKSLASH SHIFY L) = DELETE LAST _INE

CTU-U)
CTL-S)

000137
020027

LINE DELIMETER

(CONTROL-C) = RBORT CURRENT GOMMAMD -- FOP CUMFS
(RUB JUT) = DELETE LAST CHRRACTER
"CTL-P) = REENTER ALL PARAMETERS

4420

:
:
:

3~ig
'fl

:
:

q:f%
4

SE3 30%
Z£, 2C3¢e

PAGE 36

C3:46

#CR

TcMAact

no..pusour

:NO,

TRERT

RS
R DELETE

SET ABORT FLAG

LASTM

LINE

'SET'UP BUFFER POINTER
TEXIT
:TELE CMD CURRENTLY ACTIVE”?
CHARACTER

:STORE CHAR INTO BUFFER - INC PTR
--

C.R”?

RESET BUFFER PTR

1YES,

SET COMMAND RCTIVE FLRAG

oonf PRINT THE LINE CELIMITER
:R RUBOUT?

~LINGEC-11-DZ0%:-B

RSN

NEW Dxil-B RESPOMNCER

30-JAN-"B I4:19

00013
8?%985
4
gffig:
44?2
y48*
(11132
120027
000025
4458 011136 001002

408$:

Q11140
011144

112700
004737

446

011154

001004

4466

011166

020027

000i34

608 :

4468

011179

012701

012642

~0§:

012742

80S:

000134

308§ :

O0:2742

1308:

011150

020027

GO0013T

3“23
giiigg
55013 012640
L]
4465
011164 883483
446-

4463

4470

0.:1172

0il1200
011204

44~]

0il2l0

443
s4~4

011216
Q11220

yuT2

445

447E
-

0li2i2
£11224

Zil22e
S1i23C

001004

004737
020127

001003

012700

000740
010137

0iekll

0§1260C
323222

011330

QOi-FEB-78

YELETIPE (ZONSOLE! INPQOT ISR

4489
4460

4461

000134
011366

MACY1l 30R(10S2)

GOS8

3ol ¥

335
CHPB
BNE

Mk
g RO
RO,
BCTL .U
sot

MOVB
JSR

\.RO
PC ACHAR

BNE

60$

ChHP

ERSB
BLE

RO a°e

Erq1§éfiénz
763 ]

03:46

PARGE 3~

rssE TREAT AS A DELETE
M LASTST CHARAITER
CHARGLT
on?ROL
uv
\BELE?E
CURRENT
1%P_~
INE
NOPE
INGE
.

)
'YES ERT AS DE.ETE LAST LIYE 'BF vSLATH
'ECHO THE CHRRCTER BACK

DELETE LAST CHAR -- BACK ARR-W”

SEE
Bt Bérarn
SYES uDECR
EESE$oD
?a?c
OF aurgsg JFFER °

CMP

RC, s’

MOV

sTBUF ,R1

I YES.

R1. 8TBUFE

‘WERE
LIMITS EYCEEDED”

8\, RO

:THEY WERE -- TRERT RS & LINE RBSF

BNE

804

JSR

PC.CRLF

BNE

1065

CHP

MOV

BR
MOV

30%
R1,TPTR

MOV
RTI

(SP,+. PO

MOV

1SPi+ Rl

DELtrE CUR LINE -- BACK SLASH?
NO

RESET BUFFER PTR

INEW LINE FOR NEW CCMMAND

:NOPE, EXIT

:SAVE BUFFER PTR

:RESTORE REGISTERS + E-1IT

€
A

i4:19

MACY1] 30R(10S2)

.SBTTL

4478

4usC

4484

011232

4485 011236

105037

013052

:05°3~ 013071

011532 001402
ouizse
Q9473
Ciiggd
&1
--3c
3iiZec
BHocE:

GeBE

PI3R:
io8:

09:46

PARGE 38

TELETYPE (CONSOLE®' GUTPUT ISR

TELETYPE OUTPUT DRIVER (ISR) -- PRINT

CONTROL PRSSES MERE ON A TELE OUT INTEPRUPT

::gé

O1-FEB-78

*ELETYPE (CONSOLE) OUTPUT ISR

CLR

BEG
19
7

PIYL
PCIR

108
PC.PROUT

;CLEAR PRINTER QUS. €00
PRINTS
HORE DA T
CANT
‘MO,
EXIT
ANGTHER CHAR
.cufpur

MEW Ox;1-B RESPONDER

| 30-JAN-"B

(ala]

TAINCEC-11-CI0Y1-B

SIDONIB.F.i

[NT 4]

—

108

MACY1l 30R(10S2)
O01-FEB-78_
03:46
TELETrPE CUTPUT HANDLING SUBROJTINES

.SBTTL

PALE 99

TELETYPE OUTPUT HANDLING SUBROUTINES

SEND DATR TO PRINTER,

IF NOT BUSTY

CALLING SEQUENCE
PC,PROUT
JSR

........ RE YLRN

IF TELETYPE OUTPUT IS CURRENTLY IN PROGRESS OR MRS BEEN SJUSPENOECD Br A

CONTROL IS RETURNED IMMECIATELY WITH NO RCTION

BEING

INITIATED.

IF TELET ®E OUTPUT 1S NOT CURRENTLY IN PROGRESS

THE PRINTER BUSY FLAG IS SET AND A CHARACTER IS SENT 7J THE TERMIAL

013082

PECUT:

013073

PIUFL

BNE

208

:YES, RETURN IMMEDIARTELY T3 CAL.ER

DECB

PCTR

:DELR CHAR COUNTER

PFPTR

"INCR PRINT FETCH POINTER

INCB

0130S2
013671
001544
013046
013046

MOVE

INC

@s ac as 00w

20s:

20$
TTYSTP

PIUFL
SPFPTR, 3TPB

CHP
BNE

PFPTR, sPBFE
20%

RTS

MOV

sPBFS,PFPTR

.1S

IT BUSY?

_
:YES, EXIT
HAS CONSOLE OUTPUT BEEN SUSPENCEL"

:NO,

'SET BUSY FLRG

1QUTPUT NEXT CHAR

STIME TO WRAP AROUND?
EXIT
INO,

:YES, RESTORE TO START OF BUFFER
SRETURN TO CALLER

R CR/LF

CALLING SEQUENCE
P C,CRL F
JSR

........ RE tURN

wr o

012744

1578

BNE
75TB

NO REGISTERS ARE MODIFIED BY THIS SUBRSUTINE

(Yoo

oaocoLoonoecLroon
rum»—»gvxlg:o*o-mm

o B
e

e Pt Dm

s
ot

e Pt Pt
Pt Bt Pt Pe Pae P

Pe B 2 Dt Pt Pe Bt o

000000000000

NO REGSISTERS RRE MODIFIED BY THIS SUBROUTINE

MOV

MOV
JSR
MOV
RTS

R2,

-(SP)

s105215 R2
PC.PRINt2
(SP)+,R2
PC

PRINT 2 CHARACTERS ON

:SAVE THE R2 REGISTER

:D0 A CRLF
:PRINT IT
:RESTORE THE R2 REGISTER
:RETURN TO THE CALLER

THE

TTY

CALLING SEQUENCE

...... R2 CONTRINS DATA TO BE PRINTED
JSR " PC,PRINT2

(2 BYTES"

...... RE YURN

NO REGISTERS RRE MODIFIEC BY

THIS

SUBROUTINE

N1
mm
[ ] Y

?VRI-B RESPONDER
.

LMoo
U"U‘U‘(fllfl#

WWwwwww

4545

4S4E
9S4,
454g

454g
4550
455
]
4552

PRINT2:

MOV

F2BF:

RTS
. WORD

01-FEB-78_

SUBROGUJTINE:

0S9:46

PR3GE (00

JSR
. WORD
0
3?7.377

.BYTE

CHRRACTER

CALLING SEQUENCE

RO CONTRINS THE CHARRACTER TG BE PRINTED

PC,PCHAR

RETURN WITH THE DATA IN THE PRINT BLFFER
STPOy

4 LWw
oo
naoonoe

[

bebapatar

00000

NO REGISTERS ARE MODIFIED Bv THIS SUBROUTINE

P-HAR:

MOVB

PIBF:

RTS
.BrTE

JSR
. WORD

RO,P1BF
R1,MESG

;RETUPN TO

THE

CARLLER

%‘{8

TELETVPE OUTPUT HRANDL

JO8

30R(10

[T
&

ZoOZ1B.

MRCY1l

8 RESPONDER

MIINDEC

09:46

PARGE 101

PRMESG PRINT A CHARRACTER STRING
CALLING SEQ

........ R2 CONTRINS THE STRRTING RDDRESS OF THE MESS&LE
PC . PRMESG

...... RETUR

80’*'-0.—000
NO»— ON)rer—=

VO‘U‘U‘mU\JIgUUNNNFHDO
LO0L£NOL0O0
L
LN

PCTR
R3. sPBFE

JER
CFPPB

pc.PROUT
PCIR, PMAX

BR
MCV

108
PR3, PPPTR

MOV

(5P)+.R2

s
00
8e
@s

20¢
#PBFS,R3
308

(SP)+,R3

:YES,

EXIT

INO MOVE NEXT CHAR TG PRINT BUFFES

:INCR CHAR COUNTER
:AT END OF BUFFER?

:NO
:YES, WRAP AROUND TO BEG OF BUFFER

:CAN’WE START PRINT?
1 1S PRINT BUFFER FULL”

1YES, WAIT TILL ROOM AVAILAB.E

:GET NEXT CHAR
"EXIT, RESTORE PUT PTR

:RESTORE REGS

:RETURN TO THE CALLER

MESG -- PRINT A CHARACTER STRING ON THE SYSTEM CCNSOLE
CALLING SEQUENCE
RI,MESG
Jop

"WORD

Brws

RT3

ADDRESS OF START OF MESSAGE

RE TURN

NOTE -- MESSAGE MUST BE TERMINRTED BY R 377
NO REGISTERS ARE MODIFIED BY THIS SUBROUTINE
MOV

R2,-(SP)

RTS

MOV
JSR
MOV

(R2)+, (R3)+

INCE
cMp

MOV

TRTICTIR

:GET PRINT QUTPUT POINTEP
:END OF MESSAGE?

408

BEQ

PPPTR,F3
(R2), 8377

BEQ

BN:
MGV

s SAVE REGS

R3' -(SP)

MO/

Re,-(SP)

MOV

MOV
CMP3

s Pt P

NO REGISTERS RRE MODIFIED BY THIS SUBROUTINE

o
o
o
o
[l

52 0t Pt Pt Pt Pt Pt Pt Pt Pt Pt Pt Pt Pt

00 Pt Pt Pt ot Pt Bt Pt Pt Pt Pt it Pt Pt Pt Pt Pt Pe

000000000000000000

NCTE -- MESSAGE MJUST BE TERMINATED BY R 377

(Ri)+,R2
PC,PRMESG
(SP)+,R2

: SAVE REGISTER

'GET ADDRESS OF MESSAGE ANC BUMP FOR RETURN
:MORE MESSAGE PROCESSING
:RESTORE SOILED REGISTER

'RETURN TO THE CALLER

INMES PRINT R CHARACTER STRING
CALLING SEQUENCE
JoR
RI, INMES

_WORD ADDRESS OF MESSAGE

01-FEB-78_

TELETYPE OUTPUT HANDL ING SUBROUTINES

vedpe

KO8

00O

30-JAN-78 14:19

30R(10S52)

[
9

. Pll

MACY11

ATV

MIINDEC -11-D020

NEW Dx11-8B RESPONDER

13e

INMES 1S USED FCR ROQUTINES AT "HE
NOT CHECK TO SEE

TELEBUFFER

NOTE

ISR LEVEL AND 0 ES

IF DATA WILL BE OVERLAYECD

-- THE MESSAGE MUST BE

I¢

TEPMINRTED Br & 377

g 013130

w—
L
wa
oL

Q)—

OWw
W
~Ma

00
00

Pt Pa

elalodelel lode]

)

i
W
——0Q
ocrLroLfnvLocr

e
e
S
Y

e Do Pt Pt Pt Pt ot

00000000

NO REGISTERS ARE MODIFIED BY THIS SUBROUTINE

trnmes:

MOV

R2,

- (SP)

MOVB
MOVE

PMAX, - (SP)
8377 PMAX

:CHEAT, SAVE PMAX
:ANC MAKE VERY LARGE

JSR
MOVB

PC.PRMESS
(SP)+, PMA,

;USE STANDARD MESSAGE PROCESSOR
:RESTORE PRINT MAX

MOV

MOV
RTS

(R1)+

(SP)+.R2
R1

:RETURN TO CALLER

(@8]
ny

PRGE

>epe

09:46

...... RETURN

®c

0l-FEB-78_

SUBROUJTINES

[
%

TELETYPE

LO8

[4:19

30fl(10% 2)
OQUTPUT HANDL NG

MRCY1l

aun

Dxil-B RESPONDER

MIINDEC-11-DIDx1-B
30-JRAN-T8

“eu2
“4e43

09:4&

PAGE 103

.SBTTL

UTILITY SUBROUTINES (CONVERT OCTAL OR HEX TO BINAR(

COTB -- CONVERT ASCII OCTAL TO BINARr (COTB

rav

a249

CALLING

qggg
Y4

4648

... RE TURN
:

JSR

UPON RETURN THE FOLLOWING REGISTERS WILL CONTAIN

:
:

R3
= BINARRY RESUL
CONVEPSI0N
RY = (exrs 0-7) FIRST NON-OCTAL CHRARACTER

4651

465
465

:gss

4654

us?g 011540 005003
4658
4659

:ggo

011542
011544

o{isws

00500S
112204

620327

tore:
000067

10%:

466
811? y 28 é? 00006C
4663 011560 00241
46b4
4665

011562
011566

042704
006303

4669

011576

005205

4666
4667
4668

4670
4e7:

011570
011572
011574

011600

011652

000207

CLR

CLR
MOVB

cgge

MPB

177770

ASL
ASL
ADD

INC

2C%:

PC,LOT

S = NEXT CHAR PO IT ON AFTEP5 ST ILLG CHAP

BLT
BIC
ASL

006303
006303
060403

000761

e 3 SEQ 3 S E ADDRESS OF FIRST CHRRCTER TO BE CONVERTED

B8R

RTS

RS = NUMBER OF CHARRACTERS CONVERTED

RS
(RE)»

.’

Sw %'0
Il????O.RH
R3
R3
R3
RY,R3

103

:GET NEXT CHAR

cHnREQTT7v

zn 0~

YES EXIT
:spvE 0
.S. 3 BITS
‘SHIFT OLD RESUL BY 3
:ADD

IN NEW

NUMBER

: INCR CHAR

COUNT

:RETURN TC

CALL.ER

PGET NEXT cunn

&)
W

O01-FEB-78

UTILITY SUBROUTINES (CONVERT OCTAL OR HEX TO BIMNARY)

reob
e

MO8

(@)

30-JAN-TB8 14:19

MACYIl 30R(1052)

CZDx18.P11

NEW Dx11-B RESPONDER

MIINDEC-11-D2DXI-B

NOS

MACY1l 30A(1052) O1-FEB-78 09:46 PAGE 104
MIINDEC-11-DZDX1-8 NEW DXil-B RESPONDER
UTILITY SUBROUTINES (CONVERT OCTAL OR HEA TG BINARY)
30-JAN-78 14:19
CZDX1B.P11
4672

45;3

4674

CHTB -- CONVERT ARSCII HEX TO BINARY

;

CALLING SEQUENCE

JSR

UPON RETURN

;

4675

4676

s, R2 = noonsss OF FIRST CHARCTER TO BE CONVERTED

467

4680

4eT?

4679

4681

R2 = NEXT CHAR POSITION NOT CONVERTED

4682
ugga

R3 = BINARY RESULT

:
:
.

R4 = (BITS 0-7) FIRST NON HEY¥ CHARACTER
RS = NUMBER OF CHRRACTERS CONVERTED

4685

011604

005003

fuTB:

CLR

4687

011610

112204

108:

MOVB

4686

4688
4689
4690

011606

005005

011612
011616
011620

162704
100422
020427

4631 0ilbe4 002410

000012

4633

011626

011632

162704

020427

000007

000020

4696

011644

002407

4698
46399

011650
011652

006303
006303

4632

000060

4697

011646

4700

011654

4702

011660

4701

4703

4704

4705
4706

011656

GCllee2

Clleb4

Dllebb

0il670

006303

CLR

-7 RY

ASL

IMAKE ROOM FOR NEW ENTRY

BLT
RSL
ASL

INC

112204

000207

30%:

816.

YES, WE HAVEA anxo HEX DIGIT

303
RY, 810.

005205

005302

aoi

GET THE FIRST CHARACTER

SCRLE RELRTIVE TO ASCII ZERS
INOTA VALID HEX CHAR
xs RESULT STILL GT 107

8GE
CMP
RSL

0J0752

(R2)+,RY

SUB

006303

060403

#’'0,RY
3os
#10.

cHP

20$:

suB
BMI
CMP

BLT

4694 011636 002012
4695 011640 020427 000012

PC,CHTB

.. RE YLRN

30¢

R3
R3
R3

IT
A LETTER?

xanon CHAR
Nb
iA
:NO ILLEGRL CHAR

ADD

RY,R3

; INSERT

BR
DEC

10%
R2

'AND CONVERT NEXT CHAR

MOVB
RTS

(R2)+,RY4

NEW ENTRY

: INCR CHRR COUNT

:GET THE ILLEGAL CHARCTER

SAND PUT IT R4

PITS TIME TO RETURN TO THE CALLER

oo
I g ]
[+ a4
V]

Cl41~3

MOV

ROUTINES

TIME OUT

ROUTINE

8PMTC, R2

NN NNNNININNIN

oL
cucu*sruru»—»—.—c:t:
oo
£0

s Pe
e
e Pt Pt Pn Pt
Pt

e 9=t pme Po Bs bt

0000000000

CLR

MGV

- CLR
CeRe
L

JSR

004737
105737
001375
000000
000137

1578

BNE
HALT
ImP

:SET UP RDDRESS
2F THE PRINT ROUTIE

;70 GENERALICFD Rap OUT ROUTINE

TouTR?

MEMORY MANAGEMEMNT

TRAP OUT ROUTINE

MMSRO

8PMMERR R 1

P1uF

PSid
PC . PRISESG
PCiR
108

START

:CLERR THE MEMORY MANAGEMENT BI~

:SET UP RDDRES OF ERPAR MESSAGE

iCLEAR ALL QEVICES

:LOWER PROCESSOR srnrus TO ALLOW INTERRUPTS T35 <M
:PRINT THE ERROR MESSAGE
:1S PRINTING DCNE”
:YES.,

HALT

oy
-0
Wwh
NN

[e]e]
C)(J,a

NN
NL
L
QP 4,1

INVALID UNIBUS ADDRESS TRAP
[y

‘722

212702
000404

PROCESSUR ERRCP YRRF HAMOLERS

(UT

MEMORY

lalele]

£4 L4828
SN
PO = o pe 0 = 00
00NN
L

TRRP

122776
a01174

CMP

CLR

IMP

(SP)+, (SF)+

POP THE PUSH STACK

NEWPRM

QSV OPERATOR TC REENTER THE CATA

PSw

CLEAR THE PRUCESSOR STRTUS WORD

[SI9]

W)
wmn

PasE iCS

.SBTTL

09:46

B39

Gi-FEB-78
W D¥il-B RESPONDE®R
MRCY1l 30R(10S2:
PRCCESSOR ERRNR TRAP HANDLTRS
8 14:19

30-?awfige v 19

MIINDEC-11-DIDN]-

zéxxa.le

W Dx1}-B RESPONDER

WUl

CODE convtasién 9 éLEg
30R

4742

Ut}

w?wg

4ty

4543
>y

754

:rw

8%%7&4 040440 041502 042504

94>

117794 §§

w;go
q

oii;gg

owaggs

012010

024452

u??é §1éooa
47S4

4SS
:;gg

012014
oieoea

4758 8158

8018

027455
uss?

owugéo

§§21

027136

75}

8614 B3dta3

0S6473

0S2123
§§§£;1

053125
026042

.SBTTL

cOoS

OD1-FEB-78

09:46

PRGE !06

CODE CONVERSION TRBLES
T

NCTE -- BRCKARROW IS USED TO DENOTE R NEWL INE

¢BcoTs:

.RSCII . RABCDEFGHI?t.c(e!.

:00 - OF

L.RSCII *“BJIKLM*OPQR+S#)
;][ ]

.
;40
- IF

.RSCI1

‘*-/STUVWXYZTM,%{»"?

;20 - oF

sts 032464

.RSCII "~0D123456789:83°'="

:30 - 3F

4761 815829 858338 831253 042504

.RSCI1 / RABCDEFGHI?t. (¢!~

140 - YF

4764

04711S

L.ASCI1

“3JKLMNOPQR+S#); )"

;60 - SF

053125

LASCIT

' =/STUVHXYZTM ,%[>?

032464

LASCI1

:;gg

oiaowa

033466

03:470

021472

012074

046113

4765
426b
4767

47?20

4771

012102
012110
012114

012134

012142

050117
024452
027455

030460

051121
0S6N4?73
0S2123

031462

022137

- &F

*~0123456789:83
="

;7?0

- 7F

.ASCII

:80

LASCII

*“8JKLMNOPGQR+S#);]

;90

.RSCII

'-/STUVWXYZTM,%[>?

:RO

032464

LASCIT

"0123455789:83°=\"

;80 -

042504

.ASCII

ABCDEFGHIt.<(+!,

:C0

047115

.RSCII

“BIKLMNOPQR+$s);
1"

;00

05312%

LASCII

*~-/STUVWXYZTM,%[»?*

;:E0

LASCII

*“D123456789:83d°=z."

:FO

034470

021472

045046

044510
020453

027136

012174

043506
024074

046113

04711S

012202
012210

0S0117
024452

0S1i21
056473

022137

4780
4781

(0l2222
012230

054127
0SS445

062123

053125

055131
037476

026042

4783
4784

012242
012250

033466
023500

034470
05607S

021472

4786
4787

012262
012270

024074

Qu4S10
029453

027136

4789
4790

012302
012310

0S0117
0244562

O0Sli2l
0Sep473

022137

4792
4792

012322
012330

0S4127
0S5445

085131
037476

026042

4735
4T3t

(Cl2342
J1235C

032466
023500

031462

032464

034470
0S607S

021472

4772
4773
4774
4775

4776

47?7
4778

4779

4782
4785
4788
4791

4794

012150
012154

012162
012170

0le2214

012234
(l2254
012274

012314

012334

023500
040440

0274685

030460

ON0440
045046

027485
030460

0S607S
041502

031462

041502
046113

0S2123

;60

033466

042504

EBCOIC TQ,08C4AatR%k
o8 VAR 1INRI®YRTo n 6u -HaRacTeEr e

RABCDEFGHIt.c
(4!~
"

4797

ASCII

1§e

AToE"B:

107

PR%E

TO EBCDIZ CONVERSION TRBLE

;240-247

.BYTE

100,117, 152,173,133,154,120,17S

134

.BYTE

3, ;250-257
115,135,134,116,153,140,11141

3ee
365

.BYTE

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

17¢

.BYTE

, ;270-277
156, 157
2,136
114,176,
370,371,17

302
3CS

.BYTE

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

el
324

.BYTE

310,311,321,322,323, 324,325,326 ;310-317

331
34y

.BYTE

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

351
137

.BYTE

347,350,351,155,177,137,112,085 ;330-337

.SBTTL

PROGRAM CONSTANTS AND VRARIABLES

184

140

176

CONSOLE UNIBUS ADDRESS CONSTANTS
177560
177562
17756+
177568

Yks:

1727560
177562
177564
17756%

TKB:
TPS:

TPB:

000000
000000

368000
oo

[QIGIG
T, ]
a0

Soe

000000
000000
0000G0
000000
000000
000000
00090C
000080
033Ca0

. WORD
. WORD
. WORD
. WORD

0000000000000

DX REGISTERS

; KEYBORRD CONTROL STQTUS REGISTER

:KEYBORRD DATR BUFFER
{PRINTER STATUS/CONTROL REGISTER
:PRINTER DATR BUFFER

-~ ADORESS GENERATED BY

INITIALIZATION

+DEVICE STRTUS -- TT1

: COMMAND AND RDDRESS -- T72

.CONTR L UNIT STATUS
:CFFSET
AND STATUS
: BUS RADDRESS

;BYTE _COUNT
:MAINTANCE OUT
iMAINTANCE IN
:CONTROL BITS
:NPR DATA
;EXTRA SIGNALS
:BUFFERED BUS ouT
{EXTRA SIGHALC

(O]}
NN

09:46

oepa

O1-FEB-78

[ATN]

MIINDEC-11-DIDri-B
MNEW Dx;i1-B RESPONDER
CODE CONVERSINN TABLES
30-JAN-"8 14:19
caDX1B. Pl1

D09

(@ T4 ]

30R(10E2H

11V}]
mm

MACYL1l

4853

4856
4857

012516
012520

000000
00000G

4858
4859
4860
4861
4862

012522
(12524
012526
012527
012530

000000
000000
000
000
00000C

4864
4865
:ggg

012533
(12534
0125635

0GG
00GC
000

4863

012532

000

4868
4869

CONF IGURRTION >ONSTANTS

UNARDDR:
VECTARD:

.WORD
.WORD

;

C12636

487 ¢

4873
484
4875
487

Ciee3e

O
O

WORD
.WORC
.BYTE
.BYTE
.WORD

O
O
O
O
O

10BUF: .BYTE
FILLCH: .BYTE
CONEND: .BYTE

O
O
O

SDEV:
EDEV:
CHTYPE:
MMRESP:
BUFREL:

TSTTYP: .BYTE

:gzg

SYSTEM PUSH STACK

SSTACK

_=.+100

:UNIBUS RDDRESS
:CX VECTOR ADDRESS

:STARTING DEV NUMBER
:ENDING DEV NUMBER
_
:CHANNEL TYPE O = MP» - | = SEL
:MEMORY MANAGEMENT 0 = NO - 1 = (ES
:BUFFER RELOCARTION ADDRESS

:TEST TYPE O = 2848 - 1| = FRIENG

:SEPERATE 1/0 BUFFER 0 = NG - 1 = (ES
:FILL CHRRACTER
:EXTRA

)

:g;g

;

SYSTEM VARIABLES

:ggg

THE FOLLOWING VARIABLES ARE RESET UPON START-UP

4881

012636

000000

4883
4884

012740

012740
000000

4886

012744

000000

4889
48390
4891

013046
013050
013052

000000
000000
000

4893

013054

000

4882

4885

:ggg

4892
4894
4895
4§96

4897
4898
4899

4300
4901
4902
4903
4904

:382
4907

49C€

(012742

013053

0130Ss
013056
013057

013060
013062
013064

013066
013067
013070
013071
013072

013C73
012074

C1207e

012640

000000

8138:2

000

VSTRT:
TBUF

.WOGRD

TBUFE

TPTR

PBFS
PBFE

PFPTR:
PPPTR
PIUFL

TCMACT:

TCMDAB:

LINECT:

WORD
WORD

TELETYPE

:TELE IN PTR

INPJT BUFFER

INPUT

BUFFER

:START OF PRINT BUFFER

:TELE COMMAND ACT x E FLAG C = NON-AZT

:LINE CTR - CHARS

.BYTE

000

.BYTE
.BYTE
BYTE

000

TTYSTP:

WORD
.WORD
.WORD

PCTR:
DXABFL:

BYTE
.BYTE

CMOCHF:

.WCRCL

MCE 7

:ENC

TELETYPE

.BYTE

DXSTPF:
MAXDEV:
ODXACT

09C0GC

:STRRT OF

:END OF

0
O
O

000

00000C

.WORC
WORD
BYTE

BYTE
BYTE

000
006

: DUMMY

.=-+100 )

WK
WK1 :

TTPIR
TYADDR:
SDEVIB:

)

=,+100
WORD
O

000
000

000000
00000
000000

'2325
CWORG

F PRINT
BUFFER
PRINT
BUFFE

:PRINT FETCH PTR
:PRINT PUT PTR
:PRINTER IN USE
F

:TEL COMMAND ABORT ! = ABORT

O
O

: WORK
:WORK

O
©
O

:DX STOP FLAG
"HIGHEST DEV s 1 - 8
:DXACTIVE FLAG

O
O
O
O
O

o)
O
7

LOC
LOC

LINE

TUHBLE TRBLE PTR
:BEG OF TUMBLE TRBLE
:STPRT OF osvxcs TRBLES
:PRINT BUFFER COUNTER
:DX ABORT FLAG
O = NO ABORT,

1 = aoa

:CONSOLE OUTPUT STOP FLRG 0O = OUTP
. COMMAND CHRIN FLAG
SDEV

IN MPXR EXEC

1 = NC SUTPUT

IO
@

®oeha

[@1Q]

PAE i08

09:46

Ol-FEB-T8

PROGRAM CCNSTANTS AND VARIABLES
:

“SEE

EOS

[T
S

30-JRN-"8 14:19

MACY1l. 30R(1052)

naxwosy-x1 D-CxI-B

CZDNIB.FIL

NEW DOVil-B RESPONDER

FOS

MAC11l 30A10S2) CO1-FEB-78
MIINDEC-11-DZDXI-8 NEW [xi1-B RESPONDER
PROGRAM CONSTANTS ANC /ARIABLES
30-JAN-78 14:19
-ZD®IB.Fil

43909
4910

4411

4912

013100

013076

013120
(013122
013184

000000
000000
000003

013i2e

000000
000000

000000

4328

:vIRTUR. BUFF ADDR

203132

202:32
ZIZ3ITC

.WORD

.PHYSICAL BUFF ADDR - IN

,00G'3

IN MANAGEMENT
,000°S

'PHY OFFSET FOR MEMORY

WORD
.WORD
.WORC

§
O
O

{CURRENT DX DEVICE -- INTER SERVIZE RGUTINE
'DEVICE ADOED TO THE DEVICE NUMBER = STRRTING DE/ HJMB "EXTENDED RDDRESS BITS FOR THE DX “ONTROL RESISTER -- IM

SADOR:
EADDR:
OMPRDR:

.WORD
.WORD
.WORD

O
O
O

:TELETYPE COMMAND STARING BUFFER ADDRESS
' TELETYPE COMMAQND ENDING BUFFER ROOPESS
PGINTER ~0 DUMP ROUTINE CURRENTL- BEING UTILIZEC B~ “EL

VEND:

0i313C

.WORD

CDEV
BEVCON:
XADDR:

4325

.WORD

STSPW:
DSTOFF:

4918
4919
4320

VBUFA:

013114
013116

000000
000000
000000

4321

‘GEV ® IN SEL EXEC

PHYOFF:

Q13106
013110
013112

4922
4323
MRS

MOE .

013104 00C330

000000

4913
4314
4915

4916
49i:

PBJFA:

SEC 2129
265 2133

PASE 109

SELDEV

000000

013102

039:46

PMAax:

FTIMF_:

.WORD
.WORD

.WORD

O
O

!START OF THE PSW TABLE
!DFFSET YO THE DST TABLE

THE FOLLOWING VARINBLES ARE NOT RESET ON START-UP

.WORD
.WORD

PBFE-PEFS
O

:SIZE OF PRIN® B_FFEP
!EIRST

TIME FLAG

MESSRGES
BEX

VECTMS:

215,212

/INTERRUPT VECTOR ACDRESS -3-TAL- :
377

DEVMES:

215,212

/DEVICE ADCRESSES -HEA377

CHTYMS:

515 212

+CHANNEL TYPE
5.

ele

#ER RELOCATION,
1

TESTMS:

1-0 BUFFERS

ATE
1

nmn
X0

- X
wmh
N EL

=<
<0

. TM
Wworn
D+
N

nmnn
-0

W
N
~J0+—
MmN

hiN

We—n
O
NN
Wiy
N~
JLE0

ILLMES:

OR Ni:

T BUFFER FILL CHARACTER -HEx-

PRARMES:

(@]

IF SPECIFIED - IN EVEN ,003°S -~LTTAL-

(F) OR 2848 DIRG(D):

FI0MS:

FILLMS:

212

n
p
on
p o]

BFREMS:

/§é505v MANAGEMENT (Y OR N.:

NV
[
n

MMMES:

XA, 7+

(M OR S

377

NXMMSG:

|®]
wn
£

@)
n

lu—n)
-0

e
Ny
LN

e
=0

i
-0

o
n
[=]

o
£

(=]
P
n

o
s

£
£
(=]

377

Wi
JO—=
N

o
unor
L

[,
e
Dot P e
o pe
>aba b
Y Wy
[

batote

00O

pababa

OO0
OOV

Vapabe

15212

/UNIBUS RDDRESS -0CTAL- :

mny

Waw

ps2les

042516

NEW C»11-B RESPONCER

772,377

me
5;91 N

WWW
W

0405e2

g42s03

UNMSG:

2is.212

/DZDA1-B

000

p4elle

E:LJ(J
L£LLE
Wy
00

WWww Www kj
W

o000

0s110S

000
OO0
O00

os4622

000

Osiiee

00M

082502

&TMSG:

DeesSil

Wwwiuww
MNUserepar=prW~
W
ONWWIO
L
W
NV

P o oP P B

000000
000

MESSRGES

NUMBER

»epa

CHY

PAGE 1.3

09:46

OI1-FEB-78

30R(1052)

MACY
“MIINDEC-11-ClCN]-B
NEW Dx;1-8 RESPONDER
MESSRGES
:19
3C-JAN-T8
ceonlB.Fll

GOS

HOS

M3IINDEC-11-DZD\1-B NEW DXx11-B RESPONDER
MACY1l 30R(1052)
MESSRGES
30-JAN-T8 1M:19
ISONIB.PIY

014016

0S2503

0S1122

04~105

STPMES:

14050

207

INVLDC:

014047

377

gxwgsw ou” 111 0u0€25
owngw
377
218
014078

QHIO

U]
014143

waxu?

14166
0i4167

014173
Oiv222

850
9 N47S16 D4eH440 PNOMM:
37
215

545

215

xxs

212

04eS0S
212

046505

207

0Sili”TM
207

051117

.ASCII

.EYEE
kv

OL-FEB-78

09:%

/CURRENT DEVICE NUMBER --

377

.BYTY

207,215,212
.gscix
fNVAL?o
Sr L OMMAND ~
212,215,377
.BYTE

SSE / NO MEMORY MANRGEMENT &.AILNBLE

PMTO:

: YTE
.BYT

377
215,212,
§?7 207

FMMERR:

1%
.BYTE

37
215,212,2C7,207
377

.Asci1

"ASCI1

/nsho

Ly 10)
0%

/MEMORY MANAGEMENT ERRGP

Ji4e24

377
o14224
2ls

G14226 064523 052123 046505

RNMESG:

.BYTE
-EVEN
.BYTE

014277
014300

377
015

0l2

214302 0OS4104 030461 041055

HELPMS:

.BYTE
.BYTE

S14375

015

012

.BYTE

CR,LF

109

026440

020055

"RSCIT

/D’ -- DUMP COMMAND/<CR><LF-

014504

020040
020040

020040

-ASCII
_RSCII

014733

040

020040

JRSCII

020040
020040

014377

015

014424

020040

C14401

014602

014201

014776

015030
015116

015205

015230
015262
015310

015351
015377
015432
016462
015525
015605
015667
215744

16020
016032
516106
016146
816215

Ci6ebl

01633!

316367
0168E2
CledeS
ZiESSH
ZIEEL:

212

012

020040

105 026440 02005S

020106

026455

110

026440

1
040
020123
020040
040
040
o40
020040

026440
020040
026455
020040
020040
020040
020040
020040

020040
020113
020040

00S01S
020040
020040
020040
040

040

103

103
103
252123
133

020040
026455
020040

044127
020040
020040
020040
020040

020040

0471)7

O46i24
Q4ela4
QJeeSid
04Eled

043040

020655

020040
04S440
020040
020055
020040
042040
020040
020040
020040
020040
020048

0S110S
04,442
020040
020040
020040

021040
021040

047523

041985
0S00SS
02012
JE145S

PAGE 111

.ASCII /svérsn INITIALIZED, TYPE “RTM TG ENRBLE O~
216,2

-RSCII /okxx-B 2848 EMULATOR TEST PACKRGE - OPERATIONAL INFCRMATIZH
.BYTE

.RSCII

CRILF

DTT,C

DUMP TUMBLE TRBLE IN CODE "C” <CR> LF>

DIN c XX

DUMP INPUT BUFFER FOR DEVICE xX IN C2DE “C~. (R

ENARBLE DEVICE XX/ (CR»>‘LF>

-RSCII
JRSCII

FIN,HH,XX FILL INPUT BUFFER ON DEV xX¥ WITH HH/¢CR: LF
FOT HH' XX FILL OUTPUT BUFFER ON DE< X» WITH HHM-'/CR. LF

RSCI1
RSCIT
RSCII

~
/v
~

‘ASCII
LASCI1
"ASCIT
SRSCII
JRSCII

<CR»‘LF> WHERE: <CR><LF>
“C* 1S CODE FORMAT

DUMP OUTPUT BUFFER FOR DEVICE AX IM CODE

-ASCI1 /E -- suneLé bsvxce ON DX/ <CR>(LF>
.ASCI1

RSCII

.ASCII
JARSCII
.RSCII
ASCIT
RSCII
SASCIT
"ASCII
SRSCII

SASCIT
.RSCII

RSCII

Q8CIT
LASCII
"WECIT
'RETTT

“CTM-

ZR, .F

/F -- FILL aurrsn COMMAND
/ (CR> <LF>

/KW -- HELP LOMMAND
/ <CR> <LF>

xs TEXT/<CR> <LF>
-- KILL DEVICE ON THE DX/<CR~(LF.
KILL DEVICE XX-<CR «_F
/R -- ENQBLE DX (RUN)Z<CR><LF>
RUN TEST/<CR><LF>
/S -- DISRBLE DX (STOP)/<CR>(LF>
g
STOP IMMEDIATELY.
<CR> (LF>
SD
STOP AFTER NEXT DRTA TRANSFER/(CR 'LF
SE
STOP AFTER NEXT ENDING SEQUENCE
CR . F
51
STOP ON NEXT SEL SEQ (ISS)/<CR><LF.
~
gp
STOP ON NEXT PARITY ERROR/<CR>«LF

“Xx"
“HH"

1S ox 11

0
R
E

= OCTAL/<CR><LF
= RSCII/<«CR»<LF>
= EBCDIC/<CR><LF>
=
HEX/<CR> <LF>

DEVICE NUHBER

N HEX/<CR.<LF

1S
A HEX CHARACTER/<CR>
(LF> (LF>

CONSOLE CONTROL cnnancr§n§/<cn><Lr>
/CTL=C
/PTL
-P
CTL-Q
FTL-S

(#C)
(tP)
(tQ)
(1S

ABORT CURRENT
COMMAND.¢CR>
(LF>
REQUESTS THE REENTRY OF CONTROL PARAMETERS
RESUME OUTPUT AFTER TEMPORARILY STCPPING a»
TEMPORARILY' STOP OUTPUT TO CONSJILE- CR
_F

C°R - _F:
*S
IR

Q16730
JieT~b

C1704S
217951
Si7283
-

432,
<3:z

21713

952103
062522

0158
002551
15
fg3
e

J3000C!

026514
04~SC2

012
_
3T
O4TSI7

ASCHT
ASCIT

020125
05212

012

OMINMD

MELPLN
T36C:

.BYTE
=
.BiTE.
ASCII
.BYIE
.LIST

.EVEN
LENC

09:46

PAGE 112

/CTL-U (1U) DELETE CLRRENT INEUT LIME -2 .F
/RUBQUT -- DELETE LAST CARRACTEP INP_TM "8 (F

CR,LF,LF,LF
- ~HELPMS
215,812
_T3B CLCSE TO 220000 BCUNUAR377
BEY

O0i-FEB-78

[

MESSAGES

108

Q18]

30-JAN-TB 14:19

MaCY1l 30R 1052

:Z0NIBUFL:

MNEW Dv.i1-B RESPONDER

Iy
mm
e

MIINDEC-11-DIDX1-B

DC40SC
004636
012354

ACCESS

27058
egy?
3095

2425

24¢cb

48eas

3S1H

3547

2Se8

3623

4171w

2859

2984

307

3273

3383

3345

4685Ss

4023

4212

3701

3703

3777

3831

43C7
s

3573

357S+

48608

3606+

3217
3652

4469
41918

4528s

3003

3088

4449

4330

3867

3949

4004

4020

4082

41i3

4195

<9l4s

3323

35ee

3826

3865

3947

4gce

4052

4307

nunuwnnanon

[l
el = LN

o LY oY Y =

00000

4071

00000

(@]
—

2646

DMPADR
=
DONE
OREAD
oPMI
psePmM:

3025

3050

3823

4355

4362

436888

3074

3084

3310

2835
3450

49204

2782

[WIN]

oepe

[gTw)

|1+

48C0s

4062

D1sSPSZ=

PRLE

aln
mm
we

JO9

09:+4b6
MACY1l 30R(10%2)
01-FEB-78
MIINDEC-11-DZDNI-B
NEW DXil-B RESPONDER
CROSS REFERENCE THBLE -- ~SER 5YMBOLS
30-JAN-T8 i4:13
on1B.PLL

o
"

Dx1-B

NEW Dxil-B RESPONDER

30-JRN-78 14:19

30R(10S2)

37S1s
3752
3SS0+»

4904s

KOS

01-FEB-78

o CROSS REFERENCE TABLE -- USER >5YMBOLS

3028
2893s
284Ss
070

MARCY11l

09:4b6

PAGE

&2 il

11S

4317s

3671
28elx
3534

38S0

3865+

476

3570

3572#

385Ss
3952+

3863+
3957+

3602+

3713+

3728+

3829+

3871

39%0*

4007+
4839

4oles

3948+

4003+
Yllibs

4843s

M110#

4llle

4liee

3864#

4006#*

40B84#»

411S»

2756+
40cou+s

Y102+

2757#

2758+
4118

2809

2gae»

2823»

342l

34S0»

3536+

3832

3874

3993

3914

3362

40285

4104

<1248

3654

3730

3744

43900s

2940

3285

3309+

3310+

33ees

3323

49138

4053
47488

4373
48598

296c

3009

3031

48408

3751

3790

000

2758

484ls
Y0eH

36393
396!
2934
3523

4312

3751
4118

226l

2486

2536

3852
2696

39eS
2759

3378
2804

28ev4

2886

2908

2942

2395+

2564

2923+

2939

3526

40Sé

4B6SH

2199+
30ee

2577+
3046

4920
3069

334Ss

3284

3294

3306

3319

2ebls

4051w
002720

003042
003716
012S34
013636

GLEAL

GLIMIT

00socC

33248
3259

“0”1s

3329

30E4

ggéz?gfpif 0 D3é°?QN-§E 14:19
C-11-DZDxI100S172
005232
00S14e
00Sl11le

GLMIN
GLMOT
GLMTY
GLOCY

HDMP
HELP

204760
004004

NEW Dx}1-8 RESPONDER
3266
3268
3264

3304s
3317s
3292s

28ly
e’l3

32188
29518

3262

HELPLN= 002551
014300
HELPMS

2952
2951

ILLMES

H467

HEXDMP

(004754

013762

INHEX.
- DOZbad
INIT
002026
NM

INOCT
INPUT

eced
30678

2e’b

2304

232l

2359

2378

26338

e377#%

2385#

344

4E64
s

19628
19638
19648
19728

43?7
2448
2438
4930

005364

3380

34lis

3504

3537

3552

3631

3704

3922

3455

3576

007326

3349

3923

3894
2293
38918
47238

3912
2340

3921+
2586

4308s
e8ll

4909
Y546

4564

Yells

2334

c4e?

4BELn

220?
2282
2349

2209

ecll

2212

4740

2988

3182s

014050

ebl9
2103s
3670

000010
004266
004324

2053
e’l?
30548

MDEV
MESG
ME X
MMERR

MMMES
MMRESP

MMSRO
MRERD

013067

MCMDTB

013076
011472
007210
011700
=

MRMI
=
MSRMI
MT0
MUXEND
MWRITE

013376
(012527

177572
007600

007502
007502
011672
010342
007352

NEWLNE= 00C02S
NEWPRM
(001174
NEWPLIO
001460
NEWP20
001704
NOLIN = Q0004
NOP
= 000003
HXM
=
NXMMSG

OCTDMP
CCTEX

3cl7n

49308

2201
27158

172340
172356
172300
000012

MAXDEV

49308
49308

c404s

KISARO=
KISAR7=
KISDRO=
L
=
=

3279s

2394

012533

LOOP

PRGE 116

2382

10BUF

ISSREJ=
KILL
KILLEX

CROSS REFERENCE TRBLE ~-- USER 5YMBOLS

09:46

2010
2380

INRS
002636
INTREQ= 000100

248"
2184

01-FEB-7B

2382
2364

002632
004230

INVLDC

2853

MACY1]l 30AC1Q0S2

LOS

040000
013706

004870
00474y

2539

2754+
2191
3761
2160
2305

cb34s
3682
49308
3610
30468

2568

2743

2303#

49304
c3llx

2313#
3972

e4so#
3974

3924
3932
2158
3714
3923

3970s
39714
2404
3729
3927

47168
4elos
3943

196Ss
3928

20l8s
2199
2250
2323
2023
2017

4317
2205
2275
2339
2024
3665

2818
3199

28<6

204es
3584

3488
49304

4723
3937

3532

378S

3909

3737

4301»

g!x Bi}g
Py

MIINDEC-11-DIDXI-B

30-JAN-"8

CZDxIB. P11

BRRER =

PARMES
PBFE
=
PBFS
A
PBUF
PCHRR

NEW Dxi1-B RESPONDER

467
0000

14:19

99¢
O4ls
3638

183

494
49308
4586

21?7s
ou4l

PCHEND

MOS

09:46
01-FEB-?8
CROSS REFERENCE TABLE ~-- USER S5YMBOLS
MACY11l

3684

3734

4888
Y518

4927
4588

o469
3233

2570

4460

30R(10S52)

48868
4910
4Sb3is

PARGE 117

SEG 0118
SE% Cilb

4927

4435

4Si0#

4585

4590

4729

4303s

3848"

3842

383"

3987

4001

4112

Qles

4509#
4636#*

Y4726#*
4639

1
1
\

4530

4S4Se

7
S650

47e’s

4739#

4918s

O000000~000000000000
OO0
O
=0 N+t
e D O 0= b e b

2958

3
3
i

&
6244
3

RSTART
RUBOUT=
RUN

SRDDR

SATTN
007?760
SBUFR = 000g1e
= 000G00
SCMD
= 0002c0
SCMDRJ
scMpTe
306704
SCURS = 000004

SDEV
012522
SDEVTB
SELDEV=
SELRST=
SENSCM
SEX
SINBF = 00000¢&

c881#*
3279+

2882
3295%

2894
3296#

2898
3308+

2900#*
3309

2901»
3321%

2933+
3322

3569%
3959

3948
3598
3997

3980+
3630%

4YO01*»

Y172%

3987
3732*

4000*

40e2*

3984
3672#%

G328

3927

3508

3994

358

3319{

s
Y044
%
3946

3076

Y4316x

2ebl
3320
3788

3775

2484

2537

2540

3346

3797%

48998
49098

3308

3821

3945

4277

4346

2ebd

4143

4110%

2560#

3782%

Y361
#
3483

2935

2985%

2986

2992

4003
3794

Y174#
3827

Yeco8s
3866

383

3848

3982

4060

#
4287

4375»
4859

SLCMD
SMI _
SMINS
SONLF
SouTs

=
=
=
=
=

000001
000112
000020
0000i6
000010

199¢s
20208
2002

3601#*

SPACE = 00OQH0
SRBYTC= 000014

3827+

38664

3959»

3997+

3518»
3677
3079

4192

3846

3980

4371

33el

3521

3872%

3943

3947

3517

Yoo

SRDRG = 000017
007142
SRDI0

SREAD
007120
007020
SRMI__
SSENSE= 000002
SSRMI
SSTACK=
SSTAT =
STAMOD=
START
STKSTB=
STMSG
STOP
STOPDX
STOUT
STPDX
STPMES
STSPW
SUDEV
SUDEX
SUDIO
SWRITE
SYSINT
SYSRST=

007020
012636
000003
000100
001000
000002
013134
003264
003340
010059
006532
014016
013114
010230
010252
010240
006730
001006
010000

TBUFE
TCHEND
TCHIS_

012740
00Se24
005612

TBUF

TCMACT
TCHDAB

TCMDTB

4263

4265

4278

3847

3863

3981

4000

4051

4305

3955

3973

3986+

3998

3600+

3780

3953
43G9
3842

400e+

4307

3845#

3898

3976

3979#

3549+

3682

3690+

3696#

3736#

3828+

3841+

4044»

4071#

408S

4o87*

4101

4173+

YoB84s

40936

= 012640

2997

444y

4464

4468

4882

013053
013054

2676
2884

%
23987
2904

4441

Y446
48938

4452

003044

012462

TPTR
TSELRS

Y4261l

4022
3774

TPB

P35

4176

3J744e

005636
005566
013534
005542
012456
010744
012454
005554
017051
011710

TPARER

005600

012460

012742
005530

Y4474

4885

3895

4197
Yl43s

Y443

4yg3Ics

3870+

39E8»

~NN

abe

[ ]n)

PAGE 11R

3731

TCUEND
TESEND
TESTMS
TINDSC
TKB
TKIN
<5
TNXM
T00C
TOUTRT

N
mm
[a)
u]

NOS

(09:4%6
MACYLl. 30A(10S2)
01-FEB-78
NEW D X11-B RESPONDER
MIINDEC-11-DZDX1-B
4:19
CROSS REFERENCE TABLE -- USER SYMBOLS
30-JAN-T8
CZDXIB.P11

TSTTYP
TTADDR

3839

3971

437+
2900

48979

2499

41l
€898

296

3423

2430

{-Yo))

3083

3641

408t

2cl3s
4930
4738
2453+

48SEs

4872s

48~z

“88¢c

2358+
g43?s

2368+
2748

v7512E= 001000

2025

uUcHK
=
UCHKS =
=
JEXP
UNRDDR
JNMSG
UNTRP
UFR

000002
002000
000001
(012516
01317S
011742
01310¢

20968
20468
20978
2200#
2e0e
eeee
24ek*

012520

2223

2235

01306C

TTYSTP

veMDTB

VECTRD

VECTMS

002610

252s

eees

013126

VSTRT

2166

01263s

W
MK |

y430#

Q13073

013232

VEND

XRODR

2498+

2165

013056
013057

RBS.

J13lie

2576+

01711C

(1”112

ERRORS DEYECTED:
czoxxe

3139+
3143

2lils

2-49s
H434s

7=z¢0.8
GE 4

48638

48878

492ls

2166

3140
3145+

48958

2113s

3970

2756

355

“gtse

49308

00C

10°.? ssco DS

guu TIHE nn*xc
"RE [ .4 -r

4ore

25382

czoxxa SOL /CRF=CZDX1B.DOC.C2DXIB. P11

UN-TIHE:

4OSY

36cb

(012532
013062

TTPTR

48e3

“320

Pep
e

PRGE 119

K20
mm
[ SN

B10

MACYl]l 30R 10S2)
O01-FEB-78 09:46
NEWw D».1-B RESPONDER
MIINDEC-1:-DZ0vI-B
CROSS REFERENCE TABLE -- LSER 5YMBO.S
3C-JR=-"8 14,19
:ID*XB.FLL

Ci0