MAINDEC 11 D0QD_T17_SYSTEM_EXERCISER_Feb71 D0QD T17 SYSTEM EXERCISER Feb71

IDENTIF"ICATION

pRODUCT

CODE:

pRODUCT

NAME:

DATE

CREATED:

MAINTAINER:

AUTHOR:

MAINDEC"11-DI1'JQD

T17

SYSTEM

EXERCISER

(WITH

CORE

EXPANSION)

rEB. 1971

DIAGNOSTIC

GROUP

JOHN

HITTELL

,MAINOEC

...

PAGE

2

ABSTRACT

THIS

PRCGRAM

IS A

CORE

EXPANDABLE

INTERACTIVE

8U~

EXER-

CISER

FeR

A

PAPE~

TAPE

ORIENTED

1'01'-11/20.

IT

PERrORMS

A

TEST

or

INSTRUCTIONS

AND

CONCURRENT

OPERATIONS

or

1/0

EQUIPMENT

SIMU~TANEOUSLY.

IT

MAY

ALSO

PERFORM

T~E

SAME

OPERATION

INDEPENDENTLY.

THIS

PROGRAM

IS

NOT

TO

8E

CONSIDERED

A

TOTAL

CHECK

or

THE

SYSTEM.

If

AN

ERROR

IS

DETECTED

INAN

1/0

DEVICE,

IT

WILL

PROBABLY

BE

NECESSARY

TO

CORRECT

THCMALFUNCTION

WITH

THE

RESPECTIVE

DIAGNOSTIC

FOR

THAT

DEVlcr.

REQUIREt-IENTS

EQUIPMENT

1'01'-11/20

STANDARD

COMPUTER

OPT

I

ONAl

HARDWA;RE

THAT

THE

"ROGRAM

WILL

EXERC

1

SE

MM11

RFll

Tell

KE11

KW11l

PCll

KLll

lPl1

STORAGE

uP

TO

2!8KW

or

MEMORY

DISK

(256K)

OECTAPE-TRANSPORT

lERO

£XTENDED

ARITHMETIC

UNIT

LINE

CLiOCK

HIGH

SPEED

READER/PUNCH

ASR33

OR

ASR35

TELEPRINTER

LINE

PRINTER

PROGRAM

STORAGE

•

THE

ROUTINE

USES

~EMORY

rROM

0000

TO

17476.

LOADING

PROCEDURE

METHOD

