Digital PDFs

MAINDEC-08-D72A-D

December 2000

62 pages

Original

2.8MB

Document:	maindec-08-d72a-d
Order Number:	MAINDEC-08-D72A-D
Revision:
Pages:	62
Original Filename:	https://svn.so-much-stuff.com/svn/trunk/pdp8/src/dec/maindec-08-d72/maindec-08-d72a-d.pdf

OCR Text

MAINDEC-OB—D72A-D

IDENTIFICATION
Product Code:

MAINDEC-O8-D72A—D

Product Name:

680 DC5 Data and Control Test

Date Created:

May 15, I967

Maintainer:

Diagnostic Group

Author:

Kenney

I POP-8
\
LIBRARY

MAIN DEC -08—D72A-D

ABSTRACT
The 680 DCS (Data Communication System) Data and Control Test consists of three indepen-

dent test groups which will be referred to as operational modes 0, I and 2.

The following is a brief description of each operational mode.

A detailed description of

each mode is presented with the operating instructions and error reporting explanations for the respective Operational mode.
0.

Operational Mode 0 consists of three test phases designed to verify correct operation ofhthe line selection register (LSR) decoding

logic, data transfer between the

computer and each W750 Data Line Interface Module, and power clear.
b.

Operational Mode I sequentially outputs a fixed 8-Ievel ASCII or 5-level Baudot
code message on each active data line.
associated with any of the active

The input/output terminals of the W750,

lines, may be connected together, or to an on-

line Teletype (or Modem).
c.

Operational Mode 2 is a receive/transmit routine which will receive and assemble
data characters from an on-line Teletype, and transmit the resulting message back
to

the originating Teletype upon recognition of a period.

REQUIREMENTS

2.]

Storage

Operational Mode

End Address

0400

I I75

2000

2337

3000

3152

Subroutine

2.2

Starting Address

End Address

Transmit (modes I & 2)

4000

4I27

Receive (mode 2)

4200

4520

Equipment
Minimum configuration PDP—8
Minimum configuration 680 DCS,

(i.e., 68]

Data Line Interface and 685 Multiplexer

Control).
O.)

PROGRAM LOADING
a.

If the Binary Loader is resident in memory,

Binary Loader into memory.

proceed to step b, otherwise load the

MAINDEC—08-D72A—D

Set the AC SWITCH register to 7777 and depress the LOAD ADDRESS key.

Then

depress the START key.
Place the 680 DCS Data and Control Test in the keyboard reader and turn the
reader on.

When the program has been read into memory, the AC should contain 0,
correct program tape

indicating

checksum.

OPERATIONAL MODE 0

4.1

Operating Procedure
NOTE:

All W750 modules must be iumpered input to output:
with PIN H

L-N and U-H,

iumpered to the Inverter Input.

Set SR to 0200 and depress LOAD ADDRESS.

Select the base (i .e.,

lowest) active line number in SR 5-H and depress START.

The program will store this number and halt at location

204.

Select the number of active lines to be tested in SR 5-H and depress CONTINUE.
The program will store this number and halt at location 2“

Select operational mode 0 (SR l0 and II

reset) and depress CONTINUE. The

program will begin EXECUTION of operational mode 0 at location 400.

4.2

Summary of Switch Register Controls
SRO

Set

Reset

SR]

Cycle through all three phases

Don't type reports

Bypass bell

_S_e_t_- Halt at completion of phase 3
Reset

4.3

Sei— Ring bell on error
Reset

SR5

No scope mode

Set- Type status reports
Reset

SR4

—

Sei- Verify mode (continuously cycle through the current phase)
Reset

SR3

Bypass error halt

Sei— Scope mode, (described in detail for each phase)
Reset

SR2

Halt on error
—

Repeat phases l, 2 and 3

Detailed Description of Test Phases
All 680 Clocks are disabled.

MAIN DEC-08-D72A-D

4.3.I

Phase I Test Sequence Location 400
Lines 0 through I77 are scanned to verify that all

In addition to the data line check,

input data lines present a mark level.

program scan counter is maintained to verify correct incrementa-

tion of the line selection register.

4.3.2

Phase I Status Reporting
a.

TEST COMPLETE:

Reports completion of mode 0, Phase I test sequence.

ERROR I XXX:

(Halt location 540-MOPIEI-AC=Line number)

Line number XXX presented a start (i.e.,

space) level when sampled, (i.e.

IOT

6402).
When CONTINUE is depressed, the program will attempt to set line XXX to
a

will resume.
c.

If the data line is now at a mark, the scan

mark and then retest the data line.

(Note:

Indicates incorrect operation of power clear line preset).

(Halt location 475

CYCER E XXX 000:

CYERI

—

The line selection register has cycled from line 00I to line 000 before the program scan counter has counted

2008

scans.

The contents of the line selection

Depress CONTINUE to restart phase I at location 403.
d.

CYCER L 000 XXX:

(Halt Location 475

The program scan counter has counted

2008

CYERI

scans

has not yet cycled from line 00] to line 000.

be 000, the actual contents are XXX

I).

but the line selection register

The contents of the LSR should

Depress CONTINUE to restart phase I at location 403.
4.3.3

Phase I

Scope Mode Sequence (SRI)

Selection of phase I scope mode causes the line number currently being scanned to be set

continuously to a mark (IOT 6404) and sampled (IOT 6402).
be selected if desired,

4.3.4

Error reporting and error halt may still

(SR3 and SRO, respectively).

Phase 2 Test Sequence (Location 600)

Starting with the specified base line number, one active line is set to a start (i .e.
level.

The remaining

mark level.

I778

space)

lines are then scanned and sampled to verify that all other lines are at a

The active line under test is then tested for a start level.

This test sequence is repeated for each specified active line.

MAIN DEC-08-D72A-D

4.3.5

Phase 2 Status Reporting
a.

TEST COMPLETE:

Reports completion of mode 0, phase 2 test sequence.

ERROR

(Halt location 700-MOP2El

XXX:

0 it error

I, or AC

if error I and early cycle error)

The active line under test
errors were

(XXX) was detected at a mark level.

If no other phase 2

reported, this error indicates a faulty W750 Module or incorrect genera-

tion of 0 to line out.

Depress CONTINUE to repeat phase 2 with the some active line.

(Location

610)
c.

CYCER E

XXX

YYY:

(Halt location 755 it early cycle error or location 677
it early cycle error and error

The line selection register has cycled to the active line under test (YYY) before the
program scan counter has counted

2008

scans.

The line being scanned should have

been XXX.

Depress CONTINUE to repeat phase 2 with the some active line. (Location 6T0)
d.

CYCER L XXX YYY:

(Halt location 660

The program scan counter has counted
not yet

2008

CYERZL

scans

—

but the line selection register has

cycled to the active line under test, (XXX).

The incorrect contents of the

LSR are YYY.

Depress CONTINUE to repeat phase 2 with the some active line. (Location 610)
e.

ERROR 2

XXX

YYY:

(Halt location I46]

Line YYY has been detected at a space.

which was set to a space.

MOP2E2-AC

Line XXX is the active line under test

This error usually indicates incorrect LSR or W750

Module line number decoding.
When CONTINUE is depressed, the program will attempt to set line YYY to a

mark and then retest the data line.
resume.

(Note:

under test (XXX),
error

4.3.6

If line YYY is now at a mark, the scan will

It incorrect line number decoding is involved, the active line
as

well as line YYY may now be at a mark, thus resulting in

I detection at the completion of the line scan.)

Phase 2 Scope Mode Sequence (SRl)

Selection of phase 2 scope mode causes the current active line under test to be continuously

All

(IOT 6404)

Set to a space

Sampled (IOT 6402)

Set to a mark

error

checks and reporting are disabled while this loop is selected.

(IOT 6404)

MAINDEC—08-D72A—D

4.3.7

Phase 3 Test Sequence (Location

1000) (Test involves only the specified active lines.)

Initially, all specified active lines are set to a space. Starting with the specified base
line number,

one

The remaining active lines are then

active line is set to a mark level and tested.

scanned and sampled to verify that all are at a space level.

This test sequence is repeated for each specified active line.

4.3.8

Phase 3 Status Reporting
a.

(Halt location 1134

TEST COMPLETE:

Reports completion of mode 0,

ENDMDO)

phase 3 test sequence.

set, otherwise mode 0 will be repeated,

Halt will occur with SR 5

(location 400).

If halt is selected, de-

press CONTINUE to repeat mode 0.

ERROR l

XXX YYY:

(Halt location ll52-MOP3El-AC= 0)

Line YYY has been detected at a mark.

Line XXX is the active line under test

which was set to a mark.
This error usually indicates incorrect LSR or W750 Module line number decoding.
When CONTINUE is depressed, the program will attempt to set line YYY to a
space and then retest the data line.

If line YYY is now at a space, the scan of the

remaining active lines will resume.
c.

ERROR 2 XXX:

(Halt location “73

MOP3E2

The active line under test (XXX) was detected at a space level.
This error usually indicates a faulty W750 Module or incorrect generation of
l to Line Out.

Depress CONTINUE to repeat phase 3 with the same active line, (location
l022).
4.3.9

Phase 3 Scope Mode Sequence (SRl)

Selection of phase 3 scope mode causes the current active line under test to be alternately
set to a

mark level and a space level.

All error checks and reporting are disabled while this loop is selected.

OPERATIONAL MODES 1 AND 2

5 l

Operating Procedure

NOTE:

All W750 Modules not connected to an on-line Teletype must be

iumpered input

to output:

the Inverter Input.

L-N and U-H, with pin H

iumpered

‘

MAIN DEC-08-D72A-D

Set SR to 0200 and depress LOAD ADDRESS.

Select the base (lowest) active line number in SR 5-ll and depress START.

The

program will store this number and halt at location 204.

Select the number of active lines to be tested in SR 5-H and depress CONTINUE.

The program will store this number and halt at location 2] l

Select operation mode I

Operational Mode l
Operational Mode 2

2 and depress CONTINUE.
SRlO reset, SRll set

SRlO set, SRll reset.

The program will halt at location 22]

Select 680 Clock No. l, 2, 3 or 4 in SR 9, IO and II

Clock No. l

—

Clock No. 2

Clock No. 3

Clock No. 4

SRll set; SR 9 and IO reset
SRIO set; SR 9 and II reset
SR 10 and II set; SR 9 reset
SR 9 set; SR l0 and H reset

Depress CONTINUE; the program should halt at location 253.
occurs

(Note:

If halt

location 230, (CLOKER), a clock number other than I, 2, 3 or 4 has

been selected.

Select correct clock number and depress CONTINUE.)

Select desired code level:

SR ll reset
SR ll set

8-level ASCII Code,

5-level Baudot Code,

(Model 33 or 35 Teletype)

(Model 28 Teletype)

Depress CONTINUE, the program will enter the selected operational mode, (see
section 5.2.2 and 5.3. 2 for mode I switch register control and mode 2 switch re-

gister control, respectively).
5.2

Operational Mode 1:
Restart at location 2000

5.2.l

Program Sequence

Fixed test message

Starting at the base line number, the program sequentially outputs a

each active line in the specified code level.

Three error checks are performed

during the transmission of each character of the message and any errors are reported following trans—
mission of that character.

Half
active lines.

duplex operation, (or appropriate common input/output connection), is assumed on all

Transmission on a Full duplex line will result in data-echo errors (status report d).

The data—echo error check may be bypassed while retaining the other error checks by setting SR 6.
*

THE QUICK BROWN FOX JUMPED OVER

THE LAZY DOG'S BACK!

(CR)(LF)

1234567890 (BELL)(CR)(LF)

MAIN DEC -08—D72A—D

5.2.2

Switch Register Program Control
SRO

Set

—

Reset

SRl

Set

Reset

SR2

Set

Reset

SR3

Set

Reset

SR6

Bypass error halt

Continuously transmit the current character
-

Transmit message in normal sequence

Continuously transmit the complete test message on the current active line
Sequentially transmit the complete test message on all active lines
-

—

Don't type reports

_S_e_t_- Ring bell on error
Reset

SR5

Halt on error
-

_Se_t- Type status reports
Reset

SR4

(Mode l)

—

Bypass bell

Halt when all active lines have transmitted
-

Continuously cycle through all active lines

Sel- Bypass data-echo check (full duplex operation)
Reset
Check data—echo (half duplex or common input/output connection)
—

5.2.3

Status Reporting
Cl.

ll TEST COMPLETE XXX

YYY

Report completion of mode 1 phase l

the base line number, YYY is the final transmit line number.

ENDMDl-AC

final transmit line number).

TINUE to restart mode l
ll ERROR l

XXX

YYY

at
-

XXX is

