MAINDEC 15 D2BB D_Teletype__Part2_Jul70 D Teletype Part2 Jul70

p---"'!

....

-----

....

PRODUCT

COCE.

MAtNOEO.1'·02Be~O(O)

pRODUCT

NAME.

DATE

CREATED.

JU~V

~6.

1910

MAINTAINER.

AUTHOR.

DIAGNOSTICS

GROuP

A.

t<OL.l.ER

1.

ABSTRACT

•••

-

...

"!t'"

THE

POP-1'

ASR~3/3'

TELETVP£

T[STS

PART

2

IS

T~E

SECOND

PART

0'

A

TWO-PART

PAC~AGE

us

EO

TO

TEST

T~E

ASR33,

OR

ASR!5

TELETVPE

W~EN

A

TT

ACWED

TO

A

POP.l,

S"tlt,tM.

. '"'

PARt

2

CONTAINS

SEVEN

I£L'CTAB~'

PROGRA~S

~StD!TO

TEST

THE

TEI.EPRiNTER!

PUNCH.

KEYBOARD!

AND

T~£

"Rl~T~l

PUNCH

ANO

READER

IN COM8ItUTtON,

THE

pROGRAMS

ARe:

SE.l.ftTtO

ANO

CON-

TROLLEO

BY

MEANS

0'

T~f

ACCUMU~ATOR

SWITC~tS

(AOS),

THE

PROGRA~S

AVAI~.eLE

ARE.

PRCf!

PRG1

pRG2

PRG3

pRG6

2.

~[Q~~R£M~NTS

........

--_

....

"'t!.

2.1

EQUIPMENT

....... ---.

PAINTER

TEST·

PUNCH

TEST

KEv80ARO

TEST

COMBINED

REAOtR,

PR1NT,q,

PU~CM

T£ST,

P~

1

NTER

EX[RC I SER.

PR

I

NTS

L.

I

NtS

or

CHAR";:c

TERS

STORED

IN

Loe

00'21

ANO

11022. .

PUNCH

eXERCISER,

PUNCHt-S

AN~

REAO

CkCKS

OAT.

BI..OCKS

0'

OA

T.

5

TOREO

I N

~OC

00121

AND

0082{1·

PUNCH

fXERC

I

stA,

PUNCH[S

ANO

READ

C:.;KS

BL.OCKS

or

B!NARY

COUNT

PATTERN.

~

A.

STANOARD

POP.l'

AND

8.

ASR33

OR

ASR35

TEL[TVPE.

2.2

STOFUG£

--~--

..

LOCATIONS

00e00

T~ROUG~

04406

ARt

USEO,

2,3

~R~~~MIN~RY

PROGRAMS

w·-

..

-.-.-----

___

-_.

POP;15

ASR33/~5

TELtTY'£

TESTS

PART

1

PROGRAMS

PRG0,

PRG1,

AND

pRG2

MUST

~.vE

BEtN

qUN

SUeCESSru~~y.

3.

LOA01NG

PROCEOU~E

..

........

-

A.

B.

C.

O.

E I

,.

LOAO

OIJ£C'

TAPE

IN

TELEtY'E

REAOIA.

OR

t~

HICiIoi

SPEEO

REAOER

l'

'HE

SYSTEM

HAS

'AID

-EADER,

St!

,OORES$

SW1TQ~£S

TO

1~1".

IE'

8ANK

IWITCM

TO

"ON"

POSITION

PRESSwRES,T"

ptt[SS

"~E'O

l'N"

TM'

PROG.~M

WI~L

LOAO

ANO

MALT

wlT~

AC""'"

I'

PRO.

GRAM

~O.O£O

CORR!O'LY

1 S'

THE

'ROGRAM

~'LT'

~l'H

4a.e

A

CHECKSU"

ERROR

HAS

OCCURRED,

Rt".T

THE

,-OADING

p~OeEDUR[,

4,

ySE

PROCEDURE

...

_--

....

-

...

.,.

A.

B.

c.

D.

E.

r.

,.

y.

INSURE

TELET""

IS

ON-LINE

TURN

0"

T£L£TVPE

READER

ANO

~UNCHt

SET

CONSOLE

REGISTER

OISP~AY

TO

4C.

SE'

ADOR£SS

SWITCH

TO

80201.

SET

A~

SWITCH'S

TO

0~a0001

(SELECTS

PAGe)

pqfSS

1/0

REStT,

PR[SS

STAAT.

PROGRAM

NALTS

AT

Loe

~123~

TO

PERMIT

SETTING

0'

AC

swiTeH

OPTIONS,

NO~M'L

OPERATION

IS

WIT~

.t

SWITCM£S

SET

'0

008a.0,

THE

AC

S~lTCN

oPTIONS

rOR

TMIS

PROGRAM

A~Ef

A081w1

40S2.1

ACS12

THROut;H

ACS1?

~.LTS

~ROGR.M

.T

~OC

e~320,

.T

END

or

CURRENT

ROVTIN'.

NUMBER

0'

ROUTINE

JUST

COMPLETEDlS

DISPLAY£O

IN

AC.

To

PROCEED,

PRESS

CONTINUE.

SELECT,

ROUTINE

WHOSE

NUMSEA

IS

SET

tN

4el12

THROUGH

ACS~11

ROuTINE

IS

SELECTED

AT

COMPLETION

or

CURR£NT

ROuT1NE.

LOOP

PROGRAM,

ENTIRE

PROGRAM

IS

REPEATED.

NUMBER

or

ROVTIN£

TO

BE

SELECTED.

ACS1

MUST

IE

1,

~.

PRESS

CO\TINUE.

1,

PROG~AM

IS

ExECUTED

ANO

HA~TS

AT

~cc

002".

PROGRAM

rNO

~ALT,

lr

NO

LOoP

OPTIONS

4~E

SE!,

NOTE:

T~£

P~lNTOUTS,

RESuLTl~G

rROM

T~E

E~£CUTION

or

~RG0,

MUST

it

vtRI'JEO

By

USER

TO

DETERMINE

CORRECT

Tt~EPRI~TER

OP[R4TION.

(SEt

SECTION

9,

roR

DESCRIpTION.)

4.2

uSE

P~OC[OUR£

'OR

PRCl

A,

tURN

ON

TELETV'E

PUNCW~

B.

WITH

T'~[T¥Pt

O"-LINE,

'~NCH

6

IN,

0'

eLAN~

LEAO~R.

Rt+U~N

T[~ETY'r

to

ON-LINE

potJTION~

C.

LOAD

ReAO'.

wlTHILANK

LtAQr~f

LEAVINQ

VERY

LITTLJ

SLACK

"'TWEEN

PUNCM

AND

RtADE~.

O.

TURN

ON

R'.OER.

£.

StT

CONSOLI

-'GIITER

Oi"~A'

SWITCH

TO

AC.

r,

S£T

AOOR'SS

SWITCHeS

To

.,1",

G.

stT

AC

twlTCHe,

TO

III,."

lSE~tCTI

PRG1)

~,

PRISS

110

.tStT.

PREst

START,

I,

PROGRAM

HALTS

AT

LOC

.,211

TO

PERMIT

"TTING

0'

A~

SWITCH

OPTIONS.NORMA~

OPIRATION

II

WITH

AC

SWITCHES

SET

TO

0.1',1,

to

bAUSI

PROGRAM

TO

HAL'~'N.ERROR~

tHE

AC

SWiTCH

OPTIONS

'OR

THIS

PROGRAM

ARE

AC5111

4C512

T!04IitOUG~

&Cll'

~ALTS

PROGRA"

AT

LOC

"32.,

AT

END

0'

CURREN!

ROVTINt.

NUMBER

0'

ROUTINE

JUST

COM'LE'ED

IS

DISPLAVED

IN

AC.

TO

'.OC££D,

P-RESS

eONT!

NUE,

S'~ECT

RoutINE

WHOSE

NUMBER

II

SET

IN

ACS12

THRou;~

Aell'1

ROUTINE

II

S£LICTEO

U'ON

~OU'JNI'S

COM'LCTION,

.

~OOP

P~OGRAM.

ENTIRE

PROGRA~

IS

RIPEATED,

~A~~wON.ERAOA.

BAO

CHARACTER

IS

DISPLAYED

IN

AC.

H.~T

AT

END

or

CATA

BLOCK

Ir

ERRORS

OCCURRED.

ERROR

COUNT

IS

OISPLAYED

IN

AC.

NU~8£R

or

~OUTSNt

TO

BE

SE~teTtO.

ACSl

MUST

BE

~.

J.

PRESS

CONTINUE.

~.

PROGRAM

IS

EXECUTEO

ANO

HALTS

AT

LOC

elz".

PROGRAM

END

~ALT,

l~

NO

OPTIONS

ARE

SET,

OR

I'

NO

tRRORS

OCCUR.

(!r[

SECTION

'~1.1

OR

6.1

'OR

HALTS)

AI

l~SURt

TE~ETYP£

IS

ON-LINt

B.

TURN

orr

Tt~ETYPE

READER

A~O

PUNCH,

e. SEt

CONSO~'

RIG1STr~

OiS'~AVSWITC~

TO

Ae.

o.

SET

AOOREII

SWITCHES

TO

e~a.et

£.

SET.C

SWITCHES

TO

eel'SI.

,.

PRlSS

110

_ESET,

P~ESS

STAR,.

C.

PROGRAM

TJT~t

lS

'RINTEO

AND

PROGRAM

~'LT'

AT

~oc

00231

TO

PERMIT

SETTING

0'

AC

SWITCH

OPTlo~S.

NORMAL

OPERaTION

IS

WIT~

AC

SWITC~£S

SET

To

110000,

tHE

40

SWITCH

OPT10NS

'OR

THII

PROGRAM

ARE

ACS2.~

40512

TIotROUGH

,csl'

H'~TS

'~OGA.M

AT

~oc

11328.

AT

ENO

0'

CURRENT

ROUTINe.

NUM8,R

or

CO"p~tTED

~OUTJN£

1$

OISPLAveo

IN

AC.

TO

,RoCIEo.

PREI.

CONTINUE.

SE~tCT

~OUTIN£

WHOSE

NUMBER

IS

SET

IN

ACS12

TIotROUGw

A0517,

ROUTINE

IS

SELECTEO

AT

COMP~t;tON

0'

CURR[~'

RoUTtN£.

~OOP

PROGRAM,

ENTIAt

PAOGAA~

IS

REPEATED.

NUMBER

or

ROUTINE

To

BE

S[LEeTEO,

ACSl

MUST

BE

~.

PRESS

CONTINUE.

It

rO~~OW

T[~tPR1NTER

INSTRUCTIONS,

J,

W~£N ~'$T

ROUT1~£

IS

COMP~ET[O,

ANO

PROVIOED

T~AT

NO

OPTIONS

PREVENTS

IT.

TNE

PROGRAM

STOPS

AT

PROGRAM

ENO

~A~T

AT

Loe

0~21',

NOTE

CORRECT

KEYBOARD

OPERATION

IS

OETERMINED

ev

uSER,

IY

C~£CKI~G

t~AT

PRINTEO

CHARACTERS

COOR£SPONO

wIT~

CHRACT£RS

~EVEO.

(S[[

SECTIONS

5.1.1

ANO

6.1

rOR

~ALTS

A~O

RE~£Oy.)

4,4

uSE

~ROC£OURE

rOR

PRGa

-----~---

...

-~~-.-.--.

Ai

TU~N

ON

T'~~TVPE-

PUNCH,

8.

IIflT~

T£L£T",£

O"-1.JNE.

PUNCH

6

INCHES

0'

Sl.ANI(

1.e:AD[~"

RETURN

TELETYPE

TO

ON-LIN,

'OSITION.

c.

LOAD

R['DE~

wtTW

ILANK

LEADER,

LEAVING

1.ITT1.[

SLACK

8ETWEEN

PU~CH

AND

~EAOER.

~

, .

TURN

ON

REAOER

t

[.

SET

CONSOL'

RIGISTER

OJS'-LAY

SWITC~ES

TO

AC,

~.

SET

AODRESS

SWITCHES

TO

'8ae,.

G.

SET

AC

SwITCHeS

TO

11"e~.

(SEl.ECTs

PAG3)

H.

PRESS

tlO

~ESETI

P~ESS

START,

I.

pROGRAM

HALTS

At

LOC

1'2'~

TO

"RMlt

'ITTIN~

0'

AC

SWI'CH

oPTIONS.

NORMAL

OPERATION

IS

WITH

AC

SWITCH[S

I[T

TO

040pee,

TO

CAUSE

PROGRAM

HAl.T-ON-,RAOR.

THE

AC

SwITCH

OPTIONS

'OA

THIS

PROORAM

ARE

ACS111

ACSJ.l

ACS12

T~ROUGH

Aell'

HALTS

'ROGAA"

'T

,-OC

"~I'.

U'ON

RDUTINt"

COMPLETION.

NUMIER

0'

CoM'LETED

~OUTtN'

IS

OZSP~AvtO

IN

AC.

TO

PROCEED.

PRESS

CONTINUE,

SELECT

RoutlNt

WHOSt

NU~8EA

IS

SET

IN

ACS1Z

THROUGH

ACS17!

ROUTINE

IS

S[~tCT[O

UPON

ROUTINE'S

C~M'LtTION.

LOOP

PROGRAM,

ENTIAt

~ROQRAM

fS

~EPE'T[O,

~A~T~ON.ERROR.

8AO

C~ARACTtR

IS

OtSP~AYEO

l~

AC.

M'~T

AT

ENO

0'

OATA

8~OCK

1~

ERRORS

OCCURREO.

ERROR

COUNT

IS

OISPLAYto

IN

ACt

NUM9[R

0'

ROUTINE

TO

BE

SELECTEO.

ACSl

I'4UST

IE

,..

J.

~RESS

CONTINUE,

~.

PROGRAM

IS

EX£CurEo

ANO

MALTS

AT

LOC

012",

PROGRAM

(NO

~ALT'

l'

~c

OP'IONS

ARE

St',

OR

l'

NO

ERRORS

OCCUR,

(SEE

SEC;IONS

5.1.1

ANO

6.1

'OR

HALTS

ANO

REMEOY.)

--

...

_p~

_____

•••

__

~_~

___

••

ft

A.

I~SuRt

TE~tTY~E

IS

ON.~lNt

8.

TURN

0"

T(~ETYPE

~EAO!R

AND

pu~e~.

C.

otPoslT

IN

~Qe

t0~21

AND

~~a22

T~t

e

BIT

CODES

FOR

CHARAOTERS

T~8E

PAINTED.

0.

SET

CONIO!.E

REGISTER

OISPI.AY

$WI10101

TO

ACt

£.

SET

~ODR£SS

SWITCHES

'0

eezal.

~t

SET

AC

swlTCMtS

TO

0"1'4,

Cit

'OR

,ULI.

"tID

OPI:"ATION

,-CAV.E

Acse.0.

rOR

STAI.L.ING

BtTW'EN

CHARACTERS

SET

AC$'~lt

~.

p~£SS

110

RtStT,

PRESS

START,

1.

tHE

PROGRAM

RUNS

CONTINUOUILY,

PRINTING

LINES

WITH

CHARACTERS

STORtD

tN

I.OC

'1121

ANO

00122

UNTIL

5'OPP£0

BY

UStR,

.,

TURN

ON

'ILE'TV",

PUNCH',

e.

WITH

TELETVPE

O,V"LINI,

PUNCH'

IN.

0,.

B1.ANK

L.EAO~R.

FtETURN

T(i.ETV"

TO

ON-LINE

PO$ITION.

C.

LOAD

"IAD(R

WI'TH

'LANK

LEADER,

L.EAVING

LITTLE

SLA~K

S[TW££N

PUNCH

AND

R'AOCR.

0,

TURN

O~

RE',Ot".

£.

~OR

p"O'.

DI,olrt

IN

1.00

•••

,'

AHO

1,.12

TNt

'~BIT

CODES

'OR

CHA"lCTe".

TO

IE'UNCH£O,

r.

SEt

CONSOLE

"IGIITI" otSPL"

SWITCH

TO

AC.

G,

stT

AOORtSS

SWITCMIS

TO

""',

~,

SET

AQ

SWJTC~I'

to

••••• ,

0"

••••••

~

I.

rOR

,ijLL

1"'0

O""ATION

LEAVE

ACI~.I.

'OR

STAL.LING

8ETWEEN

CHARACTER'

SET

ACII'l,

J.

PRISS

110

RESET,

PRESS

START.

~.

tNE

SELECTED

'''OGR~"

RUNS

CONTINUOUSLV

UNTIL

8TOP'£0

IV

USER,

UNLESS

ERRORS

OCCUR,

AC

SWITCH

OPTIONS

MAY

BE

SET

AT

ANY

TIMe_

THE

AC

SWITCH

OPTIONS

'OR

THIS

PROGRAM

ARE

'C53.1

HALT.ON-ERROR,

BAD

CHARACTER

IS

DISPLAYED

IN

AC.

HALT

AT

[NO

0'

DATA

BLOCK

I'

~RRORS

OCCURRED,

[RROR

COUNT

IN

ACt

(SE£

SECTIONS

'.1.1

1

'OR

HALTS

ANO

REMEOY,)

~.

OPERAT1~G

PROCEDURE

" .

_-

______

~--.-.w----_

-----.---~--.--------~-.-----~

5,l.l

~C~~~~

~~L'S

.~.-.~--~

..

Loe

ea233

O"loN

SET

HAhT,

OCCURS

DURING

PAGI,

'R01,

PRG2,

AND

PRGf

TO

PERMIT

stTTING

0'

OPTIONS,

SET

oP'tONS

DESIREO

AND

PREsS

CONT!NUE.

LOC

0.27'

PftOGRAM

tNO

HA~T.

OCCURS

AT

tNO

0'

PROl,

~RGT,

PROi,

ANO

PRG3,

J,

NO

"LOOP

'RoG~AM~

OPTIONS

1$

StT.

SCT

DEsIREe

O'TIONS

AND

PRCSS

CONTINUE.

I'

NO

o~TIONS

ARt

StT.

THIS

~ALT

REOCCURS,

Loe

e~320

ROUTINE

END

H'~T.

OCCVRS

AT

[HO

0'

cURRENT

ROUTINE

DURING

PRGI,

PRC1,

PRGI,

ANO

PRGJ,

l'

Ac11

IS

ON,

AC

OIS'LA,S

RbuTIN£

NUMB!R~

TO

PROCEEO,

PAtSS

CONTINUE.

LOC

JI177

INCOR~'CT

PROG~AM

NU~8E~

"Lt~TEO.

S,T

THE

PROGRAM

NUM8ER

IN

ACSi

4

T~OUGH

ACI~1

AND

Plttss

CONTINUt.

LOC

,82'6

NON~£xtST£NT

ROUTINE

NU~aER

S£LECTED~

SET

THE

CORRECT

NUMBER

IN

AClit

TM~OUG~

AIQ11

ANO

'AEIS

CONTINUE.

Loe

01044

SYNC

'_ROR.

SYNC

RtAO'.

'UI~OUT!NC

HAS

NOT

FOVN~

IVNC

CWAAACTtR

WITNIN

1!'

CH'~ACTERS,

Pt)IITION

TAPE

IN

RIAOCR

10 ' .... T

SYNC

CtofAR-

AC'ER

CRUIOUT)

18

Wl'MIN~

I.,

CHARActEAS

FROM

RIAO

,TATION,

AND

'~I'S

CONtINUE.

('~G1'

PR03.

,RG6"

Loe

~la65

UNEXPECTED

INTERRU'T,

A

NON.TILTY',

CEVICE

HAl

CAUSED

INT'RRU'T.

TUR-

0"

O£VJC~

ANO

PRill

CONTiNUE,

,'RG1,

.~G3

••

RG6'~

Loe

01235

READ

CHECK

ERROA

A,

"0

CN,.AOTEA

IN

AC,

PRISS

CCNTINut.

(ACS~

~UST

It

ON

'OR

THII

HAL.T

TO

OCCUR.)

C'Rll.

'·"03,

'RGt

••

Loe

~123'

REAO

CNECK

ERROR

B.

'OLLOW

uP

HALT,

CORRECt

CHARACTER

IN

AC

•.

TO

'ROCEED,

PRESS

CONTINU',

C'RGi.

p~G3,

PRG6»,

Loe

e1245

BLOCK

ERRORS

HALT,

NUMBER

0'

tRRDRS

IN

AC;

TO

PROCEEO,

PRESS

CONTINUt.

CpRG1,pRG3,PRG6).

Loe

~3e36

P~G2.

RouTtNE

I

ERROR

~AL'.

~S,

'AIL[D

TO

SKIP

WIT~

KEYBOARD

rLAG

SEt,

.RESSINC

CONTINUE

ENTERS

SCOPE

LOOP

THAT

SKIPS

0,

'LAG

CONTI~UCUSLY,

',2

A~~

PROGRAMS

MUST

BE

S'lRT£O

4T

~OC

~0'00.

OP,RA

T

1NG

ftiiTAICTtON$

--.-~.~-~

••

-.*~"-

.•.••

PRG0

.~O

PRG1

MUS'

PRECEDE

EXECUT10~

0'

PRG3.

pRGJ

"UST

PRECEDE

EXECUTION

or

PRG~.

~t

~lSC~LLA~EOUS

8,1

EX[CUTION

TIM'

-

~ ~

~

....

---.---~

..

--~.

PRGII

16

MIN

(~AX)

pRQ11

ae

MIN

eMA.I

pRII.

USER

Ot'ENOENT

,RG31

4~

MIN

(MAX)

P~G.

T~ROUGH

p_G18

ARE

CO~TINUOUS~V

RUNNING

pRoeRAMS

l'AG[

12

-~~-~--~-.-----.~-.~

THE

pop.f' •• ,R-3313,

TELETYP£

TESTS

P.RT

2,

CONSIST

OF

'1

PROC*AMI·t4UMB'~r:O

'ROM

•

TO

6,

9.1

~R'!~~Rl~T~~~'~ST

_w

___

-~

••••

_*~.~p

TMtS

PROGRAM

CONTAINS

11

ROUTINES

NUMB'RED

,ROM

e

~O

~6

(OCTAL),

RTN.

~TN1

CARRI'G'

R"URN

TE'T,

CHICKS

"I~J'Y

0'

CAR~I.'t

R,TURN

TO

PRINT

'OSITION

~

'ROM

ALL

OTNER

PRINT

PO'ITIONS,

NO

'RtNttNG

SMOULD

OCCUR

IN

,N'

PRIN'

'OSITION

OTHER

' .... N IIOSITtON

,.

RIG~t

~A~GtN

T'IT

SHOWI

WHEN

THE

RIGHT

MARGIN

II

INC~RR'CTL'

AO~UST'D.

THE

'CST

PRINTS

~.

GROUP'

0'

••

,.

I

'OI.1.0WeD

I,

CHAlUCTtRI

-I,

~

A

CORRtctl.'AD~US'EO

MARGIN

WILL

GIV[

'HE

'OI.LOW1NG

pRINTOUT'

TMt

IS

ARt

PRINTtO

TO

'.CILITATE

COUNTING

PRINt

~O'ltl0N'.

~TN2

SPACE

TEST.

THt

TEST

PRINTS

I

IN

'LT£R~AT£

POSitIoNS

0'

THE

LINE.

A'T'~

A

DOUILE

C.~~IAOE

RtTURN.

IT

S"CES

TO

THE

8LANK

POSITIONS

AND

PRINTS

A 1.£"

SLANT

ILASH,

A

DOUBLE

CARRIAG~

R'TURN

IS

ISSUIO

A'TEA

PRINTl~G

EAC~

~E'T

SLANT

SLASH,

qTN3

LINt '[EO

TEST,

T~E

TEST

'~IN'S

A LE,r

SLAS~

FOLLOWEO

By

A

~INE

PEtO,

'OLLOWEO

SY

RANDOM

STALLS

UNTIL

12

SLASHES

HAVE

BEEN

PRtN'[O,

THE

~£'UI.T

IS

A

LE'T

SLANTED

~lNE

'ROM

POSITION

1

TO

72.

VERTICAL

SPACING

V.R1ATIONS

WILL

INDICATE

rr

ADJUSTMENT

fS

RtQUIR(O,

PAGE

J.3

(9.1

CONT'O)

RTN_

TY~ES

I.INE

Or

CHARACTERS

ASC,

RTt-J'

TYPES

LINE

OF'

CIoIARACTERS

DE'.

AT""'.

TY'(S

LotNt

or

CIHRACTERS

GHlt

R'f'N1

TYPE8

LINE

or

CMARA,CTEAS

JKL.

J:tTN1~

TVP[S

LtNt

0'

CHMUCTERs

MNO.

qTN1-1

TV'£!

L.INt

0'

CHARACTERS

PQR.

JolTN12

TV'ES

LINt

0'

CHARACTERS

STU,

RTN1~

T.'£S

LINE

or

CHAfUCTtRS

VII.

Rns141

TV'ES

L.INe

0'

CH'FUCTt~S

Y!I

RTN15

TV'!S

LINE

0'

CHARACTERS

123

RTN16

TV'ES

L.INE

0'

CHAIUCTtAs

4',

Rn~l'

TVPES

L.INt

0'

CHA'UCTERS

11'

.TN2e

TVPES

LINE

0'

CH.UUCTEAs

I'"

ATN21

TYPES

L.INt

or

CtoURACTERS

I"~

qTN22

TYPtS

LINE

0'

CIofARACTERS

no

R'N2~

T¥PES

LINt

0'

CHARACTERS

..

,

ATN24

T"PES

LtNE

0'

CHARACTERS

-.1

RTN25

TVPES

LINt

0'

CHARACTERS

lIe

RTN26

TVPES

L.INE

0'

CHARACTERS

,)f

qrN21

TYPES

LINt

or

C~AR'CTERS

'C\

qTN3e

TVPES

LINE

OF'

CHAIUCT[RS

J

••

RT~~l

TyPES

LINE

OF'

AL.L.

CrURACT£AS

(9.1

CONT'O>

~TN3'

RTN36

TYPES

LINL

Of

ALL

C~ARACTERS.

rtxED

OE~AY

BETWEEN

C~ARACT[RS

IN

A

~INE.

DELAV

IS

DETERMINEO

AT

RANDOM,

T"ES

SIX

LINt.

0'

ASRa3

WORST

CASE

PAlTERN.

TY'ES

SIX

LIN"

0'

ASR~J

WORST

CASt

PATTERN,

"X£O

DELAV

"TWEIN

CHARACTERS

IN

•

LINE.

O[~'V

!S

OIT'-~INto

AT

RANDOM,

TWE

ASR33

~OR'T

CAlt

PATTtRN

CONSISTS

OF

C!04,-.,CtERI

'.WI

TVPES

IIX

LIN,S

0'

ASRI'

WORST

CASE

PAT'IRN.

TYPES

SIX

LIN"

0'

ASR.'

WORST

CASt

PATTERN,

'I-tO

bELAV

BETWEEN

CNAR'C'EA

IN

A

LINE.

O£~AY

IS

OETtRMINED

AT

RANDOM,

T~[

.S~3'

WOR'T

CASE

'ATTERN

CONSISTS

or

C~ARAC'ERI

'e'e

.---_

....

.,

..

-,."

....

r~lS

PROGRAM

CO~T41NS

15

ROUTINeS

~UM9E~EC

;~OM

~

TO

16

(OC'A~',

lHE

lEST

SEQUENCE

USED

BY

THE

qOUTI~ts

IS

A.

SET

uP

QAT.

S~DCK

e.

PU~CH·'-I.Ot~

e.

PUNC'"

'VHC

CHA1hCTrR

CAUeOUf)

o.

PUNCH

OAT.

BLOCK

r.

SYNC

TME

RIADE"

r.

R'AO

OAT.

11.0CK

G.

PUNCH

'RA,I.£"

101.

WAIT

'OR

RCADER

TO

COMPLETE

~£'OIHG

0'

O.T.

81.0CI<

st'ORE

GOtNG

,0

RTNJ

PUNCH

~NO

READ

CHECK

I~OeK

or

41.~

es',

RTN1

PUNCH

AND

READ

CHECK

e\,oCl(

0'

CHANNEL.

1,

RTN2

PUNO,",

AND

READ

CHECK

al.Ocl(

or

CHANNE~

2.

RTN3

"!.INCH

AND

REAO

CHECK

Bl.oCI<

Or

CHANNEL.

3.

RTN

..

PV~CN

AND

READ

CHECI(

l'-oCI(

0'

CHANNEL.

..

,

IolT",,'

PUNCH

AND

READ

CIolECK

81.0Cl(

0'

CHAN~£L

'.

RTN6

PU~CIoI

AND

READ

CHECK

91.:CI(

0'

CHANNEL.

6,

RT,..'

PUNCH

AND

READ

CHECK

Bl.oeK

or

CHANNEl.

.,

.

qTN1~

PUNC,..

AND

REAO

CHECK

Il.oC.c

0'

CHANNEL

8.

qT~11

PUNCH

AND

READ

CHECK

B~:le(

cr

SL.tD1NG

1-

pA'TEI1N.

~TNlc

PUNCIoi

AflJO

READ

Cwe;CK

lLocCK

~r

SLIOING

e

PATTERN.

RT~l3

PUNCH

AND

REAO

CHtCI(

Bl.OC.c

or

15

AND

"S

PATTERN.

RT~l.

SAME

A8

RTN13,

BuT

RANCO~

OEL.AY

8ETWE£~

CMARACTERS

PUNC~£O.

RTt-.15

PUNC~

ANO

"£AO

CHECK

81.0C~

0'

BINARy

COUNT

PATTERN.

RTt-J16

SAME

.1

RTN~',

BUT

RA~Oc~

OEl.AY

BETWEEN

C~A~ACTE.S

PUNCIoi£O.

---.-----"----.---

T~lS

P~OGRAM

CONTA~S

J

ROUTINE.

~UM8CRE~

,~O~

e

TO

2.

RTN'

CWCCKJ

THAT

K,'

CO"M'ND

SKI'S

W~£N

'LAO-i.

T'.;

II

DONI

,,.,

TJ

MI":

RTNl

tc~o

TCIT.

AN'I

CtofARACTtRS

~tAO

'ROM

KIYiO'ARD

ARE

TV"EO.

COR~"!C'

O'~I"TtON

VERl'lCA'lON IS

Ol)N£

VjSUAlL.V,V

UIER

I

RIADING

•

RUaOU'

CHARACTER

ENOl

TMI

TE

T.

~T~2

OCTAL

EQUIVALCNCE

'EST.

THE

OCTAL

EQuJVALENl

0'

ANY

CMARAC"RI

KE'ItO

It

TY'IO.

READING

A

AU80UT

ENOl

TME

T"T,

9,4

PRG3;COMBl~EO

~£ADER.

'AINtER,

PUNC~

TEST

...

-_

••

-

.....

~

--.-.

-

~

......

-.-.

'!It

e

•••••

_-

•

.,

._-

"·w-

THIS

"'tOGfII,"

CONTAINS

17

ROUTINES

NU.M8£REO

,ROM

e

'0

12

(DC; AI.».

ALL.

RCU'"S

NES

USE

TME

'OLI.Ow

IN;

SEQUENCE

I

A.

'ILL.

CO.!

8LOC~

wl'~

DATA

TO

Sf

pUNew£D/PRINTEO

B.

PUNC'"

I.EAOER

e.

PUNC~

SYNC

CHARACTER

O.

PUNCW

DATA

aLOCK

~NO

DIL.AY

8ETWEEN

CHARACTERS)

it

SYNC

TNt

R"O£~

~.

REAO/CWEcK

OATA

BLOCK

CRA~DOM

DELAY

BETWEEN

CMARACTERS)

Gt

PUNCH

DATA

BLOCK

~RlNCOM

OtL.AY

BE'W£[N

CWARACTERS)

~

.

qEAO

OlT.

BLoCK

(NO

OE~.Y

BETWEEN

C~ARlCfERS)

I •

PU~CJ.4

TRAILER

J.

\oiAIT

'OR

REAOER

TO

COMpLET£

~EAOl~G

OAT,

BL.OCK

I<

•

[~O

0'

T[ST

SEQUENCE

RTN'

PUNCI1/"Rl~T

ANO

JIlEAO

C~ECK

BLOCK

0'

ASC

RTNl

PUNCIo4/PRINT

AND

"tAD

CfoI£Cf(

BLOCK

0'

ClEF'

RTN2

PUNC~/PRINT

.~o

READ

CfoItCK

BI.OCt(

0'

GH!

PAGE

17

(9.

4

CONY'O)

RTN3

~UNCl-l/pqtNT

AND

'«AD

CIoIECK

Bl.OCK

or

..

!~~

ATN4

PUNCH/PRINT

AND

REAO

C~ECI<

BL.OCK

or

t-INO

RTN'

PUNCH/PAINT

AND

READ

C~Eef(

BL.OCK

0'

pQR

RTN6

PUNCJo1/;A1N;

ANO

R,'O

CI-I£Cf(

9~OCI<

0'

STu

~TN"

PUNC""/PAINT

AND

~EAO

CHECI<

BL.OCK

0'

VW)(

~TN1~

I'UNcw/'RtNT

AND

REAO

C""ECI<

BL.OCK

0'

vii

RTN11

PUNCH/PRINT

AND

READ

CHECK

BL.OCI<

0'

~~~

RTN12

PUNeH/'RINT

AND

R,'O

CHECI<

BL.OCK

0'

4'6

RTN13

PUNC""'P"tNt

AND

REAO

C

...

,OI<

BL.OCI<

0'

'189

RTN14

PUNCH/'RINT

AND

READ

CHECI(

81.0Cl(

0'

I'"

RT"15

PUNCH/;RINT

AND

R£AO

CHECK

BL.OCK

0·'

5"&

tilTN16

PUNCH/'RINT

AND

R'AD

CHECK

BL.OCI<

0'

, C) ,

RTN11

PUNCH,,.RINT

AND

REAO

CI1[CI(

BL.OCK

or

..

,

R'N2~

PUNCt-f/PRINt

AND

READ

CIoi[e!(

BLOCI(

0'

;",1

RTN21

PUNCH/"~

I

NT

AND

R,"'C

CIo4[CI(

BL.OCK

0'

11<

RTN22

PUNCIo4/;JIIINT

AND

REAO

C"'~CK

BL.OCK

0'

.)'

RTN23

PUNCH/,.RINT

ANC

REAO

CHECI(

BI.OCK

or

.,\

RT

...

24

PUNCH/'RINT

ANO

REAO

CIoi[CI(

91.0CI<

0'

)h.

RTN2'

PUNC~/;RINT

ANO

R(AO

CIoi£CI(

SL.OCK

0'

A"'L.

P~INTAB~E

CMARACTtA,

qTN26

PUNCH/PRINT

ANO

RtAO

C~£CI<

BLOCK

0'

.·SR33

PRINTER

WOAST

CASE

PATTERN,

('.W/)

RTN21

PUNC~/P~INT

ANO

READ

OIoiECI<

BLOCI(

0'

ASR33

PR!NTER

wORST

CASt

PATTERN

8~ANI<5.

wtT~

INTERSPERSED

~'~30

PUNCM/pqINT

ANO

REAO

CIoi[CK

B~oeK

or .SR35

PRINTE~

wORST

CASE

PATTERN,

( , t 7

C)

RTN31

PUNc~/P~INT

AND

READ

C~£CK

B~OCK

0'

.SR35

PRIN"R

WORST

CASE

.ATTt-N

WrT~

INTE~SPERSEO

eLtANK"'.

PUNCH/.~lNT

~NO

READ

CHECK

BLOCKS

0'

SPACe.

RutouT

(It

.NO

'Sl,

9.'

P~G.;PAINTE-

[~[.CIS[R

.-.--.~-

..

--

..

~--.-

...

PRINTS

~INES

WITH

OAT'

ITO-tO

IN

LOC

""1

ANO

"'22,

ACS.

CONTROLS

'ULL

1~'rOf

O~

ITALL

OPERATION,

0,6

p~o,

ANO

PRG6

PUNCW

t.fRClaER,

~

.

.......

.....

~

~.

..

-

...

~.--

....

-.~---~-~.~--

..

~

..

PRC'

PUNCHES

AND

REAO

CHECKS

OAT.

BLOCKS

WIT~

DATA

STORED

iN

LOC

le821

AND

leJ22~

ACSI

CON'ROLI

'ULL

s,rEO,

OR

STALL

oPERATION.

PRg6

PUNCHES

AND

REAO

C~ECKS

BLOCKS

0'

BINARY

COUNT

PATTER~i

AANOO~

STALLS

BETWEEN

CHARACTERS.

THE

TWO

EXERCISERS

USE

THi

'OLLOwING

stQUENCEI

A.

SET

uP

DATA

BLOCK'

DETERMINE

WHETH[q

'ULL

SPEED,

OR

STALL

oPERATION,

8.

PUNCIoI

L.EAOER

C,

ItUNCIo4

SYNC

CHARACTER

C~U80UT)

O.

PUNCH

DATA

SLOCI(

[ .

SYNC

THE

REAOER

,.

,

~EAD

DATA

SLOCr<

~

.

PUNCj.j

OAT.

8LOC1(

....

BACK

TO

ST[FJ

' •

PI\GE

1

Ipnp-15-AS~33-~5

TFLFTYPF

TESTS-PART?

ICOPYRIGHT

1969,

1~ITAL

EQUIPMENT

.~-.

/

IPRG0-P

RiNTER

TEST

1;'~Cl-PUNCH

TEST

IPPG2-

K

EYBOARO

TEST

IPRG3-COMBINEO READER,PRiNTER.PUNCH TEST.

IPRG4-PRINT tR

EXERCISER,

PRINTS

LINES

Ot

C~ARACTERS

STORED

IN

LOC

~021

I

AND

0022.

/PRGS-PUNCH EXERCISER,

PUNCHES

AND

READ

CHECKS

DATA

aLOCKS

or

DATA

/

STDREO

IN

Lor

0021

AND

0~22.

IPRG6-

PUN

CH

EXERcISER.

PUNCHES

AND

READ

CHECKS

BLOCKS

OF

BINARY

cOUNT

/

PATTERN.

I

ISTARTING

AOORESS:~020~

.EJECT

PAGE

2 15TTP2

.A8S

0~020

• LaC

2e

~002~

00"'000

KSTART

0

~0021

~0~0Pl0

PTEMP

0

00022

41!00000

pl'rMPl

0

00023

000000

DELAYM

0

00024

62910~f2

JMP.

2

00~25

0000£'10 0

~0(IJ2f1

000000

DELAYS

91

00027

0000·Ql0 PRGttuM "

00el.,.

000017

PRGMSK

17

00031

777770

PRGlIM

-10

00932

9100111

PSW

PRGTAB

~0V133

9100000

RTNNO

"

00034

000000

CU~TST

0

00035

000000

NXTST

0

00036

00(11077

TSTMSK

77

00037

00009191

MSCTR

A

A004~

0000910

MILCTR

A

00041

777142

MILl

-636

V'0042

"'00000

TEMP

0

00043

0000"'0

TEMP1

"

A0~44

"'0~0C1!0

TEMPU

CI!

00~45

000000

UTEMP

'"

00046

00~0~0

UTEMPl

CI!

009147

000000

UTEM

P2 0

000591

000000

CTRA

'"

A0051

01110000

eTRB ('I

00052

04CJ1000

SR3MSK

04~00e'

~0"53

00"'0~0

ERRCR

0

910"'54

00C1!0f110

fRRCTR 0

00055

P,0f11277

nLYMSK

'277

0~056

00~000

prLAG 0

00057

0000~0

flLKCNT

Ii'!

0006C1!

P0~21r;

r.R

215

('H'~61

(J.~0I212

L~

212

01'-16?

7774P11

MR80UT

-377

.EJECT

PAGE.

3

15TTP2

.'

,~?

6"

~H';~vw0

RBUSY

?

0~QlI-:'::

00v,:

?VI

LINK

.

~l

...-.

;'

':_

~

0(1\(.'

,~(i'0

AC

;"

:,~

'r\

'~16

t

~0/'240

C:PACE

,"

4 I

o

,"'tlf.,

7

00r.2.,7

C25"'

')5'

~~~7~

VJ01'334 C334

334

~0071

00Vl001

K1

1

Ih

1

oij72

,

777777

Ml

-1

~0-073

717776

M2

-2

00074

7777~2

M16

-16

~0P75

777734

M44

-44

00~76

777670

Mi10

-110

~~P.77

777667

M11l

-111

9l010P.

P.000"'~

TEMQ

e

00101

0000~~

TEMR

~

00102

000000

flAG 0

00103

000077

K77

77

00104

777740

M40

-40

00105

~09l100

C100

100

00106

000240

C240

240

00107

740100

SKIpMA

SMA

0(,l1110

741100

SKIPPA

SPA

00111

002071

PRGTAB PRG0

00112

002527

PRGl

00113

003011

PRG2

00114

0031~7

PRG3

0~115

P03336

PRr,4

00116

003346

PRG5

001.17

003373

PRG6

70e3~2

KRA:700322

.EJECT

P~GE

4

lST~D2

0e177

.LOC

177

~~177

74"~40

HLT

IINCORRECT

PROGRAM

NUMBER

a~20~

7500"4

START

LAS

IREAD

SWITCHES

08211

5~~030

ANt)

PR(:MSI(

lAND

WITI-!

PRCMSK

~e2B2

34~H,~H

TAO

PRGLIM

IAOO

PROGRAM

LIMIT

~(a?e3

74P!3"'0

SMA:S~A

IVALIO

PROGRAM

NUMBER?

~0204

600177

JMp

177

IND.

~"'?05

75~0A4

LAS

IYES.READ

SW

ITCHES

00206

500030

ANa

PRGhfSK·

08207

"'40027

OAC

PRGNUM

ISAVE

PROGRAM

NUMBER

0~21~

34~032

TAD

PS;,

IDEVELOP

PROGRAM

O0211

O40042

OAC

TEf04P

IADORESS.

00212

22R042

LAC.

TEMP

0k1213

04~221

OAC

PRGAOR

ISTORE

AnDRESS

0021

4

100533

JMS

MOVVr

IINITtAL

Ti(

INTERRUPT

AREA

0111215

000024

24

00216

P0i11001 1

0~217

777776

-2

0022~

620221

JMP*

.+1

Ir

J

TO

SJ:"LECTEO

PROGRAM

~~221

000000

PRGADR

~

00233

.LOC

233

O0233

750040

SRS[T

HLT:CLA

ISELECT

OPTIONS

00234

200020

GETRDY

LAC

KSTART

IGET

lDOR

OF

1S

T

RTN.

0023~

04

00

35

OAe

NXTST

ISTORE

AT

NXTST.

00236

100277

JMS

rORWo

00237

75001'14

LAS

IREAD

SWITCHES

00241'1

742010

RTL

00241

74040O

SNL

ISELECT

ROUTINE?

0~?42

62111034

JMP*

cURTST

IN

0 • S

TAT

.w

T T H

CURRENT

ROUTINE.

0tl1

2

43

75~0~4

LAS

IYES.REAO SWITCHES.

00?44

500036

AND

TSTMSK

0v!?45

74?0~1

CMA

0"'241'>

34~r.1I71

TAO

Kl

~0247

34~HlJ33

TAO

RTNNO

~025P

7512~0

SNA!CLA

lIS

IT THIS ROIJTINr?

~1:l'251

62fi'1034

JMP*

CURTST

IYES.GO

nO

IT.

V'o';>c:;?

?eV'",~.:;

LAC

NXTST

INO.

,,~a,~

~

34"'071

TAil

Kl

QH'254

75v,2('~

SlA:CLA ILAST

ROUTINE?

0iP5r;;

~0~2:-'6

JMP

GETROY+2

INO.

';1~::

>:;

~

75V'040

INCRTN

HLT~CLA

IYES.

INCORRECT

ROUTINE

NUMRER

;'V'?~

..,.

~~?234

JMP

GETRDY

.EJECT

PAGE

5 l!:;TTP?

1'~26r

A.0~313

CfiAIN

JMS

C.HALT

lfiALT?(ACS0)

/~~?

A'

750PP4

LAS

IPEA[l

SWITCHES

:2~~?

i

~

.)~

...

{Jr

RT

>l0?63

414(>~

etL

IROUTINF:

SELECT?(ACS1)

~~~o4

600234

JMP

r;ETK:"JY

IvES.

00265

20~035

LAC

,,"XTST

00266

34~071

TAn

Kl

001.'67 75e'2A0 Sr£\!CLA ILAST

RTN?

00~7R

60~236

JMP

GE

TR

OY+2

INO.

002

71

750004

L~S

IVES

00272

742010

RTL

00273

7511~0

SPAlCLA

ILOOP

PROGRAM?

(ACS2)

00274

600234

JMP

GErROY

IvES.

00275

752040

PRGEND

HLT:CLA

INO.

PROGRAM

END

HALT.

00276

60~260

JMP

CHAIN

00217

0001""0

FORWD

"

00301

22~035

LAC·

NXTST

IGET

NO.

00301 04A033

DAe

RT~NO

ISTORE

AT

RTNNO.

00302

440035

IS2

NXTST

~0303

200035

LAC

NXTST

ICET

CURRENT

RTN

NUMBER

003"'"

040042

DAe

TEMP

00305

440035

lSi!

NXTST

00306

200035

LAC

NXTST

ICET

CURRENT

RTN

ADDRESS

00307

040034

DAC

CURTST

~031'~

220042

LAC.

TEMP

ICET

ADDRESS

00311

040035

DAC

NXTST

~P312

620277

JMP*

rORWO

IEXJT.

00313

000000

SHALT

0

00314

75f10{114

LAS

IRE

AD

SWITCHES

00315

74e100

5Mb.

IHAlT? (ACS0)

00316

620313

JMP*

SHALT

INO. EXIT.

00

3

17

200933

LAC

RTNNO

IGET

RaUTINE

NUMBER

003221

740040

HLT

IROUTINE

AND

HALT

"'0321

620313

JMP·

SHALT

lEX

IT

00322

000000

STeTR 0

00323

220322

LAC*

STeTR IGET

LOC

ADDREss

00324

04~042

OAC

TE"'P

ISAVE

AT

Tt:MP

00325

440322

TSl STeTR

00326

2293?2

LAC*

STeTR

IGET

COUNT

AND

STORE

00327

0MH1I42

OAC*

TE"'P

IAT

DESIRED

LOCATION

0033'"

4403?2

ISl

STeTR

0P!~31

754000

CLA!CLL

0033?

"20322

JMp*

STeTR IEXIT

10~3?2

SETLOC=JMS

STCTR

.EJECT

PAGE

6 15TTP2

00333

000000

OLYMS

II

1i'0334

200023

LAr:

DELAYM

ISET

MILLISECOND

COUNT

0033~

~491037

OAC

MSeTf?

ISTORE

I~

MSC

TR

091336'

62913~7

JM'P.

.+1

00337

000340

.+1

0034~

200~'41

LAC

Mill

ISET 1

HS

CONSTANT

00341

04-Q!040

DAC

MILCTR

ISTORE

AT

MILCTR

00342

44~0491

lSi!

MILCTR

IOELAV

ONE

910343

600342

JMP

.-1

IMllLISECONO

00

344

4400

37

IS~.

MScTR

IDELAYEO

NUMBER

OF

00345

609133,6

JMP

.-7

IMILLISECONO S

REQUIRED?

00346

754000

CLA:CLL

IrEs.

00347

6291333

JMP.

OLyMS

IEXJT.

100333

OELAY=JMS

OLYMS

00350

000000

OLeNT

0

091351 1091411

JMS

RANGEN

IGET

RANDOM

NUMBER

919135' 50910'55

AND

nLYMSK

IMASK

OUT

UNDES

IRED

BITS

00353

7412A0

SN4

10?

910354

6091

351

JMP

.-3

IY(S.

GET

ANOTHER

NUMBER

00355

74~91911

CMA

091356 3409171

TAO

Kl

00357

A409123

OAr::

DElAYM

1ST

ORE

DELAY

COUNT

003M'

62913'591

JMP.

OLCNT

IEXIT

00361

00V'000

CRLF"

0

91~n62

22"'361

LAC.

CRlF"

IGET

cRU·

COUNT

910363

91491375

DAC

CReTR

lAND

STORE

IT

"171364

4491361

ISl

CRLF

0036'5

100451

JMS

TYPSTG

ICRU·

ONCE

00366

0091372 • + 4

0~367

440375

lSl

CReTR

IDONE?

00370

600365

JMP

.-3

INO.

CRlF='

AGAIN

00371

fl203t'l

JMP. CRlF

IY[S,

EX

YT.

00372

~000j5

~e15

ICR

~0373

"'0N'l2

"'012

Ill="

00374

00~00l1

~0~1

lEND

CODE

00375

A00000

CRCTR

(A

ICRlF

COUNTER

~0~7f,

r0P100V'1

PUNCH

~

00377

44~0C;6

!

S~

PFLAG

0~4~P

70"'4l1!6

TlS

IPUNCH/PRINT

0~4P.:!.

20(:'10"6

LAC

PFlAG

IGET

C(Pr:L4G)

VJe4~?

7512V1e

SNA!CLA

IFLAC

RESET?

0~4~~

~004""'6

JP-IP

• +3 IvES

004914

70"'4P!1

TSI='

INO,

FLAG

uP?

~040t:;

1'>00401

JMP

.-4

INO.

004"'''

70~4~2

TeF IYES,

CLFAR

PRINTER

FLAG

"'~4",7

14"'°">6

!:"rll4

PfLAG

IClEAR

PFLAG

0~410

6

20

376

J'"'P

•

PUNCH

IEXIT.

• f JEeT

PAGE 7

lc::TTP2

IRANDOl"

f\C'~8ER

G[~t=RATnR

;~(~411

~i??~:-'/

PA"!GP,

7'

0;:'412

2~~4~i

LAC

RANDE>:

00413

544

4

?1

SA-!)

(RANT>:SL

-q0

0~414

7410P,~

SK~

~Ql41r;

6Q[.l425-

JMP

RANTAO-1

0041:~

204402

LAC

(RANT8L

0.0417

~48437

DAr.

RANOEX

0042ft

?0it"

36'

LAC

RAt-JCON

00421

'451~0

S'PA

!

ClL

00422

144002

STL

00423

74Nh0

RAL

~0424

840436

DAC

RANCON

1110425

22111437

LAC.

RAt-.IOEX

00

4

26

340436

RANTAD

TAr)

RANCON

00427

f.lI6·0437 DAC. RANorx

0043"

200450

LAC

RANSAV

00431

7411102111

RAR

1110432

36P4.:n

TAr).

RA/lJOFX

00433

04~4r;0

DAC

RANSAV

1110434

44f1437

lSi!

RANOEX

1110435

620411

JMP*

RANGEN

11I043

f1

1234'56

RANCON

123456

00437

000450

RANOEX

RANTBL+1111

0044(11

654321

RANT8L

~54321

"'111441

361"'16

361416

~044?

0553t-3

05r;363

~044~

546'M0

54f10~0

1110444

243035 243035

00445

76(>572

762572

00446

453237

00447

150214 150214

0045P.

"'f!~0~~P

RANSAV

0

.EJECT

p~Gr

8

15TTP2

/TYPE

CHARACTEP

STRING SUBROUTINE

V117J451

"'0~0~0

TYPSTG

'"

0045?

22~4'51

LAC·

TYPSTG

IGET

ANO

STORE

STRING

I7Jt1I45~

040100

(lAC

TEMa

/AOORESS

00454

1401~2

DiM

rl~C

IClEAR

FLAG

00455

4~0451

IS2

TYPSTG

ISET

UP

EXIT

0045"

2201~0

TSC1 LAC.

TEMa

IPICK

uP

DATA.

00457

741'020

RTR

00460

142020

RTR

00461

7420?0

RTR

00462

100461

jfo\S

TSC2

ICO

TYPE

1ST

CHARACTER

00463

220100

LAC·

TEMa

IPICK

UP

DATA

00

464

100

4

67

jfo\S

TSC2

ICO

TYPE

2ND

CHARACTER

00465

440H'I0

ISl

TEMa

~046f1

600456

JMP

TSCl

IGO

BACK

FOR

MORE.

0(11467

000000

TSC2 "

0047t1l

5001"'3

AND

K71

/MASK

orr 6

BITS

00471

040101

DAC

TEMR

/SAvr

CHARACTER

00472

200102

LAC

FLAG

IH:S

T

"SPECIAL"

rAlG.

~17J473

751112(110

SiA!ClA

00474

600504

JMP

TYPSP

ISPECIAl

~0475

200101

LAC

TEMR

IREGUlAR

0'~476

741200

SNA,

10?

00477

60Q15l712

jMP • + 3

IYES.

SET

FLAG

TO

SPECIAL

I7JVI~0(71

100'5:;>4 TyPAT

JMS

PRINT IND.

GO

PRINT IT

vH~'501

62V1467

JMP.

TSC2 IRE

TURN

Vl050(1

440102

lSi

FLAG

ISET

FLAG

TO

"SPECIAL"

l<l0503

620467

JMP.

TSC2 IRETURN.

0(1l~04

140

102 TYPSP Dr"'!

FLAG

ICLEAR FLAG.

~~';v15

(100101

LAC

TE~R

15[T

CHARACTER

00506

741110"-1

CMA

1II{I\C:;(ll7

04111071

TAr)

Kl

0(i11')10

74'1(?V'r;,

SNA

0~~11

60ii'SV'~

JMP

TYPAT

IIT'S0:

PRINT

....

"

.~0512

3

4007

1

TAn

K1

ITEST

F'OR

°1

11105

13

75

1

2111111

SN

A !'Cl A

1011

0~514

620451

JI"IPo

TYPSTG

IYES.

EX!T

CODE.

E X

IT

.

iii

!~~

1 h,

::>00P17

LAC

SKyPt-4

A

IsET

CC$IooITCI-l)

To

"S~A"

00">1f-

04(i115?~

rAC swITCH

ii'Vl~17

2{{'10101

LAC

TEtwlR

/GET

CHARACTfR

~0~?lt1

10?>'3?l

JMS

PRINT

IGO

PRINT

IT

(~~~:?

j

?0~110

LAC

SKIPPA 1

5fT

c(S~ITc~)

TO

"SPA".

~~~2?

04

v1

5?h

\lAC

SWITCH

(.'I"'~2~

62~4f-"7

JI"IP. TSC2 IRETUBN.

0V'1C;?4 o

0V1~'

c'?

PRINT 0

\~0'"

?"'> :;

401;'

4

TAn

/-141/1

ICOMPAR(

"YTH

40

,-I"'>;?f.

74111'V

SWITCH

SPA

ICHA,RGEn

T()

SI'!A

FOR

SPECIAL COnES.

"H152 7

34QllV'o;

TAO

r,100

0~~30

34~~17tl

TAn

f~24

0

~),~'<H

1 0

v~

3 7 h

JMS

PUI\,C~

IPRINT

CJ.<A!:iACTER

~v~"3?

6205?4

JMP.

PRINT IRE

TURN

.EJECT

PAGE

9 lJ.]TTPc

l~533

0ev0(1!~

'~OVVE

0

(l!V~3.G

?2~533

LAr;~

,",OVV[

,H""i~.,

V'4~C:;'54

DAC

rA~DR

li'e53f>

44(1!5~3

1St

t-10VVE

Vl01:)37

?205~3

LAC-It

MOVVF

Vl054P' .

Vl4(1!5~'5

DAC

TAOOR

,00'541

440533

1St

MOVVF

,,'''5

~

2

2205~3

LAC-

MOVVr

00154''3

04~St;6

OAr:

,",CTR

00:n44

44~533

IS~

Movvr

0054-5 22"''5154

MOVEA

LAC-

F'AflOR

00546

060555

OAC*

TADOR

00547

44055-4

IS~

F'ADOR

910550

440555

lSi

TAOOR

00551

440556-

ISl

MCTR

00,52

600545

JMP

MOVE

A

O01553

620533

JMP.

MOVVE

1lI0554

000000

rADOR

0

00555

021000"

TADOR

"

~(I!556

"'210000

HCTR

VI

ISUBROUTINE

TO

INrTULlrE

BINARY

PATTERN

00557

000000

INITPT 0

0056V1

140562

D~M

PT",

""0561

620557

JMP*

INITPT lEX

IT

tlI056?

"o0000

PT0 0

1lI0563

00NHll0 PT1

PI

"0564

000377

PTMSK

377

IS[T

AC

WITH

NA~H

CHARACTER

SUBROUTINE

00565

00000O

GETPTT

'"

0~566

2(i'lQl562

LAC

PT(A

leET PTe

~0567

040563

OAC

PT1 ISTORE

AT

PT1

ee'57f11

34~071

TAD

Kl

/INCREMENT

NUMBER

00571

50"'564

ANn

PT"'SK

/LIMJT

TO

8 BITS

"'0572

040562

OAC

PT0 ISTORE

AT

PTp!

00573

200563

LAC

PTl

IGET

PTl

~0574

~2C1!5~5

JMP

..

GETPTT

lEX

IT

ISUBROUTINE

TO

COMPARE

CeAC)

TO

CCCALL+l>,

00575

Pl0"'0"''''

CliCK

~

00576

040612

DAC

WCHK

ISTORE

AC

AT

CHK

00.,77

22Q\575

LAC"

rHr,K IGET

COMPARE

OATA

0060'"

74-~0(i'11

CMA

12'5

COMPLEMENT

IT

0"601

34~071

TAO

Kl ISET

UP

UNEQUAL

EXIT

0060?

440575

IS~

CHCI(

0060~

34(-\612

TAO

WCI-<i'(

IAOO

C(WCHK)

f'0APl4

7502o",

SrA!CLA

IEQUAL?

i~("605

60V!610

JMP

.+3

IND,

00606

440575

JS2

CHCK

IS£T

UP

EQUAL

EXIT.

EQUAL

~('I607

62"57.,

JMP*

CH(,K

IEQUAL

EX

IT.

"'0fl~

?0V'612

LAr

We>ll<;

IRESTOR(

Ar:

"'0t-l1

62tH;

75

JMP~

PiCK

IUNEOUAL

E.X

IT

,

00612

00000~

WCHK

'"

1005~3

MOVE=JMS

MovvE

.EJECT

PAGE

10

~'::TTP')

15ET BUFrER

AREA

SUI3

R

O:!T

I Nt

V'0613

~0~Vl00.

ST8r

fr'

Y,~614

1121(11533

MOVE

ICRlF

TO

BLOCK

A

~0615

000060

CR

00('16

0034P.l

BLOCKA

~0617

777776

-2

0121620

1"'~533

MOVE

ICRLF

TO

BLOCK

B

00621

001i'i06i'J

CR

00622

003513

RLoCKS

0062~

777776

-2

00624

100~33

MOVE

ICRLF

TO

BLOCK

C

00625

1211210060

CR

00626

003625

BLoCKC

00627

777-776

-2

00630

62V11613

JMP. STAr

lEX

IT

1210631

12100000

FBF3

(II

~063?

220631

LAC.

FeF3

IFILL

144

CHARACTER

BUFrER

006~3

12140636

DAC

.+3

IWITH 3

CHARACTERS

WHOSE

00634

440631

1St

FBF3 /t>iDRESS IS

SPECIFIED

A.T

MI635

1121

0

533

MOVE

1(1\LL+l

VlI0636

,

000000

1/1

00637

003403

BLOCK1

00640

777775

-3

00641

100533

'"lOvE

0121642

12J034Q13

BLOCKl

00(,43

003406

RLOCK1+3

00644

777673

-105

00645

10121533

MOVE

0121646

012134(/13

BLOC

Kl

0121647

003515

RLOCK2

00650

77767f},

-110

(/I(1'IA51

620631

JMP*

FB~3

0065::> 00P.0?0

FBALL

0

00653

1e~533

MOVE

IFILL

144

CHARACTER

BUFFER

~121654

0ft11516 A IWITH

ALL

PRINTAALE ASCII

~A655

AA34Q13

RLOCK1

ICHARACT(RS.

0~t>5n

7777"1

-77

"'~A57

1liH'IS;~3

MOVE

~066(1!

Ql01510

A

~(1't>61

~1i'~50?

BLOCK1+77

01'1662

7777f.7

-11

0066~

10v,r:;~3

MOVE

~0664

Ql0~4~3

BLOCK1

00665

1'10~51"i

RLOCK2

"o666

777670

-110

006('7

62(l16~2

JMP*

F8ALL

.EJECT

PAGE

11

1I:;TTP?

,"Ql67~

0000vW

F8TMP

"

00t,

7~

H~~533

/"lOVE

IfILL

144

CHARACTER

RUFFfR

~ef,7?

P?0~?i

PT[MP IWITH

DATA

IN

PTEMP

00~73

V'034()3

8LOC

K1

lAND

PTEM

P

1.

M~674

777776

-2

0~f.75

10~533

~OV£

00676

003403

BLOCK1

00677

0~34(115

RLOCK1+2

~0700

777672

-1~6

007211

100533

MOVE

0070?

003403

BLOCKl

00703

~03515

BLOCK2

0~704

777670

-110

007~5

62~670

JMP*

FBT"'IP

~070f,

00~0V,0

F'W334

e

00707

100533

MOVE

IFILL

144

CHARACTER

BUFFER

00710

0~14""

A33

W

P4

,WIHI

4

CHARACTER

ASR33

00

711

~03403

BLOC

Kl

IWORST

CASE

PRINTER

PATTERN

007

1?

777774

-4

0(i1!713

100533

MOVE

Pl0714

003403

ALOCK1

091715 0034917

RLOC

K

1+4

00716

777674

-1(1'4

00717

100533

MOVE

00720

003403

BLOCKl

00721

003515

8LOCK2

00722

777670

-110

00723

62'~7A6

JMP*

FW334

IEXIT

vH'P24

0000"'0

FW33S 0

00725

100533

MOVE

IFILL

144

CHARACTER

BUFFER

00726

001472

A33

WP

S /WITH ASR33

WORST

CASE

00727

003403

BLOC

Kl IPATTERN

WITH

INTERSPERSED

~~730

777770

-10

18LANKS.

~0731

100533

MOVE

00732

0034"'3

8LOCKl

~('I73~

Il!klI3413

RLOCK1-tl~

~Hn34

777700

-1~0

~0735

HH'I533

t-10VE

0073t'1 0034913

BLOCKl

00737

9!0~51~

ALnCK2

"~74~

777670

-110

~H.~741

6207?4

JMP* rW33S IEXIT

.EJECT

PAG[ .

~

lC,TTP2

~HJ742

r0~00(.11

F"

W

354

{11

r"'74:rl

1~Hlj533

MOVE

IFILL

RUFFER

wITH

ASR3C::

Vl0744

00

1

522

A35WP4

/WORST

CASF

PATTERN,

ee745

0034A3

BLOCK1

~074"

777774

-4

00747

100533

MOVE

1i10750

.0034e~

BLOCK1

00751

003407

PLOCK1+4

"'0752

777674

-104

00753

100533

MOVE

(1)0754

0034~3

BLOCK1

0"'755

00351t;

BLOCK2

00756

777670

-110

00757

620742

JMPo

F"w354

lEX

IT

00760

000000

F"W35S

0

kHP61

10~533

MOVE

IFILL

BUFFER

WITH

ASR35

00762

001506

A35WPS

IWORST

CASE

PATTERN

WITH

00763

0034~3

BlOCKl IINTERSprRSED

BLANKS,

00764

7.7777V!

-1°

00765

10~533

MOVE

00766

003403

BLOCKl

00767

P03413

BLOCK1+1P

00770

7771"0

-100

00771

100533

MOVE

00772

003403

BLOCKl

00773

P03515

RLOCK2

00774

777670

-110

00775

6201"0

JMPo

FW35S

IEXIT,

IPUNCH

LfADER

TRAILER SU8ROUTINE

00776

00"'000

PlTLR lil

~A777

HIJ0322 SETlOC

1-70

TO

LTRCTR

01000

001007

LTRCTR

0H'!01

777672

-106

0100?

20HH0

lAC

LOCOE

0100~

H~0376

JMS

PUNCH

IPUNCH

376

CODE

01004

441007

lSi!

LTRCTR

IDONF"?

~10Pt5

60HH

lI

2·

JMP

_"l

INO, REPFAT,

~1~Pt6

62~77t.

JMPo

PLTlR

IYES,

EX

IT

01"'07

~0NHHJ

LTRcTR 0

0101~

000376

LOCOE

376

011i'11

Pt0V10?0

RsyNC

0 ISYNC

REAOFR

SuBROUTI~E

~HV'11?

lA~3?2

SETLoe

1-145

TO

RSCTR

0101~

0010?f1

RSCTR

0HH4

7775r;7

-221

01015

1011

41

JMS

RRny

IWAIT

FOR

READER

NOT

BUSY,

01Pi16

75V1~01

CLA:CMA

~lPt17

040~~3

nAC

RguSY ISET

READER

BUSY

INDICATOR

0102il

10"'322

SETLOC

ISET

REAnER

SERVICE

Vll~21

001064

VCTR

IADORESS,

01022

~0H121

RSSERV

0102~

7003?2

KRA

ISTART

READ

01024

700042

ION

IENABLE

INTERRUPT

0102r;

621011

JMPo

RSYNC

01"'26

00vHH~~

RSCTR

PI

,EJECT

PAGE

13

1">TTP2

\~:

0?

7 7;:H'31?

RSSERV

"'Rq

/REAO

RUrFER,

SELECT

~fAT)ER.

~103V,

70V3;"?

;.,;:.'

t.,

:-A

1Ii'l;; 1

.~4~"''''?

TAO

,,~;,

0'

/ADO

MINUS

RU8r:JUT

~1~32

7502"'0

SrA!CLA

/RUBOUT?

"'1"'33

60

1042

JMP

•

+7

IND.

01(1134

14

006

3

DlM

RgUSY

ICLEAR

READER

BUSY.

01035

754O"O

CL,6,!CLL

01(IJ36

200064

LAC

LI~K

"'1037

,74001:0

RAL

IR£STORE

LINK.

0104~

2000115

LAC

AC

/RESTORE

AC,

"'1041

6200P0

JMP.

~

ITO

MAINLINE.

~1042

441026

IS~

RSCTR

1145

CHARACTERS

READ?

01043

601066

JMP

OUT

INO.

01044

7591040

HLT~CLA

IYES.

NO

SYNC

01045

100322

SETLOC

1-145

TO

RSCTR

01046

001026

RSCTR

01047 777557

-221

01V15P1

601066

JMP

OUT

ITQ

MAINLINE

"'1051

04P1065

INTSVC

DAC

AC

ISAVE

AC

0H'!52

740020

RAR

01053

040064

DAC

LINK

ISAVE

LINK

~1054

7004(IJ1 TSr IPUNCH/PRINTER?

01055

601061

JMP

•

+4

INO.

010

56

700402

TCF"

IYES.CLEAR

rLAG

01057

140056

OlM

PFlAG

ICLEAR

PF"LAG.

01060

601066

JI'1P

OUT

01P61

7003(l!1

KSr

IREADER?

01062

601065

JMP

• + 3 INO.ERROR.

(lJ1063 6211364 JMP. • + 1

01064

000000

VCTR

"

01"'65

740040

HLT

IUNEXPECTED

INTERRUPT

~H166

754~00

OUT

CLA!CLL

~H'67

?000~4

LAC

Ll

NK

0HH0

74P101VJ

RAL

IRESTORE

LINK

~1071

200065

LAC·

AC

IRESTORE

AC

01072

700042

IOt.j

lEN

ABLE

INTERRUPT

o

U?l7~

fl2~000

JMP. {iI

ITO

MAINLINE

·01074

0000910

P5TUP

~

IPUNCH

SET

UP

01@75

100322

SETLOC

15ET

DATA

ADDRESS

0107f1

001140

PAnOR

~1~77

00~4~1

8LOCKA

f'lHW

1005~3

,,",OVE

/5ET

BLOCK

LENGTH

01101

0000t;7

~lI(CNT

0110?

001137

PCTR

01

HJ~

777777

-1

~U

04

621074

J~p.

PSTUP

/EXIT

~lHJ5

000000

poeR 0

IPuNCH

DATA

CHAR

SUB.

V}110f1

221140

LAC. PAf10R /SET

DATA

"'1107

441140

1

S?

PADl!R

/lJPDATE

DATA

AnDRESS

P;11.1~

1~H'37tl

JMS

PU\iC>J /PUNCH/PRINT

DATA

~1111

6211~~

J~po

porR

lEX

IT

.EJECT

PAGE

14

l-;TTP?

0111?

12101i1121~0

PBLK

iii

IPUNCH

DATA

SLOCK.FULL

SPEED

01113

101e'l74

JMS

PSTUP

IDa

PUNCH

SET

UP

0.1114

HH105

JMS

PocR

ICO

PUNCH

CHARACTER

yfl,U.5

441137

Is~

pCTR

IALL

CHARACTERS

pUNCHED?

12I111f,

601114

JMP

.-2

INO.REPEAT

01117

621112

JMP

...

PBLK

IYES.£)(IT.

0112~

0000~0

PBLKR

~

IPUNCH

DATA

BLOCK.

STALLS.

~1121

1~1074

JMS

PSTUP

/00

PUNCH

SETUP

01122

11211273

JMS

DLrNT.P

IrlLl

DELAY

BLOCK

~1123

11210322

sETLOC

IDBlK

ADDRESS

To

OAp

01124

001136

DAp

01125

004~01

OBLK

01126

221136

LAC.

OAP

ICET

STALL

COUNT

01127

040023

DAC

DELAYM

ISTORE

AT

DELAYM

1211130

441136

ISr

OAP

IUPOATE

nAP

ADDRESS.

121

11

31

112103~3

DELAY

ISTAll.

1211132

1e1HI5

JMS

PDeR

ICO

PUNCH

CHARACTER

~1133

441137

IS~

PCTR

IAll

CHARACTERS

PUCNCHEO?

~1134

61211126

JMP

.-6

INO.REPEAT.

01135

6211:?0

JMP.

PBlKR

IY'S.EXJT

01136

00012100

DAP

121

01137

0000()1e

PCTR

Pi

01140

0000~0

PADOR

0

01141

1210000121

RRnY

121

I~H

IT

rOR

RE

ADER

NOT

BUSY

SUR.

01142

21210063

LAC

RBUSY

IrETCH R

BUSY

01143

7512121210

Si!A!CLA

18US"?

01144

61211142

JMP

.-2

IYES.

91145

621141

JMP*

RRDY

INO.ExIT.

01146

0001211210

RSTUP

0

IREADER

SETUP

SUBROUTINE.

01147

101141

JMS

RROY

IWAIT

rOR

READER

NOT

BUSY,

~1150

440'1163

IS~

RBUSY

ISET

REA~ER

BUSY.

01151

1003~2

SETLOC

ISET

DATA

ADDRESS.

V'l1152

01211204

RADDR

01153

0034~1

BLOCKA

01154

100533

MOvE

IsET

BLOCK

lENCTH

01155

0000r;7

~LKCNT

0111:)6

0012~r;

RBCTR

01157

777777

-1

01160

1400C:;4

D~M

FRRCTR

IClEAR

ERRoR

COUNTER.

01161

621146

JMP.

t1STUP

IEXIT

~1162

0~.0000

RDRLK

0

IREAD

DATA

BLOCK.FULL

SPEED.

0.11~3

101146

JMS

RSTUP

100

REAOV.R

SET

UP

Vl1164 10k'13?2 SETlOC

IS[T

REAnER

SERVICE

ADDRESS

121116C:;

V'l01064

VCTR

/TO

ROSRV

V'l1161'>

V'I{I!121?

ROSRV

01167

70~04?

ION

lEN

ABLE

INTERRUPT.

0117~

6211f-?

JMP.

RD~LK

lEX

IT

.EJECT

PAGE

15

1C:;TT

P2

~11

71

e000?i'

DDPUO~

0

IREAD

DATA

BLOCK.

STALLS.

0117'2

101.1116

JMS

(.:;~TLJ'>

100

READER

SETUP

~1173

10~3?2

SETLOC

ISET

REAnE.R

SEQV!c~

ApnRESS

~1174

001064

VCTR

ITO

RDRSRV.

~1175

~9!t20-6

RORSRV

01176-

10ti'3?2 sETLoe

ISfT

DELAY

BLOCK

ADOREss.

~11]7

0012F!3

DAR

,H2e0

004801

08LK

01i!01

.700842

ION

IENABlE

INTERRUPT.

IH20'2

6.21171

JMP.

RD8lKR

IEXIT.

~H

2-03 0000fl10

OAR

'"

~1204

000000

fUOOR

'"

01205

O'00000

RBCTR

'"

0120~

22t2.~3

RQRSRV

LAC.

DAR

IGET

STALL

COUNT

012"'7

040026

OAG

DELAYS

ISTORE

AT

DELAYS

0121~.

441203

IS~

DAR

IUPOATE

OAR.

01211

101254

JMS

OlMSR

1ST

All

~121?

221204

RDSRV

LAC·

RADDR

IGET

EXPECTED

DATA

"'1213

0412'0

DAC

S8

ISTORE

AT

SB

01214

441204

lSi!

RADDR

luROATE

ExPECH:o

DATA

ADDR.

01215

700312

KRR

IRE

AD

CHARACTER,

SELECT

READER

111?1f1

700322

KRA

01217

100575

JMS

CHCK

ITO

CHECK

IT.

0122O

000000

S8

0

01?21

601223

JMP

ERROR

IERROR.

01222

601240

JMP

RUDONE

10K.

~1?23

e'l4~0r;3

ERROR

DAC

ERRCR

ISTORE

8AO

CHARACTER.

01224

440054

lSi!

ERRCTR

1+1

TO

ERROR

COUNTER

~1?2'5

6~12~0

JMP

.+~

011'26

7500911

ClA~CMA

10rlO.

01227

O4"'054

OAC

ERRCTR

IRESTORE

ERRcTR

TO

7777.

01230

75Qt0(j14

LAS

IREAO

SWITCHES

v'1':5 j

5000&;2

ANn

C:;R~~SK

"1('32

7512P0 SNA!ClA IHAlT

ON

ERROR?(ACS3)

01233

601240

JMP

RUOONE

INO,

~1i?~4

20(1105 3

LAC

ERRCR

IYES.

GET

BAO

CHARACTER

~1;:3'}

74004~~

HLT

IERROR

HALT.

BAD

C~AP

IN

AC·

,',1?3t-

20122~

LAC

58

tJ.1237

74~040

HLT

IGOOO

CHARACTER

IN

AC.

111?4~

441?~5

RUDONE

1511

R9r.TR

IAll

DONE?

,Il?

41

601'Jf..f,

JMP

rUT INO.

TO

MAINLINE

i31242

20"'05

4

LAC

f>-lRCTR

IYES,

GET

ERROR

COUNT.

0124~

7412Q1~

SNA

IANY

ERRORS?

iH?44

741000

SKP

IND.

~1?45

140V'4V'

HlT

IHALT.

ERROR

COUNT

IN

AC,

~124(-,

754N~~

CLAlCLl.

.1!1247 14"'063

O~M

R8USY

ICLEAR

READER

BUSY.

,;\:.

?5P

20~0f.4

LAC

LINK

,~

j ?

'}

1

74{,~~'?

RAL

IRESTORE

lINK

'~1

?5?

?0~~~65

LAC

AC

/RESTORE

AC

"'1253

62~"'00

JMP*

P-

ITO

MAINLINE

.EJECT

PAGE

16

15

T

T"',

,

1.254

~000Ql0

DLM5R

'"

IREAOER

r·

E

i...A

Y

;A

1.

?t)"

?0~0?6

L A

\~

JEl!"S

ISUBRQUT!Nt

01?56

041271

OAC

RCTRl.

t1257

6212~0

JMP*

.+1

IH260

001261

.+1

01261

200041

LAC

"4Ill

01262

041272

DAC

RCTR8

01263

441272

15l

RCTRR

01264

601263

JMP

.-1

01265

441271

IS~

RCTRA

01266

6012C;7

JMP

.-7

01267

754000

ClA!CLL

0127{11

621254

JMP.

OLMSR

£'11271

090000

RCTRA

"

01?72

00"'IlI?0

RCTRB

PI

I.H273

IlI00000

DLCNTP

PI

ISUB

TO

rILL

DELAY

BLOCK.

~1274

100533

MOVE

15ET

BLOCK

LENGTH.

°12

75

0000';7

BLKCNT

01276

001317

OCTR

01277

777777

-1

~1300

100322

SETLOC

IUlLK

lOOR

TO

OAOOR

01301

001316

OADOR

1211302

004001

OBLK

01303

10~411

GNRNO

JM5

RAI\IG[N

ICET

RANOOM

NUMBER,

1211304

5000'55

AND

DLYMSK

IRE

MOVE

~XCESS

BITS

(111305

741200

5NA

10?

01306

"e1303

JMP

GNRNO

IYES.

GET

ANOTHER

NUMBER.

01307

740301

CMA

12'S

COMPLEMENT

IT

01310

34P'-071

TAl')

1<:1

:01311

061316

DAC.

OAOOR

ISTORE

IN

DELAY

BLOCK,

01312

441316

IS~

rlAnOR

IUPOAr A

DELAY

ADDRESS

01313

441317

IS~

('1CTR

IOONE?

01314

601303

JMP

GNR·NO

INO,

0

131

5 6

212

73

JMP. flLfNTP

IYES.EXIT,

01316

000000

DADDR

0

~1317

~0000!0

nCTR

'"

~132P

0000P'"

PSYNC

'"

01321

75?-0V1

CLA!C"1A

~1322

HH~37b

JMS

PU~CH

?1323

6213?0

JMP

o PSYNf

.EJECT

PAGE"

17

1'1324

"'1325

~1326

Vl1327

01330

01331

01332

01333

01334

0133

5

01336

01337

0134~

01341

121

1342

01

343

01344

0134'5

01346

01347

01350

01351

0

13

52

01353

01354

01355

01356

0

13

57

0136('1

(H361

0136?

01363

01

364

01365

01366

01367

~0?0~e

14~063

221324

~41332

100776

1013~~

~0A000

Hlt011

101162

100176

101141

600260

('10('1000

140063

221340

04

1

347

041352

100776

101320

0000"'0

101011

101162

0001210121

601351

0000~0

14(:l!12I63

100776

1013?0

101112

101('111

HH171

1011?~

101162

10(i11776

101141

60121260

/C:)NCi-<

TEST

NOPMAl

TFST

SEOUtNCE

NTST

!II

02

"--1

LAC-It

DAr:

JMS

JM~

JMS

JMP

P':'ll

SY

NT~T

NTSTA

PlTlR

PSYNC

RSYNC

RDBlK

PLTLR

RROY

CHAIN

IPUNCH

5TST

TESTS

SPECIAL

TEST

STSTA

STST8

STSTC

"

OiM

LAC·

OAe

("lAC

JMS

"

JMS

"

JMP

/COMBINED

TEST

CNTST

0

DiM

JMS

JHS

JMS

JMP

.

EJECT

RBUSY

STST

STSTA

STSle

PLTLR

PSyNC

RSYNC

ROAlK

STSTB

NORt-IAL

TEST

R8USY

PLTLR

PSYNC

P8LK

RSyNC

RDALKR

P8LKR

RDRLK

PLTlR

RROY

CHAIN

/CL£AR

READER

BUSY

ISELECT

P~NCH

MOOE

IPUNCH

LEAnER

/PUNC

H

SYNC

CHARACTER

IPUNCH

DATA

SLOCK

ISYNC

R;EAOER

IRt:AD

OAT

A,8LOCK

IPUNCH

TRAILER

IWAIT

fOR

READER

NOT

BUSY

ICHAIN

SEQUENCE

ICLEAR

READER

BUSY

ISELECT

PUNCH

MODE

/PUNCH

LEADER

IPUNCH

SyNC

CHARACTER

/PUNCH

DATA

ALOCK

ISYNC

READER

IREAD

DATA

BLOCK

IPUNCH

DATA

BLOC~

IGO

READ

AGAIN

SEQUENCE.

ICLEAR

READER

BUSY.

/PUNCH

u:

AOER

IPUNCH

SYNC

CHARACTER

IPUtrC;H

0.

T A

BLOCK

(NO

ST

ALL

S)

ISYNC

READER

IRE

AD

DATA

BLOCK

(STALLS)

/PUNCH

DATA

RLOCK

(STALLS)

IREAD

DATA

BLOCK

(NO

STALL)

IPUNCH

TRAILER

IWAIT

fOR

READER

NOT

8USY.

ICHAIN

•

PAGE"

1 8

15TTP?

ITyPE LINE

OF

;3

CHARACTERS

(NO

DELAy)

A1310

0000(110

TYPLN3

0

01371

140023

DlM

DELAYM

'lCLEM~

DE

LAY

~

0

13

12

2213

70 LAC·

TYPLN3

ICET

AND

STORE

DATA

ADDRESS.

01373

041376

DAe

.+3

01374

441370

IS~

TYPLN3

013115,

10e631

JMS

F"SF3

/GO

FILL

BUFF"E~

WITH

DATA

0137~

00Pl900

r

01371

HH401

JMS

TypE ITYPE

LINE

Of"

DATA

01400

621370

JMP. TyPLN3

IExIT.

ITYPE LINE

Of"

ASCII

PRINTABLE

CHARAcTER-S

01'401

000000

TYPE

0

01402

18~322

SElLoe

1-76

TO

TCTR

01403

0814P2

TCTR

(111404

777664

-114

01405

10611322

~ETLOC

10ATA

ADDRESS

TO

FETCH.

01406

901421

F(TeH

01407

003401

BLOCKA

0141"J

200023

TYPEA

LAC

nELAYM

01411

740200

SiA ISTALL?

01412

100333

DELAY

IYES.

01413

221421

LAC·

FETCH

IGET

CHARACTER

01414

100376

JMS

PUNCH

IPRINT

IT

(111415

441421

lSi!

FETCH

IUPDATE

DATA

AODpESS

01416

441422

IS~

rCTR

10ONE?

01417

601410

JMP

TYPEA

INO. REPEAT.

01420

6

21

401 JMP.

TYPE

IYES.

F:X

IT

01421

000000

FETCH

0

01422

000000

TCTR

0

01423

0000V10

ASCCN

0

01424

221423

LAC.

ASCCN

01425

041460

OAC

WASC

~142fo,

44141>3 !S2

AseCN

~1427

221423

LAC·

ASr.CN

01430

fl41461

DAC

SASC

01431

441423

IS1

A,SCCN

0143?

?014f,3

LAC:

K770~

(111433

5214~0

ANO.

WASC

~1434

746V120

RTR!CLL

0143'>

74?0?~

RTR

01436

742~P0

RTR

"'1437

101

4

46

JMS

r.Nv

0144~

4414f11

I52

SASC

01441

2014t-3

LAC

K770~

01442

74~0V11

("MA,

V1144~

S;214f,0

AND*

WASC

~1444

101446

JtoIS

CNV

01445

6214?3

JMP.

ASCCN

.EJECT

PAGE

19

1I)TTP?

"'.1446

Q!0~0V'l0

CNV

(i!

l1447

~41462

DAC

AS(",T

~'14

5IJ.

7420U3

PTL

0141)1

740010

RAL

01452

5014f14

AND

><0707

9.11453

341462

TAO

ASCT

~1454

501464

MFI

K0707

01455.

341465

TAO

1(6fA6P

01456

061461

DAC.

SAse

91457

62144-6

jMP.

CNV

0146tIJ

000000

WASe

0

01461

00QJ000

SAse

CiI

01462

LlI01i1000

AseT

iii

01463

007700

1<7100

7700

01464

~00107

1<0107

iii

7

iii

7

01465

11106060

K606111

606111

01466

000247

A33WP4

247

I'

01467

A00337

337

ILEFT

ARROW

01470

V'l01i13?7

327

1104

211471 001i1257

257

II

01472

000247

A33WPS

247

/1

01473

000240

240

ISP

'H474

000331

337

ILErT

ARROW

01475

000240

240

ISP

01476

000327

327

IW

01477

(,100240

240

ISP

0150111

00~257

"57

II

01501

1210024121

24(,1

ISP

01502

000241

A35WP4

247

I'

01583

00~333

333 I (

01504

000277

277

11

(,11505

000303

39J3

Ie

(A1506

00A247

A35WPS

247

I'

01507

000240

240

ISP

015HI

00(11333

333

I[

01511

(11

0 iii

240 240

ISP

IiIl1)12

00A277

271

11

1111513

000240

240

ISP

01514

900303

303

Ie

H151-=;

00~240

?40

ISP

~11)16

""0~301

A

301

01517

(1I0V'13P!2

~02

01520

0003(113

303

""1521

00~304

n

~04

~1522

0003(115

305

01523

001i1306

306

{tl1524

000307

G

301

011)25 001i1310

31~

V.15?6

00V'l311

311

.EJEcT

PAGE

20

15TTP2

01527

"'00312

.J

31::

~1530

000313

~13

V!15~1

000314

314

01532

000~1S;

M

315

01533

(il11J0.316

31fl

01534

000317

317

01535

000320

P

320

01536

000321

::21

01537

000322

322

01504i11

000323

S

~23

01541

000324

324

~1542

000325

'25

°15"3

080326.

V

~26

01544

000327

327

01545

00033O

:'30

~15"6

000331

y

331

01547

000332

332

01550

000260

260

(JI1551

"'00261

ONE

261

01552

000262

262

01553

"'00263

26~

01554

000264

F"OUR

1'64

011:)55

00"'265

?6C;

01556

000266

266

01557

000267

SEVEN

?6~

01560

000270

? 7

tc~

01561

000271

271

01562

"iUJ241

C241

241

01563

000242

242

01564

000243

243

01565

000244

C244

244

01566

O00245

245

01567

"'00246

246

"'1570

"'00247

C247

247

01571

00fl250

250

01572

000251

251

~~C;7:Z

000252

C2'52

252

1),1574

~0V'1?53

2C;~

\-'1575

~00254

254

~1576

0002'55

C255 25'1

"'1577

00(~25n

256

V'160P

0~0257

?~.,

11601

00027?

e272

'272

?16~2

~0"273

?7~

~16~3

~0e274

::>74

P'lMH

0~~275

C275

?7~

~1605

000::?7t-

'";76

'~160"

~00?77

::>77

111607

P003V'~

C300

~r'~

elbl~

0003~~

~3'

~1611

00~334

~34

• EJEC'7

"'loGE

21

l'1TTP?

01612

0011'33'5 C:335

~

.:

C;

?'1613

00C1336

33~

~1614

000337

"!-37

01615

00"'001

SLIOl

1

~1616

0000(1)2 2

01617

000004

A

~1620

"'00,010

10

0.1621

000020

20

0162'2

000040

40

(H623

000100

100

{/I1624 ,

000200

200

01625

000100

1':H1

01626

000040

40

i'1627

000020

20

01630

000010

10

~1631

000004

4

01632

000002

2

016,33

000376

SLID0

376

01634

000375

375

01635

000373

373

01636

000367

367

01637

000357

357

01640

000337

~37

016<41

000277

277

81-642

000177

177

A1643

000277

277

~1644

000337

337

01645

0003~7

357

01646

000367

367

01647

000373

373

01650

000375

37r;

01651

0040(1'13

CRTST

4003

ISP,

C

(1'11652

002240

2240

IR,SP

01653

002405

2405

IT,E

916'54

002324

2324

IS,T

~1655

000001

0001

lEND

CODE

~16156

004022

RMTST

4022

ISP,R

01657

001107

1107

I

I,

G

01660

001024

1024

IH,T

~1661

004015

40t5

ISP,M

I<H662 0001::>?

0122

IA,R

~1663

00"'711

~711

IG, I

01664

001640

1640

IN,SP

01665

002405

1'405

IT,

E

~1666

0023~4

2324

15,T

01667

000001

0001

lEND

COOE

.EJECT

PAGE

('2

1"'TTP2

01670

1313413;:>3

SPTST

4023

ISP.S

01671

f?-020\.l'1

20131

/P.A

~H672

0e03e5

0305

jetE

~1673

0040?4

4024

ISP,T

01674

"'0~523

052:5

IE,S

131675

002400

2400

IT

01676

"'0~100

0100

lEND

CoDE

131677

"'04014

U"TST

4014

ISP,L

01700

000640

0640

/F,SP

131701

002405

24135

IT,E

131702

002324

2324

IS,T

131103 1'100001 13001 lEND

CODE

131704

0048~3

CHRTST

4fJ.03

/SP,c

Iill705

001001

U'01

IH,A

01706

002201

2201

IR,A

01707

00"'324

13324

leT

A171'"

000522

0522

IE,R

01711

2104024

4024

ISP,T

01112

0005?3

0523

IE.S

01713

0024?3

2423

IT.

S

01714

000001

0001

lEND

CODE

01715

ee40?7

WCPTST

4027

ISP,W

131716

0017')?

1722

IO,R

"11717

002324

23?4

/S,T

01720

0040"'3

4003

ISP,C

01721

000123

0123

lA,S

01722

000540

0540

IE,

SP

01723

002001

2001

IP,A

13

1724

~0?424

2424

IT,T

"'1725

0e05?2

0522

IE,R

~172'"

001640

1640

IN,SP

131727

0024~5

2405

IT.

E

0173~

00;:>3,)4

23')4

IS,T

01731

1il00015 0liH5

ICR

131732

000012

0012

ILF

0173~

000"''''1 A0Al

lEND

CODE

~1734

~0V"015

KMSG1

171015

leR

,!j17~"i

V"017l01?

0012

ILF

01736

0040(?11

4001

ISP,A

~1737

A0?3?2

;:>322

/S.R

01740

1'106363

6363

13.3

01741

~0C:;7t-3

5763

11.3

"'1742

001'!5":0

6540

15,SP

01743

"'013~1

1331

IK'Y

~1744

00~2Q'4

0204

18.0

1i'174'5

~"'4~24

4024

ISP,T

~1746

00<'1523

~523

IE,s

i"1747

",o2400

2400

IT

1'1175'"

01315V1;1!

15"'0

ICR

131751

A012~(i\

1200

IlF

"'171:)2 A001"'''' 01A0

IE

NO

CODE

.EJECT

pAGE

23

l':·TTp?

IK""SG2. TYPE: PRESS A

KEY

01753

"'00015

K"1SG2

e'e1_ 5 ICP

11754

00.0012

V;;H

'2

ILF

\Ill

755

9'040?0

4e?0

ISP,P

01756

002205

22~5

IR'E

"'1757

~02323

2323

IS,S

0176~

0040~1

40A1

ISP,A,

01761

004013

4013

ISp,K

"'1762

000531'

0531

IE,y

01763

005600

r;600

I.

01764

001500

15et0

ICR

01765

0012010

1209

ILF

01766

000100

0100

lEND

CODE

01767

000015

KMSG3

0015

ICR

01770

000012

0012

IlF"

01771

004005

4005

ISP,E

01772

000310

0310

IC,H

0177~

"'01740

1740

IO,SP

01774

002405

24~5

IT,E

IH775

011'2324

2324

IS,T

01776

000015

KMSG3A

0015

ICR

01777

000012

0012

ILF"

V!2000

004003

4003

ISP,C

02001

00HlCil1

1001

IH,.

020102

002201

22011

IR,A

0?003

000324

0324

IC,T

02004

00~5?2

11l5?2

IE,R

0217105

002340

2340

IS,P

02006

001305

1305

11<,[

02007

003Hl!r;

31~5

ly,E

02010

000440

0440

ID,SP

02011

0027j1

2711

IW, I

02012

001414

1414

IL,L

1)12013

0040012

4002

ISP,B

1A2014 00Q1540

"540

IE.

SP

0201~

002431

2431

IT.

Y

02016

1fl0?~~5

?005

IP,E

~2017

V'12I04">

6 0<456

10,

•

~2020

~0001"i

0015

leR

Vl2~?1

00~(lI12

0012

ILF

Pi?022

"'04"'??

4022

ISP,R

02023

00?502

2502

IU.S

0?024

0017?5

1725

IO,U

02e25

(110244121

2440

IT,

SP

1112e2f.

V'00516

~516

IE.

N

07027

~004:?3

0423

10.S

.EJECT

PAGE

24

l';TTP?

Vl2Vl30

~?4~22

4022

ISP.R

"'2

01

31

~017?5

17

25

IO,U

02\'132

002

4

1:

2411

IT,

I

02.033

0016~?

1605

IN'E

~2"34

ee56~0

5600

I.

0203c:; 0015(110

151210

leR

0?036

0012~0

12Q10

IlF

02037

0015V'0

15~0

ICR

0204111

0012ep

12P0

Ill="

02041

(1100100 fJ100

lEND

CODE

~2042

00Y':(?I15

KMSG4

0015

ICR

02043

000012

0012

ILF"

012044

000012

0012

ILF'

02"'45

P04017

4017

/SP.0

"'2\7146

00~324

121324

IC.T

(}I2047

000114

0114

IA,l

"'"050

~040(iJ5

4005

15P.f

02051

0021?5

2125

IO.U

PI????

12101126

1126

I I , V

020153 V'00114 O114

IA,L

020'.54

0100516

0516

IE,N

Vl205r;

002440

244O

IT,SP

CA20r;f,

Pl0?40r;

2405

/T.E

~20r;7

00?3?4

2324

15,T

Vl2V'1MlI

000015

"'015

ICR

02061

0000(111

0001

lEND

CODE

0?062

000015

KMSG5

0015

ICR

02063

000012

01012

ILF

"'2064

004(1140

OCTEOV

4040

0?(JI65 CAV!4kH0

4040

0?06tl

0100015

0015

leR

~2067

",(II~012

01012

/LF

02~7'"

0~r~Q!1

010011

lEND

CODE

.EJECT

PAGE

25 15TTP2

.~

~71

10li16j3

PRr,e

JMS

<::

r

~

e-

/SET

UP

gUffER

AREA

0 'lt7?

lV'032?

SETLoe

IINITIAL

ROUTINE

AnDRESS

V'I

11'73

?'0"'0?0

KSTART

ITO

KSTART

074

?02076

P0TS0

"

07'5

6~e?;t3

JMP

SRS£T

IGO

GET

STARTED

ICARRIAGf

RETLJRN

n:ST

02076

0000t"0

paTSe

0

02077

00~131

P0TSl

9121011

100361

JHS

CRlf

ICRLf

02101

777776

-2

ITWICE

0210?

190451

JHS

TYPSTG

IPRINT

T£ST

T lTLE

02103

0016'31

CRTST

02UJ4

10~361

JMS

CRLr ICRLf

02105

777776

-2

ITWICE

02116

,O0'070

LAC

C334

IGET

tt\"

CODE

021''1

100376

JMS

PUNCH

IPRINT

IT

0211'

200077

LAC

Mill

02111

040045

DAC

U'it""'P

1-73

TO

UTEMP

02112

44~045

CRTSTA.

152

IHE

M.P

IALL

DONE?

02113

7410'0

SKP

INO.

02114

600260

JMP

CHA!" IYES.

CHAIN

0'115

2'00045

CRTSTS

LAC

UTEMP

0211f1

04P046

OAC

UTfMPl

IC<UTEMP)

TO

UTEMP1.

°2

117

2°0066

LAC

SPACE

15ET "SPACE"

CODE

02120

100376

JMS

PUNCH

IPRINT

IT.

O2121

440046

ISr

UTfMPl

ISPACEO

pER

C(UTEMP1)?

02122

t.02117

JMP

.-3

INO.

sPACE

AGAIN.

02123

200060

LAC

CR

IYES.

GET

nCR"

CODE

02124

100376

JMS

PUNCI-J

IPRINT IT

02125

100376

JMS

PUNC'"

IDUMMY

CYCLE.

02126

200067

LAC

c257

IGET

"I"

CODE

02127

10"~16

JMS

PU'./CH

IPRINT

IT

?21.3V'

~~?112

JMp

CtHSTA

.EJECT

PAGE

?6

1'5

TT

p?

/R!GHT

~Akr.I"J

TEST

~2131

CiHW

0

(71

1

P0TS1

~213?

0021t.3

peTS?

02133

100361

.)'"

c:;

CRLF

ICRLF"

02134

777776

-2

ITWICE

~2135

100451

J/"IS

TYPSTG

IPRINT

TEST

TITLE

~2136

001656

!::"'ITST

"'2137

11l10~61

~'MS

CRLI='

ICRLF'

fn?140

777776

-2

ITWICE

02141

?00074

LA::

"'16.

1-14

TO

UTEMP

02142

04004'5

')AC

UTEMP

~2143

100451

RMTSTA

..;p.lS

TYPSTG

/PRINT

"----1"

02144

002146

,+2

02145

602152

JMP

.+5

~2146

00'5'5'55

:"555

02147

0055'55

C::S55

02150

0011~0

1100

~2151

000HHl

?1~~

?2152

44"'04'5

yS1

(!TEMP

IrONE

14

TIMES?

~21';3

602143

~MP

RMrSTA

I~'

d.

REPEAT

~2154

100451

JMS

TYPSTG

1\

..

~

S . PRINT

"-I-

n

1i'2155

002157

•

+?

02156

60?162

J"'I

P •

+4

~2157

005511

5511

~2160

"'0550li'!

S:;5~0

{l!2161

000H'I0

~10e

02162

6002f0

JMP

CHAIN

ICHAIN

.EJECT

PAGE

27

lSTTP;?

ISPACE

TEST

021f3

~011l(1~2

P0TS2 ?

.~2164

00?2~0

P0TS3

12165

100361

JMS

CRLF

ICRLF

P?1f,fI

777776

-2

ITWICE

02167

1004?1.

JMS

TYPSTG

/PRYNT

TEST

TITLE

021 70

001670

SPTST

~21.71

100361

JMS

CRlF

/c~r

02172

717776

-2

/TWICE

.

°21

73

20~075

LAC

M

...

'1-36

TO

UTEM?

02174

040045

OAC

UT£MP

02175

100451

SPTSTA

JMS

TYPSTG

IPRINT\,SP

02176

0022(110

.+2

02177

6022

..

02

JMP

.+3

0?200

003440

3440

1"\n.SP

02201

000-"01

0001

IENO

CODE

022~~

44Q04S

IS~

UTEMP

IOONE

36 TIMES?

02203

602175

JMP

SPTSTA

IN~.

00 IT

AGAIN

02204

200075

LAC

M44

02205

040045

OAC

UTOIP

1-36

TO

UTEMP

02206

200072

LAC

1'41

IGET

-1

02207

040046

SPTSTS

OAC

UTEMP1

lAC

TO

UTEMPl

02210

040047

DAC

UTEM

P2 lAND

UTE'MP:?

02211

200060

LAC

CR

IGET

nCR"

CODE

02212

100376

JMS

PUNCH

IPRINT IT

02213

100376

JMS

PUNCH

IDUMMY

CYCLE

02214

200066

LAC

SPACE

IGET "SPACE"

CODE

021>15

100376

JMS

PUNCH

IpRINT

IT

02216

440047

ISl

UTEMP2

IOONE

SPACING?

02217

602214

JMP

.-3

INO.REPEAT.

02220

200067

LAC

C257

IYES.GET "l"COOE

02221

1091376

JMS

PUNCH

IPRINT IT

V12222

44~045

ISr

UTFMP

IOONE

36

TYM[S1

~222~

741000

SKP

IND.

~2?24

600260

JMP

CHAIN

lyEs.

CHAIN

02225

200073

LAC

1'12

1-2

TO

AC

??'22f

340C1146

TAO

UTFMPl

IADO

C{UTEMP1)

02227

602207

JMP

SPTSTB

.EJECT

PAr,E

2'8

l';TTP~

ILINE

FEED

TEST

0?23(l1

?:0~r.03

P0TS3 3

02231

~0?21:i4

P0TS4

02232

10?-361

JMS

CRU"

02233

777776

-2

V!2234

10P451

JMS

T'fFSTG

~2235

?l1677

U"TST

Vl2?36

10V'361

JMS

CRU"

02237

777776

-2

1i'l224P'

700076

.LAC

~110

02241

"'4"'045

OAC

UTEMP

1-72

TO

UTEMP

02242

200070

LFTSTA

LAC

C334 ICET

"\"

CODE

02243

10A376

JMS

PUNCH

IPR}NT

IT

0

22

44

200061

LAC

LJ:"

ICET

tllr"

CODE

02?45

100376

JMS

PUNCll

IPRYNT

IT

07246

440045

IS;Z

UTFMP

IDONE?

02247

741000

SKP

INO.

02250

6'H'!260

JMP

CHAIN

IYES.

CHAIN

022'51

HH~350

JMS

DLCNT

IDFLAY

COUNT

CENERATE.

~2252

10"'333

DELAY

IU-LAY

0?253

60?2

42

JMP

LFTSTA

.EJECT

PAGE

?9

F'TTP2

~?254

0I00~W4

P(JTS4 4

Vi??!?")

"'''\)267

P~TSs

:,

')

2

')A

10

0

3"1

JMS

ri:i!

F ICRLF

0??'57

777776

-2

ITh1C[

02260

10(H51

JMS

TYPSTG

/PRINT

TT

TLE

02261

00J

704

CHRTST

02262

100361

JMS

CRLF

ICRLf"

02263

777776

-2

/TWICE

02264

101370

JMS

TYPLN3

/PRINT

LINE

OF

ABC

02265

001

516 A

~2266

600260

JMp

CHAIN

ICHAIN

02267

000005

P0TS5 5

02270

002274

P0TS6

02271

101370

JMS

TYPLN3

IPRINT

LtNE

Of"

DEr

02272

0015?1

0

02273

600260

JHp

CHAIN

02274

000006

P0TS6

6

02275

002301

P0TS7

1/12'276

101370

JMS

TYPLN3

IPRINT LINE

or

GHI

02?77

001524

G

1112300

600260

JHP

CHAIN

02301

000007

P0TS7 7

0230~

00:?3~6

P0TS10

02303

UH370

JMS

TYPLN3

,PRINT

LINE

OF

JKL

02304

0'!11527 J

02305

600260

JMP

CHAIN

02306

000010

P0TS10

10

02307

002313

P0TSll

0?310

101370

JMS

TYPLN3

,PRINT

LINE

Of"

MNO

02311

001'532

M

02312

600260

JMP

CHAIN

02313

000011

P0TS1l

11

02314

002320

P0TS12

02315

101370

JMS

TYPLN3

IPR}NT LINE

OF

PQR

02316

001535

P

02317

6002t.0

JMP

CHAIN

~232P1

000012

P0TS12

12

02321

91023?5

P0TS13

02322

101370

JMS

TYPLN3

/PRINT LINE

OF'

STU

0?'32~

0.01540 S

02324

fl0~26~

JMiJ

CHAIN

~232!?

~00013

p0.TS13

13

0232f1

00233?

P0TS14

02327

101370

JMS

TYPLN3

/PRINT

LINE

OF'

vwx

~233~

~01~43

V

~~:?331

fl0~2MI

JMP

CHAIN

02332

00~014

P0TS14

14

0;>333

~e;;>337

P0TS15

1~2334

10.1370

JMS

TYPLN3

/PRrp."r

LINE

OF'

YI0

~2~3r;

0!01S;46

y

0.2336 60V12f10

JMP

CHAIN

.EJErT

P

A.

r

~

.~

~.)

1I':TTP?

i'2"l,!-

?0V1015 P0TS15

:5

V'?34P

~0?344

P0TS16

02341

H~137e

JMS

TYPLN3

/pr:,INT

LINE

OF

123

~2342

~'H5r;1

ONE

0234~

600260

JMP

CHAIN

02344

00NH6

P0TS16

16

0234C:

P.0?3iSl

P0TS17

"2346

le137e1

JMS

TVPi...~·3

IPRYNT

Lr

NC:

or

456

02347

~015'54

FOUR

~?35V

600260

JMP

CHAIN

~:?351

M"Pl017

P0TS17

17

"2~'52

~0:?356

P0TS20

~2353

10137Pl

JMS

TYPLN3

/PRINT

LINE

or

789

02354

~01557

SEVEN

"?355

60~260

JMP

rHAI\

~2356

~e"020

P0TS20 20

~2357

00;;>363

P0TS21

~236P

1~1370

JMS

TYpL

....

3 IPRINT LINE

OF!".

e2361

001562

C241

"2362

"""'2f.0

JMp

CrlAI"

02363

"'0~021

PATS21 21

02364

P0?370

P"TS22

~236~

1~1370

JMC:;

TYPLN3

/PRINT

LTNF

OF

$X&

~;;>:t:6t-

~01565

C244

~?36~

~~0260

JMp

CHAI~

~2~7p

P~(II0?2

P0TS22

('2

~2371

0~2375

P0TS23

02372

1"5.1370

JMS

TYFLN3

IPRINT

LINf

OF'

( )

~2373

001570

C

24

7

~?~74

6~i'::?A0

JMp

CHAI~

\Il

c

375

~~~~?3

P0TS23

23

~:?37~

P~?4P2

P0TS24

"237"'

101370

JMS

TYPlN3

IPRINT LINt.

OF

.. + ,

~240r

P~1'573

C252

~2481

~0~2(-0

JMp

rHAIN

V'/40?

~e~~?4

P0TS24

24

~?4r~

~V::>4v'7

peTS2?

il?<104

1?1370

JMS

T \ P L

..

..:1:

IPRINT

LINr

JF"

-·1

"?4p'C:;

~~157fl

C255

024"t-

t'k),{"?HI

JMp

(,;.<q,

~?4~7

?M~V'?"

P0TS25

25

~'?41

?

()02414

P0TS26

.~?

411

1~~370

JMS

Tyi:)l~3

/PRINT LINE

or

: ; <

0;:41?

("V'

161'

1 C2 72

;'?41~

f.002f~

JMp

('HAI~

~'"

41.!

,"'~'

pi

VI?

fl

P0TS26

'26

\12 4

1"

f'0?4;?1

peTS27

02

41t<

1e,137~

JMS

TYPLN3

/PRINT

LINE

OF

=>1

~'?41

-:

?~1t'04

(':275

,'.)

4"2

f'

I"

~~'?

f', r

JM~

;'"141'

.fJEeT

PAGE

31

lC::;TTD?

l.2421

0000?7

P0TS27

27

??42?

00?4?6

P0TS3~

~242~

101370

Jt-lt:;

TYPLN3

IPRINT LINES

OF

~(\

02424

001607

C300

0?425

600260

JMD

CHAI~

0242~

000030

P0TS30

30

02427

902433

P0TS31

02430

HH370

JMS

TYPLN3

IPRI~T

LYNEs·,or

)'t

AND

LEFT

ARROW.

0243'1

e01612

C335

02432

6002MIJ

JMp

CHAIN

02433

00Pl.031 P0TS31 31

02434

002441

P0TS32

02435

100652

JMS

F"8ALL

/PRtNT LINE

OF

ALL

CHARACTERS

02436

140023

DiM

f'ELAYto1

02437

101401

JMS

TYPE

02440

600260

JHP

CHAIN

02441

000032

P0T532

32

02442

002447

P0T533

02443

100652

JMS

F94LL /PRINT LINE

OF

ALL

CHARACTERS.

02444

100350

JMS

DLCNT

IFIXED

DELAY

BETWEEN

02445

101401

JMS

TYPE

ICHAR

AC

TE:R5

02446

6

00

260

JMP

CHAIN

02447

00t1l033

P0T533

33

02450

002466

P0TS34

IPRINT 6 LINES

OF

ASR33

WORST

CASE

PATTERN.

NO

DELAY

02451

100361

JMS

rRLF ICRLF

02452

77777f>

-2

/TWICE

02453

100451

JMS

TYPSTG

IPRINT TITLE

02454

001715

WCPTST

0?455

10Q1706

JMS

Fioi334

/PATTERN

TO

BUFFER

02456

140023

DiM

OELAYM

10

TO

OELAYM

02457

100322

SETLoe

1-6

TO

eTRA

0246e

000050

eTRA

02461

777772

-6

02462

1014P11

JMS

TYPE

ITY?[

LINE

0246~

44005~

IS?

eTRA

/ALl

LIN[S

TyPED?

~?464

602462

JMP

IND. REPrAT

~?465

600260

Jt'lP

CHAIN

IYES.

CHAIN

.[JECr

p"GE

':?

11)TTP2

?246£>

00~Q)34

P0TS34

34

~2467

~Q!?501

P0TS35

IPRINT 6 LINES

OV

ASR;n

wORST

CASE

PATTERN,

FIXED

STALL

BETwEEN

CHARS,

~247Vt

100706

JMS

VW334

IPATTERN

TO

8UrFER

02471

100322

S[TLDC

1-6

TO

CTRA

02472

Ql00050

CTRA

~2473

777772

-6

~2474

100350

JMS

OLCNT

IGENERATE

DELAY

COU~T

02475

101401

JHS

TYPE

ITYPF LINE

02476

440050

ISe

CTRA

IALL LINES

TYPED?

02477

60 2474

JMP

,-3

IND.

REPF:AT.

~2500

60V'1260

JMP

CHAIN

IYES.

CHAIN

02501

0000~5

P0TS35 35

02502

002514

P0TS36

IPRI~T

6 LINES

0;:-

ASR35

WORST

CASE

PATTERN.

NO

DELAY

02503

100742

JMS

r,.~54

IPATTERN

TO

BUFFER

0?504

14el0?3

DtP1

nEl~YM

10

TO

DELAYM

02505

HH1322

SETLDC

1-6

TO

CTRA

"',;)-;11.!6

001'1050

CTRA

02507

777772

-6

02510

101401

JMS

TYPE

ITYPE LINE.

02511

44"'050

IS~

eH'.

IALL LINES TyPED?

~2512

(-'0?t;H'

J~p

.-~

IND.

REPF:AT

0251~

f,002f-0

JMP

CHAtl\;

IYES,

CHAIN

~2514

00"'0~6

P0TS36

36

02'515

777777

IPRINT 6 LINES

OF

ASR3'5

WORST

CASE

pATTERN. FIXED

STALL

BETWEEN

CHARS,

0251

6

1~~742

JMS

r~~54

IPATTERN

TO

RUFrER

02517

HHB22

SETlOC

1-

6

TO

CTRA

~?'52V'

00"'05ft'1

CTRA

02521

777772

-6

"21j??

10t113r;e

JMS

[lLr~T

IGENERATE

DELAY

COUNT

~2r;23

101401

JMS

TyPE ITyPF

LINE

a2524

44V'l050

lS~

rTRA

IALl

LINrS

TYPED?

~2t;?C;

fl0?'5?2

JMP

.

-~

INO,

REPF'AT

~~?

~

2

f.

6 0 (i'2flPl

JMP

r-H.IN

IYES.

CHAIN

• f

JEe

i

PAGE

33

1~TTP2

IPROGRAM

1.

PUNCH

FU~CTIOt-.;

TEST

~2?27

100322

PRG1

SETL:JC

/5ET

INTERRUPT

SERVICE

/',253111

000.~~2

2

IADDRE5S

Tn

INTSVS

02531

001051

INTSVC

02532

1003?2

SETlOC ISET

BLOCK

COUNT

Tn

02533

02100'57

BLKCNT

1-256.

-02534

777408

-400

~25

3'5

HJ0_322

SETLae

!INITIAL

ROU~lNE

AODRESS

11121536

00f10_?0

KSTART

ITO

KSTART

02537

002541

P1T0

~254'"

600?33

JMP

'SRSET ICET

STARTED

IROUTINE0

IPUNCH

AND

READ

CHECK

8l0CK

or

ALL

,,'S.

21254_1

210021021

Pi

Te 0

02542

0025'52

P1Tl

A2543

143401

DlM

BLOCK

A

10

TO

BLOCKA

1lI2544

1210533

MOVE

IfIll

BurfER

~2545

0034

01

BLOCKA

02546

~03402

BLOCKA

+1

02547

777401

-377

e255~

1211324

JMS

NTST

ICO

TO

NORMAL

TEST

02551

HH112

JMS

PBlK

luSE

THIS

CALL.

IROUTINE

1.

IPUNCH

AND

READ

CHECK

RlOCK

or

CHANNEL

1-

212552

fiH110001

PiTt

1

02553

0212564 P1T2

02554

14341111

02M

RLOCKA

02555

443401

lSi!

RLOCKA

11

TO

BLOCKA

212556

121111533

MOVE

IrIlL

RUFFrR

02557

0213401

BLOCK

A

02560

0034212

BLOCKA+l

02561

777401

;..377

~2562

101374

JMS

lliTST

IGO

TO

NORMAL

TEST.

02563

1211112

JMS

PBLK

/USE THIS CALL.

IROuTtNE

2.

IPUNCH

AND

READ

CHECH

BLOCH

OF"

CHANNEL

2.

02564

~0~eA2

P1T2 2

02'565

002577

P1T3

02566

1003?2

SETLOC

12

TO

BLOCKA

02567

0034(1)1

BLOCK

A

021<;7V'

~0~0Ctl2

?

02'571

100533

MOVE

IFILL

BUFFER

02572

f'!034V"

1

BLOCKA

1712'573

~03402

RLOCKA+l

02574

7774"'1

-377

f'!2575

1013?4

JMS

NTST

IGO

TO

NORMAL

T£S

T .

~2'576

101112

JMS

PBLK

IUSE THIS

CAll

.EJECT

PAG[

'4

1

c,

Y T

P?

IROUTINE

3.

IPUNCH

AND

READ

rHECK

RLOCH

OF

CHANNEL

3.

~2577

0130003

P1T3

3

02M!l0

002612

P1T4

02601

1130322

SETLOC

14

TO

BLOCt<A

0,2602 0133401

BLOCKA

~26f33

01300V14

4

(1)2604

100.533

MOvE

IFILL

BUFFER

02605

0f334Vll

BLOCKA

02606

0034''''2 BLOCKA+l

0126137

7774011

'-377

0261") 1131.324

JMS

NTST

IGO

TO

NORMAL

TEST

026U

101112

JMS

PBLK

IUSE

nqS

CALL

IROUTINE 4

IPUNCH

AND

READ

rHFC~

ALOCK

OF

CHANNEL

4.

132612

0eJ0~Vl4

P1T4 4

02613

002625

P1T5

02614

100322

SETLOC

110

TO

8LOCKA

02615

0034C1!l

8LOCKA

02616

01210v)1121

10

02617

1130533

MOVE

~2620'

Vl03401

BLOCKA

0?f>21

00::40.2

RLOCKA+l

02622

7774(1)1

-377

02fl23

101324

JMS

NTST

/GO

TO

NORMAL

TEST

02624

101112

JMS

P8LK

fuSE

THIS

CALL

IROUTINE

5.

IPUNCH

AND

READ

CHECK

ALOCK

OF

CHANNEL

5.

02625

0.00005

PiTS

..,

~?626

002640

P1T6

02627

1003?2

SETLoe

120

TO

BLOCKA

026~0

00.'~4Vll

BLnCKA

Vl2631

"'00V1?~

?0

02632

10~5::3

~OVE

IFILL

BUFFER

0;;>633

00;)401

BLOCKA

~1?

A~

4

\110340?

ALOCI<A+l

>~?

,.<~

c:.,

777401

-377

v12b36

101~"')4

JMS

NTST

/Go

TO

NOR~AL

TEST

~?6~7

101112

JMS

PBLK

fUSE THIS

CALL

.EJECT

::L-

f

1:";

1,~'-iUT;'

(

, :-' I

"1

C~-

--

-Cit :

~

A"'"

\f

~

..

L.

6

,-

-

~.

--

':. " "1' l

~(oJ,

~

....

~

b

-

·4'

ee~6C:)

P1 T7

.'!

--

4?

~7.?:t?? ~ETL.0C:

/4?t

TO

8l.-0CKA

"'264~

r0~4p:

t<l()Ci(~

02644

@0P040

40

02645

109'533

"'OvE

IFILL

BUFFER

22646

'034P1

BLOCKA

92647

e034~2

8LOCKA+l

V265~

7774@1

-371

02651

H~-:'

324

JMS

~TST

IGO

TO

NORMAL

TEST.

t1

26S;2

101112

JMS

PSLI(

fUSE

THIS

CALL.

/ROUTINE 1

/PUNCH

AND

~fA~

C

...

£::;

....

QLCCK

Or

C~A~NfL

7.

l3l2653

0i""H~

7 P1 T7 1

t2654

002666

PiT10

02655

180322

SETLOe

1100

TO

BLOCKA.

02656

~0~401

8LOCKA

i'2657

1'180100

100

~2660

10P533

t-40vE

IrlLL

BUFFE'R

02661

0034@1

BlOCKA

~2662

"'034"'2 BLOCK'''1

"2663

777401

-377

~2664

101324

JMS

NTST

ICO

TO

NORMAL

TEST.

i!266C)

191112

JMS

P8LK

IUSE

THIS

CALL.

IROUTINE10.

IPUNCH

ANO

REAl"'

CHECI(

8LOCI<

or

CHANNEL

8.

??66~

Pl0~elp

P1T10

10

02667

002711

Pi

T

l1

02670

100322

SEllOC

1200

TO

~LOCKA

?2671

0..,:t4Pl

8LOCKA

~2~72

(,2'~2~~

?0~

~2673

1005~~

'-40V£

IfILL

BurrER

.'267.

110:.H~t

RL(lCKA

.1?1)

7S

P034r2

~lOCKA+l

~2f.7~

7774911

-37

1

~2~""

1013;;4

JMS

\

-;

S1

/GO

TO

NOR~AL

TEST

~2'9P

1~11~?

.JMS

P9LK

IUSE

T~IS

CALL.

IRI')UTINf

11

,PUNCH

AND

'1£ ..... rHrc"

.;lrr'"

or:

SLIDING

~ND

PATTERN,

~27Q11

~~\'rl1

P1 T

l1

11

t'?7A2

~0?71C;

P1

T

l?

.1?

7A3

1"'rl;~3

MOVE

If:'

lL

L

RlIrrrR

I<IITH

~77\H

P.~1('1;

SLIDl

/SLIDING 1

PATTERN.

~270C:;

"'Ql34~1

~lOCKA

k~

2"

7~6

7777f<?

-16

."A?7f,7

1

~,~.,.~

~

,,",OVE

~2"7H~

~W1~4r,

RLOCKA

~?71'

QI~~4'7

ALOCKA+l"

~2712

77741b

-362

,'211

~

,

~

1

~(.?

4

JMC;

~T~"

IGO

To

N(H~t-AAL

TE

Sf

~?"14

lPl1i;)

J~S

p~.

1\

fUSE

THl~

('All

; r

JE

(' T

PAGE

36

l')TTP?

IROUTINE 12

IPUNCH

AND

READ

CHECK

~LOCI(

elF

SLIDING o PATTERN,

02

7

1'5

000012

P1 T

12

02716

002731- P1T13

~~717

100533

MOVE

IFILL

BUFfER

WIT~

"272~

001633

Sl't

00

/SLIOING "

PATTfRN

0272:

003401

8LOCKA

~2722

777'762

-16

~2723

10~533

MOVE

02724

003401

BLOCKA

0272~

003417

BLOCKA+16

CJJ272t.

777416

-362

02727

101324

JMS

NTST

IGO

TO

NORMAL

TEST

02730

101112

J"MS

P8LK

IUSE THIS

CALL

IROUTINE

13

IPUNCH

AND

READ

CHLGK

QLOCK

OF

ONES

AND

lEROS,

02731

000013

Pt

T

13

02732

"'02745

P1T14

02733

750001

CLA!CMA

02734

5005ti4

AND

PTt"SK

02735

043401

DAC

ALOCKA

1377

TO

BLOCt<A

02736

143402

O!M

RLOCKA+1

10

TO

BLOCKA+l

02737

100533

MOVE

IFILL

BUFFER

WITH

~2740

00

3

4""1

BLOCKA

laNES

Al\Jn

~EROES.

02741

00344'13

flLOCKA+2

02742

777402

-376

k12743

1013?4

JMS

NTST

IGO

TO

NORMAL

TEST

02744

101112

JMS

P8LK

IUSE THIS

CALL

IROUTINE

14,

IPUNCH

AND

READ

CHECK BLOCK

OF

ONES

AND

cEROES.

RANDOM

ISTALLS

BETWEEN

CHARACTR[RS

PUNCHED.

02745

V!00014 P1T14

1.

02746

el02761

PiT15

~?747

75vHH11

CL~:CMA

0275~

500564

ANn

PTMSK

02751

(Il434P11

DAC

RLOCKA

1377

TO

RLOCKA

0275?

1434(1l2

nV1

o!...

(~CK

A + 1

/0

T0

RLOCKA+1

0?753

j0P'5j3

~OVE

IFILL

RUFFER

WITH

~2754

00 3

4Lil1

PLOCKA

IONES

AND

tEROF:S

1i12755

00~4P13

FlLOCKA+2

0/>756

7774(11")

-376

02

7

57

1013?4

JMS

NTST

IGo

To

NORMAL

LIST

Y,?76(/l

H'l11

?V!

JMS

P8LKR

IUSE THIS

CALL.

.EJECT

PAGE

,3·

7 15TT P2

/ROUTINE

1';

/PUNC'-1

AND

REAC-

rHJ:"CK

;:,LOCK

OF

BINARY

COUNT

PATTERN.

t

~"7

~

00V!~1r;

P1Tl?

15

ti2

7

6?

00?76b

P1T16

P;?7b3

10?773

JMS

r

w8

r N

/GO

FIll

WITH

BINARY

PATTERN

~2764

101324

JMS

NTST

/GO

TO

NORMAL

TEST

0?16'5

10j112

JMS

PBLK

IUSE

THIS

CAll

/ROUTINE

1~.

IPUNCH

AND

READ

e~EeK

RlOCK

OF

BINARY

COUNT

PATT£RN.

IRANDOM

STAllS

BETWEEN

CHARACTERS

PUNCHED.

0276'6

00910

16

P1

T16 16

02767

777777

02770

102773

JMS

Fw8lN

IGO

rILL

WITH

BJNARY

PATTERN

a2711

HH324

...lMS

NT'ST

IGO

TO

NORMAL

TEST

02772

101120

JMS

pelKR

IUSE

THIS

CAll.

021i3

000000

tWBIN

0

0277.

10

0322

SETloe

IBLOCKA

ADDRESS

TO

TEMPU

82775

000044

TEHPU

02776

003401

BLOCI<A

02777

100322

SETLoe

1-256

TO

CTRA

03080

000050

eTRA

03081

777400

-4@0

~3"02

t00557

J,..s

INITPT

IINITIAlllE

pATTERN.

03003

100565

tWBINA

JMS

GETPTT

IGET

BINARY

CHARACTER

03Pl4

060044

DAC·

TEMPU

ISTORE

PER

TEMPU

03005

440044

lSi

TEf04PU

1+1

TO

TEMPU

03t106

44V1050

IS~

CTR"

IQONE?

03007

603003

JMP

PIPINA

INO.

03.:'10

622773

JMp. FWPIN /YES. ExIT

.EJECT

PAGE

~8

15TTP?

IPROGRAM

2.

KEYBOARD

T(ST

f),3011

100

3

22

PRG2

SETLoe

/INITIAL

ROU1'YNE

AGDRESS

03~12

0001et20

KSTART

ITO

f(START

03013

003817

P2T8

03014

HH~451

JMS

TYPSTG

IPRINT

TyTLE

03015

001734

KMSG1

03~16

68(l!?33

JMP

SRSET IGET STARTED.

IROUTINE

£I

IC~ECK

THAT

,<SF

cOMMANn

SKIPS

WIT~

f"LAG=l. 10021

TI~ES.

032117

800800

P2T8 0

A302f1

003042

P2Tl

03021

100322

SETLOC

1-1000

TO

CTRA.

03022

000050

ClRA

213023

776038

-1750

03824

703302

CAf"

ICLEAR

ALL

F'LAGS.

V\3025

HHlJ451

JMS

TyPSTG IPRINT INSTRUCTION

03026

081753

KMSC2

03e27

70(l!301

KSF'

/WA

IT

FOR

f"LAG

1-

03030

683027

JMP

.-1

03031

70~301

KSr

I::

KIP

ONE

f"LAG.

03832 603036

JMP

P2E0

INO

SKIP.

rRROR.

03033

44"'0150 lSi!

CTRA

IDONE

1000

TJMES?

~3~34

~.0~031

JMP

.-~

INO. REPEAT.

03035

6002613

JMP

CHAIN

IYES.

CHAIN

03036

750040

P2E0

HLT!CLA

IERROR. FAtLfO

TO

SKYP.

03(l!37

700301

KSF

ISCOPE

LOOP,

SKIP

:-""

FLAG

1-

~304(l!

603037

JMP

,

-j

IREPEAT

03041

603037

JMP

.-2

/REPfAT

IROUTINE

1.

IECHO

TEST. CHAR.cTER REcEIVED

IS

TYPED.

KEYED

At.iO

PRINTED

Ci-IARACTER

ISHOULD

MATCH.

RlJROUT

CHARACTER

ENDS

ROUTINE,

~3042

~0~~01

P2

Tl 1

~3"43

f'~~11lf,1

P2T2

~3e44

7033~2

CAF

~3045

]004':>1

JMS

TyPSTG IPRINT INSTRUCTION

~3t'!46

t'!~!767

KMSC3

03~47

70~3~1

P2 T

1A

KSF

IREADY?

~305F-

60~047

JMP

•

-1

IWA

IT

V'

3

05

1

700312

KR8

IRE

AD

C~ARACTER,

(n~5?

70~4~6

TLS

IPRINT

IT

~'3~53

70~401

TSF

IOONE

TYPI~G?

~30C;4

M~30&;3

JMP

-1

INPO.

WAIT·

(~3055

341i'0h2

TAl)

MR~OUT

V'3~56

7

4P12~'

0 StA

/RUBOUT?

\33

0

57

f,

03

P14

7

JMP

P2 T1A

INO,

REPFAT

1~3~M~

6V10?f,~

JMP

rt1AIN

IYES.

CHAIN

.EJECT

PA(.[

39

15TTP2

I.ROUT I

~·C

2.

IOr,TAL

EOU:C,,,,_:N"!' TEST.

THE

OCTAL

EGiUIV,.1

E~;T

or

~!\jY

CHARACTER

IKEY[O

IS

;:)~:\-~~.

RUgPOLJi

(NOS'

POUTINE".

;

3e

Ol

0'HiH3~

2 P2T2 2

f'3~6?

777777

~,3e63

703302

CAr

~3~64

HH14t;1

J-t1

S

TY>-'

srG

IPRINT

INSTRUCTION

~3a65

002042

KMSG4

0l~66

i00~51

JI1S

TY.PSlG

031i'6?

001776

KMSG3A

A3~70

700301

P2T2A

KS':

/READY?

03071

603070

JMP

.-1

INO.

WAIT

03.072

700312

KR9

IYES.

READ

KfY80ARO

03073

0431Q16

OAC

P2T2W

03074

101423

JMS

ASeeN

ICONNECT

CHARACTER

TO

03i'l15

003106

P2T2W

IPRINTABLE

OCTAL

03016

002064

OCTrQY

03077

10*1451

JMS

TYPSTG

IPRINT ocTAL

EQUIVALENT

~310P

002062

KMSG'5

~3H'1

2133106

LAC

P2 T

2W

0310?

340062

TAO

~RflOUT

03HI3

74020Q1

SiA

IRUBOUT?

03104

603070

JMP

P2T2A INO.

~310S

600260

Jf'1P

CHAIN

IYES.

CHAIN

03106

000000

P2T2W

0

.EJECT

PAGE

40

15TTP2

IPRO~RAM

3.

cOMBINED

READER,

PRINTER,

PUN('~

TEST

,~31k~7

10~3?2

PRG3

SETLOC

ISET

INTFRRUPT

SERVICE

TO

~311Vl

00~0e2

2 IINTSVC

03111

001051

INTSVC

~31l2

1003?2

sETLoe

IsET

BLOCK

COUNT

03113

000057

BLKCNT

ITO

-1'50

03114

777'552

-226

~3115

100613

JMS

STtiF ISET

UP

RUFF"ER.

03116

100322

SETLoe

IINITIAL

ROUTINE

03117

~@002·0

,

KSTART

IADDRESS

TO

KSTART

0312"

083122

P3T0

03121

600233

JMP

SRS[T IGET STARTED.

03122

019000

P3Te

A

03123

103127

P3T1

03124

100631

JMS

F"SF"3

/DATA:ABC

03125

001516

A

03126

101354

JMS

CNTST

£13127 e-0A001

P3Tl

1

03138

003134

P3T2

03131

100631

.'JMS

F"8F3

/Q.4.TA:O[F"

03132

(11015?1

\s

03133

101354

CNTST

et3134

00Q10f'12

P3T2

~313'5

P:03141

.3T3

03136

HI0631

tiS

F"BF3

/OATA:GHI

~3137

0015?4

0l314C11

101354

.

~

CNTST

~3141

000003

P3T3

3

03142

~03146

P3T4

03143

100631

JMS

FBF"3

10ATA:JKL

~3144

e0l527

J

03145

101354

JMS

CNTST

03146

00Vo0Q14

P3T4 4

e3147

0e3153

P;5T5

~131a;p

10P631

JMS

FBF3

IDATA:MNO

03151

001532

M f'

~315?

1~13";4

JM:'

CNTST

03153

pe~0Q15

P3TS

r;

03154

~031~PI

P3T6

~315r;

:0~631

JMS

F"8F"3

IDATA:PQR

~315~

rtH

5~5

P

~3157

H~13C;4

JMS

CNTST

031bP

~0~0~6

P:.H6

(,

Vl3161

(il0~1f,5

P3T7

~3162

1e'0t131

JMS

F8r3

/DATA:STlI

~3163

??154(~

S

0.3164

~01"3S4

JMS

rNTST

.EJECT

--

PAGE

41

1'5TTP?

~}~

1

"r::,

~0.00Q\7

P3

i7

~q

~

6h

V

{I.~

1 7

~

. 3 T

1?

.'

~

i 67

1?06~:

'Me:

r

8'

:;z;

/C'ATA:Vto;i'

031

7'~

001543

\'

03171

101354

JI'1S rNTST

~3172

000010

P3 T

10

;

V"

~317~

003177

>=-3Tl1

V'3174

HJ~631

JMS

F8F3

10ATA:

Yiz.e

03175

001546

'(

0317f.

101354

JMS

CNTST

"~3177

000011

P3 T

11

03200

00132014

P3T12

03201

100631

JMS

FBr3

/OATA:123

03202

001551

ONE

03203

101354

JMS

CNTST

03204

000012

P3 T

12

03205

003211

P3T13

03206

100631

JMS

FBF3

/DATA:456

03207

"'01554

rOUR

032HJ

101354

JMS

CNTST

03211

000013

P3T

13 13

03212

0103216

P3T14

~3213

100631

JMS

FB!="3

/DATA:

789

03214

\?l01557

SEVEN

03215

101354

JMS

CNTST

03216

000101.4

P;,H14

14

~3217

003223

P3T15

03220

100631

JMS

FBF3

/OATA:!"#

Pl3221

001562

C241

~>3222

101354

JMS

CNTST

03223

000015

P3T

15

03224

003230

P3T16

;113225

1010631

JMS

FBF3

IDATA:S~~

03226

0101565 C244

Pl3227 1013C)4

JMS

CNTST

03?3~

P0V10t6 P3 T

16

03231

0et3235

P~H17

03232

10et631

JMS

FBF3

/DATA:'()

R3233

001570

C247

~3~34

1f(J1354

JMS

CNTST

V}3?35

~00017

P3

T

17

V'3236

00324('

P3T20

Vl3237 1"10631

JMS

FB~3

IOATA:

••

,

~3?4~~

0Q11573

r252

0324:1

1ei13C:;4

JMS

Cl\JTST

.EJECT

PAQ

42

l"",TH.I?

~324?

eQl~Ql?'"

P3 T

20

i~3?43

~vL~247

P3 T

21

~3244

.

100631

JMS

F"9F3 /OATA:

•.

/

03245

~01576

C2S;5

03246

j 0135.4

JMS

CNTST

03247

000021

P3 T21 21

03?5~

Ql03254

P3T22

032.51

HJ0¢31

JMS

FSF'3

/OATA::;<

03252

001601

C272

~32C;3

1O,-3'54

JMS

CNTST

.03?54

0000?2

P3T22

22

03255

"'03261

P3T23

03256

100631

JMS

F8F3

/OATA:=>?

~3257

0016~4

C275

03260

101354

JMS

rNTST

03261

Ql0~0?3

P3 T23

?3

~3262

003266

P3T24

·V"3263

Ul0631

JMS

F8F3

/DATA:@(\

03264

11101607

C300

·03265

101354

JMS

rr-nST

03?66

000024

P3T24 24

03267

003273

P3T25

03270

100631

JMS

FeF3

10ATA:],

AND

LEFT

ARROW

03271

001612

C335

\:-'3?72 1"01354

JM5

CNTST

03::>73

t'l0Q10?5

P3T25

:>5

~3274

003277

P3 T26

03275

100652

JMS

F"BALL

/OATA:

ALL

PRINTABLE A

SC

T I •

03276

10

1354

JMS

rNTST

03277

"'000;:>6 P3T

26

03300

0033'03

P3T27

03301

100706

JMS

FW334 /OATA: ASR33 PRINTER

WORST

03302

1°1354

JI'4S

CNTST

ICASE

PATTF:-RN.

03303

0000;:>7 P3 T27 77

03304

0033~7

P3T30

Ql330C:;

HJ07?4

JI'4S

rW:t3S 10ATA: ASR33

PR

t

~HER

WORST

CASE

V'~3~6

10

13"4

JMS

:-

';

TST

IPATTERN

WITH

lNTERSPERSED

BLANKS.

~3307

00(l\03~

P3 T30

3~

"'331Q1

0033t3

P3T31

1~3311

10074?

-,Me:;

~~~'54

10ATA: ASR35

PRI~TER

Iooi('PST

CASE

03312

10

13&:)4

JMS

rNTST /PATTERN.

1~3313

00~V'l31

P3 T31

31

03314

"'~3317

P3T32

~3315

1007t.0

JMS

r:-wo/~5S

10ATA: ASR35 PRINTrR

WORST

CASE

V'331t.

1°1354

JMS

r'lTST

IPATTERI\j

\oIITI-4

PoJTt~SPERSFD

BLANKS.

.EJECT

PAGE

43

03317

~~320

03,~2j

03322

03323

1213324

03325

03326

03327

03330

03331

03332

1213333

1213334

1213335

~3336

03337

eJ334~

03341

121

334

2

1213343

03344

03345

0~~46

0~~347

03350

03351

03352

03353

03354

03355

03356

;113357

03360

03361

0336?

"'3363

~3364

03365

111336£1

0

336

7

03370

03371

03372

l';TTP?

~V1(i1012

777777

75(11001

')0V\'5f)4

~43403

14341114

Hll1533

00341213

~03-405

777672

112J1i'533

12103403

1211213515

777670

11211354

HJ0613

11210670

140023

7512101214

75110121

1121035121

101401

60334121

2(1144",3

04(11(1102

204404

121412112157

10121533

000021

012134(111

777776

11210533

003401

003403

777402

?04405

Vl4337?

750004

7501"'121

603371

?12144(.l16

043372

tc1l134eJ

00

vHHIJ

0

32

77"''''77

CLA.~CMt.

A'"

:i

tAe

:12"1

,Ioo!OVE

PLOCKl

8LOCK1+2

-106

.

fo40YE

BLOCKl

.

BLOCK2

-110

PP

1

SK

8L0CKl

ALOC

K

1-+l

JHS

IPROGRAM

4.

IIp

AC

S

0=1.

PRG4

J"1S

JMS

DiM

eN·TST

PRINT

LINEs

FULL

SPEED,

SToF

rsTMP

O£LAYM

LAS

SP4!CLA

JMS

OLCNT

Jto1S

TYPE

JMP

PRG4+2

IDATA:

OF

DATA

IN

LOC

08021

AND

00022.

TF

ACS~=l

STALL

~ETWE:EN

CHARACTERS.

15ET

UP

RUFFER

IFILL

BUFFER

WIT~

QATA.

IREAO

ACS

ISTALL?

/YES.

ITYPE

LINE

IPROGRAM

5.

PUNCH

AND

READ

CHECK

DATA

BLOCKS

WITH

OATA

IN

LOC

1218021

AND

100022.

IF

AC

S~

=

p.

FULL

SPEED. IF

ACSe=

1 S T

4.LL

BE

T

WEEN

CHAR

Ae

TERS

PRG5

LAC

<INTSVr ISET INTrRRUPT

SERVICE

TO

INTSVC

PRG5V

r

.•

c 2

LAC

(-40121

OAC

SLKCNT

MOVE

PTEMP

9LOCKA

-2

"'0

'IE

BLOCKA

~LOC!O(A+2

-376

LAC

;lAr

LAS

SM4!CLA

JMP

LAC

oAr

JMs

VI

.EJECT

(JMS

pRLK

PRG5V

PRG5V-t

(JMS

PRLKR

PRG5V

STST

ISET

8LOC~

COUNT

TO

-256

IFILL

RUFFER

WITH

DATA.

/p~ESET

ro~

FuLL

spEro

RUN.

IRE

AD

ACS.

ISTALL?

INO.

IYES.

SET

UP

STST

SU8ROUTINE

ITO STALL.

IGO

TO

spECIAL

SUBROUTINE

IJMS PRLK.

O~

JMS

PBLKR

PAGE

44

03313

03314

03375

03376

03377

03400

03401

03402

03403

03513

03514

1?13515

03625

03626

04001

04401

1'5TTP2

204-403

/PQOGRAM

6.

IF

4CSPl=0,

PRC6

LAC

~40002

204404

0400t;7

10?773

MI3362

000215

00"212

000000

000215

000212

V!00000

000215

"'00212

0000rlJ0

tJl00000

I

ALOCKA

BLOCKl

BLOCKB

BLOCK2

BLOCKC

oaLK

rt!440j

0004'50

"'4402

000440

04403

001051

04404

777400

04405

101112

04406

101120

.l

-l

*L

.L

DAC

LAC

OAC

JMS

JMP

215

212

0

.LOC

215

212

0

.LOC

215

212

.LOC

"

.LOC

.Et<40

PUNCI4

AND

READ

rUll

SPEED. IF

(I~TSVc

2

(-400

8lKCNT

FWBIN

PRG5A

BLOCK1+1101

BLOCK2+110

BLOr,KA+4011J

DBlK+400

Sl;;rE:04407

NO

ERROR

LINES

CHECK

BLOCK~

OF

BINARY

~OUNT

PATTERN,

ACS0=1

RANDOM

STALLS

BETWEEN

CLASS

PU~C~ED,

ISET

INTERRUPT

SERVIrE

TO

INTSVC

ISET

BLOCK

COUNT

TO

-2'6

IFILL

BUFFER

WITH

BINARY

COUNT,

ICR

ILF

/CR

ILF

/eR

ltV

PAr,F

-~

'5

15TT P2

A ? j

~

16

~C

;..10t'J~')

A$CCN

~J4?3

ASCT

01462

A33w?S

01472

A33WP4

~1466

A35WPS

015216

A3SWP4

211502

BLKCNT

e00~7

ALOCKA

03401

RLOCKB

03513

ALOCKC

03625

RLOCKl

93403

RLDCK.2

213515

CHAIN

021260

CHCK

2121575

CHRrST 017P.4

CLeF"

7212121"'4

CLON

72102144

CLSF

702121211

CNTST

211354

CNV

211446

CR

0021621

CReTR 021375

CRLF'

00361

CRTST

211651

CRTSTA

02112

CRTSTS

02115

CTRA

00ec;e

CTRB

021051

CURTST

00034

CHJe

2101215

C240

210106

C241

01562

C244

01565

C247

1i'157e

C2r;2 "'157:r;

C255

'H576

C257

21212167

C272

211601

(';275

~16"'4

C30e

016217

C334

02121721

C335

9161?

0

01521

DADDR

0LH6

OAP

01136

DAR

012213

DBLK

~4001

OCTR

211317

OELAY

1210333

nELAYM

0~023

DELAYS

el~026

nlCNT

21213')0

OLCNTP

01213

PAGE

<=6

1'5TTP2

!)U'SR

~.

j 2";4

OLYMS

00333

OLVMS~

0~055

(EM

7077f12

ERRCR

00053

ERRCTR

00054

F'RROR

01223

rADDR

00554

F'BALL

006';2

rer3

00631

raTMp

00670

rETCH

01421

rLAG

00102

rORwD

00277

rOUR

01554

F'W~lN

02773

rWBINA

03003

rW33S

00724

rW334

00706

F'W35S

00760

rW354

00742

G

01524

GETPTT

00565

GETRf'lY

00234

GNRNO

01303

INCRTN

00256

INITPT

00557

INTSVC

0U'51

J

01527

KMSGl

01734

KMSG2

01753

KMSG3

01767

KMSG3A

01776

KMSG4

~2042

KMSG5

02062.

KRA

700322

KRR

700312

Ksr

7~~3~1

KSTART

",00?0

K0707

01464

K1

~Q!071

K6(1!60

01.465

K77

001~3

K7700

01463

LOCOE

0HJ10

Lft-1

707

7

04

L~

00061

LF'TST

~H677

LrTSTA

0?24,)

LINK

00064

LTRCTR

01007

M

01532

MeTR

00556

MILCTR

00040

MILl

00041

PAGE.

47

15TTP2

~O\lE

HJ0533

~O\l[A.

00545

"'O"Vr.

00533

"4RflO0T

00062

"1SCTR

00037

~:

00072

M1le

00076

Mill

00077

1416

390;4

~2

00073

"14e

001"04

10444

00075

NTST

(il13~4

NTSTA

01332

'~XTST

00035

OCTEQV

02064

ONt

01551

OUT

01066

p

01535

P.DOR

01140

?BlK

01112

P8LKR

01120

pcr

700202

PCTR

01137

poeR

01105

prLAG

00056

PLTlR

00776

PRGAOR

00221

PRCEND

00275

PRGLIM

00031

PRGMSK

00030

PRGNUt4

00027

PRGT~B

00111

PRGe

02071

PRG1

025??

PRG2

03fU1

PRG~

03107

PRe.

03336

PRG5

03346

PRG5A

03362

PRG')'"

03372

PRG6

03313

PRINT

"0S?4

PSA

700?'(}I4

PSq

HI0244

PSf

700201

PSTUP

01074

PSW

00032

P$YNC

013('0

PTFMo

00021

prOtPl

00022

PTIoCSK

00564

PTQI

(}I0562

PT1

005t-3

PUNCH

00376

PAGE

48

P0TS0

P0TSl

P0TS10

P0TS11

P0TS12

P0TS13

P0TS14

P0TS15

P0TS16

P0TS17

P0TS2

P0TS20

P0TS21

P0TS22

P0TS23

P0TS24

P0TS25

P0TS26

P0TS27

P0TS3

P0TS30

P0TS31

P0TS32

P0TS33

.P0TS34

P0TS35

P0TS36

P0TS4

P0TS5

P0TS6

P0TS7

P1T0

P1Tl

PiT10

P1Tll

P1T12

P1T13

PiT14

P1Tl?

P1T16

P1T2

P1T3

P1T4

PiT5

PiT6

P1T7

P2E0

P2T0

P2Tl

P2T1A

P2T2

P2T2A

P2T2W

P3T0

[1~Tl

02076

02131

0.2306

02313

0'2320

02325

02·332

02337

02·344

02351

02163

023:56

02363

02370

02375

02402

02407

02414

02421

02230

02426

02.433

02~41

02447

02466

02501

02514

02254

02267

02274

023"'1

02541

02552

02666

027~1

027115

02731

02745

02761

02760

02'5/'.4

02577

02612

02625

0264ii'

0265~

03036

03017

03~42

03047

03061

03070

03H'!b

03122

03t?7

P3Tl~

P3;11

P3i12

P3T13

P3T14

P3T15

P3T16

P3T,.7

P3T2

P3T20

P3T21

P3T22

P3T23

P3T2

4

P3T25

P~H26

P3T27

P3T3

P3T30

P3T31

P3T32

P3T4

P3T5

P3T6

P3T7

RADOR

RANCO~

RANOEX

RANGEN

RANSAV

RANTAO

RANTBL

RBCTR

RBUSY

ReF

RCTRA

RCTR8

RORLK

ROALKR

RORS~V

ROSRV

RMTST

RMTSTA

RRA

RRnv

RSA

RSS

RSCTR

RSf'

RSSERV

RSTUP

PSYNC

RTNNO

RUOONE

S

:'3172

03177

03??4

~3211

03216

03223

03230

03235

03134

03:?42

03247

1213254

03261

03266

03273

03277

83383

03141

033117

03313

03317

03146

03153

03160

03165

01204

0121436

09437

00411

90450

00426

00440

01205

00063

700112

01271

1211272

011f12

01111

91206

91212

01656

02143

7vHH12

Vl1141

1~~91914

71219144

12112126

7121011211

01027

01146

01011

00033

1211240

01549

,.,

A :;F

.•

l J C ;

!~.

(1

SASC

01461

58

0122'"

SETloe

1~"'322

SEVEN

01557

SHALT

0031:5

St<IPMA

e0107

SI<tPP4

00110

5LID0

01633

SLIDl

0.1615

SPACE

00066

SPTST

01670

SPTSTA

02175

SP.TSTR

02297

SRSET

09233

SR3MSK

09052

START

00200

STBr

00613

STCTR

00322

STST

211340

STSTA

01347

STSTR

01351

STSTC

01352

SWITCH

00526

TAOOR

00555

Ter

700402

TCTR

0141>2

TEMP

08.42

TEMPU

98'44

TE"'Pl

00843

TEMa

0010"

TEMR

00t~1

TLS

70CU~6

15C1

00456

TSC2

00467

Tsr

790401

t51"'51( A0036

P'PA

T

~A5~0

TYPE

014~1

TYPEA.

0141'"

TYPlN~

01370

TYPSP

~~5P4

TYPSTG

00451

UT(MP

00045

UT

r"'Pl

~A046

LIT rfo1p.) 0~~47

~.

0154,'~

veTR

P,10f-4

...

sc

014~'"

j,j

C'i04"

0~!'Il?

~CPTST

~'71~

y

015

4b

. f

\'T

00~9!0

.(e

T

KSTAt<";

PT~MP

PTf.HPl

DELAY"

OElAYS

PRCtlfUM

PRGKSK

PRGLIM

PSW

RTNNO

CURTST

NXT5T

TSTM5t(

"SCTR

MIl-eTR

HILt

TEMP

TEMP1

TEMPU

UTfMP

UTEMPl

UT£MP2

CTR

•.

cTRB

SR3MSK

rRReR

FRRCTR

OLYMSt<

PF"LAG

8LKCtIIT

CR

LF"

"RaOuT

R8USY

LINK

AC

SPACE

C257

C334

Kl

"'1

"'2

"16

M44

14110

14111

TEMa

TEMR

FLAG

K77

M4R

CUl0

C240

SKIpH~

0et0P~

~00f)0

"00?1

00022

008?3

0Q112b

88127

0083·9

01831

0003.2

01833

00934

00035

00036

08037

00040

00041

00042

08143

00844

0Q1045

011146

0eQl47

00058

00051

00052

00053

00054

~0055

00056

03057

00060

00061

00062

18063

08064

80865

00866

Ql8867

00810

00071

00072

00873

00074

00075

00076

00077

00HHII

0Q11Pl

00102

00103

00104

G1I~10-;

00106

00107

,';

!

~

t "

::

1;,iT~2

SI<TPPA

tJ.1!

~

J

PRCTlg 210111

START

'Hll211

PRCAOR

00221

SRS[T

'8233

CETRO"

08234

I~CRT~

11256

CHAIN

88260

PRG£NO

81275

rOANO

10277

SHALT

10313

STCYR

"1322

OLYMS

"333

OLC"T

011351

CRLf'

".361

CRCTR

88375

PUNC'"

"8376

RANGE'4

""411

RANTA!"

0~426

fUNCO~

0"436

RA"O[l

8.437

IhNTBL

"0440

~At\iSAV

10450

TYPSTG

.00451

TSCl

0"-456

TSC2

011467

TYPAT

e..5."

TVPSP

""504

PRINT

0'5?~

SWITr

...

10526

fo1cvvr

'1533

"'0'lE4

011545

~lC'DI:

"e5~4

TAr.D~

PISS5

,..eTR

~~5S6

:~fTP'"

~P~C:;7

o T

,l

~"5(-c

PTt

"~563

PTMSIo..

~P564

l;ET;:>Tf

J05f.5

r~CK

?~\575

wCHK

0061'1

ST~r

~~613

r-~~~

~~631

r~.\L

(~~r;2

r~T\I=-

0l~'61~

rW~3.!.

~07Pfl

r\la3~S

,>'''72 4

j;"W~54

,~~"4

;.>

r"35S

\.'~'6?:

PL

TU~

P~''776

l'TRClR

~1~07

t{WN"

"1~1~

qSv"'lC

:~

1

""

~

.~

,

,~

~

.....

"\

~,

~

~:

-,

pAGE

')3

15TTp?

RSSEPV

\~H127

tNTSVC

~\

1851

VCTR

01164

OUT

~1"66

PSTUP

010'4

POCR

011~5

PBlK

"'1112

PBLKR

01120

OAP

01136

PCTR

01137

PAOOR

0t1~0

RROY

~1141

RSTUP

~1146

ROBLK

01162

RDBLKR

81171

rJAR

81203

RAOOR

01204

RBCTR

012r.5

RDRSRV

01206

ROSRV

01212

S8

CU220

ERROR

01223

RUOONE

01240

OLMSR

01254

RCTRA

Gl1211

RCTRB

01272

nLCNTP

01273

GNRNO

01303

OAOOR

01316

OCTR

01317

PSYNC

01320

NTST

01324

NTST4

01332

STST

01340

STSTA

01347

STST8

013'51

STSTC

01352

CNTST

01354

TYPLN3

01370

TYPE

~14?1

TYPEA

0141~

FETCH

014?1

TCTR

014(?2

ASr:CN

01423

CNV

01446

WASC

014t1~

SASC

01461

ASCT

~1462

K77",PI

..

'1463

1<0707

"14~4

K606~

t\1465

A3

3w

P4

01466

A33~PS

01472

A35WP4

~15r.2

A35WPS

01506

PAGE

'54

A

o

G

J

H

P

S

V

y

ONE

rOUR

SEVEN

C241

C24~

C247

C252

C255

C272

C275

C30il

C335

SLIDl

SLID0

CRTST

RMTST

SPTST

LF'TST

CHRTST

WCPTST

KMSGl

KMSG2

KMSG3

KMSG3A

I(MSG4

KMSG5

OCTEQV

PRG",

P0TS~

CRTSTA

cRTSTB

P(HSl

~MTSTA

P0TS?

SPTSTA

SPTSTR

PtHS3

LrTSTA

p(nS4

o~TS5

P0TS6

NHS7

p~TSHJ

P~TS11

"iHS12

~r

S 1

,~

01516

01521

01524

01527

0t532

131535

01540

01543

01546

01551

01554

01557

01562

01565

01570

01573

01576

01601

01604

01607

01612

01615

01633

~16C;1

01656

01670

01677

01704

01715

01734

017'33

1211767

01776

02042

1212062

02064

02071

0212176

02112

~2115

1212131

02143

0?1f>3

0?175

022l"7

02230

1212242

e?254

r"\2f.7

~)274

02301

023H6

023,3

023

'~

pACE

55

P0TS14

PftHS'! 5

P0TS16

peTSt7

P0TS20

P0TS21

P0TS22

.

P0TS23

P0TS24

P0TS25

P0TS26

PtHS27

P0TS38

P0TS31

P0TS32

P0TS33

P0TS·34

P0TS35

P0TS36

PRGl

ptTe

P1Tl

P1T2

P1Tl

PtT4

PiTS

P1T6

P1T7

PtTl?

P1T11

P1T12

P1T13

PtTl"

P1Tl!:'

P1T16

rWBIN

FWRl~A

PRG2

P2Te

P2F0

P2T1

P2T1A

P2T2

P2T2A

P2T2W

PRG3

P3T0

P3T1

P3T2

P3T3

P3T4

P3T5

P3

T6

P3T7

P3T10

15TTp2

02332

02337

02344

02351

02356

0236:!

02370

02375

0'2402

82407

02414

02421

02426

02433

02441

02447

02466

025~1

02514

02527

02541

02552

02564

02577

02612

02625

02640

02653

02666

02701

02715

02731

02145

02761

02766

02173

03~H~3

03011

03017

f'!3036

e!3042

03047

030f-1

03070

03106

t'l3HH

031?2

03127

03134

03141

0:5146

213153

03160

03165

0317?

PAGE

56

1';TTP2

P3Tl1

03177

P3T12

032~4

P3T13

03211

P3T14

83216

P3t15

93223

P3116

03230

P3T17

03235

P3T20

03242

P3T21

93247

P3T22

03254

PlT23

03261

P3T24

ftll26'6

P3T25

03273

P3T26

03277

P3T27

033913

P3T3~

03307

P3T31

133313

P3T32

03317

PRG4

03336

PR.G5

03346

PRGSA

033l-2

PRG5V

03372

PRG6

03373

qLOCKA

83401

RLaCKl 133403

RLOCKS

03513

ALOCK2

03515

RlOCKC

133625

neLK

840'.111

SETLoe

188322

nELA

Y

le0333

MOVE

100533

CLSF

70~081

CLOf

7808914

CLON

708844

RSr:

7.00101

ReF 7881912

RSA

7~V\104

RRR

70~11?

RSP

70~lA4

psr

7002~H

per

700202

PSA

7002~4

PSP

7002~4

KSr

70~301

KRFl

70t'3:

?

KRA

7003?2

TSF

70~401

rcr

7?!1!402

TLS

7004~6

rEM

707702

LfM

7017P4

MAINDEC 15 D2BB D_Teletype__Part2_Jul70 D Teletype Part2 Jul70

MAINDEC-15-D2BB-D_Teletype__Part2_Jul70 MAINDEC-15-D2BB-D_Teletype__Part2_Jul70

Navigation menu

Versions of this User Manual:

Views

Navigation