PROCEDU~[

rOR

NORMAL

ABSOLUTE

TAP[S

SHOULD

~E

FOLLOWED.

4.

STARTING

PROCEDURE

4.1

CONTROL

SWITCH

SETTING

MAINDEC

..

PAGE

3

STARTING

AT

SA

20~

ALL

SWITCHES

SHOULD

BE

SET

AS

INDICATED.

4.2

STARTING

ADDRESS

OR

ADDRESSES

(A)

200::

SR

= 000777

TEST

PROCESSOR

ONLY-WITH

CORE

EXPANSION

(8)

200 =

SR

= 001777

TEST

PROCESSOR

ONLY-4K-INHIBIT

CORE

EXPANSION

ec) 200 =

SR

:

002XXX

TEST

1/0

ONLY

(D)

200:

SR

= 000000

-CORE

EXPAND

AND

TEST

ALL

AVAILABLE

1/0

DEVICES

Sw0

= 1 INHIBIT

TTY

OUTPUT

SWl

: 1 INHIBIT

lTY

INPUT

SW2

: 1 INHIBIT

HSP

SW3

= 1 INHIBIT

HSR

SW4

= 1 INHIBIT

L,

I

NE

CLOCK

sw5

: 1 INHIBIT P.Fl1 0151( (256K)

SW6

= 1 INHIBIT ,'Cl1

DECTAPE

SW7

II: 1 INHIBIT

L,INE

PRINTER

---

IF"

LINE

PRINTER

MUST

RESTART

AT

400

IF

EAE

EXIST

IT

WILL

BE

AUTOMATICALLY

SELECTED

4.3

PROGRAM

ANDIOR

OPERATOR

ACTION

LOAD

PROGRAM

INTO

MEMORY.

SET

SWITCH

REGISTER

TO

STARTING

ADDRESS.

LOAD

ADDRESS.

SET

SWITCHES

TO

INHIB1T

NDN'rXISTANT-oEVICES

PRESS

START.

THE

PROGRAM

WILL

LOOP

AND

BEll

WILL

RING

ONCE

PER

PASS

OF

THE

PROGRAM.

A

MINIMUM

OF

TWO

PASS£S

SHOU~D

ALWAYS

BE

RUN.

IS

USED,

5.

5.1

5.1.1

5.1.2

5.1.3

MAINOCC.

PAGE

4

OPERATiNG

PROCEDURE

OPERATIONAL

SWITCH

SETTINGS

AT

SA

20~

I.

THE

INSTRUCTION

AND

LOGIC

TEST.

WITH

ALL

SWITCHES

DOWN

THE

PROGRAM

WILL

TEST

ALL

DEVICES

AND

PRINT

OUT

ON

ERRORS

AND

CONTINUE

IN

TEST.

(BELL

WILL

RING

AT

COMPLETION

OF

A

PASS)

SWITCH

SETTINGS

ARE

SW15

::

1

OR

uP

IoIALT

ON

ERROR

SW14

::

1

OR

uP

SCOPE

LOOP

SW13

::

1

OR

UP

INHIBIT

PRINTOUT

SW12

::

l

OR

UP

INHIBIT

TRACE

TRAPPING

SW11

::

1

OR

UP

INHIBIT

ITERATION

LOOP

SW1~

::

1

OR

uP

INHIBIT

PROCESSOR

TEST

SW09

:I

1

OR

UP

INHIBIT

VARIABLE

CORE

EXPANSION

5.2.

SUBROUTINE

ABSTRACTS

5.2.2

BEGIN

SA

200

SCOPE

THIS

SUB~OUTINE

CALL

IS

PLACED

BETWEEN

EACH

SUBT£ST

IN

THE

INSTRUCTION

SECTION.

IT

RECORDS

T~E

STARTING

ADDRESS

OF

EACH

SUB-TEST

AS

IT

IS

BEING

ENTERED.

IF

A

SCOPE

LOOP

IS

REQUESTED,

IT

WILL

JUMP

TO

THE

START

OF

THE

SUBTEST

THAT

THE

SCOPE

LOOP

IS

REQUESTED

FOR.

IF

SCOPE

LOOP

IS

NOT

REQUESTED,

THERE

WILL

BE

EITHER

A

FIXED

OR

RANDOM

NUM8ER

OF

ITERATIONS

ON

THAT

SUB-

TEST

BEFORE

THE

IS

ENTERED.

SWITCH

11

ON

A 1

INHIBI·TS

ITERATION

OF

SUBTESTS.

"5,2.3

HLT

5.2.4

IS A

ROUTINE

THAT

PRINTS-OUT

AN

ADDRESS

T~AT

TAGS

THE

FAILING

SU8t[ST,

AND

THE

STATUS

REGISTER

AT

THE

TIME

DFTHE

FAILURE.

TRTRAP

THIS

ROUTINE

WILL

ALLOW

THE

TRACE

BIT

TRAP

TO

BE

SET

AFTER

FIRST

LOOP

OF

THE

PROGRAM.

UNDER

NORMAL

TESTING

THE

TRACE

BIT

WI~L

BE

SET

ON

ALTERNATE

LOOPS

OF

THE

PROGRAM.

WHEN

SET

IT

CAUSES

A

TRAP

AFTER

EACH

INSTRUCTION.

THE

FIRST

INS

T R

U:CT

ION

E X E

CUT

E D

UP

0 N T

RAP

GIS

AN"

R T

I"

W

1,,11

C H

RET

URN

S

TO

THE

INTERRUPTED

SEQUENCE

OF

INSTRUCTION.

THIS

SEQUENCE

IS

CONTlNUED

TILL

THE

END

OF

THE

PROGRAM

LOOP

IS

REACHED.

MAINDEC-

PAGE

5

(5.

OPERATING

PROCEDURE

CONT'D)

5.2.5

5.2.6

5.2.7

5.2.8

TRAPCATCIo4ER

THIS

IS

A

SERIES

OF

INSTRUCTIONS

STARTING

AT

LOCATION

0,

DESIGNED

TO

DETECT,

AND

ISOLATE

UNEXPECTED

TRAPS

AND

INTERRUPTS

TO

THE

TRAP

AND

INTERRUPT

VECTOR

AREA

OF

MEMORY.

THE

PRINCIPAL

OF

THIS

ROUTINE

IS:

THE

VECTOR

ENTRANCE

ADDRESS

POINTS

TO

THE

WORD

WHICH

CON-

TAINS

A

~ALT

(00000).

(THIS

LOCATION

IS

ALSO

THE

STA-

TUS

FOR

THAT

VECTOR

ENTRANCE,

BUT

THIS

HAS

NO

EFFECT

ON

IT

ALSO

BEING

THE

IF

A

HALT

OCCURS

IN

THE

TRAP

OR

INTERRUPT

VECTOR

AREA,

REGISTER

SIX

SHOULD

BE

EXAMINED

TO

DETERMINE

ITS

CON-

TENTS,

T~EN

USE

REGISTER

SIX

CONTENTS

AS

AN

ADDRESS

TO

DETERMINE

THE

LOCATION

WHERE

THE

PROGRAM

WAS

AT,

W~EN

THE

INTERRUPT

OR

TRAP

OCCURRED.

(MEMORY

AS

SPECIFIED

BY

R6

CONTAINS

T~E

PC

OF

THE

INSTRUCTION

FOLLOWING

THE

INSTRUCTION

WHERE

THE

TRAP

OCCURRED).

TTYINl

(TTy

INPUT)

THIS

ROUTINE

OPERATES

IN

THE

INTERRUPT

MODE

AND

CHECKS

FOR

A

COUNT

PATTERN

IN

THE

READER

OF

THE

TTY.

THE

ROUTINE

WILL

ACCEPT

AN

tNFtNITE

NUMBER

OF

~ERO

BYTES

(BLANK

TAPE).

BUT

THE

FIRST

ByTE

THAT

IS

NOT

A

~ERO

MUST

BE

A

ONE

AND

ALL

SEQUENTIAL

BYTES

MUST

BE

ONE

GREATER.

IF

THE

ROUTINE

DETECTS

AN

ERROR

IN

THE

COUNT

PATTERN,

IT

CHECKS

TO

SEE

IF

IT

IS A

207 (BELL).

IF

SO

IT

IS

IGNORED,

IF

NOT

A

COMPARSION

ERROR

IS

FLAGED.

TYOUT

(TTY

OUTPUT)

THIS

IS A

ROUTINE

THAT

OUTPUTS

A

COUNT

PATTERN

IN

THE

INTERRUPT

MOOE

TO

THE

TELEPRINTER.

IF

A

PAPER

TAPE

IS'PUNCHED

IT

MAY

'HAVE

201'S

(BELLS)

IN

IT.

PUNCHED

WHEN

THE

BELL

FOR

PASS

COMPLETE

RINGS.

RFSTART

(RF-i1

DISK)

THIS

ROUTINE

PERrORMS

A

WRITE

AND

A

WRITE

CHECK

OF

THE

DISK.

THE

DATA

THAT

IS

WRITTEN

ON

THE

DISK

IS

PART

OF

TEST

PROGRAM

CODE

THAT

IS

NEVER

MODIFIED.

THIS

SEGMENT

Or

CORE

IS

WRITTEN

IN

CONTIGUOUS

BLOCK

THRU

T~E

DISK

MEMORY,

AFTER

THE

TOTAL

DIS~(S)

~AS

BEEN

WRITTEN,

A

WRITE

CHECK

IS

USED

TO

VERIFY

THAT

THE

DATA

HAS

BEEN

~RITTEN

CORRECTLY

ON

THE

DISK,

NOTE

T~AT

NO

"DATI"

ARE

USED

IN

EXERCISING

THE

DISK

(DATA

IS

NOT

TRANSFERRED

INTO

CORE>.

THERE

IS

A

LOCATION

IN

THE

PROGRAM

THAT

IF

MODIFIED

wILL

ALLOW

ExERCISING

UP

TO

EIGHT

DISKS.

5.2.9

rEND~

,(TCll

FORWARD

END

20NE)

MA1~pEt

PAGt"

6

FENO~

IS

THE

FIRST

ADDRESS

IN

THE

DECTA~E

INTERRUPT

VECTO~

(214).

THIS

ROUTINE

wILL

READ·

:~

REVERSE,

BLOCK

~UMBERS

UNTIL

THE

REVERSE

END

tONE

IS

FOUND.

AT

THIS

POINT

THE

INTERRUPT

VECTOR

AND

COMMAND

REGlSTER

ARE

MODlrIED

TO

READ

ALL

BLOCK

NUMBERS

I~

THE

FORWARD

DIRECTION,

EACH

BLOCK

NUMBER

READ

IS

COMPARED

WITH

THE

EXPECTED

BLOCK

NUM"

8ER

COUNT

AND

MI5COMPARISONS

REPORTED.

WHEN

EACH

BLOCK

IS

FOUND

(WITH

THE

EXCEPTION

OF

BLOCK

0) A

BLOCK

(400

WORDS)

OF

TEST

DATA

IS

WRITTEN

ONTO

TAPE.

AFTER

ALL

BLOCK

NUMBERS

HAVE

BEEN

READ

THE

TAPE

IS

DRIVEN

INTO

THE

FORWARD

END

tONE.

HERE

THE

DIRECTION

IS

REVERSED

AND

ALL

BLOCK

NUMBERS

ARE

READ

IN

REVERSE.

STARTING

WITH

BLOCK

1100

THROUGH

BLOCK

1

THE

DATA

IS

READ

FROM

TAPE.

T~E

SAME

BUFrER

IS

USED

FOR

BOTH

READ

AND

WRITE

OPERATIONS.

THE

DATA

IN

THE

BUFFER

IS

CHECK~

SUMMED

DURING

THE

READ

OPERATION.

IF

THE

DATA-BUFFER

IS

DESTROYED

DURING

A

READ

OPERATION

IT

MAY

BE

NECESSARY

TO

RELOAD

THE

PROGRAM.

5,2,10

LCLK

(LINE

CLOCK)

THIS

TEST

OF

THE

LINE

CLOCK

IS

IN

THE

INTERRUPT

MODE.

IF

OPERATING

CORRECTLY

THE

SYSTEM

I/O

wILL

RUN

A

FULL

SPEED

rOR

'5

SECONDS

THEN

ALL

1/0

AT

LEVEL

FOUR

OR

LESS

WILL

STALL

FOR

5

SECONDS.

THIS

IS

BASED

ON

6~

CYCLES

AS

THE

LINE

FREQUENCY,

5.2.11

LPl

(LINE

PRINTER)

THIS

ROUTINE

OUTPUTS

TO

THE

LINE

PRINTER

IN

THE

rLAG

MODE

WHILE

rILLING

THE

BurF£R

IN

THE

INTERRUPT

MODE

WHILE

THE

BUFrER

IS

BEING

PRINTED,

5.2.12

HSRINl

(PCll

INPUT)

THIS

ROUTINE

OPERATES

IN

THE

INTERRUPT

MODE

AND

CHECKS

FOR

A

COUNT

PATTERN

IN

THE

PCll

READER.

THE

ROUTINE

WILL

ACCEPT

AN

INFINITE

NUMBER

OF

lERO

ByTES

(BLANK

TAPE).

SUT

THE

rIRST

BYTE

THAT

IS

NOT

A

~ERO

MUST

BE

A

ONE

AND

ALL

SEQUENTIAL

BYTES

MUST

8E

ONE

GREATER.

IF

THE

ROUTINE

DETECTS

AN

ERROR

IN

THE

COUNT

PATTERN,

A

DATA

ERROR

IS

FLAGED.

5.2.13

HPOUT

(PCll

OUTPUT)

THIS

IS

A

ROUTINE

THAT

OUTPUTS

A

COUNT

PATTERN

IN

THE

IN-

TERRUPT

MODE

TO

THE

HIGH

SPEED

PUNCH.

5.2.14

CORE

EXPANSION

(OET1)

THIS

ROUTINE

IS

CONT~OLLED

BY

SWITCH

9.

THE

PROCESSOR

MAINLINE

CODE

WILL

8E

EITHER

4KW

OR

EXPANDS

TO

THE

MAXIMUM

CORE

THAT

IS

AVAILABLE.

THE

ROUTINE

DETERMINES

THE

MAXIMUM

CORE

SIlE

BY

DOING

A

"DATO"

TO

A

LOCATION

IN

EACH

BANK.

IF

THE

BANK

DOES

NOT

EXIST, A

TIME

OUT

WILL

OCCUR.

WHEN

CORE

SIlE

IS

DETERMINED

AN

IMAGE

OF

BANK

0

IS

TRANS·

FERRED

TO

EACH

EXISTING

BANK.

THEN

THE

CODE

IN

EACH

BANK

IS

MODIFIED

SO

THAT,

WHEN

THE

LAST

SUB

TEST

IN

A

MEMORY

BANK

IS

EXECUTED

THERE

IS

A

JUMP

INSERTED

TO

THE

FIRST

SUB

TEST

OF

THE

WHEN

IN

THE

LAST

BANK

THE

MODIFIED

INSTRUCTION

WILL

TRANSFER

yOU

TO

BANK

0.

THE

LISTING

SHOWS

ONLY

THE

CODE

OF

BANK

~ERO.

WHEN

AN

ERROR

OCCURS

THAT

IS

NOT

IN

BANK

~ERO,

IGNORE

THE

BANK

BITS

OF

THE

PRINT

OUT

AND

USE

THE

LISTING

FOR

BANK

~ERO.

5.3

PROGRAM

AND/OR

OPERATOR

ACTION

5.3.1

LOADING

AND

STARTING

AT

200

WITH

ALL

SWITCHES

DOWN

IS

WORSE

CASE

TESTING.

IF

AN

ERROR

IS

DETECTED

HERE.

THERE

WILL

8E

A

PRINTOUT.

WHEN

AN

ERROR

IS

DETECTED

AND

IT

IS

NECESSARY

TO

SCOPE

ON

IT,

PLACE

SW15

UP

TO

HALT

ON

ERROR,

THEN

SW14

UP

TO

LOOP

ON

ERROR,

THEN

SW13

UP

TO

DELETE

PRINTOUTS.

WHEN

TESTING

THE

HSR

OR

TTY

READER

THE

TAPE

~UST

HAVE

A

COUNT

PATTERN

AND

BE

LOCATED

ON

THE

LEADER

PORTION

WHEN

STARTING

TEST,

6.

ERRORS

6.1

ERROR

P~INT00T

M.A

I

N<O,E

C -

~"AGr

7

ARE

I N A

TWO

WORD

FGR"1A

T,

THE

1ST

IS

PC"'2

OF

THE

DETECEO

ERROR,

T~E

2ND.

IS

THE

STATUS

REGISTER.

REFER

10

THE

LISTING

FOR

DETAILED

INFORMATION.

6.2

ERROR

RECOVERY

FOR

TTY

READER

AND

HSR,

TAPE

MUST

BE

REPOSITIONEO

TO

LEADER

BEFORE

RESTARTING

TEST.

7.

RESTRICTIONS

7.1

STARTING

RESTRICTION

IF

LINt

pRINTER

IS

USED

RESTART

ADDRESS

MUST

BE

400

FOR

HS~

AND

TTY

READER,

TAPE

MUST

BE

ON

LEADER.

7.2

OPERATIONAL

RESTRICTION

NONE

8.

MISCELLANEOUS

TRACKING

DOWN

UNUSUAL

FAILURES

MAINDEC

..

PAGE

8

rAILURES

THA~

MAY

OCCUR

BECAUSE

OF

A

FALSE

ENTRy

INTO

A

SUBTEST,

OR

A

rAILURE

IN

A

CONTROL

ROUTINE

RATHER

T~AN

A

SUBTEST.

DETECTION

OF

THESE

MAY

BE

ACCOMPL1SHED

BY

SEVERAL

PROCEDURES.

THERE

IS

A

LOCATION

CALLED

"RETURN"

T~AT

RECORDS

THE

LAST

SUC-

CESSFUL

SUBTEST

COMPLETED.

T~ERE

IS

ANOTHER

LOCA-

TION

CALLED

"SCOPEF"

THAT

SHOWS

~OW

MANY

TIMES

T~E

SUBTEST

HAS

BEEN

EXECUTED.

THERE

IS

ANOT~ER

LOC'~

TION

CALLED

"ICOUNT"

THAT

CONTAINS

T~E

ITERATION

COMPARISON

VALUE.

THE

STACK

"R6"

SHOULD

BE

EQUAL

TO

"BurF"

WHEN

THE

FTRST

INSTRUCTION

OF

THE

SUBTEST

IS

ENTERED.

TO

REDUCE

INSTRUCTION

EXECUTION

IN

CON-

FUSING

SITUATION,

THE

"SCOPE"

LOCATION

FOLLOWING

THE

SUBTEST

SHOULD

BE

CHANGED

TO

A

BRANCH

TO

THE

FIRST

INSTRUCTION

OF

THE

SU8TEST

(THE

FIRST

LOCATION

FOL-

LOWING

T~E

LOCATION)

AND

THE

"HLT"

LO-

CATION

MAY

8E

REPLACED

WITK

A "NOP".

A

USER

MAY

ADO

A

UNIQUE

ROUTINE

TO

THIS

TEST

TO

EXERCISE

A

NON

DEC

OPTION,

FOR

CHECKING

BUS

INTERACTION

WITH

HIS

EXISTING

DEC

OPTIONS.

FOR

TROUBLE

FREE

INTERACTION

THERE

ARE

A

FEW

GROUND

RULES

THAT

SHOULD

8E

FOLLO~ED.

1.

USE

NO

REGISTERS.

2.

THE

ROUTINE

SHOULD

8E

STAND

ALONt.

3.

THE

EXISTING

"HLT"

SHOULD

BE

USED

FOA

.E.RROR

OETECTION.

4.

CODE

IN

THE

PRIMING

AREA

SHOLD

SET

INTERRUPT

ENABLE,

JNITIALI2E

DATA

AND

RAISE

A

FLAG

IF

NECESSARY.

5.

THE

INTERRUPT

VECTOR

STATUS

WORD

SHOULD

CONTA[N

THE

.

PRIORITY

LEVEL

OF

T~E

DEVICE.

6.

THE

INTERRUPT

VECTOR

SHOULD

POINT

TO

YOUR

STANO

ALONE

ROUTINE.

7.

THE

STAND

ALONE

ROUTINE

WHEN

COMPLETING

ALL

HOUSE

KEEPING

OPERATION

AND

DATA

COMPARISONS

SHOULD

THEN

EXECUTE

A

"RTI"

TO

RETURN

TO

MAINLINE

CODE.

(e.

co~

I NSERTI

ON

or

USER

I/O

RouT

I

NES

1.

MAY

BE

INSERTED

IN

BANK

~ERO

WHERE

1/0

ROUTINES

EXIST,

FO~

DEVIcES

THAT

THE

USER

DOES

~DT

HAVE,

IF

CORE

EXPANSION

IS

TO

BE

INHIBITED,

THE

uSER

MAV

OVERLAV

THE

EXPANSION

CODE.

2.

Ir

T~E

USER

HAS

MORE

THAN

4KW

OF

CORE,

THE

ROUTINE

MAY

BE

PLACED

IN

ANY

OF

THE

EXTRA

SANKS

AND

coRE

EXPANSION

BE

INHIBITED.

3.

IN

T~E

PRIMING

COD£

SEVERAL

INSTRUCTIONS

BEFORE

THE

TAG

"MAINLINE"

THERE

IS

AN

INSTRUCTION

JSR

%7,.#USER.

THE

SECOND

WORD

OF

THAT

INSTRUCTION

IS

AN

ABSOLUTE

ADORISS

THAT

THE

USER

MAY

CHANGE

TO

POINT

TO

HIS

ROU-

TIN[.

THE

USER

SHOULD

EXIT

HIS

PRIMING

ROUTINE

WITH

A

RTS

~7

INSTRUCTION.

8.1

EXECUTION

TIME

EXECUTION

VARIES

WITH

NUMBER

OF

DEVICES"

FOR

4KW

SYSTEMS

WITH

TTY

AND

~SR

ONLY,

ABOUT

1

MINUTE

WITH

THE

TRACE

BIT

CLEARED

ABOUT

1.5

MINUTES

WITH

THE

TRACE

BIT

SET.

WITH

28KW

SYSTEMS

USING

TTV

AND

HSR

WITH

TRACE

BIT

CLEARED

AND

WITH

TRACE

BIT

SET.

9.

P~OGRA~

QESCRIPTION

MAINDEC-

PAGE

9

T~E

DESIGN

or

THIS

SYSTEM

EXERCISER

IS

PREDICATED

UPO\

IT

BEING

PRIMARILY

INTENDED

FOR

A

PAPER

TAPE

SVSTE't

wITH

FOUR

KW

OF

CORE,

AND

THAT

IT

BE

EASY

TO

RuN

A~D

UNDERSTAND.

ALSO,

THAT

IT

MAY

BE

MODIFIED

EASILY

TO

EXERCISE

A

WIDE

MULTITUDE

OF

PERIPHERALS,

INCLUDING

THOSE

OF

THE

CUSTOMER'S

OWN

DESIGN.

T~E

CONCEoT

IS

TO

HAVE

ALL

DESIRED

1/0

RUNNING

CONCUR-

RE~TlY

wITH

THE

PROCESSOR

TEST

FOR

BACKGROUND.

THE

DECISION

WHICH

1/0

DEVICES

TO

BE

USED

IS

MADE

AT

START

UP

TIME:.

THE

DATA

PATTERNS

USED

IN

THE

EXER~

CISER

ARE

FIXED.

FOR

~ECHANICAL

DEVICES,

SUCH

AS

THE TTY

READER,

THERE

IS

NO

AUTOMATIC

RE-SYNCHRONI-

2ATION

IF

IT'S

TAPE

BECOMES

OUT

or

PHASE

WITH

THE

DATA.

IT

WILL

BECOME

NECESSARY

TO

STOP

THE

EXER-

CISER

AND

MANUALLY

RESYNCHRONI~E

THE

TAPE

AND

RESTART

THE

EXERCISER.

THERE

IS

NO

MONITOR

IN

THE

CONVENTIONAL

SENSE.

EACH

DEVICE

THAT

IS

TO

BE

EXERCISED

HAS

IT'S

OWN

STANO

A-

LONE

ROuTINE

THAT

OPERATES

IN

THE

INTERRUPT

MODE.

THESE

ROUTINES

NEED

NO

SUPERVISION

OR

MONITORING

AFTER

THEY

ARE

INITIATED.

THERE

IS A

PRIMER

AREA

THAT

CHECKS

THE

SWITC~

REGISTER

TO

SEE

WHAT

DEVICES

A~E

TO

BE

INITIATED.

THE

PRIMER

AREA

SETS

THE

INTERRUPT

ENABLE

BIT

IN

THE

DEVICE

STATUS

REGISTER,

INITIAL"

IlES

THE

DATA

~ATTERN

AND

INITIATES

AN

OPERATION

TO

RAISE

DATA

FLAGS

ON

DEVICES

iHAT

CAN

NOT

INITIATE

THEM

THEMSELVES.

THEN,

THE

PRIMER

JUMPS

TO

THE

PRO-

CESSOR

TEST

WHERE

THE

INDIVIDUAL

DEVICES

ARE

SERVICED

AT

THE

INTERRUPT

RATE.

9.

PROGR4M

DESCRIPTION

MAl

~~::JE

C

..

PAGE.

_0

THE

INSTRUCTION

EXERCISER

IS

A

STRAIG~-

LINE

rEST

a

F"

I

~~

S T

Rue

T

ION

S • T

~

ESE

QUE.

N C E I N W H r c

,-

-;-

HEY

.t.

R [

EXECUTED

IS

THE

SAME

SEQUENCE

IN

WhI~rl

THEY

ARE

SHOWN

I~

THE

LISTING.

EACH

AREA

OF

CODE

FROM

"SCOPE

TO

SCOPE"

IS

AN

INDIVIDUAL

SUB-TEST.

WIT~

SWITCH

11

UP

THE

SU8

M

TEST

IS

EXECUTED

ONE

TIME

AND

THEN

THE

IS

EXECUTED,

AND

SO

ON

TILL

ALL

SUB-TESTS

ARE

E~ECUTED.

HOWEVER

IF

SWITC~

11

IS

DOWN

THE

SUB-TEST

WILL

BE

EXECUTED

SOME

"N"

NUMBER

Or

TIMES

SEF"ORE

ENTERING

THE

IF

SW1.TCH

14

IS

UP

YOU

WILL

NEVER

LEAVE

THE

CURRENT

SUS-TEST

you

ARE

IN.

THIS

USE

IS

INTENDED

rOR

TROUBLE

SHOOTING

A

MALFUNCTION

IN

A SUB-TEST.

T~E

FIRST

GROUP

or

SUB-TESTS

ARE

THE

BINARYS

AND

UNARYS.

THOSE

INSTRUCTIONS

ARE

TESTED

IN

THE

INDEX

MODE:

SOURCE

ONLY,

DESTINATION

ONLY,

THEN

80TH

SOURCE

AND

DESTINATION.

THE

SAME

INSTRUCTIONS

ARE

THEN

TESTED

USING

THE

IMMEDIATE

MODE

INDIRECT.

THESE

MODES

ARE

TESTED

AGAINST

OTHER

MODESJ

WHICH

MAY

USE

A

REGI:STER

OR

MEMORy

LOCATION.

THESE

WILL

BE

SWAPPED

BETWEEN

SOURCE

AND

DESTINATION.

ArTER

THE

MODES

AND

INSTRUCTION

HAVE

BEEN

PROVEN

IN

THE

WORD

MODE,

THEY

ARE

THEN

TESTED

IN

THE

BYTE

MODE.

OTHER

TESTING

IS

ALSO

DONE

WHERE

THE

"JSR"

INSTRUCTION

IS

TESTED

IN

NESTED

COMBINATIONS.

ALL

COMBINATIONS

or

NUMBERS

ARE

TESTED

USING

THE

COMPARE,

ROTAT[,

ADD AND

COMPLIMENT

INSTRUCTIONS.

THERE

IS

ALSO

A

MINIMUM

T£ST

OF

POWER

FAIL

AND

AUTO

RECOVERY,

WHICH

IS

NOT

ENABLED

UNTIL

AFTER

T~E

FIRST

PASS

OF

THE

PROGRAM.

THE

PROGRAM

REQUIRES

TWO

BELLS

ON

THE

TTY

TO

MAKE

ONE

TRUE

PASS

OF

THE

PROGRAM.

THE

FIRST

BELL

OCCURS

AFTER

ONE

PASS

or

THE

INSTRUCTION

TEST

WITH

THE

TRACE

BIT

CLEARED.

THE

SECOND

BELL

MARKS

THE

END

OF

AN

INSTRUCTION

TEST

PASS

WITH

THE

TRACE

BIT

SET.

THE

REASON

FOR

EXECUTING

ALL

INSTRUCTIONS

wITH

THE

TRACE

BIT

SET

IS

TO

TAKE

US

INTO

SERVICE

AT

THE

END

OF

EACH

INSTRUCTION.

THE

C

O.R

E

LAY

0

UTI

S

BRa

KEN

I

NT

0 F I V E

DIS

-r

INC

T

PAR

T S :

(1)

THE

TRAP

CATCHER,

(2)

THE

SET

UP

AND

I/O

PRIMER

AREA

AND

I/O

TEST

ROU-

TINES,

(3)

THE

PROCESSOR

TESTS

AND

(4)

CONTROL

AND

UTILITY

ROUTINES.

(5)

CORE

DETECTOR

AND

ExPANSION

ROUTINE.

10.

LISTING

11.

FLOw

CHART(S)

vHHHH~0

000002

01210004

~00006

000010

000012

01210014

000016

00121020

01210022

ekH'l024

000026

000030

000032

000034

000036

000040

000042

0~H'J044

000046

000050

000052

000054

000056

e00060

000062

000064

0~0066

000070

00e"~72

000074

~H10076

000100

~00102

?0rHl4

~00106

200110

~H:"'2l2

4

el

104000

104400

177776

016034

016756

177570

0121121000

01210fl140

12'00002

000000

,,00006

000000

000012

000000

000016

000000

00121022

0£lel000

000026

000001l

000032

0110000

000036

000000

000042

000000

00121046

"Hlel000

1211210052

000000

000056

000000

00012162

00000k'

000066

0012112100

000072

0001211210

012H'!0/6

00121121016

000102

000000

0001r6

000001t.

000112

ITST

17

c;vSTST

;COPYRIGhT

1970,

DIGITAL

EQUIPMENT

CORPORATION,

MAYNARD

~ASS.

01754

:PDP11

PqELIMINARY

SVSTEM

TEST

---

TTV-pell-LINE

CLOCK-L

P

ll,Rf11.TC11

ANn

KEll

;TEST

SIMULTANEOUS

RUNNING

or

1/0,

WITh

PROCESSOR

I~STRUCTIa~

TEST

AND

~IT~

;wITH

TRACE

BIT

ENABLED

TO

BE

CONSIDER

MAINLINE

CODE

NOP=240

;SYSTEM

NULL

OPERATION

HLT=EMT

JTRAP

USED

fOR

ERROR

PRI~TOUT

SCOPE=TRAP

ITRAP

USED

SCOPE

LOOP

AND

ITERATION

OF

SUB

PRO?LF~S

CC=177776

TDSR=TCSR

BUFF=FIN

SR=177570

.=k'l

,REPT 40

.+2

HALT

.ENDR

,+2

HALT

.+2

HALT

.+2

HALT

.+2

HALT

.+2

HALT

.... 2

HALT

.... 2

HALT

,+2

HALT

,+2

HALT

.+2

HALT

.+2

HALT

.+2

HALT

.+2

HALT

.+2

HALT

.+2

HALT

,+2

HALT

,+2

HALT

.+2

HALT

, + 2

;TRAP

ENTRANCE

,TRAPPED

TO

JTRAP

ENTRANCE

.TRAPPED

TO

.TRAP

ENTRANCE

,TRAPPED

TO

ITRAP

ENTRANCE

,TRAPPED

TO

JTRAP

ENTRANCE

ITRAPPED

TO

PREvyOUS

LOCATION

,TRAP

ENTRANCE

.TRAPPED

TO

,TRAP

ENTRANCE

jjRAPPED

TO

;TRAP

ENTRANCE

;TRAPPED

TO

;TRAP

ENTRANcr

,TRAPPED

TO

;TRAP

ENTRANCE

;TRAPPED

TO

pTRAP

ENTRANCE

;T~APPED

TO

PRlVIOUS

LOCA1'ON

sii1AF"

ENTRANCE

.TP!?PED

TO

PREVI~US

LOCATION

iiRAP ENiRANcr

;TRAPPED

TO

~RE"\jI::U5

LI"'IC/,;lI!l'l\!

;TRAP

ENTRA~CE

;TRAPPEO

TO

PR!:.VIJUS

LOCt,",YO'i

J T RAP E N T R

H~

r.

c

,TRAPPED

TO

PR::'V I

aus

L OCA::;

D:'!

,iRAP

ENTRANCE

J T

RAP

P

EDT

CPR

II

IOU

S

I,

I)

C

fo

T :

:~

.'J

,TRAP

rNTRANC:

J T RAP P

EDT

C

f..l

I:~;I~'

L l'

~:

L

i~

CA'

;

TRAP

C::'HRANC

ITRAPPFG

TO

t-'

,:

J.::US

L:~.";""

::(:"

J '!'RJ P

'-NTRAN(

.. T

j:-

P

'-,

Teo

".~!!

;'1

t '

..

:

PALX11

V0121~,

14"FEB-71

2'00112

000e00

e01iH14

2100116

200116 00e1eel0

~~0120

000122

ize122

1210e1ev,~

Zle:24

12100126

<-~l2126

vHH?JlIC0

z22130

000132

;?00132

000~ee

dHH34

0121121136

e.~121136

000fl00

000140

00eJ142

el2l0142

12100fl00

::H'HH44

12100146

zee'146

000e00

2~0150

12100152

2l~0152

000e~0

2001.5 4

000156

N~0156

000000

~~0e16r2!

00r2!162

000162

12100000

200164

12100166

Zer2!166

1210r2!000

00121170

000172

Z00172

000000

000174

12100176

eZ0176

121000021

000e14

ee0~14

000e16

0~0~16

00~H~00

000ei30

2e0030

12115616

l~H~e32

00eJ~;40

00.0.e,

34

200034

1211635121

~0012136

12100e

l

k'!2

121002'00

131216

PAGE

1-1

HALT

JTRAPPED

TO

:TRAP

ENTRANCE

HALT

,TRAPPED

TO

ITRAP

ENTRANCE

HALT

,TRAPPED

TO

,TRAP

ENTRANCE

HALT

,TRAPPED

TO

lTRAP

ENTRANCE

HALT

JTRAPPED

TO

,TRAP

ENTRANOE

HALT

,TRAPPED

TO

,TRAP

ENTRANCE

HALT

.TRAPPED

TO

,TRAP

ENTRANCE

HALT

STRAPPED

TO

,TRAP

ENTRANCE

HALT

'TR~PPED

TO

.TRAP

ENTRANCE

HALT

,TRAPPED

TO

,TRAP

ENTRANCE

HALT

.TRAPPED

TO

.TRAP

ENTRANCE

HALT

JTRAPPED

TO

,TRAP

ENTRANCE

HALT

,TRAPPED

TO

,TRAP

ENTRANCE

HALT

,TRAPPED

TO

,+2

HALT

'rALSE

TRACE

TRAP

,=3121

PRINT

'rOR

HALT

TRAPS

34121

.HIGHEST PRIORITV

.-=34

SCOPEC

,USER

TRAP

fa

.=200

(R6) IS

THE

STACK

POINTER

«R6»

IS

THE

PC+2

Or

LOCATION

WHERE

THE

TRAP

ORIGINATED

fOR

NORMAL

OPERAT

I

ON

RUN

)JI

TH

AL.L

SW

I

TCHES

DOWN

SR

15=10R UP---HALT

ON

ERROR

SR

14=10R

UP-~-SCOPE

LOOP

:SR 13=10R

UP-~~lNHIBIT

PRINT

OUT

;SR 12=10R

UP---INHIBIT

TRACE

TRAPPI~G

:SR 11=10R

UP---INHIBIT

SUB-PROBLEM

ITERATION

i5R

1~=10R

UP---INHIBIT

PROCESSOR

TEST

:5R 09=1

OR

UP

INHIBIT

VARIABLE

CORE

EXPANSION

LOCATION

:SPECIAL

DELETE

SWITCHES-SET

RESPECTIVE

SWITCH

TO

A 1

TO

INHIBIT INITIATION

or

GrvrrE

;5111

2)=1

INHIBIT

TTY

OUTPUT

;Sw

1=1 INHIBIT

TTY

INPUT

:Sw

2=1 INHIBIT

1-15P

;S,,", 3=1 I

NH

I 8

IT

HSR

ISw

4=1 INHIBIT LINr

CLOCK

JlALX11

V00~

00~H~60

ee006e

~H~1?42

0101i'062

tZ1e0iJl~

0~HH~64

0~1.340

0e0066

000~)00

e0e

07.0

001404

001207.2

0100?00

ee0~74

1211211472

0~~2'76

0~H;H":l0

000100

k:ee10~

12101604

e~H~H~,2

0121030121

00020121

121012121210

01210137

000400

0101212",4

.

ZelZ212'4

002104

J00206

012112!240

000214

0ee214

tH:'l2206

eee216

00030121

177776

000220

177?60

121212222

177562

e1:H~224

177564

0002~

1775066

eee230

177550

(!'HH~

232

177552

0':H~234

177554

0kH~236

177556

12100240

177546

012'0242

177514

~HH"244

177516

ieC246

177470

~iZ~250

177472

2~e252

177466

re025

4

177462

~~e25p

1/7464

ere260

177460

~ee262

177461

.:'2'e'26 4

177304

.::-ee?66

177302

i\

(l

2 7

~

17731~

~il272

177311

:?

..

'

~

2 7 4

177306

r."2~?:t

177300

-.

...

,

1;

.,

.

.,

l.

t.

......... L

(i

1-

/

7312

P-AGE

1-2

.S~

5=1

INHIBIT

~r1

15K

:SW

6=1

INHIBIT

Te1l

OECTAPE

; S

~

7 = 1 I N H I 8 I T

LIN

£:

P R I N T E R - - - I

.f

Ll N E P R T

~

T E

~

1

SUS

LO,

MUS

TR:£

S T

.unA

T4

m I

;IF

EAE

EXIST

IT

WILL

BE

AUTOMATICALLY

SELECTED.

;POP11

SlMULTANfOUS

I/O

.=6;:'

T T

YI

NR

0

TYOUTR

0

HSR1NR

200

HPOUTR

0

.=10?

LK3

300

.=20e'

JMP

8I#START

.=204

IRF

24,0

.=214

FENDt

300

STATUS::177776

TRCSR:

177560

TRDR:

177562

TTCSR:

177564

TT08R:

~·6

w...:'

.....

HRC5R:

177550

HRD8R:

177552

HPCSR:

177554

HPDBR:

177556

LKCSR:

177546

LPCSR:

177514

LPDBR:

177516

RFDAE:

177470

RFD8R:

177472

RFDAR:

177466

RFWC:

177462

RFCAR:

177464

RFCSR:

177460

RFCSRH:

177461

MQ:

1773e4

AC:

1773el2

sc:

177310

SRE:

177311

"1UL:

177306

DYV:

17 7

300

/\,JOR:

1773-12

;TTy

IN

INTERRUPT

VECTOR

'TTY

OUT

INTERRUPT

VECTOR

J~SR

INTERRUPT

VECTOR

I~SP

INTERRUPT

VECTOR

,INTERRUPT

VECTOR

LINE

CLOCK

'LEVEL

SIX

PR.IORITY

JRF11

DISK

iLEuEL 5

:DEC

TAPE

'LEVEL

6

lDISK

ADDRESS

AND

ERROR

;OATA

8~FFER

REGISTER

;OlSK

LDDRE~S

~EGISTER

;WORD

rOUNT

REGiSTER

;

CURRE:..

ADDRESS

,iEG

I~;

.

E~

,STATUS REGISTER

IHIG~

BYTE

ADDRESS

OR

cs~

IEAE

LOCATIONS

PALX11

V003

~~0302

177314

\2)0031214

177316

d:'~306

l~e310

~l0312

e0eJ31 4

~00316

Z.00320

e00322

z0e324

20121326

e00330

200332

2e0336

e00342

0121121344

000346

02121350

000352

000354

300356

000360

000362

00036

4

000366

000374

e,00400

000406

1300412

000420

~'e0424

£'00432

e00436

l~H~440

e00446

0e0450

::>.00456

000460

t'e046?

177340

177342

177340

177350

177344

177346

000214

0HH46

010246

010346

005003

012701

012702

062103

0014J1

104000

02121102

001372

012603

012602

el126i~1

0002'~7

012767

0000'~2

012767

"127"

6

012767

005067

012767

005067

104400

0527

j' 7

~000~15

0327i'7

0014e

il

1040e0

1044eeJ

14-FEB-71

~02750

003750

2114462

000001

016012

016756

12100440

f2l1~004

015776

000340

·177344

01!5156

000100

177556

0146

4

~12706

016756

~~47~

0rr10005

'~472

052777

3001r0

17

7

524

lC50l

032777

000100

177516

PAGE

1-3

177314

171316

;OECTAPE

ADDRESSES

TC=177340

TeCM:

TC+2

TCST:

TC

TCDT:

TC+1"

TCWC:

TC+4

rCBA:

TC+6

,CONTROL

AND

FUNCTION

lGENERAL

STATUS

IDATA

IWORD

COUNT

,BUS

ADDRESS

TCIV: 214

;T~IS

ROUTINE

CHECKS

THE

;BY

DOING

A

CHECK

SUM

ON

IDECTAPE

INTERRUPT

VECTOR

READ

DATA

BUFFER

TCll

THE

DATA

TC1:

MOV

%1,-(6)

TC2:

NOEAE:

MOV

%2,-(6)

MOV

"3,-(6)

CI.R

"3

MOV

#TCRBU~,"l

MOV

#TCRBUF+1000,%2

ADD

(1)+,"3

ADO

(1)+,%3

BEQ

.+4

HLT

CMP

BNE

MOV

RTS

MOV

RTI

.=400

(6)+,%2

(6)+,%1

,,7

*240,EAESRT

;START

UP

FOR

MINI

MONITOR

START:

MOV

CLR

MOV

CLR

SCOPE

START2:

8IS

RESET

8IT

BEQ

HLT

SCOPE

*l,ICOUNT

#BUFF,%6

.START2,RETURN

SCOPEF

#341fJ,STAT"US

PRF"LAG

#100,\lTTCSR

#100,tlTTC5R

.+4

;SAVE

THESE

ON

THE

STACK

,SUM

OF

DATA

'ADDRESS

OF

READ

BUFFER

lEND

O~

READ

BUFFER

IEVEN

ADD

1000

ADD

-2'5

COMPLIMENT

JDATA

ERROR

TC~11

JAT

END

OF

BUFFER?

INO

•

SUM

THE

REST

JRESTORE

THE

REGISTERS

;EXIT

JBRANCH

AROUND

EAE

ROUTINE

IJUMP

OVER

EAE

SECTION

;SET

UP

STA~K

JLO~K

OUT

INTERRUPTS

,PRINT

ROUTINE

BUSY

'INTERRUPT

E~ABLE

'RESET

DID

NOT

CLEAR

INTERRUPT

ENABLE

:00[5

"RESET"

ON

THE

BUS

LAST

TOO

LONG

MOV

#8UFF,"6

,SET

UP

STACK

RESET

81S

#100,tlTTCSR ,SET A

BIT

tt100,6ITTCSR

lIS

IT

SET

""L

x'il1

v0i3~

1.(-rrEf

..

7f

1 J":'iti'

PAtGe

1-4*

~~0'5,f~

~0H~:01

BNt:

• +4'

00'~51~

104~"0

0

~Lr

J

R'ES£T

IS

ON

S'US

TO'O:

LONG

000'51,2

112l44~00

SCOPE

01tH~514

0e0005

~ESET

200516

012767

(;1037521

0157;)0

" a v #8EGIN,RETUR\J

e0052;4

e!12}

Yl

((00366

0e021l4

v.C

v'

tfNOEAE

,~tl4

;TES'"

"OR

EAE

000532 005777

177526

TST

~MQ

;TRAP I

I='

~::NEXISTANT

000536

i.127

6 7

000006

17724~

"'OV

#6,4

; •

+2=~AL.

r

00'0'54'4 012'16'1

000002

177234

"10V

#2,6

J

A'~

RTI

rOR

NON

EXISTENT

1/0

00055

1

2

012767

00~0'H

~00540

~OV

#1,DATA1 ISASE

DATA

rOR

TTV

READER

OR

KEVBOARD

00056:0 0'12767

000000

000600

MOV

#0,OATA2 ISASe:

DATA

F"OR

TTV

PUNCH

OR

TE

L

EPR

t

NH"R

00056'6

012767

000001

00121656

MOV

#1,DATA3 ,BASE

DATA

F"OR

HSR

0~H2'5

i4

012767 000000

000752

MOV

#0,DATA4 lSASE

DATA

F"OR

HSP

00060!2

012706 016756

MOV

#8UFF,%6

0006~16

121:05067

ekH~746

CLR

DELAY

;F"OR

READER

STALL

...

HSR

-

00061:2 0'12767 000342J

177156

""OV

#341Zl,STATUS

ILOCK

OUT

INTE:RRUPTS

00062:0

036727

176744

00121001

BIT

SR,#l

00062'6

001003

BNE

STl

0121063

'0

052777

000100

177366

SIS

#100,'TTCSR

,TTv

OUT

00063

i6

036727

176726

000'0'02

ST1:

BIT

SR,#2

00'0644

001003

BNE

ST2

00064:6

052777

00011('1

177344

BIS #101,@TRCSR 'TTV

IN

00065

i4

005777

177354

ST2:

TST

lilHPCSR

,'rEST

FOR

OUT

OF

TAPE

000660

100'407

8MI

ST3

000662

036727

176702

000004

BIT

SR,#4

000670

001003

BNE

ST3

000672 052777

000100

177334

BIS

#100,'HPCSR

'I-IS?

00070'0

005777

177324

ST3:

TST

ttHRCSR

.TEST

F'

OA'

OUT

or

TA!'!:

00070''4

100412

8MI

ST4

0121070'6

036727

176656

00'0010 8 I T

SR,#10

0~0'

i'4f'

(~1006

8NE

ST4

00121716

"12767

000100

000'634

MOV

#100,DELAY

Jr.-OR

STAL.L

HSR

00072A

052777

000101

177276

8IS

#11'1"~HRCSR

;I-ISR

0121073:2

036727

176632

000020

5T4:

SIT

5R,#20

00074'0

001005

8NE

ST5

00074'2

005067

000732

CLR

TIME

00074

16

052777

00010[.;1

177264

815

#100,'LKCSR

ILINE

CLOCK

50

OR

60

CYCLES

000754

036727

176610

0121~040

ST5:

BIT

5R,#40

100076;2

IiHh016

8NE

ST6

00e764

012767

043503

12101176

MOV

#43503,FUNCTION :WRITE

C~IECK/WR

I

n:

01210'772

10'5277

171264

n~C8

~RF'CSRH

,INJTIA:"ltE

'j

ISK"'OAR',

DAF

00077'6

016777 001172

17725e

"10V

WORDCT,~RFWC

iLENGTH

OF'

T~ANSF'ER

0010,,4

01677/

001162

177244

MOV

LL

I

MIT

,(ilRFCAR

;CORE

ADDRESS

or

START

C"F'

'o,A\SFFR

00HH2

116777

001152

177240

MOV8

FUNCTION,ilRFCSR ;TELL DISK

TO

READ

OR

WRITE

001020

,,36727

176544

000100

S'!'6:

81'

SR,#100

J2ND

NPR

TEST

CR

e121026

0e1011

9NE

ST7

;101030

012767

002176

00'1146

"10V

#TCFIRST,TCEXPE

IFIRST

Bl.OCK

Sf-IOULO

BE

trR2

~~01036

012771

002206

177254

~OV

ttFENDr.'TCIV

IGO

TO

END

H'I"lE

ON

I

fI.!TERr:;UJ:

0~

HI

4'

4

012777

00'4H~3

177234

~OV

#R+IE+RB+DO.~TCCM

lMOVE

REVERSL

~01052

036727

176512

00'0200'

S"'7:

a I T SR,#2Ql0 I LINE PRINiER

~~

010

6

~

001~3e:

8NE ST8

001062

a127b7

~'01142

176714

~OV

#ST8,4

iDON'T

C~UNGE

2

p;

:.~.~

vJ01071?

~12"1t-7

'v.0~·137

000752

~av

#137,SOLI'AT IRESET

~CP

START

OF

L I

'"

;,

~\I

~~~h17

n

012707 000117

000746

>,10

V

#79

••

CLINCT '- T

"-iE

('OUf"

PAL

Xli

V003

~tH104

001112

e:e1120

l01126

;"0113 4

;'e1142

Ze1146

;)01154

e01160

e01164

001170

001176

,~01204

e01206

e012H~

;?~H216

001220

eliH224

e01226

001234

e~1240

001242

e;01246

001250

001252

elZ1256

e01260

ekH

266

001270

001276

~e1300

e01302

001306

~01314

e01316

001322

ee1330

012'1336

e01340

e0134

4

?e1346

,;:e1350

101354

;21362

L'

~

13

6 4

012767

012737

012777

012731

012777

005~67

012767

005"3}

004737

004767

042767

016767

000401

000001

036727

001373

000167

00012100

012767

005277

000,~e2

105177

100401

104'~e0

105

7

77

201

7

66

127767

001405

022:

7

77

11'01403

104'~00

005267

022/67

001:547

011HP

4 3

012i67

016}77

~HHHH~2

105777

1~,,"!J4e1

le4w~f0

005,~6

7

022

7

c7

001

~'5

7

0007t-l

14-F"EB-71

00e137

001726

e00014

0002~0

00~11~

176643

~0~:076

015542

016762)

015572

000340

176366

176354

002524

000734

000200

177

116

000202

1771e0

176630

176600

~HHHl20

0020210

00e'0211 00r2!064

176760

176752

176744

176736

000032

0002(n

176124

000012

00040-0

0~H?l~HH

0000(?13

000C32

176660

~0e(i!12

Ql01C'

4

~~

V'

000036

176670

F'AGE

1-5

MOV

"IOV

5T8:

CLR

MOV

CLR

JSR

SIC

MOV

BR

MAINLINE:

BIT

ANE

jMP.

REG1:

"

tH37,

CURPAT

#LPiNTR,,*200

#14,@LP09R

#200,'#22'2

tt100,~LPCSR

6

#6,4

~#TRP9

"7,~#USER

%7,OETl

t;t340,STATUS

SR,REG1

,+4

WAIT

SR,#2000

~AINLINE

BEGIN

iTTY

RECEIVER

VALUES

0

TO

377

TTYIN1:

MOV

TTYIN2:

INC

RTI

TTYINR:

TS

T9

8MI

~LT

TST9

8EQ

CMPS

SEQ

CMP

BEQ

~LT

TTYIN3:

INC

TTY!N4:

CMP

8NE

8R

DATAl: 240

IltTRCSR

,+4

,TRDR

TTYIN2

,TROR,DATA1

TTYIN3

.207,'TROR

TTYIN4

DATAl

#400,OATA1

TTYIN2

TTYIN1

iTTY

TRANSMITTER

PRINT

VALUES

0

TO

377

TYOUT:

MOV

TYOUT1:

MOV

RT

I

TYOUTR:

TST8

8MI

HLT

INC

CMP

BEQ

8R

#0,DATA2

DATA2,lITTD8R

caTTCSR

,+

4

OATA2

#4~e,!)ATA2

TYOUT

T y Ol' T 1

,INTERRUPT

VECTOR

JLINE

FEED

TO

POSITION

BuF"FER

JPROCESSQR

LEVEL

4

:INTERRUPT

ENABLE

:HALT

F"OR

BUS

ERROR

,SET

UP

TIME

OUT

iNO

"T"

BIT

F"IRST

PASS

JF"OR

USER

1/0

PROGRA~

,CHECK

FOR

CORE

EXPANSION

:ALLOW

INTERRUPTS

,SAVE

SWITCIoI

,WAIT

HERE

FOR

INTERRUPTS

:INHIBIT

PROCESSOR

TEST

,STATUS

OF

SELECTED

DEVICES

,BASE

DATA

,START

READER

,RETURN

TO

MAINLINE

,IS

DONE

SET

,FALSE

RETURN

FROM

MAI~LINE

,TEST

DATA

FOR

LEAOER

JIF

LEADER

GO

BACK

'NOT

LEAOER

TEST

rOR

DATA

,BELL?

.DATA

COMPARISON

ERROR

'INCREMENT

DATA

,TEST

FOR

UPPER

LIMIT

JINtTAL

OATA

,OUTPUT

TO

DEVICE

,RETURN

TO

MAINLINE

JTEST

FOR

DONE

,BRANCH

IF

FLAG

rou~o

.FALSE

INTERRUPT

RETURN

J

INCREMENT

DATA

JTEST

DATA

F"OR

UPPER

~I~IT

;AT

UPPER

LIMIT

START

OVER

JFINISH

REST

o~

OATA

2e1370

?e137~

;'21402

,;..e1404

U~1410

001

4

12

01211414

?01420

ZiZ1

4

22

v'01430

e01434

221434

l'Ht.4"0"

0e1446

'H?1450

001454

001462

~~e1470

~01472

e01476

?0150~

00150~

001510

~12I1514

e01522

001524

ee1530

201536

e'01542

001550

001552

001554

201556

l0156~

le1562

;:'01566

201574

?01602

;e1604

£2.1.~H~

c:'

J

1612

."~1614

~'el~2i2

,"

216

26

~12

767

~F?27/

~e

0e'.""'

2

105777

100401

10400~

105777

001766

127767

0~1401

1040Q!\!l

005267

0'2"2~7

67

001353

000747

2112767

016777

000002

105777

100401

104000

046777

QHZl5267

026727

001005

005067

056777

005267

022767

0e1741

000743

2100240

2100000

00000121

Qlk)5067

052777

1il?2767

000002

105777

HH'l401

le400~

12142""'77

005267

022767

0~H?2'~

1

1766'26

17662Q!

176612

176604

0~~012

e·~04e,",0

176536

~0~052

000042

0'HH~36

012l.0-~2-6

000024

~kHHH2

0004Z0

000112

000100

00C100

176430

00~'2N'J

r0005?

'10 b 3

44

000072

176546

176520

176472

176444

176174

176416

I-ISRY\il:

'-OV

I-ISRI\J2:

INC

:nr

>4

SRI

\

R:

T5

r 8

8MI

HL"

T

T5T8

8EQ

CMPB

8EQ

~L

T

INC

CMP

8NE

8R

DATA3:

24k'

#l,D.6oTA3

~HRCSR

@lHRCSR

• + 4

taHRDBR

HSRJ:N2

(i)HRDBR,DATA3

,+4

D.6oTA3

#4"'h

DA

T A

3>0

HSRIN2

HSRXNl

;HS

PUNCH

SECTION,

VALUES

0

TO

377

;ENA2LE

READER

ON

FIX

COU~T

OF

PUNCH

HPOUT:

MOV

#0,O.6oT.604

HPOUT1:

MOV

D.6oTA4,~HPOBR

RTI

HPOUTR:

TST8

~HPCSR

8MI

,+4

HLT

BIC

DELAy,taHRCSR

INC

INTeNT

CMP

INTCNT,#14

8NE

HPOUT2

CLR

iNTeNT

815

OELAY'~HRCSR

HPOUT2:

INC

DAT,tt4

CMP

#400,OATA4

BEQ

HPOUT

8R

HPOUTl

OAT

A4:

240.

INTCNT:

~

DELAY:

0

I

8"A

SE

0 A T

,A

JSTART

READER

'RETURN

TO

MiINLINE

;

IS

DONE

SET

,FALSE

RETURN

FROM

MAINLINE

'TEST

DATA

FOR

LEADER

.IF

LEADER

GO

BACK

'NOT

LEADER

TEST

FOR

DATA

.DATA

COMPARISON

ERROR

J

INCREMENT

DATt,

,TEST

FOR

UPPER

LIMIT

ONLY

(14

TIMES)

J

INITAL

DATA

.OUTPUT

TO

DEVICE

;RETURN

TO

MAINLiNE

JTEST

FOR

DONE

.BRANCH

IF

FLAG

fOUNO

.FALSE

INTERRUPT

RETURN

~CLEAR

HSR

INTERRUPT

ENABLE

'COUNT

INTERRUPTS

lSAVE

TO

TURN

READER

ON?

INO~NEED

MORE

TIME

~YES

R:SET

C~UNTER

;SET

REAOER

tNT

ENABLE

J INCREMeNT

DAT,~

,TEST

DATA

rOR

UPPER

~i~I;

JAT

UPPER

LIMIT

START

OVER

IFINISH

REST

O~

DATA

iEQUAL

100

;TEST

LK1:

OF

LINE

CLR

815

BIS

RT

I

TST8

8MI

HLT

BIC

I~C

CMP

CLOCK,

INTERRUPT

FOR

55

SELONDS

THEN

STA~L

FOR

5

srCO~DS.

U<Z;

LK3:

LK4:

TIM

E J C L

£'

A R

~.

I N E C L

~;

;'

TIM E C

#100,LiLKCSR

#100,STATUS

@)LKCSR

,+4

#2k'lI2l,GDLKCSR

TIME

#3312l12l.,TIMF.:

J R

E"i

~j

R N

TOM~.

I

~I

00"

! N E

I T

E.

S

';

F

[':1

R

r)

M·I

E

~

0'\1 r NTERUprs i:I\'

[R

,ERE.

I A LAP S 0 F

55

<.'

I'"

'}

r~

:

PALX11

V003

f~e1634

701636

?~1644

;e1652

Z21A60

el1662

t:Z1666

Z121670

:?01676

e017N~

~01702

e01710

001716

Li:01722

;?01724

e01726

301732

lItH

734

~01736

('01744

NH746

ela1752

el?J1760

ee1762

l01766

el!H

770

?01776

l02~HH'

002004

002012

e02016

002020

le2l26

ee212J30

t02034

002036

e.02044

;02046

002050

102052

2~2~54

i.':~212J612J

,~?2066

~.;?

2?

7 4

,':l'2102

.

,'"i'

21

f2i

4

('l2:H~

,'It

~'

:

12

1103362

042777

2142767

022767

k'~174e1

1~5777

1~0.sl5

04

2777

0100751

0fl01~010

016767

016777

105777

1100405

0100002

1105177

100401

H~4"00

026727

0101415

005;~6

7

026727

001403

!1!12J5~~6

7

000750

012767

21100744

005lij67

012777

1051'77

100375

026i'27

2101"'·03

005267

000i'22

0127'67

2100/'16

en,"2'

0 0 0

000ei00

000e~0

H~5277

~16777

016777

116777

0l2JfZJ0~;2

1~5777

112J0

4~:

2

1040010

14-FEB-71

0001~0

12112101~0

00717J2121

176352

176374

176124

0121002121

176342

QHiHH42

"'00136

~12I0132

·176326

176320

17631121

00011121

~HHH17

0121010121

01210070

000137

211210046

00121012

176232

176224

1762~2

Vl00106

e00102

000070

176150

176170

176160

1761.56

TIME:

PAGE

1-7

8HIS

SIC

BIC

CMP

8EQ

T518

BPL

BIC

8R

o

LK2

#100,(FLKCSR

*HHLSTATUS

tt3612J0.,TIME

lKl

EiLKCSR

.-4

#200J~LKCSR

LK4

BRANC~

IF

TIME

LESS

THAN

55

SECONDS

a.OWER

PRIO~ITY

'O~E

MINUTE

UP

IVES-RESET

TIMER

I~O-SKIP

ON

FLAG

TILL

IT

IS.

;CLEARS

THE

FLAG

;FOUNO

FLAG

GO

INCREMENT

COUNTER

iLINE

PRINTER

SHOULD

RAISE

PROCESSOR

PRIORITY

TO

LEVEL

or

LINE

PRINTER

,INTERRUPT

VECTOR

IS

20121

LP1:

MOV

LP2:

MOV

TST8

BMI

RT

I

LP

I

NTR:

TST8

8MI

f-IL

T

LP6:

CMP

8EQ

INC

CMP

SEQ

INC

8R

LP3:

MOV

BR

LP4:

CLR

MOV

TSTB

BPL

CMP

BEQ

INC

BR

LP5:

MOV

8R

CURpAT;

0

SOLPAT:

0

CLINCT: 0

;RF11

~ISK

RFSiART:

RF1:

MOV

~OV8

RT

I

IRF:

TSTR

81011

i-IL

T

SOLPAT,CURPAT

'CURPAT,ilLPOBR

@LPCSR

LP6

(tLPCSR

,+4

CLINCT,#79.

LP4

CLINCT

CURPAT,#137

LP3

CURPAT

LP2

#40,CURPAT

LP2

CLINCT

*12"LPOBR

GtLPCSR

.-4

SOLPAT,#137

LP5

SOLPAT

LP1

#40,SOLPAT

LP1

INCB

'RFCSRH

LLIMIT,(lRF"CAR

waRDeT,

(JIRF~JC

FUNCTION,(lRFCSR

~RFCSR

.+6

,START

or

LINE

TO

CURRENT

'CURRENT

PATTERN

TO

LiNE

PRINTER

iRETURN

TO

MAIN

LINE

,TEST

FOR

F"LAG

,FALSE

RETURN

FROM

MAIN

LINE

'TEST

rOR

END

Or

LINE

lGO

GENERATE

CR/LF

'INCREMENT

LINE

~OSITION

COUNT

JTEST

FOR

MAXIMU~

PATTERN

,YES -

GO

TO

LP3

ANO

RESET

'NO

-

INCREMENT

TO

rGO

SENO

IT

TO

LINE

PRINTER

.RESET

PATTERN

AND

SEND

TO

~~INT[R

.SENT

TO

LINE

PRINTER

JRES(T

LINE

COUNT

'LINE

FEED

,START

OF"

LINE

PATTERN

JtNCREMENT

START

or

LINE

IRESET

START

OF

LINE

,PRINT

;CURRENT

C~ARACTER

BEING

PRINTED

;START

OF

LINE

C~ARACTER

,POSITION

OF

LINE

IINITIAL!rE

DISK

-

OAR-OAE

jCORE

BASE

;LE~GTH

OF

TRANSFER

JWRITE

OR

WRITE

CHECK

TO

DISK

:RETURN

TO

~'INLINE

CODE

II~TER~UPT

VECTOR

POINTS

f-IERE

JRF!1

READY

NOT

UP

~2114

002116

002122

00212

4

it02126

00213,0

~02134

002L36

002140

002142

00215,0

002152

00216,0

00216:2

00216;6

002170

002172

002174

002176

0022~~

0022~2

00220.4

002206

00221,4

00222:0

002222

00222.6

002230

00223.6

002244

002252

002256

00226.0

00226.6

~"1l2270

002272

00227

4

002276

00230

4

00230.6

0eJ23H'

14-FEB-71

i21fl0757

i21~5777

176136

100ee2

104Ze~

~~e752

0.e

5 7 7 7

~

7 6 1 2 J

H~0tl2

le42r~

ae0145

122777

i'iH!l0003

2101343

027727

176074

HH737

000367

2lfZle002

21021732

00000~

003750

176000

000004

2100014

i210210e2

0021002

00002J~

000100

12100~01

004000

021210210

001101

2100000

21~HHH10

012777

005777

100403

105277

000002

012777

042777

2116767

105277

'H10002

032

777

H:HH~01

1041:HH~

001~01

104~iL10

027767

0e2

7

62

01214/1

1 e

4.'~'.'

012

'

~

,

002206

176070

12!02260

104000

·177726

176030

17e-Z10

176076

17

4

000

176H~4

176062

176042

177732

17

7

700

i760e!0

13106

;P~G£

1-8

8R

TST

Bt:

,_

HLT

gR

TST

BPL

HL

T

SR

CtwiPB

BNE

CMP

BLOS

SWAB

SR

FUNCTION:

LlIMIT:

8EGYt\·

wORDeT:

-200e

;DT11

DEC

TAPE

RD=4

1010=14

RB=2

8R=2

F=0

IE=100

00=1

R=42100

TCFIRs'r:

TClAST:

577,

TCBlK:

0

TCEXPE:

'"

;GO

TO

FORWARD

FEND~:

MOV

TST

8MI

INC8

RTI

FEND1:

twiOV

8"1

C

MOV

TCF1A: INCa

RTI

TCF1:

BIT

8PL

I-lLT

BNE

I-lLT

CMP

BlT

SEQ

HL1

TCF2:

MOV

RF~

. T

fjRFCSR

, +6

RFS""t.RT

~RFwC

•

+6

RFSTART

*3,liiRFDAE

RFl

r;tRFDAR,#174000

RFl

FUNCTION

RFSTART

~

END

~ONE

#FENDl,.TCIV

tlTCST

FENDl

ilTCCM

fiTCF1,flTCIV

#1040""'.

ttTCCM

TCFIRST,TCEXPE

,TCCM

#

10

0 2

Ii'

2 ,

,T

C C

...

1

,+4

taTCDT,TCEXPE

TCF1A

TCF2

JRF-11

ERROR

FLAG

UP

JRF-ii

WORD

COUNT

NOT

2ERO

;DISK

AT

UPPER

LIMIT?

7=2,

11:4,

37:8

.NO

lAS

FAR

ON

DISK

AS

WE

CAN

GO

.NO

•

CI-lANGE

C:OMMAND

,RESTART

N[W

TRANSFER

OF

DISK

J

DISK

CO~'MANO

:FIRST

CORE

ADDRESS

OF

TRANSFER

JLENGT~

OF

TRANSPER

,READ

DATA

;WRITE

DATA

;READ

BLOCK

,FORwARD

,INTERRUPT

ENABLE

100

-

THE

FUNCTION

:REVERSE

IFIRST

BLOCK

TO

BE

SEARC~ED

POR

JLAST

BLOCK

TO

BE

SEARCHED

FOR

JCURRENT

BLOCK

FOUND

:T~E

BLOCK

T~AT

IS

EXPECTED

lEND

lON£

VECTOR

SET~~

'TEST

FOR

END

~:N~

JAT

END

lONE?

ISET

DO

-

NO

DELA'

;NO

-

WAIT

SOME

MORE

'YES -

N£W

VECTOR

JSEARCH

BLOCK

FOWARD

)COUNT

WHEN

THIS

BLOCK

IS

FOUND

ISET

DO

;RETURN

ON

'ANY

ERROR

ON

READ?

ITC

[RROR

SET

-

FORWARD

~EAD

BLOCK

;DONE

FLAG

UP?

JrALSE

INTERRUPT

:IS

THIS

OUR

BLOCK

rOR

SYNC

iNO-READ

SOME

MORE

BLOCKS

ivES

;w[

PASSED

T~E

8LOCK

:vrCTOR

FOR

SEQUENTIAL

READS

PALX11

V003

14-F"E8-71

002320

105277

175762

01212324

00~H~02

e02326

002334

012)2336

002340

002342

12'02344

002352

002354

002360

002366

eJ0237~

.002372

00~374

002400

002'402

002404

002412

002420

002424

002426

002432

002434

002442

002450

002452

002460

002466

002474

002502

0025C?J4

002510

0212512

002514

002522

002530

002532

l0254e

('02542

202544

~€2546

/e2550

,,:2255';

,H~256._~

,"'212"6 '

032777

1~0et:l

104Ce~

kHH001

104e00

027767

001414

005207

027767

001401

104ee0

000427

105277

000e02

000701

012777

016767

005777

100403

105277

000ee2

012777

000ee2

012777

112777

000~e2

005777

1000el

104000

012777

112777

000721

032777

H~0eel

104e-eC

.

G:"~

1~'.?

1

1e4e~.:'

027ic~

0~~1';:'6

0e2Z;2

le4';,'~'

~

e

~'

~

" '

H~5::'-

175742

177624

175726

1757fl6

e0242'4

177562

175664

175654

0041~3

202532

002504

177400

002750

e0~115

175576

17:;536

:7:;514

17

5752

177626

177616

175706

177564

175644

175650

17564121

175626

175622

175604

175576

175556

175546

177426

13106

PAGE

1-9

INCB

RT

I

tIITCCM

'SET

DO

JRETURN

AND

TEST

SEQENTtAL

BLOCKS

;rI~D

SEQUENTIAL

BLOCK

AT

FOWARD

DIRECTION

TCF3:

BIT

#1~0202"TCCM

ITEST

ERROR

AND

READY

8PL

,+4

TCF4:

HLT

BNE

HLT

CMP

SEQ

INC

CMP

BEQ

HLT

BR

INCS

RTI

XFEND~:

8R

JMOVE

TAPE

TO

RENDZ!:

MOV

TST

BMI

INCB

RTI

REND1:

MOV

RTI

;WRITE

F"ORWARD

TCWBK:

rCWB1:

TCR1:

TCR1A:

MOV

MOVB

RTI

TST

BPL

HLT

MOV

MOV8

BR

BIT

8PL

HLT

8NE

HLT

CMP

BEQ

BGE

~LT

6R

I~C?

,+4

€iTCDT,TCLAST

REND~

TCEXPE

,TCDT,TCEXPE

,+4

TCWBK

(aTCCM

FEND~

REVERSE

END

~ONE

lIIfRENDe,

_arc

I V

TCLAST,TCExPE

taTCST

RENDl

'TCCM

;rOWARD

READ

ERROR

Te-i1

IFALSE

INTERRUPT

ON

TC"11

JHA~E

WE

TESTED

ALL

BLOCKS

JYES

DRIVE

UNIT

IN

END

~ONE

TO

START

OVER

INO-INCREMENT

EXPECTED

COUNT

.IS

CURRENT

BLOCK

CORRECT

JFAILED

iN

rOWARO

READ

TO

FIND

.THIS

ROUTINE

WRITES

A

BLOCK

ISET

00

'INDIRECT

LINK

'END

lONE

VECTOR

SETUP

.SET

UP

fOR

REVE~SE

SEARC~

'IN

END

i!ONE

'YES -

START

TO

TURN

UNIT

AROUND

.SET

DO

INO

-

WAiT

TILL

WE

ARE

lIIfR+IE+RB.D~,~TCCM

JFUNCTioN

=

READ

BLOCK,

REVERSE

AND

GO

*TCR1,'TCIV

JSET

UP

NEW

INTERRUPT

VECTOR

ALL

BLOCKS

EXCEPT

0

*TCWB1,ilTCIV

lIIf-401Z1,ilTCWC

lIIfTCWBUF",

ellTCBA

*IE+WD+DO,taTCCM

"TCCM

,+4

*TCF3,IITCIV

# I

E+RB,

EHCCM

TCF4

*HH~200.

~TCCM

,

+4

,+

4

~TC('lT.

TCEXPE

"!'"CR2

TCRiA

qr'~z:

~TCCM

'INTERRUPT

VECTOR

FOR

WRITE

'ONE

BLOCK

.THE

WRITE

BUFFER

ADDRESS

JWRITE

TIooIE

BLOCK

'RETURN

WHEN

BLOCK

IS

WRITTEN

'ANY

ERRORS

JSEARCHBLOCK

VECTOR

.READ

BLOCK

.FIND

THE

.TEST

FOR

ERROR

AND

READv

JOECTAPE

ERROR

ON

READ

BLOCK

REVERSE

.FALSE

INTERRUPT

FROM

DECTAPE

lIS

IT

OUR

FIRST

BLOCK

'YES

-

GO

TEST

T~E

REST

JNO

-

HAVE

WE

PASSED

T~r

BLOCK

;WE

PASS

OUR

BLOCK

JGO

TO

END

~ONE

AND

TRv

AGAr'

JSET

D('1

~LX11

_.128}7~

002'71>1

e~26~2

~02606

r0261e

002616

0~2620

002622

002624

002626

002634

002636

002642

002650

002652

0.02654

002656

002662

002664

002672

002700

002706

002714

002720

002722

002726

00273,0

002732

002740

002746

V003

000e,~i2

0127;7

H~5/77

000V02

2jr,

n

le0Zel

1~400~

001001

1040e0

026777

0~1662

005367

027767

0014"'1

104000

000403

105277

000002

012777

112777

004767

000e02

005777

100r2!01

1~4Ql00

0127J7

112777

000743

002750

000001

002752

177777

000002

002754

0~HH'02

0~2756

177-'76

0~~~{'3

002760

00e

..

~23

002762

177775

~

0

~~,

."

4

o 0 2 7 6

~

13

e

~

:

,,'

4

002766

177

'74

002610

17550eJ

177344

177342

175444

175424

002722

1774"0

002750

~00105

175402

1753M3

175516

175470

175456

17

7

334

175426

175414

175410

175372

175360

175340

TeR2:

J:JAGE

1-1~

RTI

MOV

INCa

~

T :

#TCR3,tITCIV

taTCCM

JWE

rOUNO

OUR

rlRST

BLOCK

JSET

UP

INTERRUPT

TO

TEST

ALL

BLOCKS

;5ET 00

JWAtT

FOR

TO

INTERRU~T

;FI~D

TCR3:

:(r'E~TIAL

BLOCK

IN

REvERSE

DI~ECTION

BIT

#100200,'TCCM

;TEST

FOR

READ

AND

ERROR

BPL

••

4

T'CR4

!

HLT

BNE

HLT

CMP

BEQ

DEC

CMP

BEQ

HL:

SR

INCB

RT

I

;READ

REVERSE

TCR8K:

MOV

MOV9

JSR

RTI

TCRB1:

TST

BPL

HL

T

MOV

MOVa

BR

,+4

TCFIRST"TCOT

XFENDt

rCEXPE

~TCDT,TCEXPE

,+4

TCRBK

~TCCM

ALL

BLOCK

EXCEPT

t/TCRB1,IilTCIV

#-4~0,~TCWC

#TCR8UF,~TCBA

#IE+RO+DO,II'TCCM

%7,TCl

@TCCM

.+4

#TCR3,"TCIV

ftIE+RBd'TCCM

TC·R4

JERROR

READING

SEQUENTIAL

BLOCK

IN

REVERSE

:FALSE

D£CTAPE

INTERRUPT

JoIO

WE

DO

ALL

THE

BLOCKS

,YES -

GO

TO

END

lONE

TO

RESTART

JNO

-

DECREMENT

BLOCK

NUMBER

.TEST

SFCUENTAIL

BLOCK

IN REVERsr

.TEST

SEQUENTIAL

READ

BLOCK

IN

REVERSE

FAILED

JTHIS

ROUTINE

READ

A

BLOCK

ISET

DO

JLETS

TRY

A

NEW

BLOCK

11~1

JSET

UP

INTERRUPT

VECTOR

JREAO

ONE

BLOCK

JWH£RE

BUFF"ER

IS

'READ

THE

BLOCK

'CHECK

DATA

BUFFER

JEXIT -

~ETURN

W~EN

BLOCK

IS

READ

JAND

ERRORS

JOECTAPE

ERROR

JNEW

VECTOR

rOR

BLOCK

SEARC~

JREAD

BLOCK

FUNCTION

JRETURN

TO

BLOCK

SEARCN

:THIS

WRITE

BUFFER

LOOK

THE

SAME

FO~WARD

OR

REvrR~~

TCWBUF

::

TCRBUF

::

N=l

.REPT

N

-N

N=N+1

.ENDR

N

-N

N=N+l

N

-·N

N=N+l

N

-N

N=N+l

N

-N

JOECTAPE

WRI1E

BUfFER

JDECTAPE

WRITE

BUFFER

JDECTAPE

WRITE

BUfFER

IDECTAPE

WRITE

BUFFER

;DECTAPE

WRITE

BUFFER

PALX11

V~H:'l

~,

14-fEB

..

71

13106

PAGE

1-11

0e:;,e'e'5 N=N+l

1e!2770

0e-~e05

N

JOECTAPE

WRITE

BUFFER

e2!2772

177773

-N

0e~e06

N=N+1

e22774

2e02~'6

N

~OEC"APE

WRITE

BUFFER

ic277/.)

177i72

-N

[tJ002?7 N=N+l

2e3~H"l

0e0e07

N

;OECTAPE

WRITE

BUfFER

ee3llZ2

177771

-N

0rcH,e10 N=N+l

e03~~4

000e10

N

;OECTAPE

WRITE

BUFfER

~232~6

177770

..

N

00eel1

N=N+l

0e301~

000ell

N

iOECTAPE

WRITE

BurFER

~03212

177761

-N

0"H~e12

N=N+1

~e3e14

000112

N

JOECTAPE

WRITE

BUffER

e03~H6

177766

-N

000e13

N=N+l

e03020

0fH"~

13

N

;OECTAPE

WRITE

BUFFER

003022

177765

-N

000e14

N=N+l

e03e24

000e14

N

;OECTAPE

WRITE

BUFFER

e03026

177764

-N

rcHHH?15

N=N+1

003030 000015

N

JOECTAPE

WR

I·T

E

BUfFER

01213032

177763

-N

000016

N=N+l

e03e134

0121012116

N

.OECTAPE

WRITE

BUfFER

0213036

177762

-N

211211::')1317

N=N+l

0032140 000iC17 N

JOECTAPE

WRITE

BUFFER

003042

177761

..

N

00002121

N=N+l

0~3044

012100,20

N

JOECTAPE

WRITE

BUfFER

02130,46

177760

-N

000021

N=N+l

0e3e50

000021

N

JOECTAPE

WRITE

BurFER

003052

177757

-N

11J0eJeJ22

N=N+l

003054

00121022

N

JOECTAPE

WRITE

BUFFER

ee.3~56

177756

-N

121121121023

N=N+l

003e62!

01210023

N

JOECTAPE

WRITE

BUFFER

0eJ3062

177

7

55

-N

000e24

N=N+l

003064 000024

N

JOECTAPE

WRITE

BUF"FER

003066

17775

4 -N

000025

N=N+l

v'

03072

000025

N

;OECTAPE

WRITE

BUFFER

;z03~72

177753

-N

~0~h~2b

N=N+l

;' 0 3

C'

74

0C~C2

N

JDECTAPE

WRITE

BurfE~

Ck~3l7b

11'7/5

-N

wH'002

~=N+~

~LX11

V0~3

14-1="[8-71

13:

16

PkGe;

:L-1a

.,J3100

00~~27

N

iOECTAPE

WRITE

BUFF"ER

~H33'102

177/51

-N

013003~

N;N+i

~031~:4

00~i130

~~

JOECTAPE

WRITE

8UFI="ER

012'31

ei6 1

~.

7750

-N

~('e2:H

N=N+l

~103110

000(731

N

JOECTAPE

WRITE

BUFF"ER

012'3112

17774J

-N

000~~32

f\=N+l

013311~

000~32

N

JOECTAPE

WRITE

BUF"FER

~03116

177746

-N

01313033

N=N+1

0133120

0131312133

N

JOECTAPE

WRITE

BUF"FER

0133122

177745

-N

01210034

N=N.+

1

003124

0~HHl34

N

;OECTAPE

WRITE

BUFF"ER

003126

177744

-N

0~0eJ35

N=N+1

003130

00121035

N

JOECTAPE

WRITE

BUFFER

003132

177743

-N

013012136

N=N+l

0133134 0130036 N

:DECTAPE

WRITE

BUFFER

0133136

177742

-N

013012137

N=N+l

121133140

012113037

N

JOECTAPE

WRITE

8UFF"ER

121133142

177741

-N

012101214121

N=N+1

003144

0121012140

N

:DECTAPE

WRITE

BUFFER

01213146

177740

...

N

013012141

N=N+1

eH2l3150

0121012141

N

IDECTAPE

WRITE

BUFF"ER

1211213152

177737

-N

012101342

N=N+l

Wk'!3154

00012142

N

JDECTAPE

WRITE

8UFP"R

0133156

177736

-N

0130043 N=N+l

13133160

01313043

N

;DECTAPE

WRITE

BUFfER

121031b2

177735

-N

00012144

N=N+1

003164

01211312144

N

;DECTAPE

WRITE

BUFFER

12103166

177734

-N

00012145

N=N+l

00317121

~HH'045

N

:DEGTAPE

WRITE

BUFFER

12103172

177733

...

N

000046

N=N+l

12103174

012112112146

N

iDECTAPE

WRITE

BUFFER

121133176

177732

-N

0121012147

N=N+l

003?00

000e47

N

IDECTAPE

WRITE

BUFFER

003202

177731

-N

~e005~

N=N+l

e03?04

",O0050

N

iDECTAPE

WR

ITE

8UF"FER

003206

177730

-N

2100051

"J=N+1

~~03?H~

~.00051

N

:DECTAP[

WRITE

BUFFER

PALXll

V00.3

14-FEB-71

13"1.16

PAGE

1-13

0~3212

177727

-N

000'~52

N=N+1

003214

000052

N .OEeTAPE

WRITE

BUpoER

003216

177726

-N

000'~53

N=N+1

0032212l

'HHH~53

N

;DECTAPE

WRITE

BurFER

003222

177725

-N

000'~54

N=N+l

003224

,,'H"'54

N

;OECTAPE

WRITE

BUFFE:R

003226

177724

-N

12100~55

N=N+1

003230 000055

N

;OECTAPE

WRITE

BUrrER

003232

177723

...

N

000056

N=N+l

003234

rlI00056

til

JOECTAPE

WRITE

BuFFER

003236

177722

-N

,,00057

N=N+l

003240

.000057

N

'OECTAPE

WRITE

BurrER

003242

177721

"'N

000e160 N=N+l

003244

"00~60

N

:OECTAPE

WRITE

BUFFER

003246

17772121

-N

0002161 N=N+l

003250

000061

N

JOECTAPE

WRITE

BUFFER

0~3252

177717

-N

000062

N=N+l

003254

000062

N

JOECTAPE

WRITE

BUFFER

003256

177716

"N

000063

N=N+1

003260

000063

N

JOECTAPE

WRITE

BUFFER

003262

177715

-N

000064

N=N+1

003264 000064

N

JOECTAPE

WRITE

BUFFE~

003266

177714

...

N

000065

N=N+1

0~3270

rlI~0065

N

JDECTAPE

WRITE

BUFFER

0~3272

177713

...

N

000066

N=N+1

003274

000066

N

JOECTA?E

WRITE

BUFFER

003276

177712

...

N

000067

N=N+1

003300

000067

N

JOECTAPE

WRITE

SUFFER

003302

177711

-N

000070

N=N+1

003304

000070

N

JOECTAPE

WRtTE

BuFrER

003306

177710

-N

000071

N=N+l

003310

000071

N

JOECTAPE

WRITE

BUFFER

003312

177707

-N

000072

N=N+l

003314

~HH:l072

N

JOECTAPE

WRITE

BUFFER

12103316

177706

-N

01210073

N=N+l

00332121

012l12l"'7~

N JOEeTAPE

wRITE

BUFFER

12l03:~22

177705

-N

~LX11

v003

14-F~~-71

13:

0,Q

,If

•.

G,E

1-~4

000V174

N:;N-I'l

00332':

PHHiHJ7

4 N

IOECT~PE

W,R

t r

E:

BlJF"

r E R

~e3

3

216

1.77704 •

i~

000~75

f.-J=N+l

?:03~3?

2100075

~

1

\'

JDECTAPE

WRYTE

BUFFER

1;03332

177/03

-N

00;:1076 N=N+l

~QJ3334

~e0076

N

;OECTAPE

WRITE

BUFrER

003336

177702

-N

000077

N=N+1

eJ03340

000077

N

JDECTAPE

WRITE

BUrrER

eJ03342

177701

-N

0eJ0Hl0 N=N+l

0eJ334,4

0k:HH00

N

.OECTAPE

WRITE

Bur

FER

00334,6

177700

-N

00eJleJ1 N=N+l

0eJ010~

.REPT

100

N=N-l

-N

N

IeEe

TAPE

WRITE

eurrER

.ENOR

00010eJ N=N-l

00335e

177700

-N

eJ03352

000

U?J0

N JDEe

TAPE

WRITE

BurFER

000077

N=N-l

003354

177701

-N

1(J0335p

000077

N

IDEC

TAPE

\rI~ITE

Bur

FER

000076

N=N

..

1

003360

177702

..

N

003362

000076

N

JOEC

TAP!:

WRITE

BUFFER

000075

N=N-l

eJ03364 1777eJ3

,..N

0eJ3366

rlJ0eJ075

N IDEe

TAP£

WRITE

BUFFEr:

000074

N=N

..

1

003370

177704

...

N

003372

000074

N JOEe

TAPE

WRIT:

E'PC"t"ER

000073

N=N-l

003374

177705

...

N

003376

000eJ73 N

JOEC

TAPE:

WRITE

BUFrER

000072

N=N"'l

003400

177706

...

N

003

402

000072

N

"DEC

TAP[

WRITE

SUFFER

O00071 N=N-l

00340

4

177707

-N

003

406

000071

N

,DEC

TAPE:

WRITE

BurFER

000070

N=N-1

0e3410

177710

-N

003412

00007121

N

JDEC

TAPE

WRITE

BurrER

0~0067

N=N-1

e03~14

177711

-N

(~03415

000~67

N

;DEC

TAPE

WRITE

Bur

FER

000066

N=N-l

e e

3.:!

2;'

177712

-N

~'e3422

o

~

0

~~

6 b N

;OE("

TAPE

\~R

I

TE

BUFFER

0ev'h';f)5 N=N-l

PALX11

V

f2l

0

~j

14-I="E8-71

13'06

PAGE

1-15

12103424

177713

..

N

12103426

210121065

N

JOEC

TAP!:

WRITE

BurF'ER

000Q164

N=N-1

210343121

177714

-N

eeJ3432

00121064

N IDEe

TAPE

WRITE

BurrER

e1~'kH163

N=N-l

e0343

4

1771'15

-N

003436

000~'63

N

JDEC

TAPE

WRITf

BurrER

0~HH162

N=N-1

00344121

177716

~N

e03442

01210062

N

JOEC

TAPE

WRITE

BUrF'ER

0eJ0~161

N=N-1

e03444

177717

...

N

ri303446

000~'61

N

JOEC

TAPE

WRITE

BurF'ER

000Ql60

N=N-1

003450

177i'20

-N

01213452

000060

N

JOEC

TAPE

WRITE

BurrER

000~157

N=N-1

003454

177721

...

N

003456

IiH210~157

N

JDEC

TAPE

WRITE

BurrER

2100056

N=N-1

0213460

177722

-N

003462

00e~156

N

JDEC

TAPE

WRITE

BurrER

2100055

N=N-1

0213464

177723

..

N

0213466 2100055 N

JOEC

TAPE

WRITE

BurrER

Q"H.H154

N=N-1

121121347121

1777'24

...

N

003472

00121054

N

.DEC

TAPE

WRITE

BurF'ER

0121121053

N=N-1

2103474 17

7725

-N

01213476 01210053

N

.DEC

TAP[

WRITE

BurFER

2100052

N=N-1

003500

1,77726

..

N

01213502

rJ00e52 N

JOEC

TAPE

WRITE

Bur

FER

000e51

N=N"l

0035214

177727

..

N

003506

000~51

N

JDEC

TAP[

WR

I

n:

BurrER

2100e50

N=N-1

003510

177730

..

N

003512

.

000250

N

.DEC

TAPE.

WRITE:

BUF'rER

2100e47

N=N-1

003514

177731

..

N

003516

00"H~4

7 N

JDEC

TAP£

WRITt:

BurrER

00li:H'46

N=N-1

003520

177732

...

N

003522

2100046 N

;CEC

TAP~

WRITE

BurrER

01210045

N=N-1

'103524

177733

-N

~03526

000045

N

;OEC

TAPE

WRITE

BUrF'ER

QJI1"H~

4 4 N=N-l

lil0353f1

177734

-N

V'

0 3

'3

3?

eHhh'

44

N

.OEC

TAPE

WRITE

BurrER

0~0043

N=N-l

l~~3534

177735

-N

~LXll

V"03 14-FE8

...

71

13:0~

PAGE

1-1.6

~3536

0"0043

N

JDEC

TAP[

WRITE

BUFFER

,,01be42

N.:,N

-1

,,03540

177736

-N

~03542

0"0042

~,'

JOEe

TAPE

WRITE

BUFFER

000041

"~=N-1

003544

177737

-N

003546

000041

N

JOEC

TAPE

WRITE

BUFFER

00004"

N=N-l

003550

177740

..

N

003552

000040

N

JOEC

TApt

WRITE

BUfFER

000037

N=N-l

""'3554

177741

..

N

003556

000037

N

JOEC

TAPe

WRITE

BUFFER

000036

N=N

..

1

0~3560

177742

...

N

003562

000036

N

;OEC

TAPE

WRITE

BUFFER

000035

N=N-l

00356~

177743

-N'

003566

000035

N

JOEC

TAPE

WRITE

BUFFER

12100034

N=N-l

0"3570

177744

-N

003572 000034

N

JOEC

TAPE

WRITE

BUFF"E:R

12100033

N=N-l

003574

177745

...

N

003576

QJ00033 N

JDEC

TAPE

b~R

I

TE

BUF"FER

00"'''32

N=N-l

0036021

177746

..

N

rHJ3602 QJ00032 N

.OEC

TAPE

WRITE

BUF"FER

QJ00031 N=N-1

003604

177747

,..N

003606

~00031

N

JOEC

TAP£

WRITE

BUF"F"ER

QJ00030

N=N-l

0036H'l

177750

...

N

003612

21001()30

N

IDEe

TAPE

WRITE

BUFFER

000027

N=N-l

003614

177751

pN

003616 000027

N

JDEC

TAPE

WRITE

BUFF'lR

000026

N=N-l

0036221

177752

-N

003622

",00026

N

iOEC

TAPE

WRITE

BUrF'ER

11)00025

N=N-l

003624

177753

-N

003626

00"025

N

JDEC

TAp~

WRITE

BUFFER

00"'024

N=N-l

003630

177754

-N

303632

",0121"'24

N

JOEC

TAPE

WRITE

BUFF"ER

""0023

N=N-l

003634

177755

-N

?e3636

0021023 N

JOEC

TAPE

WRITE

BUFFER

000022

N=N-l

V'~3640

177756

-N

l' e

31,

4 2

000e22

N 'DEe

TAPE

WRITE

BUFFER

000021

N=N-l

.:.'.2'3644

177757

...

N

,'~

3646

1Z!~0~~?1

N lorc

TAPE

WRITE

BUFrER

PALX11

"eel:s

14-FES-71

13106

PAGE

1-17

12100"20

N=N-1

,~el3650

177'160

-N

0036:>2 ,HH"'20 N

JDEC

TAP£

WRITE

BUFFER

el~HHH

7 N=N-1

003654

177761

-N

l-,e3656

r21IlHHa

7 N

:OEC

TAPE

WRITE

BUFFER

'H~0~H6

N=N-l

00366~

177/62

-~

003662

r210r21kH6

N

;DEC

TAPE

WRITE

BUFFER

2100015 N=N-l

0213664

177763

-N

003666

o

r2HHH

5 N

JDEC

T,APE

WRITE

BUFFER

elfll0~H4

N=N-1

~03670

177764

-N

003672

12100014

N

.DEC

TAPE

WRITE

BUFFER

000013

N=N-1

003674

177765

-N

003676

00'H113 N

iDEC

TAP~

WRITE

BUFFER

000012

N=N-1

003700

177766

-N

0037212 0021012 N

,DEC

TAP~

WRITE

BUFFER

000011

N=N-1

003704

177767

-N

003706

000~111

N

JDEC

TAPE:

WRITE

BUrFER

000010

N=N-1

003710

177770

-N

0'13712 00

'1

el

1'1

N

JDEC

TAPP:

WRITE

BUFrER

900el07 N=N-1

003714

177771

-N

003716

12100007

N

;DEC

TAP£

WRITE

BUr

FER

12100006

N=N-1

003720

177772

-N

2103722

000006

N

IDEC

TAPE:

WRITE

BUFrER

12100005

N=N-1

003724

177773

-N

0'13726

12100005

N

IDEC

TAPE:

WRITE

BUFFER

0210004 N=N-1

IlH213730

177774

-N

0'13732

000004

N

JDEC

TAP£

WRITE:

BUFFER

12100003

N=N-1

01213734

177775

-N

003736

.

0~HHH:'J.

N

JDEC

TAPE

WRITE

Bur.F"ER

0~0~132.

N=N-1

003740

177776

-N

0133742

"00~02

N

,DEC

TAPE:

WRITE

BUFrER

000kHH N=N-l

003744

177777

-N

0.03746

,,00~'01

N

JDEC

TAPE

WRITE

BurFER

~PALX11

V003

14-FEB-71

1,3

U'6

PAGE

1-.18

;INDEX,

AND

INOIRt

..

,

TEST

Or-PDP"11

Z0315e

012767

003750

012446

BEGIN:

1'10\1

#BEGIN,RETUf'~

.FOR

SCOPING

203156

1~4400

SCOPE

i'e'376l

~12737

::04~00

~16420

""OV

#4~'00,

~#

1

COUNT

;ITERAlION COUNT

:TESl

CJMPARE

INSTRUCTION

I

~,I

i)

EX

E D

Zl3766

"127l~

177770

MOV

#--10,%0

JMINUS

10

TO

REG

"

203772

026027

~'1662'2

125252

CMP

A

I(

0)

,

#125~?52

J

(A

INDEX

BY

MINUS

H~)

TO

1~1.25c5?

?04ee~

0~14L:l

BEQ

•

-~

4

ee4?02

le400~

HLT

ICOMPARE

WI

Hol

INDEX

fA,ILED

I;H~~2e4

10

44

00

SCOPE

e0

4

Ze6

012700

177770

MOV

.-10,%0

JrOR

INDEX

?0

4

012

022760

125252

016622

CMP

#125252,A

(0)

JA

INDEXED

e~4~20

liHH4~1

BEQ

•

-~

4

Z~4022

1'04e;00

HLT

204:e2 4

104400

SCOPE

~e4~26

012700

00?:01.tl

MOV

#:LIi~

,

,%0

J

INOEX

z04~32

026027 016622 052525

CMP

A

I(

0)

,

#052525

e0

4

i40

001401

BEQ

•

-~

4

004042

104000

HLT

ee4~4~

H~4400

SCOPE

004046

1i!112700

00001,0

MOV

#:Lrll,%0

1t04eS2

022760

~52525

016622

CMP

#052525,A(0)

00 4

060

001401

BEQ

• ,

..

4

004062

104000

HLT

0041864

104400

SCOPE

004~66

012700

177770

MOV

#

...

113,%0

004072

026060 016622 016622

CMP

AI(Z),A(0)

004100 001401

BEQ

• ·

..

4

0041fr~2

104000

I-lLT

e134i04

104400

SCOPE

0~Hl~6

012700

00"010

MOV

#,"10,%0

004i12

026060 016622 016622

CMP

A(0),A(0)

e0

4

120

001401

BEQ

• ·

..

4

004122

104000

HLT

0041.24

104400

SCOPE

ee4~26

~127eJ0

177770

MOV

#'-10,~0

00 4

132

012701 000004

MOV

#·

..

4,%1

004i36

2126061

016622 016622

CMP

A (12J) , A (1 )

e04144

0014(2)1

BEQ

•

,~4

00 4

1.46

104(2)0(2)

HLT

004i5C

104400

SCOPE

eC

4152

0261b0

'H6622

016622

CMP

A

(1)

, A

«(2)

~~e4:'6el

",014~1

SEQ

.... 4

('

e

4:

e 2

104000

HLl

2e4!.6

4

H?44d~

SCOPE

Ze

4

:bC'

'"

12

?

I{"

k'

177774

MOV

#,.4,

%0

~'04:

-;-::?

0127[ll

?e~~[?Il(2)

MOV

#'''H'l,%l

PALX11 V003

14-rEB-71

13:e6

PAGE

1-19

0e4176

226061

016622

CMP

A(0),A(1)

0042e4

001401

BEQ

.+4

004206

104000

Io1LT

0042121

104400

SCOPE

v.04212

012HI(t

177774

h10V

#-4.%0

004216

0127

.:.;

1

000010

!.10V

# UI),

%1

004222

2120160

016622

CMP

A

(1)

• A

(0'

e0423e

001401

BEQ

,+4

004232

104000

HLT

004234

H~4400

SCOPE

JTEST

"1QVE

INSTRUCTION

rOR

INDEX

004236

012700

177770

MOV

__

..

le.%eJ

004242 016067 016622

e12374

MOV

A(0),TEMP

004250 026727

012370

125252

CMP

TEMP,#125252

01Z!4256

0f2114el

BEQ

,+4

004260

104000

HLT

004262

104400

SCOPE

004264 012700

eHH'010

MOV

#+10,%0

004270

016067 016622

012346

MOV

AC0',TEMP

004276 026727

012342

12152525

CMP

TEMP,#12I52525

004304

001401

BEQ

.+4

004306

104000

HLT

01214310

1121441210

SCOPE

12104312

012700

17777121

MOV

....

10,%121

004316

01:2760

125252

016644

MOV

'125252,TEMP(0)

004324

02:3727

016634

125252

CMP

..

#C,#125252

004332

00141Z!1

BEQ

.+4

004334

10400121

HLT

004336

10<4400

SCOPE

004340 012700

000010

MOV

'+10,"0

004344

012760 052525

016644

MOV

*052525,TEMP(0)

01214352

023727 016654

12152525

CMP

,#TEMP+10,#052525

004360

201401

BEQ

,+4

004362

104000

~LT

004364

10440121

SCOPE

;TEST

AND

I~STRUCTION

FO~

INDEXING

004366

01:n67

177777

012250

MOV

_-l,TEMP

004374

,U;nI:10

177770

MOV

#-10,%0

004400 046067

016622

012236

BIC

A(0),TEMP

004406

026727

012232

052525

CMP

TEMP,#052525

004414

00:L4~1

BEQ

,+4

0~4416

le400~

HLT

004420

104400

SCOPE

004422

01?767

177777

012214

MOV

#-l,TEMP

~0443~

012700

0r2H1010

~Ov

#10,"0

00443

4 o 4

~10

6 7

''16622

~122V'2

RIC

A(0),TEMP

004442

026}27

~~12176

125252

eMP

TEMP.#125252

~H;!445"

00j

4'~1

BEQ

.+4

fAL~11

V.'303

14-F"E8-71

13

:~06

:.P

A~E

1~20

004452

1040",e

~L"!

V104454

le440.6

SCOPE

004456

012737

177777

l16654

rv.(j

V #--1, (i#TEMP+10

004464

0127?0

2erelZ

MOV

#1.0,,,2

~04470

~42760

125252

Z16644

BIC

#125252,TEMP(0)

004476

023727

716654

{'52525

CMP

,#TEMP+10,#52525

004504

I?JriH4Vl

8EQ

•

+-

4

004506

1040~0

HLT

~04510

104401?J

SCOPE

004512

0127~0

177770

MOV

....

·10,

"0

004516

012767

177777

012110

MOV

#

...

·1,

TEMP-lel

004524 042767 052525

e12102

BIC

#052525,TEMP-10

004532

026727 012076

125252

CMP

TEMP-10,#125252

004540

0014~1

BEQ

,

...

4

004542

104000

HLT

004544

1044N:'l

SCOPE

;TEST

SUBTRACT

INSTRUCTION

F"OR

INDEXING

004546

012767

125252

e12070

MOV

#1.25252,

TEMP

004554

0127

k:'0

177770

MOV

#.,10,%0

12104560

166067

016622

2'12~56

SUB

A(0),TEMP

004566

001401

BEQ

,+4

004570

1~4000

HLT

0045'72

104400

SCOPE

004574

012737

125252

216644

MOV

#1.25252,

ta#TEMP

004602 012700

171770

MOV

#-1121,"~

004606

166760

~120e0

~16654

SUB

B,TEMP+10(12J)

004614 001401

SEQ

,+4

004616

104k.H30

HLT

004620

104400

SCOPE

004622

2112767

052525

e12Q!14

MOV

#0!52525,TEMP

004630

012700

000010

MOV

#10,%0

004634

166067

016622

012002

SUB

A(0),TEMP

01214642 01211401

BEQ

,+4

004644

104000

HLT

01214646

104400

SCOPE

004650

012737

2152525

~16644

MOV

#0!52525,.#TEMP

004656

0127e.0

00~H~1e!

MOV

#10,%0

004662

166760

011744 016634

SUB

A+10,C(I2J)

004670

2I014~1

BEQ

,+4

004672

104000

HLT

004674

104400

SCOPE

:TEST

~JNARYS

INDEXED

004676

1Z112737

177777

2116644

MOV

#-l,Gt#TEMP

004704

0127012J

177770

MOV

#-112l,"~

00471121

00:>060

~16654

CLR

D

(0)

004714

005737

?lc644

TST

~#TEMP

004720

0014

..

'1

BEQ

...

4

004722

104er0

HLT

PALX11

V0~3

14-I="(B-11 13&06

PAGE

1·21

0~4724

104400

SCOP(

~~4726

012737

177777

016644

MOV

#

...

1,

tatHEMP

00473

4

0127~0

000.010

MOV

#+10,%0

e.0474~

0(2:52100

e166~4

CLR

C

(")

004744

005737

016644

TST

@#TEMP

0~4750

001401

SEQ

• + 4

004752

1040l'eJ

I-lLT

0.04754

1044Vjjl

SCOPE

004756

012737

177777

~16644

MOV

*

..

1 d'#TEMP

004764

0127e:0

177770

MOV

#-10,%0

004770

005160 016654

COM

De0}

004774

"05737

016644

TST

(i#TEMP

005000 001401

SEQ

.+4

005002

104000

HLT

005004

104400

SCOPE

005006 012737

177777

016644

MOV

#-l,@#TEMP

005014 012700

00001~

MOV

#10,%0

005~20

0~516~

016634

COM

C(0)

005024 005737

016644

TST

8#TEMP

005030

0~1401

BEQ

,+4

005032

104~00

HLT

005034

104400

SCOPE

0051?l36

012737

177777

016644

MOV

*

..

l,.#TEMP

005044

012700

177770

MOV

#-10,%0

005050

005260

016654

INC

0(0)

005054

,U'5737

016644

TST

G'#TEMP

005060 001401

BEQ

,+4

0050.62

104000

HL

T

005064

104400

SCOPE

005066 012737

177777

016644

MOV

#-l,(I#TEMP

005074

012700 000010

MOV

#+10,%0

005100

005260

016634

INC

C(0)

~'05H~4

,,05737

016644

TST

(I#TEMP

005110 001401

BEQ

,+4

005112

104000

HLT

005114

H!l4400

SCOPE

005116 012737 000001 016644

MOV

#l,.#TEMP

0.05124 01:?700

177770

MOV

#-10,%0

005130

"0~;360

016654

DEC

0(0

)

005134

01215737

016644

TST

ta#TEMP

01215140

001401

BEQ

,+4

12105:142

112141210121

HLT

1211215144

11214400

SCOPE

005146

~1;n37

e'00001

~16644

MOV

#l,lI#TEMP

h~5

~4

01;~7~~1ZI

00CI2'H'l

MOV

*1~,"1ZI

~l5

6~

12105360

016634

DEC

CO"

d~5

64

1211215737

016644

TST

lI#TEMP

01215

7121

00=.4C1

BEQ

.+4

fA'LX11

ve03

14

1-':-£:8'-71 13':i6

fJ~(jE

1-'i2

0'0:'172

104000

HlT

0e5174

le440(

SCOPE

005i76

012737

?J0e01

?16644

~OV

ti:L,~#TE"'1P

70'520<1 kf127"'0

17

7

770

MOV

11-10,%0

~'05l>H?J

1.3:05460

~16654

NEG

D

(0)

~05214

022737

177777

~16644

CMP

#··1.

~#

TEMP

20522?

001401

BEQ

,"

4

"'~5~24

H~40(l:0

HLT

~05226

104400

SCOPE

~05230

312737

000001

016644

MaV

I'H, '#TEMP

{

e~5~36

012700

~~0010

MOV

#+121,%0

005~42

005460

~16634

NEG

Cn~)

005246

~?2737

177777

~16644

CMP

#··l,ti#TEMF'

e~5254

001401

SEQ

,

~.

4

e~5256

104000

HLT

005260

1~4400

SCOPE

005262

012737

177777

016644

MOV

*

..

l,~#TEMF'

005~70

012700

177770

MOV

#-·H!'l,%0

~e5274

0~0261

SEC

005276

0~5560

016654

AOC

o

(0)

005302 005737 016644

TST

(III#TEMP

e05306

001401

BEQ

•

...

·4

005310

104000

HLT

005312

104400

SCOPE

~05314

012737

177777

016644

MOV

#

..

·1,

fI#TEMFt

005322

IcU2700 000el10

MOV

#

...

·10,%0

005326

000261

SEC

00533~

005560

016634

ADC

C ( " )

005334

005737 016644

TST

(a_TEMP

005340

001401

BEQ

•

,,·4

0~5342

104000

I4L

T

005344

104400

SCOPE

0053

46 1112737

f2l012!0~1

"'16644

MOV

#l,(;)#TEMP

005354

0127210

177770

MOV

.--10,"121

e05360

000261

SEC

12!05362

0056612!

016654

SSC

0(0

)

12!05366

005737

e16644

TST

@~!TEMP

005372

001401

BEQ

• ",4

005374

1~412!00

HLT

12!05376

.

112!4400

SCOPE

el2!5412!12!

012737

00012101

12!16644

MOV

#1.,

@#TEt-1P

0f2l5412!6

0127()12I

012!0010

MOV

#+,10,%0

e~5412

0012!261

SEC

0~54i14

005660

~16634

SSC

con

~e542?

(05737

016644

TST

@#TEMP

F05424

121

e 14

i:.'

1

BEQ

• + 4

iJ05~26

112!4e00

HLT

~f2l543:1

1~44('iC

SCOPE

PAL

Xli

V003

14-F"E:8-71

13:06

PAGE

1

..

23

:TEST

JMP

INDIRECT

0~5432

0121700

MOV

%7,"0

005434

0627tl

e0(.~121

ADD

#1O,%0

005440

00e112

JMP

t'%eJ

005442

104~e0

HLT

005444

000240

NOP

005446

10

4

4le

SCOPE

(21215450

21121700

MOV

%7,%0

005452 062700

Z0ZelUJ

ADD

#le,%0

005456 000110

JMP

0'''''

005460

104000

HLT

005462

,,00240

NOP

005464

H~440~

SCOPE

;TEST INDIRECT

ADDRESSING

;TEST

COMPARE

INSTRUCTION

0~5466

2123727

e'16612

125252

CMP

.#8,#125252

~05474

001401

BEQ

,+4

CZl05476

1~40e0

HLT

005500

104400

SCOPE

005502

2122737

125252

016612

CMP

#125252,.#8

005510

001401

BEQ

,+4

005512

10

4

000

HLT

005514

101J4N~

SCOPE

005516

2123737 0,16612

016612

CMP

.#8,li#B

005524

001,401

BEQ

,+4

005526

104

000

,

HLT

005530

H!J4400

I,'

SCOPE

~

;TEST

MOVE

INSTRUCTIONS

005532

2113700

016612

MOV

,#8,%0

005536

2I2,~700

125252

CMP

*125252,%"

005542

001,401

8EQ

.+4

005544

104~00

HLT

005546

104400

SCOPE

005550

012737

125252

016644

MOV

#125252

....

TEMP

,005556

023737 016612

016644

CMP

.#8,li#TEMP

005564

0211401

BEQ

.+4

005566

10400~

HLT

005570

1044('10

SCOPE

e.05572

013737

016512

1i'16634

MOV

@'B, ..

,C

01?J560~

023737

~lb612

016634

CMP

eUB,

(I#C

~05606

001401

BEQ

• + 4

005610

104

itt:';.'

HLT

005612

1~44~\i'

SCOPE

;TEST

BIC

INSTRUCTION

INDIRECT

00561

4

~

12'7,';'

177777

MOV

#-1,%0

(,~05620

0437.:'::

,'1"

612

BlC

t8*8.%~

~ALX11

Vil03

14-rES

..

71

13:0b

PAnt

1-24

M"6'24

020€2

7

l52525

CMf:!

"",#052525

0056:30

0~1401

SEQ

.+4

~05632

1£40t:~

liLT

01215634

1044L'~

SCOPE

005636

~127.37

177777

016644

MOV

#-l,(lt#TEMP

005644

042737

125252

~16644

BIC #125252,fiI#TEMP

01215652

022737

052525

"'16644

CMP

t#052525,,#TEMP

012l56:60

001401

BEQ

.+4

012156

1

62

1~4(i"!l12l

HLT

01215664

11214400

SCOPE

~056'6

6

012737

177777

C!l16634

MOV

#-l,Qa#C

1211215674

2143737

12116612

016634

BIC

~#8,6)#C

0057132

023727

~16634

~52525

CMP

~#C,#52525

0057:10

01211401

BEQ

.+4

0121~712

112141211210

HLT

005714

1121440121

SCOPE

;TEST

SUBTRACT

INSTRUCTION

0057'16

01271210

125252

MOV

#125252,,,O

12105722

1637ell21

C!l16612

SUB

~#B,%0

12l12l5726

212121027

000012112l

CMP

"O,#0

1211215

'f 32

1lJI2I

14

I2l

1

SEQ

,+4

12105734

1121

412l

121121

HLT

1211215736

112144121121

SCOPE

12105740

012737

125252

O16644

MOV

#125252,'#TEMP

1211215746

166737

0112164121

016644

SUB

8,(il#TEMP

01lJ5754

01lJ1401

BEQ

•

..

·4

005756

112l412l121121

HLT

012l57612l

112144121121

SCOPE

1211215762

012767

125252

010654

MOV

#125252,Tf.MP

1210577121

163767

016612 010646

SUB

'MB,TEMp

1211215776

01215767

010642

TST

TEMP

12112l6~02

01211401

SEQ

,

~'4

12106004

1121

40ell2l

~LT

006006

112144012l

SCOPE

JTEST

ADD

INDIRECT

01216010

12'050012l

CLR

'''~

006012

0637012l

12116612

ADD

~~8,%12I

Qll2l6016

02271210

125252

CMP

#125252,

'''~

006022

01211401

SEQ

• + 4

006024

10400~

HLT

Qll2l6026

11214400

SCOPE

~12l6030

12105037

~16644

CLR

(I#TEMP

006034

062737

125252

016644

ADD

#125252,(I#TE"1P

006042

022737

125252

016644

CMP

#125252,(I#TE~P

?-06050 2'01401

SEQ

•

..

4

0121612152

104000

HLT

006054

1~4400

SCOPE

01216Ql56

012 7

,~

7

125252

e16644

MOV

#125252,~#TEMP

PALX11

V003 14-F"EB-71

13:06

PAGE

1-25

006264

~67737

2110540 Z16644

ADD

91A+6.61#TEMP

006072

023727

016644'

177777

CMP

.#TEMP,'-l

006100

0211401

BEQ

,

+4

~06122

10400~

f1LT

7?61~4

le4

4

ll

SCOPE

:TEST

UNARYS

INDIRECT

e061~6

012737

177777

e16644

MOV

#-l,91'TEMP

N~6114

005037

216644

CLR

,.TEMP

e06120

00';737

e16644

TST

.'TEMP

0.06124

001401

BEQ

,+4

':H~6126

104000

f1LT

006130

104400

SCOPE

Z06132

012737

125252

016644

MOV

.125252,,#TEMP

e06140

021!5137

016644

COM

(I.TEMP

e06144

022737

052525

216644

CMP

#052525,.#TEMP

006152

021:l401

BEQ

,+4

e06154

HHe00

HLT

ee6156

104400

SCOPE

e06160

005037

0.16644

CLR

(It.TEMP

006164

a0!;237

016644

INC

,'TEMP

e06170

022737

00e~01

016644

CMP

#l,tIl.TEMP

00617-{)

001401

BEQ

,+4

e06200

104000

HLT

e06202

104400

SCOPE

006204

005037

016644

CLR

"TEMP

e06210

00~j377

0121432

DEC

6ITEMP+2

0e6214

023727

016644

177777

CMP

••

TEMP"

..

l

~06222

00l.401

BEQ

,+4

006224

.104000

HLT

006226

1044-~0

SCOPE

006230

01,~737

0~H~0e.1

016644

MOV

#l,6I#TEMP

006236

"0~j437

2116644

NEG

tII.TEMP

N'l6242 1822737

177777

016644

CMP

#-l,_.TEMP

e062521

01ll1.401

BEQ

,+04

e06252

104000

HLT

e06254

104·400

SCOPE

;TEST INDIRECT

ADDRESSING

WITH

INOEXING

;TEST

COMPARE

INSTRUCTION

e~6256

~27727

010332

125252

CMP

(i1IB"2,#125252

ee6264

~014~1

BEQ

,+4

ee6266

104000

f1LT

?1l6270

104400

SCOPE

('l6272

022777

125252

01~314

CMP

#125252,.8+2

~e63l0

001401

BEQ

,+4

.'

?t-~2!

2 104Cv1e

f1LT

~

•

.:

~

3

~

j

104400

SCOPE

i.~

~

r 6

027777

211i'~~2

l:

1?

3~'

0

CMP

@lB+2.1I8+2

PALfX;ll v

e~Ql3

lil-F,E,8

-71

l3:;1:6

P;A.(;[

1"'2~

~

j

006;31

4

e~lA0l

SEGl

.....

'

..

0.e6i~16

If:400e

,~LT

~_06:320

l~4400

SCOPE

iTES:

~2YE

!\STRUCTIONS

006322

el177/.;0

0H~266

~OV

~B+2,%0

006326

222720

125252

eM?

#125252,~0

006332

2101401

SEQ

,+4

006334

104000

!-ILT

006336

1214400

SCOPE

006~40

~12777

125252

01Y1300

MOY

#125252,'TEMP+2

2106\346

023737

rc:l16612

2116644

CMP

(il*B,(iI#TEMP

006354

0~1401

SEQ

,+4

ro06~56

12140il0

HLT

006360

104400

SCOPE

006362

2117777 0H'J226

01e'246

MOY

1!D19+2,IIIC+2

006370

2123737

016612 016634

CMP

@it#B

,G~#C

0216376 2101401

SEQ

•

-+4

006400

104000

HLT

006~02

1~4400

SCOPE

iTEST BIC I NSTRuc'r I

ON

INDIRECT

WITH

INDEXING

006404 012700

177777

MOV

#·-1,%0

006410

2147'100

010200

BIC '13+2,%0

006414

2120027

052525

CMP

'''~,

#52525

006420

001401

SEQ

• ·

..

4

006422

104000

HLT

006424

1214400

SCOPE

006426

2112737

177777

016644

~10V

#,

..

l,8t#TEMP

006434

,,42777

125252

010204

BIC

':L25252,tTEMP+2

2106442 2122737 2152525 2116644

CMP

.52525,ta#TEMP

006450

001401

SEQ

•

.~

4

006452

104000

HLT

006454

104400

SCOPE

006456

012737

177777

016634

MOV

#·-l,@#C

0216464

047777

2110124

010144

BIC

'B+2,6'C+2

006472

"26'737

0{0134

016634

CMP

A·~10,'#C

006500

0014'11

BEQ

•

••

4

006502

104000

HLT

006504

1044r10

SCOPE

006$06

12J,1270~

125252

MOV

#125252,

''''

006512

167700

010076

SUB

fIIB+2,%0

006516

~20027

00(:'000

CfoiP

''''

,

#0

006522

IiH31401

8EQ

•

.~

4

006?24

104000

HLT

006526

1~44~H~

SCOPE'

006530

~12737

:125252

016644

~ov

#t25252,(J#TEMP

006536

166777

010050

01~102

suB

B"

@lTEMP+2

PAL

Xli

V

IZlIO

3 14

...

r:-E8-71

13

H~J6

PAGE

1-27

0106544 0101401

BEQ

.+4

0106546 H"4001O

HLT

~10655Q!

1044010

SCOPE

?0655?

012737

125252

016644

"'10V

#125252,,#TE"1

P

00656l

167777

V'10030

eHH~61O

SUB

~8+2,@TEMP+2

006566

~05737

e16644

TST

(a#TEMP

0106572 10014?1

SEQ

,+4

2106574

l1Z1400~

HLT

006576

11044010

SCOPE

:TEST

ADO

INDIRECT

WITH

INDEXING

010661010

01050010

CLR

%0

006602 067700

eH~l0106

ADO

ea8+2,~0

006606 022700

125252

CMP

#125252,,,e

0106612 0101401

BEQ

,+4

0106614

104000

HLT

0106616 1044010

SCOPE

10066210

QjlO51037

016644

CLR

,#TEMP

0106624

062777

125252

010014

ADO

#125252,titTEMP+2

0106632

022737

125252

1016644

CMP

#125252,.*TEt-1P

01066410

0101401

BEQ

,+4

1006642

11040100

"'LT

0106644 1104400

SCOPE

10106646

012737

125252

016644

MOV

*125252,,'TEMP

1006654

~67777

0077521

007764

ADO

ttA"'6,IIITEMP+2

0106662

023727

016644

177777

CMP

@#TEMP,#-l

10066710

0101401

BEQ

,+4

0106672

10410010

HLT

1006674

11044010

SCOPE

}TEST

U-NARYS

INDIRECT

WITH

INDEXING

006676 012737

177777

016644

MOV

j

...

l",TEMP

0067104

""5077

007736

CLR

"TEMP+2

1006710

005737

016644

TST

'I'TEMP

0106714 0101401

SEQ

.... 4

006716

110410010

HLT

1006720

111'4400

SCOPE

~1ZI6722

012737

125252

016644

MeV

*125252.,.TEMP

006730

~05117

007712

COM

@tTEMP+2

006734

022737

~52525

016644

CMP

#052525,'#TEMP

006742

2e.1401

BEQ

.+4

006744

10401.:10

HLT

006746

H'4400

SCOPE

(;06750

005~37

e'16644

CLR

~#TEMP

(.06754

005277

~1ZI7666

INC

liTEMP+2

;<06760

022737

00~0el

e16644

CMP

flIl,ea#TE,.,"

006766

~H:H401

BEQ

,+4

;'06770

1k~4200

HLT

~H~b772

1~'44~~\~

SCOPE

PAL

V~:03

14-FES-71

13106

P.(GE

1-28

e06774

~0:5e37

016644

CLR

~#TEMP

0e7~00

0e:5371

~07642

DEC

'TEMP+2

N'!7012!4

02:3727

016644

177777

CM.P

.#TEMP,#~l

~07l12

~014~1

SEQ

.+4

.20721

11

H~40~0

HLT

ie7~16

le44iHj

SCOPE

121217023

012737

e0~.HH·l

016644

MOV

#1,

(i)#TEM'P

007~26

0eS477

0t;!7614

NEG

~TEMP+2

007el32

022737

177777

016644

CMP

j-1,1II#TEMP

007e40

00~401

SEQ

.+4

k~07042

1,~4e00

HLT

C07244

10440~

SCOPE

0e7046

01~737

177777

016644

MOV

#-l,QII#TEMP

~07054

000261

SEC

007056 005577

007564

ADC

IIHEMP+2

007062 00p737

12!16644

TST

~#TEMP

007066

00;1.401

SEQ

.+4

007070

104000

HLT

007072

11214400

SCOPE

NP2J74

012737

000001

016644

MOV

#l.@#TEMI'

007H~2

000261

SEC

Ql07H~4

005677

007536

SSC

QIITEMP+2

007110

005737 016644

TST

8II#TEMP

00711

4

001

401

BEQ

.+4

007116

104000

HLT

007120

1044~0

SCOPE

JTEST

OF

COMBINEO

INDEXING

AND

INOIRECT

007122

012700

177772

MOV

#-6,~0

007126

027027 016622

125252

CMP

C'A(0),#12525?

01217134

0''1401

SEQ

,+4

007136

104000

HLT

007140

104400

SCOPE

007142

012710

177772

MOV

#-6,%0

007146

02277""

125252

016622

CMP

#125252,'A(0)

007154

0014~1

SEQ

.... 4

"07156

1~4000

~LT

r0716e'

104400

SCOPE

~~07162

0127ee

177772

MOV

'/1.

..

6,%0

'~07~

66 0127.:'1

01£H~0Z2

MOV

#+2,%1

?07172

027371

~16622

016622

CMP

tilA(0)

,tlAI(l)

~~e7200

0014.'1

8EQ

.+4

~'072""2

1 e 4

(l"

~

HLT

c07204

lk~44J~

SCOPE

;TEST

B!C

INSTRUCTION

~:e72i'6

~

12"

~~;;

V"0Jerl6

MOV

#+6,~0

l07212

~n2"b7

177777

0e7424

MOV

#-l,TEMP

C'e722~

~

4

7;~

b 7

e'16622

'H~7416

8 I C

(ilA(0),TD~P

PALX11

V~213

14-FEB

..

71

13106

PAGE

1

..

29

e~7226

022767

125252

0e74121

CMP

#125252,TEMP

0217234

'H~1401

BEQ

.... 4

10217236

104211O~

!-ILT

V'2172421

le4400

SCOPE

;,l7242

21127021

177772

MOV

;;,-6,%0

Z07246

012737

177777

016634

MOV

#-l,lIt#C

707254

21427721

125252

e16644

BIC

#125252,'TEMP(0)

2217262

023727

016634

2152525

CMP

~#C,#2152525

J2I72721

0211401

BEQ

.+4

007272

H~40021

!-IlT

~217274

121442121

SCOPE

21217276

012737

177777

016634

MOV

#

...

l,(I#C

0073214

012700

177772

MOV

#-6,,,21

02173121

012701

1:77772

MOV

#-6,,,1

21217314

21472171

2116622 2116644 BIC

'A(2I),(ltTEMP(l)

21217322

022737

2152525

016634

CMP

#052525,.#C

21073321

0014211

BEQ

.+4

21217332

1214el2l~

IoIlT

21217334

12144210

SCOPE

;BINARY INSTRUCTIONS

:INDEX,

AND

INDIRECT

TEST

OF"

PDP"'11

;TEST

COMPARE

INSTRUCTION

INDEXED

0217336

01272121

1777721

MOV

1\1

..

10,"21 .MINUS

10

TO

REG

21

21217342

1262127 2116622 0210252

CMPB

A(21),#2100252 j ( A

INDEX

BY

MINUS

121)

TO

#125252

~2173521

0r2l1401

BEQ

.+4

21217352

1r2l421e21

IoIlT

;COMPARE

WIT'"'

INDEX

rAILED

0217354 1214400

SCOPE

21217356

21127~0

177770

MOV

1\1

..

121,"21

.fOR

INDEX

2107362 1227621 0021252

016622

CMPB

#21021252,A(0) J A

INDEX£D

02173721

2101401

BEQ

.+4

21217372

121421021

lolL

T

~217374

12144021

SCOPE

~HP376

01272121

210 210

H'J

MOV

#10,"21 J I

NOE

X

0217402 1262127 2116622

212121125

CMPB

A(0),#21210125

0~7410

0014"1

BEQ

.+4

0217412 1040021

IoIlT

e'07414

104400

SCOPE

e07416

0127021 0"21010

MOV

#10,"21

e07422

122760

'-"00125

016622

CMPB

#11J021125,A(0)

l07430

0211401

SEQ

.+4

e07432

104000

IoILT

007434

1044(.110

SCOPE

eel7436

012700

177770

MOV

#-121,%21

~07442

126060

2)16622

016622

CMPg

A

(21)

, A

(0)

/07450

2101401

SEQ

.+4

;'07452

1 e 4

~

~~

21

IoILT

•.

~~745~

1e44~~~

SCOPE

P

A·L

~

V'0!t.j

14'-r

E

~-71

13

f'Q1'6

P'A·G;E

l-:5~a

0~74:...

...

0l12'7~0'

@il0'~10'

M'OV

ft+

Ut"%0

0''''74'62 ! 2'60'6 0

016622

"'166'22

C,"'PS;

A·

( 0') , k (

0'

)

~07470

00t'4~1

BEQ

• +4'

007472

1040C0

HLT

007474

1044~j~

SCOPE

207476

01270il

177770

MOV

#-10,%0

007502

012

7

~11

00000.4

MOV

#,+4,%1

k1ftJ7506

126061

01:6622

016622

CMPS

A(

0)',

A

(1)

007514

001401

SEQ

.+4

007516

104000

HLT

007520

104400

SCOPE

007522

12d160

016622 016622

CMPB

A

(1)

, A

(0)

007530

121'0114"

1

SEQ

.... 4

007532

104'0~Hl

HLT

007534

104400

SCOPE

007536

012700

177774

MOV

#

...

4,%0

01217542

0127~1

0000121

MOV

#+10,%1

007546

126061

016622 016622

CMPB

A(0),A(1)'

007554

0"H

401

SEQ

•

+4

007556

1040021

HLT

007560

104400

SCOPE

007562 012700

177774

MOV

#~4,"0

007566

012701

0210010

MOV

#10,"1

007572

126160

016622 016622

CMPS

A(l),A(21:~

C07600

0014~~1

SEQ

.+4

007602

104e0f2J

HLT

007604

104400

SCOPE

JTEST

MOVE

INSTRUCTION

F'()R

INDEX

007606 012700

17777f!J

MOV

#-10,%0

01217612

116067

016622

007~24

MOV8

A(0),TEMf)

007620

126727

007020

000252

CMPS

TEMP,

#0~"~252

007626

001401

SEQ

.+4

007630

104000

HLT

007632

104400

SCOPE

007634 012700

~00010

MOV

#+10,%0

12107640

11M~67

016622

006776

MOV8

A(0),TEMP

007646

126

727

006772 000125

CMPS

TEMP,#00~125

007654

11HH4kH

SEQ

•

+4

12107656

1040(1'0

HLT

007660

104400

SCOPE

00766?

012

7

CJ

17777'0

MOV

*-10,\0

0~766f>

112;'6~~

125252

"'16644

1'10

V

~I

#125252,TEMP(0)

007~74

123727

016634

125252

CMPEl

@I#e,

#125:252

0077132

12J~14;'1

SEQ

t + 4

0077(14 1 It 4

~11.'

e

HLT

,~e

7

l0

6 1

~>

4.~?

,:

SCOPE

PALX11

VeJI2I3

14

..

F"E8-71

13:1216

PAGE

1-31

2e7710

0127e~

e0212110

MOV

#+1121,"121

207714

112760

e52525

12116644

MOVB

ti052525,TEi"1P(I2I)

e~7722

123727

e16654

12152525

CMP8

~#TEMP+1121,#052525

;?Z773Z

~HH4el

BEQ

.... 4

~e7732

le40e0

HLT

ee773~

104410

SCOPE

;TEST BIC

INSTRUCTION

F"OR

l"JOEXING

227 736

012767

177177

121121671210

MOV

#

..

l,TEMP

2~P744

eJ127~iil

17777;1

MOV

#-10,"~

007750

146067

'H6622

006666

8ICB

Id

21

) ,

TE

"1P

~~7756

126727

e06662

177525

CMPB

TEMP,#177525

~Hn764

2101401

BEQ

.+4

207766

H~4~H~0

HLT

207770

1044;00

SCOPE

007772

012767

177777

006644

MOV

*-l,TEMP

01021210

012700

0011121

1

121

MOV

#10,"0

0UH304

146067

e16622

006632

BICB A(21),TEMP

e1ee12

126727

~12I6626

0'''652

CMPB

TEMP,

#1211211652

eH~12I2e

12101401

BEQ

.... 4

e10022

1040~0

HLT

e10~24

1044e0

SCOPE

e10026

12112737

177777

12116654

MOV

# ..

1,,,#TEMP+1121

l10034

012700 000010

MOV

#10,"0

eHHH0

142760 125252

016644

BICB

#125252,TEMP(0)

01012146

123727

016654

12102525

CMPB

tittiTEMP+10,#2525

010054

"014kH

BEQ

.... 4

lle'056

10412100

HLT

e10eJ60

104400

SCOPE

eleJ062

01271210

1·7777121

MOV

*-10,"121

01012166

012767

1?7777

21216540

MOV

#-1,TEMP-10

e'10074

142767

e~;2525

006532

BICB

#052525,TEMP-10

eH~U~2

126727

21"6526

125252

CMPB

TEMP-H~,

*125252

e1~110

0014e"1

SEQ

,+4

el~112

104021~

HLT

~10114

1044021

SCOPE

,T£ST

UNARYS

INO£X£D

llel16

012737

li'7777

016644

MOV

~-l,.#TEMP

eH~124

~127e,21

177770

MOV

*

..

10,%0

lle132

H'5060

"'16654

CLRB

c:l

(21)

eHH34

1e5737

~16644

TSTB

@~TEMP

eH~14l

2101401

BEQ

.+4

2121142

12!40e0

HLT

':1t:144

10442e

SCOPE

ZlZ146

012 737

177777

2'16644

MOV

~-1.@*TE"'1P

?ll

54

eJ127.'~

177773

MOV

~-10,"~

~'

17

63

le5~~b0

~16654

CLR8

o

(it"

-.

~

...

, .

(.

64

023727

;'16644

1774021

CMP

:III#TEMP,*1774~0

....

~

?

"-

J.-~

..,~

/

t::

"01'~'1

SEQ

• + 4

PAL~

v0e3

14-F"ES

..

71

13:~6

PAGE

1-32

e 1 0

1',

104000

~LT

0H:'176

1044e~

SCOPE

eH~20e

~14737

177777

216644

MOV

~~1,

'#TE~IP

~10206

012700

177771

MOV

#-7,%12)

i'1~21?

H~5060

":.6654

CLRg

D

(0)

e10216

12)23727

i'lt644

tH~£'377

CMP

t.iI#TEMP,

#C!lriH~377

210?2

4

~H~1401

BEQ

.+4

e10226

10~~H~0

HLT

010230

1~4400

SCOPE

010232 012737

177777

016644

MOV

tj"l,@#TEMP

e10240

012,700

0~kHH0

MOV

#+10,%0

010244

105060

~H6634

CLRB

C

(")

e102512)

10~737

~16644

TSTB

@#TEMP

e10254

'''H:401

BEQ

.+4

010256

104:12)012)

HLT

010260

104:400

SCOPE

010262

012

1

737

177777

016644

MOV

*

..

1,tD#TEMP

01027"

012700

177770

MOV

#-10,%0

010274

105'160

016654

COMB

D(rzl)

010300

105:737 2116644

TSTB

Gt#TEMP

01030

4 (01412)1

SEQ

.+4

010306

1041c'HH'J

f.lLT

010310

104400

SCOPE

eH~312

012737

177777

016644

MOV

#

...

l,@#TEMP

0103212)

012700

012)012!10

MOV

#10,%0

010324

105160

12!16634

COMB

C

(0)

010330

105737

12!16644

TST8

ED#TEMP

12)112)334

2101412)1

SEQ

.+4

010336

104000

HLT

010340

104400

SCOPE:

e10342

012.737

177777

016644

MOV

#

...

l,@#TEMP

010350

0127~0

177770

MOV

*-10,%0

010354

11215260

~16654

INCS D

("')

e10360

1~5737

016644

TST8

lI#TEMP

010364

001401

SEQ

.+4

010366

104000

HLT

~H0370

023727

016644

17 7

40121

CMP

@#TEMP,#177400

010376 001401

SEQ

.+4

0H~400

104~e0

HLT

010

402

104400

SCOPE

el~404

12112737

177777

016644

MOV

#-l,(i#TEMP

?10412

012700

er,HH~l

J

MOV

#+10,%0

eH"416

10526k1

016634

INCa C

(0)

210422

le5737

016644

TST8

(i#TEMP

e10

426

0014Jl

8EQ

.+4

01~43~

104eC0

HLT

eH"'43?

1044::'0

SCOPE

iH"434

('l12

737

~0~e?1

r.lb644

MOV

#l,(Ol#TE~P

PALX11

V003 14-F"EB-71

13:06

PAGE

1-33

010442

211270121

17777~

MOV

*-lel,%~

~10446

l1Z536eJ

2116654

DECB

0(0

)

0121452

11215737

""16644 TST8

(a#TEMP

010456

",,014Z1

8EQ

,+4

010460

H~42~~

HLT

010462

1044~it

SCOPE

010464

2112737 00ilJ001

016644

MOV

*l,~#TEMP

~10472

0127~2l

0121211211121

MOV

#10,"0

010476

105360

~16634

DECB

C ( " )

~1(l!502

105737

2116644 TST8 ,#TEMP

010506

001401

SEQ

,+4

1211121510

1eJ4flel0

~LT

12110512

leJ44e~

SCOPE

010514

012737

eJ00~"H

016644

MOV

~l,@#TEMP

~11121522

012700

17777121

MOV

#-10,%121

1211121526

1121546121

12116654

NEGB

0(0)

01121532

2123727

016644

000377

CMP

61#TEMP,.377

12110540

2101401

BEQ

,+4

010542

10412100

IofLT

12110544 10440121

SCOPE

010546 012737 000001 016644

MOV

.1,'.TEMP

010554

01270121

0rr"~010

MOV

.+10,"0

010560

105460

016634

NEGB

C ( 0 )

010564 023727

01.6644 0021377

CMP

,.TEMP,#'!;7

010572 001401

BEQ

,+4

010574

lel40e'0

~LT

010576

104

400

SCOPE

010600

012737

177777

016644

MOV

#-l,(I#TEMP

010606 012700

177770

MOV

#-10,"0

010612

000261

SEC

010614

105560

016654

ADCB

0(0)

010620

023727

~16644

177400

CMP

,#TEMP,#1774eJ0

010626

210141211

BEQ

,+4

010630

112140e0

HLT

010632

104402

SCOPE

010634

012737

177777

12116644

MOV

*-l".TEMP

010642 012700 000010

MOV

#+10,"0

010646

Q"~0261

SEC

12110650

105562

016634

ADC8

C (Ii!!)

eJ10654

023727

016644

17741210

CMP

6I#TEMP"17740~

010662

001401

BEQ

,+4

01121664

le4000

HLT

010666

H~44'~0

SCOPE

010£'712'

,,12737

~0~4~1

~16644

MOV

.401,'*TEMP

0112'676

0127Jr.

177771

MOV

#-7,"0

0112'n~2

0002bl

SEC

010704

le5t:::;'

"'16654

S8CB

'J

(~,

~~10710

,,22/37

;"~

;~

'"

('11

~16644

CMP

#l,£i#TEMP

PAL,#"",

V~0~

14

...

rES;:'71

13106'

PAGE

1-34

010716

,HH401

BEQ

.+4

01"72~

104000

f-lLT

0HD22

1044V';1t1

SCOPE

eHn24

(2112'737

~eer,0.1

016644

MOV

#l,tiD#TEMP

c107,52

~127e0

l~l01eJ

MOV

#+1(21,%0

010736

eH~0261

SEC

wt0740

105660

016634

S8CB

C (

eJ

)

~10744

(211215737

016644

TST

@#TEMP

01075121

2101401

BEQ

,

+4

010752

11214000

f-lLT

010754

104400

SCOPE

;TEST INDIRECT

ADDRESSING

;TEST

COMPARE

INSTRUCTION

010756

123'727

016612

000252

CMPB

,#8,#0121121252

01121764

01211401

BEQ

.+4

01121766

104,00121

HLT

010770

112144;10

SCOPE

01121772

123727

12116613

000252

CMP8

(ittH~+l,

#2'2

011000

0kH;401

BEQ

,+4

~11002

104:~HH'

HLT

011~04

10440121

SCOPE

01101216

122737

125252

016612

CMP8

IIl125252, .W8

011014

ml2l1401

BEQ

,+4

011016

104000

HLT

011020

104400

SCOPE

011022

123737

016612 016612

CMP8

,;fjI8,(I#8

1£'11030

00t'401

BEQ

.+4

01H:l32 104,000

HLT

0111£'34

104400

SCOPE

;TEST

MOVE

INSTRUCTIONS

011036

113:700

''16612

MOVB

(1#8,%0

011042

12,2:700

000252

CMPS

#9.100252,

%21

011046

001A

ell

BEQ

• +4'

011050

11214;00121

HLT

011052

104400

SCOPI:

011054

112737

125252

016644

MOVS

#125252,tI#TEMP

el1~62

12

6~7

3 7

el05524

016644

CMPS

B',

tafl!TEMP

011070

'!J01401

SEQ

.+4

011072

1

~

40

~~

0

HLT

011074

104'4!CIJ

SCOP[

?11076

113'737

~16612

~16634

MOVB

tI#B,@#C

~11104

1267::;7

005502

(?!16634

CMPB

S,'#C

~~

11112

0014?1

SEQ

.+4

01111

4 1

kl4

0~'

0

HLT

l11116

1044,,1.1

SCOP[

PALX11

V003 14-F"EB

..

71

13106

PAGE

1

...

35

;TEST

UNARYS

INDIRECT

211120

012737

177777

016644

MOV

#-l,til#TEMP

el1126

105037

016644

CLRB

CI#TEMP

VJ11132

023727

216644

177400

CMP

(i#TEMP,#177400

~11140

rtH~1421

BEQ

,+

4

011142

104e~:e

HLT

011144

1~44~2

SCOPE

011146

012737

125252

016644

MOV

*125252,

..

#TEMP

~11154

105137

016644

COMS

tII#TEMP

011160

022737

125125

016644

CMP

*125125,.#TEMP

011166

0014Qa

BEQ

.+4

011170

104000

HLT

011172

104400

SCOPE

011174

"12737

125252

016644

MOV

#125252,.#TEMP

011202

105137

016645

COMB

tI#TEMP+1

011206

222737

052652 016644

CMP

#052652,.#TEMP

011214

0014e1

BEQ

,+4

011216

104000

HLT

011220

104400

SCOPE

011222

005037 016644

CLR

(I'TEMP

011226

105237

016645

INCB

_.TEMP+1

011232 022737

iH~0040el

016644

CMP

.400,

..

#TEMP

011240

001401

BEQ

.+4

011242

104000

IoILT

011244

104400

SCOPE

011246

2105037

016644

CLR

tI#TEMP

011252

105377

00537~

DECB

eITEMP+2

011256 023727

016644

000377

CMP

ta#TEMr:»,#377

~11264

001401

BEQ

.+4

011266

104000

IoILT

011270

104400

SCOPE

011272

305037

016644

CLR

~#TEMP

011276

112737

'-HlJ0NH

016645

MOVB

iH,

ta#

TEM!'+

1

011304

105437

016645

NEGB

.'TEMP+1

011310

022737

1774~0

016644

CMP

*177400,_'TEMP

011316

001401

BEQ

,+04

011320

104000

HLT

k111322

104400

SCOPE

JTEST INDIRECT

ADDRESSING

~IHf

INDEXING

;TEST

COMPARE

INSTRUCTION

""11324

127727

~05264

125252

CMPa

1118+2,#125252

0.11332

001401

8EQ

,+4

f1L~34

104000

HLT

011336

10440~

SCOPE

011340

122777

125252

0e5246

CMP8

#125252

...

B+2

~1113

4 6

0014,'

1

8EQ

, + 4

01135~

1f'14

[I

..

~k:}

HLT

PAL.,..,.,

V0~3

14-FEB-71

13:~6

PAGE

1-36

~1135c

le4~400

SCOPE

rl1354

127777

e!05?34

005232

CMPB

tIlIB+2,.8+2

011362

001401

BEQ

.+4

211364

104'e\:';~

HLT

",:11366 1044('iC

SCOPE

;TEST

MOVE

I~STRUCTIONS

el137~

1177Z~

~05220

MOV8

1118+2,"0

011374

122700

125252

CMPB

#125252.""

011403

~01'401

BEQ

.+4

~11402

1040~0

I-ILT

e114e4

104'400

SCOPE

e:11406

112777

125252

2105232

MOV8

#125252,'TEMP+2

011414

126737

2105172 2116644

CMP8

8,6t#TEMp

011422

001401

BEQ

,+4

011424

1040~0

HLT

~11426

104400

SCOPE

011430

117777

005160 005200

MOV8

_B+2,

"C+2'

011436

126737

~05150

016634

CMPB

8,(!II#C

12111444

0'014

v;

1

BEQ

,+4

12111446

104121'00

HLT

12111450

1044~0

SCOPE

}TEST BIC

INSTRUCTION

INDIRECT

WITH

INDEXING

211452

3127~0

177777

MOV

#-1,"0

e.11456

1'477~0

005132

BICB

_8+2,%0

e11

462 1202127

052525

CMPS

"0,#52525

011466

~01401

BEQ

,+4

~11470

H~4000

HLT

011472

1~4400

SCOPE

011474

012737

177777

12116644

MOV

#-1,

@#TE~IP

e11502

142777

125252

2135136

8ICS

#125252,fIITEMP+2

011510

122737

12152525

016644

CMPS

#52525,GljTEMP

r11516

001401

BEQ

,+4

011520

104000

HLT

011522

104400

SCOPE

011524

012737

177777

016634

MOV

j-l,GI#C

011532

147777

005056

005076

BICB

f8+

2 ,Gle.

~~

e11540

126737

"'05P!66

016634

CMPB

A+10,f#C

011546

001401

BEQ

,+4

211'550

104~HHlJ

HLT

~11552

104400

SCOPE

:TEST

UNARYS

INDIRECT

WITH

INDEXING

?11554

012737

177777

el16644

MOV

#-l,fI#TEMP

r11562

1~5077

~05eJ60

CLR8

flTEMP+2

~11566

~e5737

216644

TST8

~#TEMP

i'115"/2

0e14~~1

8EQ

,+

4

;'1157

4

1040~~0

HLT

~'115

76 1

e 4 4

k~

0

SCOPE

PALX11 V003 14-I="E8-71

13:06

PAGE

1·37

e11600

2112737

125252

016644

"10V

#125252,,#TEI-1P

011606

1125177

005034

CO~B

~TEMP+2

~11612

122737

052525

"'16644

CMPS

#052525,8I#TEMP

C11620

001401

8EQ

.+4

~11622

1040e0

HLT

;.:1162

4

104400

SCOPE

e11626

Qle5037

016644

CLR

~#TEMP

C11632

le5277

005010

INCB

(lTEMP+2

011636

122737

~"'''~0e1

016644

CMP8

#l,(i#TEMP

011644

01211401

SEQ

.+4

1211646

1~4~e,0

HLT

011650

1044e~

SCOPE

011652

005~37

016644

CLR

(I#TEMP

12,11656

1rl5377

004764

DECB

fIITEMP+2

011662

123727

016644

177777

CMPB

,#TEMP,#

..

l

011670

001401

BEQ

.+4

011672

104000

HLT

011674

104400

SCOPE

011676

012737

0210001

016644

MOV

#l,(i#TEHP

011704

105477

004736

NEGB

lIITEMp+2

011710

122737

177777

016644

CMPB

#

..

l,@#TEMP

011716

001401

BEQ

,+4

0117221

H~4~00

HL

T

~11722

1044QH!J

SCOPE

01172

4

012737

177777

016644

MOV

tII-l,lII#TEMP

011732

12100261

SEC

011734

105577

004706

ADCS

'T£HP+2

011740

022737

1"174-0-0

-13"16644

CMP

*177400,'#TEMP

011746

001401

BEQ

,+4

~11750

1k14001i!!

HLT

~11752

1rd5737

016644

TST8 .#TEMP

011756 001401

8EQ

.+4

e11760

1040~0

HLT

011762

104400

SCOPE

011764 012737

0000"'1

016644

MOV

tII1,(i#TEMP

e11772

Ql00261

SEC

e11774

lk'J5377

~04646

OEC8

I.ITEMP+2

0120~~

Qle5737

016644

TST

~#TEMP

'~12

'-'

~

4

~C1401

SEQ

.+~

012le6

H'!40(;10

j.jLT

~'12~1~

1

k'J

4 4

e'

k.~

SCOPE

;TES'"

:Jr

CC~8INED

INDEXING

AND

INDIRECT

~~12?12

a127

J

177772

~OV

#

...

6,%0

e12l16

1(27C

7

~~16622

125252

CMPg

~A(QI),#125252

~'12?

2 4

2t'14

1

8_EO

• + 4

r:

12:';2

b

1~4?

0

lolL;

V12?.3?

H:'44

~

_

S(,Dor

PAL-r.

V003

14-r:EB-71

13106

PAGE

1-38

012032

0121700

177772

MOV

#-6,%0

012036

12277~

125?52

~16622

CMP8

#125252,~A(0)

012044

"'01:4~1

8EQ

,+4

~12eJ46

104eJv~0

HLT

V127'50

1~44i'~

SCOPE:

012052 012700

177772

MOV

,;-6,%0

012056

0127~1

e000e.2

MOV

#+2,%1

012062

12~071

016622

CMP8

~A(0),~A(1)

0122170

001471

8EQ

,+4

012072

104000

HLT

012074

1~4400

SCOPE

;TEST BIC INSTRUCTION

0122176

012700

000006

MOV

#+6,%21

012102

~12767

177777

004534

MOV

#-l,TEMP

012110

147067

016622

004526

8IC8

GtA(0),TEMiP

'012116

122767 125252

004520

CMPB

#125252,

'T'EMP

012124

0ftH401

BEQ

,.4

012126

104000

HLT

012130

104400

SCOPE

2112132 2112700

177772

MOV

#-6,%0

012136

012737

177777

2116634

MOV

#

...

l,.,#C

012144

142770 125252

016644

BICB

*125252,

(!!!TEMP

(21)

012152

123727

016634 000125

CMP8

.*C,

#21001.25

012160

001401

BEQ

••

4

012162

104000

HLT

012164

104400

SCOPE

012166

2112700

016614

MOV

#8+2,"0

JADOII'ESS

or

ADDRESS

OF"

8

012172 023067

211tl4414

CMP

,(0)+,8

-e12!/b

00t401

BEQ

,+4

01221tl0

11tl4001tl

HLT

012202

104400

SCOPE

012204

2112700

016616

MOV

tt8+4,"0

012210

025067

004:376

CMP

.-

(0)

,8

012214 001401

8EQ

.+4

012216

112141210121

I1LT

012220

1044210

SCOPE

012222

(2112700

e16616

MOV

j8·4,X0

012226

125067

004360

CMP8

~-

(e)

,8

012232

00i4~1

BEQ

.+4

0122:34

104000

HLT

012?'36

104400

SCOPE

012240

012700

~16640

MOV

#C+4,"0

012244

((112737

177777

016634

MOV

#-l,@#C

012252

105050

CLR8

(it-(0)

"~12?'54

12J237~7

716634

177400

CMP

~#C,#17740el

V!12262

00141'1

SEQ

, + 4

vJ12?64

H~4~h',~

HL:

PALX11

Ve03 14-F"EB-71

13:"6

PAGE

1-39

012266

1~4400

SCOPE

e12270

012737

177777

C!l16634

MOV

#-l,@#C

~12276

012700

177772

MOV

#.-6,

%0

v123~2

0127;H

177772

MOV

#-6,%1

e123~6

141~)1

016622 016644

BICB

(lA(0)

,&!'TEMP(1)

e1231

4 el22737

177525

CH6634

CMP

#177525,II#C

r.12322

001401

BEQ

,+4

012324

le4000

HlT

012326

104400

SCOPE

:TEST

THAT

R0

IS

NOT

DESTROYED

BY

rALSE

SELECTION

e.1233el

012700

052525

MOV

#52525,"0

JTHIS IS

CHECK

lATER

IN

PROGRAM

:TEST JSR

INSTRUCTION

~12334

004767

000002

JSR

,,7,

TJSR2

,PLACE

PC

ON

STACK

012340 000405

TJSR1:

BR

TJSR3

IRETURN

HERE

ON

RTS

"19

e12342

121627

012340

TJSR2:

CMPB

_,,6,

#T

JSFU

:CHECK

rOR

CORRECT

PC

ON

STACK

012346 001401

BEQ

,+4

~12350

104000

HLT

'INCORRECT

PC

ON

STACK

012352

000207

RTS

,,7

JRETURN

TO

IMST

AFTER

JSR

012354

104400

TJSR3:

SCOPE

012356

00[2)257

CCC

012360

004717

JSR ,,7,(1"7 JINSTRUCTION

UNDER

TEST

012362

121627

012362

CMPB

'''6,#TJSR3+6

JTEST

THE

STACK

012366

001401

BEQ

,+4

e12370

104000

HlT .PC

Or

JSR

010

NOT

GO

TO

STACK

012372

005726

TST

(6)

+ JREPOSITION

THE

STACK

e12374

104400

SCOPE

:TEST

NESTED

SUBROUTINES

012376 000257

CCC

}ClEAR

CONOyTION

CODES

e124r210

"'04767

004052

JSR

"7,SuBR6

012404

1004[2)1

BMI

,+4

0124[2)6

104000

HlT JJSR

OR

RTS

FAILED

e12410

001401

BEQ

,+4

rl!12412

1040[2)0

HlT

'JSR

OR

RTS

F'AIlEO

012 414 H'J2401

BVS

,+4

012416

104000

~lT

JJSR

OR

RTS

F'AIlED

e1242r21

103401

BCS

,+4

012422

104

Ii"?)

0

HLT

JJSR

OR

RTS

F'AIlED

e12424

104.4~0

SCOPE

JTEST

ROTATE

ODD

BYTE

e12426

1044e0

SCOPE

~1243e

000257

CCC

.CLEAR

"C"

i'12432

012767

123456

004204

MOV

#123456.TEMP

~124412l

H~6e167

~042~1

RORB

TEMP+1

JROTATE

ODD

BYTE

z12444

lrt3401

8CS

•

+4

7012

4

46

le4~H30

HlT J C

NOT

SET

;:11245~

H~2401

BVS

.+4

('12 452

104000

~lT

J V

NOT

SET

;"12454

0227b7

?51456

ee

4162

CMP

#051456,TE~P

;'12~62

"e14r1

8EQ

.+4

;::'12464

H~4~'~'0

HLT

.ROTATE

F"AILED

:"12466

1

~

4 4

~~

0

SCOPE

PAL~

V0~3

14-r:E8-71

13f06

PAGE

1-40~

e12470

0e0277

sec

}SET

C

~12472

012767

123456

~H2!4144

MOV

#123456,1'E~P

i:125Z2

le6267

704141

ROR8

TEMP+1

l1250

4

1~34Z1

BCS

,+4

l125e6

H~4e.f\e

HLT

J C

NOT

SET

~12'H~

1~2e21

BVC

•

+4

212512

le4000

HLT

J V

NOT

CLEARED

012514 022767

151456

004122

CMP

#151456,TEMP

012522

001401

BEQ

,+4

01252

4

104~HH'J

HLT

,ROTATE

F'AILED

e12526

H~441t0

SCOPE

012530 000257

eee

e:12532

012767

123456

004104

MOV

#123456.

'f,[MP

e12540

1e6167

e041~1

ROlB

TEMP+l

012544

103401

BCS

,+4

012546

1.04000 HlT

Ie

NOT

SET

e12550

102401

BVS

.... 4

012552

104000

HlT J V

NOT

SET

e12554

022767

12'47056

00412162

CMP

• 0 4 7

1215

6 ,

'f'

E M P

~12562

001401

BEQ

,+4

~12564

10401!:l0

HLT

.ROTATE

BYTE

F'IQLED

012566

104400

SCOPE

012570

000277

SCC

.SET C

012572 012767

123456

004044

MOV

#123456.l'EMP

012600

:1.06167

004041

ROL8

TEMP+l

012604

103401

BCS

.+4

012606

10400k' HlT • C

NOT

SET

0126H'

102401

BVS

.+4

012612

104000

HlT I V

NOT

SET

012614

022767

047456

00412122

CMP

#047456,

'f'EMP

012622

001401

BEQ

.+4

e12624

104000

HLT

.ROTATE

000

BYTE

F'AIlED

012626

104400

SCOPE

012630 000257

CCC

.CLEAR

C

e12632

012767

177777

004004

MOV

#-l,TEMP

012640

106267

e~40"1

ASRB

TEMP+l

012644

Ul3401

Bes

,+4

e12646

104"~H"

~LT

• C

NOT

SET

~12650

t02001

Bve

,+4

012652

1~4"00

HlT J V

NOT

CLEARED

012654 026727

e'03764

177777

CMP

TEMP,#-l

~12662

12!01401

BEQ

•

+4

~12664

1040k:10

HLT

JSHIF'T

F'AILED

e12666

1044'10

SCOPE

e12670

0'0~277

sce

e1267?

012767

177777

003744

MOV

#-l,TEMP

'"

12 700

106307

"'03741

ASL8

TEMP+1

?127e'4

103401

BCS

,+4

r12706

104000

HLT

J C

NOT

SET

~'12710

102~r.l

8VC

,+4

PALX11

V003

012712

~'12714

012722

\1:12724

V12726

012730

012734

e12736

fl12740

"'12742

el12744

012746

012752

012754

012756

012760

012762

012764

012766

012774

e13~00

V13710

4

e.13012

~~13~14

r13~16

?13024

(,13e30

?1303

4

vj13~4~i'I

('

13

e

44

.:.'

13 ;;'5;;

104000

026727

QHI,3724

001401

H~4000

104400

005037

005000

005001

020001

001401

104000

020027

rll01403

005200

005201

000767

104400

012767

005267

004767

026727

001370

000446

016767

006067

006167

00616/

~06161

177777

~01ZJ126

e02l((!12

000116

e0~104

ee0120

e0~074

000070

~HH'I064

e00060

e0~054

177377

177777

PAGE

1

...

41

I-lLT

CMP

BEQ

HLT

SCOPE

TEMP,.177377

,+4

JTEST

COMBINATION

OF

N,

C

AND

V

,MACR

TNCV

BPL

,+12

BCC

,+20

BVC

,+3""

HLT

8R

BCC

BVS

HLT

BR

BVS

~LT

BR

BVC

HLT

SCOPE

.ENDM

.+24

,+16

,+20

IV

NOT

CLEARED

JSHIFT

BYTE

FAILED

Jl=l

Jl=l,

C=l

jl=C,

BUT

V=i

,l=0

ii!=0,

C=1

Ii!

NOT

EQUAL

C,

V=i

Ji!=i,

C=0

ii!

NOT

EQUAL

C,

V-1

ji!=0,

C=rlJ

1i!=C,

BUT

V=1

CLR

'_ICOUNT

JNO

ITERATION

JTEST

ALL

COMBINATIONS

or

NUMBERS

WITH

COMPARE

INSTRUCTION

COMPAR:

CLR

~0

JINIT

X0

CLR

~1

JINIT

%1

CMP1:

CMP

%0,%1

JARE

THE

EQUAL

BEQ

,+4

CMP2:

~L

T

CMP

BEQ

INC

BR

SCOPE

;TEST

ROTATING

SCOPE

MOV

TSROT:

INC

JSR

CMP

BNE

8R

ROTALL:

MOV

ROR

ROL

TNCV

"0,#-1

CMP2

~0

"1

CMF'l

ALL

NUMBEAS

#-1

d~EFF

REFF

%7,ROTALL

R.EFF,#-l

TSROT

TSRT2A

REFF,TEST

TEST

TE.ST

TEST

JR0

AND

RiOlO

NOT

COMPARE

JAT

UPPER

LIMIT

JYES

EXIT

IINCREMENT

TO

JINITIALIi!E

BASE

NUMBER

.INCREMENT

NUMBER

JGO

TO

COMPARE

ROUTINE

JTEST

ALL

VALUES

INO

TEST

THEM

ALL

,WE

ARE

OONE

PAL~

V003

14-FEB-.71

1:3

J.~,6

Pl\~E

1-4,2

013~:...-,

100004

8PL .... 12

013056

1~30e7

BCC

.+20

Ji!=l

'~13V'60

102013

Bve

,+30

J

i!

=

1,

C=l

013;;:'62

104000

!-ILT

Jt=C,

BUT

V=l

~113064

0kH'411

BR

,+24

f~13?J66

1030~6

Bce

,+16

Jt=~

013070

1024(:,7

BVS

.+20

J~=0,

C=l

013~72

104000

HLT

; t

NOT

EQUAL

C, V=l

013074 000405

BR

,+14

013076

102404

BVS

,+12

J t =

1,

C:;:0

~13100

104000

HLT

i i!

NOT

EOUAL.

C, V=l

013102

000402

BR

.+6

013104

102001

BVC

,+4

Jt=0,

C=0

013106

104000

HL.T

Jt=C,

BUT

V=l

013110

104400

SCOPE

~'13112

026767 000012

o

12HHH'

6

CMP

TEST, REn-

~'13120

001401

BEQ

.+4

013122

104000

HLT

JINITIAL

NOT

EQUAL

TO

VINAL

013124

ItHll0207

RTS

%7

013126 000000

REF"F:

0

013130 000000

TEST:

g)

013126

REF::REFF

;TEST

ROTATING

BYTE

EVEN/ODD,

ALL

NUMBERS

013132

12112767

177777

177766

TSRT2A:

MOV

# ..

l,REFF

013140 005267

177762

TSROT2:

INC

REf"F"

013144 004767

000016

JSR

,,',RoTBE

013150

004767

2100122 JSR "7,ROTBO

013154

2122767

177777

177744

CMP

#

...

l,REFF

013162

2101366

BNE

TSROT2

013164 000505

8R

ROTEN1

013166 016767

177734 177734

ROTS£::

MOV

REFF,TEST

013174

106067

177730

RORE!

TEST

JROTATE

BYTE

EVEN

013200

10612167

177724

RORE!

TEST

~'13204

1136067

177720

RORe

TEST

013210

106167

177714

ROLE!

TEST

013214

106167

177710

ROLE!

TEST

"13220

10~167

177704

ROLE!

TEST

TNCV

013224

100004

BPL

,+12

~13226

103007

BCC

,'+221

Ji!=t

~13230

102013

BVC

.... 30

it=1,

C=l

~13232

104000

!-ILT

J i!=C,

BUT

V=l

~13234

000411

BR

.+24

013236

103006

BCC

.+16

it=0

'~1324

0

102407

BVS

,+20

Ji!=f;. C=l

013242

10il000

HLT

J l

NOT

EQUAL

C,

V=l

013244

000405

BR

.+14

'H3246

102404

a

VS

.+

1?:

~i!=1,

C=21

013250

104000

HL

f J

i!

NOT

EOUAL

e I V=l

CH3252

0004r2

SR

.+6

'113254 10 2

0l~

1

Bve

,+4

1i!=0,

:::~

l~13256

1040'~Z

HLT

J

t=C.

BUT

V=l

V'13260

1044e~

SCOPE

r13~62

026767

177642

177636

CMP

TEST,RU'"F

PALX11

V003 :1.4-F'EB-7l

13106

PAGE

1-43

013270

001401

BEQ

,+4

013272

104000

HLT

013274

2100207

RTS

"7

013276

106067

177627

RCTeo:

RORe

TEST+1

JROTATE

BYTE

000

013302

106067 177623

RORB

TEST+1

013306

106067

177617

RORB

TEST+1

013312

106167

177613

ROLB

TEST+1

013316

106167 177607

ROLB

TEST+1

013322

106167 177603

ROLB

TEST+1

TNCV

013326

100004

BPL

,+12

013330

103007

BCC

,+2111

.l=l

013332

102013

BVC

,+321

J

l=l,

C=l

013334

104000

HLT

il=C,

BUT

V=l

013336

01iH'J411

8R

,+24

013340

103006

BCC

,+16

'l=21

013342

102407

BVS

,+2111

'lee,

C-l

013344

104000

HLT

il

NOT

EQUAL

C, V=l

013346

2100405

SR

,+14

013350

102404

BVS

,+12

'!=1,

c=e

013352.

104000

IoILT

.l

NOT

EQUAL

C, V=l

013354

000402

BR

,+6

013356

102001

BVC

,+4

'l·e,

C=0

013360

10400121

HLT

.!=C,

BUT

V=l

013362

104400

SCOPE

013364

11126767

1775421

171534

CMP

TEST,REF'F"

013372

001401

BEQ

,+4

013374

HlJ400i2J

IoILT

013376

0021207

RTS

'"

013400

104400

ROTENls

SCOPE

IADD

AND

SUBTRACT

ALL

NUMBERS

AGAINST

·F'IXEO

NUMBERS

IA+B=C, C

..

A=B,

BF'

SHOULD

EQUAL

Bl

013402

,,11667

000072

TST

AR

I I

MOV

..

"6,NUMA

013406

012767

01iHH!101

177512

MOV

*l,REF'

013414

005267

177506

ARITSTt

INC

REF'

013420

004767

0kHHH4

JSR ,,7,ADSU8

013424 022767

177777

177474

CMP

*-l,REF"F'

013432 001370

BNE

ARITST

013434

000422

SR

ARIENO

013436

104400

SCOPE

013440

016767

177462

AOSUB:

MOV

REF',TEST

013446

066767

0"H~026

177454

AOD

NUMA,TEST

013454

166767

000020

177446

SUB

NUMA,TEST

013462

026767

177440

CMP

REF',TEST

013470

001401

BEQ

,+4

013472

104000

HLT

013474

104411'0

SCOPE

013476

000207

RTS

'"

013500

000000

NUMA:

~

013502

104400

ARIEND:

SCOPE

JTEST

COMPLIMENTING

ALL

~UMBERS

e135v.l4

005067

ee3134

CLR

TEMP

IBASE

DATA

013510

005e67

e~3134

CLR

TEMP+4

'BASE

REF'ERENCE

PAL"",

V0

i03 14-I="EB-71

~3:06

PAGE

1-44

l13:

_ 0e:5167 ;'.03124 TeaM:

COM

TEMP

JCOMPLIME:NT

DATA

l13520

00,5367

~'03124

DEC

TEMP+4

:DECREMENT

REF"ERENC'[

Z13524

02:6767 0123114

003116

CMP

TEMP,TEMP+4

;COMPARE

:'13532

0011401

SEQ

,+4

;TE5T

~13534

112,4

:tl0i1

HLT

;COMPLIMENT

OR

DECRE~E'IlT

F"AILED

;'13536

o e'51 b i

:Z3H~2

COM

TEMP

;'13542

~~"5261

.·e3~76

INC

TEMP

;INCREMENT

AND

TEST

I="CR

DONE

113545

e~1362

BNE

TCOM

JNOT

FINISHEO

GO

LOOP

':13550

1044e0

SCO~)E

;TE5T

COMB

(EVEN

BYTE)

213552

00'5067

~03066

CLR

TEMP

;BASE

DATA

013556 005067

~03~66

CLR

TEMP+4

:REf"ERENCE

DATA

i~

13562

10~167

e03056

TCOM2:

COMB

TEMP

:?13566

1Z105367

003056

DEC

TEMP+4

213572

126767

e03046

003050

CMPB

TEMP,TEMP+4

JCOMPARE

2:.3600

e01401

BEQ

.+4

;~13602

104000

HLT

JCOMPLIM£NT

OR

INCREMENT

BYTE

FAIlEO

213604

105167

t1'Jk:'!3034

CaMS

TEMP

~13610

105267

02)3030

INC8

TEMP

013614

001362

BNE

TCOM2

l13616

1044012

SCOPE

;TEST

COMB

(ODD

BYTE)

0136221

005067

0032120

CLR

TEMP

IBASE

DATA

;c13624

005067

003020

CLR

TEMP+4

JREFERENCE

DATA

213630

105167

0032111

TCOM3:

COMEI

TEMP+1

JODD

BYTE

e13634

2l0p367

~0~eH'J

DEC

TEMP+4

213640

12~767

02!3QJrll

003002

CMP9

TEMP+1,TEMP+4

213646

0211401

BEQ

.+4

e13650

104000

HLT

;COMPLIMENT

BYTE

FAILED

013652

10f5167 0212767

COM8

TEMP+1

013656

105267

002763

INCa

TEMP+1

013662

00~362

BNE

TCOM3

e13664

104400

SCOPE

ITEST

COMPARE

ALL

VALUE

EVEN

BYTE

WITH

000

''113666 0215"'67

002752

CLR

TEMP

IBASE

VALUE

013672

126767

002746

0~2745

T5CQMS:

CMPEI

TEMP,TEMP+1 J

COMPARE

013700

00~401

BEQ

,+4

013702

1042100

HLT

,COMPARE

FAILED

~'13704

002001

BGE

,+4

~~13706

104000

HLT

J V

IS

NOT

=

TO

N

~n371~

00:3401 BlE • + 4

~'13712

104000

HLT

IV

IS

SET

~'13714

062767

it004~1

002722

AOD

#401,TE.MP

013722

02?767

177777

002714

CMP

#-1,TEMP

~~13730

001.360

BNE

TSCOMB

v~13732

104400

SCOPE

~13734

012737

~0400e1

016420

MOV

#40210,@#ICOUNT

Q:13742

052737

l~H'.3421

177776

BIS

#340,

GUSTATUS

~'13750

042737

"100340

177776

SIC #340,4i#S'fATUS

~:L3756

ra52737 i'0fZ!3r0

177776

BIS #300,@#STATUS

~'13

7 6 4 04

2737

"003~0

177776

BIC #300,@#STATUS

~:13772

052737

?

121

k.~

2 4 0

177776

SIS

#240,

GlItiSTATUS

PALX11

V003

14-F"E8-71

e1400~

~i4~1216

014014

12'14022

014030

014036

"'14044

014052

01406121

01412166

014070

014076

01411210

01411212

014104

014106

014110

014112

014120

014126

014130

014132

014134

014136

014140

014142

01415121

014156

014162

014164

014166

01417121

014172

014176

01421210

014202

014204

014206

014210

014214

014220

014224

e'14230

~14236

e:14240

2142737

2152737

2142737

2152737

12142737

12152737

~42737

052737

12142737

1'~4400

~e0240

000200

00020121

~00140

I'0e140

~1001021

tHH31Q10

'~00040

~eJ0040

032737

~H~0020

1211211404

1211210001

021012101

01210001

0210001

H~440eJ

12112737"

2:121001121

'"

123727

001404

1210121001

12102112101

Z0210el

12100001

104400

2112737

2112767

02121367

1fZl0001

lfZl4000

~HH4eJ1

10412100

0210367

10e4e1

104000

12101001

104000

1044e0

'H~5037

0C5l6i'

12105067

000367

026767

~e14~1

1(2'4020

0211224

000200

176746

176732

'H6420

17671121

1'76702

1767~0

176674

177776

016420

000377

01642121

176752

17667121

13"'J6

PAGE

1-45

SIC

BIS

BIC

8IS

SIC

BIS

SIC

81S

BIC

SCOPE

.24e,'#STATUS

#200,@#STATUS

*2G'Je,~·STATUS

#140,~#STATUS

#140,'.STATUS

tHe0,

'.ST

A

TUS

#1G'J0,@#STATUS

#40dt#STATUS

#4121,tI#STATUS

;TEST

THAT

A

WAIT

INSTRUCTION

IS

TERMINATED

BY

A

;TRACE

TRAP

WAIT3:

BIT

SEQ

WAIT

SCOPE

MOV

#2e,ft.STATUS

WAIT3

.10

,fl'

I

COUNT

JTEST

OF

TRACE

BIT

'BRANCH

iF

NOT

rOUND

,TRACE

S~OULO

PASS

US

JTHROUGH

THE

WAIT

INSTRUCTION

;TEST

TO

SEE

CMPB

BEQ

WAIT

IF

1/0

DEVICES

WERE

SELECTED

.,REG1,.377

,SELECTED

DEVICES

STORED

IN

~EG1

WAIT4

JB~ANCH

Ir

NO

DEVICES

SELECTED

'INTERRUPTS

WILL

OCCUR

WAIT4:

SCOPE

MOV

,TEST

SWAB

MOV

SWAB

BPL

HLT

BEQ

HLT

SWAB

BMI

HLT

BNE

HLT

SCOPE

CLR

."2"0,TE5T

TEST

••

4

,.4

TEST

.+4

..

#ICOUNT

;TE51

ALL

CO~8INATIONS

OF

SWAB

CLR

TEST

CLR

REF

SWABA:

SWAB

TEST

CMf'

TEST.REF

BE

Q

...

4

HLT

IIr

OEVICES

ARE

SELECTED

JNUMBER

UNDER

TEST

.REFERENCE

NUMBER

'OPE~ATION

UNDER

TEST

,TEST

SWAB

INSTRUCTION

,SWAB

F"AIlED

::~

V~1~3

14-FE8-71

~~:~6

P4GE

l-,\~

0~1~36

7

176662

SW413

TEST

1114246

0~~267

176654

INC

~EF

'INC~EMENT

ij£FERENC£

NUMBER

i21

4252

i~§267

176653

INCI3

TEST+1 I I

NO

TEST

NUMBER

014256

00:t,362

8~E

SWABA

JLOOjl)

TILL

!:lONE

21

426el 1014400

SCOPE

e14262

11'12737

~QJ4000

016420

MOV

#40r21eJ,tiD#ICOUNT

000240

NOP=240

177776

ce=177776

;MACRO

FOR

TESTING

CONDYTION

CODES

.MACR

TSCC

8MI

,+4

HLT

'N IS

NOT

SET

8VS

,+4

HLT

J V

IS

NOT

SET

BCS

,+4

HLT

Je

IS

NOT

SET

SEQ

,+4

Io4LT

J l IS

NOT

SET

SCOPE

.ENOM

.MACR

Tcec

BPL

.+4

HLT

$N

IS

NOT

CLEAREO

Bve .... 4

HLT

J V IS

NOT

CLEARED

Bce

,+4

HLT

f 0 IS

NOT

CLEAREO

BNE

,+4

HLT

Il

IS

NOT

CLEARED

SCOPE

,ENOM

,TEST

MOV

014270

012737

000017

177776

CCT1:

MOV

#17,GD#CC

TSCC

014276

100401

8MI

,+4

014300

104000

HLT

iN

IS

NOT

SET

014302

102401

8VS

.+4

tj14304

104000

HLT

I V IS

NOT

Sri

e14306

103'401

BCS

.+4

014310

10401210

HLT

I C IS

NOT

SET

e14312

00f401

SEQ

.+4

014314

104:000

HLT

: i! IS

NOT

SET

014316

104400

seOPE

e14320

012737

00e000

177776

MOV

#0,~#CC

TeGc

014326

10001211

BPL

,+4

V'14330

1040('121

HLT

IN

IS

NOT

CLEt,Rf:.LJ

014332

102001

Bve

,+4

PAL

Xli

V131213

1~I-FE8-71

131136

PAGE

1

..

41

014334

113412100

IoILT

J V IS

NOT

CLEARED

014336

113"312101

BCC

,+4

01434121

11214"-10121

lolL

T J C IS

NOT

CLEARED

~14342

012111211211

8NE

,+4

e14344

104121130

HLT

J

i!

IS

NOT

CU:ARED

e:14346 1044010

SCOPE

01435121

0013257

cce

O14352

"-162737

0"02117

177776

ADD

#17 da#CC

TSCC

01436121

112121401

BMI

,+4

O14362

1121413121121

HLT

; N IS

NOT

SET

eJ14364

11212401

BVS

,+4

014366

113413eJ0

IoILT

J V IS

NOT

SET

0143721

103401

BCS

,+4

014372

11340eJ0

HLT

J C IS

NOT

SET

014374

121"-11401

BEQ

,+4

014376

121413021

HLT

J!

IS

NOT

SET

e!14400

121441313

SCOPE

0144"-12

0013277

SCC

0144"-14

162737

eJ~"-I1317

177776

SUB

#17,..#CC

Tcce

014412

112102101

BPL

,+4

12114414

1214211210

HLT

IN

IS

NOT

CLEAREO

014416

10213"-11

BVC

,+4

014420

12141210121

HLT

IV

IS

NOT

CLEARED

014422

11213001

BCC

,+4

e14424

11214121021

HLT

IC

IS

NOT

CLEAREO

;;,14426

121211001

BNE

,+4

014430

11214121013

HLT

Ii! IS

NOT

CLEARED

014432

HH4013

SCOPE

014434

12113"-1257

CCC

el14436

162737

1'17761

177776

SUB

'-17,'#CC

TSCC

el14444

100401

8MI

,+4

014446

H~40021

HLT

IN

IS

NOT

SET

014450

11324"-11

8VS

.... 4

014452

104"-1"-10

HLT

IV

IS

NOT

SET

014454

H'3401

BCS

,+4

014456

H'J

4

"-1"-10

HLT

J C

IS

NOT

SET

014460

121014131

SEQ

,+4

el14462

104"-100

HLT

J

i!

IS

NOT

SET

014464

10440el

SCOPE

014466

01313277

SCC

01447eJ

042737

01aeJ000

177776

BIC 'lC!,li#CC

TSCC

014476

10214211

BMI

,+4

e145~r2l

10

41cHH~

HLT

J N IS

NOT

SET

0145212

102401

BVS

.+4

014504

10400e

HLT

J V IS

NOT

SET

0145136 1133401

BCS

.+4

014510

U'4000

HLT

J C IS

NOT

SET

PAl~

V

,,'Wl'

144-F'EB-1f

13'

0'6

PAG€

:t:"4'~

e'1451~

~"lt40l

BEQ

.....

4·

'114514 104"00'0 HLI J 2 IS

NOT

s;£r

~14516

104"4·00

SCOPE

e.14520

12100'277

sec

014522

~4t3737

177757

177776

BIC

ti.'

1 7 7 7 5 7 ,

,.

# C C

Tecc

e14530

100001

BPL

.+4

014532

H~4000

HLT

IN IS

NOT

CLEARED

014534

102001

BVe

,+'"

014536

1134012'0

HLT

J V IS

NOT

CLEARED

014540

103ftHH

BCC

•

+4

014542

10~000

HLT

I C

IS

NOT

CLEARED

014544

0211001

BNE

.... 4

014546

1214000

HLT

I

~

IS

NOT

CLEARED

014550

104400

SCOPE

014552

QJ~"~257

cce

014554 052737

'-HH~017

177776

8IS

#17,tt#CC

TSCC

014562

100401

BMI

.......

014564

1041

0013

HL.T

IN IS

NOT

SET

014566

102401

8VS

.... 4

014570

1214:2100

HLT

J V

IS

NOT

SET

01~572

103401

BCS

.... 4

014574

11340021

HLT

IC IS

NOT

SET

014576

,,01'401

8EQ

.+4

014600

104'000

HLT

J l IS

NOT

SET

014602

104400

SCOPE

014604

"},00'277

sec

014606

052737

12100000

177776

8IS

#0,lt#CC

TSCC

014614

U'J0:401

BMI

,

...

4

014616

1214:0013

HI..T

IN IS

NOT

SET

014620

102401

BVS

.+4

014622

104000

Io4I..

T J V IS

NOT

SET

014624

103'401

BCS

.+4

014626

104000

HLT

J C IS

NOT

SET

014630

0131:401

SEQ

,+4

014632

104'13013

HLT

J l

IS

NOT

SET

014634

104:4021

SCOPE

014636

0210

i277

sce

014640

0215037

177776

CLR

~#CC

lCCe

'-"14644

1~Hl'2101

BPL

,+4

014646

104'rlH~0

HLT

IN

IS

NOT

CLEARED

014650

1212,0~1

BVC

.+4

e1465a

104;000 ,

HLT

J V IS

NOT

CLEARED

014654

103,001

BCC

.+4

e14656

104;000

HLT

J C IS

NOT

CLEARED

~14660

00HH!1

BNE

.+4

~314662

104;~00

HLT

J

i!

IS

NOT

CLEARED

~14664

10440'"

SCOPE:

PALXll

V~~3

14-F'EB-71

13=06

PAGE

1-49

/14666

210'0257

cce

7:467~

2100261

SEC

1':4672

2105337

177776

DEC

~#CC

TCCC

?1 4676

1000e1

BPL

,+4

;':.4

7 z 2

104000

HLT

IN

IS

NOT

CLEARED

:'147e2

1020el

8VC

.+4

l147e4

HH000

HLT

J V IS

NOT

CLEARED

2'14706

1030~1

BCC

,.4

e147H~

104~00

"'LT

; C IS

NOT

CLEARED

214712

2101001

BNE

,+4

214714

104000

HLT

;

i!

IS

NOT

CLEARED

e14716

10440~

SCOPE

l1472Z

2100257

CCC

e14722

000261

SEC,

e14724

005637

177776

SSC

I!b#CC

TCCC

e1473~

100001

BPL

,+4

214732

104000

HLT

IN

IS

NOT

CLEARED

2,14734

102001

BVC

••

4

~14736

104000

HLT

J V

IS

NOT

CLEARED

e14740

103001

BCC

,+4

e14742

104000

IoILT

J C IS

NOT

CLEARED

l14744

001001

BNE

,+4

e1

4

746

104000

HLT

Ii! IS

NOT

CLEARED

214750

104400

SCOPE

r1

4

752

2112737

177357

177776

MOV

#177357,'#STATUS

::'14760 2113767

177776

001656

MOV

Ci.STATUS,TEMP

e1

4

766

2126727

001652

000357

CMP

TEMP,#357

e14774

001401

8EQ

,+4

014776

104000

' '

HLT

e15200

005037

177776

CLR

l!t#STATUS

e15e04

104400

SCOPE

215226

005737 015542

TST

I!b#TRP8

J T BIT

F'LAG

215e12

100003

8PL

,+10

e15e14

2152737

000020

177776

8IS

#20,(iI#STATUS .SET

THE

T BIT

(,15e22

2112767

177777

001614

MOV

#-l,TEMP

015232 000261

SEC

(?15~32

105567

e01607

ADC8

TEMP+1

e15736

'

103401

8CS

.+4

715042

104

000

!-ILT

~'15042

022767 000377

001574

CMP

ti377,TE~P

;.-150:,e

JIZI1401

SEQ

.+4

11505?

104000

HLT

~15e54

H~4400

SCOPE

(15~56

~00402

EAESRT:

SR

.+6

JNOP

IF"

NO

EAE

,'152'6

~

~e0167

000.362

JMP

ENDEAE

;TEST

LEF"T

SHIFT

" 1

;'6

4

ll44~~0

SCOPE

ITEST

OF"

LOGICAL

SHIF"T

-,

.

:'66

~e5071

163172

CLR

, .

(ilMQ

JLOAC

MQ

WITH

0

• J.

,,-

-:.?

~127l1

12~252

163166

MOV

#125252,~AC

;LOAD

AC

WIT~

125252

;'1

• n

....

.J..k',

(.

~12777

177760

163174

MOV

#-16.

,

@LSH

'LOAD

SHIF'T

COUNT

(LSH)

wyT!-I

-16

P'At.f\

V003

14-rEB-71

13:06

PAGE

1""5,2

i0151~b

0~i5777

163154

1ST

~AC

.COMPARE

AC

,\II

I

T~

"

015112

~014k11

BEQ

.+4

;CO

"'0

HLT

IF

BAD

015114

le:4000

WLT

1015116

~2:2'!71

125252 163140

C~P

#125252,~MO

.COMPARE

MQ

wITH

1252~;2

015124

0e14~1

BEQ

• + 4

,GO

TO

~LT

r F

BAD

015126

1

e:4

0 e

12)

~LT

17151.3;;'

122777

e00~20

1.63134

CMP!3

#20,(tilSRE

JCOMPARE

SR

WITH

2

1015L3b

001401

BEQ

•

+4

.5KIP

HLT

IF"

GOOD

015140

le

i

4000

HLT

JHALT

ON

ERROR

CLEFT

SHIF"T)

;TEST

RIGHT

SHIFT

015142

104400

SCOPE

,TEST

OF'

ARITHMETIC

SHIFT

1~15144

12105077

163114

CLR

~MQ

.LOAC

MQ

WIT~

0

1015150

012777

177777 163110

MOV

#-1

diAC

JLOAD

AC

WITIoI

-1

1015156

0f2777

000020

163120

MOV

#16.,'AS~

JLOAD

SHIFT

COUNT

(ASH)

WITH

16.

015164 005777

163076

TST

@AC

J

COMP'ARE

AC

wITH

1000el0

015170

10:0401

8MI

,+4

•

SK

IP

HLT

IF'

GOOD

015172

10'4000

HLT

JI-lALT

ON

ERROR

015174

005777

163064

TST

GH1Q

JCOMPARE

MQ

WITH

21

015200

rlJ01412l1

BEQ

,+4

;SKIP

HLT

IF'

GOOD

015202

H~l40012l

HLT

:HALT

ON

ERROR

015204

12'2777

000110

163060

CMP(3

#110,flSRE

.COMPARE

SR

WITH

1(2)

015212

210'1401

BEQ

• + 4 JSKIP

HLT

IF"

GOOD

015214

10'4000

HLT

.HAlT

ON

ERROR

(RIGIolT

SHIrT)

:TE5T

NORMALl~E

015216

U3A400

SCOPE

;TEST

OF'

NORMALli!E

015220

01'2777

125252 163036

MOV

#125252,t.aMO JlOAO

MQ

WITH

125252

015226

012777

17002'0

163032

MOV

#170000,'AC

)LOAD

AC

WITH

1700(2)0

015234

0e;5077 1630421

CLR

{iNOR

JSTART

NORMALI~E

0152421

022777

HHH~05

1631320

CMP

#101210e15,taAC

.COMPARE

AC

WITH

1000~5

.015246 00:1401

BEQ

,+4

.SKIP

HLT

IF"

GOOD

015250

104000

HLT

•

HALT

ON

ERROR

015252

02:2777

052520

163004

CMP

#52520,rIIMQ

:COMPARE

MQ

WITH

52520

015260 001401

BEQ

,+4

JSKIP HlT

IF'

GOOO

015262

10'4000

HLT

:HALT

ON

ERROR

015264

12~2

777

000003

162776

eMPB

#3,~SC

,COMPARE

SC

WITH

3

015272

00·1401

8E'Q

' • + 4

;SKIP

HLT

IF

GOOD

015274

1(2)40(2)0

I-jLT

•

HALT

ON

ERROR

(NORMALIrE)

;TEST

MUl

T

!'PL

Y

015276

104400

SCOPE

JTEST

OF

MULTIPLY

015300

2112777

125252 162756

MOV

#125252,(JIMQ

ILOAD

MQ

WliH

1252~;:

015306

012777

040000

162760

MOV

#40000,CfMUL

JLOAD

MUL

W Y T

f-:

4

17)0f2J

0

015314

022777

165252

162744

CMP

#165252,@AC

;COMPARE

AC

IoJ

I

"1

H

1652

1015322

12!~1401

BEQ

,+4

JSKIP IF

GOOD

015324

H~4000

HLT

JHALT

ON

ERROR

tZ15~~26

00:5777

162732

TST

@;MQ

;COMPARE

MQ

wITH

HHH'H~

015332

H~0401

8MI

,

...

4

;SKIP

~LT

IF

GOOD

v115334

104000

HLT

JHALT

ON

ERROR

y)15336

122777

NH~300

162726

CMPg

~312!0,~SRE

,COMPARE

SR

HTTI-! 30i?

015344

001401

BEQ

,+4

ISKIP

HLT

IF

(('00

~15346

1e4~~0k."l

HLT

IHALT

ON

ERR0~1

(MULTyPLY)

;TEST DIVIDE

015350

H~'4400

SCOPE

;TEST

OF

DIVIDE

PAL

Xli

VfZe!3

?1535::'

015~60

015366

(115374

1':

15.:

l2

~:,

15

4 Z 2

,-'

154

e'4

~~

15412

015414

r.15416

01542~

e15426

015430

?-15434

e15442

015444

015446

01545'11

015456

015464

015466

0154712'

015476

0155'112

e:15504

215512

015516

e15520

015526

015530

015536

e15542

e15544

015552

015556

215564

215572

e15572

'-'15600

~15604

~156e6

;'1561~

;:'15612

~'1

5 t

14

012777

~e5777

t':?1 4;':1

12'4;:?Z

~22777

~~14;)1

le4e~e

U!44ee

;?J12767

0~H~261

1e5667

022767

ee1

4el

104e!e0

10442)0

012737

000401

000423

012737

H'J5777

100375

012777

105777

1ee!375

032737

001406

04

2737

000137

00e0ee

012737

005037

2142737

~H!5137

100003

052737

00e167

0~000e

0e0~~f'

eee0e'2

e~e2ee

~eel2e

14-F'EB-71

125252

177777

Ztleee2

162666

152525

177777

21131211

177377

0:.0000

r"0360

ek'3750

t'll5610

e"0016

~'Hl360

e15542

0~,e020

177732

162704

1627021

162702

162652

12'01216

001202

000024

00~026

177776

1775721

177776

liH'H?J2I14

177776

PAGE

1-51

MOV

TST

BEQ

HLT

CMP

BEQ

HLT

SCOPE

MOV

SEC

S8CB

CMP

BEQ

HLT

ENDEAE:

SCOPE

MOV

SKPBEL:

BR

SR

MOV

TSTB

BPL

:8ELL

ON

PASS

BELL:

MOV

#125252,.MQ

#-l,"AC

#2diilOIv

(alAC

.+4

tt152525,'MQ

.+4

TEMP+l

#177377,TEt-1P

,+4

.PF

A I L dI-#24

#3421,tI#26

,+4

TRPA

#200,tI#CC

taTCSR

.-4

COMPLETE

#207,tlTDBR

'TCSR

.... 4

TSTB

BPL

,ROUTINE

TO

TRTRAP:

BIT

TRPA:

BEQ

BIC

JMP

o

CHECK

FOR

TRACE

*10000,tI#SR

YESTR

#360,Iit#CC

,#BEGIN

TRPB:

ILOAn

MQ

WITH

125252

ILOAC

AC

WIT~

-1

ILOAC

DIV

WITH

2

AND

DIVIDE

;COMPARE

AC

WITH

0

(QUOTIANT)

:SKIP

HLT

IF'

GOOD

:HALT

ON

ERROR

;COMPARE

MQ

WITH

152525

:SKIP

HLT

IF'

GOOD

;OIVIOE

ERROR

,POWER

FAIL

VECTOR

:PROCESSOR

PRIORITY

,SKIP

OVER

BELL-NOP

ON

CORE

EXPA~SION

JLOCK

OUT

TTY

INTER~UPTS

,WAIT

F'OR

F'LAG;

MAKE

SU~E

NOT

BUSY

TRAP

TO

BE

RUN

WITH

pROGRAM

,SHOULD

WE

RUN

WITH

TRACE

T~AP

JYES

:CLEAR

TRACE

TRAP

.START

Of

TEST

wrTH

TRACE

orF'

;SAVE

OLD

CONTENTS,

SET

UP

FOR

TRACE

TRAP

VESTR:

MOV

#YESRT,@*14

'NEW

TRAP

VECTOR

CLR

~#16

iNEW

CONOITION

COOES

BIC

.360,,#CC

COM

li#TRPB

BPL

,+121

BIS

#20,f#CC

JSET

TRACE

TRAP

JMP

TRPA

JSTART

OF'

TEST

WITH

TRACE

O~

YESTR1:

21

YESTR2:

'"

YESRT:

RTI

HALT

PRFLAG:

0

;ENTEREO

WITH

SYSTEM

TRAP

CALLCHLT)

,STORAGE

FOR

OOT

PC

JSTORAG

FOR

ODT

STATUS

,RETURN

TO

PROGRAM

FRO~

TRAP

JRTI

FAILED

,PRINT

ROUTINE

BUSY

IF'

NOT

~ER~

SPRINT

OUT

THE

ERROR

PC

AND

STATUS

REGISTER

~lXl1

\/003

14-~E8·-71

13:06

PAGE

1-52

.1561,6

~"~5767

177772

PRINT:

TST

PRF'L

...

" J IS

ROUTINE

BUSY

e1562~

21e14el

SEQ

.... 4

015624

210~HH"2

RTI

;YES

EXIT

e15626

005267

177762

INC

PRF"LAG

INO

SET

F'lAG

[15632

2136727

161732

020000

BIT

SR,#20300

.TEST

FOR

IN~li3['T'

PRINf

OUT

015640

0014el

BEQ

• + 4

JBRANCH

TO

PR

I I\lT

015642

~H"?J

4

61

8R

PRINTl

JINHIBIT.

RETUI:{N

TO

"1AIN

STRIEA~

315644

2'12667

l02166

MOV

(6)+,SAVPC IPC

OF'

FAllING

ROUTl~E

01565~

012667 002164

MOV

(6)+,SAVCC .CC

OF'

ERROR

CONOITION

015654

024646

CMP

-(6),-(6)

JREPOSITION

TIo1E

STACK

015656

04

2767

e00140

162112

BIC 1i140,STATUS

015664

HlJ5777

700144

TST8

GliCSR

n~A

I T

FOR

FLAG

·015670

100375

BPl

.-4

015672

2112777

02H~215

000132

MOV

#215,.TD8R

.CR

~1!5700

le5777

eee130 T5T8 ,TCSR

k115704

100375

8Pl

.-4

(0)5706

012777

000212 000116

MOV

#212,

~tTDe~

JlINe:

F'Ee:D

015714

105777

00~114

TST.8

(laTCSR

015720

100375

8PL

,-4

01572~

2110267

200e16

MOV

"2,SAVR2 'SAVE

R2

0r572~

010367

~00074

MOV

"3,SAVR3 'SAVE

R3

0'1573~

01~467

2'00072

MOV

~4,SAIJR4

.SAVE

R4

01573t>

0167e2

l00074

MOV

SAVPC,"2

01574~

1104767

000074

JSR ,,7,PRTAB ,PRINT

OCTAL.

NUMBER

01574(>

012777

000240

00£ll2l56

MOV

#240,.TDBR

015754

105777

0002154 1ST8

dHCSR

SSPACE

Be:TWEEN

WORDS

e157'~

100375

BPL.

,

...

4

015762

0167e2

20e052

MOV

SAVCC,X2

015766

0047Q7 2(30050 JSR "7,PRTAB ,PRINT

OCTAL

NUMBER

015772

0167~2

e0Z026

MOV

SAVR2,X2 'RESTORE REGISTERS

015776

016703

00e024

MOV

SAVR3,"3

e1600~

0167e4

~0e022

MOV

SAVR4,X4

016006

005767

161556

PRINT1:

TST

SR

,TEST

FOR

HALT

SWITC~

016012

100001

BPL

,+4

016014

000000

HALT

'I-fALT

ON

ERROR

SET

016016

005067

177572

CLR

PRF"l.AG

.CLEAR

FLAG

WHEN

OONE

016022

0000e2

RTI

'RETURN

TO

MA

I

~J

STREAM

016024

0e0000

SAVR2:

0

~16026

000000

SAVR3:. 0

016030

000000

SAVR4: 0

016032

177566

T08R:

177566

.DATA

016034

177564

TCSR:

177564

,STATUS

016036

~00000

SAVPC:

IZ'

0162140

000ee0

SAVCC:

III

016756

8UFF"=FIN

;ENO

OF

PI~OGRA"'I-S~'

AREA.

016042

005067

~0e252

PRTA8:

CLR

BINeT

016046

005067

10(?244

CLR

WGTCT

016052

01271.'4

~16324

MOV

#LIST,%4

JGET

lIST

ADDRESS

016056

012767

70~>~7'5

001236

MOV

*5,ASCNT

016064

012 7

67

~'h~??7

00Ql220

MOV

'117,

SE

VE\J

016072

~12767

?

eJ~'

2

01

0vH~214

MOV

#l,DECt-1L

e16HH.,

H~5777

1:773J

WA

I T 1 :

TSTB

~TCSR

V'16HH

10~375

BPL

IoiA

ITl

FALX11

V003

14-rE8-71

13=06

PAGE

1

..

53

2161~6

ae5702

TST

"2

01611~

H~0404

8MI

MINUS

;NEG

SIGN

PRINT

1

l16112

2112777

Z0e26J

177712

MOV

#260,€lT09R 'POS

SIGN

PRINT

0

:-H6122

"e0403

8R

STAR

216122

012777

l0~261

177702

MINUS:

MOV

_261,~TD8R

~161..32

0167;: 3

~.

0 Z 1:' 6

STAR:

MOV

SEVEN,%3

,PUT

MASK

IN

R3

21613

4

e10267

~02150

MOV

%2,TOOOLE

.GET

READY

TO

DOODLE

NUMBER

IN

TOODLE

21614~

0e5167

202144

COM

TOODLE

:COMPENSATES

FOR

COMPLEMENT

DURING

BTC

e16144

04

67e3

~0e14J

BIC

TOODLE,%:5

JAND

IN

OCTAL

C~ARACTER

~~

1615

klJ

2"~

14

H~

BEQ

wRToe

J~ERO,

WRITE

0

IN

LIST

e16152

066767

~0e136

000136

MKNUM:

ADD

OECML,WGTCT

.COUNT

UP

TO

2116160

005267

ee.2134

INC

BINCT

JAND

RECORD

e16164

026703

000126

CMP

WGTCT,%3

iSAME

BINARY

WEIGI-IT

;216170

0~H370

BNE

MKNUM

JKEEP

COUNT~

Wl.6172

062767

000260

0e0120

WRToe:

ADD

*260,BINCT

.ADD

ASCII PREFIX

016200

016724

00e114

MOV

BIN

CT.,

( 4 ) + .WRITE

ASC

I I

CHAR

I~

LIST

016204

066767

0001~2

000102

ADD

SEVEN,DECML

.EXPAND

BINARY

WEIGHT

016212 005067

000H~0

CLR

WGTCT

016216

0e5067

000076

CLR

BINCT

016222

2105367

000074

DEC

ASCNT

e16226

~01410

BEQ

XLIST

J 5

CI-IAR

IN

LIST

e16230

0127Z3

e~eee3

MOV

.3,"3

JSET

X3

fOR

ADD

LOOP

~16234

066767

000e52 0e0050

MOADD:

ADD

SEVEN,SEVEN

'MAKING

SEVENTY

BY

SEVEN

016242

Qle532\3

DEC

"3

016244

1301373

BNE

MOAOD

016246

",00730

BR

STAR

'NX

SEVEN

SE:T

GET

NX

OCTAL

016250

1312767

000005

eeel"'44

XLIsr:

MOV

*5,ASCNT

.SEND

5

CHAR

TO

TTY

016256

105777

177552

WAIT2:

TSTB

~TCSR

2116262

100375

BPL

WAIT2

016264

014477

177542

MOV

-(4),aaTOBR

016270

2105367

e0~026

DEC

ASCNT

016274

00141~1

BEQ

IoIDF'~M

JfINISH

PRINTING

GET

NXT

NUM

016276

2100767

BR

WAIT2

016300

105777

177530

HDFHM:

TSTB

(ITCSR

e16304

100375

BPL

,-4

016306

0002e7

RTS

"7

JI-IEAD

fOR

HOME

Z163H~

000000

TOODLE:

0

016312

rz"HH"~0

SEVEN:

'"

01631 4 0000,?'0

OECML:

0

016316

Ql0001~0

WGTCT:

0

016320

0000'~0

BINCT: 0

..

~

.

016322

0~HH300

ASCNT:

I2J

-,

r16324

"f,H~0'~0

LIS

T:

-

'e;

~16326

e e

~H:~

I~

e / "

0163321 ,,0

~H:"~

0 0

?16332

"e

012!,~e

'"

016334

000ekH~

0 :(

;SCOPE

LOOP

ROV

TINE

ENTE~ED

8Y

USER

TRAP

~16336

(l!226C6

SCOPEB:

CMP

(6)+,"6

!REPOSITION

THE

STACK

2'1634~

0126

c'-:

161432

MOV

(6)

+,

CC

:J:OR

~~HEN

TRACE

IS ACTIVE.

7'16344

0e~H:'

:'

;,el~(,5

4

JMP

~RETuRN

;SCOPE

RETURN

;SCOPE

ORlAND

ITERATJ:J\I

LOOF'

rOR

EACH

TEST

4000

TIMES

:1635.~

eJ27b7

;'

4

L'

L.'

'll

161212

SCOPEC:

BIT

#4l~0~,SR

,TEST

SR

fOR

SCOPE

~'16

355

o e 1.3

c'

7 8NE

SCOPES

,YES

SCOPE

-i(L

Xlii

V003

14-FES-71

13:06

PAGE

1-54

,163610

,,32767

r.:1040,~0

16122'2

SIT

#40"'

....

,SR

.NO

-

TEST

F"OR

ITERATION

01636!6

'H~1~el7

BNE

SCOPEG

.INIo4IBIT ITERATION

101637i0

026767

000026

000022

CMP

SCOPEF, I

COUNT

eJ

16

3

7i6

001433

BEQ

SCOPEG

i

EX

I T -

nONE

01641Oi0

~eJ5267

k'07016

INC

SCOPEF

iINCREMENT

COUNT

2164014

~H:HP:;4

8R

SCOPES

iLOOP

SOME

MORE

~

16

4

0:6

0105067

e00010

SCOPEG:

CLR

SCOPE.F"

;ClEAR

COUNT

016412

011667

e.(2l00e6

MOV

~%6,RETURN

,SAVE

SCOPE

RETURN

POINTER

016416

0~00j{'2

RTJ

;RETURN

INLINE-NEXT

TEST

eo

16 4

2:0

004000

ICOUNT:

4000

016422

000000

SCOPEF:

el

JCOUNT

LOCATION

paR ITERATION

LOOP

016424

00375k1

RETURN:

BEGIN

.ADDRESS

OF"

LAST

TEST

iGROUP

OF

NESTED

SUBROUTINES

016426

2I0el207 SUBR1:

RTS

~7

JaNE INSTRUCTION

016430

0k

'H3277 SUBR2:

SCC

JONE

OEEP

016432

0002107

RTS

"7

016434 004767

177770

SUBR3: JSR X7,SUSR2

JTWO

DEEP

016440

"O0207

RTS

%7

016442 004767

177766

SUBR4: JSR X7,SUBR3

JTHREE

DEEP

016446

00el207

RTS

"7

016

450

~04767

177766

SUBR5: JSR ,,7,SUBR4

;F"OUR

DEEP

016454

el0el207

RTS

%7

016456

004767

177766

SUBR6: JSR

,,7,SUSR5

;F"IVE

DEEP

016462

~002eJ7

RTS

%7

;ENTER

HERE

OR

PQWEIR

F"AIl

016464 010046

PF"AIl:

to1DV

"0,,-(6)

,SAVE

REGISTER

OR

STACK

016466

010146

to1av

"1,,-(6)

JWHEN

POwERING

DOWN

016470 010246

Mav

"2,,-(6)

016472

010346

MOV

"3"-(6)

016474

010446

Mav

%4,,-(6)

016476 010546

MOV

%5,

,-

(6)

016500

2116746

161320

Mav

24,,-(6)

016504 012737

0kll0002

000006

Mav

*RTI,~#6

J

IN

SAVE

OF

NE

EAE

01651l?

(2113746

0011'266

Mav

I1t#AC,-(6)

016516 013746

000264

MaV

@#MI~,-(6'

016522

'1113746

000270

Mav

@#SC,-(6)

e.1652~

010667

000010

Mav

%6,SAVR6

JSTORE

STACK

POSITION

01653l

012767

016544

161264

MOV

#RESTART,24

01654~

000000

HALT

; H ! T

ON

POWER

DOWN

NORMAL

016542 000000

SAVR6:

121

J S

':

ACK

IS

SAVED

~ERE

016544

0167e'6

177772

RESTART:

MOV

SAVR6,%6 :RESTORE REGIS'rER

OFF"

STACK

016550

1Z112637

000270

MOV

(6)'·,~#sc

016554 012637 000264

MOV

(6)·~,tit#MQ

JMQ

MUST

BE

L.O~'OEO

BEF"ORE

AC

e16560

012637

00~266

MDV

(6)··,tit#AC

~16564

C1J05037

000"'06

CLR

~#6

JRESTORE.

TIME

our

~'16570

1Z112667

161?30

MaV

(6)

,10,24

IWI.fEN

POWERING

UP

r16574

2112605

Mav

( 6 ) " ,

%5

~~

16576>

0126Vi4

MOV

(6),',

%4

~166~0

0126r~

MOV

(6),',

%3

C16602

0126':~2

MOV

(6);',

%2

r166~4

21126J1

MOV

(6H·,

%1

~'16

6

VI

6 01261'10

MOV

(6)

....

%0

PAL

Xli

VI(l~3

14-rE8-71

13:216

PAGE

1-55

~16610

l2I~el002

RTI

:RETURN

TO

MAIN

LINE

016612

125252

B:

125252

iFIXEO

VALUES

FOR

USE

I

r..J

TEST

e16614

0166t2

B

lADDRESS

OF

8

~16616

052525 052525

016622

.=B+10

016622

177777

A:

-1

016624 016626

A+4

12116626

.=A+4

016626

125252

016630

~16632

A+10

JAODRESS

OF"

A+l21

016632

052525

2152525

JFOR

STORAGE

016634

1210ell2lel0

C: 0

016636

12116634

C

JADD~ESS

OF"

C

016644

.=C+1~

016644

012l000~

TEMP:

0

016646

2116644

TEMP

.ADDRESS

OF"

TEMP

12116652

.=TEMP+6

016652

016654

TEMP+lk'J

JADDRESS

OF"

TEMP

...

10

OR

"0"

016654

00k'Jel00

D:

~

2116756

.=.+100

016756

21ri.H~000

FIN:

0

~1676el

21k'J0207

USER:

RTS

~7

JBUF"F"ER

F"OR

SP

;OVERLAY

USER

ROUTINE

HERE

IF"

4KW,

USE

BANKl

yr

8KW

;PDP-l1

MEMORY

DETERMINATION

AND

SETUP

iUSE

WITH

VARIABLE

CORE

QUANTITY

SYSTEMS

12116762

.=FIN

+ 4 JAPPLICABLE

TO

SYSTEM

JEST 21

0.16762

012767

021375121

176550

DET1:

MOV

#8EGIN,TRPA+2

016770

012767

121121121401

176466

MOV

.401,SKPBEL

JaR

.'"

4

016776

12132767

0k'Jl~00

16121564

BIT #100el,SR

JCHECK

VARIABLE

CORE

SWITCH

01.7004 2101401

BEQ

DET4

JUSE

VARIABLE

CORE

ROUTINE

0170,06

0121121207

RTS

~7

;4K

ONLY

0170lr~

016746

16077121

OET4:

MOV

4,

-

(6)

;SAVE

TRAP

VECTOR

017014

016746

16121766

MOV

6,

-

(6)

JSAVE

TRAP

STATUS

10171212113

012767 017102

160756

MOV

#OET2,4 :TRAP

VECTOR

SETUP

01,7026

012767 000340

16~752

MOV

#340,6

.TRAP

STATUS

SETUP

e!17034

013737

C?37770

~3771el

E I GI·n:

MOV

••

37770,.#37770

JCHECK

F'OR

8K

017042

013737

057770

~57771O

HoJELVE:

MOV

,#577710,.#057170

JCHECK

F"OR

12K

017050 013737 077770

e.77770

SXTEEN:

MOV

~#0777T0,'#07777~

JCHECK

FOR

16K

v)17056

013737

117776

117"770

TWENTY:

MOV

~#11777e.,'#117770

.CHECK

F'OR

20K

1017064

12113737

13777eJ

137770

TWOF"OR:

MOV

~#137770"#137770

,CHECK

FOR

24K

'11

7072

0137,37

157770

15 7

77121

TWOEIG:

MOV

~#157770,~#15777eJ

JCHECK

FOR

28K

1:.:171100

000442

8R

STRT28

r17102

(2112

61~2

OET2:

MOV

(6)+,%2

JRETRIEVE

TRAP

PC

[17104

~05

7;26

TST

(6)

+

IDISCARD

TRAP

STATUS

WORD

~~171f216

02

2

71~

2

e1774J

CMP

#EIGHT+4,%2

~'1711(>

ill

i£h

4;~

Ql

8EQ

DET3

J4K

('

1

7114

022?02

" 1 J

i'

4 6

CMP

#TWELVE+4,%2

to'

1712

k-;

12101463

8EQ

STRT8

J8K

~LX11

V"'03

14-FE8-71

13:06

PAGE

1-56

..,17122

022702

e17054

CMP

#SX"'

t.t.t'II+4,

Xt?

017126 001453

8EQ

STRT12

1121(

017130

",22702

O17762

CMP

#TWENTY+4,

%t?

017134

",O1443

8EQ

STRT16 1161(

017136

022702

017070

CMP

#TWOFOR+4,%2

v)17142

~01433

8EQ

STRT20 J201(

et17144

022702

017076

CMP

#TWOEIG+4,%2

017150

00142.3

BEQ

STRT24

;241<

017152

0"'0415

SR

STRT28 J28K

017154

012667

160626

!JET3:

MOV

(6)

+,6

;RESTORE

TRAP

VECTOR

017160

012661

160620

MOV

(6).~,

4 ;RESTORE

TRAP

STATUS

e17164

000207

RTS

%7

JCOMMENCE:

PROGRAM

017166

005000

"lOVE:

CLR

%0

ISET

UP

MAIN

CORE

CURRENT

017170

01(1)102

MOV

%1,"2

017172 062702 016760

ADD

#FIN+2,X2

.SET

UP

~AX

CORE

MOVE

017176

012021

MOV

on

••

,

(1)+

JMOVE

WORD

017200

020201

CMP

%2,"1

JMOVE

COMPLETE?

017202

001375

8NE

...

4

;MOVE

ANOTHER

WORI()

1211721214

12100207

RTS

%7

JMOVE

COMPLETE

12117206

004767

00121070

STRT28: JSR

,,7,

)(FER28 JSTARr

281<

TRANSF[R

017212

,,04767

12100146

JSR %7,

~10D24

JSTART

24K

MODIFY

12117216

,,012l756

8R

DET~5

017220

004767

"'00066

ST~T24:

JSR %7,XFER24

JSTART

241<

TRANSFIER

017224 004767

I2l

0

fi315

0 JSR

%7,~10D212!

.START

2"'1<

MODIF"Y

017230

000751

8R

DET3

017232

21214767

0210064

STRT221:

JSR

"7,XFER2~

.START

201<

TRANSF"IER

017236

21214767

21210152

JSR

"7,~10D16

JSTART

161<

MOOIF"Y

~17242

~210744

8R

DE

T

~~

017244

"'214767

00~062

STRT16: JSR

"7,

)'FER16 ;START

16K

TRANSF"IER

017250

004767

000154

JSR

"7,

~WD12

.START 12K

MODIFY

017254 000737

BR

DET~I

017256

2104767

0f2!12!060

STRT12: JSR

,,7,XFER12

JSTA~T

12K

TRANSFER

017262

2104767

000156

JSR

%7'~'OD8

JSTART

81(

MODIF"Y

017266

2100732

8R

OEnl

017270

21e4767

000056

STRT8: JSR %7, )(FER8

JSTART

8K

TRANSF"EI~

017274

G!H2l4767

00016'"

JSR

"7,~10D4

;START

4K

MODIFY

017300

",00725

BR

DEn)

017302

012701

140000

' XFER28:

MOV

#140000,"1

JSET

UP

MOVE

START

LOCATION

017306.

",O4767

177654

JSR

"7,~10VE

JGO

TO

MOVE

SUBROUTINE

"'17312

012701

120000

XFER24:

MOV

#1200210,%1

017316

k!l04707

177644

JSR

"7,

~'OVE

~17322

2112701

112!0000

x~ER20:

MOV

#HH'000,

%1

~17326

004767

177634

JSR %7,

~10VE

017332

012701

~60000

XFER16:

MOV

#60~'00,

%1

017336

004767

177624

JSR

%7,~IOVE

~17342

012721

040000

XFER12:

MOV

#40~'00,

%1

017346 004767

177614

JSR

%7,MOVE

017352

01271'1

0200('10 XFER8:

MOV

#221000,%1

017356

",04767

1776C114

JSR

%7,~10VE

~H

7

362

000207

RTS

%7

:RETURN

I="ROM

TRANSFERS

v.17364

~12767

143756 116146

-.1002

4:

MOV

#BEGIN+140006,TRPA+120002

('

1

7372

~12767

o 0

~12

4 0

116~64

MOV

#NOP.SKPBEL+120000

V174~0

2112767

123756

r;-76132

~OD2.:':

MOV

#BEGIN+120006,TRPA+le0002

v:

1 7 4

~

6

~12767

0~W240

~76e50

MOV

#~ap,SKPBEL·1000~0

PAL

Xli

V003

14-rE8-71

13:""6

PAGE

1-5'

017414

012767

1213756 2156116

MOD16:

MOV

#8rGIN+1~0006,TRPA+60~02

V17422

012767

~0e240

~56~34

MOV

#NOP,SKP9EL+621000

V,17430

012767

?63756

036102

MOD12:

MOV

#8EGIN+6~0~6,TRPA+40002

~~17436

012767

e0~';?43

eJ36e.20

MOV

#NOP,SKPSEL+40000

?17444

012767

l43756

~16e66

MOD8:

MOV

~8EGIN+4021e.6,TRPA+20~02

j'17452

012767

N:P~40

2!162!eJ4

MOV

#NOP,SKPBEL+20000

Z1746~

012767

1"23756

17612152

MQD4:

MOV

#BEGIN+221006,TRPA+2

v)17466

012767

00e240

175770

MOV

#NOP,SKPBEL

017474

0002e7

RTS

%7

JRETURN

rROM

MODIfY

000001

.END

~LX11

V0e!3

14-FEB-71

13106

!'AGE

1

..

5e

A e!16622

~SRINl

210137121

REG1

01211224

STRT8

~1727e!

AC

I 2100266

~SRI\J2

001376

RENOl

002434

SUBR1

2116426

A

OSU

Bi

2113440

~SRI"JR

001404

REN02

002404

SUBR2

2'16430

AR

IE

Nio

~13502

ICOU\!T

016420

RESTAR

2116544 SU8R3 2116434

ARITS:T

2113414

IE

2112112110121

RETURN

016424

SUBR4

Q'16442

ASCNT

2116322

!NTCNT

21211556

RF1

e!eJ2e!6~

SUBR5

QI16450

ASH

r2!003~4

IRF

01212104

RFCAR

000256

SU8R6 2116456

8 2116612 LIST

016324

RFCSR

~e!eJ26e!

SWABA

12114224

BEGIN

003750

LKl

01211562

RFCSRH

000262

SXTEEN

211705121

BELL

12115504

LK2

00161212

RFOAE

012121246

TC

1.77340

sINeT

12116320

LK3

2101604

RFDAR

0121121252

TCl

0121121322

SR

itH'le!002

LK4

0211622

RFOBR

00212521

fC2 0100342

BUFF

0167?6

LKCSR

00121240

RFSTAR

212122154

rCBA

021121316

C 2116634 LLIMIT

01212172

RFWC

00121254

TCBlK

121022212

cc

177776

LP1

21121171212

ROT

ALL

2113016

TCCM

01212131216

CCT1

12114270

LP2

12101710

ROTBE

013166

TCDT

12112121312

CLI~CT

0022152 LP3 2101770

ROTBD

013276

TCEXPE

0121221214

CMPl

012740

LP4

1212120021

ROTEN1

01340121

TCF1

21022621

CMP2

2112762 LP5

00212136

SAVCC

016!2!40

TCF1A

m02252

COMPAR

012734

LP6

211211736

SAVPC

016036

TCF2

0212312

CURPAT

002046

LPCSR

21021242

SAVR2

016~24

iCF3

211212326

0

016654

LPDBR

000244

SAVR3

2116026

TCF4

0212374

l)ATAl

2HH32e!

LPINTR

211211726

SAVR4

016030

TCFIRS

21212176

DATA2

001366

LSH

210121302

SAV!R6

016542

TCIv

0121121320

OATA3

001452

MAINLI

12'01206

SC

0210270 rCLAST

002200

QATA4

12101554

MINUS

12116122

SCOPE

104412'0

TCOM

1313514

OECML

016314

MKNUM

016152

SCOPEB

016336

TCOM2

013562

DELAY

12Hi)15

6 0

MOADO

016234

SCOI=>EC

016350

TCOM3

2113630

OETl 2116762

MOO12

017430

SCOPEF

016422

TCRl

002532

DET2

017102

M0016

017414

SCOPEG

2116406

TCR1A

211t'l2566

OET3

12117154

MOD2eJ

017400

SEVEN

11'16312 rCR2

"02574

oET4

017010

M0024

017364

SKPBEL

015464

'fCR3

002610

DIV

000276

MOD4

017460

SOLPAT

"02050

TCR4

"'02656

DO

0021001 M008

017444

SR

177570

TCR81

002722

EAESRT

,,15056

Movr

12117166

SRE

"00272

TCRBi<

0"2664

EIGHT

017034

MQ

0021264

STl

0210"636

TCR8UF

002750

ENDEAE

11'15446

MUL

00121274

ST2 0210654

TCSR

016034

F

00210210

N 0002101 ST3

00217210

TeST

000310

FEND1

0flJ2230

NOEAE

000366

SJ4

"210732 reW81

002504

!="ENOZ!

~02206

NOP

2100240 5T5

12100754

iCWeK

002452

FIN

016756

NOR

21003210

5T6

001020

TCWBUF

02'2750

FUNCTI

002170

NUMA

013500

ST7

01211052

TCWC

000314

HOFHM

016300

PFAIL

~H6464

ST8

001142

TD8R

016032

~LT

104000

PRFLAG

015614

ST

Af~

2116130

TDSR

0162134

HPCSR

0021234 PRINT

015616

STAf~T

e!21040e!

TEMP

'H6644

HPDBR

000236

PRINTl

016006

STAI~T2

0e10440

TEST

e!13130

HPOUT

001454

PRTAB

01612142

STATUS

177776

TIME

e!I2l1700

f-iPOUTl

0211462 R

~040eJ0

STRT12

017256

TJSRl

C?J12340

HPOUT2

001536

Rtl

eJeJ21~02

STRT16

017244

TJSR2

012342

r-iPOUTR

0211472

RO

00001214

STRT20

017232

'TJSR3

012354

i--1RCSR

000230

REF

013126

STRT24

~17;?2e!

TOODLE

016310

rlRD8R

12l0r?l232

REFF

013126

STRT28

017206

TRCSR

0002221

PALX11

V003

14-r[8-71

13106

PAGE

1-59

TRDR

000222

TRPA

01-5536

TRPB

015542

TRTRAP

015520

TSCOM8

e13672

TSROT

2112774

TSROT2

01314~

TSRT2A

013132

TSTARI

211341712

TTCSR

000224

TTDSR

0021226

TTYIN1 2101226

TTVIN2 0"'1234

TTVIN3 2101302

TTYIN4

12101306

TTYINR

12101242

TWELVE

12117042

TWENTY

2117056

TWOEIG

12117072

TWOFOR

017064

TYOUT

001322

TVOUT1

l2!eJ1330

TVOUTR

21"'1340

USER

01676'"

WAIT1

01610121

WAIT2

(lJ16256

WAIT3

211411'"

WAIT4

014140

wD

210012114

WGTCT

2116316

wORDeT

1211212174

wRTOC

016172

xFENDi!

002402

xFER12 2117342

xFER16

017332

xFER20

017322

xFER24

017312

xFER28

017302

xFER8

017352

XLIST

016250

vESRT

1211561'"

V[STR

015544

vESTR1

0156i'4

VESTR2

0156116

[RRORS

OETECTECI

0

FlU~-TIME:

22

SECO~I)S

~)

K C 0

.~

E

USE

D

MAINDEC 11 D0QD_T17_SYSTEM_EXERCISER_Feb71 D0QD T17 SYSTEM EXERCISER Feb71

MAINDEC-11-D0QD_T17_SYSTEM_EXERCISER_Feb71 MAINDEC-11-D0QD_T17_SYSTEM_EXERCISER_Feb71

Navigation menu

Versions of this User Manual:

Views

Navigation