(Halt location 2l72-

If halt was selected,

depress CON-

location 2000.

(Halt location 2330—Ml2ERR—AC

After outputting the start bit for each?

characterionthe active transmit line, the pro-

gram scans and samplesthe remaining

l778 lines to verify that they

level.

are

at a

mark

This report indicates that line YYY was detected at a space (start) level.

Line XXX is the active transmit line number.

Depress CONTINUE to resume transmission.
ll CYCER E

XXX

YYY

(Halt location 2330

Ml2ERR—AC

The active transmit line was scanned during the start bit scan,

(described for status

report b), indicating incorrect line selection register incrementation.

Since

the start bit scan is interrupted by at least one clock interrupt, it is possible that
one or more

of the clock IOT instructions may have affected the contents of the

line selection register.

Depress CONTINUE to resume transmission.

MAINDEC-OB-D72A-D

ll ERROR 2

XXX

YYY

ZZZ

—

(Halt 2330

This status report indicates a data-echo error.

MlZERR-AC

XXX is the active transmit line,

YYY is the character transmitted, ZZZ is the corresponding echo character.

(Note:

For full duplex operation this data—echo check may be bypassed while retaining

the other error checks by setting SR 6.)

Depress CONTINUE to resume transmission.
e.

ll ERROR 3

XXX

YYY

ZZZ

(Halt 2330-M12ERR

This status report indicates detection of an AC rotate error Following execution of

IOT 6404 (TTO).

XXX is the active transmit line, YYY is the character transmitted,

ZZZ is the corresponding echo character,

(000, if SR 6 is set).

Depress CONTINUE to resume transmission.
t.

ll ERROR 4 XXX

YYY

ZZZ

(Halt 2330—Ml2ERR-AC

Indicates detection of data-echo error and AC rotate error,
e,

(status reports d and

respectively).
Depress CONTINUE to resume transmission.

NOTE:

The 8—level ASCII code test message starts at location 2400.
The 5-level Baudot code test message starts at location 2600.

Message transmission terminates upon recognition of an all zero
character, (0000).
5.3

Operational Mode 2
Restart at location 3000

5.3.]

Program Sequence

line per message basis.

Phase I, the data receive portion of mode 2, operates on a single active-

In other words, when a start level has been detected on a

line, the program

defines that line as the active line until the message is terminated through recognition of a period and
transmitted back to the originating device.

Start levels detected on any other line following designa—

tion of an active line will be reported as an error,

(status report a).

Following transmission of the received message the program will accept data from any of the
specified lines.

(Note: Restarting mode 2 at location 3000 will clear the active line designation and

enable a new active line designation).
The received message is assembled starting at location 3200 and cannot exceed l77
characters.

(Phase I is terminated and the message transmitted upon reception of the l77th character).

Any errors detected in phase I will be reported following reception of a complete character
on

the designated active line.

Error halts are not executed during phase I

MAINDEC-O8—D72A-D

Phase 2, the transmit portion of mode 2, transmits the received message on the designated
active line.

Three error checks are performed during the transmission of each character of the message

and any errors are reported following transmission of that character.
Since half duplex operation is assumed, transmission on a full

data-echo errors,

(status report 9)

duplex line will result in

The data-echo error check may be bypassed while retaining the

other error checks by setting SR 6.
5.3.2

Switch Register Program Control
SRO

Set

—

(Mode 2)

Halt on error (phase 2 only)
7

Re-s—et
SR1

Set

Reset

SR2

Set

Reset
SR3

Bypass error halt

Continuously transmit the current character
-

Transmit message in normal sequence

Continuously transmit the received message on the designated active line
Return to phase 1 after transmitting the received message
-

_S_e_t_— Type status reports
Reset

Don't type

_S_e__t_- Ring bell on error
Reset
Bypass bell

SR4

(phase 2 only)

Not used

SR5
SR6

‘

_S_e_t_— Full duplex operation (bypass data-echo check)
Reset
Half duplex operation (perform data-echo check)
-

5.3.3

Status Reporting
Cl.

2] ERROR]

XXX YYY

Phase]

(receive)

A start level was detected on an undesignated line.

XXX is the designated line,

YYY is the line number detected at a space.
21 ERROR 2

XXX

YYY Phasel

(receive)

The CAW associated with the receive IOT instruction (6402) was modified before

eight clock interrupts were executed.

XXX is the active line number, YYY is the

received character.
21 ERROR 3

XXX

YYY

Phasel

(receive)

No stop bit (i .e. , mark level) was detected on the active line on the eighth clock

interrupt after the last data bit was received. XXX is the active line number,
YYY is the received character.
21 ERROR 4

XXX

Errors 2 and 3

YYY

Phasel

(receive)

(status reports b and c, respectively)

were

detected.

MAINDEC -08-D72A-D

22 ERROR l

XXX

YYY

Phase 2 (transmit)

(Halt location 2330-Ml2ERR—AC

After outputting the start bit for each character on the active line, the program
scans

I778 lines to verify that they

and samples the remaining

at a

are

This report indicates that line YYY was detected at a space level.

mark level.

Line XXX is the

active line.

Depress CONTINUE to resume transmission.
22 CYCER E

XXX

Phase 2 (transmit)

YYY

(Halt location 2330-Ml2ERR—AC

The active transmit line was scanned during the start bit scan
status report e)

(described for

indicating incorrect line selection register incrementation. Since

the start bit scan is interrupted by at least one clock interrupt, it is possible
that one or more of the clock IOT instructions may have affected the contents of
the line selection register.

Depress CONTINUE to resume transmission.
22 ERROR 2 XXX

YYY

Phase 2

ZZZ

(Halt location 2330-Ml2ERR-AC

(transmit)

A data echo error has been detected.

XXX is the active transmit line, YYY

is the character transmitted, ZZZ is the corresponding echo character.

(Note:

For full duplex operation this data echo check may be bypassed while retaining

the other error checks by setting SR 6.)

Depress CONTINUE to resume transmission.
22 ERROR 3

XXX

YYY

ZZZ

Phase 2 (transmit)

(Halt location 2330-Ml2ERR—AC

This status report indicates detection of an AC rotate error following execution

of IOT 6404 (TTO).

XXX is the active transmit line number, YYY is the character

transmitted, ZZZ is the corresponding echo character

(000 if SR 6 is set).

Depress CONTINUE to resume transmission.
22 ERROR 4

XXX

YYY

ZZZ

Phase 2 (transmit)

(Halt location 2330-Ml2ERR—AC

A data echo error and AC rotate error have been detected

number 9 and h ,

respectively).

(status report

MAIN D EC -08—D72A-D

MISCELLANEOUS
Mode l execution time for 32 active lines

(8-level code)

is approximately 9 minutes. This

lengthy execution time is a result of the character transmission rate associated with the Model 33 and
35 Teletype

(i .e.

IO characters per second).

When all W750 Modules are iumpered input to output,

5-level code transmission may be selected, thus decreasing mode I execution time.
PROGRAM LISTING

TTSOFF
TT40FF
TYPCNT
VERPT
HAITI

wA1T2
WAITZA
WORK

6442
6452
0111
1004
2862
3032
451%
1392

/63@
/

DCS

TAPE

/IOT

DATA

AND

CONTROL

TEST

DEFINITIONS

TTlOFF=6422
TT20FF=6432
TT3OFF=6442
TT40FF=6452

/RESET

AND

DISABLE

TT10N=6424

/RESET

AND

ENABLE

TTCL=6411
TTSL26412
TTRL=6414
TTINCR=6401

TTI=5402
TTO=64E4

CLOCK

FLAG

/CLEAR LINE SELECTION
/INCLUSIVE 0R AC 5-11
llNCLUSIVE 0R LSR 0—6
/INCREMENT

LSR

ONE

/RECEIVE DATA
/TRANSMIT DATA

REG.

(LSR).

WITH

LSR 9-6
AC 5-11

WITH

ZERO

MAINDEC-OB-D72A-LA
Page 12
*0000
0000
0001

0000
3066

0002
0004

7010
3060
5020

0010

0000

0020
0021
0022

6041
5031
6042

0023

0026
0027
0030

7300
1060
7004
1066
6001
5400

0031
0032
0033
0034

1061
7500
5035
5067

0035
0036
0037

4504
5040
7402

0040
0041
0042
0043
0044

6422
6432

0045

0000
6424
5445

0003

INTRRT,

DCA

/STORE

KEEPAC

CONTENTS

RAR

/STDRE LINC BIT
/TEST FOR TELEPRINTER

FLAG

/TYPE

ROUTINE

COUNTER

TSF

/SKIP

DCA

SIORL

JMP

CHTPTR

#10

AUTO.
£20
CHTPTR.
JMP

/RESUME
0024
0025

TAD
RAL

TAD
ION
JMP

0046
0047

0050
0051
0052

6442
6452
5023

0000
6422
5450

NORMAL PROGRAM SEQUENCE
CLA CLL
STORL
/RESTORE LINC
KEEPAC
/RESTORE AC
INTRPT-1

SMA

JMP

STATO

JMP

CLKSKP
IF

HERE

STAIO,
JMP

TELEPRINTER

/CLEAR

/TEST INTERRUPT
TAD
CHKINT,

/COME

TELERRINIER FLAG SET

CHKINT

TCF

RNPS.

ADDRESS

/REIURN

BIT

NORMAL

PROGRAM

STATUS

INTSTA
ISKIP
/GO

INTERRUPT

JMS

FLAG

INTERRUPT EXPECTED
/INTERRURT NOT EXPECTED
TEST FOR CORRECT CLOCK FLAG
IF

EXPECTED

NOT

ASRO

/HALT

(SRO

ERROR?

SET)

/NO

.+2

HLT

/CLEAR AND
TTlOFF
TT20FF
TTSOFF
TT40FF
JMP

/COMMDN
CLKON.

DISABLE

680

CLOCK

FLAGS

/RESUME

RNPS

SUBROUTINE

ENABLE

NORMAL

SELECTED

SEQUENCE

CLOCK

TT10N
I

JMP

/INSTRUCTION

PRESET

SPECIFIC

CLOCK

CLKON

/COMMON SUBRDUTINE
0
CLKOFF,
TI1OEE
JMP

ALL

CLKOEE

DISABLE

SELECTED

/1NSTRUCTION

PRESET

CLOCK
TO

SPECIFIED

CLOCK

MAINDEC-OB-D72A-LA

Page 13
0053
@054
@055
0056
0057

0060
0061
0062
0063
@064

0065
0066

0067
007%
0071
@672
0673
0674
0075

@000
0000
@990
@flflfl
@@96
@G00
@@00
@000
0600
@00@
@000
@090

6421
5073
73%0
5461
4504
5076
7402

BGL;
NAL,

0PMDDE,
STORAC,

STURL.
INTSTA,
CODE.
LUT,
ACLUT,
PHASE.
KEEPAC.

/COMMON
CLKSKP,

0160
0101
DlflZ
0103

01E4
01GB
01E6
@107
0110

6422
6432
6442
6452
4D4S
5023

@301
@326
@335
@344
@353

SUBROUTINE
6421

JMP

.+3

CLA

CLL

JMP

JMS

JMP

.+2

9114

0115
@116
@117

@129
0121

INTSTA
ASRO

AND

DISABLE

/NO
/HALT

DUE

ALL

68%

ASRQ.
ASRl,
ASR2.
ASR3.
ASRS.

CLOCK

UNIDENTIFIED

/ENABLE

SELECTED

SR1

TYPCNT,
ERRNUM.
ATSTER.

AFINIS.

FINIS

BEBE
600$

MINAL,
CHKCYC,

Z
0

TSTER
CYCE
CYCL

FORMAT

FOR

TYPE

INTERRUPT

FLACS

SR2
SR3
SR5

0000
@00@
1304
1246
1266
1214
1425

ACYCE,
ACYCL.
AFORM,

SRG

ADDRESSES

SPECIFIED

ERRoR?

/HALT

TTlOFF
TTZOFF
TTSOFF
TT40FF
JMS CLKDN
JMP RNPS

/REFERENCE
0111
@112
@113

FOR SELECTED CLOCK FLAG
/INSTRUCTIDN PRESET T0
/ONIDENIIFIED INTERRUPT
/CORRECT CLOCK FLAG SET
/GO SERVICE INTERRUPT
TEST

HLT

/CLEAR
@076
0077

GESGSEI®$®

CLOCK,

ROUTINES

CLOCK

MAI N DEC-08- D72A- LA

Page I4
*ZOO

/START HERE FOR
/TAKE BASE LINE
CLA OSR

ALL OPERATIONAL MODES
NUNBER EROM SoR. 5-11

@200
@201
@202
OZOS
0204

7604
@265

0295
@206
0207

7604
@265
3054

CLA
AND
DCA

NAL

/STORE

0210
0211

1054
74fl2

TAD

NAL

/HALT

AND

@212

7694

@213
0214
0215
0216
0217
@220
0221

0267
3055
1055
7440
5221
5676
7402

3053
1053
7492

AND

MSK177

DCA

86L

/STORE

TAD

BGL

/HALT

AND

FROM

S-R.

NUMBER

ACTIVE

LINES

5-11

OSR

MSK177
OF

ACTIVE LINES IN NAL
DISPLAY # OF ACTIVE LINES

HLT

/TAKE

@224

LINE # IN BGL
DISPLAY BASE LINE

HLT

/TAKE

9222
@223

BASE

OPERATIONAL

CLA

OSR

AND

MSK3

DCA

TAD

OPMODE
OPMODE

SEA
JMP

.+2

JMP

AMODEO

/TAKE CLOCK
GETCLK,
AND

/VERIFY
@225

TAD

@226
@227

SEA

@230
@231
@232
@233
@234

CLDKER,

JMP

FROM

CLOCK
CLOCK

THAT

AND

MODE

SELECT

PROGRAM

CONTROL

SELECTION

/OPERATIDN MODE 6?
/No
/YES. ENTER MODE @

NUMBER FROM
CLA OSR

MSK7
Z CLOCK

SeR-

OPERATIONAL

/STORE

/HALT

HLT

DCA

MODE

AND

(CLOCK

S.R.

CLOCK

/STORE
1:223

DISPLAY

OPER.

1.2:3

MODE.

(1.2

SELECTED

.+3

/0PERATOR

HLT

JMP

GETCLK

TAD

MINUS5

SMA
JMP

CLA
.-4

/SKIP

CLOCK

1~4

SELECTED

NON

SELECTED

EXISTANT

CLOCK

MAINDEC—OB—D72A-LA

Page 15
/RRESET

COMMON

0235
0236

TAO

CLL

RTL

0237
@240
@241
0242
0243
0244
0245
0246
0247
0250
0251
0252
0253

RAL

0261
0262

TAD
TAD

FLGON
z CLKON+1
z STORAC

TAD

FLGOFF

/RRESET

CLOCK

DISABLE

DCA

z
z

/RRLSET

CLOCK

sKIP

DCA

/PRESET

TAD

CLKOFF+1
STORAC
FLGSKP

DCA

TAO

TAD

INSTRUCTIONS

STORAC
STORAC

CLKSKP
CLOCK

/HALT

AND

CLOCK

DISPLAY

ENABLE

INSTRUCTION

CLOCK

HLT

(O)

CLA
ANO

08R

DCA

LEVEL

COOE. SR11 <1)
/TAKE CODE LEVEL

LEVEL

CODE)

DESIGNATION FRQM S,R,

MSK1

CODE

SPECIFIED
Z OPMODE
TAD MlNUSl
82A

/STORE

CODE

LEvEL DESIGNATION

OPERATIONAL

MODE

/SK1P

OPER.

TAD

.+2

0263
0264

JMP

1
I

@265
@266
0267
0270

MSK177,
MSK7.
MSK3.
MSKl.
MINUSl.
MINU859

@272
0273
@274
@275
0276
6277
0300

SKIP

JMP

0271

AND

TAD

/ENTER
0257
0260

DISABLE

ENABLE,

DCA

/(SR11
$254
0255
0256

CLOCK

JMP

FLGON,
FLGOFF.
FLGSKP.
AMODEO.
AMODEl,
AMODEZ,

AMODEl

IENIER

AMODE2

/ENTER

0177
@007

EGGS
Oflfll
~0021
“DEBS
A

6414
6412
6411

MODEO
MODEl
MODEZ

MODE

MODE 1
OPER. MODE

SELECTED

MAIN DEC-O8- D72A— LA

Page I6
/DECODE
0301

0302
0303
0304
0305

0306
0307
0310

0000
7604

CLA

0324
7640
2301
7604
0325
7640

MSKSRO

SEA
ISZ

CLA

OSR

AND

MSKSR4

SZA
JMP
JMP

CLA

0323
0324
0325

0207
4000
0200

MSKSR4:

0326
0327

0000

SR1.

TAD
TLS

0341
0342
0343

0345
0346
0347
0350
0351
0352

/NO

BELL
/RING

/SKIP

6001
5701

.-1

CLA

CLL

ION

JMP

SRO

BELL.

0207
4000
0200

MSKSR0.

7604
0334
7640

SWITCH

CLA

OSR

AND

MSKSRl

82A
152

SR1

SR2,

0000
7604

SR3,

JMP

CLA

SR1

MSKSR1.

0000
7604
0343
7640
2335
5735
1000

2000

SWITCH

CLA
AND

OSR

82A
152

CLA

JMP

MSKSR2
SR2

SR2

MSKSRZ,

/DECODE
0344

/YES

.+2
I SRO

JMP

/DECODE
0335
0336
0337
0340

/ADD ONE TO RETURN ADDRESS IF SRO
/DO WE SIGNAL ERROR? (SR4 SET)

SRO

TSF

IDECDDE

0334

AND

IOF

6046
6041
5316
7300

2326
5726
2000

OSR

AND

5313

5701
6002
1323

0311
0312
0313
0314
0315
0316
0317
0320
0321
0322

0330
0331
0332
0333

SWITCH

SRO.

1000

SWITCH

0
CLA

OSR

0352

AND

MSKSR3

7640
2344

82A
IS?

CLA
SR3

5744

JMP

0400

MSKSRS,

SR3

0400

BELL
0N TELEPRINTER

FLAG

SET

MAIN DEC—08-D72A- LA

Page 17
@353
0354

0000
7604

0355
@356

@361
7640
2353
5753
@1E0

0357
036%

@361

/DECODE
SR5,

SWITCH

CLA

08R

AND

MSKSRS

SZA

CLA

ISZ

SR5

JMP

MSKSRS,

SR5

019$

MAINDEC-OS-D72A-LA

Page 18
{4&6

/0PERATIONAL MODE 2. [ACTIVE
MODEM.
CLA CLL IAC

@4E0

7301

@401

3U65

DCA

PHASE

0402
@403
0494
0465
@406

3061
60%1
6411
1235
3121

DCA

INTSTA

0497

0410
0411

1247
3214
3215

0412

6401

0413
0414
0415

6402
4003
GZZG

PHASEl.

/RESEI

PHA812,
DCA

/PRLSET

TAD

PR4003
/PRESET LSw
IRESEI CAN

SCAN,
DCA

TT11+1

DCA

TT11+2

/+1

TTINCR

TTll.

TAD

1F DATA
TTIl+2

SMA

B422

5236

JMP

0423

1065

TAD

@424
@425
@426
0427

1234
7450

SNA

/STORL

5259
1234
7450
5633
7402

0447

DATA

LINE

INPUT

DATA

LINE

MARK

wAS
CAN

CLA

/SK1P

LNSPCE

/LINE

MARK.

CHECK

PHASE

NUMBER

DATA LINE
AT SPACE

COUNT

PHASE
MNUSl
2

TAD

/SK1P

NON—{ERG

NUT

ZERO

MNUSl

SNA
JMP

AMKPHZ.
MNUSl,
MZUD.

1065
1234
7450
5326

LNSHCE;

/PROGRAM

HALT

-flflfll
*@2@@
AT

SPACE.
TAD

CHECK
PHASE

PHASE

COUNT

MNU31
/SK1P

SNA

JMP

SPCPHl

1234

TAD

MNUSl

7450
5646
7402

RNA
JMP

DEBUG

MRKPHZ

TAD

AMKPHZ

HLT

NON-ZERO

ASPHZ

/PRDGRAM

HLT

ASPHQ.

SPCPH2

PR4bfi3.

4003

DEEDS

LINE

SPACE

JMP MRKPHI

@633
7777
76%6

0721
4003

LINE
/GET

TAD

/LINE

0446

SAMPLE

/LINE

0445

COUNTER

CYCLE

LSR

LUT

/DETERMINE

0444

LSR

/SAMPLE

1215
770%

0440
0441
0442
0443

zERD

/LSw
/CAw

0420
0421

0437

TTI

4003
0000
TTRL

0436

PROGRAM

CHKCYC

DCA

T9435

LSR

M200

TAD

6414

@434

INPUT"0UTPUT]

ION

TTCL

3063

@433

JUMPERED

/PRESET PHASE COUNT TO ONE
/RESEI
INTERPUPT STATUS

0416
@417

643%
@431
0432

LINES

HALT

MARK

UNDER

TEST

MAINDEC—O8—D72A-LA

Page 19
/OATA

LINE

MARK.

PHASE

0450

4505

MRKPH1.

0451
0452

5253
5341
2121

JMP

.+2

/NO

JMP

SCOPE1
2 CHKCYC

/+1

7000
1063
7640
5310
1121
7650

NOP

5277

0453
0454

0455
0456
0457

0460

0461
0462

182

/LSR
0463
0464

4507

0465

4514
1121
1307

5273

4516

1063

4516

/SCOPE

ASRl

LOOP?

SET)

(SR1

/YES
LSR

CYCLE

COUNTER

TAO

SZA

CLA

JMP
TAO

SCANON
2 CHKCYC

/GET PRESENT LINE NUMBER
/LINE O?
/NO. CONTINUE SCAN
/HAS PROGRAM LSR COUNTER CYCLED?

SNA

CLA

/sKIP

JMP

EXPHl

LUT

HAS CYCLEO EARLY
/SHOULO
JMS I z ASR3
/N0
JMP HLTPH1

/REPORT
0466
0467
0470
0471
0472

JMS

EARLY CYCLE
I z ACYCE
z
I

TAD
JMS

LUT

0473
0474
0475
0476

4504
5203
7402

HLTPH1,

5203

JMP

0477

0500

4507
5302

0501

4517

JMS

0502
0503

4506

EXPH1A.
JMP

.+2

0504

5305
5203

JMP

PHASE1

0505

5706

JMP

0506
0507

0600
0200

APHSE2.
C200.

JMP

CYER1,

JMS
PHASE1
HLT
PHASE1

/LSR CYCLEO
EXPH1.
JMP

IREPORT

/TYPE

AFORM
I

CYCLE

ERROR?

/OO NE HALT ON ERROR? (SRO SET)
REPEAT PHASE 1 TEST
AC=1
/YES
LSR CYCLING LATE
Ac=0 —LSR CYCLEO EARLY
-

EXIT FROM PHASE 1
CORRECTLY
/SHOULO NE REPORT
JMS I z ASRS
.

PHASE
Z

ASRO
/NO.

PHASE

/NO

EXPHlA

REPORT

/AC CONTAINS CORRECT LINE NUMBER
CORRECT LINE NUMBER
/AC CONTAINS ACTUAL LINE # (000)
ACTUAL LINE #

/TYPE

AFORM

ERROR

CHKCYC
0200

TAO
TAO
JMS

LSR COUNTER NOT
/EXIT FROM PHASE

COMPLETE

AFINIS
JMS

APHSE2
PHASE2

0200

ASR2
IND

/SHALL

REPEAT

/YES
/ENIER

PHASE

TEST

PHASE

COMPLETE?

MAIN DEC-08-D72A-LA

Page 20
@519
@511

@512

1121

/PHASE 1
SCANON.

764%
5207

SEA
JMP

/LSH
@514

4597
5322

@515

4515

@516
@517
0520

0513

SAMPLE

TAO

CLA

LSR

JMS

CYCLING LATE
I Z ASR3
/SHOULD

JMP

.+6

/REPORT

LSR

LINE
COUNTER REACHEO
SAMPLE NEXT

REPoRT

CYCLE

ERROR?

/NO

CYCLING

LATE

1121

TAO

JMS

TAD

LUT

0521

4516
1063
4516

ACYCL
CHKCYC
z APORM

JMS

9522
@523
0524

4504
5203
7001

JMS

JMP

PHASEl

0525

5275

JMP

@526
0527

73B1
3112

SPCPH1.

053m
@531
0532
@533
0534

4507
5335
4513
1063
4516

JMS

0535
@536
0537

@540

@541
@542
0543

/TYPE

CORRECT

AFORM

/TYPE

ACTUAL

ASRO

/HALT

LINE
LINE

NUMBER
NUMBER

ERROR?
/NO» REPEAT PHASE1
HALT MITH AC = 1

/YES.

IAC

TEST

HLTPH1+2

JMS

IS AT A SPACE. PHASE 1
CLA CLL IAC
/ERROR TYPE 1
Z ERRNUM
I Z ASRs
IREPORT ERROR?
.+4
/ND
/YES
TYPE ERROR
I Z ATSTER

TAO

JMS

4504

JMS

5341

JMP

I Z ASRB
SCOPEl

1063

TAO

7492

MBP1E1.

73B1

/CONTINUE
SCOPE1.

/DATA

ZERO?

LINE

/NO.

@545
9546

UATA

CHKCYC
/HAS

SCAN

JMS

B544

AEXT

LINE

DCA
JMP

LUT
Z AFORM

/HALT

PHASE
CLA

TAO

PR4OB3

DCA

TI11+1
TT11+2
TTIl

ERROR?
/YES
/HALT

TEST OR
IAC

NITH

PHASE

TEST

/AC
SET

CLL

/TRY

1247
3214
3215
5213

NUMBER

/N0

HLT

TTO

JMP

LINE

LUT

6484

DCA

/TYPE

/PRESET

DATA

LSN AND
/RETEST

LINE

NUMBER

MARK

CAN

SAME

DATE

LINE

MAIN DEC—08— D72A- LA

Page 21
PAUSE

/680 DCS DATA AND CONTROL
*600
/ENTER PHASE 2 TEST. (ALL
/(0P MODE D)
PHASEZ,
CLA CLL IAC

0600
0601

7301
7091

@692

3g65

0603
0604
0605
0606
0607

1053

TAD

3064

DCA

1054
7041
3120

TAD

0610
0611
0612
0613

6001
1064

CYCPHZ.

1230

6413
TAD K7776

0614

6404

TTO

0615
0616

4505
5631

JMS

JMP

APHSlZ

0617
0620

1232
3223
3224

TAD

PS4003
STTI+1
STT1+2

0621
0622
0623
0624

0625
0626
0627
0630

0631
0632

6413

/AC

IAC

DCA

TAD

DCA

6402
4003
0000
7201
6404
5210

STTl.

7776
0405
4003

K7776.
APH812.
P54003.

TAPE

DATA LINES AT MARK)

PHASE

DCA

CIA

TESTS

BGL
ACLUT
NAL

MINAL

ACLUT

/PRESET

ACTIVE

LINE

DESIGNATOR

/PRESET

ACTIVE

LINE

COUNTER

ION

NUMBER OF LINE TO BE
/CLEAR AND LOAD LINE SEL.

/CET

/SET
ASRl

/SCOPE

/NO.

LINE

DATA

LOOP?
TEST

ALL

.ISAMPLE

TTI

SPACE

LINES

DATA

LINE

4003
0

CLA

IAC

/YES.

CYCPH2

/SET DATA LINE T0 MARK
/AC SHOULD CONTAIN 0

TTD

JMP

7776

PHASlZ
4003

TESTED
REG.

MAINDEC-OB-D72A-LA

Page 22
/DA!A

0633
0634
0635
0636
0637

5640

0641
0642
0643
0644
0645

0654

0655
0656
0657

0660

0661
0662
0663

MRKPHz,

7000
1063
7041
1064

NOP

LUT

CIA
TAD

ACLOT

7640
5243
5264
1121
7640
5663

SZA

CLA

TAD

/LSR
0646
0647
0650
0651
0652
0653

LINE

2121

182

/SHOULD
/SKIP

JMP

.+2

JMP

ERR21

TAD

SZA

CLA

JMP

/NO.

LATE
ASRS

JMS

5255

JMP

4515

JMS

HLTP28
I z ACYCL

TAD

ACLUT

JMS

TAD

JMS

LUT
z AFORM

4504
5210
7301

HLTP28.

7402
7306

CYER2L.

5210
0407

JMS
CYCPHZ

CLA

CLL

IAC

HLT

CLA

CLL

JMP

CYCPHZ
SCAN

ASCAN.

LINE BE
=
AcLUT

THIS
LUT

SPACE?

SHOULD

DATA

HAVE

LINE
CYCLED?

SAMPLE

DATA

LINE

PHASE

2
/REPORT
/NO
/YES

/TYPE
2

COUNTER

CYCLE

ERROR?

lTYPE CORRECT LINE

AFORM

JMP

LSR

/SHOULD

ASCAN

CYCLING

/ERROR.

CHKCYC

4507

1064
4516
1063
4516

PHASE 2
CHKCYC
/+1

MARK.
z

ASRO
/NO.
/YES

ACTUAL

LINE

/HALT

RETEST
/AC

0N
SAME
=

#
#

ERROR?

LINE
-

LSR

CYCLING

LATE

SPACE

MAIN DEC-08— D72A—LA

Page 23
/DATA
@664

7001

@665

3112

DCA

Z
I

@667

4507
5273

JMS
JMP

.+4

O67D
@671
@672

4513
1064
4516

JMS

TAO

JMS

0673

1121

TAD

0674

7640

@675
@676
0677
Z7OO

5303
4504
5210
7402
7300
5210
4507

SZA
JMP

CLA
.+6

JMS

I Z ASRD
CYCPH2

@666

ERR21.

07D4
@7fl5
0706
6707

0710
0711
@712
0713

5314
4514
1064

1121
0320
4516
1063
4516

JMP

POSSIBLE

ERROR

/TYPE

LINE

LSR

TAD
TAD

/HALT

/REIEST

0721
0722
0723

2121
7000

SPCPHZ,

CYCLE

ERROR?

EARLY

LSR

ERROR

CYCLE

EARLY

AND

ERROR

CYCLE

ACLUT

JMS

K177,

CORRECTLY

ERROR?
SAME LINE
—

TAD

JMS

CYCLED

/HALT
ERROR

HLT

CHKCYC
K177
I Z AFORM
Z LUT

AND

TEST

FAILING

CYCLED EARLY

/REPORT
/N0
/REPORT

JMS

NUMBER

LSR

/SKIP

/LSR

CYCPHZ
I Z ASR3
HLTPZA
I Z ACYCE

JMP

REPORT

ERROR

CYCLE

JMP

JMS

/TYPE

/AC

@177

HLTP2A.

JMS

7101
5300

JMP

MDPZEl

/AC = CORRECT
CORRECT LINE #
/LUT = ACLUT
ACTuAL LINE #

/TYPE

AFORM

CYCPH2

CLL

/HALT

ASRD
/N0
/*1 T0

LINE

ERROR?

@177
IS

LINE

ISZ

SPACE: PHASE 2
CHKCYC
/+1

LSR

CYCLE

COUNTER

NOP

1063
7941
1064
7640

LUT

CIA
TAD

ACLUT

SZA

CLA

5757

JMP

TAD

/CORRECT

0737

ERROR

CHKCYC

JMP
IAC

1121
764%
5342
7001
6404
212a
5340
5360

ERROR?

CLL

@720

0730
@731
0732
@733
@734
@735
@736

/ERRNUM
/REPORT

CLA

/DATA

PHASE

‘

/ND

ATSTER
ACLUT
Z AFORM

MDPZEI:

4504
5210

0726
0727

ERRNUM
Z ASRS

FOR

0714
0715
D716
0717

@724
0725

SPACE

IAC

/CHECK

@7D1
0702
0703

NASN'T

LINE

AERR22
DATA

LINE

CHKCYC

TAD

SZA
JMP

CLA

/IS

/ERROR,
AT

THE

THIS

CORRECT

LINE?

LINE SHOULD BE

MARK

SPACE

/CHECK

LSR

CYCLE

/LSR

CYER22

COUNTER

CYCLE

FOR

ZERO

EARLY

IAC
TTO

MINAL

ISZ
JMP

JMP

EXPHZ

.+2

/SEI

OATA

/HAVE

ALL

LINE T0 MARK
ACTIVE LINES

BEEN

TESTED?

/NO

/YES,

EXIT FROM PHASE

MAINDEC-O8-D72A-LA

Page 24
/TEST

ACTIVE

NEXI

2064
5210

JMP

4507

CYER22,

5353

JMP

4514
1064

JMS
TAD

HLTP2C
I i ACYCE
Z ACLUT

1121
@320

TAD
AND

Z CHKCYC
K177

4516
1063
4516

JMS

TAD

2
I

LOT

HLTPZC.

JMS

JMP

0755
0756

4504
5210
7402
5210

CYCPH2
HLT
CYCPHZ

0757

1445

AERR22,

0760

EXPHZ,

0761

4507
5363

0762

4517

JMS

0763

4506
5366

EXPHZA,

0764

JMP

.+2

0765

5203

0766

5767

JMP
JMP

PHASE2*3
I APHSE3

0767

1000

APHSE3,

0740
0741

0742
0743
0744
0745
0746
0747

0750

0751
0752
0753
0754

182

JMS

CYERZE.
JMP

IEXIT

LINE

ACLUT
CYCPH2
Z

JMS

lREPORT

CYCLE

ERROR?

/NO

/REPORT

AFORM
AFORM
I

ASRJ

EARLY

CYCLE

IAC

CORRECT

/TYPE

CORRECT

/TYPE

ACTUAL

ASRO
/REIEST

LINE
LINE

/HALT

ERROR

LINE

(ACLUT)

ERROR?

SAME LINE
/PHASE 2.

EARLY

CYCLE

ERROR

ERR22

PHASE 2
JMS I Z
EXPH2A

FROM

JMP

/REPORT

PHASE
I

ASR3

/REPORT

PHASE

COMPLETE?

IND

COMPLETE

AFINIS
JMS

PHASES

ASR2
/N0

/SHALL

REPEAT

/YES

/ENIER

PHASE

TEST

PHASE

MAIN DEC-08-D72A-LA

Page 25
*1000
/ENTER
1000
1001

1002
1003

7301
7001
7001
3065

1007

1054
7041
3120
1053

1010

6413

1011
1012
1013

6404
6401
2120
5211

1004
1005
1006

1014

PHASE3,

1020
1021
1022
1023
1024

1025
1026
1027

1054
7041
3120
1053
3064
1054
7041
3277
33mm
1064
6413

TEST.

CLA

CLL

/SET ALL
VERPT.

ACTIVE
TAD

DCA

TAD

TTO

/SET

TTINCR

/+1

ISZ

MINAL

JMP

.-3

VERIFY

NAL

DCA

MINAL

TAD

BCL

DCA

ACLUT

CIA

NxTLIN,

TAD

TESTED

/FIRST LINE
Lvo LSR

AND

DATA

LINE

LSR
/HAVE

TESTED

FROM

SPACE

ALL

ACTIVE

LINES

SET

MARK

BEEN

SET

SPACE?

DATA

CAN

LINE

/PRESET

LINE

UNDER

TEST

/STORE

FIRST

LINE

NUMBER

COUNTER

NAL

CIA

DCA
DCA

TAD

CLRLOD.

CNTAL
DONE3
z ACLUT
6413

JMS

JMP

.+3

TTO
JMP

CLRLOD+1

TAD

1047

EACH

THAT

TAD

4505
5236
6404
5230
1053
6413
5242

6402
4003
0000

LINES

/NO

1032
1033
1034

1046

SPACE

/NUMBER

/CLEAR

IAC

1045

AAL

6413

TTO

1044

LINES

DATA

MINAL
BGL

7001

6401
1301
3246
3247

CIA

6404

1040
1041
1042
1043

PHASE

1031

1036
1037

MODE

IAC

/AC

IAC

DCA

1030

1035

(OP

IAC

/NDN
1015
1016
1017

PHASE

ASRl

BGL

.+2

INCLSR.

TTINCR

DCA

PRLSN2
LSN2

DCA

CAN2

TAD

/CLEAR
/LINE

COUNTER

FLAG

AND

LOAD

LSR

FROM

AC.

/PRESET LSN
/CLEAR CAN
DATA

THEN

MARK

/SCDPE MODE LOOP?
/N0
/VES. ALTERNATELV SET LINE T0 SPACE
/LODP
/GET BASE LINE #
/CLEAR AND Lvo LsR. THEN 0 TO AC
/DON'T INCREMENT LSR
/*1 T0 LSR

/SAMPLE

TTI

LSN2.
CAN2,

DONE

/CLEAR
/AC = 1
/SET LINE

6413
JMP

/PRESET ACTIvE LINE

4003

LINE

4003
0

1050

6414

TTRL

1051

3063

DCA

1052

ISZ

1053

2277
5255

JMP

LdT
CNTAL
.+2

1054

2300

182

DONE3

/STORE NUMBER OF LINE SAMPLED
/IS THIS THE LAST ACTIVE LINE?

/No

/YES.

SET

DONE3

MARK

MAIN DEC-08—D72A-LA

Page 26
/NAS
1055

1056
1057

OATA

LINE

SmA

CLA

/SKIP

5271

JMP

OATSPC

/NO.

DATA

LINE

1061

7041

CIA

1062

1064

1063

7640
5337

JMP

ERR31

LUT

TAD

ACLUT

SZA

CLA

/CHECK
1066
1067

1070

DONE3

1300
7640
5302
5241

ARNEON.

1063
7041
1064
7650
5361
5265

DATSPC,

0000
0000
4003

CNTAL.
BONES.
PRLSN2.

JMP

SCNOON
INCLSR

1064
6413
6404

LINE

HAS

HARK

SPACE

THE LINE THAT HAS SET
YES
/ERROR HAS OCCURRED

DONES
/ARE
/YES
/NO.

FINISHED

SCAN

WITH

ONE

SCAN?

LINE

SPACE

wAS

TAO

LUT

CIA

/SHOULO

TAD

SNA

CLA

/SKIP

JMP

ERR32
ARNEON

/CHECK

JMP

ACLUT

THIS

LINE BE A SPACE?
YES
/ERROR HAS OCCURRED

FLAG

DONE3

0
0

4003

/0NE SCAN
SCNDDN.

ACTIVE LINES IS COMPLETE
Z ACLUT
ICLEAR AND LOAD LSR.

TAD

6413

/RESET

TTO

2120

182

5310

JMP

.+2

5312
2064
5222

JMP

EXPH3

18%

JMP

NXTLIN

1054
7941
5120
1053

WAS

LINE

FLAC

CLA

/OATA

/IS THIS
/SKIP IF

TAD

SZA
JMP

DATA

MARK

NAS

TAO

1065

SPACE?

CAw2

/OAIA

1064

TAD

1063

1060

MARK

1247
7700

MINAL

/HAVE

DATA

LINE

LINES

ALL

SPACE

BEEN

TESTED?

/NO

/YES.

EXIT

FROM

PHASE

ACLUT
/TEST

LINE

/ALL SPECIFIED LINES HAVE
TAO z KAL
EXPHS.

BEEN

TESTED

CIA

DCA

MINAL

TAO

BCL

6413

/CLEAH

7001
6494

IAC

/AC

TTU

/SEI
/+1

6401
2120

ITINCR
IS?

5317

“IMP

.‘4

MINAL

/ARE
/|\l0

AND

LOAD

LSR.

ACTIVE

OATA

LINES

ALL
TO

LSR

ALL

LINES

MARK?

MARK

MARK?

MAIN DEC-O8- D72A— LA

Page 27
/EXIT

PHASE

FROM

45U7

JMS

1125

5327

JMP

.+2

1126

4517

JMS

1127
1130

4536
5332
5204

JMS
JMP

I Z
.+2

JMP

VERPT

1132
1133
1134
1135

451%
5736

JMS

JMP

APHSEl

7402
5736

ENDMDQI
I

HLT
APHSEl

1136

@400

APHSEly

1137

7001
3112

1131

1140

JMP

/YES

ASR2

/SHALL
/NO

ASR5

DATA
ERRNDM

JMP

.+6

JMS
TAD

4504
5353
7402

MOP3E1,

1153
1154
1155
1156
1157
1160

6404

TTO

1277

TAD
TAO
DCA

1161

7001

I z
.+2

ERROR?

/REPORT

CORRECT

AFORM

/TYPE

INCORRECT LINE

ASRO

/HALT

AFORM

REPORT
LINE

#
#

ERROR?

/N0

/NRONG
LINE

/SET

DATA

CNTAL
MINONE

/—1

CNTAL
DONE3
INCLSR+1

IVERIFY

TEST

NASN'T

FROM

DATA LINE
T0 SPACE

MARK

CNTAL

/CLEAR DONE FLAG
THAT DATA LINE IS

SET

SPACE

MARK

IAC

1162

7001

IAC

1163

3112

DCA

ERRNUM

1164
1165
1166

4507
5371

JMS

JMP

4513

JMS

.+4
I Z

1167
1170

1064
4516

TAD
JMS

z
I

1171
1172
1173

JMS

I Z ASRO
NxTLIN

1174

4504
5222
7402
5222

1175

7777

MINONE,

MARK

HLT

/LINE UNDER
ERR32.

JMP

/TYPE

M0P3E2,

/YES
COMPLETION 0? PHASE 3?
ENTER PHASE 1 TEST
/MODE 6 TESTS COMPLETE

ERROR

LUT

JMP

7ERROR

ATSTER
ACLUT

JMP

LINE

2
I

DCA

PHASE

/NO
/TYPE

TAD

JMS

/N0»

ASR3

JMS

JMP

/HALT

REPEAT

IAC

1150
1151
1152

1375
3277
3300
5242

AFINIS

JMS

COMPLETE?

/NO

DCA

1145
1146
1147

PHASE

/REPORT

MODEQ

/INCORRECT
ERR31.

4507
5350
4513
1064
4516
1063
4516

1141
1142
1143
1144

ASR3

1124

/ERROR

ERROR?

ASR3

/REPDRT

ATSTER

/NO
/TYPE

ERROR

/TYPE

REPORT

ACLUT
z

AFORM

HLT
NXTLIN

-00@1

/HALT
/NO.

LINE

FAILING TEST

ERROR?

REPEAT TEST NITH SAME LINE
/CAN'T SET DATA LINE FROM

/REPEAT

TEST

NITH

SAME

SPACE

LINE

MARK

MAIN DEC-08-D72A-LA

Page 28
*1200

1200
1201
1202
1203
1204

1205
1206

1207

1210

1211
1212
1213

0000
6002

/SUBROUTINE
TEXT.

TYPE

CLA

CLL

TAD

6001
5600

ION

.-1

TEXT+2

CLA

CLL

JMP

TYPE

FLAG

FOR
ALL

/YES.

CHARACTERS

/NO
RETURN

TYPED?

PROGRAM

TEXT

/SUBROUTINE
FORMAT.

FORMAT

RAR

1235

AND

1237

0303
1276
3346

1240

1351

TAD

1241
1242
1243
1244

3010

DCA

1352

TAO

MLINE

3111
4200

DCA
JMS

2 TYPCNT
TEXT

1245

5614

JMP

1236

/ARL

TYPCNT

182
JMP

7010

1230
1231
1232

CHARACTER

/wAIT

TSF
JMP

1233

1217

1220
1221
1222
1223
1224
1225
1226
1227

/GET

AUTO

TLS

1234

1216

REPORTS

10F

7300
1410
6046
6041
5205
2111
5202
7300

0000
3302
1302
0303
1276
3350
1302
7012
7010
3302
1302
0303
1276
3347
1302
7012

1214
1215

STATUS

OCTAL

LINE

NUMBER

DCA

WORK

TAD

WORK

AND

OCTMSK

/ST0RE

BINARY

LINE

NUMBER

/CONvtRT

TAD 0260
DCA

TAO

LINHI+2
wORK

/STORE

LON

ORDER

/STORE

MID

ORDER

ASCII CODE

RTR
RAR

DCA
TAO

WORK
NORK

AND
DCA

OCTMSK
C260
LINHI+1

TAD

NORK

TAD

RTR

OCTMSK

TAD

C260

DCA

LINHI

/TYPE

RESOITINC

/STORE
LINE

HIGH

ORDER

ALINE

/PRESET

AUTO

FORMAT

/PRESET

NUMBER

TYPE

ADDRESS

CHARACTERS

MAIN DEC—O8-D72A-LA

Page 29
/SUBROUTINE
CYCE,

FORMAT

1246

0000

L247

7300
1055
1276

CLA
TAD

TAD

C260

3327
1065
1276
3330
1336
3341
1342
3010
1343
3111

DCA

CYCERR+2

TAD

1250
1251

1252
1253
1254
1255
1256
1257
1260
1261
1262
1263
1264
1265
1266
1267

1270

1271
1272
1273
1274
1275

1276
1277
1300

1301
1302
1303

1304

1305
1306
1307

TAO

PHASE
C260

DCA

CYCERR+3

'MODCYC,

CYCERR+14

TAD

ACYCER

DCA

TAD

MCYCER

AUTO

TYPCNT

5646

JMP

@903
730%
1055
1276
3355

/SPLCIFY

DCA

TEXT

1336
0314
0000
0007

/SPECIFY

CYCERR+11

TAD

JMS

0260
1301

REPORT

/EARLY

CYCLE

/CDNVERT
MoDE

/SPECIFY

EARLY
TYPE

/PRESET

NUMBER

/LATE

CYCLE

ADDRESS

CLA
TAD

CLL

DCA

MODCYC

JMS

CYCE

TAD

MODE

DCA

MODCYC

JMP

ERROR

CYCL

C260.
MODL.
MoDE,
LETRL,

0260

WORK,
OCTMSK.

LETRL
CYCERR+11

TAD
TAD

0314

0007

/SUBROUTINE
TSTER.
CLA
TAD

CLL

TAD

FORMAT

TEST

FAILURE

REPORT

OPMODE

/SPEC1FY

MODE

TAD

/SPEC1FY

PHASE

1276
3356

TAD

1112

TAD

/SPEC1FY

ERROR

1276

TAD

FAIL+3
Z ERRNUM
C260

3367

DCA

TAD

1320

1370
3310

DCA

/PRESET

TYPE

1321

1371

TAD

1322
1323

3111
420%
5704

DCA

FAIL+14
AFAIL
2 AUTO
MFAIL
Z TYPCNT

/PRESET

NUMBER

JMS

TEXT

JMP

1324

CHARACTERS

MODL

DCA

1317

ASCII

OR L
CYCLE

/PRESET

1065

1315
1316

CYCE

CYCL,

DCA

DPMDDE

PHASE
/GET

C260
FAIL+2

1310
1311
1312
1313
1314

ERROR

DPMDDE

DCA

3256
5666

ERRUR

CLL

4200

0000
7300
1277
3256
4246
1300

CYCLE

PHASE
C260

TSTER

TYPE

ADDRESS
OF

CHARACTERS

MAI N DEC-08— D72A-LA

Page 30
/CYCLE

ERROR

CYCLRR.

REPORT
@215

1325

@215

1326
1327

@212

1330

@212
0000
MODE

1331
1332

@240
@240

@249
024%

/LF
/MODE
/PHASE
/SPACE
/SPACE

1333

@333

O303

1334

0331
D303
@305
@322
@249
@099

@331
@303

@305

1335
1336
1337

134%
1341

1342
1343

1324

7763

024%

/SPACE

/CORRECT
LINE,

1350

@240
024$
GOOD
DEED
@906

1351
1352

1343
7773

ALINE.
MLINE)

1353

D215

/TEST
FAIL.

1354
1355
1356

@212
@090
DEED
D240
@240

1344
1345

1346
1347

@322

ACYCER.
MCYCER.

@240

LINHI.

CYCERR-l
-OOlS
LINE

AND

/HIGH ORDER
LINE #
LINE #

/MID

/LOW

ORDER
ORDER

LINE-1
"QQDS
FAILURE

REPORT

@215

@305

0305

D322

@322

@317

1366

D322
D322
D317
D322
Z24O

1367

WOOD

1379

1352
7763

1361
1362
1363
1364

1365

1371

@212
0

@322

DZ4O

/5PACE

/ERROR

AFAIL.

LINE

/SPACE

D240
@240

136%

ACTUAL

D24D
/SPACE

/LF
/MODE
/PHASE
/SPACE
/SPACE

1357

/C9

FAIL51

/CR

NUMBER

LINE

MAI N DEC -08- D72A- LA

Page 3]
*1400
/TEST
DONE.

CO MPLETE

REPORT

/CR

1400

0215

1401

0212

/LF

1402
1403

0000
0000
0240
0240
0324
0305
0323
0324
0240
0303
0317
0315
0320
0314
0305
0324
0305

/MODE

0240

/PHASE
/SPACE

0240
0324

/SPACE
/T

0305
0323

1404
1405
1406
1407

1410
1411

1412
1413
1414
1415
1416

1417

1420
1421
1422
1423
1424

1377
7755

144a

0000
7300
1055
1244
3202
1065
1244
3203
1223
3010
1224
3111

1441
1442

4643
5625

1425

1426
1427

1430
1431
1432
1433
1434

1435
1436
1437

0215

0324

0240
0303

/SPACt

0317

0315

0320

0314

0305
0324

/E
/T

0305

ADONE
MOONE.

DONE-1

)

-0023

/SUBROUTINE
FINIS.

CLA
TAD

CLL

TAD

K260

DCA

TAD

DONE+2
2 PHASE

TAD

K260

DCA

DONE+3

FORMAT

TEST

COMPLETE

REPORT

OPMODE

/SPECIFY

MODE

/SPECIFY

PHAsE

TAD

ADONE

/PRESET

TYPE

DCA

/PRESET

NUMBER

TAD

AUTO
MDONE

DCA

JMS

TYPCNT
ATEXT

JMP

FINIS

1443

1200

ATERT,

TEXT

1444

0260

K260.

0260

ADDRESS
OF

CHARACTERS

MAIN DEC-08— D72A— LA

Page 32
1445

7381

1446

7031
3112
4507
5257

1447

1459
1451
1452
1453
1454

/PHASE
ERR22.

TEST

4513

JMS

1Z64

TAD

JMS

JMP

LUT

JMS

1457

4504

HP2ER2.

1460

5262
7492
1267
1121
3121

JMP

1464
1465
1466
1467

5666

TAD
TAD
DCA
JMP

0541
7777

ASCPEl.
KMIN1.

SPACE

/ERHOR

/REPORT

FYPE 2
ERROR?

/NO

/YES

/TYPE CORRECT

AFORM

AFORM
JMS

.+2

/TYPE
z

ACTUAL

ASRD

LINE
LINE

/HALT

ERROR?

PHASE

/~o

HLT
KMINl
z CHKCYC
2 CHKCYC
I

INCORRECTLY

ACLUT

JMS

M9P2E2.

LINE
IAC

/AC

ERRNUM
I Z ASR3
HP2ER2
I Z ATSTER

TAD

1461
1462
1463

CLL

4516

1456

DATA

IAC
DCA

1963
4516

1455

CLA

ASCPEl

SCOPEl

~0001

/ERR0R
/RETEST

SAME LINE

MAIN DEC—O8- D72A-LA

Page 33
PAUSE

/680 DCS
IMODES 1

DATA
l

AND
-

TESTS
CONSTANTS

CONTROL

PAGE

TAPE

*11

0011

0000

@125
0126
@127

0000
0000
0000

0130

0000
0000
0000
0000
0000
0000
0000

@131
@132
@133
0134
0135
0136

AUTDZ.
*125
CLKCNT;
STRTBT,
ROTBUF,
DATDUT,

CASMBL,
OUTBUF.
ERFLGI.

ERFLGZ.
ERFLG3,
PHlLUT,

0137

0000

BITCNT.

0140
0141

0000
0000

DONFLG.
CLRPGE.

/TRANSMIT

8888
88

ADDRESS

POINTER

MAI N DEC-O8- D72A- LA
Page 34
*2000

IOPERATIONAL MODES 1 8 2
MODL1.
CLA CLL IAC

2000

TRANSMIT

/PRESET

PHASE

MINAL

/STDRE

NUMBER

BCL
ACLUT

/STORE

BASE

DCA

IAC
STRTBT

DCA

CLKCNT

TAD

OPMODE

TAD

MDNE

2001
2002

DCA

PHASE

TAD

NAL

2003
2004
2005
2006
2007

CIA
DCA

TAD

DCA

RETRNS,

2010

2011
2012
2013
2014
2015
2016
2017
2020
2021
2022
2023
2024
2025
2026

PRLVLB,

2027

PRDATA.

TAD

2030
2031
2032

DCA
TAD

Z AUTD2
KTwD

DCA

2033
2034

ALLDAT.
DCA

2035
2036

JMS

2037

JMP

CLA

JMP

PRLVL5

TAD

ADATB

DCA

JMP

ALLDAT
TAD
AUT02

JMP

ALLDAT

ACTIVE

LINE

LINES

DPMDDE 1 SELECTED
HAS sELECTED
/CHECK FDR CODE LEVEL
/SK1P IF 8 LEVEL CODE SELECTED

/OPMODE

/TRANSMIT

LEVEL

CODE

ADATS
/TRANSMIT

thEL

CODE.

ADATA
/TRANSMIT

ECHO

AUT02

DCA

ONE

/SK1P

CODE

SZA

COUNT

/PRESET START BIT INDICATOR
/RESET CLOCK INTERRUPT COUNTER

SZA CLA
JMP PRDATA
TAD

DATA

PHASE
TAD INTAD1
/PRESET
INTSTA
/ENABLE
CLKON

TEXT

DATA

INTERRUPT ROUTINE
SELECTED CLOCK

ADDRESS

POINTER

ION

0002

KTNO.

2040

/TRANSMIT
FSTPAS,

2041

7300

2042
2043
2044
2045
2046

1270
3277
1276
3251
3252

2047

6401

2050
2051
2052

6402
4003
0000

2053
2054

6414

TTRL

3063

DCA

START

CLA

TAD

MIN177

DCA

DONCNT

TAD

LSwPR

DCA

TRLSN

DCA

TRLSN+1

BIT

LINE

CONTAINS

/LSR

‘

/CLtAR
/+1

TTINCR

DATA

CLL

ACTIVE

/PRESET
TTI

TEST

LINE

TEST TTI LINE STATUS
CHAR. ASSEMBLY NDRD

LSR

STATE OF DATA LINE
/LINE STATUS NDRD
/CHARACTER ASSEMBLY NORD
/SAMPLE

TTI

4003

TRLSN.
g

LUT

/STORE

LINE

BEING

SAMPLED

NDRD

MAI N DEC -08- D72A—LA

Page 35
/ALL

DATA

LINES

EXCEPT

2057

1252
7700
5263

2060
2061

2277
5244

2062

5262

NAITl.

2063
2064
2065
2066

7001
3133
1063
3136

SPCERR,

2067

5262

2070

7601

HIN177,

-0177

2971

7777
2377
2577

NONE.

-gggl

ADATB,

DAT8-1
OATS-1

2055
2056

2072
2073
2074
2075
2076
2077

TAD

TRLSN+1

SMA

CLA

JMP

SPCERR

182

DONCNT

JMP

FSTPAS+3
JMP

DCA

IAC
ERFLGl

TAD

LUT

DCA

PHlLUT

JMP

WAITl

3177

ADATS.
ADATA,

4000

INTADl.

4093
0000

LSNPR.
DONCNT.

LINE

/SK1P IF DATA
/RECORD ERROR

/N0.

/TEST

OUTPUT
4003

/SET

ERROR

/STORE

LINE

wAs

MARK

HARK

LINES

COMPLETE.

FLAG
#

SHOULD

/SKIP IF ALL
TEST NExT LINE

DATA-1

ACTIVE

TESTED

WAIT

FOR

DETECTED

SPACE

CLOCK

INTERRUPT

MAINDEC-O8—D72A-LA

Page 36
/TRANSMIT

2100

710a

DATPAS.

2101
2102
2103
2104
2105
2106
2107

7604

CLA
AND

OSR

2110

2111
2112

0375
7640

S.R.b

/EXAMINE

SZA

CLA

JMP

FLGZON

1276
3311
3312

TAD

LSNPR

DCA
DCA

TRLSWZ
TRLSW2+1

6402
4003

TRst2,

/LINE
/PRESET

/PRESET
/SAMPLE

TTI

4003

2113
2114

1312

TAD

TRLSW2+1

1131

CASMBL

2115

7010

TAD
RAR

2116

3131

DCA

CASMBL

2117
2120
2121

1134

TAD

ERFLG2

7640

SZA

CLA

5326

JMP

FLG2ON

2126
2127
2130

LINE

MSKSR6

5326

/TEST

CLL

0000

2122
2123
2124
2125

BIT

DATA

FULL

DUPLEX.

LINE STATUS WORD
CHARACTER ASSEMBLY
OF

STATE
/LSN

BYPASS

WORD

LINE

DATA

/CAW

/STORE

/GET

DATA

/PREVIOUS

1130

TAD

1312
7640

TAD

CORRECT
DATOUT
TRLSN2+1

SZA

CLA

2134

ISZ

1135

FLGZON.

7640
5336

SZA

CLA

JMP

NONORK

FOR
Z

DATA

ERROR

FLAG

DATA

ERROR

BIT

DETECTED

DATA BIT
/CET CORRECT DATA BIT
/CET ACTUAL DATA BIT
/SKIP IF DATA BIT CORRECT

/SET

ERFLG2
TAD

SAMPLED

ERFLG3

DATA

ERROR

/GET

/PREVIOUS

FLAG

ROTATE

ERROR

FLAG

DETECTED

ECHO

CHECK

MAIN DEC-08-D72A—LA

Page 37
/TEST

ROTBUF

ERROR
/GET CORRECT

CIA
TAD

OUTBUF

/GET

ACTUAL

SEA

CLA

/SKIP

2135

7640
2135

[8?

ROTATE RESUIT
ROTATE ERROR FLAG

2136

5336

NOWDRK,

2131
2132
2133
2134

1127
7641

1132

FOR

TAD

TTO

ROTATE

2137

7300

MESDON,

2140

4506
5343

JMS

JMP

.+2

5297
1055
1271
7640

JMP

TAD

RETRNS
Z 0PMODE
MONE

SZA

CLA

2146
2147
215C
2151

5774

JMP

2120
5352
5355

ISZ
JMP

Z MINAL
.+2

JMP

.+4

2152
2153
2154

2064
7DDD
5207

ISZ

NOP

2155
2156
2157

405m

JMS

EXIT
Z CLKOFF

730%
3661
4597
5367

CLA

CLL

DCA

JMS

I Z
.+6

TAD

JMP

/MODE

2169
2161

JMP

2162
2163
2164

4517

JMS

1053

TAD

4516

JMS

2165

1D64

TAD

2166

4516

JMS

2167

451%

JMS

2179
2171
2172
2173

5200
1064

JMP

74@2

ENDMDl.

520D

JMP

2174
2175

3ODZ
DD4D

ARCVE,
MSKSRby

TAD

CLA
Z

ROTATE RESULTS

/NAIT

MESSAGE

HAS

RESULTS

JMP

/CDMPLETE

2141
2142
2143
2144
2145

/SET

ERFLC3

ROTATE

FOR

CORRECT

CLOCK

INTERRUPT

TRANSMITTED

BEEN

CLL

ASR2

ARCVE

ACLUT

ON SAME LINE #
TRANSMIT ON NEXT LINE

/RETRANSM1T
INO.
/YES

/SKIP IF MODE 1 SPECIFIED
/CO RECEIVE NEXT MESSAGE
/SKIP IF ALL LINES HAVE TRANSMITTED
/NO
/YES. EXIT FROM MODE 1
/+1

ACTIVE

LINE

COUNTER

RETRNS

INTSTA

t—«No—«PHt—v

ASRS

/DISABLE

/CLEAR
/REPORT

CLOCK

FLAG

INTERRUPT STATUS WORD
MODE 1 COMPLETE?

/ND
AFINIS

/YES

BGL
AFORM

/TYPE

BASE

LINE

ACLUT
Z AFORM

/TYPE

LAST

LINE

TESTED

Z ASR5
I
MODEl

ACLUT
HLT
MODEl

/HALT?

/NO:

REPEAT

/HALT

AND

MODE

MODE2
DD4D

DISPLAY

LAST

LINE

TESTED

MAIN DEC—08-D72A-LA

Page 38
*2200
/TRANSM1T

LSTPAS.

2202

730%
1133
7649

2203

2204
2205
2206

2200
2201

STOP

LAST

CLA

BiT

/CET

SZA

CLA

5225

JMP

SPACER

1134

CHFL23,

7640

SZA

CLA

5262

JMP

OATER

2207

1135

TAD

2210
2211

7640

SZA

CLA

5332

JMP

ROTER

2212
2213
2214
2215
2216
2217
2220
2221
2222

4505
5217
1011
1223
3911
1224
3061
4045
5222

2223

7777
4000

CHAMN19
INA01A.

OUTPUT

7001

/DATA LINE
SPACER,

INCORRECTLY
IAC

2224

2225
2226
2227
2230
2231
2232
2233
2234
2235
2236
2237

ERFLGZ

ERFLG3

/CET
/SK1P

/N0 TRANSMIT ERRORS
JMS I Z
PASUUT,
JMP .+4
AUT02

TAD

CHAMNl

DCA

Z AUT02
INADlA

TAD
DCA

ERROR

FLAC

/SK1P IF FLAG
/REPORT ERROR

/SK1P

TAD

LINE

CLL

ERELGl

TAD

DATA

/GET LRROR FLAC 2
FLAG = @
/REPORT DATA ERROR

ERROR FLAC
IF FLAG =

IREPORT

TTO

DETECTED
ASRl
/RETRANSMIT
/N0

ROTATE

ERROR

THIS

CHARACTER?

ADDRESS

POINTER

/YES

INTERRUPT

/PRESET

INTSTA

JMS

JMP

CLKON

/ENABLE CLOCK
lwAlT FOR NEXT

CLOCK

INTERRUPT

-0001

3112
4507
5325
4050

DCA

ERRNUM

JMS

JMP

HLTERR

JMS

3061

DCA

1064

TAD

7041

CIA

1136
7640
5250

ASR3

/TYPE

SPACE.

(ERROR

ERROR

REPORT?

/N0

680 CLOCK
INTERRUPT STATUS

/DISABLE

CLKOFF
INTSTA
ACLUT

TAD

PH1LUT

/010

SZA

CLA

JMP

.+11

/CLEAR

NORD

/SKIP

THE
IF

LSR CYCLE EARLY
CYCLE ERROR OCCURRED

MAINDEC—08—D72A—LA

Page 39
/REPORT

EARLY CYCL E
Z ACYCE
I

2240
2241

4514

JMS

1673

TAD

2242

1272

TAD

2243
2244
2245
2246

1064
4516

TAD

P200
2 ACLUT

JMS

1064

TAD

ACLUT

4516

JMS

2247

5255

JMP

.+6

2250
2251
2252

4513
1064
4516

JMS
TAD

2253
2254
2255
2256
2257
2260

1136

TAD

4516

JMS

1134
1135
7640
5204
5325

TAD

2264

1135
7656
5270

2265
2266
2267

1337
3112
5272

2270

1336
3112

2262
2263

2271
2272
2273

020%
2077

ADNCNT

/TYPE

CORRECT

/TYPE

ACTUAL

/TYPE

TRANSMIT

/TYPE
/TEST

LINE 3 AT SPACE
FOR DATA OR ROTATE

/SKIP

IDATA ERROR FLAG I 1
TAD Z ERFLG3
DATER.
/SK1P
SNA CLA

/TYPE

2261

ERROR

ERROR
Z

AFORM

CHFL23

JMP

HLTERR

AFORM

ERFLG2

ERROR

ERFLGS

CLA

.+4

TAD

KFOUR

DCA

Z ERRNUM
.+3

TAD

CTNO

DCA

ADNCNT,

LINE

PH1LUT

JMP

P200.

NUMBER

ATSTER

JMP

LINE

ACLUT

SZA

TAD

LSR

NUMBER

LINE

REPORT

NHNHNH

JMS

LSR

ERRNUM
0200
DONCNT

OTHER

/15

ROTATE

FLAGS

ERRORS

ERROR

IERROR
/ERROR

TYPE 4 INDICATES
AND ROTATE ERROR

/ERROR

TYPE

FLAG

DATA

ERROR

ALSO

MAINDEC-O8—D72A-LA

Page 40
2274
2275

4507

ROTERA,

5325

JMP

2276
2277

4050
3061

JMS

CLKOFF

DCA

INTSTA

2300
2301
2302
2303

4513
1064
4516
1011
1223
3011
1411
4516

2304

2305
2306
2307

TAD

AUTO2
Z AUIO2

JMS

CASMBL

JMS
TAD

2314
2315

7640
5321

2316
2317

1131

TAD

7010
5324

RAR

CASMBL

TAD

CODE

SZA

CLA

JMP

.+4
2

TAD

RTR

2323

7012
7012

2324

4516

JMS

2325
2326

4504
5212
1112

HLTERR,

JMP

2332
2333

7001
1336

/SKIP

AFORM

JMS

DCA
JMP

2336

0002
0004

CTNO.
KFOUR,

LEVEL

CODE

SPECIFIED

LEVEL

CODE

CHARACTER

LEVEL

coDE

CHARAcTER

/TYPE

ASSEMBLED

CHARACTER

ASRO

/HALT

ERROR?

/HALT

AND

/N0

IDEPRESS

CONTINUE

DISPLAY
TO

ERROR

RESUME

TEST

ERROR

IAC

Z ERRNUM
ROTERA

3112

HLT
PASOUT

CTNO

5274

ERRNUM

TAD

2335

CHARACTER

TRANSMISsION

/UURING

PASOUT
Z

CORRECT

CASMBL

/TTO ROTATE
ROTER:

2334

NUMBER

/TYPE CORRECT CHARACTER
/CET CHARACTER ASSEMBLEO

RTR

5212

LINE

CASMBL

1131

2337

/GEI

AFORM

M12ERR.

WORD

CHAMNl

RTR

7402

TRANSMIT

/TYPE

AFORM

TAD

2330
2331

REPORI?

AUTO2

.+4

2327

ERROR

ACLUT

CLL
DCA

JMP
TAD

/IYPE

A536
/NO

DISABLE CLOCK
/CLtAR INIERRUPT STATUS
/TYPE ERROR REPORT

ATSIER

JHP

2321
2322

/YE5:

DCA

TAD

2312
2313

2320

NJHrflF—HJ&

JMS

1131
7112
3131
1062

2310

2311

JMS

HLTERR

0002
0004

/ERROR

IREPORT

TyPE 3
ROTATE

TTO

ERROR

ROTATE

ERROR

TYPE

(1.2.3

MAIN DEC—08-D72A—LA

Page 4]
*24w0
/ASCII
2400
2481

@215
@212

DATB,

LEVEL

@215

@212

/LF

2402

@324

2463
24U4
2465

@318
@305

@312

@325

924%
@321

@240
@321

@325
@311
@303
B313
@240
@392

@325

@311
@363

@313
@240
@3fl2

@322

@322
@317

@327
@316
@240
@396

0327

@316

@306

2423
2424

@317

@339

2425

624%
B312

024%

2466
2407

241%
2411

2412
2413
2414
2415
2416
2417

2420
2421
2422

2426
2427

@317

CODE

/B
/O

@240

@312
@325

@315

2430

0325
@315

2431
2432
2433
2434

032%
@305
@394
@240

032%

@365

@304

2435

@317
@326

2437

@317
@326
@395

@305

244%

@322

2441
2442
2443

@215
@212

@215

/CR

@212

/LF

@324

2444

@319

@312

2445
2446

@325

2447

@305
024%
@314

@240
@514

245%

@301

2451
2452
2453

@352
@331
024%

W332

@331

2436

@240

@24@

TESI

/CR

MESSAGE

MAIN DEC—O8-D72A- LA

Page 42

2456
2457

0304
0317
0307
0247

2454
2455

2460

0323

2461
2462
2463

0240
0302

2464

0303
0313
0241
0240
0240
0261

2465

2466
2467

2470

2471
2472
2473
2474

2475
2476
2477

2500

2501
2502
2503
2504
2505
2506

0301

0262
0263
0264
0265
0266

0267
0270
0271
0260
0207
0215
0212
0000

0304

0317

0307

0247
0323

0240

0302
0301
0303

0313

0241
0240
0240

0261
0262

0263

0264
0265
0266
0267
0270

0271
0260

0207
0215

/BELL

0212
0000

/LF

/5
/6
/7
/8
/0
/CR

/TERMINATE MESSAGE

MAIN DEC—O8- D72A— LA

Page 43
*2099

/8AvDOT

DAT5.

LEVEL

IELETYPE

@919

2699

9919

2691
2692

9992
9937

/LF
/LETTERS

2693

9929

2694

9929
9924

9924

2695

9991

2696

9994
9927
9997

9994
9997

/D
/U

9996

9916

9917
9994

9917

9931

9912
9939
9923

9912

9939

9923

2621
2622
2623

9914
9994

9914

9915

2624

9939
9935
9994
9913
9997
9934

9939

9935

9926
9991
9911
9994
9939
9936
9991
9912
9919

2697

2619
2611
2612
2613
2614
2615
2616

2617
2629

2625
2626
2627

2639
2631

2632
2633
2634

2635
2636
2637

2649
2641
2642

9927

9994

9994
9913

9997

9934

9926

9991

9911
9994

9939
9936

9991

9912

9919

/CR

2643
2644

9992

/LF

9929

2645

9924

2646

9991

2647

9994
9922
9993

9994

9921

9925

9994

2659
2651
2652
2653
2654

9922

9993

/CR

CODE

TES‘

MESSAGE

MAI N DEC -08- D72A- LA

Page 44
2655
2656

0011
0030

0011

0030

2657
2660

0032
0033
0013
0037
0005
0004
0031

0032
0033

/FIGURES

0003
0016
0017
0033
0015
0004
0004

0003

0016

0017

0033

/FIGURES

0015
0004
0004

0027
0023
0001
0012
0020
0025
0007
0006
0030
0026
0005
0010
0002
0000

0027
0023

/1
/2

0001

/3
/4

2661
2662
2663
2664

2665
2666
2667

2670
2671
2672
2673
2674

2675
2676
2677
2700

2701
2702
2703
2704
2705
2706
2707

2710

2711
2712

/G
O

0013

0037

/LETTERS

0005

0004

0031

0012

0020

0025

0007

0006

0030

0026

0005

/BELL

0010

/CR

0002

/LF
/TERMINATE

0000

MESSAGE

MAIN DEC—08- D72A- LA

Page 45
*3000
H

3999

/OPERATIONAL MODE d
MOUE2,
CLA CLL

RtCEIVE

DATA

/DISABLE CLOCK
/CLtAR INTERRUPT

3991

JMZ

3992

DCA

3993

IAC

3994

DCA

3995
3006
3997

CLL

CML

DCA

TAD
DCA

ADATA2
2 AUT02

TAD

NE6299‘

DCA

CLRPGE

DCA

3914

ISZ

z AUT02
CLRPGE

3915

JMP

.—2

3016
3017

TAD

CLR177

DCA

CLRPGE

DCA

STRTBT

/PRESET

DCA

DONFLG

IRESET

DONFLG

/PRtSET
/ENABLE

CLOCK

3919
3911
3912
3913

3020
3021
3022
3023
3024
3025

CLKOFF
Z INTSTA

TAD

ADATA2

DCA

TAD

PHASE COUNT
=
4009

/PRtSET

RCVE

STARTING

ICLLAR RCVE BUFFER
/SK1P IF FULL PAGE

To
Is

ADDRESS

ZERO
CLEAR

/-0177
/PRLSET

RCVE

COUNTER

STRTBT

AUT02

JMS

3037

WORD

STATUS

IAC
IAC

DCA

3035
3036

TELETYPE

ACLUT

3030

3034

/SEI

RAR

AlNPUT
Z INTSTA

3033

/PRhSET

PHASE

3026
3027

3031
3032

FROM

CLKON

INTERRUPT

STATUS

WORD

ION

NAIT2,

JMP

AINPUT.
ADATAZ,

DATA-l

NE6299.
CLR177,
LINCNT.

INPUT

-0200
-0177
0

/NAIT

FOR

INTERRUPT

MAIN DEC-08-D72A—LA

Page 46
3040
3041

3042

1133
7640
5264

/vERIEv
STRlST,

3045

1236
3237
1064

INACTIVL

TAD

SZA

CLA

JMP

STRlEx

/SAMPLE
3043
3044

MARK

ALL

CLR177

DCA

LINCNT

TAD

/LOAD

1273

6413
TAO S4003

395g

3253
3254

DCA

STRTTI+1
STRTTI+2

STRTTI,

6403

3053
3054

6403
4003
0000

3052

LINES

DATA

-1/7

/RRESET

6413

DCA

NITH

LSR

LINE

/RRESET

/RESET

STATUS

/+1

/READ

INTO
/ST0RE

TTRL

3063

DCA

1254

TAD

STRTTI+2

/CEI

CAN

3060

7700
5266

SMA

CLA

/SKIP

DATA

JMP

SETER1
LINCNT
STRTTI-3

/SKIP

ALL

ISZ
JMP

3126
5265

STRlEx.

3066
3067

7001
3133

SETER1,
DCA

ERFLcl

3070
3071
3072

1063

TAD
DCA

LUT

PHlLUT

JMP

STR1Ex

3073

4003

3074
3075
3076
3077

4050
3061

3100
3101
3102

1133
7640
5321

3103
3104

1134
7640
5331

3136
5264

4507
5311

JMP

3105
3106
3107
3110

1135
7640
5341

DCA

STRTBT
/wAiT

NORD

LsR

AND

TTI

FOR

LINE

INACTIVE

MARK

LINES

TO STRTBT
CLOCK INTERRUPT

IAC

$4003,

/STDRE

ERROR

/STDRE

LINE

4003

/COMPLETE
CHADON.

DATA

CHARACTER

JMS

DCA

INTSTA

JMS

JMP

CHKDON

/TEST

LSR

LUT

3065

3064

6414

2237
5247

LINE

4003

3055

3063

ACTIVE

CAw

3056
3057

3061
3062

DETECTED

ACLDT

3046
3047

3051

PREVIOUSLY

/ERROR

INACTIVE

TAD

LINES

DATA

ERFle

ERROR

ASR3

FLAGS

RECEIVED
/UISABLE CLOCK
CLKOFF
/CLEAR INTERRUPT STATUS NORD
/SHOULD ERRORS BE REPORTED?
/NO. DON'T CHECK ERROR FLAGS
AND

RtPORT

ANY

ERRORS

ERFLGl

TAD

SZA
JMP

CLA

/SKIP

REPERl

/REPORT

CHFch.

TAD

ERFLGl
ERROR #

ERFL62
IF

SZA

CLA

/SK1P

JMP

REPER2

/REPORT

ERFch
ERROR #

ERFLG3

TAD

SZA

CLA

JMP

REPCR3

/SK1P IF ERFLG3= 0
/REPORT ERROR # 3

ARE

TESTED

MAINDEC-OB-D72A-LA

Page 47
3111
3112
3113

1140
7640
5720

3114
3115
3116
3117

1233
3061

/ERROR CHECK COMPLETE
TAD z DONFLC
CHKDON,
SZA

CLA

JMP

TAD

AINPUT

DCA

INTSTA

4045
5317

JMS

CLKON

3120

2007

ARETRN.

3121
3122
3123
3124
3125
3126
3127
3130

7001

/SPACE DETECTED
IAC
REPER1.

JMP

3133
3134
3135
3136

3137
314%

3141
3142

RECEIVED

DATA

INTERROPT STATUS
CLOCK
FOR NEXT CHARACTER

/NAIT

HORD

RETRNS
ON

DCA

4513

JMS

ERRNUM
z ATSTER

1064

TAD

ACLUT

4516

JMS

1136

TAD

PHlLUT

4516

JMS

5303

JMP

CHFLG2

1351

REPER2.

3112
1135
7650

DCA

TAD

SNA

JMP

CLA
.+3

2112
2112
5343

182
132

2
z

JMP

.+3

1352

TRANSMIT

/RRESET
/ENA8LE

3112

/CAw

3131
3132

/GO

ARETRN

AFORM

/TYPE

ACTIVE

LINE

/TYPE

INACTIvE

LINE

ERRNUM
ERRNUM

CLOCK

FLAGS

CoUNT

ERFLcs

/IS

/ERRNUM

PRESENT ON
ERTHRE

DATA

ALSO

SET,

FLAGS

(N0

STOP

LINE

TAD

3112

DCA

3143
3144
3145
3146
3147
3150

4513

JMS

1064
4516
1127

TAD

JMS

TAD

ROTBUF

4516

JMS

5311

JMP

CHKDON

3151

0002

3152

EZMS

ERTwO.
ERTHRE.

ERRNUM

ITYPE

ERROR

REPORT

ACLUT
/TYPE

ACTIVE

LINE

/IYPE

RECEIVED

REMAINING ERROR

WRONG

ERTNO

ERRNUM
ERFLG3

NOT

LINE

/CHECK

TAD

/STOP BIT
REPER3,

DATA

/=1

AFORM

MODIFIED

HAS

INACIIVE

ATSTER
AFORM
AFORM

0002
QQES

CHARACTER

ARE

BIT)

SET

MAIN DEC-08-D72A-LA

Page448
PAUSE

/680

DATA

DCS

/RLCEIVE

3200

0000

R3200
DATA,

7300
1125
7640
5237

OUTPUT,

ROUTINE

FOR

TAD
SZA

CLA CLL
Z CLKCNI
CLA

JMP

INCLOK

1315

TAD

PRCLOK

3125

DCA

CLKCNT

4gg6

1064

TAD

ACLUT

4007

6413

4010
4011
4012

1126
7640
5244

6413
TAD 2 STRTBT
SZA CLA

4013
4014
4015

1137
7640
5271

4016
4017

1320
7650
5306

4001
4002
4003
4004
4005

JMP

4020

CLA

JMP

SNDBIT

STOP

SNA

CLA

JMP

STOPl

4026

1316

TAD

4027

3125

DCA

4030

2126
7001
6404
4045
6001

I82
IAC
TTO

4034
4035

5636

4036

0900

4037

2125
7000
1322
3236

4040
4041
4042
4043

5233

/OUTPUT

WHEN CLKCNT

/PRESET

CLKCNT

-8

NITH

SPECIFIED

BIT
START

BEEN SENT?
BIT SENT

/L0AD

LSR

/HAS

START

/SKIP

LINE

HAS

BEEN

FIRST STOP BIT HAS BEEN SENT

BIT

TAD

DCA

RPADR

TAD
SNA

2 CODE
CLA

JMP

.+3

/SPECIFY

4031
4032
4033

MODES

/SKIP

2ND STOP
ALSTPS

4025

4024

BITS

STOP

TAD

/sEND

TAPE

/COMPLETE CHARACTER
/SENT WHEN BITCNT =
/GO SEND DATA BIT

BITCNT

TAD

1321
3236
1062
7650
5230

4021
4022
4023

STRT

SZA

/SEND

TESTS

44000
/TRANSMIT
4000

CONTROL
STORAGE

AND

BUFFER

/SKIP

A ONE HALF
HALFBT
Z CLKCNT

STRTBT

CMNEx,

JMS

ION
JMP

/PRESET

RPADR

/DO NOT
INCLOK.

OUTPUT ON
132 2

JMP

LEVEL

ADDRESS

SPECIFIED

CODE

TIME

/PRESET

START

/OUIPUT

BIT

INDOCATOR

SPECIFIED

LINE
AND

IRESET

ENABLE

DCA

STOP

CLKON

RPADR.

NOP
TAD

BIT

EXIT

ARNPS

RPADR
CMNEX

/REIURN

DESIGNATED

ROUTINE

THIS CLOCK INTERRUPT
/+1 T0 INTERRUPT
CLKCNT

/PRESET

EXIT

COUNTER

ADDRESS

CLOCK

FLAG

MAIN DEC-O8-D72A—LA

Page 49
4044

4045

1062
7640

TAD

CODE
/SKIP

SPECIFIED

.+4

LEVELS

DCA

JMP

.+3

1317

TAD

LEVELS

3137
3320
3131
3133

DCA

STOP

DCA

CASMBL

/CLLAR CHARACTER ASSEMBLY

WORD

DCA

Z
Z
I

ERFLGl
ERFLGZ
ERFLG3
Z AUT02

/GET

NEXT DATA CHARACTER
/MESSAGE COMPLETE IF AC =

3137
5254

1327

3134
3135

BITCNT

LEVEL

CODE

COUNT EDR 5
/CLEAR STOP BIT

LEVEL

CODE

BIT

IRRESET

BIT

1411
7450

TAD

5312

JMP

NDCHAR

IMESSAGE

4064
4065
4066
4067
4070

3132
1323
3236
3126
5232

DCA

ISTDRE

DCA

OUTBUF
AFSPAS
RPADR
z STRTBT

JMP

CMNEx-1

4071
4072
4073

1132

/OUTPUT
SNDBIT:

7110

CLL

RAR

3127

DCA

ROTBUF

4074
4075

7010

RAR

3130

DCA

DATOUT

/STORE

4076
4077
4100
4101

2137

ISZ

BITCNT

/INCREMENT

7000
1324
3236

NOP
TAD
DCA

ADATPS
RPADR

4102
4103

1132
6404

TAD

OUTBUF

4104

3132

DCA

OUTBUF

4105

5233

JMP

CMNEX

4106
4107

2320
1325
3236

SNA

TAD

DCA

DATA

DCA

RPADR

JMP

CMNEX—Z

1326
3236
5233

NOCHAR,

CHARACTER
OCA
JMP

OUTBUF
/GET DATA CHARACTER
/LINC CONTAINS BIT TO BE TRANSMITTED
/STORE CORRECT ROTATE RESULTS

/OURPUT
/UPDAIE

BIT

DATA

BIT

DATA

FOR

COMPARISON

COUNTER

EXIT

ADDRESS

BIT

OUTBUI

/STOP

STOP

/OUIPUT

FOR

TAD

RPADR
CMNEX

CHARACTER

BIT

ISZ

5231
/N0

COMPLETE

/PRESET

STOP

ANDNRK

INDICATOR

/PRESET EXIT ADDRESS
START BIT INDICATOR
/0UTPUT START BIT

BIT
TAD Z

TAD

FOR

/RESET

TTD

/SEND 18T
STOP1,

COUNT

/PRESET

4061
4062
4063

4112
4113
4114

CODE

JMP
TAD

4050

4110
4111

LEVEL

CLA

5252

4060

BIT

START

SZA

4046
4047

4051
4052
4053
4054
4055
4056
4057

/OUIPUT
STRT.

/PRESET EXIT
STOP BIT

NON

EOUALS

ADDRESS

TRANSMISSION

AMSOON

/PREStT

EXIT

ADDDRESS

MAIN DEC-08-D72A—LA

Page 50
4115

7771

PRCLUK.

*6097

4116
4117
4120

7775

HALFBT.

-@@@3

7773
@000
220%
@023
2941
21UZ
2136
2137
7779

LEVELS,
STOP,
ALSTPS,

“@005

4121
4122
4123
4124
4125
4126
4127

ARNPs,

LSTPAS
RNPS

AFSPAS,

FSTPAS
DATPAS

ANOWRK.
AMSUON,
LEVELS,

NOWORK
MESDON
-0019

MAIN DEC-08-D72A-LA

Page 51
*4ZZG

IRECEIVE
4200

7300

4201

1126

TAD

4202
4203
4204

7440
5205
5733

82A

4205

1332
7640
5217

4206
4207

4210
4211
4212
4213
4214

2125
5213

4216

7402
1331
3320
2721
5257

4217

1062

4220

7640
5225

4215

4221
4222
4223

DATA

INPUT.

CLA
z

JMP

.+2
I

ARCDAI

TAD

NECDNE

32A

CLA

JMP

RCVlST
CLKCNT

182

JMP

.+2

HLT
TAD

ARNPS2

182

RPADR2
I RCVLSN

JMP

RCMNEX

/STRTBT=2
RCV1ST.

52A

CLA

JMP

.+4

TAD
DCA

RCVLVB
Z BITCNT

4224

5227

JMP

.+3

4225
4226

1330

TAD

3137

DCA

RCVLV5
Z BITCNT

/START

4231
4232
4233
4234

4235
4236

3242
3133

DCA

3134

DCA

3135
3127
1054
7041
3120

DCA

TAD

ERFLG2
ERFLC3
ROTBUF
NAL

MINAL

/ADD

BII

BEEN

RECEIVED

CODE

INTLRRUPT

DEBUG

HALT

/UPDATE

RECEIVE

TTI

LEVEL

FSTTI+1
Z ERFLGl

CODE

COUNTER

LSw

CODE

NAS

SELECTED

FOR

LEVEL

CODE

LEVEL

CODE

/CLEAR

BITCNT FOR
BIT
LINE STATUS

/RESET

ERROR

/STORL

TWU'S

/PRESET BITCNT
/AND START BIT

/PRESET

AND

NORD

FLAGS

CIA
DCA

4237

1053

TAD

4240

6413

4241
4242
4243

6402

ACTIVE

CUMPLEMENT
LNES

BGL

LOAD

/CLEAR

AND

/LlNE

STATUS

/CAN

FSTTI,

LSR

wITH

BASE

LINE

TTI

1242
7700

TAD

FSTTI+1

/GEI

LINE

4245

SMA

CLA

/SK1P

4246
4247

5250
5262

JMP

.+2

JMP

LINACT

4244

HAS

IPROGRAM

/0F

0000
0000

BAUDOT

/SKIP IF STRTBT EOUALS
/STRTBT EQUALS 2

/sTART
DCA

LEVEL

CLL

1327

4230

wAITINC FOR START BIT
TAD 2 CODE
/SKIP IF 8 LEVEL

3137

4227

ASCII

LEVEL

STRTBT

JMP

DCA

4250

2120

182

4251
4252

S253
5255

JMP

.+2

JMP

NUSTRT

MINAL

/SKIR

WORD

STAIUS wORD
START BIT PRESENT

IF ALL ACTIVE LINES
SCANNED
/NO SfART BIT PRESENT

HAVE

BEEN

MAIN DEC-OB—D72A-LA

Page 52
6401
5241
1323
3320
4045

NOSIRT,

6001

ION

5720

JMP

4262
4263

6414

/START BIT
LINACT,

3063

DCA

LUT

4264
4265

1064

TAD

ACLUT

7510

SPA

4266

5314

JMP

4267

7041
1063
7640

CIA

4253
4254
4255
4256

4257
4260
4261

4270
4271
4272
4273
4274
4275
4276
4277
4300

4301
4302
4303
4304

4305

4306
4307
4310

4311
4312
4313

4314
4315
4316
4317

4329
4321
4322
4323
4324

/+1

TTINCR
JMP

DCA

TAO
JMS

CLKON

RPADR2
PRESENT

/EXIT
ON

FROM

DATA

RECEIVE

CLOCK

ROUTINE

INIERRUPT

LINE

/STORE
/SKIR

/SKIP

LINE

ACTIVE

LINE

ALREADY

CLA

5305

JMP

BADLIN

1326
3721
3722
7001
3126
1325
3125
1324
3320
5257

CMNEXA.

START BIT PRESENT
CORRECT LINE

/15

LUT

DCA

PRLSNR
/PRESET LSH
/RESET CAN
RCVCAW

DCA

STRTBT

TAD

MINUS4

DCA

TAO
DCA

ASTlST
RRADR2
RCMNEX

TAD

RCVLSW

IAC

JMP

CLKCNT

/1
/-4

STRTBT

/PRESET

CLKCNT

EXIT

ADDRESS

ISZ

PRESENT 0N INCORRECT LINE
TAD Z ERFLcl
/SKIP IF 18T ERROR
CLA
/ERROR PREVIOUSLY DETECTED
NOSTRT-2
Z ERFLGl

TAD

DCA

/START BIT
BADLIN.
SZA
JMP

JMP

LUT

PHlLUI
NOSTRT-2

/FIRST START BIT OF
NOTDEF,
CLA CLL
TAD

DCA

JMP

RPADRZ,
RCVLSN,
RCVCAN.

AwAITz,
ASTlsT.

ERROR LINE #
/CONTINUE SCANNING
/SAVE

NEW

MESSAGE

FOR REPORTING
ACTIVE LINES

DEFINE

ACTIVE

LUT

ACLUT
CMNEXA
0

RCVITI+1
RCVTTI+2

NAIT2

RCVLVB.

7772

4331
4332

0023
7777
4400

RCVLVS.
ARNPSZ.
NEGONE.
ARCDAT.

-0006
RNPS
'0001
RCVDAT

MINUS4,
PRLSNR.

DEFINED

NDTDEF

7767

4333

LINE

TIRL

4330

4326
4327

EXIT ADDRESS
/RESET 8 ENABLE

/PRESET
Z

STRlST
*0004
4000
-0011

4325

SELECTION

ANAIT2

RPADR2

SZA

7300
1063
3064
5273
0000
4403
4404
3032
3040
7774
4000

LNE

/SAMPLE

TAD

1133
7640
5253
2133
1063
3136
5253

FSTTI

/ACTIVE

LINE

NON

DEFINED

LINE

CORRECT

LINE?

MAI N DEC-O8- D72A-LA

Page 53
*44DD

/RECEIVE
4400
4401

4402
4403

1064
6413

RCVDAT,

6402

RCVTTI.

AND

ACLUT
/LOAD

6413

4000

4404

44D5

2125

182

LINE SHOULD
CLKCNT = D

/DATA

CLKCNT

4486

5210

JMP

.+2

44D7

5222

JMP

STRLIN

4410
4411

TAD

4412
4413

1127
7D41
1204
7650

4414

5217

4415
4416

7001
3134

4417
4420
4421

131%
3711
5712

CMNEXB'

4422

1137
764%
5226
5235
2137

STHLIN.

7900

NOP

1204
3127

TAD

RCVTTI+2

DCA

TAD

CLOKPR

4431
4432
4433
4434

1313
3125
5217

THAT
z

/CAN

CAN

HAS

HAVE

SHOULD

MODIFIED

NOT

NDRD

SAMPLED

BEEN

UPDATED

THIS

PASS

ROTBUF

TAD

RCVTTI+2

/CAN

SNA

CLA

/SKIP

JMP

.+3

ERROR

CAN

SHOULD EQUAL RDTBUF
IF NOT EQUAL

INCORRECTLY

UPDATED

IAC

ERFLGZ

DCA

RPADRA

JMP

ACMNEX

DCA

/DAIA

4430

LINE

CIA

/STDRE

4426
4427

ACTIVE

/LINE STATUS HDRD
/CHARACTER ASSEMBLY

/NHEN

4423
4424
4425

NITH

LSR

TTI

4090
@900

/VERIFY

CHARACTER

DATA

ASSEMBLE
TAD

LINE
CLA

JMP

.+2

JMP

STRSTP

182

SAMPLED
BITCNT
/SKIP IF

ADDRESS

THIS

ALL

PASS

DATA

BITS

RECEIVED

/GET

UPDATED

CAH

RDTBUF

JMP

CMNLXB
SHOULD

1294

STRSTP,

771%

SPA

4437

5242

JMP

4440
4441

7DD1
3135

4442
4443

1062
7640

4444

5261

JMP

ASEMBS

TAD

PRESENT

PCVTTI+2
/SKIP

CLA
.+3

ERROR

CLKCNT

/PR5ET

CLKCNT

4435
4436

/SIDRE

EXIT

BITCNT

DCA

BIT

/PRESET

SHOULD
TAD z

SZA

/STOP

WAIT2A

TAD

SIOP

BIT

-8

DATA LINE
/GET CAN

STOP

BIT

NOT

PRESENT

CODE

SELECTED

PRESENT

IAC
Z

ERFLC3

TAD

CODE

SiA

CLA

DCA

/SKIP

LEVEL

MAINDEC—OB—D72A-LA

Page 54
/ASSEMBLE
4445
4446
4447

4450
4451
4452
4453
4454

1204
7012
7010
0314

TAD

AND

STORE

ASCII

LtVEL

RTR

RAR

/CHARACTER

AND

MSKASI

3127
1127

DCA

ROTBUF

TAD

ROTBUF

3411

DCA

1127

TAD

z AUTO2
ROTBUF

4455
4456

1316
7640

TAD

MRRIOD

82A

CLA

/SKIP_IF

4457

JMP

4460

5276
5300

CHKBUF
ENDRCV

/SET

4461
4462
4463

1204
7012
7012

4464

7012
0315
3127
1127
3411

RTR

4471
4472
4473

1127

TAD

1317
7640

4474

4465
4466
4467
4470

JMP

/ASSEMBLE
ASEMBS.

AND

/STORE

STORE

TAO

DATA

CHAR

PERIOD

BADDOT

LLVEL

TAD

SZA

CLA

/SK1P

5276

JMP

CHKBUF

4475

5300

JMP

ENDRCV

/SEI

DONE

4476
4477

2141
5392

CHKBOF.

4500
4501

7001
3140

ENDRCV,

4502
4503
4504
4505
4506
4507

7001
7001
3126
1320
3711
5712

4510
4511
4512
4513
4514

3032
4320
4257
7770
0377

4515
4516

0037
7522

4520
@964
4512

@114
‘1342
0115

CHARACTER

RTR

/STORE

ACLUT
ACMNEX
ACYCE
ACYCER
ACYCL

FIELD

RTR

/CHARACTER

ACHADN

RCVTTI+2

ROTBDF
z ROTBDF
I z AUT02
z ROTBUF
MPEROD

7744

FLAC

DONE

MSKBDT

3074

ASSEMBLED

AND

4520

CORRECTLY

CHARACTER

DCA

4517

CHARACTER

RCVTTI+2

TAD
DCA

JMP

182

CLRPCE

CHAR

RECEIVE

DATA

ISKlP

DCA

STRTBT

TAD

ACHADN
I RPADRA
I ACMNEX

DONFLG

IAC
/AC

IAC

JMP

NA1T2A.
RPAORA.

ACMNEx,
CLOKPR.
MSKASI.
MsKBDT.
MPRIOO.
MREROO,
ACHADN.

NAIT2
RPADRZ
RCMNEX
-0010

0377
0037
—0256
~0034
CHADON

FIELD

PERIOD

FLAG

IAC
DONFLG

DCA

CHARACTER

.+3

DCA

ASSEMBLED

=
2
/PRESET

STRTBT

/PRLSET

EXIT

ADDRESS

BUFFER

FULL

MAI N DEC-O8- D72A- LA

ADATB

2074
3034
~4124
2073
2072

ADNCNT

2273

ADONE
AERR22

1423
@757
1370

ADATA

ADATAZ
ADATPS

AUATS

AFAIL

AFINIS
AFORM

AFSPAS
AINPUI

ALINE
ALLDAr

ALSTPS

AMKPH2
AMODEE
AMODEl
AMODEZ
AMSDON
ANOwRK

APHSEl
APHSE2
APHSES

APHsl2
ARCDAT
ARCVE
ARETRN
ARNPS
ARNPSZ

0117
@116
4123
3033
1351
2933
4121
0433
0276
@277
039E
4126

4125
1136
0506
@767
@631
4333

2174
3120
4122
4331

ARNEDN

1Q65

ASCAN

@663

ASCPEl
ASEMBS
ASPH2
ASRE
ASRl
ASRZ
ASRS
ASRS
ASTlS?
ATEXT
ATSTER

AUTO
AUTO2

ANAITZ
BADLIN
BELL
86L

BITCNT
CASMBL
Csz
CHADON
CHAMNl
CHFLGZ
CHFLZS
CHKBUF
CHKCYC
CHKDUN

1466

4461
E446

01M4
0105
@1U6

@1M7
@119
4324
1443

@113
@glg
Bflll
4323
43MB
0323
@Z56
0137
@151
1047
3974
2223
slms
2204
4476

@121
3111

Page 55

MAIN DEC-08-D72A— LA

Page 56
CHKINT
CHTPTR
CLKCNF
CLKOFF
CLKON

0031

@029
0125
0050
0045

CLKSKP
CLOCK
CLOKER

0067
0056

CLOKPR

4513

CLRLOD
CLRPCE
CLR177
CMNEX
CMNEXA
CMNEXB
CNTAL
CODE

1027
0141

CTNO
CYCE
CYCERR
CYCL
CYCPH2
CYERl
CYER2E
CYERZL
CYER22
C200
C260
DATA
DATER
DATOUT
DATPAS
DATSPC
DATE
DATB
DONCNT
DONE
DONE}
DONFLG

0230

3036
4033

4273
4417

1077
0062
2336
1246
1325

1266

0619
@475
0755
0660
0742
0507

1276
3200
2262
0130
210m
1071
2600
24mm
2077

1400

ENDMDG
ENDMDl

11mm
0140
1134
2172

ENDRCV

4500

ERFLGl
ERFLGZ
ERFLGS
ERRNUM
ERR21
ERR22
ERR31
ERR32

0133
0134
0135
D112

ERTHRE

ERTNO
EXPHl
EXPHlA
EXPHZ
EXPHZA

EXPHS
FAIL
FINIS
FLGOFF

0664
1445
1137
1161
3152

3151
0477
@502
0760
0763
.1112
1353
~1425
0274

MAINDEC-08—D72A-LA
FLGON
FLGSKP
FLGZON
FORMAT

FSTPAS
FSTTI
GLTCLK
HALFBT

HLTERR
HLTPHl
HLTPZA
HLTPZB
HLTPZC
HP2ER2
INADlA

INCLOK
INCLSR
INPUT
INTADl
INTRPT
INTSTA
KEEPAC
KFOUR
KMlNl
KTNO

K177
K260
K7776
LETRL
LEVELS
LEVELB

LINACT
LINCNT

@273
@275
2126
1214
2Z41
4241
@222
4116
2325
@473
D714
0655
@753
1457
2224
4037
1941

420g
2075
@Z01
@zol

@966
2337
1467
2040
0720
1444

963g
13Q1
4117
4127

4262
3037

LINE

1344

LINHI

1346

LNSPCE

@436
22Mfl
2076
1046
@063
1343

LSTPAS
LSNPR
LSWZ
LUT

MCYCER
MDONE
MESDON

MFAIL
MINAL
MINUNE
MINUSI
MINUS4
MINUS5
MIN177
MLINE
MNUSl
MODCYC
MODE

MODEQ
MODEl

MODE2

MODL
MONE
MPEROU

1424

2137
1371
912%
1175
@271
4325
@272
2®7fl
1352
@434

1256
139$
@493
203%
5Egfl

1277
2®7l
4517

Page 57

MAINDEC-OB—D72A-LA
MPRIOD
MRKPHl
HRKPHZ
MSKASI

MSKBDT
MSKSRZ
MSKSRI
MSKSRZ
MSKSRS
MSKSR4
MSKSRS
MSKSRb

MSKl
MSK177
NSKS
MSK7
MOP1E1
MOP2E1
MOP2E2
MOP3E1
MOP3E2

M12ERR
M200
NAL
NEGONE
NE6200
NOCHAR

NOSTRT
NOTDEF
NOHORK

NXTLIN
OCTMSK
0PMODE
OUTBUF
OUTPUT
PASOUT
PHASE
PHASEl
PHASE2
PHASE3
PHA812

PHILUT
PRCLOK
PRDATA
PRstR
PRLSNZ
PRLVLS
PR4003
PS4003
P200
RCMNEX
RCVCAN
RCVDAT
RCVLSN

RCVLVS
RCVLVB
RCVTTI
RCVlST
REPERl
REPERZ

4516
B450
0633
4514
4515
@324
D334
0343

@352
0325
0361
2175
0270
0265
0267
0266
0540
0700
1461

1152
1173
2330
0435
0054
4332
3035
4112
4255
4314
2136
1022
1303
0055
0132
4000
2212
0065
0403
0600
1000
0405

0136
4115
2027
4326
1101
2024
0447

0632

2272
4257
4322
4400
4321
4330
4327
4402
4217

3121
3131

Page 58

MAINDEC-OB-D72A—LA
REDERs

RETR\5
RNPS

RCTBUF
ROTER
ROTERA

@127
2352
2274

SCAN
SCANON

4356
4511
432%
@497
@512

SCNDON

llfl2

scopzx

@541
3966
4271
2225
2263
@526
@721
@3Q1
@326

RPADR
RPADRA
RPADRZ

SETERI
SNDBIT
SPACER

SPCERR

SPCPHI
SPCPH2
SR9

SR1
SR2
SR3
SR5
STATE
STOP

STOP1
STORAC
STORL

STRLIN
STRSTP
STRT

@335
@344
0353
$035
4120

4106
@957
@860
4422
4435
4244

STRlEX
STRlST

@126
3952
3%64
3Z4fl

STTI

@622

S4®B$

TRLSW
TRLSHZ

3273
122%
2851
2111

TSTER

1324

TTCL

6411
64M2
64%1
W413
64U4
6414
6412
6422
6424

STRTBT
STRTTI

TEXT

T11

TTINCR

TTIl
TTO

TTRL
TTSL
TTloFF
TTlON
TTZUFF

TTSOFF
TT4QF+
TYPCRT
VERPT

wAITl
wAITZ
WAITZA
WORK

P°9859

3141
2%”7
BEZS

6432
6442
6452
D111
1%U4
2862
3252
451A
1302

i...

Mum-ow,