Digital PDFs

MAINDEC-08-DJADA-C-D

December 2000

68 pages

Original

4.8MB

Document:	maindec-08-djada-c-d
Order Number:	MAINDEC-08-DJADA-C-D
Revision:
Pages:	68
Original Filename:	https://svn.so-much-stuff.com/svn/trunk/pdp8/src/dec/maindec-08-djada/maindec-08-djada-c-d.pdf

OCR Text

IDENTIFICATION

PRODUCT

CODE!

MAINDEC-OB-DJADA-C-D

PRODUCT

NAME:

ADBA

A-D

MAY

1976

DATE

RELEASED:

CONVERTER

MAINTAINERx

DIAGNOSTIC

AUTHOR:

V.A. BREUER
D. ORIN

AND

MULTIPLEXER

DIAGNOSTIC

GROUP

THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
EQUIPMENT CORPORATION,
DIGITAL EQUIPMENT CORPORATION ASSUMES

RESPONSIBLITY FOR

ANY

ERRORS

THAT

MAY

APPEAR

THIS

MANUAL.

THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO THE
PURCHASER UNDER A LICENSE FOR USE ON A SINGLE COMPUTER SYSTEM
AND CAN BE COPIED (WITH INCLUSION 0F DIGITAL'S COPYRIGHT NOTICE)

ONLY FOR USE IN SUCH SYSTEM:
IN WRITING BY DIGITAL.

EXCEPT

MAY

OTHERWISE

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

DIGITAL

(C)

197$:

EQUIPMENT

1976

CORPORATION

PROVIDED

FOR

NOT

THE

TABLE

CONTENTS

ABSTRACT
REQUIREMENTS
EQUIPMENT
STORAGE

omflquqqqqqoomwmcccccummwr.-"IC'CIO-Q‘...3..‘.*...Cfl....O.SPMGOQO‘WDHNMSNPQUNr‘SvOCDNO‘UTbUNo-DSHGWNMQG

PRELIMINARY PROGRAMS
LOADING PROCEDURE
CONTROL SWITCHES
USAGE PROCEDURE
CONTROL LOGIC TESTS
IOT SCOPE LOOP
DISPLAY CONVERTED VALUE IN AC
EXTERNAL ENABLE WITH REAL TIME CLOCK
MONOTINICITY TEST
RESOLUTION ACCURACY TEST
SUCCESSIVE A-D BUFFER READS TEST
MULTIPLEXER NOISE TEST
LABS-A SYSTEM TEST
PROGRAM

DESCRIPTION
TESTS
TESTS

CONTROL LOGIC
MISCELLANEOUS

ANALOG TESTS
ERROR REPORTS
LOGIC ERRORS

OTHER ERRORS
CONSOLE PACKAGE ADDENDUM
DESCRIPTION
RESTRICTIONS
INITIALIZATION
CONTROL CHARACTERS
WAITING MESSAGE
SWITCH
END OF

”a

MESSAGE

ERRORS
SWITCH REGISTER SETTINGS
PARAMETER CONTROL WORDS
LOCATION CHANGES
MODIFICATIONS

LISTING

READ

1,0

THIS

DOCUMENT

PRIOR

RUNNING

PROGRAM:

ABSTRACT
CONTROL
ON
INPUT/OUTPUT
THE
THIS PROGRAM PERFORMS BASIC TESTS
THE ANALOG TESTS ARE DESIGNED TO PROVIDE
AND MULTIPLEXER,
LOGIC
CONVERSION
CHECKING
AND
CONVERTER
THE
A MEANS OF CALIBRATING
THE_IOT FOR THE A/D; THE CLOCK. AND THE SCOPE MAY BE
PARAMETERS.
FIRST,
CLKNOW,
CHANGED BY LOADING THE NEW VALUES INTO LOCATIONS
AND

SCPNOW

RESPECTIVELY

PAGE

ZERO.

MODIFIED FOR THE CONSOLE PACKAGE; JAN. 1976: SEE SECTION
SEE SECTION 9,
THE DIAGNOSTIC ITSELF WAS ALSO MODIFIED,

REQUIREMENTS

EQUIPMENT
PROGRAMMER’S
FRONT
WITH
PDP-B/E WITH GK CORE:
A-D
ADBA
ADJUSTABLE HIGH
TELETPYE'
CONVERTER:
SOURCE, EDC MODEL MVIOSG OR EQUIVALENT.

TO RUN WITH

THE

TO
OF

NOTE!

CONSOLE

RUN

PACKAGE;

CONSOLE:
QUALITY

ASR33
VOLTAGE

REQUIRED.

MONOTINICITY TEST: A FUNCTION GENERATOR CAPABLE
CPS: TRIANGULAR WAVE OUTPUT MUST BE USED.

STORAGE
THE DIAGNOSTIC RESIDES IN LOCATIONS GOOD-750%;
OF FIELD 0. IF CONSOLE PACKAGE IS ACTIVE, LOCATIONS
5606 THROUGH 7502 OF FIELD I ARE USED AS BUFFER
STORAGE AREA FOR THE RESOLUTION ACCURACY TEST.

PRELIMINARY

PROGRAMS

ALL

CPU

BASIC

AND

TELETYPE

MAINDECS

MUST

HAVE

BEEN

RUN

SUCCESSFULLYQ
IF EXTERNAL ENABLE UTILIZING THE DKB-E REAL TIME CLOCK
BE
FOR
THE DKB-E MUST BE
IS
TO
THE
RUN:
MAINDEC
IN
VCB-E
SUCCESSFULLY RUN FIRST.
CONTROL
ADDITION;
MUST BE RUN PRIOR TO SPECIAL LAB-A SYSTEM CHECK
TESTS

NOTE:

ROUTINE.

3.6

LOADING
THE

PROCEDURE

BINARY

LOADER

USED

LOAD

THE

PROGRAM.

3.1

CONTROL
SWO

SW1
SW2

SWITCHES
—

SW3

SW4

sws

SUPPRESS ERROR MESSAGES AND "END LOGIC TEST" MESSAGE.
HALT ON ERROR WITH PC DISPLAYED IN AC.
CONVERTED
WORD
HALTS WITH
EXTERNAL ENABLE TEST:
THE AC.
SCOPE LOOP OVERRIDE TO EXIT FROM LOOP ON
OTHER TESTS:
ERROR AND PERMIT CONTINUANCE OF TEST.
SET IF ALL 1'5 JUMPER IS INSTALLED.
LOGIC TEST:
ENABLES HALT DURING CALIBRATION
OTHER TESTS:
ROUTINE
WITH CONVERTED RORO DISPLAYED IN AC.
SW4 MUST BE SET TO RUN TEST.
EXTERNAL ENABLE TEST:
FOR PROCESSORS WITH
OF
TIME
CYCLE
LOGIC TEST:
PROCESSORS WITH CYCLE TIME OF 1.2 AND 1.4
FOR
SW4=Op
swa=1
OF
ONE
OPERATOR TO EXPLICITLY SELECT ANY

ALLONS

LOGIC

ROUTINES.

ENABLES

UNIPOLAR

NOTE:

IOT FDR
VALUES

A/Da

SW6

4.0

USAGE
.**sEE

THESE

CONTROL

SPECIFICATIONS FOR
THAT

TELETYPE

MAXIMUM

LOCATED

AND

CLKNOW.
ON

PAGE

TO
SCPNOW

ZERO.

TESTS

LOGIC

NINE

BITS

IOT

SXXX

PRESS CLEAR THEN CONTINUE.
SW“ MUST BE SET
OF
TIME
CYCLE
WITH CYCLE TIME

’IF

sws

PRESS

AFTER EACH
-PRINTED.

SCOPE

VOLTAGE INPUTS!1***

0N9LINE,***

PLACE

IOT

ARE

INITIALIZED

ARE

FIRST:

INTO

PROCEDURE

*** INSURE

4.1

SCOPE

AND

CLOCK,

LOADED

RESPECTIVELY.

CALIBRATION.

DURING

SET

SWS-ll.

(1) IF RUNNING TESTS ON
AND 1.2.
FOR THE
1.4
OF 1.5. swa = O.

(1).

SELECT

FROM

TEST

PROCESSOR
AND PROCESSORS

sw7-11.

CONTINUE.
PASS

"END

LOGIC

TEST”

LOOP

LOAD

221,

PLACE

NINE

BITS

IOT

bXXX

SWS-II.

WILL

0.3

DISPLAY

PRESS

CLEAR

NOTE!

NEW

CONVERTED

THEN

MAY

VALUE

AC.

APPLY VOLTAGE TO
CHANNEL INPUTS.

LOAD

202.

HALT

SELECT

MPX

MULTIPLEXER

SELECT

DESIRED.

SW3.

IF
0
CHANNEL FROM SRO-11p SELECT CHANNEL
SW6 FOR UNIPOLAR
IS
SELECT
AVAILABLE:

THE

PRESS CLEAR; THEN CONTINUE:
OBSERVED IN THE AC.
WHEN

RUNNING.

WHILE

CHANNEL

INPUT

A-D

CONVERSION

AFTER

MULTIPLEXER
DESIRED.

SELECTED

IOT

CONTINUE.

MAY

SELECT
OPERATOR
IS
ENGAGED:
THEN PRESS CONTINUE TO
IF
DESIRED.
DESELECTED AT THIS TIME.
HALT

8N3

MAY

4.4

EXTERNAL ENABLE WITH REAL TIME CLOCK

(DKSEP OR DKSES);
STARTED BY CLOCK.

THAT

CONVERSION

APPLY

VOLTAGE

IOT

LOAD

SELECT

PRESS

SELECT

CHANNEL

PRESS

CONTINUE.

AFTER

EACH

IF ERROR OCCURS, THE PROGRAM
THE
ERROR
TEMPA
LOCATION.
TEMPB = IOT OF CURRENT A-D.

FOR

A/D.

CAN
A-D

CLOCK,

INPUT
AND

CHANGE

LOOP.

CHANNELS

WILL

VALUE

CONVERTED

NO
IF

SW3

TESTS

CHANNEL.

SCOPE

MAY

CHANGED.

DESIRED.

283.
SWITCHES

CLEAR.

THEN

PASS

CHANNEL

NOTE;

DESIRED.

CONTINUE.

WITH

THE

MAY

HALT

wILL

NILL

RING.

OCCUR.

sw-a-11.

TTY

BELL

CHANGED

TYPES OUT MESSAGE,
=
IOT OF CURRENT

NHILE

RUNNING

THE PC AT
CLOCK AND

TEST.
PAGE

a.5

MONOTINICITY

TEST

AND

NOTE1:

THIS TEST IS FOR IN-HOUSE
FOR USE BY THE CUSTOMER.

NOTEZ:

OF FUNCTION GENERATOR
MUST
BE
SLOWER
RATE
OF
SEE ENGINEERING
CONVERTER.
A
HZ
IS
GOOD
SPECIFICATIONS. (.1
SETTING).FOR
RAMP
THAN

SPEED

SLEW

USE

ONLY

NOT

INTENDED

BIPOLAR THE AMPLITUDE VARIES FROM -2.SV TO
FOR UNIPOLAR IT VARIES FROM OV.
TO +5V-

CONNECT

LOAD

SELECT SW6 AND/OR
FROM SW8911.

3N6

PRESS

CONTINUE.

FUNCTION

GENERATOR

CHNL

THEN

CLEAR,

ERROR

DESIRED:

OCCURSO PROGRAM WILL
TEMPA
LOCATION:

IF NO ERROR OCCURS:
WILL RECYCLE.

RESOLUTION ACCURACY
APPLY

LOAO

205,

SELECT

SHS

SELECT

CHANNEL

PRESS
IF

KNOHN

NOTE:

4.7

NITH

THEN

CLEAR,

AND

TYPE
=

OUT

THE

HILL

NTH

RING

A-O

CONVERTER

ADBA

INPUT.

MULTIPLEX

CHANNEL

MESSAGE: THE PC AT
WORD: AND TEMPB =

ONCE

AND

PROGRAM

INPUT.

DESIRED.

sue-11.

UNIPOLAR

BIPOLAR

NITH

SW6.

MESSAGE,

THE
PC AT

THE

CONTINUE,

OCCURS. PROGRAM HILL TVPEOUT

ERROR

HOROS

LOCATION ON TTY

ERROR

BELL

TTY

VOLTAGE

NON-COMPARING

TEST

204,

ERROR
THE
N+1$T WORD.

4.6

+2.5V.:

ANO TEMPE, AND THE
TEHPA
THEN CONTINUE NITH TEST.

THO

IF NO ERROR OCCURS, TTY BELL WILL RING ONCE. THEN PROGRAM
ONE CYCLE BEING SO0,000(1OJ CONVERSIONS.
WILL RECYCLE.

THIS TEST USES A 1000(10) LOCATION BUFFER AREA TO
STORE EACH GROUP OF 100% CONVERSIONS. IF THIS TEST
IS RUN WITH CONSOLE PACKAGE NOT ACTIVE: THE BUFFER
AREA WILL OVERLAY THE CONSOLE PACKAGE IN FIELD Or
STARTING AT LOC SbOO. IF THIS TEST IS RUN WITH CONSOLE
PACKAGE ACTIVE: THE BUFFER AREA WILL START AT LOC 5660
IN FIELD 1.

SUCCESSIVE

A-D

APPLY

LOAD

SELECT

“9

SELECT

BUFFER

VOLTAGE

KNOHN

PRESS

TEST
TO

A-D

CHANNEL.

266.
SWO

DESIRED.

CHANNEL
WITH

BIPOLAR(O)
5.

READS

CLEAR:

FROM

SHE-11;

SW6.

THEN

CONTINUE.

SELECT

UNIPOLAR(1)

PROGRAM
TEMPA

IF ERROR OCCURS:
ERROR
LOCATION:

AT THE
SECOND

WILL TYPE MESSAGE: THE PC
=
FIRST READ AND TEMPB =

READ,

4.8

PRESS

CONTINUE.

IF NO ERROR OCCURS:
WILL RECYCLE.

MULTIPLEXER

RESTART,

NOISE

TTY

WILL

RING

ONCE,

PROGRAM

THEN

TEST

LOAD 207.

SELECT CHANNEL
CHANNEL: SELECT
IF

SRO-11

UNIPOLAR

SELECT

SWO

PRESS

CLEAR:

IF ERROR OCCURS: PROGRAM
ERROR
TEMPA
LOCATION:
TEMPB B ACTUAL CONVERTEO

BELL

AND
VOLTAGE
APPLY
BIPOLAR WITH 8N6.

THAT

DESIRED.
THEN

CONTINUE.

IF NO ERROR OCCURS; TTY'
PROGRAM WILL RECYCLE.

WILL TYPE MESSAGE: THE
EXPECTED
CONVERTED

VALUE

THE
AND

AND

THE

VALUE,
BELL

WILL

RING

ONCE

4.9

LABSwA

SYSTEM TEST

THE SYSTEM MUST
WITH A DISPLAY.

APPLY

IDT
LOAD

FOR

CONTAIN

VOLTAGE

A/D,

DKB-EP

OPTION

INPUT

TO THE

A/D

CLOCK,

AND

SCOPE

MAY

AND

VCS-E

OPTION

MULTIPLEXER.

DESIRED.

REFERENCE

LABS-A

CHANGED.

21S,

DEPRESS

CLEAR,

PROGRAM

NILL HALT.

SELECT

CLOCK

CONTINUE,

FREQUENCY

VIA

SNS-S:

PROGRAMMING CARD FOR DKS-EP CLOCK RATE.
(IMHZ=6: 1DDKHZ=5:....IOOHZ=2),

PRESS CONTINUE THEN OBSERVE PRINTOUT:
”SET SWSIAUTO-INC) AND THE NUMBER OF CHNLS
SET sue-11 (SINGLE CHNL)”.

SNa-II

IF ALL CHANNELS ARE TO BE DISPLAYED AT THE SAME TIME: SET
3N5: THEN SET THE NUMBER OF CHANNELS CONTAINED WITHIN THE
SYSTEM INTO 8N8911o
ONE
IF
SYSTEM
CONTAINS
SET
THE
SWITCH
I.E.r
ADBA,
REGISTER TO OITO. IF ONLY CHNL FOUR IS T? a: OBSERVED SET
THE SWITCH REGISTER TO 0004.

CHOOSE

1D.

UNIPOLARII)

BIPOLAR(O)

WITH

SW6-

AND
THE
DISPLAY
A
OBSERVE
CONTINUE
SCOPE.
LINE
SHOULD BE PRESENT FOR CHANNEL SELECTED.
HORIZONTAL
UP
BY VAPYING THE INPUT VOLTAGE THE LINE SHOULD MOVE
OR
A SWEEP OF THE
DOWN.
OV=MID—SCREEN, +V=TOP. -V= BOTTOM,
A
THUS IT IS
SCOPE IS GENERATED ON EACH CLOCK OVERFLOW.
FUNCTION OF THE CLOCK RATE SET IN (6).

DEPRESS

PROGRAM

5.0

DESCRIPTION

CONTROL

LOGIC

CONSISTS

TESTS

SEPARATE

ASSURE

THE

LOGIC

CONTROL

FUNCTIONING PROPERLY.

MISCELLANEOUS TESTS
A.

SCOPE

IOT

LOOP

TEST

ENABLES

IDT

REPEATED

FDR

TROUBLESHOOTING:

5.3

TO
REAL
TIME
DKS/A
CLOCK
EXTERNAL ENABLE TEST - UTILIZES
NOTE:
THIS TEST CAN BE USED ONLY IF DKB/A
START CONVERSION,
IS PRESENT IN SYSTEM.

DISPLAY CfiNVERTED VALUE 1N AC - USED TO CALIBRATE
(SEE serup PROCEDURE or ADSA).

CONVERTER.

LABS-A

SYSTEM
CHECKS
HDMOGENOUS UNIT!

SYSTEM

ANALOG

ASSURES

RELIABILITY

TESTS

SUCCESSIVE READS

TESTS

CHECKS

NOISE

FDR

A-D

BUFFER

LOGICB.

MONOTINICITY

TEST

CHECKS

THAT

ALL

SPECIFIED

VALUES

CAN

CONVERTED.
C.

SAMPLES A KNONN VOLTAGE
RESOLUTION ACCURACY TEST
AND CHECKS THAT RESOLUTION IS WITHIN SPECIFICATION.
-

MULITPLEXER NOISE TEST
REGISTER.

CHECKS

FOR

NOISE

MPX,

1660

ENABLE.

TIMES

AND

STATUS

ERROR

6-1

REPORTS

LOGIC ERRORS
MESSAGE WILL BE TYPED
NATURE OF FAILURE.
OTHER

ONCE

PER

ERROR

TELETYPE

STATING

ERRORS

MESSAGE WILL

FAILURE:
WORDS

OUT

THE
DEFINED

BE TYPED OUT ON TELETYPENRITER
PC AT THE ERROR LOCATION: AND
UNIOUELY FOR EACH TEST).

STATING NATURE OF
TEMPA AND TEMPB.(TWD

7.0

CONSOLE PACKAGE

7.1

DESCRIPTION

ADDENDUM

THE CONSOLE PACKAGE HAS BEEN ADDED TO THIS DIAGNOSTIC TO ALLOW
THE PROGRAM TO RUN WITH NO HARDWARE SWITCH REGISTER AND TO
HAVE COMMUNICATIONS WITH THE DIAGNOSTIC VIA A TERMINAL. THE
DIAGNOSTIC CAN BE RUN IN TWO MODES WITH THE CONSOLE
PACKAGE I
RUNNING WITH THE CONSOLE PACKAGE ACTIVE
I)
THIS ALLOWS THE OPERATOR CONTROL OF THE DIAGNOSTIC THROUGH
THE TERMINAL. THE DIAGNOSTIC WILL ASK FOR THE VALUE OF THE PSEUDO
SWITCH REGISTERpBEFORE CONTINUING WITH EXECUTION OF THE
DIAGNOSTIC. ALL ERRORS AND PASS COMPLETES WILL BE PRINTED AT
THE TERMINAL. NO HALTS WILL BE EXECUTED,
2) CONSOLE PACKAGE NOT ACTIVE-THIS WILL RESULT IN THE
NORMAL STANDALONE OPERATION OF THE PROGRAM AS DISCRIBED IN
SECTIONS 1 THROUGH 9 OF THIS DOCUMENT.
-

7.2

RESTRICTIONS

WHEN

EXECUTED.

RUNNING

THE

CONSOLE

PACKAGE

RUNNING THE CONSOLE PACKAGE REQUIRES
2)
PSEUDO SWITCH REGISTER BE USED.

3)
NOW
AND

7.3

SUBTESTS

SOME

THAT

MAY

NOT

THE

ONCE RUNNING THE CONSOLE PACKAGE NON-ACTIVE AND
DESIRE TO RUN IT ACTIvE. ONE MUST RELOAD THE DIAGNOSTIC
INITIALIZE FOR AN ACTIVE CONSOLE PACKAGE.

INITIALIZATION

FOR

ACTIVE

CONSOLE PACKAGE

SET LOCATION 21
REGISTER.

1.)

OITD=O

INDICATE

USE

PSEUDO

SWITCH

2.)

3.)
FOR

SEE

LOCATION 21, BITS 7-11 TO MEMORY SIZE.
(8K MINIMUM REQUIRED)
SECTION 8,18.

SET

LOCATION

SET

NON-ACTIVE

CONSOLE

BIT3=1

INDICATE

CONSOLE

PACKAGE

ACTIVE.

PACKAGE

1.)

SET LOCATION 21 BITO=1 TO INDICATE NOT TO USE PSEUDO
SWITCH REGISTER: BUT TO USE HARDWARE SWITCHES.

2.)

SET

LOCATION

ACTIVE.

BIT3=O

INDICATE

CONSOLE

PACKAGE

NOT

CONTROL

CHARACTERS

UCIQII-UQ—nonp-nfl-

CONTROL CHARACTERS ARE USED TO GIVE THE OPERATOR
ABILITY TO PERFORM THE FOLLOWING FUNCTIONS.
RESPOND TO THE CONTROL
NOTE! THE PROGRAM WILL
CHARACTER IN FIVE (5) SECONDS OR LESS.
CONTROL

THIS RESTORES
AND STARTS IT

CONTROL

THE

LOADER (PGS 37
LOC 7606 OF FLO

FLD

THIS WILL
REASK THE
DESCRIBED

CONTROL

THE

RESTART THE PROGRAM AND
SWITCH REGISTER QUESTION
IN SECTION 8.6.

.Q.......

THIS WILL CONTINUE THE PROGRAM FROM
AN ERROR IF ALLOWED BY THE DIAGNOSTIC
OR FROM A WAITING STATEMENT.

CONTROL L
WILL SWITCH THE TERMINAL MESSAGES
FROM THE DISPLAY TO A LINE PRINTER.
TO RESTORE THE MESSAGES ON THE TERMINAL
CONTROL L MUST BE TYPED AGAIN,IF
NO PRINTER IS AVAIBLE AND CONTROL L
IS TYPED THE RESULT WILL BE THAT THE
CONSOLE PACKAGE WILL WAIT FOR CONTROL C
THE CONTROL L WILL OUTPUT TO THE LINE
PRINTER AND THE PROGRAM WILL
ATTEMPT TO CONTINUE AS IF A CONTROL E
WAS TYPED IN.

THIS

CONTROL 0'
THIS WILL ALLOW THE ABILITY TO CHANGE
THE SWITCH REGISTER DURING PROGRAM
OPERATION. TYPING THIS CHARACTER WILL RESULT
IN AN INTERROGATION OF THE SWITCH REGISTER
QUESTION AS DESCRIBED IN SECTION 8.6.

CONTROL

H...----‘

THIS
LOOP
WILL
THIS

WILL STOP PROGRAM EXECUTION AND WAIT IN A
FOR A CONTINUE. THE ONLY WAY TO CONTINUE
BE TO TYPE A CONTROL 0, R OR C .
IS A NONPRINTING CHARACTER.

THIS
IS

TYPEDgTHIS

CONTROL O
8

CONTINUE A PROGRAM AFTER A CONTROL
IS A NONPRINTING CHARACTER,

WAITING

MESSAGE

THE

WAITING MESSAGE IS USED TO ALLOW THE OPERATOR TIME
MAKE A DECISION AS TO WHAT CONTROL CHARACTER
TYPE. THIS MESSAGE MAY APPEAR AT THE END
PASS MESSAGE IF THE HALT 0N PASS BIT IS SET.THE CONTROL'
CHARACTERS MAY NOW BE USED TO PERFORM THE NEEDED FUNCTION.
TO
T0
OF

THE WAITING
IF THE HALT

MESSAGE MAY BE PRINTED AFTER AN ERROR MESSAGE
ERROR BIT IS SET,HERE AGAIN THE CONTROL
CHARACTERS MAY BE USED.
THE wAITING MESSAGE MAY BE PRINTED IF OPERATOR INTERVENTION
IS REQUIRED,

7.6

SWITCH

MESSAGE

THIS MESSAGE IS USED TD SETUP THE PSEUDO SNITCH REGISTER
BEFORE PROGRAM EXECUTION TAKES PLACE.THE SHITCH REGISTER
IS SETUP WHEN THE FOURTH CHARACTER IS ENTERED OR A CARRIAGE
RETURN IS TYPED
*AAAARAARAAAAAAAAAA*AAAAAAAAAAAAARAARAAAAARARAAAAAAAAAAARAAA

SR=OOOO

UNDER

7,7

END

“ODD

SCORING

INDICATES

OPERATOR

RESPONSE

PASS

GIVEN NHEN THE DIAGNOSTIC HAs MADE A
THE PRINT—OUT HILL INDICATE THE DIAGNOSTIC
MAINDEC NUMGER THE HORD PASS AND A FOUR DIGIT PAss NUMBER.
A PAss HILL BE A TIME PERIOD RATHER THAN A PROGRAM PAss
OF THE DIAGNOSTIC, THE TIME PERIOD HILL BE IN THE RANGE OF
A PROGRAM
ONE (1) T0 FIVE (5) MINUTES. IF THE DIAGNOSTIC MAKES
PAss IN THE 1 TO 5 MINUTE RANGE THEN THE PASS COUNT WILL BE THE
SAME As THE NUMBER OF PROGRAM PASSES.IF THE PROGRAM MAKES A
PROGRAM PAss 1N LESS THEN ONE MINUTE THEN THE PAss COUNT MILL
NOT BE THE SAME As THE PAss COUNTER THE PAss COUNTER HILL
REFLECT MORE THAN ONE PROGRAM PAss,
AN

INDICATION

HILL BE

SUCESSFULL PAss.

IF HALT AT END OF PASS IS SET THEN THE PASS MESSAGE WILL BE
PRINTED AND A WAITING STATEMENT WILL ALSO BE PRINTED.
A CONTROL CHARACTER IS NEEDED TO CONTINUE FROM THIS MESSAGE.
THE FORMAT OF THE END OF PASS MESSAGE IS
i***********t***************************t**************

NAME

PASS

GOOI

i'k'ki***************************************************

ERRORS

THE

ERROR REPORTS AS DESCRIBED
DOCUMENT WILL BE USED.

STANDARD

THIS

SWITCH REGISTER
THE
OF

SWITCH SETTINGS AS
DOCUMENT WILL BE USED.

PARAMETER

CONTROL

LOCATION
HARDWARE

DESCRIBED

SECTION

WORDS

THE CONSOLE PACKAGE USES
FOLLOWING PURPOSES.

LOCATION 2O
PSEUDO SWITCH

SECTION

SETTINGS

STANDARD

THIS

IDENTIFIER

LOCATION 22
HARDWARE IDENTIFIER

THE

LOCATIONS

FOR

THE

LOCATION

0621

BIT

OCTAL VALUE

FUNCTION

4500

USE

2002

OPTION

IOOO

OPTION

40%

BED

OPTION

100

NOT

POPS-E

7.11

LOCATION

WHEN

PSEUOO

FUNCTION

WHEN

USE

HARDWARE

HAS

OPTION

HA8

OPTION

SIMULATOR

HAS

SIMULATOR

HAS

OPTION

XOR

SNITCHES

SIZE

MEMORY

CPU

TYPE

Ex.

SNITCHES

SIMULATOR

XOR

POPS-E

1K=Uap
8K=67,
24K=27;

TYPE

2K=O1.
12K=13y
28K=33v

CPU

3K=Oz.
16K=17a
32K=37

4K=O5

2OK=23

0022

FUNCTION

SIT

OCTAL

AOOO

NOT

ACTBA

206%

NOT

ACT

100%

NOT

YET

“DO

DEACTIVE CONSOLE
PACKAGE

VALUE

WHEN

FUNCTION

LINE

WHEN

ACT

LINE

ACT

LINE

DEFINED
ACTIVE

CONSOLE

PACKAGE

LOCATION CHANGES

THE FOLLOWING LOCATIONS CAN BE CHANGED TO
NEED FOR MODIFICATION OF THE DIAGNOSTIC.

MEET

THE

SPECIFIC

5650

IS THE
PASSED

LOCATION FOR THE VALUE OF THE NUMBER OF PROGRAM
NEEDED TO PRINT THE END OF PASS MESSAGE.

5437

LOCATION SET

THE

FOUR

(A)

FILLER

CHARACTERS

AFTER

MODIFICATIONS

MODIFICATIONS WERE
AS THE CONSOLE PKG
CONSOLE PKG.
EACH

MADE TO THE DIAGNOSTIC AT THE SAME TIME (REV C)
WAS ADDED.
THESE CHANGES ARE NOT RELATED TO THE
LINE OF CODE DELETED WAS EFFECTIVELY DELETED BY
THE INSERTION OF THE EXPRESSION /*VB*/ AT THE BEGINNING OF THE LINE.
EACH LINE OF CODE INSERTED WILL CONTAIN THE EXPRESSION /VB/.
LISTING

CRLF.

A/D

IMAINDEC-EG-DJADA-C

CONVERTER.

MULTIPLEXER

23-MAR-76

V142A

PALIQ

DIAGNOSTIC

11302

PAGE

SEQ

0215

SEO

OO16

lMAINDEC-UB-DJADA-C A/D CONVERTER. MULTIPLEXER DIAGNOSTIC
@175“
/COPYRIGHT 1976. DIGITAL EQUIPMENT CORPORATION. MAYNARD. MASS.

é
2

MODIFIED

/CB/

RUN

NITR

CONSOLE

PACKAGE

JANUARY

1976

15
,6

as3O

17
18
19

22
23

4532
a53:
as3a
«535
4536
a537
asaO

ea
25

a5u1
4542

IIOT DEFINITIONS
XADCL
JMS I
ADCL=
XADLN
JMS I
IDLMS
JMS
I
XADST
ADST=
XADRB
JMS I
ADRB:
XADSK
I
JMS
ADSK:
XADSE
JMS I
.055:
I
XADLE
JMS
ADLE=
JMS I
XADRS
ADRS:
JMS I
XCLOE
CLOE=
XCLSK
JMS I
CLSKE
XCLzE
JMS I
CLzEa
JMS I
XCLSA
CLSA:
JMS I
XCLED
CLED:
XCLAB
JMS I
CLAB:
XDISO
JMS I
DISO:
JMS I
XDILX
DILX=
JMS I
XDILY
DILYB
JMS I
XDIXY
DIXY:
XDILE
JMS I
DILE=

6007

CAP:

«SEO

4531
4522
a523

a
9

10
11
,2
1
14

4524
.535
a526

4527
4531

BO
21

ALL A/D LOGIC
/LOAD MPX REG FROM Ace-11 CLA
/CLEAR FLAGS. START CONVERSION
/CLEAR DONE. READ A-D BUFFER INTO AC.
/SKIP ON A-D DONE. DO NOT CLEAR FLAG.
/SKIP ON TMG ERROR. DO NOT CLEAR FLAG.
ILOAD ENAB REG FRON AC 2-6. CLA.
MPX REG INTO AC.
IREAD STATUS. ENAB.
/AC TO CLOCK ENABLE
/SKIP ON CLOCK OVERFLOR
/ONES IN AC CLEAR CLOCK ENABLE REGISTER
/CLOCK STATUS TO AC. AC ONES CLEAR CLOCK
ICLEAR

/CLOCK ENABLE TO AC
IAC ONES TO CLOCK BUFFER
/SKIP ON DISPLAY DONE
ILOAD X
/LOAD Y
IINTENSIFY
/LOAD DISPLAY ENABLE FROM

STATUS

111O2

PAGE

ICLEAR

6007

ALL

FLAGS

ENABLE.

/MPX.

STATUS

31
32

33
3a
3s
36
37

DONE

/
/

1
2
3

TIMING ERROR
ENABLE INTERRUPT ON AD DONE
ENABLE INTERRUPT ON TIMING ERROR
ENABLE EXTERNAL AD START
AUTO-INCREMENT MODE
UNIPOLAR-BIPOLAR
NOT

/
/

5
6

38
39
aO

3-11

a1
42
A3

/STARTING

USED
MPX CHANNEL

OCTAL

O-17

ADDRESS

TEST

NORMAL START FOR CONTROL LOGIC
IOT SCOPE LOOP
DISPLAY CONVERTED VALUE IN AC
EXTERNAL ENABLE RITH REAL TIME
MONOTINICITY TEST
RESOLUTION ACCURACY TEST
SUCCESSIVE READS TEST

12OO
/2O1
/2O2

ua
as

/203
/2O4
/205
/2O6
/2O7
/21O

46
a7
AB
«9

5O
51
52
53

LAs=JMs

4553
7aO2

TESTS

CLOCK

MULTIPLEXER NOISE TEST
LABS-A SYSTEM TEST
I

/CB/
/C8/

XCBLAS

HLT=74O2

/MAINoac-OB-DJADA-C

A/D

CONVERTER.

MULTIPLEXER

DIAGNOSTIC

PAL1O

v142A

23-MAR-76

57
5B

59
OO
61
62
63
64
65
66

67
BB
b9
7O
71
72

OOOO

OOOI
OOO2

SAO2

JMP

OOOO
OOOs

OOOs
OOOB

4475
A51a

OOO7

5777'

RETURN.

RETURN

BADINT.

/*C8*/HLT

/UNEXPECTED

CBCALA.

CBACTV
CBERR

Ice/UNEXPECTED

JMP

OOIO

*18

OO11

OOOO
OOOO

A1O.
A11.

O
O

OO17
OO17

2112

.17
MSCPNT.

ERMSG

OOzO

*20

PSR.
ch1..
chz.

TWENT.

TNENT1.
TNEN72.

aOOO

8N0.
5N1.
3N2.
SW3.
8H4.
sws.
SR6.
TEMPO.
TEMPA.
TEMPB.

480%

OOIO

73
7a

OOOO

INTERRUPT

INTERUPT.

START

IAUTO
IAUTO

INDEX
INDEX

REG
REG

77
78
79
BO

O1
82
B3
Oa

as
86

BO
B9

OOaO

OOOO

OO21
OO22

AOOO
OOOO

OO23
OOaa

OOOO
uOOO

OO25
@926
OO27

OOOO
“MM

OO3O
OO31

9O
91
92
93
94
95

OO32
OO33
OOsa

96
97
98

OOaO
0041
OOu2

OO43
OOaa
OOas

1OO
1O1
1O2
1O3
1Oa

1O5
1O6
1O7
IOB

1O9
116

OO35
OO36
OO37

OO46
OOaT
OOSO

OO51
OO52
2053

2OOO
IOOO
OGOO
O2OO
OIOO
OOuO

OOOO
OOOO
OOOO
OOOO
OOOO
OOOO

OOOO
OOOO
2236

O2O7
O212

0215
7777
7776
7774

O
aOOO

M1.
M2.
M0.

1
2

OOAO
O
O

INHIBIT TYPEOUT
HALT ON ERROR
SCOPE LOOP OVERRIDE
3 CALIBRATION TEST HALT. ALL 1's JUMPER INSTALLED
a DETERMINE PROCESSOR CYCLE TIME.EXTERNAL ENABLE
5 SELECT TEST
6 UNIPOLAR ENABLE
BUFFER O
BUFFER A

REG

ISWITCH
/
/

2OOO
1OOO
OaOO
O2OO
O1OO

O
TEHPC.
O
TEMPO.
O
DELAY.
O
CNTR1.
O
TALLY.
ERTYP
ERR.
IRCBR/XCONVT.
/RC8R/XINSTR.
liCBt/XMONOT.

K2O7.
K212.
K215.

/Ca/
/C8/
/ca/

/STORAGE
/STORAGE

B
c
O

/
/

/DELAY BETNEEN 2 CONVERSIONS
IMONOTINICITY COUNTER
IERROR

CONVT
INSTR
MONOT

REPORT

ROUTINE
IDISPLAY CONVERTED VALUE
IIOT SCOPE LOOP
/MONOTINICITY TEST

2O7

IBELL

212

/LINE FEED
/CARRIAGE RETURN

215
7777
7776

7770

CODE

1-1

/HAINOEC-06-OJAOA-C
111

112
113
110
115
116

117

0050
0055
0056
0057
0060

0061
0062

A/O

7772
7700
1000
0077
0000

0200
2200

118

119
120
121
122
123
124
125
126
127
128
129
130
131
132

133
130

135
136

0063
0060

5577
3605

MULTIPLEXER

0065

PRLP
XPRLP.
200
BLANK.
/*C8*/CHAR.

0066

0067

.6260

CHARA.

260

0070
0071
0072
0073
0070

7777

0000

ERSRIT.
CHAN.

2600

TAL.

2676

SELECT.

3307

SETUP.
IRCBRICHNL.

11.33

6.95

1.3

550

0017

«nuiV

RESOL
NOISE

GLITCH
SYST

260

/CS/

1
2

3
0

5
/*C8*/
6
/ACOA/
/*C8*/K7.
10
/*C8*/
11
/*C8*/

7
1

/0CS*/
/*CB*/
Iacsw/
/*CS~/
IncaA/
/*C8*/
/*C8*/
0075

23-MAR-76

licet/

150

V102A

XTAL
XSELEC
XSETUP

IACS~/
/*C8*/
/*C8*/

100
101
102
103
100
105
106
107
106
109

PAL10

COHPAR

XCOMPR.

3330
0200

139

DIAGNOSTIC

7772
H6.
M00.
~00
1000
K1000.
0077
K77.
00
K00.
200
K200.
HOVE
XMOVE.
/RCB*/EXTBL.
EXTL
STORAG-1
XSTOR.

/*C89/XRESOL.
10C60/XNOISE.
Itcaw/XGLIT.
Itcat/XSYST.

137
130

151
152
153
150

CONVERTER.

13
10
15
16
17
0

FOR

ACTIVE

CSACTV= JHS

0102

ICE/PG 0.

0120

/C6/

I .
ACTVCS

Ice/CHECK

‘0..‘flV

CONSOLE PACKAGE

0075
3737

155

156
157
150
159
160
161
162

163
160
165

IIOT
0120
0121
0122
0123

2000
2006
2010
2022

THE

L003 102 THRU 117 ARE USEO BY
CONSOLE PACKAGE 1C0).

LINKS

XADCL.

XXAOCL

xAOLH,

xxAOLN
xxAOST

KAOST.
xAORe,

xxAORO

‘J
INA INOEc-06-OJAOA-C
166

0120

167
166
169
170

0125
0126
0127

2030
2000
2050
2056

0130

2060

171
172
173
170

0131
0132
0133
0130
0135
0136
0137

2072
2502
2510
2516
2520
2532
2502
2550
2556
2560
0530

175
176

177
170
179
100
181
182

103
100
105
106
107
160
109

0100
0101
0102
0103
0100
0105
0106

A/O

CONVERTER.
XAOSK.

XAOSE.
XADLE.
XADRS.
XCLOE.
xCLSK.

HULTIPLEXER

DIAGNOSTIC

23-HAR-76

11:02

PAGE

1-3

SE0

0010

XXAOLE
XXADRS
XXCLOE
xxCLSK
XXCLZE
xxCLSA

XCLZE.
XCLSA.
XCLED.
XCLAB.

XXCLED
XXCLAB

XDISD.
XDILX.

XXDISD
xxOILx

XDILY.

XXDILY

XDIXY.
XDILE.

XXDIXY
xxOILE
0530

"‘I"

IFIRST A/O IOT NORN 053
ILAST IOT or A SEOU IOT LIST
ICURRENT DEVICE SELECT COOE BEING USEO
/CURRENT CLOCK 107

0130

FIRST.
LAST.
Now.
CLKNOH.

0107
0150

0050
0000

SCPNON.
CSNON,

0050
0

0151
0152

0000
0000

ER1LSS.
TEMPLB.

0
0

0153

0760

xcaLAs.

COLAS

/CS/

0150

0000

CSSVSR.

/C8/SR

0000
0530

V102A

PAL10

XXADSK
XXADSE

0530

0130

/CURRENT

SCORE

107

/VB/ERROR

COUNTER.
IVS/STORAGE FOR RESOLUTION DIFFERENCE.

190

191
192

193

SOMETIMES

SAVEO

HERE.

190

195
196
197
190
199
200
201
202
203
200

205
206
207
200
209
210

211
212
213
210
215

216
217

21a
219
220

0200

A200
0

0200
0201
0202
0203
0200
0205
0206
0207

0777'
07770
0777'

0210

0777'

JHS
JMS
JHS
JHS

0777'
0777'
0777'
0777'
0777'

COSTAR
COSTAR
CSSTAR
COSTAR
CSSTAR

JMS
JKS

CSSTAR

JMS
JHS
JHS

/*C69/

IRCBS/
/*C00/
liCOi/
IRCBR/
IACSA/
/0CSA/
/AC0-/

JHP
JHP
JHP
JHP
JHP
JMP
JHP
JMP

CSSTAR
COSTAR
CSSTAR

I
I
I
I
I

I
I

[CB/NORMAL START.
/CS/IOT SCOPE LOOP OPTION.
ICE/DISPLAY CONVERTEO VALUE

OPTION.

/Ca/EXTERNAL ENABLE TEST.
ICC/HONOTINICITV TEST.
/C0/ACCURACV TEST.
lCB/SUCCESSIVE REAOS TEST.
/CS/HPx NOISE TEST.
ICS/LASS-A SVSTEH CHECK.

XHONOT

/NORNAL START
IIOT SCOPE LOOP OPTION
IOISPLAV CONVERTEO VALUE OPTION
IEXTERNAL ENABLE TEST
/HONOTINICITV TEST

XRESOL
KNOISE
XGLIT

/ACCURACV TEST
ISUCCESSIVE REAOS
IMPX NOISE TEST

START
XINSTR
XCONVT

EXTBL

TEST

*0..aV

IMAINDEC-DB-DJADA-C

A/D

221

222
223
224
225

JMP

START:

/AcBA/HLT

CBCALB;

CBACTV
CBINOU

0211
0212

4475
4515

227
228

0213

4553

LAS

0214

0033

229
230
231

0215
0216

7440

AND
SZA

4473

JMS

0217

4776'
4775'
5432

226

0220

0221
0222

1374

0223

3017
6007

0224

131¥35K6551

SETUP

5235.

0233
0234
0235
0236
0237
0240

4445

JMS

0226

ENAZ

7040
4527
7041
1176
7450
5247

CMA
ADRS

ENAZ.

7040

1175
7450
5272
4445
0251
5273

284
285

ENA3;

0271
0272

5251
4472

4474
739%
117

293
294
295
296
297
298

299

ERR

JMP
JHS I
ENA3
CMA

A/D

CONVERTER:

JMP
Jns I
ENA3
JMP
JMP
JMS I

CHECKS
JMS

ENA4A

TAD

ADLE

322
323
324
325
326
327
328
329
330

CAN

BIT}

/GET BITS
ILDAD

lAC

NOT

DIAGNOSTIC

READ BACK

AND

ADLE

CLEARED

PALIO

V142A

IREAD

BACK

/CHECK

FOR

ERR

INRONG

BITS

ENA4-1
ENA3
TAL

IDDNE?

ONLY

53a3
4445

JHS

zava
7oaa

ENA4
CMA

0274

5316
4472

/TEST

SET

ENABLE 8174 CAN

LOADED

AND

READ BACK

/GET BITS
ILOAD

AND

.+3
I

CHECKS
JMS

ENAS,

THAT
SETUP

ERR

/AC

IREAD

BACK

[0200

ICHECK

NOT

FOR

CLEARED

ONLY

ADLE

SET

.+S
ERR

INRONG BITS

ENA5-1
ENA4
TAL

IDONE?

THAT

ENABLE

BITS

CAN

AND

READ

CLEARED BY

ADLE

LOADED

SETUP

CLA CLL
7

10100

4526
7450
5326

.+3

4445

ERR

IGET BITS
ILDAD

IAC

NOT

AND

0317

0326
0327
0330

7040

0331
0332
0333
0334
0335

1173
7450
5340
4445
0317

0336

5341

23-MAR-76

.+5

[0200

SNA
JMP
JMS I
ENA4
JMP
JMP
JMS I

321

AND

BITS

CLA CLL

303
304
305
306
307
308
309
310
311

320

LOADED

IRRONG

SNA

SNA
JHP

1173

SET

FOR

[0400

TAD

0320
0321
0322
0323
0324
0325

ENABLE

MULTIPLEXER

ADRS
CIA

315
316
317
318
319

BACK

ICHECK

.+3

ADRS
CIA
TAD

745a

4474
7300

THAT

ERR

302

0316
0317

ONLY

IREAD

SETUP

[0400

300
301

314

ADLE

CLEARED

NOT

IDONE?

TAL

ADLE

4526

312
313

AND

ENA3-1
ENAa

I
CLL

CLA

IAC

BACK

SNA

/TEST

291
292

READ

.vS

TAD

7041

286
287
208
289
290

IDT'S

AND

LOADED

CAN

BITZ

[1000

CHECKS

4527

0261
0262
0263
0264
0265
0266
0267
0270

TEST?

,+3

JMS

0251

277
278
279
280
281
282
283

TD BASE

/GET BITS
ILDAD

ERR

CIA
TAD
SNA
JMP
JMS I
ENA2
JMP
JMP
JMS I

4526
7450
5260
4445

/MAINDEC'08-DJADA'C

ENABLE

ADLE

4445
0226

0260

0019

IINITIALIZE ERROR POINTER

[1000

TAD

ITEST

276

CLL

0232

0250
0251
0252
0253
0254
0255
0256
0257

SEC

(ERHSG-I
MSGPNT

CLA

SNA
JMP

4474
7300
1175

IRESET

JMS

4526
7450

5226
4472

1-4

HESAGE

THAT

0231

0247

CLEAN

CHECKS

0230

0246

IYES

TAD
DCA
CAF

INITM,

1176

5250

PAGE

XLABEL

4474
7300

0245

ISELECT SPECIFIC
ISKIP IF NO

SELECT

0227

0242
0243
0244

545
I

0226

0241

1xza2

ICBI

JMS

/TEST
0225

Z3-MAR-76

SYSTEM CHECK

lLABB-A

XSYST

[ACBA/

vvaA

PAL10

MULTIPLEXER DIAGNOSTIC

CONVERTER:

4527

IREAD

BACK

ICHECK

FOR

7041
[0100
.+5
ERR

ENA6—1

INRONG BITS

ONLY 5 SET

BACK

11:02

PAGE

1-5

SEQ

0020

MULTIPLEXER DIAGNOSTIC

/MAINDECHOB-DJADA-C A/D CONVERTER:
0337
D340

5317
4472

ITEST

CHECKS

PALID

V142A

23'MAR-76

11102

PAGE

1-6

SEQ

0021

11:22

PAGE

1-7

5E0

@822

ENAS

JMP
JMS

JMS

IDONE ?

TAL

THAT

ENABLE

8176 CAN BE LOADED

AND

READ BACK

SETUP

CLA CLL

ENAB,

/GET BITS
ILOAD

[46

TAD

ADLE
SNA
JMP
JMS I
ENAb
CMA
ADRS

.+3
CLEARED BY

ADLE

/READ BACK

[4D

SNA
JMP

.45
I

NOT

IAC

ERR

CIA
TAD

JMS

AND

ICHECK FOR

ONLY

SET

IHRONG BITS

ERR

ENAb
MUXBA
ENAb

JMP
JMP

JMS
JMP

IDONE?

TAL
MUXSA

PAGE

ITEST 5:
D460
D401
0402

0403
D424

0405
0466
3467
0410
6411

384

D412
D413
D414
D415
D416
0417
6420

4474
7322

CHECKS

MUXBA,
MUXD,

CLA

1171
4521

TAD
ADLM

7452
521a

SNA

D421

386

0422

THAT

MUX

BITS

CAN

AND

LOADED

READ

BACK

SETUP

IGET BITS AND
ILOAD

[ID

JMP
JMS I
nuxe

4445
0421
724a
4527
7041

.+3

NOT

/Ac

ERR

CLEARED

ADLM

CMA

ADRS
CIA
TAD

1171

[1%

SNA
JMP

7454
5222
4445
2401
5223

.45
I

JMS

IREAD

BACK

/CHECK

FOR

ONLY

SET

/wRoNG BITS

ERR

MUXB
MUX9-1

JMP

/MAINDEC-DB-DJADA-C A/D CONVERTER:
355

I
CLL

JMS

DIAGNOSTIC

MULTIPLEXER

JMP
JMS

5201
4472

MUXS
TAL

CHECKS

THAT

PALID

V142A

23-HARW76

IDONE?

387

388
389
390

391
392
393
394
395

396
397
3RD
399

ITEST

0423
D424
D425
D426
D427
0430
0431
B432
0433

4474
7300

JMS

CAN

LOADED

AND

READ

BACK

TAD
ADLM

IGET BITS
/LOAD

AND

SNA

JMP
JMs

4445
0424
7646

.+3
I

ERR

NOT

IAC

CLEARED

ADLM

MUX9
CMA

0434

B435

4527
7041

CIA

402
493

D436

1179

TAD

D437

424

D446

D441
@442

SNA
JMP
JMS

.+5

405
406
497
468

7450
5245
4445
5424
5246
5224
4472

MUX9
JMP
JMP
JMS I

429

BIT9

CLA CLL

MUX9,

117%
4521
7456
5233

420
421

2443
0444
0445

MUX

SETUP

ADRS

/READ

BACK

/CHECK

FOR

ERR

IWRONG

BITS

MUXIO-I
MUX9
TAL

IDONE?

ONLY

SET

410
411

412
413

/TEST

CHECKS

THAT

MUX

BITIB CAN

LOADED AND READ BACK

414

415

4474

416

730%

417
418

JMS

MUX10,

CLA

I
CLL

TAD
ADLM
SNA
JHP
JMS I
MUXID
CMA
ADRS

7450
5256

SETUP

IGET

BITS

AND

ILOAD

.43
ERR

/AC

NOT

CLEARED

IREAD

BACK

ICHECK

FOR

IWRONG

BITS

ADLM

SET

CIA

4445

TAD
SNA
JMP
JMS

D447

MUXID

JMP
JMP
4472

ans

ITEST
4474
7301

1O I

MUX11I

ERR

Mux11~1
HUXID
I

CHECKS

JMS

ONLY

.+5

CLA CLL

TAL

THAT
SETUP
IAC

IDONE?

MUX

BIT11

CAN

LOADED AND READ BACK

IMAINDEC-08-DJADA-C
440

0473

441
442
443

0474

444

0472

445

7040
4527

446
447

JMP
JMS

ERR

I
MUX11
CMA
ADRS
CIA
IAC

449
450

5312

.+5

451
452
453

4445
0472
5351
5272
4472

ERR

492
493
494

TE ST THAT ADCL
SETUP
JM S I
CLA CMA

118

TSTADCI

496
497
498
499

500
501
502

0555
0557
0560

503
504
505
506
547
508
509
510

11802

PAGE

SEQ

0024

SET?

0514
5332
5314
4472

TSTCAF-1
7stoc
TAL

INEXT 7:57
ILOOP ADR.
xoo~57
CLEARS

12! TEST THAT CAF
SETUP
JMS I
CLA CMA

MUX

/LOAD MUX
/SET AC=7777
/LOAD ENABLES
ICLEAR ALL
IREAD STATUS
IMASK
/ANY SET?
/NO, NEXT TEST
IVES; ERROR

ADLM

CLA CMA

JMP
JMS I
TSTCAF
JMP
JMP
JMS I

(1777

.75
ERR

INEXT

TEST
ILOOP ADR.
IDONE?

TSTJAM-l
TSTCAF
TAL

13: TEST THAT ADRB
JMS I
SETUP
CLA CMA

4474

JAM

MULTIPLEXER

ADRB
DCA
NOP
ADRB
CIA
TAD
SNA
JMP

TRANSFERS

/AC=7777

TSTJAM:

4523
3036
7000
4523
7041
1036
7450
5367
4445
0552
5776'

BITS

ENABLE

AND

/SET AC=7777

TSTCAF'

ITEST

0556

23-MAR-76

xmasx

(1777

/ANY

ADLE
CAF
ADRS
AND
SNA

BITS

/sar AC=7777
ILOAD Mux
ISET AC=7777
/LOAD ENABLES
ICLEAR ALL
/READ s717us

AocL
ADRS
AND

ENABLE

AND

MUX

4445

7240

0553
0554

CLEARS

ADLM
CLA CMA
ADLE

/MAINDEC-08-DJADA-C A/D CONVERTER;
495

IDONE?

xuo, NEXT 7537
IYES' ERROR

0551
0552

0547

490
491

/WRONG BITS

ERR

0550

0545

SET

ONLY

,+5

5350
4445
0533
5351
5333
4472

0546

FOR

ICHECK

TAL

ITEST

0540
0541
0542
0543
0544

0023

MUX11

4474

484

SEQ

ADLM

CLEARED av

NOT

zac

5331

7240
4521
7240
4526
6007
4527
0377
7450

PAGE 1-3

TSTJAM-I

/TEST
4474
7240
4521
7240
4526
4520
4527
0377
7450

11:02

[READ BACK

7041
7001
7450

448

23-MAR-76

/LOAD

ADLM
SNA

4521
7450
5300
4445

V142A

PAL10

MULTIPLEXER DIAGNOSTIC

A/D CONVERTER,

DIAGNOSTIC

TEMPA
7

V142A

PAL10

ISHOULD CLEAR
ISAVE

/READ

WITH

INOT

EQUAL

AC=0

TEMPA
?

.+5
ERR

JMS I
TSTJAM
JMP
JMP
JMS I

TSTDON-1
TSTJAM
TAL

JMP

TSTDON-1

[NO-ERROR

PAGE

/TEST

148

0600
0601

CHECK
I

JMS

TSTDON:

0602
0603

TAD
DCA
ISZ
JMP

0604
0605
0606

0607
0610
0611
0612
0613
0614
0615
0616

TO SET
SETUP

AND

DONE

CLEAR

/CONVERTI

FLAG

RESULTS

NOT

NEEDED

ERROR

[-10%
TEMPD

a’1

ADSK
SKP

JMP
JMS I
TSTDON
JMP
ADSK

.+4
ERR

IFLAG

NOT

IADSK

CLEARED DONE

SET

TSTERR-l

SKP

0617

JMP

.+a

JMS I
TSTDON
JMP
ADCL

ERR

0621
0622
0623

0624

ADSK
JMP
JMS I
TSTDON
JMP
JMP
JMS I

0625
0626
0627
0630

0631
0632

/TEST

0640

FLAG

TEMPE

0620

0633
0634
0635
0636
0637

DONE

CLA
ADST

158 CHECK
J MS I
CLA
ADST
ADST
ADSE
SKP

TSTERR-1

ICLEAR FLAG
ICHECK FOR FLAG
IFLAG CLEARED
IFLAG NOT CLEARED

.95
ERR

TSTERR-l

,7s700w
TAL

TO SET
SETUP

TIMING ERROR FLAG

AND

CLEAR

TIMING ERROR FLAG

TSTERR:

ITNO

A-D

ICHECK

STARTS

FOR

TO PRODUCE

TIMING ERROR

TIMING ERROR FLAG

1-9

IMAINDEc-ua-DJAoA-c A/D CONVERTER.
549
550

0641
0642

551

0643
0644
0645
0646

552
553
554
555
556
557
558
559
560

561

0647
0650
0651
0652
0653
0654
0655

562

0656

563
564
565

0657
0660
0661

5244
4445
0634

4525

569
570

7410
5252

5262
4520
4525
5261

571
572
573
574
575
576
577
578

579
580

581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598

599
600
601
602

603

0666
0667
0670

0671
0672
0673
0674
0675
0676
0677
0700

5234
4472

0663

0704

5307

0705
0706

5263
4472

0707
0710

0711
0712
0713

4474
7200
4522
4522
4525

0714
0715

7410
5321

0716
0717
0720
0721
0722

4445
0710

4445

604
605
606

607
608
609
610
611

612
613
614
615
616

0731

4472

0732
0733

4474

0734

4522
1166
3035
2035

0735

620

0736
0737
0740

621

0741

4524

622
623

0742

7410

625
626
627
628

629
630

631
632
633
634

635
636
637
638
639

TIMING

TO SET
SETUP

ERROR

AND

FLAG

READ BACK VIA STATUS

REG

/THO

TO PRODUCE

STARTS

A-D

ICHECK

TIMING

ERROR

TIMING ERROR FLAG

FDR

.+4
NOT

IFLAG

ERR

SET

IREAD STATUS
[MASK

PAL10

DIAGNOSTIC

IBIT

SET

ERR

IVES
IERROR

CLRDON-1

INEXT

.+5

V142A

23-MAR-76

11:02

FLAG

FAILED TO READ

INTO STATUS REG

TEST

TSTSR1

TAL

TO CLEAR
SETUP

DONE

FLAG VIA CAF

RESULTS

NOT

NEEDED

TEMPO

.-1

4445

.+4
I

ERR

IFLAG

NOT

CAF
ADSK

ICLEAR FLAG

JMP
.+5
JNS I
ERR
CLRDON
JMP CLRERR-1
JHP CLRDON
JMS I
TAL

/FLAG CLEARED
IFLAG NOT CLEARED

JMP

SET

CLRERR-I
ICHECK

FOR

FLAG

CLRERR-I

/CS/

*ittktttitiittttttttittti*********t*ttitiiitttttitttttttttttitttt

/C8/

IF CONSOLE PKG IS ACTIVE
ROUTINE TO READ SNITCH REGISTER.
THEN SNITCHES WILL BE READ VIA THE CONSOLE PKG.
OTHERWISE
THE HARDNARE FRONT PANEL SWITCHES WILL BE READ.

/C8/
/C8/

0770

TSTSRO
TAL

ICONVERTp

0752
0753
0754
0755
0756
0757

651

BIT

["100

4524
5356

COLAS.

CLA

1775'

7604
5760
4503
5760

INTO

TEMPO

0750
0751

0765
0766
0767

READ

TEST

CLA

0747

7640

SET

IREAD STATUS
/BIT 0 SET 7

MULTIPLEXER

JMP

5367

NOT

'/FLAG

(2000

5776'
6007

0764

NEEDED

.+4
ERR

ADRS
AND

JMS

0000
7200

RESULTS NOT

.-1

CLRDON-I

CLROON

0762
0763

FLAG AND READ BACK VIA STATUS REG

ICDNVERTa

JMP

4445

0761

DONE

5347

0760

SET
SETUP

CLA

0733

5776'

INEXT

ADST
TAD
DCA
152
JMP
ADSK
SKP
JMP

0733
5776'
5333
4472

TSTERR
TAL

TSTSR1'1

201 CHECK
JMS I

CLRDON.

CLEARED

IVES
IFLAG FAILED TO

0743
0744

644
645
646
647
648
649
650

CSSR.

TAD
SZA CLA
JMP
7604
JNP I
CSCKSN
JMP I

C8F
CSSR

CSLAS

/C8/
/C8/
/C8/IS

CONSOLE PKG ACTIVE?
lCS/SKP IF NO.
IC8/
/C8/(LAS) AC-HARD SR.
lCS/RTN TO CALL+1.
ICC/GET SR (PSUEDO OR HARD)
ICSIRTN TD CALL+1.

VIA

CONS. PKG.

652
653

[C8]

*ittttttii*tiitiitit*titttttttttififiitttifiiittttttiiifittitlttttfltt

654
655
656

657

0775
0776
0777

3432
1000
2000
1000

0025

ERR

0745
0746

64;

64
643

SEQ

TSTSRO-1

'JMS

52A
JMP
JMS I
TSTSR1
JMP
JMP
JMS I

5337

640

‘_1,

FLAG
NOT

IFLAG

.+5

CONVERTER,

[TEST

ERR

ADRS
SPA
JMP

ADST
ADST
ADSE
SKP
JR?
JMS I
TSTSR1

5332
5310

617

FAGE

FLAG

TSTSR1-1

17: CHECK
JMS I

0710

7200

1;,92

.65

[-100

TSTSR1;

4445

618
619

624

A/D

23.naa.76

ICLEAR
ICHECK

TEHPO
TEMPO

0377

7440
5331

TSTSRO—1

TAD

5332
4527

0723
0724
0725
0726
0727
0730

V142A

SET

DCA
132
JNP
ADSK
SKP
JMP
JMS I
TSTSRO
JMP

I
TSTSRO
JMP
JMP
JMS I

ITEST

rm INDEC-08-DJADA-C

CHECK
I

7510

0702
0703

NOT

IFLAG

CLA
ADST

4445
0663
5307
4527

5306

.+4
ERR

161

TSTSRO:

1166
3035
2035
5267
4524
7410
5277

0701

JR?
JMS I
TSTERR
JMP
ADSE
JNP
JMS I
TSTERR
JMP
JMP
JMS I

4445
0634
5262

447
7200
4522

ERR

ADCL

ITEST
0662
0663
0664
0665

PAL10

.13

ADSE
SKP

4445
0634

566
567
568

MULTIPLEXER DIAGNOSTIC

JMP
JMS I
TSTERR

PAGE

1H1!

SEQ

0026

658
659

ITEST 21!

CHECK

JMS

660

7200

661

CLRERR;

665
666

1‘12

SEO

0027

11:02

PAGE

1-13

SEQ

0020

CAF

TIMING ERROR FLAG VIA

TIMING ERROR

TIMING ERROR FLAG
1

.93
IFLAG NOT

ERR

NOT

IFLAG

ERR

SET

FLAG
FLAG

ICLEAR
ICHECK

ADSE

JMS

TO PRODUCE

STARTO

A'D

[THO

’CHECK FOR

JMS I
CLRERR
CAF

667
668
669
670
671
672
673
7674

PAGE

CLA
ADST
ADST
ADSE
5K?
JMP

662
663
664

TO
CLEAR
SETUP

11302

ZS'MAR376

V142A

PAL10

MULTIPLEXER DIAGNOSTIC

A/D CONVERTER:

/MAINDEC¢08-OJADA-C

CLEARED

CLRERR
STCLDO-l
CLRERR

JMP
JMP

675
676

JMS

677
678
679
680

22!

ITEST

TAL

TEST

THAT

JM3

STCLDOO

681
682

ADST

CLEARS DONE

SETUP

CLA

ERR

ICONVERT
INAIT FOR
[DONE
ICLEAR FLAGS
/DONE SHOULD CLEAR
IDID CLEAR; OK
/DONE DID NOT CLEAR

STCLER-l
STCLDO
TAL

/NEXT TEST
ILOOP ADR
IDONE7

ADST

683
684
685
686
687
688

ADSK
JMP
ADST
ADSK
JHP
JMS I

4445

689
690

691

.+5

STCLDO
JMP
JMP

1022
5236
5222
4472

692

.‘1

JMS

693

701
702
703
704
705
706
707
708
709

710
711
712

1036

4474
7206

717

718
719
720
721
722
723
724
725
726
727
728
729
730

731
732
733
734
735
736

4522
4524
1044
1045
1046
1047
1050
1051

1052
1053

1054
1055

5242
4525
5244
4522
4525
5255
4445
1037

4523
4523
4523
4523
4523
4523
4525

2037

7000

752
753

5263
7300
1037
7440
5334
4445
1057
5775‘
5257
4472
5775'
1200
7754

g+5
ERR

/IT DID CLEAR
/ERROR FLAG DID

RBCLDO'1
STCLER
TAL

INEXT TEST
/LOOP ADDRESS
IDONE7

MULTIPLEXER

CLA

SURE

ERROR

DID

NOT

CLEAR

NOT

VIA

AOST

ERROR BY
SETUP

DIAGNOSTIC
READING

PAL10

V142A

23-MAR-76

BUFFER

A/D

CLL

(-24
TEMPC
TEMPE

DCA
DCA
ADST
ADRB
ADRB
ADRB

/SET UP COUNTER
ILOCATION
COUNTER
CONVERSION
IREAD BUFFER
ICLEAR
ISTART

ADRB
ADRB
ADRB
ADRB

ADRB
ADRB
ADRB
ADRB
ADRB
ADRB
ADRB
ADRB

EOCERZ:

ADRB

ISKIP

ERROR

ISZ

TEMPE

ITIMING ERROR

ISZ
JMP

TEMPC
EOCER1

IDONE ?

TAD

TEMPB

IGET

.+5

INO

ERR

IREADING A/D BUFFER
ITO SET ERROR F-F
INEXT TEST
ILOOP
IDONE

JHS

‘

JMP
JMP

JHS
JMP

PAGE

NOERCL-l
EOCERR
TAL
NOERCL-1

DETECTED

IMO

JMP

1213
1200

766

/3ET
/CLEAR FLAGS
ISKIP IF ERROR

/MAKE

7410

2040

761

.‘1

ADRB

4523

751

762
763
764
765

EOCERle

4523

75%

754
755
756
757
758
759
760

0-1

iCONVERT
ICAUSE ERROR

TAD

4523
4523
4523
4523
4523
4523

741

747
746
749

EOCERR:

4523
4523
4523

4523

ERROR

CLEARS

JHP
ADST
ADSE
JMP
JHS I

248 SET
JMS I

4523
4523
4523
4523
4523

4523

ADST

JMP
ADSE

JMP
JHP
JMS

ITEST

7300
1376
3040
3037
4522
4523
4523

THAT

SETUP

A/D CONVERTER:

4474

739
740

TEST

JMS I
CLA
ADST
ADST
ADSK

STCLER

5777'
5237
4472

737
738

742
743
744
745
746

STCLER:

4522

IMAINDEC-08-DJADA-C

713
714
715
716

23!

/TEST

694

695
696
697
698
699
700

NUMBER

ERROR

FLAGS

AND

CONVERTING FAILED

IMAINDEC-88-DJADA-C AID CONVERTER:

HULTIPLEXER DIAGNOSTIC

V 142A

PAL18

23-HAR-76

11882

PAGE

1-14

SEQ

8829

11882

PAGE

1'15

SEQ

8838

767

768
769
778

ITEST

771
772

NOERCL:

TEST

25!

THAT

JHS I
ADST

ERROR

DOES

NOT

ISTART
ICLEAR

CONVERSION
ALL
ISTART CONVERSION
IERROR SHOULD NOT BE SET

ADCL

773
774

ADST
ADSE

JMP
JHS

AFTER ADCL

SET

SETUP

.+5
IERROR

ERR

FLAG SET:

ADCL

(CLR

BUSY)

FAILED

NOERCL
JMP
JMP
JHS
ITEST

26!

RBCLDO-I
NOERCL
I

TAL

TEST

THAT

JMS

I
CLL

CLA

RBCLDO;

ADST
ADSK
JMP
ADRB
ADSK
JMP

JHS I
RBCLDO
JHP
JMP

JM&_I
ITEST 27!

CLADBU:

ADSK
JHP
CAF
CLA
TAD
ADLE
ADRB
CIA
TAD

1233
1234
1235

1236
1237
1248
1241
1242
1243
1244
1245
1246

4523

7841

JMP
JMS I
CLADBU
JMP
JMP
JMS I

4445

1247

1231
5252

1258

5231

1251

4472

IMAINDEC~88-DJADA-C

825
826
827
828
829
838

1252
1253
1254
1255
1256
1257
1268

1261

831
832
833

1262
1263
1264

834
835
836
837
838
839

1265
1266
1267
1278

845
846
847
848
849
858
851

1041
137a

7455,

SNA

5210

JMP
JMS

4522
4524
5254
6887
4523

CLADBB:

4445

1253

CLADBB
JMP

5253
4472

JMP
JHS

JMS

ALL1S;

ERR
CLADBU-l
RBCLDO
TAL

INEXT TEST
ILOOP ADDRESS
IDONE?

.+5

THAT CAF CLEARS

4523

7841
1374
7458
5315
1272
5316
5272
4472

4474

1317
1328
1321

7288
1165

1322
1323
1324
1325
1326
1327

1373

3882

3836
6881
2836

5325
5333

FLAG

(UNIPOLARJ

ICDNVERT
IDONE 7

.-1
IINITIALIZE
IGET BIT 6
ISET UNIPOLAR
IREAD BUFFER

(48

(7888
ITEST

FDR

ERR

ICAF

FAILED

CLADBB-1
CLADBU
TAL

ILODP
IDONE

ZERO

.+5

THAT

CAF CLEARS

ADB

CLEAR

BUFFER

ADR

ADDRESS
7

DIAGNOSTIC

(BIPOLAR)

V142A

PAL18

23-MAR-76

SETUP
ICONVERT

IDONE

0-1
IINITIALIZE
IREAD DATA

(7888
I88
IYES
ICAF

ERR

FAILED TO CLEAR

INEXT

ALLIS-I
CLADBB

ADR

REG.

TEST

ILOOP

TAL

IDONE

BUFFER

VALUE

?
1777

SETUP

ICDNVERT
IDONE

.vl
(488

IGET SWITCHES
IMASK
IBIT SET 7

JMP
CLA

ALL1SA

IND, BYPASS THIS TEST

TAD
ADLE
ADRB

(48

ISET

BIT

ILOAD UNIPOLAR
IREAD

DATA

CIA
(6888

.+S
I

ALLIS
JMP

ALL1SA;

JMP
JMS

ITEST 321
1316

AND
SNA

TAD
SNA
JMP
JMS

4445

861
862

ADB

DONE

SETUP

LAS

7288
1377
4526

855
856
857
858
859
868

ADST
ADSK
JMP

DONE

IREAD BUFFER 8 CL EAR DONE
IDID DONE CLEAR?
IYESa
INO; ADRB FAILED TO CLEAR

.+S

5271

5315

852
853
854

874
875
876

ICONVERT
IWAIT FOR

0'1

HULTIPLEXER

JMS I
ADST
ADSK
JMP
CAF
ADRB
CIA
TAD

4474

4522
4524
5273
4553
8375
7458

844

871
872
873

TEST

CONVERTER,

4474

843

863
864
865
866
867
868
869
878

A/D

38!

FLAG

DONE

SETUP

ITEST 31: TEST ADB DATA
IEXECUTE ONLY IF SH 3 =

848
841
842

THE

CLEARS

SNA

5251

ITEST

822
823
824

TEST

JHS I
ADST

1238

IDONE 7
ADRB

TEST

JHS

TST3I

CLA
TAD
DCA
TAD
DCA
ION
I32
JMP
JMP

ERR

TST3-1
ALLIS
TAL

FOR

IADD #
IEOUAL 7
IYES
INO, OPERATOR
IBUT THE DATA
INEXT TEST

SAID
READ

ILOOP
IDONE

INTERRUPT

REQUEST

TEMPA

ILOAD
ITURN

COUNTER

TEMPA

IDELAY

UNEXPECTED

SETUP

[TST3S
RETURN

('18

0-1
.+4

INT

ALL
WAS

1'5
NOT

JUMPER

1777

HAS

INSTALLED

x4414454-4a-DJADA-C

444

:32

133: 5:13

474

479

1317
5337
4442

1334

4472

1337

4474

:33

344

1341

7244
4522

494

1342
1343
1344

4524
5342
1144
3442
1454
4524
4441
7444
4442
4445

553

7573s.

4445

1334
1331
1332
1333

477

ERR

JMP

444147-1

:2;

3E0

303!

OFF

x7444 IN7

7s73
741

PAGE

IUNEXPECTED INTERRUPT OCCURRED

JMS I
7873

JMP
444

11702

23-444-74

v1424

R4114

MULTIPLEXER 4144444714

4/4 cONVER7ER,

x1449

4444

4-4

OONE

884

:22
447

491
492

493
494
495
494
497
494
499

944
941
942
943
944
945
944

947
944
949
914
911
912
9

77257

1345
1344

1347
1354
1351
1352
1353
1354
1355
1354

1357
1344
1341
1342
1372
1373
1374
1375
1374
1377

331

4457
44s4
442
744
444
744
4412
ION
NO?
IOF
J45 I

1344

41444

915
914
917
914
919

/414

ERR

924

921
922
923
924
925
924

927
924
929
934

1447
1414
1411
1412
1413

932
933
934

JMP
JMS
JMP

4472

5772'

ICLEAR NORLD
DONINT
TIL
ERRIN7-1

1444
7774
4444
4444

7444
4444
140%

PAGE

4474
7244

341

ERRIN7.

1143
3442
4522

OENzR4IE

144 I
414
744
444
4457

4522

4457

4524
5244
4525

4444

5214
7344

4415

1424
1425
1424
1427

HERE

IDONE?

/714144 ERROR?

41444

744

4524
4441
7444

934
937
934
939

FLAG

414 CLL

1415
1414
1417

5234
4524
7414
5241
4472

ICAUSE ERROR

.-1

R44

1423

714144 ERROR

[7441

.-1

1454

4442
4445
1441

4174

RETURN

4454
442

7414

1424
1421
1422

INTERRUPT

SETUP

JMP

1414

935

INTERRUPT

ERRIN7 - 1

4441

5344_

IMAINDEC-GB-DJADA-c
931

447

£4441E

SK?

/7257
1444
1441
1442
1443
1444
1445
1444

INTERRUPT

11444

914

ROIN7ER

/RE7URN

RE74RN

4441.

4524
7414

ICONVERT
IDONE?
/w417

.-1
14441

344147

5772'

F144

4I74

INTERRUPT

GENER47E

3::

DON INT .

11444 INTERRUR7
/147 ON

ION

E44411

NOP

4/4

444VER7ER,

4UL7IRLExER

IOF
44s

414444s714

ERR

R4114

/IN7

OFF

x414

No7

VI424

23-44R-74

11142

INTERRUPT

ERRIN7
JMP

7441.

4474-1

4441
542
JMP
444

/41E4R

44R14

ERRINT
741

I
‘

944

941
942
943
944
945
944
947
948
949
954

951
952

953
954
955
954

957
954
959
944
941
962

943
944

945
944
997
968
949

974
971
972
973
974

975
974
977
974
979»

/7Es7
1434
1431
1432
1433
1434
1035
1036
1437
1444
1441
1442
1443
1444
1445

1444
1447
1454
1451
1452
1453
1454

1455
1454
1457
1444

1441
1462
1443
1444

1445
1444
1447
1470
1471
1472
1473
1474

4474

7344
1142
3411
4524
7260

4474.

AUTOla

1411
3434

351

AUTO-INCREMENT
SETUP
443 I
414 411
744

[4441-1

444
4441
CLA
TAD I

411

444
744
444

1434
7444
3437

444

1433

744
441E

4524
1036
4521

4522
4524
5254
4527

7450

TEMPA

4414
4447
4454
JMP

.-1

5247
4445

1431

5231
4472

ICHECK

417

IF 4444421

4px

REG

INCREMENTED

17741
/IF 444NNE1 17 SKIP
x44244 FOR CHANNEL N+1

414

TEMPE
TEMPC

.+4

SZA
JMP

442
142
JMS

/447O-INCRE4EN7

117

444 I
4474
JMP
744

5275
1444
7440
5235
7414

/1444 ENABLE REG
ICHANNEL N
x1444 4px REG
/474R7 CONVERSION
/N417 FOR
/OONE F144
/RE44 47474s
x4444 447 411 447

TEMPC
TEMPA

DCA
744
744

AUTOZ,

ICHANNEL

All
TEMPA
75494

TAD

524
744
744
SNA
JMP

7Es7

72424
545

44Rs
444

4141
3049
1434
1144
7444
1437
1444

444E

ERR

/4R444

CHANNEL

ILAST
x44

CHANNEL?

74714-1
72424
44741
4474

741

944

941
942
943

/7247

944

1475
1474

4474
7344

945

1477

1377

74714.

341

ROUTINE 74 44:44
444
SETUP
414 411
744
(-7

7447

CONVERSION 444 BE

4445

MICROSECS

F44E

1-17

SEQ

0032

(MAINDEC-DS-DJADA-C A/D CONVERTER,
999

1599

997

1591

999
999
999

1592
1593

991

1595
1599
1597
1519

992
993
994
995

999
997
99a
999

1594

1511
1512
1513
1514
1515

3935
4529
4522
2935
5393
4524

MULTIPLEXER DIAGNOSTIC

DCA
ADCL
AOST
Isz

TEMPO

JMP

.-1

ICLEAR

5314
4445

23-MAR-76

11802

PAGE

1-18

SE016D33

ALL 1991c
CONVERSION

/START

/CONVERSION MADE

MICROSECS.?

/NO

JMP
ans 1
TST14
JMP
JMP
JMS I

1479
5779'
5279
4472
5779'

VIOZA

TEMF9

ADSK
SKP

7419

PALIO

JMP

IYES
/TIME

.+5
ERR

OUT

ERROR

TIMDIF-1
TST14
TAL
TIMDIF-1

1999

1991
1992

1579
1577

1999
7771
1999

PAGE

1993
1994

ITEST

371 ENSURE A TIMING DIFFERENCE EXISTS BETNEEN
/SAMFLING ON CURRENT CHANNEL AND SAMPLING
ANOTHER CHANNEL

1995
1999
1997

/ON
_

1999
1999
1919
1911
1912
1913
1914

1999
1991
1992
1993
1994
1995
1999

1915
1919
1917
1919
1919
1929

1997
1919

1921
1922
1923
1924

1925
1929
1927
1928
1929
1939
1931
1932
1933
1934
1935
1939
1937
1939
1939

1911
1912
1913
1914

1915
1919

1917
1929
1921
1922
1923

1924
1925
1929
1927
1939
1931
1932
1933
1934
1935
1939
1937

4474

4553
9991
7959
5325
1777'
3227
1777'
3259

1779'
3255
4529
4522
3949
3941
4524

4529
9991
4522

7991
7991
7991
7991
7991
7991
7991
7991

1941
1942

1943
1944
1945
1949
1947
1949

1949
1959

1951
1952
1953
1954
1955
1959
1957
1959
1959
1999

FINISA
VADST
COD1
VADST
C093

/RETURN

DCA

COD2

1944
1945
1949

1947
1959
1951
1952
1953
1954

1955
1959

4522

1957
1999
1991

7991
7991
7991

1992
1993

7991
7991

1994
1995
1999

5257
4475

4514

1974

7492

1975

3941

1979
1799

4523
7399
1949

1791

7941

1792
1793
1794
1795
1799
1797
1719

1941
7459
5312
7519

1997

1977

1711
1712
1713

ADST
DCA
DCA
ADSK
JMP

CODI.

TIHLlo

5317
5291

1717
1729

4773'
5772'
4553

1721
1722
1723

TESTS

ISYNC
[CONVERT
/CLEAR

TEMPC
TEMPD

[TIMER
zwAIT FOR

DONE

.-1

TAD
DCA
TAD
ADLE
ION
ADST
IAC
IAC
IAC

(TIMI
RETURN
K1999

/GET

RETURN

INTERRUFT

IGET BIT 2
/ENABLE INTERRUPTS

/CONVERT

AND

START

TIMER

IAC
IAC
IAC
IAC

CONVERTER,

COCALC.

TIMI.

MULTIPLEXER

TIML1

CBERR
RLT
DCA

V142A

PAL19

23-MAR-79

/LOOP

ICE/DONE INTERUPT FAILED.
/DONE INTERRUPT FAILED
/CLEARs

FLAG

DONE

CLL

TAD

DCA

COD2.
C093.
TIML2.

DIAGNOSTIC

TEMPC

ADRe

CLA

CLA CLL
ION
ADLM
ADST
IAC
IAC

(TIM2
RETURN
IAC

[SET

INTERRUPT

RETURN

/AC:1

ILOAD Mux
/CDNVERT CM1

IAC
IAC
IAC
IAC
IAC
IAC
IAC
IAC
JMP

COCALD.

TIMLZ

caACTv
COERR

ILOOP

/C9/

HLT

TIMz,

DCA

TEMPO

/CLEARS

ADRO

DONE

FLAG

CLA CLL
TAD
CIA
TAD
SNA
JMP

TEMPC

IGET CH9 TIME

TEMRD

/NEGATE
/ADD CH1

TIMERR

IDIFFERENCE?
/NO, ERROR

SPA

TIMERR,

4472

9929
7949

LOGIC

59c

1952
7599
5319

1714
1715
1719

TIME

ADCL

5312

4445
1991

BEGINNING

VADLM

C9ACTv

1972
1973

1991
1992
1993
1994

/CHECK PROCESSOR CYCLE

4475
4514
7492
3949
4523
7399
1374
3992
7391
9991
4521

1971

1999
1999

K299

1943

1979

1979
1977
1976
1979
1989
1991
1992
1993
1994
1995
1999
1997
1999

CLA

SETUP

JMP
TAD
DCA
TAD
DCA
TAD

IAC
IAC
JMP

1999

1997
1999
1999
1979
1971
1972
1973
1974
1975

SNA

7991
7991
5239

1995

1993
1994

1949
1941
1942

7991
7991
7991
7991
7991

1991
1992

A/D

JMS
LAs
AND

ADCL

5217
4529
1375
3992
1959

lMAINDEC-flS-DJADAac
1949

TIMDIF.

FINIS.

ICHB

TIME

CM1
ERROR

JMP
TAD
SMA
JMP
JMs I‘
TIMDIF
MR
JMP
JMs I

ERR

FINIS
TIMDIF
TAL

INITMIN 2
IVES. ERROR
/NO
INO TIME DIFFERENCE
ITES
INEXT TEST
/LOOP
IDONE?

JMS
JMF

NEXTIO
INITM

ICHANGE IOT'S
xRESTART IF MORE

399

ISHITCH SET TO DELETE
[TYPEOUT OF END LOGIC TEST

TIMERR
M2

.95

IVES.

LAS
AND

82A

CLA

11192

FAGE

1-19

SEQ

230341

1095
1096
1097
1098
1099
1100
1101
1102

1724
1725
1726

1727
1730
1731

JMP
JMS
XEND
CBACTV
caPAss
JMP

5327

4771'

FINISA.

5417
4475
4502

5772'

11:02

23-MAR-76

v142A

FAL10

DIAGNOSTIC

MULTIPLEXER

,MAINoEc.@a.DJADA-C A/D CONVERTER,

PAGE

1-20

SEQ

0035

PAGE

1-21

SEQ

0036

.+3
MESAGE

BEGINNING

/RETURN

INITM

TESTS.

LOGIC

1103
1104

IROUTINE

1105

DISPLAY CONVERTED
CLEAN

4770'
4520
3035
4553

ADCL
DCA
LAs

TEMPO

1736
1737

3154
1154

DCA
TAD

CSSVSR
CBSVSR

1114

1740

K40

1741

0060
4526

AND

1115

1107
1108
1109
1110
1111

1112
1113

1120
1121
1122
1123
1124

1125
1126
1127
1124
1129

1154

TAD

1743
1744
1745
1746

4521
4522

ADLM
AOST
ADSK
JMP
ADRB
152
JMP
152
JMP
DCA

1747
1750
1751

5345~
4523
2035

1135
1136

1137

/C8/SAVE
/C8/

CBSVSR

.-1
TEMPO

/IN

.-1

I33

MILLISECDNDS

.-1
IEMPO

TAO

CSSVSR

1756

0031

543

1757
1760
1761

AND
SNA

5365

FOR

TEMPC
ICHECK

LAS

DESIRED

HALT

/C8/CHECKIF

DESIRED.

HALT

CLA

JMP
TAD

1040

REG

IDONE?
[WAIT
IREAD A-D BUFFER
ISTALL TO DISPLAY
ICONVERTED VALUE

1154

7650

817

/C8/
ILGAD MPX
ICONVERT

1755

/*CB*/

SR.

UNIFOLAR

ILOAD

5350
2035
5352
3040

1130

1131
1132
1133
1134

/LoAD CHANNEL

1753
1754

1752

IOTs

NORLD

LAs

1742

4524

IN AC.
IINITIALIZE

VALUE

/CLEAR

ADLE
/*C8*/

1116

1117
1118
1119

CONVT.

JMS

1732
1733
1734
1735

1106

.+5
TEMPC

1133

1139
1140
1141
1142
1143
1144
1105
1146
1147
1148
1149

1762
1763

4475

4514

1764
1765
1770
1771
1772
1773
1774

7402
5332
3000
2322
0222
3016

1158
1159
1160
1161
1162
1163
1164
1165
1166
1167

Ice/TYPE

'CDNTROL

/C8/THIS

NOT

E' IF NOT
ERROR

1775
1776
1777

HLT
JHP

IPRESS
/LO0P

CONVT

CONTINUE

PAL10

V142A

NOT

DONE

1171
1172
1173
1174
1175
1176
1177
1178
1179
1180

1181
1182
1183
1184
1185

A/D

CONVERTER,

MULTIPLEXER

DIAGNOSTIC

23-MAR-76

2415
PAGE

IROUTINE
2000

EXTL'

2001
2002
2003
2004
2005

2006
2007
2010
2011
2012
2013

EXTI:

TO
JMS

CHECK FOR
CLEAN

CLA
JMS I
TAD
DCA
TAD
DCA
AOCL
LAS
AND
TAD
ADLE

EXTERNAL

FROM REAL TIME
IINITIALIZE IOTS

ENABLE

CLOCK

SETUP
NON

TEMPB
CLKNON
TEMPA

(40
$04

IIOT

CURRENT

IIOT OF CURRENT
ICLEAR ALL

A/D

CLOCK

ICHECK UNIPOLAR AND EXT'L
ILOAD EXTERNAL ENABLE
/LOAO
INTO ADC

COACTV

2014
2015
2016
2017

COCALFI

CBSNIT

ICB/
IGET

HLT
LAS

2020
2021

AND

AOLM
TAD
CLOE
CMA
CLZE

2022
2023
2024
2025

2026
2027
2030
2031
2032

CHANNEL

[17
(4540

CLSK

ILOAD CHANNEL FROM
ILOAO CLOCK ENABLE
ITRIGGER FROM RTC

IOCCURS

808-11
REG

OVERFLON

0'1

2033
2034

(-100
TEMPO
TEMPO

1186
1187
1188

2035
2036
2037

1189

2040

1190
1191

2041
2042

0V3

1192
1193
1194
1195
1196
1197

2043
2044
2045
2046
2047
2050
2051
2052

ERCOM

1198
1199
1200

ADJUSTING.

ADJUSTING

1646
2407

1168

1169
1170

DONE

1675

2000

1153
1154
1155
1156
1157

CSACTV
ceERR

IMAINDEC-08-DJADA-C

1150
1151
1152

CBCALE.

ISTOP

CLOCK

/TIME

OUT

6'1
ICONVERSION

1201

2053
2054

5262
1041

1202
1203

2055

7421

NOT

MADE

TEMPO

ISTORE CONVERSION

$02

/LOOP?

EXTTE
TEMPO

IHALT

IYES

WITH

[CB/ALSO

CONVERTED
MO

REG.

ENABLES

11:02

lMAINDEC-0B-DJADA-C A/D CONVERTER:
1204
1205

1206
1207
1206
1209
1210
1211
1212
1213
1214
1215
1216
1217
1218
1219
1220
1221
1222
1223
1224
1225

1226
1227
1228
1229
1230
1231
1232
1233
1234
1235
1236

1237
123a
1239
1240
1241
1242

1243
1244

1245
1246
1247
1248
1249
1250
1251
1252
1253
1254
1255
1256
1257
1258

2056
2057
2060

2061

4475

4514
7402
7000
7240

2062
2063
2064
2065
2066
2067

4532
7200
4520
1032
4526

2070

7240

2071

4535

2072
2073
2074
2075
2076

7200
4535

2077

2100
2101
2102

5276
4524
5306
4773'

5022

2133

5043

2134

5113
5132
5152
5177
5221

2140

2141
2142
2143
2144

5243
5243
5265
4270

2171

1266

2172
2173

2174
2175
2176
2177

A/D

1279
1280

1281
1282
1283
1284

1285
1286
1287
1288
1289
1290

1291
1292
1293
1294
1295
1296
1297
1298
1299
1300

.-1

2202

2207
2210
2211
2212
2213
2214
2215
2216
2217
2220

IIF

FLAG FOUND REPORT ERROR

0207

IRING BELL

PRLP
Ex71

MULTIPLEXER

DIAGNOSTIC

V142A

PAL10

23-0AR-76

2713
7700

PAGE

MOVE:

TAD

TAD
DCA

1600

3235

DCA

2200

152

MOVEA:

SNA

JMP
TAD
CIA
TAD
SNA
CDF

1376
7650

6211

MOVE

VARIABLE

MOVE
FADDR
MOVE
MOVE
TADDR

MOVE
MOVE
MCTR
MOVE
COF

TAD

7650

5223
1200
7041

2222

CLL
I

DCA
152

I32
TAD

1777‘

CLA
CBMOVB
MOVE

(CORESO
CLA
10

COMOVB:
2223
2224

3634

TAD
DCA

1633

LENGTH DATA

FIELDS

CLA

3233
2200
1600
3234
2200

2221

IGET "FROM
ISTORE

/GET "TO
ISTORE

ADDR"

AND

”MOVE COUNT"
/STORE
ISETUP FOR EXIT

IGET

I
I

FADDR
TADDR

IGET “FROM" WORD
ISTORE AT ”TO” LOCATION

2225

6201

CDF

ICB/DFIFLD

2226
2227
2230

2233
2234
2235

ISZ
182
IS!

2231

1306

2232

5213
S600

FADDR
TADDR
MCTR
MOVEA
MOVE

/+1 70 "FROM" ADDR
/+1 TO ”70' ADDR
IALL WORDS MOVED?
IND: RETURN
IVES: EXIT

1307
1303
1309

2233

0000
0000
0000

JMP
JMP

FADDR:
TADDR:
MCTR:

0
0
0

AND

ICBICONSOLE PKG ACTIVE?
IDS/SKP IF YES.
/C8/
ICE/IS BUFFER 'STORAG' BEING
ICB/
lCB/
/CO/SKP IF NO.
ICBIDFBFIELD 1.
/C8/

1301
1302
1303
1304
1305

2234
2235

CLOCK

ISUBROUTINE

2203
2204
2205
2206

FROM

E03041

5306
0000
3330
7772

0000
7300
1600

0030

ADC

E0307
E03010
E03013
E03014

4537

1272
1273
1274
1275
2200
2201

1070

THEN CLEAR
/CLOCK BUFFER To CHECK
/ERRONEOus sTART PULSE

OVERR
ERCO0

CONVERTER:

4360
4410
4477

4540
0040
3000
2200

320

ENABLE RE0

E03042
50304
E0301
E0302
E03025
E03026
E03027
E03030
E03032
E03033
E03034
E03035
E03036
E03037
E03037
E03040
E0303

4311
4232

IN 00.

E03011

4200

4765

0037

E03011
E03011
E03031

5065
5343

4732

2136
2137

4444
4444

2127

SEQ

ISET

ADSK
JMP
J03
E03022

TAD
J03
JMP
E0306
E0306
E0306
E0306
E0306
E03011

OVL:
ERMSG:

4444
4444

2130

2135

OVERR,

1046

4771'

CLOCK

/LOAo EXT'L ENABLE

JMP

NOP

2131
2132

1'22

(-6
TEMPC
TEMPC

AOCL
cLA

1265

1276
1277
1278

TAD
OCA
132

4644

2121

PAGE

304

4520
7200

2122
2123
2124
2125
2126

ICLEAR

ADLE
CLA 001
CLAB
CLA
CLAa

7000

2120

11802

lCLEARS ALL L0010

TAD

4334
4334
4334

23-MAR'76

ICBICONVERTED VALUE DISPLAYED
7v1105 10 1c,

CLZE
OLA
ADCL

2104
2105
2106
2107
2110
2111
2112
2113
2114
2115
2116
2117

2145
2146
2147
2150
2151
2152

1269
1270
1271

EXTTE:

1372

5210
4334
4334

V142A

PAL10

NOP
CLA 00A

2103

1261
1262
1263
1264

1267
1268

CBCALG:

3040
2040

IMAINDEC-06-DJADA-C

1259
1260

MULTIPLEXER DIAGNOSTIC

CBACTV
CBERR
HLT

MOVED?

11102

PAGE

1-23

,MAINoEc.ga.oJADA-O

A/O

/ERROR

1313
1314

1315
1316

1317
1318

1319
1322
1321
1322
1323
1324
1325
1326
1327
1325

1329
1332
1331

1332
1333
1334
1335
1336

2236
2237
2242
2241
2242
2243
2244
2245
2246
2247
2252

2251
2252
2253
2254
2255
2256
2257
2262

2261
2262
2263

5272
4553
2426

7712
5273
1417
3252
4322
7422

EOUT:

4322

5371
1236
1251

4775'
1144
7452
5267
4322
5374

2265

1145

2266
2267
2272

4775'

E0213.

EOUT2,

2321

7222
1372
7652
2372
4553
2227
7652
5325
1236
1251

2322
2323

4514

2271

1362

1363
1364
1365
1366
1367

2273
2274
2275
2276
2277
2322

2324
2325
2326
2327
2312
2311
2312
2313
2314
2315
2316
2317
2322

7422
4553

1364
1369
1372

3217
5717
7422

EXIT,
Ex171.

2236

2322
2323

2242

1375

2324
2325

A/O

1376
1377
1372

1379
1322
1321
1322
1323

1324
1325
1386
1387
1322

1329
1392
1391
1392
1393
1394
1395

1396
1397
1398
1399
1422
1421
1422
1423
1424
1425
1426

1427
1428
1429
1412
1411

2326
2327
2332
2331
2332
2333
2334
2335
2336
2337
2342

3341
1341

2222

MSROHT.

2222

TYREOH.

2351

2257
7452
5722
1255

SPA

5353
1373
5366

JMP
TAD
JMP
IA:
52A
JMP
TAD
JMP
IAc
52A
JMP

7221
7442
5362
1252

2362

7221
7442

2361
2362
2363
2364
2365
2366
2367

5366
1372

2372

2222

5365

4771'

MIR.

TAD
JMS
JMP

IND.

5742

1413

1416
1417
1418
1419
1422

2371

3332

2372
2373

2336
2242

2374
2375
2376
2377

3337
3131
3611
3432
2400

1421

PAGE

FOR

ERROR

PAGE

1-25

SEQ

0040

MESSAGE

OOTAL PC 4
ADDITIONAL

ADGA'S

/TYPEOUT IDT
IGET DEVICE OOOE
/TYPE IT

MESS
ORLF

IHALT
ISKIP

ERROR

SMITOH

ON?

/OS/

IHALT
8N2

WITH

/OVERRIDE

ERROR

P.C.

Ac.

LOOP?

OLA
EXIT!
I

ERTYP
EXIT
MSGPNT
M1

INC

MSORNT
EXIT

ERTYP

/YES

MULTIPLEXER

OMA
I

DIAONDSTIO

LOGIC

MESAOE
A12

MESAOE
I

A12

MSRGHT

TYPECH
MSRGHT
TYPECH
MESAOE+5

K77
I

MESASE
M42

.+3
1242
MTR

.+3
2215
MTP

.+3

TAD
JMR

1247

1412

1414
1415

11202

ONLY

SCOPE
ERTYP
M1

AND

7512

5366

/NO

FOR

SNA
JMP
TAD

2357

EOUT3

OLA

JMS
TAD
JMS
JMP

2341

2352
2353
2354
2355
2356

ITEST

RTR

4342
1341
4342
5327

2342
2343
2344
2345
2346
2347
2352

IPRINT

LAST

ROUTINE

TAD
DOA
Isz
TAD
DOA
TAD
RTR
RTR

7212
7212
7212

MESS

OLA

2322
1412

/OET

ERTYP

1722

3212

TIME

MESSAGE

ITYPE

7242

POINTER

ERTYP
M1

NON

HLT
Isz

JMP

ONE

TYPEOUT?

MESAOE

IND

CONVERTER,

MESAOE.

IYES
IGET

541

IMESSAGE

13;;

EOUTI

AND
SNA
JMP
TAD
TAD

AND
SZA
JMP
TAD
DOA
TAD
TAO
DOA
JMR

1217
1251

1373
1374

0039

IND

SOORE.

3317

5636

SEQ

OLA

HLT
LAS

1636

ISUPPRESS

Isz
LAS

CBACTV
OSERR

7642
5322

2321

1'24

MESAOE

CSCALHo

2232

ITYPE

sw2

MSGPNT

MESSAGE

ERROR

EOUTa

EOUT
MESAOE

JMS
OLA
TAD
SNA

EOUTI.

4475

/MAINDEC-08-DJADA~C

PAGE

IND

TAD
szA OLA
JMP
LAs
AND
SP6 CLA
JMP
TAD I
DOA
JMS
HLT
JMS
TXTPC
TAO
TAD
JMS
TAD
SNA

TXTIOT
TAD
JMS

4774'

2272

11302

JMP
JMS

1339
1342
1341

1342

23-MAR-76

v142A

PALIO

DIAGNOSTIC

ROUTINE

OLA

7642

2264

1343
1344
1345
1346
1347
1343
1349
1352
1351
1352

MULTIPLEXER

TYPEOUT

ERTYP.

2222
7222
1372

1337
1338

1353
1354
1355
1356
1357
1358
1359
1362
1361

CONVERTER.

K212
MTP
(336

PRLP
I

TYPECH

ERRORS

RAL12

v142A

23-MAR-76

[MAINOEC-08-OJADA-C

A/D

CONVERTER:

MULTIPLEXER DIAGNOSTIC

V142A

PAL10

23IMAR076

11102

PAGE

1-26

SEQ 0041

11802

PAGE

1'27

SEQ

1422

1423
1424
1425
1426
1427

[IOT
2400

2401

0000
6530

1426
1429

2402

5600

1436
1431
1432
1433

2403
2404
2405

4475

1434

2406
2407

1435
1436
1437

3410

4514

SUBROUTINES

XXADCL!
VADCL:

0000

COERR
HLT

XXADLM:
VADLM'

2411
2412

4475
4514

2413

7402

2414
2415

0000
6532

2416

5614

1446

2417

4475

1447
1448

2420
2421

4514
7402

COCALLI

XXADRBI
VADRB,

1436
1439

1446
1441
1442
1443
1444
1445

[CLEAR ALL

A/D

LOGIC

XXADCL

CBACTV

CBCALJI

7402

6531
5606

0
6530
J"? I

CBCALK'

XXADST'
VADST,
'

6531
J"? I

[C8/

[LOAD MPX REG
XXADLH

COACTV
COERR
HLT
0
6532
J"? I

[CB/

[START CONVERSION
XXADST

COACTV
CBERR
HLT

[C8[

1449

1456
1451
1452
1453
1454

1455
1456
1457

1456
1459
1466
1461
1462
1463
1464
1465
1466
1467
1466
1469
1476
1471

1472
1473
1474

1475
1476

2422

0000

2423
2424

6533
5622

2425
2426
2427

4475
4514
7402

2430
2431
2432
2433
2434

0000

2435
2436
2437

4475

2446
2441
2442
2443
2444

2445
2446
2447

6534

COCALHp

XXADSKI
VADSK,

7410
2230

5630

4514

CBCALN;

7462
0000
6535

XXADSE'
VADSE6

7410
2240
5640

4475

4514

COCALOI

[READ A-D BUFFER
XXADRB

COACTV
COERR
HLT

[C8]

6534
5K?
132
JMP I

[SKIP

A-D

AID

DONE

XXADSK
XXADSK

COACTV
CBERR
HLT
0
6535
SKP
ISZ
JMP I

[C8/

[SKIP

TIMING ERROR

XXADSE
XXADSE

COACTV
CBERR

[C8[

HLT

7402

[HAINDEC-08-DJADA-C

6533
JMP I

A/D CONVERTER;

HULTIPLEXER

DIAGNOSTIC

V142A

PAL10

23-MAR-76

1477
1478

2450

0000

XXADLE'

1479
1466

2451
2452

6536

VADLE'

5650

6536
JHP I

>[LOAD

A/D

ENABLE REGISTER

A/D

STATUS REGISTER

XXADLE

1461

1482
1463
1484
1465
1466

1467

2453

4475

2454
2455

4514
7402

CBCALPI

2456
2457
2460

0000

6537

XXADRS:
VADRS,

5656

CSACTV
C8ERR
HLT
0
6537
JMP I
.

2461

4475

2462
2463

4514
7462

COCALOJ

CBERR
HLT

2464
2465

0000
6132

XXCLOEI
VCLOE;

2466

5664

2467

4475

2470
2471

4514
7462

2472
2473
2474
2475
2476
2477
2500

[C8/

[READ
XXADRS

COACTV

6132
JMP

COCALRp

[C8/

[LOAD CLOCK ENABLE
I

XXCLOE

COACTV
CBERR

[COI

HLT
XXCLSK'
VCLSKr

CBCALS'

6131
SKP
ISZ
JMP I

[SKIP

CLOCK

OVERFLOH

XXCLsK
XXCLSK

COACTV
COERR

[C8/

HLT

2501
1511

1512

2502
2503
2504

XXCLZEI
VCLZE:

2505

2506

COCALTI

2507

2510
2511
2512

CBCALUI

2516
2517

XXCLEDI
VCLED:

[ONES

IN AC

CLEAR CLOCK ENABLE REG

XXCLZE

COACTV
CBERR
HLT

[C8/

6135
J"?

2513
2514
2515

2520

1531

XXCLSA'
VCLSA,

0_
6130
JMP I

[CLOCK STATUS
I

AC:

XXCLSA

CBACTV
COERR

[CS/

HLT
0

6134
J"? I

[CLOCK ENABLE 76 AC
XXCLED

ONES

CLR

CLK STATUS REG

0042

2521

4475

2522

2523

4514
7482

COCALVI

1534

CBERR
HLT

8888

XXCLABI
VCLAB:

1537
1538

2524
2525
2526

6133
5724

23-MAR-76

11:92‘

PAGE

1-28

SEQ

8843

11882

PAGE

1'29

SEQ

8844

caACTV

1532
1533
1535
1536

V142A

PAL18

lMAINDEC-88-DJADA-C A/D CONVERTER: MULTIPLEXER DIAGNOSTIC
/C8/

lAC

6133
JMP

ONES

CLOCK BUFFER

XXCLAB

1539
2527

4475

2538

4514

2531

7482

2532
2533
2534

8888

2535
2536

2537
2548

2541

XXDISDI
VDISD:

CGACTV
CBERR
HLT

4475
4514
7482

CBCALXp

CBACTV
CBERR
HLT

XXDILXI

VDILX;

6853

2545
2546

4475
4514.

2547

7482

J"?

5742

VDILY;

6854

2553

4475
4514

JMP

CBCALZ'

2563

7482

2564

8888

2565
2566

6856
5764

2567
2578
2571

4475

ILOAD

SCOPE

Y-AXIS

XXDILY

COACTV
CBERR

/C8/

HLT

7482

uu75
«514

2561

lCB/

HLT
XXDILY'

2562

X-AXIS

/LOAD SCOPE
XXDILX

CSERR

oesu
5750

8888

DONE

CBACTV

CBCALYI

8888

6855
5756

DISPLAY

/C8/

2558

2556
2557

XXDISD
XXDISD

2551
2552

2568

/SKIP

6852

2332
5732

8888
6853

lCB/

SKP
ISZ
JMP

7418

2542
2543
2544

2554
2555

1576
1577
1578

6852

CBCALN'

XXDIXYI
VDIXY:

IINTENSIFY

6855

J"?

SCOPE

XXDIXY

CBACTV
C8CAL8!

CBERR

/C8/

HLT

1579

1588
1531
1582
1583
1584
1585
1586

usxa
7422

XXDILEI
VOILE:

ILOAD ENABLE FROM Ac. CLEAR Ac

6856
JMP I

xxoxLE

CBACTV

CSCALII

lCS/

COERR
HLT

MULTIPLEXER

/MAINDEC-88-DJADA~C A/D CONVERTER;

DIAGNOSTIC

PAL18

V142A

1587
1588

1589

2688

PAGE

1598
TO

/ROUTINE

2688

8888

2681

4553
8838

2682
2683
2684
2685
2686

2687
2618
2611
2612
2613
2614

XTALI

4553
8833

XTAL3I

2617

TAD
SZA
JMP

2621

XTALZ,

DCA
TAD
DCA
TAD
TAD
DCA
JMP

8H5

ITEST

SELECTED?

IDONE
/NO
/YES

WITH

XTAL1
ERSNIT

OVERRIDE?

TEST?

ICHECK FOR ERROR
IERROR THIS PASS?
IND
[GET MESSAGE POINTER
/DECREMENT POINTER
IRESTORE POINTER

CLA
XTAL2
MSGPNT

M1
MSGPNT
M1
ERSHIT

IRESTORE ERROR INDICATOR
ISET RETURN ADDRESS

XTAL
M2

'ISTORE RETURN ADDRESS

XTAL
XTAL

ISZ

IPOINTER

JMP I
XTAL
FOR SELECTED

XTEST:

ENA2-1

MSGPNT

ENA3-1

ENA4-1

2652
2653

IYES

XTAL3
TALLY

2633

2651

ILOOP

XTAL1

CLA

2634
2635
2636
2637
2648

2642
2643
2644
2645
2646
2647
2658

ITERATION

882

XTAL1:

2631

2641

COMPLETED

TAD
TAD

2628

2632

TEST

AND
SZA
JMP
LAS
AND
SZA
JMP
ISZ
SKP
JMP

2615

2638

LAS

2616

2622
2623
2624
2625
2626
2627

CHECK

ENAS-l
ENA6-1
MUX8-1
MUX9-1
MUX18-1
MUX11'1
TSTADC-l
TSTCAF-I
TSTJAM-l

TSTDON-I
TSTERR-I
TSTSR8-1
TSTSR1-1
CLRDON-1

CLRERRO1

TEST

OPTION

23-MAR-76

lMAINDEC-OS-DJADA-C A/D CONVERTER:
1642
1643
1644

1645
1646

1647
1648

1649
1654
1651
1652

2654
2655
2656
2657
2660

2661
2662
2663
2664
2665
2666

1653

2667

1654

2670

2671
2672
2673

DIAGNOSTIC

MULTIPLEXER

PAL10

V142A

23-MAR-76

11102

PAGE

1-34

SEQ

0045

11102

PAGE

1-31

SEQ

0046

STCLDO-1
STCLER-l
EOCERR-I
NOERCL'1
RBCLDO-1
CLADBU-1
CLADBB-1
ALLIS'1

1021
1036

1056
1200
1213
1230

1252
1271

1337

TST3-1
DDNINT-1

1400

ERRINT'1

1316

AUTO-1

1430
1475

TST14-1
TIMDIF-1

1600
10000
0000
0000
0000

IROUTINE TO SELECT SPECIFIC LOGIC TEST SUBROUTINE
0000
4553

0
LAS
AND
DCA
TAD
TAD
DCA
TAD

XSELECI

0377
3035
1376
1035

3312
1035
1375
1051
3017
5712
0000

/GET

JMPLOC
TEMPO
(ERMSG

TAD
TAD
DCA
JMP

M1
HSGPNT
I

HANDLER

TAD
740

DCA
740
004
ISZ

1688
1689

LAS

1690

JMP
JMS

JMPLOC

FOR

OPEN

1694
1695
1696

TXTPC
740

ERPC

1705
1706
1707
1708
1709
1710
1711
1712
1713

1714
1715
1716
1717

1715
1719
1720
1721
1722
1723
1724

2741
2742
2743
2744
2745

4772'
4774'
5411
1037
4772'
4773'

5357

ans
L45

CRLF

4N0
s~4
JMP

ISZ
740

7421
4514

LIST

ERROR
ADDRESS

MESSAGE

IPRINT

$41

V1424

PAL10

/PRINT

OCTAL PC

IPRINT

TEMPA

IPRINT

TEMPA

IPRINT

TEMPE

IPRINT

TEMPE

23-MAR-76

113

HALT-ON-ERROR
/N0-RETURN

SWITCH SET?

ERCLR
ERCOM
ERPC

MQL

IGET “AFTER HALT"RETURN
/ERROR PC IN 4c

/C8/(ALSO

400REss

REG.)

ca4c7v
ceERR

ERCLR,

CLA

CLL

DCA
JMP

lCB/

HLT

5713
4666

MESSAGE

/ERR0R

0140403710

CLA

cac4La.

7402

7346
3362

MSG.

IINHIBIT TYPEOUT?
lYES-SKIP OVER

TEMPA
MESS
MESAGE
TEMPB
MESS

1362

4475

ERROR

IGET

MESS
MESAGE

740
JMS

2313

2754
2755
2756
2757
2760
2761
2762

2773
2774
2775
2776
2777

ERcou1.

7650

2753

2772

1730

JMS
7x74
740
JMS
ans
7x75

2746

1726
1727
1728

1729

4774'

2747
2750

1725

HULTIPLEXER

JMS

4553
4427

2751
2752

A/D CONVERTERy

4772'

1036

/400REss

ERCOM1
MESAGE

CRLF
MESAGE

5403

IBEGIN ADDR.

LIST

TESTS

MSGADR,

2733
2734
2735
2736
2737
2740

LOOP

ERCOM
M1
ERPC
ERCOM
MSGADR
ERCOM

ans
ans

1697
1698
1699
1700
1701
1702
1703
1704

TEST

/MSG. PTR. SET IN AUTOl7
IGO DO TEST

CLA

SPA

1691

[MAINDEC-08-DJADA-C

ERCOM,

1692
1693

IBEGIN ADDR.

JMPLOC:

/ERRDR

TEST

(37
TEMPO
(XTEST
TEMPO

ERRc.

ERRc
ERCOM

ICLEAR PC
IRETURN

STORE

4RE4

3131

PAGE

1731
1732

IIOT

REINITIALIZER ROUTINE

1733
1734

CLEAN,

CLA CLL
TAD
DCA

1735
1736
1737
1738

TAD
JMS
TAD

1739

1744

DCA
TAD
JHS
TAD
DCA
JMS
JMP

1741
1742
1743
1744
1745
1746
1747
1748
1749

1754

NEXTID:

CLKNOH
CSNOW

(CKIOT-1
SETCS
SCPNON
CSNON
(SPIOT-I

SETCS
FIRST
NON

SETIOT
CLEAN

/GET CLOCK IOT
ILOAD INTO CURRENT
ISTARTING ADDRESS OF CLOCK
IREINITIALIZE CLOCK IOT
/GET SCOPE IOT
ILOAD INTO CURRENT
ISTARTING ADDRESS OF SCOPE
IREINITIALIZE SCOPE IOT
IGET A/D
BASE IOT
ILOAD INTO CURRENT
/LOAD THE IOT'S
IEXIT

TABLE

/NAINDEC-88-DJADA-C
1751
1752
1753
1754
1755
1756
1757

3817
3828
3821
3822
3823
3824
3825

1758
1759

A/D CONVERTER,

MULTIPLEXER

CLA CLL
TAD
SNA
JMP
CIA
TAD
SNA CLA
JMP
TAD

7388
114a

7458
5234

7041
1145
7658
523a

1145
1375
3145

PAL18

V142A

ADDITIONAL

IOT'S

DIAGNOSTIC

IANY

AST

END

INO

NON,

IGET

ILAST

CURRENT
ONE ?

IYES

NON

NOW

IGET CURRENT
/UPDATE TO NEXT CODE
ISAVE IT

SETIOT

/CHANGE

IUPDATE RETURN

NEXTIO
NEXTIO

A18
A18

ISTARTING ADDRESS
IGET VALUE

SETCS
TENP8
TEMP8

/END OF TABLE?
RETURN
IYES
IND
IGET CURRENT IOT
IMASK

(18

NEW

11182

PAGE

1'32

SEQ

8847

1'33

SEQ

8848

CODE

IOT

END

TAD
DCA
JMS

23'MAR-76

IOT

SKP

END:

ISZ
JMP

SETCS:

DCA

SETCS1;

TAD
SNA

JMP
DCA
TAD

CKIOT;

AND

(7887

TAD

CSNOW
TEMP8
SETCS1

DCA I
JMP
VCLOE
VCLSK

IEXIT

TABLE

IREINITIALIZE IOT
ISTORE NEW IOT
/AC TO CLOCK ENABLE
ISKIP 0N CLOCK OVERFLON
/ONES IN AC CLEAR CLOCK

ENABLE REGISTER
ICLOCK STATUS TO ACI‘C ONES CLEAR CLOCK STATUS
ICLOCK ENABLE TO AC
/AC ONES TO CLOCK BUFFER

VCLZE
VCLSA
VCLED
VCLAB

REE.

SPIDT:

VDISD
VDILX

ISKIP

/LOAD

VDILY
VDIXY
VDILE

/LOAD

SCOPE
SCOPE

DONE
X-AXIS
Y-AXIS
SCOPE

DISPLAY

IINTENSIFY
ILOAD DISPLAY

ENABLE FROM AC

SETIOT:

CLA

CLL

CMA

A18
A18

NOP
NDP
TAD

SETIO1:
1799
1888
1881
1882
1883
1884
1885

3876
3877

TAD
DCA

3183

lHAINDEC-88~DJADA-C

1886
1887
1888
1889

1818
1811

1812
1813
181a
1815
1816
1817
1818
1819
1828

1821
1822

1823
1824
1825
1826
1827
1828
1829

5274
1372

3111
3112
3113
3114
3115

1778'

3116

3117
3128
3121
3122
3123
3124
3125
3126

2835

5311

JMP

SETIOZr

3818
1371
3835

SETIOS:

3418

5666

2481
2487

JMP

TABIOT:

2415
2423
2431
2441
2451
2457

3127

8888
8888

3138

8888

3131
3132
3133

1832
1833
1834
1835
1836
1837
1838

3134

IDONE

SETIOZ
TEMPO
TEMP8
(7887
NOW
TEMP8

MULTIPLEXER

ISAVE IT
IGET CODE
IMASK
IADD IOT CODE
/SAVE IT

DIAGNOSTIC

/LOOP
IGET POINTER

A18

(EOCER1-EOCER2

ILDAD AUTO-INDEX
IGET LENGTH

TEMP8
VADRB
A18
TEMP8
SETIO3
SETIOT

IGET READ
ISAVE IT
IDONE ?
/NO
IEXIT

VADSK

VADSE
VADLE
VADRS

OCTAL

NUMBER

8
ISAVE

MCOUNT

ICOUNTER

3135
3133
3137
3140

7188

CLL

1356
7884

TAD

3141

1356

3105
3146

8767'

MESSII

SKP
TAD

FOR

LOOP.

IROTATE

BITS

IROTATE

TO LOSE LINK

MWORD

RTL
RAL
DCA
TAD
AND

/*CB*/

MNORD

RAL

7418

BITS

MNORD
MNORD
K7
CHAR

TAD

3147

TAD

CHARA

ICB/

1847

3158

JMS

1848
1849

3151

ISZ
JMP

PRLP
MCOUNT
MESSI

IFINISHED PRINTING?
IND-GET NEXT CHARACTER

1858
1851
1852

3153
3154

TAD
JMS
JMP

BLANK
XPRLP
MESS

1845
1846

1853
1854
1855
1856
1857
1858
1859
1868

3152

3155
3156

MNORD.

3157

MCOUNTI

3166
3167
3178

3171
3172

3173

8
8

I
I

ROUTINE

CODE

HESS:

DCA

7886

IOT

ERROR

8
8

3357

7884
3356

BUFFER

FORCED

ALL A/D LOGIC
[LOAD MPX REGISTER,CLA
ICLEAR FLAGSOSTART CONVERSION
ICLEAR DONE, READ A/D BUFFER INTO AC
/SKIP ON AID DONE
ISKIP ON AID TIMING ERROR
/LOAD A/D ENABLE REGISTER
/READ STATUsaENABLErMPX REGS. INTO AC

MNORD
M4

3142

FOR

23~NAR-76

ICLEAR

DCA
TAD

3143
3144

V142A

PAL18

SETIOI
(EDCER1

VADCL
VADLM
VADST
VADRB

IROUTIME

1838
1531

1848
1541
1842
1843
1844

CONVERTER:
JMP
TAD
DCA
TAD
DCA
TAD
DCA
ISZ

8888
3356
1853

1839

A/D

3184
3185
3186
3187
3118

IGET SA OF TABLE
/SAVE IT
IGET A VALUE

(TABIOT

DCA
TAD
SNA
JMP
DCA
TAD
AND

IPRINT

BLANK

11882

PAGE

[MAINDEC-8898JADA-C

1861
1862

1863
1864

3174
3175
3176
3177

A/O CONVERTER,

1878
1871
1872
1873
1874

1875

1876
1877
1878
1879
1888
1881
1882
1883
1884

1885
1886
1887
1888
1889
1898
1891
1892
1893

1490

1099
1988
1901
1902
1903
1904
1905
1904
1987
1988
1989
1910
1911
1912
1913
1914

DIAGNOSTIC

PAL18

V142A

23-MAR-76

3857
3858
3288

1919
1920
1921
1922
1923
1924

1925
1926
1927
1928

3288

3281
3282
3283
3284
3285
3286

3287
3218
3211
3212
3213
3214
3215
3216
3217
3228

4777'
7300
1052
3042
3034
3037
4520
4553
0374
4524
4553
4521
4522
4524

3225
3226
3227
3238

5224
4523

3231

7041
1037
7510
7041

DELAY

AND

[CLEAR N AND
[N91 CONVERSION STORAGE
[CLEAR ALL LOGIC

(48

[CHECK UNIPOLAR;BIPOLAR

ADLM
ADST

[LOAD CHANNEL
[START CONVERSION
[WAIT FOR DONE

ADSK
JMP
ADRB
DCA
ISZ
JMP

0'1
[READ A-D BUFFER
[STORE NTH CONVERSION
[DELAY BETNEEN 13T82ND

TEMPA

DELAY

[START NEXT CONVERSION
[WAIT FOR DONE

ADSK
JMP
ADRB
DCA
TAD
CIA
TAD
SPA
CIA
SNA

7450

CONVERSIONS

0'1

ADST

CONT:

3037
1034

0'1
[READ

BUFFER

A-O

[SAVE DATA

TEMPB
TEMPA

[SUBTRACT

[SUCCESSIVE CONVERSIONS
TEMPB

IDIFFERENCE507

5244

xuo, TAKE ABSOLUTE VALUE
[DIFFERENCE 87
[YESo OK.

1051
7450
5244
4775'

M1
OK

4471
7000
5200
CLA

OK:

3034
4475

3251
3252

4515

CBINQU

3253

5223

JMP

[ROUTINE

CONVERTER:

ERCOM

[DIFFERENCE>1

MONOT

[RETURN

TEMPB

[N+1

TEMPA

CONT

[GET

LOCATION

AFTER

HALT1

CLL

1037

A/D

TEMPA
TEMPB

ADLE

4524

7300

IOTS

LAS

5221
4522

[INITIALIZE

ADCL
LAS

3254
3255
3256
3257
3268

3261
3262
3263
3264
3265
3266
3267

4777'
7388
1166
3835
4553
8376
4526
1838
4521
4522
4524
5266

NOISE:

TEST

EQUALITY

FOR

MULTIPLEXER

CONVERSION BECOMES

N91

CONVERSION

ADRB'S.

SUCCESSIVE

TWO

DIAGNOSTIC

JMS
CLA CLL
TAD
DCA
LAS
AND
ADLE
TAD

V142A

PAL18

CLEAN

[INITIALIZE

[-100

[SET

Z3-MAR-76

[CHECK UNIPOLAR ENABLE
[ENABLE DONE BIT
[LOAD MPX REG
[CONVERT
[DONE FLAG?
[NO
[YESp READ AD BUFFER
[STORE
[REcREAD
[STORE
[COMPARE FOR EQUALITY

DCA
ADRB
DCA

TAD

ER18:

ER117

CLA

[TEMPA=TEMP8
[NO

J
JMS

J
CLA
I

[ERROR

LINK

SET?

ROUTINE
IF
IF

FROM

[RETURN LOCATION
[RETURN LOCATION

NOT

MALT

CLL
[CONTINUE
[YES

1947
1948
1949
1958
1951

1955
1956
1957
1956
1959
1968
1961
1962
1963

WITH

[YES'O.K.

1944
1945
1946

1952
1953
1954

64 TINES

(48

ADST
ADSK

SZA

IOTS
FOR

5N2

JMP
ADRB

3278

TALLY

TEMP8

ADLM

NOISE1:

1934
1935

1942
1943

0049

CLL

TAD
DCA
DCA
DCA

5215

2042

CLEAN

CLA

4523
3034

3221
3222
3223
3224

3232
3233
3234
3235
3236
3237
3248
3241
3242
3243
3244
3245
3246
3247
3258

JMS

MONOT'

1929
1930
1931
1932
1933

1936
1937
1938
1939
1940
1941

350

PAGE

1915
1917
1918

010; 1.34

[MONOTINICITY'TEST

[MAINDEC-88-DJADA-C

1916

11102

8818

1865
1866

1867
1868
1869

MULTIPLEXER

7887

[RING BELL
[DO TEST AGAIN
[SCOPE

INSTR.

C8CALI0

LOOP

FOR

1078

6XXX.

[ACBA/HLT
CBACTV
CBSNIT
LAS
AND
TAD
DCA
MLT
NOP
JMP

[CS/SELECT
(8777
(6888
.91

IOT

[MASK OUT AC
[CREATE 107

8'2

[LOCATION OF IOT
[POSSIBLE SKIP
INSTR+1

[PRINT ROUTINE

PRLP,

TLS
TOP

[XMIT CHARACTER
[WAIT FOR FLAG

3'11.

11102

PAGE

1.35

SEQ

8858

970

:97;
19;;
i312
9

3333
3334

3335
3336

:37:

3:4? 035:

3342

§3§§

€333 353?

1983
1904

"5737

3345
3346

1987
1988
1909
1990
1991
1992

1993
1994
9

{392

1997
1990
1999
2000
2001
2002

2003
2004

2005
2006

2007
2008

2015
2016
2017

2018
2019
2020
2021
2022

2023

2025
2026
2027
2028
2029
2030
2031
2032
2033
2034
2035
2036

2037
2038

K215
PRLP

ICARRIAGE RETURN CODE

K212
PRLP
CRLF

ILINE FEED CODE
IPRINT ROUTINE
IRETURN

AND

JMS
JMP

WORKING

332%

XSETUP.

2056
2057

7773

3354
3355

6002
6007
72

$2;

(BADINT

DCA

RETURN

3360
3361
3362
3363
3364

7040
3070
3764

3372
3373
3374
3375
3376
3377

0005
6000
0777

S747
2370

3400
3401
3402
3403
3404
3405
3406
3407
3410
3411

3412
3413
3414

3415
3416
3417
3420

3421
3422
3423
3424
3425
3426
3427
3430

ICLEAR

XHOVE

RORK

AREA

IOF

3357 3302

3431
3432

3433
3434
3435
3436

IBAD

INTERRUPT

ADDRESS

CHA

DCA
DCA

KIND.

ERSNIT
XIND
XSETUP

I
I

JMP
IND

2713
0040
3000
3400

0000

PAGE

/C6/

****tt**t****ifittktitRt***iiti*ittttt*iti*iitttittttitttttitktttt

ICSI

ROUTINE

ICSI
COSTAR.

WITH

ICBI
ICO/
ICSIINIT

CBIZF

7650

TAD
SNA

4777'
1200
1376
1375
3216
4475

JMS
TAD
TAD
TAD
DCA
COACTv

AID

To ENSURE THAT THE PROGRAM Is INITIALIZED FOR RUNNING
WITHOUT THE CONSOLE PKG REGARDLESS OF THE START ADDRESS.

CLA

7200
1231

CONVERTER.

4507
1616
3217
5617

COSTRT.

0000
0000
0211

XCSSTA.
XCOSA.
COSTAS.

3317
1732
3200
3600
3254
3433

4000

ICOISKP

CLA
COIZ
COSTAR
(-201
(CSSTAB
XCBSTA

DONE?

ALREADY
IF YES.

ICOIGO INITIALIZE.
ICC/RELATIVE TO THE ADDRESS
ICO/
ICSI
ICSI

DISPATCH

ADDRESS

OF THE CALL.
THE PROPER STARTING
THRU TABLE 'CSSTAB'.

PAL10

V142A

DIAGNOSTIC

MULTIPLEXER

CSSNIT
TAD I
DCA
JHP I

23-MAR-76

11102

ICSI

IC8I

ISA

INSTR

ISA

ISA
ISA
ISA

ISA

200
201
202
203
204
205
206
207
210

ICC/NORMAL START.
ICBIIOT SCOPE LOOP OPTION.
Ice/DISPLAY CONVERTED VALUE
Ice/EXTERNAL ENABLE TEST.

OPTION.

.ICOIHONOTINICITY TEST.
Ice/ACCURACY

0000
0000

TEST.

ICOISUCCESSIVE READS TEST.
ICOIMPX NOISE TEST.
ICOILABO-A SYSTEM CHECK.

3443

0161

3444

3040
1040

3437

2070
2071
2072

3461
3462
3463
3464

3446

3447
3450
3451

3452
3453

3454
3455
3456
3457
3460

3465
3466
3467
3470

3471

0
0

lCB/

t*itiiittttti*tttitiitiittittiitit*t***t*ittttittittitfittittttti*

IROUTINE

GLITCH.

JHS

CHECK

FOR

CLEAN

NOISE

MULTIPLEXER
IINITIALIZE

1073

3440
3441
3442

3445

2076
2077
2078

4774'

INIT HAS BEEN DONE.
CONSOLE PKG IS ACTIVE.

CSIZF.
CBF.

ICOIIFI7777.
ICBIIF=7777,

4521
4522
4524
5250
4523
3036
4304
1322

4521
4527
2035
5254
7300
4523
3037
1036

CLA
TAD
DCA
LAs

CLL

[-100
TEMPS

AND
ADLE

(40

ICHECK

UNIPOLAR

IOPERATOR

LAs
AND
DCA
TAD

ENABLE

SELECT CHANNEL

[17
TEHPC
TEHPC

ADLM

CHNL1.

A057
ADSK
JMP
ADRB
DCA
JHS
TAD
ADLN
ADRS
152
JHP

CLA

.-1
TEMPA
RANCHN

IREAD

CLL

ADRB

DCA

TEMPS
TEHPA

TAD

7041

CIA

1037
7640

TAD
SZA

5273

JMP

IGET RANDOM CHANNEL

CHNL

TEHPO
CHNL1

TEHPS

CLA
ER40

ENABLE.

STATUS

ICSI
ICOI
ICBI
IC8/

XCBSTA
XCBSA
XCSSA

START

CONVT
EXTL
HDNOT
RESOL
NOISE
GLITCH
SYST

2000

7300
1166
3035
4553
0373
4526
4553

2050
2059
2060
2061
2062
2063
2064
2065
2066
2067
2068
2069

2073
2074
2075

0352

JHS I
TEMPO
TEMPA
-5

2043
2044
2045
2046
2047
2040
2049
2050
2051
2052
2053
2054
2055

SEQ

BUFFERS PRIOR TO TEST

0000
4462
0035
0036

2039
2040

PAGE

ROUTINE

IPRINT

CHA

3347
3350
3351
3352
3353

IMAINDEC-OO-DJADA-C
2024

JMS
CLA

IRDUTINE TO CLEAR

2009
261%
2011
2012
2013
2014

4330

:33:

:LA CMA
AND

4330

1900

0051

RETURN LINE FEED ROUTINE

ICARRIAGE
CRLF.

0000
7 4

3337

SEQ

’RETURN

PRLP

JMP

1976

PAGE 1'26

FLAG

ICLEAR

EE:

1977

11102

-'1

J"?

5332
6042
7200
5730

23-NAR-76

V142A

PAL10

MULTIPLEXER DIAGNOSTIC

AID CONVERTER.

/H11NoEc-08-DJADA-C

AND

HPx

1-37

(MAINDEC-08-DJADA-C A/D CDNVERTERp
2079

2080
2081
2082
2083
2084
2085

3472
3473
3474
3475
3476
3477
3500

5276
4772'
4706
7000
7300
1an

ER40p

0V2:

4771'

MULTIPLEXER DIAGNOSTIC

JMP
ova
JMS
ERCOM
Enscaa
NOP
CLA CLL
TAD
K207
ans
PRLP

PAL10

INOISE

V142A

23-MAR-76

11102

PACE 1-33

see

ans:

MULTIPLEXER

IRETURN ADDR.

AFTER HALT

2086

2067

2088
2069
2090
2091
2092
2593
2094

3501
3502

4475

4515

COACTv
caINOU

3503

5233

JMP

0000

RANCHN.

TAD
RTL
DCA
TAD
TAD

1320
7006

“fin-IV
GLITCH

FSTNO

FSTNO
FSTNO
SECNO

RTL

FSTNO,
SECNO.
CHNL:

TAD
RTR
AND
DCA
JMP I
0437
2525

SECNO

[17
CHNL
RANCHN

ICO/
/ca/
/CO/
/ca/

1
2
3

ICE!
lCB/

/C8/
Ica/
/ca/
/CO/
/C8/
/C8/
/CB/
/CB/

K7,

0000

7
10
11
12
13
14
15
16
17
0

/CB/
/CO/

/ca/

3330

2713
0040
3000

3575
3576
2133

3577

3420
7577
7000

/MAINDEC-08-DJADA-C A/D CONVERTER:

MULTIPLEXER

DIAGNOSTIC

3600

PAGE

4777'

IRESOLUTIDN ACCURACY TEST
IROUTINE TO PERFORM 1000(10)
JMS
CLEAN
RESDL,

2134
2135
4474

JMS
TAD

1063

DCA
DCA
JMS

3011
3776'
4462
5600

SETUP

XSTDR
A11
STDRAG
XMOVE

PAL10

ANY GIVEN
IOTS

CONVERSIONS OF
IINITIALIZE

ICLEAR

V142A

NORK

23-NAR-76

VOLTAGE

11:02

SELECTED

PAGE

1-49

sea

oasa

CHANNEL

AREA

STORAG

STORAG+1

5601
6030

“1750

CERESO:

ICB/

1157

TAD

['1750

3035
4520
4553

DCA
ADCL

TEMPO

3154

DCA
TAD

CBSVSR
CBSVSR

ICC/SAVE
/C8/

AND

(40

ICHECK

LAS

1154
0375
4526

SR.

UNIPOLAR

ENABLE

ADLE
/*C8*/

LAS

IGET

CHANNEL
‘

7200

CLA

1154

TAD

0161
3071
1071
4521
4522
4524
5230
4523

AND
DCA
TAD
ADLM
ADST
ADSK
JMP

RESDL1:

/ca/

CBSVSR
[17
CHAN

ISTART
ISKIP

CONVERSION
ON DONE

.w1

1036
3411

TAD
DCA

6201

CDF

7640

CHANNEL

ILOAD CHANNEL

6211

1774'

[STORE

CHAN

ADRB
DCA TEMPA
TAD
C8F
SZA CLA
CDF
10

3036

ICB/GET CHANNEL.

/READ BUFFER
/Ca/

ICC/SK? IF NO.
/C8/DF3FIELD 1.

TEMPA
I
A11

IPLACE

TABLE
u

2035
5227
5464

3645
3646

7300
1156

182
TEMPO
JMP
RESDL1
JMP I
XCDMPR
IROUTINE TD COMPARE FOR

CDMPAR:

CLA
TAD

CLL

[.1747

Ica/DFaFLD

IDONE?
IND

IVES.
GREATER

THAN

NON
0R

COMPARE CDNVERSIONS
1 L85 DIFFERENCE IN

1000(10)

CONVERSIONS

A/D

/MAINDEc-ge.oJADA-c
2188

2189
2190

3647
3650
3651

3035

DCA

1063
3011

TAD
DCA

3652
3653
3654
3655

7200

CLA

1774'

TAD
SZA

2191

2192
2193
2194
2195

MULTIPLEXER

CONVERTER,

7640
6211

2196

3656

1411

2197
2108
2199

3657
3660

6201
3036

2200
2201
2202

3661

3151

3662

7300

2203
2204
2205
2206

3663
3664
3665

1774'
7640
6211

CDF
TAD

/C6/DF=FLD

ERILSB

/VB/CLEAR

ERROR

CBF

/C8/CONSOLE PKG

DCA

TEMPA

DCA
CLA

CLL

TAD

SZA
CDF

CLA

Ice/SKP

ACTIVE?

NO.

/C8/DF=FIELD

COUNTER.

1411

TAD

CDF

3670

3037
1036
7041
1037

DCA

TEMPB

TAD
CIA

TEMPA

TAD

TEMPB

3152
1152
7450
5307

DCA
TAD
SNA

TEMPLB
TEMPLB

IVE/SAVE

AOK

/VB/OK,

TNO

(-1

/VB/
/VB/
/VB/TNO
/VB/GET

WORDS ARE LESS THAN
THE DIFFERENCE.

3676
3677
3700
3701
3702
3703
3704
3705
3706

JMP
TAD
SNA
JMP
TAD
TAD
SZA
JMP

1373
7650

5307
1152
1372
7640
5332

A/D

.+2

SZA
JMP
SNL

/*VBt/

SKP

/*VB*/

JMP
CLA
TAD
SZA
SKP
JMP
CMA

MULTIPLEXER

LSB.

ISKIP

HERE

DIFFERENCE

LSB

PAL10

V142A

23-MAR-76

11:02

1-41

JMP
CMA
SNA

/SKIP

HERE

IAND
IHERE

DIFFERENCE

-1

L88

ICHECK

FOR

SPECIAL

CASE

7777

DO NOT
HALT

HALT

AND

TEMPA

/A=0?
/NO
/YES
/A=7777?

.+4
CLA
OVS
ERCOM

ISKIP OVER AND
IERROR ROUTINE
IRETURN
/RETURN

RESOL
TAD

CONTINUE

LOCATION
LOCATION
IA

TEMPB

IF
IF
OR

=7777

/B=0?

.+2

IND

AOK

/B=7777?
CLA

JMP

AOK

JMS

ERCOM

IERROR

ROUTINE

EMSGZO

NOP

AOK.

CLA

JMP

RESOL
CLL

TAD
DCA

TEMPB

3712

ISZ

3713
3714
3715

JMP

TEMPE
COMPRI
MESAGE

3734

THAN

CLL

SZA
JMP

/*VB*/
ltvet/

JMS
HEADI3
TAD
JMS
JMS

ISZ
JMP
TAD
DCA
JMS

TEMPA

ERILSB
MESS
CRLF

FIVHUN
RESOL
(~764
FIVHUN
HESAGE

HEA014
/*VB*/
livafi/

GREATER

ARE

AOK

3710
3711

3727
3730
3731
3732
3733

LSB.

HERE

IHERE

DIAGNOSTIC

,+4

JMP
JMS
EMSGZO
NOP
JMP

3721
3722
3723
3724
3725
3726

AOK

/*VB*/
IAVBtl
/*VB*/
/*VB*/
Itvar/

3717
3720

SNA

3716

.+S

/*VB*/Ov5.

3707

EQUAL.

/AND

.+4

/*vB*/
/*VB*/
IAVBA/
/*V8*/
/th*/
/*VB*/

/*va*/
/wva*z
/nva*/
/tVB*/

ARE

PAR

/*VB*/

/*VB*/
ItVBtl
/*VB*/
/*VB*/

NORDS

IVS/ERROR-TNO WORDS

ISKIP

AOK

Itvatl

THE DIFFERENCE.
THE DIFFERENCE.

IVB/
EROVS

SNL

CONVERTER.

/VB/

CLA

JMP
SZL
JMP
CMA
SZA
SKP
JMP
CLL

2248
2249

2250
2251
2252
2253
2254
2255
2256
2257
2258
2259

AOK

JMP

/aVB*/
/*VB*/
/*VB*/

IVE/GET
IVB/

TEMPLB
(1

/*VB*/
/*VB*/

2243
2244
2245
2246
2247

/C8/DF=FLD

CLA

SZA
JMP

/*VB*/
/*VB*/
/*VB*/
/.v3./
IAVBAI

IMAINDEC-08-DJADA-C

A11

livat/
/AVBA/
IAVBA/

/*VB*/
/*VB*/

0056

ICE/SKP IF NO.
/C8/DF=FIELD 1.

6201

3674
3675

SEQ

/C8/

10
A11

3666

3673

PAGE

ICE/CONSOLE PKG ACTIVE?
C8F

CLA

3667

3671
3672

0055

A11

CDF

COMPRI.

see

WORD

FIRST

FOR

/POINTER

PAGE 1-46

11:02

23-MAR-76

V142A

PAL10

DIAGNOSTIC

TEMPO
XSTOR

TAD
JMS

/DONE?
IVE/PRINT
IVB/
/VB/PRINT
IVB/
IVB/

ICOUNT

Iva/PRINT
IVB/

"END
NO

1000

CONVERSIONS".

L88

ERRORS.

500(101.
END

TEST

MESSAGE.

K207

PRLP

CSACTV
COINOU
JMP

EROVS.

ISZ
JMS
EMSGZO

RESOL
ERILSB
ERCOM

IYES.

REPEAT

TEST

IVS/INCREMENT ERROR COUNTER.
IVS/PRINT ERROR MESSAGE.
IVB/

KHAINDEC'OBIDJADA'C A/D CONVERTER:
2298

3735

5307

2299
2300
2301
2302

3736
3737

7014

FIVHUN'

0000

ACTVCS:

3740

MULTIPLEXER DIAGNOSTIC

JHP

23'HAR-76

lCB/
/SAVE THE AC
/GET THE LINK
ISAVE IT
IGET HARDWARE CONFIGURATION HDRD
IHASK BIT 3
ISKIP IF CONSOLE ACTIVE
IBUMP RETURN POINTER
IRESTORE THE LINK

3353

DCA
RAR

3354

DCA

1022
0364

TAD

7650
2337
1354
7004
1353
5737

SNA

AND

ACSV

LKSV
(400

CLA
ISZ ACTVC8
TAD LKSV
RAL
TAD ACSV
JMP I ACTVCO

ACSVI
LKSV,

V142A

IVB/

11102

PAGE

1-42

$50 0057

0764

7010

0000
0000

PAL10

AOK

IRESTORE THE AC
IRETURN

0
0

0400

2713

7014
3337

3131
2322
0001
7777
3432
0040

3777

5600
3000
4000

4000

0000

4001

4777'
4474
4520

4002
4003

2336

4004

4475

2337

4005
4006
4007
4010

4514
7402
4553
0376
1375

2340

2341
2342
2343
2344
2345
2346
2347
2348

2349
2350

2351

4011
4012
4013

4020
4021

3040
1040
4530
7040
4532
7200
1032
3035

4022
4023

4774'
5472

4014
4015
4016

4017

PAGE

ILABS-A

SYSTEM

SYST'

0
JMS
JHS

CSCAL30

AND

TAD

(700
(4040
TEMPC
TEHPC

CLA
TAD
DCA
JMS
AUTMSG

4514
7402
4553

LAS

2358
2359

4030
4031

3154

DCA

1154

TAD

4032
4033
4034

0033

AND
SZA
JHS
LAS

C8CAL4o

4342

xtcaa/

START

FOR

HESAGE

/TYPE

OUT

TEST

MULTIPLEXER

CBSVSR
CBSVSR

/CHECK

/C8/
/C8/

0161

AND
ADLM
LAS

[17

4042

AND

5H6

4043
4044
4045

TAD

TEMPO

4040

TAD

4051
4533
4531
5253
7240
4532

4522
4524

5262
4527
0161

1037
7001

JHP
TAD

SR.

IF NOT AUTO-INCREHENT
FOR LAST CHANNEL

[CHECK

UNIPOLAR

BIPOLAR

/LOAD

EXT

ENABLE

ISKIP

FOR

EXTL ENABLE

BIT

PRESENT

TEHPO

DCA

SYSTl
(7001
TEHPA

JHP

.ul

/-X(HAX) TO RESET SHEEP
IAND START INITIAL CONVERSION
IFROH REAL
[TIME CLOCK

ISTOP

CLOCK

SYST1'
[START CONVERSION HERE FOR
THAN vxtflAX)

STCONV:

[OTHER
JHP

.-1

AND
TAD

TEHPB

[17

7440
5273

4072

4521
4475

4104

OPERATOR

7410

4073
4074

4101
4102
4103

ALLOWS

ERROR:

11:02

23-HAR-76

V142A

ILOAD CHANNEL

4046

CLKST,

/C8/SAVE
IC8/

ISKIP

4037

4100

INSTRUCTIONS

CHANNEL(S)

LSTCHN

4041

4075
4076
4077

AID

505

CBSVSR

4071

PAL10

/C8/NOT

TAD

4066
4067
4070

DIAGNOSTIC

IGET

CLA

4065

CLOCK

IEXT

7200
1154

4061

EXT'L

ENABLE

8N4
TEHPO

4035
4036

4062
4063
4064

TO CHANGE SWR

HLT

7440

7200

AND

/START

CBACTV
CBERR

4475

4060

IRATE

OPERATOR

FREQUENCY

ISAVE

CLUE

4025
4026
4027

4054
4055
4056
4057

CLOCK

CLZE

4024

4052
4053

[GET

ALLOWS

ERROR:

ICE/NOT

CMA

2354
2355
2356
2357

4047
4050

ICLEAR
ICLEAR

CBACTV
CBERR
HLT
LAS

TAD
DCA

IOTS
NORK AREA
ALL LOGIC

IINITIALIZE

CLEAN
SETUP

ADCL

/HAINDEC-08-DJADA-C A/D CONVERTER,
2352
2353

CHECK

4515
7300
4523
4540

7200
1036
4537

7001
3036

ADLM
COACTV
CBINOU

CLA CLL
ADRB

DILY
CLA
TAD
DILX
IAC
DCA

IGET

VALUE

TEHPA

VALUE

ALL

VALUES

CHANGE

SNR

PAGE

1-43

SEQ

0058

4105
4106

1036

2400

2409

4107

2410
2411

4110
4111
4112
4113
4114
4115
4116

7640
7410

2407

2412
2413
2414

2415
2416

2417
2418
2419
2420

4117

2421
2422

4122

2423

2426

4123
4124
4125
4126

2427

4127

2424

2425

2428
2429
2430

2431
2432
2433
2434

2435
2436
2437
2438
2439
2440
2441
2442
2443
2444

5324

4541
1053
3363
2363

4120

5317

4121

4553
7200

0059

1001(X)

9'1
.ICBIDON'T KANT 5R, JUST FUDGE A
/C8/ - CHECK FOR CONTROL CHAR.
STCONV
TEMPC

ITO RESTART

CBSVSR

/C8/
lCO/

CLOCK

4130
4131

7200

CLA

1154

TAD

4132
4133
4134

0033
7640
5250A

AND
524
JMP
LAS

4135
4136

7200
1154

CLA
TAO

CBSVSR

/CO/
/C8/

4137

0161
4521

AND
ADLM
JHP

[17

ITO CHANGE CHANNEL

CLKST

ISO

/4C8*/

SEQ

+X(MAX)

ITIME OUT TO ALLON
ITRACE TO RETURN TO
IANO SETTLE

TEHPX
TEMPX

JMP
TAD
CLOE
CMA
CLZE
LAS

/C8*/

1-44

o'1

CLA

RESTRo

PAGE

RESTR

LAS

5261
1040
4530
7040
4532

ISKIP

CLA

DISD
JMP
DIXY
TAD
DCA
182
JMP

4536

5312

11102

TEMPA
(7001

TAD
TAO
SZA
SKP
JMP

1373

23-HAR-76

V142A

PAL10

/MA1NDEC-08-DJADA-C A/D CONVERTER: MULTIPLEXER DIAGNOSTIC

/A-I MODE
ISKIP IF NO

845

CLA
CLKST

4140
4141
4142

5250
0000

2445

/CHECK FOR

LSTCHN,
/*CB*/

CHANNEL

LAST

LAS

2446

2447
2448

4143
4144

4145

2451

4146

2452
2453
2454

4147
4150

4151

0161
7040
3037
2342
2342

4152
4153

7200
1154

4154

0033

4155

7650

2455

2456
2457
2458
2459
2460
2461

/4caa/

{MAINDEC-08-DJADA-C
2462
2463
2464

4156

2465

4161

2466

4162
4163

2467
2468
2469

CLA
TAO

7200
1154

/C8/
/C8/

CBSVSR

IIF

2449
2450

4157
4160

A/D

[17

DCA
151
132
LAS

TEMPB
LSTCHN
LSTCHN

CLA
TAD

CONVERTER,

3035
5742

TEMPY,

MODE

805

CLA

/SKIP

MULTIPLEXER

an?
TAD
740
DCA
JMP

INCREMENT

IC8/
/C8/

CBSVSR

AND
SNA

5362
1032
1033

0000

AND
CMA

AUTO

DIAGNOSTIC

AUTO

PAL10

INCREMENT

V142A

MODE

23'MAR-76

11:02

.04
544
345
I

TEMPO
LSTCHN

2470

2471
2472
2473

2474
2475
2476
2477
2478
2479
2480

4173
4174
4175
4176
4177

0700
3000
4200

PAGE

/CONTROL
4200

4201
4202
4203

2481

7001
2322
4040

3736
0417
1605

LOGIC

ERROR

MESSAGES

EMSG1:

TEXT

"“DONE FLAG NOT

EMSGZ:

TEXT

"‘TIMING

SET

THEN

CLEARED

SKIP

FAILURE+‘"

4006

4204
4205

0740

4206
4207

2440

4210
4211

2305
2440

4212
4213

2410
0516

1401
1617

4214

4003

4215
4216
4217
4220

1405
0122
0504
4017

4221

2240

4222
4223

2313

4224
4225
4226
4227

4006
0111
1425
2205

4230
4231
4232
4233
4234
4235
4236
4237
4240

3736

4241

4006

4242
4243

1401
0740

1120

0000

3736
2411
1511
1607
4005

2222
1722

ERROR

FLAG NOT

SET

THEN CLEARED

SKIP FAILURE¢“'

PAGE

1'45

SEQ

0060

[MAINDEC—08-DJADA-C

A/D

4244

1617

4245
4246

2440

4247
4250

2440

CONVERTER:

MULTIPLEXER

DIAGNOSTIC

PAL10

V142A

23-MAR-76

11302

PAGE

1-46

SEQ

0061

2305
2410
0516
4003
1405
0122
0504
4017
2240

2313
1120
4006

0111
1425
2205

3736
0000

3736
2516

2482

EMSG3:

TEXT

"3‘UNEXPECTED

INTERRUPT

EMSG4I

TEXT

""ADRB FAILED

OCCURRED"“

0530
2005

0324
0504

4011

1624
0522

2225
2024

4017
0303

2522
2205
0437
3600
3736
0104
2202
4006

2483

JAM

TRANSFER

AC‘T"

0111

1405
0440

2417
4012
0115
4024

2201
1623
20605
2240
2417
4001

0337

/MAINDEC-08-DJADA-C

2484

4333
4334
4335
4334
4337
4344

4341
4342
4343
4344
4345
4346
4347

4354
4351
4352
4353
4354
4355
4354
4357

2485

V1424

23-MAR-76

EMSGbo

TEXT

"“ENABLE REGISTER NOT PROPERLY LOADED‘C"

EMSG7,

TEXT

"‘TFAILED

GENERATE

INTERRUPT

WITH

DONE

EMSGIUI

TEXT

”‘TFAILED

GENERATE

INTERRUPT

NITH

TIMING

11802

1431

1741
4445

4437
3600

3734
4441
1114

2241

4371
4372

2445

4441

4411
1424
4522
2225
2424
4427
1124
1444

4442
4443

4417
1445

4444
4445

4444
1441
4737
3444
3734
4441

4424

PAL10

4414

4745
1445

4421

DIAGNOSTIC

1417
2444
2422
1724
4522

4374

4447
4414
4411
4412
4413
4414
4415
4414
4417

MULTIPLEXER

2244

4344
4347

4444

CONVERTER:

1123
2445

4544
4424
1744

4444

A/D

4514
4142
1445
4422
4547

4344
4341
4342
4343
4344
4345

4373
4374
4375
4374
4377

2486

3444
3734

1114
4544
4424

1144
4745
1445
2241
2445

FLAG‘T"

ERROR

FLAG“”

PAGE

1-47

SEQ

0062

A/D

/MAINDEc-08-DJADA-c
4422
4423

4011

4424

0522

4425

2225

4426
4427
4430

2024
4027

4431
4432
4433
4434

2487

4006

1401
0737
3600

4444

3736

4445

0601
1114
0504

1417

4453

4457

0104
4001
1604
4022
0501

4460

0440

4461

1520

4462
4463

2205
0740

4470

1604
4003
1405
0122
4001
0337

4472
4473
4474
4475

2488

4476
4477

4500
4501

3600
3736
0601

4024

4525
4526
4527
4530
4531
4532
4533

AND

READ

MPX

REG

EMSGlS:

TEXT

"“FAILED

LOAD

AND

READ

ALL

CHANNELS

PAL10

V1424

23-MAR-76

AUTO-INCREMENT

1740
1417

A/D

CONVERTER,

MULTIPLEXER

DIAGNOSTIC

4022

0501
0440

0114
1440
0310
0116
1605
1423
4011
1640

0125
2417
5511
1603
2205
1505
1624

4536

4537

EMSGl4p

TEXT

"1'FAILED

COMPLETE

CONVERSION

SPECIFIED

EM8620'

TEXT

"“FAILED

RESOLVE

CONVERSIONS

TIHE‘7"

4540
4541
4542
4543
4544

4545
4546

4547
4550

4551
4552
4553
4554
4555
4556
4557
4560

4561
4562
4563
4564
4565
4566
4567

2490

4570
4571
4572
4573
4574

4575
4576
4577

0064

MODE‘T'

4534
4535

2489

SEQ

AC“"

0104
4001
1604

/HAINDEC-08-DJADA-C

4522
4523
4524

LOAD

1114
0504

4512

4001

4503
4504
4505
4506
4507
4510

4513
4514
4515
4516
4517
4520
4521

CLEAR

"“FAILSD

0211
2423

4502

4511

AND

TEXT

3040

4464
4465
4466
4467

4471

BITS

EMSGl1a

4024
1740

4452

4456

0063

1722

4440

4454
4455

SEQ

1124
1040

4441
4442
4443

4451

PAGE 1-48

2411
1511
1607
4005
2222

4450

11802

23-MAR-76

V142A

PAL10

MULTIPLEXER DIAGNOSTIC

1624

4435
4436
4437

4446
4447

CONVERTER.

LSB‘T"

11:02

PAGE

1-49

IMAINDECP08-DJADA-C
4600

4601
4602
4603
4604
4605
4606
4607
4610

A/D

MULTIPLEXER DIAGNOSTIC

CONVERTER:

V142A

PAL10

23-MAR-76

11102

PAGE

1-50

SEO

0065

11:02

PAGE

1-51

SEQ

0066

2317
1426
0540

0317

4611
4612
4613
4614
4615
4616
4617
4620

2491

4621
4622

503621.

72x7

”.‘TNO

EMSG22:

TEXT

”“ERRONEOUS EXTERNAL ENABLE FROM CLOCK“”

SUCCESSIVE

READS

EQUAL“”

NOT

4623
4624
4625
4626

4627
4630

4631
4632
4633
4634
4635
4636
4637
4640

2492

4641
4642
4643
4644
4645
4646
4647

3736
0000

3736
0522

2217
1605

4650

1725

4651
4652

2340

4653
4654
4655

2405
2216
0114

0530

4656
4657

4005
1601

4660

0214

4661
4662
4663

0540

4664

4003
1417
0313

4665
4666

0622
1715

/MAINDEC-08-DJADA-C

2493

2494

4667

3736

4670

0000

4671

3736
1517
1617
2411

4672
4673
4674
4675
4676
4677
4700
4701
4702
4703
4704
4705
4706
4707

4710

4724
4725
4726
4727
4730

2495

4731
4732
4733
4734
4735
4736
4737

4740
4741

TEXT

”“MONOTINICITY FAILURE*'"

EMSGZ4:

TEXT

"+‘NOISE

EMSG25:

TEXT

'é‘DONE

FLAG

1425
2205
3736
0000
3736

MULTIPLEXER

AND

A-D

1617
1123
0540

4723

EM36237

23-MAR-76

V142A

PAL10

4006
0111

4015
2514
2411

4720
4721
4722

DIAGNOSTIC

1611

4711
4712

4716
4717

MULTIPLEXER

0311
2431

4713

4714
4715

A/D CONVERTER,

BUFFER‘f"

1116

2014
0530
0522

4001
1604

4001
5504
4002
2506

0605
2237
3600
3736

0417
1605
4006

1401
0740
0601
1114
0504
4022
0501
0440

0201
0313

FAILED READ BACK

BIT

STATUS

REG*"

MULTIPLEXER

,M,1Nogc.ga.04141.c A/D co~vznren,
4756

4757
4760

4761

2496

4762
4763
4764
4765

3600

3736

4766

0522

4767

2217

4770
4771

2240
0614

4772
4773

0107

4774
4775
4776
4777
5000

23-NAR-76

V142A

PAL10

DIAGNOSTIC

11102

PAGE

1'52

SEQ

0067

PAGE

1-53

SEQ

0068

4023
2401
2425
2340
2205
0737
TO READ

BACK

IN BIT

EMSGEb:

TEXT

"‘ERROR FLAG

FAILED

EHSGZ74

TEXT

".‘CAF FAILED

EMSG30p

TEXT

”“CAF FAILED TO CLEAR ERROR FLAG“"

STATUS

REG‘T'

4006

0111
1405
0440

2417
4022
0501
0440

0201
0313
4011
1640
0211
2440
6140

1704
4023

2401
2425
2340
2205
0737
3600
3736
0301

2497

CLEAR

DONE FLAG""

0640
0601

1114
0504
4024

1740
5033
5034

0314
0501
2240
0417
1605
4006

2498

5040
5041
5042
5043
5044

1401
0737
3600
3736
0301

lMAINDEC-0B-DJADA-C
5045
5046
5047
5050

5051
5052
5053
5054
5055
5056
5057
5060
5061
5062
5063
5064
2499

5065
5066
5067
5070

5071
5072

5073
5074

MULTIPLEXER

DIAGNOSTIC

V142A

PAL10

1114

1744
4314
4541
2240
4522

2217
2240

0614
4147
3734
0000

3736
0104
4314
4006
0111
1445
4444

EMSG31:

TEXT

"‘“ADCL

FAILED TO CLEAR

HUX

EMSG32:

TEXT

”“ADST

FAILED

CLEAR

oo~5.--

EHBG334

TEXT

'*’ADST

FAILED TO CLEAR

ERROR.“-

ENABLE

2417

5100

4015
2534
4417
2244
4514
0102
1445

4122

4002

1124
2331
3600
3734
0104

2500

2324
4006

4111
1445
4444

2417
4443
1445
4122
4004

1716
5130
2501

23-MAR'76

4424

4003
1405

5104

CONVERTER,

4544

5075
5076
5077

5101
5102
5103

A/D

4444
0601

5131

0537
3600

5132

3734

5133

4144

BITS‘T'

11:02

(HAINDEC-08-DJADA-C A/D CONVERTER:
513a

5135
5136
5137
5140
5141
5142
5143

5144
5145
5146
5147
5150
5151
2502

5152
5153
5154
5155
5156

5157
5160

5161

5162
5163
5164

5165
5166
5167
5170
5171
5172
5173

2503

5174
5175
5176
5177
5200

5201
5202
5203
5204
5205

2504

3736

2506

2507

EMSG3S:

TEXT

"“TIMING ERROR

EMSG36:

TEXT

"‘TAORB FAILED

EOC

FAILED

SET

ERROR

FLAG

SET

ERROR“"

FLAG¢‘"

2217
2240
0614
0107

3736
0000

3736
2411
1511
1607
4005
2222

1722

2440

1116
4005
2222
1722
3736

4003

A/D

CONVERTER,

CLEAR DONE

FLAG‘2”

PAL10

V1424

DIAGNOSTIC

MULTIPLEXER

23-MAR'76

11102

4006

0111
1405
0440

2417
1405
0122
4004

1716
0540

0614

0107
3736
0000

3736
0301

EMSG37:

TEXT

”“CAF

EMSG40:

TEXT

""DATA

EMSG41;

TEXT

".“NO

FAILED

CLEAR

DATA

BUFFER‘T"

0640
0601
1114
0504
4024

1740
0314
0501
2240
0401

2401
4002
2506

0605

2237
3600

3736

5266

0401

5267
5270

2401
4002
2506
0605
2240

5301
5302

”“ADRB

4024
1740
2305
2440
0522

5231

5276
5277
5300

TEXT

0504

2202

5271
5272
5273
5274
5275

0069

0517
0340
0601
1114

5223
5224
5225
5226
5227
5230

5254
5255
5256
5257
5260
5261
5262
5263
5264
5265

EMSG34:

0104
2202
4001
2440

3736
0104

5251
5252
5253

SEQ

1722
3736

0000

5246
5247
5250

1-54

0000

/HAINDEC'08-DJADA-C

2505

PAGE

4005
2222

5221
5222

5242
5243
5244
5245

11102

1405
0122

5216
5217
5220

5235
5236
5237
5240
5241

23-MAR-76

4003

1401
0740
2305

5233
5234

V142A

1405

4006

5232

PAL10

0440

5207
5210

521a
5215

DIAGNOSTIC

2417

5206

5211
5212
5213

MULTIPLEXER

2324
4006
0111

BUFFER

NOT

EQUAL

1777.7"

1617
2440
0521

2501
1440

2417
4061
6767

5303
5304
5305
5306
5307
5310

4003

5311

1716

6737
3600

3736
1617

CONVERSION

TIME

DIFFERENCE AFTER CHANGING

CHANNELS‘?"

PAGE

1-55

SEQ

0070

/MAINDEC-08-DJADA0C
5312
5313

5314
5315
5316
5317
5320

A/D CONVERTER:

DIAGNOSTIC

MULTIPLEXER

PAL10

V1424

ENABLE

11102

23'MAR-76

PAGE

1'56

SEQ

0071

2605
2223

1117
1640
2411

1505
4004
1106
0605

2205
1603
0540

0106
2405
2240
0310
0116
0711
1607
4003
1001
1616
0514
2337
3600
3736
0301
0640
0601

2508

EMSG42,

TEXT

"“CAF FAILED

TXTPCp

TEXT

"PC

TXTIDT:

TEXT

CLEAR

MUX

BITS+‘"

1114‘
0504

4024
1740
0314
0501
2240

1525
3040

1722
4005

1601
0214
0540
0211
2423
3736
0000
2003
4075

2509

4000
4040

2510

IOT

CODE

1117
2440

0317
0405

lMAINDEC-06-DJADA-C

2511

2512

2513
2514

5401

4075

5402
5403
5404

4000

5405

1520

5406
5407

7540

CONVERTER:

0000

5411
5412
5415
5414
5415
5415

4040
2405
1520

5417
5420
5421

3736
0516

5422
5424

1706
4514
1707

5425
5426
5427

1123
4024
@523

5430

2437
3600

TEXT

TEMPA

TXTB;

TEXT

TEMPB

5452
5455
5454
5455
5456
S457

11802

XENDo

LOGIC
TEXT

TEST

TYPESTRING

""END OF LOGIC TEST‘7"

044a

/HEAdER
3736

5451

23-MAR-76

0000

0104

5442
5443
5444
5445
S446
5447
5450

V1424

7540

5433
5434
5435

5441

PAL10

0240

5432

5436
5437
5440

DIAGNOSTIC

TXTA:

/END

5431

MULTIPLEXER

0140

5410

5423

2515
2516

4040
2405

A/D

7001
4001
4024

1740
@440

0317
1626
0522
2405

2257
1525
1424
1120
1405
3005
2240

0411
0107

1617
2324

5460

1103

5461
5462
5463

4015
0455
6070

5464
5465

5504
1201

XLABEL.

MESSAGE
75x7

"1‘4051

CONVERTER/MULTIPLEXER

DIAGNOSTIC

HD-BB-DJADA-c*"

PAGE

1'57

SEQ

0072

/MAINOEc-44-OJAOA-C A/O CONVERTER.
5444

5447

5474
5471
2517

5474

2444

5475
5475
5477
5544

2327

5544

5547

5514
5511
5512
5513
5514
5515
5514
5517

2514
2519

AUTMSG.

TEXT

"I'SET

sws

1722

5531

4714

5532
5533
5534
5535

4544
4314

2527
2524
2529

HEAD13.

TEXT

"“END

(AUTO-INC).

OF CHANS

344-11.

SET 344-11

3544

3734
4515

5543
5544
5545
5544
5547
5554
5551
5552
5553

4441

1444

2537
2534
2539
2544
2541
2542
2543
2544
2545
2545

2547
2544
2549
2554

2551
2552
2553

2554
2555
2555
2557
2554
2559
2554
2541
2552

SEQ

U57“

CHAN)“"

1745
5454

4444

4317
1425

4522
2311
1715
2337

3544
3735
4514

HEA414.

MULTIPLEXER

TExT

"“END

DIAGNOSTIC

PAL14

/V4/

TEST“”

V142A

23-HAR-74

4444

1744
4424
4523

2437
3444

5544

45544

4444

/TAaLE OF CONVERSION VALUES/
STORAG. 4

/C4/

chat/s

IC8/

/C4/
/CS/

THE TABLE OF CONVERSION
RESIOES STARTING AT LOC

ROUTINES

VALUES

5544.

(BUFFER
DOES

'STORAG' ABOVE) ALRAVS
THE CONSOLE PACKAGE

(FOLLOHING).

/CS/
/C4/
/CS/

IF THE PROGRAM Is RUN HITHOUT THE CONSOLE PKG ACTIVE THEN
BUFFER 'STORAG' HILL BE IN FIELD 4. (CONSOLE PKG CODE
HILL BE LOST.)

/C4/
/C4/
/CS/

IF THE
BUFFER
RESIDE

PROGRAM Is RUN HITH
'STORAG' HILL BE IN

FIELD

THE

CONSOLE

FIELD

PKG ACTIVE THEN THE
CONSOLE PKG HILL

THE

ICONSOL SRC -V2~R1- CONSOLE PACKAGE
REV 1 -DATE NOV.1041975
/
THE CLA HHICH HAS THE FIRST ENTRV IN THE
/1. IN xcaPAS REMOVE
CALL TO xcePAs.
ISUBROUTINE. THE CLA HOULD DESTROY THE AC ON A
/2. CONTROL c (CNTRLC)
A OCA COSNST
BY
CSSNST
ADDING
/PUT A CLEAR THE SOFTNARE FLAG
/THIS HILL CLEAR THE FLAG TO ALLOH MULTIPLE ENTRIES IN TO
CHANGING
FOR
SNITCH
IxCSPSN
THE
REGISTER.

/LAS: CALL COCKSH OR JMS xcasw
/THIS HILL READ THE SHITCH REGISTER
/BY LOCATION 24 BIT 4.

FROM

THE PLACE

SPECIFIED

2553
2544
2555
2566

(SINGLE

/VB/

CONVERSIONS""

/*C8*/PAGE

5444

8073

4444

2534
2531
2532
2533
2534
2535
2534

SEQ

4115

5537
5544
5541
5542

5554

1-54

5137

5535

2521
2522
2523
2524
2525
2524

PAGE

4151
5444

4423
4524
4423
2774
5551
5144
5423
1114

5555
5555
5557
5554
5541
5542
5553

11142

1441
1523
4411
1444
2327
7455

/MAINDEc-44-DJADA-C A/O CONVERTER,

2524

23-MAR-74

4351
5444
4344
1744
4443

5521
5522
5523

5554

V142A

5544
5441
2524
1755
1115

5524

5524
5525
5525
5527
5534

PAL14

4444

22;: 3:32

5541
5542
5543
5544
5545

MULTIPLEXER DIAGNOSTIC

4441
5543
3734

[THE PROGRAM SHOULD CHECK FOR A CONTROL CHARACTER
IEVERY FIVEtSJ SECONDS OR SOONER.

FROM

THE

TERMINAL

11:42

PAGE

1-59

[MAINDEC-OS-DJADA-C

A/D

2567

CONVERTER:

MULTIPLEXER

ILOCATIONS THAT NEED TO BE SET

2568
2569
2570
2571
2572
2573
2574
2575
2576
2577

PAGE

1-60

SEQ

0075

USING THE CONSOLE PACKAGE.

FOR

THIS LOCATION DETERMINES THE NUMBER OF
ICNTVAL
/PROGRAM COMPLETIONS THAT ARE NEEDED BEFORE THE PASS MESSAGE
THE PASS MESSAGE OUT IN THE RANGE OF 1
PUT
SHOULD
VALUE
/THE
/THIS SHOULD BE A POSITIVE NUMBER.
IN

11:02

23-MAR-76

V142A

PAL10

DIAGNOSTIC

XCSPASS

IS TYPED
TO 5 MINUTES.

THIS IS FOUND IN CNTRL ROUTINE CONTROL R PART
ICSSTRT
/IT IS THE RETURN NHEN CONTROL R IS ENTERED (RESTART PROGRAM)
THE LABEL CSSTRT
/THE RETURN JUMPS TO XDOSH WHICH CONTAINS CSSTRT SO PUT
INHERE YOU WANT TO RESTART THE PROGRAM.

2578

2579
2580
2581
2582
2583
2584
2585
2586
2587
2588

ISETUPI IN XCBERR
IPLACE THE CORRECT

THIS
BIT IN

XC8PASS

THIS

/SETUP2

IS THE MASK BIT FOR HALT ON ERROR
THIS LOCATION FOR HALTING ON ERRORS.
IS

THE

FOR

MASK

HALT

END

PASS.

cALL TABLE IS A CONDITIONAL ASSEMBLY.
/TO ASSEMBLE THE CALL REMOVE THE / BEFORE CONSOL=0.
IIN COMBINING THE CONSOL PACKAGE TO A DIAGNOSTIC.
/THE CALL TABLE IS TO BE AT THE BEGINNING OF A PROGRAM.
/THE

2569

2590
2591
2592

0000
6661

2593
2594
2595
2596
2597
2598
2599
2600

CONSOL=0

6664

6665
6667
7421

GTF=
ACL=
CAP:
MOL=

7561

MOA:

6664

7761

2601
2602
2603

6661
6662
6663

PSKF:

PCLF=
PSKE=
PSTB:
PSIE=

6662
6663.

6664
6665

6004

7701
6007
7421
7501

2604

IFDEF

2605

CONSOL

2606

2607
2608
2609
2610
2611
2612
2613
2614
2615
2616
2617
2618
2619
2620
2621

0102

0102
@103
@104
0105
0106

5701

0107

4567
6255

[MAINDEC-OB-DJADA-C
2622
2623
2624
2625
2626
2627
2626
2629
2636
2631
2632
2633

*102
C8PASS=

4502
5660
4503
5660
4504
5670
4505
6003
4506

C8CKSN=

JMS I
XC8PAS
JMS I

C8TTYI=
C6CNTR=
CSPRNT=

CBSNIT=

A/D CONVERTER:

JMS I
XCBTTY
JMS I
XCBCNT
JMS I
XCSPNT
JMS I
XCBPSN

MULTIPLEXER

0110

4511
6423

C8CRLF=

0111

C8ECHO=

JMS I
XCBOCT
JMS I
XCSCRL
JMS I

C8TYPE=

XCSECH
JMS I

2635
2656

0116

4512
6463
4513
6477
4514
6607
4515
6235
4516
6441

2637

0117

4517
5735

0113
0114
0115

2634

C81NOU=
C8CKPA=
C8PAUS=

IFETCH

CONSOL CHAR

ICHECK

FOR

JMS I
XCBERR
JMS I
xCSING
JMS I
XCBCKP
JMS I
XCBPAU

CONTROL CHAR

ICB PRINT

BUFFER

/SET

PSEUDO

REG

SN.

V142A

PAL10

23-MAR-76

11:02

ICONVERT

ASCII

AND

/DO

CARRIGE

RETUR

LINE

FEED

ICHECK

INPUT

CHAR

/C8

ERROR

ONE

CHAR

HANDLER

/LOOK

FOR

OPERATOR

/CHECK

CONTROL

INTERVENTION

CHAR

IIF

2638
2639

/IF
IA

2640
2641
2642

REG

XCBTYP
C8ERR=

SETTING

/CHECK

DIAGNOSTIC

C80CTA=

COMPLETION ROUTINE

PASS

ICB
.

XCBSN

4510
6400

0112

CONSOL PACKAGE RETURN CALL PLUS ONE
NOT USING CONSOL REPLACE CALL HITH
AND THEN GO TO THE HALT

HLT

/i**fi*****tiiii*********iii*iti****fiit*itfiitttiiittiiiifi*******t*tt*i*fit

/*20

IPSEUDO

SWITCH REGISTER

2643

2644
2645
2646
2647

Ital

IHARDHARE

INDICATORS

l4000=USE

FRONT

l0000=USE

THE

PANEL

SWITCH

PSEUDO SNITCH REGISTER

LOC.20

2646

2649
2656
2651
2652

2653
2654
2655

/*22

ISYSTEM

/*23

[RESERVED

CONFIGURATION
/4008CONSOL PACKAGE SET ACTIVE
l0000=CONSOLE PACKAGE sET DEACTIVE
FOR

FUTURE

USE

5600

2656
2657
2658
2659
2660
2661
2662
2663
2664
2665
2666
2667

#5600
IRAAAAAAitiiiAAtittiitAtitAtitAtittittttitttittittiittiiiii*it**tt*ttt

/CBPASS
/THIS IS CALLED AT THE END OF EACH PROGRAM COMPLETION
/THE VALUE OF** CNTVALAR MILL BE DETERMINED BY THE TIME IT TAKES
/THE PROGRAM TO COMPLETE THIS MANY CBPASS TO BE IN THE 1 TO 4 MINUTE
/RANGE
C8PASS=JMS
XCSPAS
/
COPASS
IEX. OF CALL
HLT
/
IHALT IF NON CONSOL PACKAGE
JMP
/
ICONTINUE RUNNING THIS PROGRAM
START1

/RETURN TO LOCATION CALL PLUS ONE WITH THE AC'O IF NON CONSOL PACKAGE AND HLT
IIF CONTINUE TO RUN THEN RETURN TO CALL PLUSZ ACIO
/THE LOCATION SETUPZ IS THE MASK BIT FOR THE HALT AT END OF PASS

560C

0000

ICHECK

THAT

ICALLS

USED

XCOPAS

XCSPAS:

CORRECT
ARE

FOR

THE

CURRENT

PROGRAM

CHKCLA-XCBCRLF-XCSOCTA'XCSSH-XCOPNT'XCOINOO

PAGE

1-61

SEQ

0076

IMAINDEC-8B-OJADA-C
2677
2678
2679
2688
2681
2682
2683
2684
2685
2686
2687
2688
2689
2698
2691
2692
2693
2694
2695
2696
2697
2698
2699

5681

A10 CONVERTER:

4777'

5682
5683
5684
5685
5686
5687

5618
5611

MULTIPLEXER DIAGNOSTIC

JMS
JMP

DOPACK'

JMS
JMS
AND
SZA CLA
JMP I
JMP
JMS
JMP

ISZ
JMS
JMS

SETUPZI

CBBYII

2788

CKCOUTI

2781
2782
2783
2784
2785
2786

8
TAD
SZA

(488
XCSPAS
CBBYI
CKCOUT

CSBYI
PASCNT
XCSCRLF
XCSPNT

2787

2788
2789
2718
2711
2712
2713
2714
2715
2716
2717
2718

NOSETI

ICBPRNT
/

2719
2728
2721
2722
2723
2724
2725

8
8

DOSET;
CNTVAL:
MESPASI

/STORE

DOCNT
DOSET
DOCNT
C88Y1

23-MAR-76

11:82

PAGE

1'62

SEQ

8877

11282

PAGE

1'63

SEQ

8878

ACTIVE CONSOLE?

BUFFER

INPUT

HERE

IINDICATE VALUE SET UP
ICOUNT THE NUMBER OF PASSES
IEXIT FOR ANOTHER PASS
/SET TO CBPRNT CBPASS
IBUMP RETURN FOR
ICBPASS CBTYPE OUT

DOSET
I

V142A

BIT

ICHECK IF SET UP NEEDED
/8=SET UP CBPASS COUNT VALUE
I18C8PASS COUNT VALUE OK
ICBPASS COUNT VALUE ON
IGET COUNT VALUE FOR THIS FROG
/SET TO NEGATIVE

NOSET
CNTVAL

ISZ
JMP

DOCNTI
PASCNTI

(488
XCSING
XCBPAS
DOSET

ISZ
182
JMP
DCA

[GET NUMBER
/CONVERT IT TO ASCII
/DO A CARRIAGE RETURN
IRESTORE REGISTERS
ICHECK A HALT AT END OF CBPASS
IMASK BIT
/HALT 81 NO SKIP CONTINUE l8
/STOP PROGRAM EXECUTION-LOOK FOR

PASCNT
XCSOCTA
XCSCRLF
CBGET
XCBSN

CLA

JMP
TAD
CMA
DCA

WORD

CLASSIC
IGET THE REGISTERS
IDEACTIVE CONSOL CHECK SR SETTING
[FOR HALT ON END OF CSPASS
III HALT 8 CONTINUE
/GO TO HALT
/CONTINUE ON RUNNING PROGRAM
/CLASS CHECK CSPASS COUNT
lCBPASS COUNT NOT DONE REOD PROGRAM
ICSPASS COUNT DONE SET CBPASS COUNT

XCOSN

MESPAS

TAD
JMS
JMS
JMS
JMS
AND
SZA CLA
JMS
JMP I

PAL18

IIS
IIS

CHKCLA
DOPACK
CBGET

CKCOUT
CKCOUT

"DJADAC

TEXT

Ittiiiiiititiiifliiii*fit*ittAiiiktiiiiitt*******ifi****i**fitttt*i*tltiti
/C8CKSN

/MAINDEC-88-DJADA-C

A/D

CONVERTER:

MULTIPLEXER

DIAGNOSTIC

V142A

PAL18

/THIS ROUTINE CAN BE USED INPLACE OF A READ THE
/ROUTINE THAT WILL CHECK NHERE TO READ THE

2726

/C8 SWITCHES FROM
ITHE SELECTION IS

5668
5661
5662

JMS

/READ THE CBSNIT
IRETURN WITH THE

JMS

/RETURN

LOCATION FOLLOWING

ICALLS

USED

XCBSN'

8
JMS
NOP
TAD

5663
5664
5665

CALL

WITH

CONTENTS

THE

AC=

ANY

CONTRL

VALUE

SWITCH

CBSNIT

SETTING

ARE-XCBCKPA-

XCBCKPA

IGO CHECK

28
XCBSW

ND FOR INDICATOR
ICHECK IF FROM PANEL 4888
/DO LAS AND SKIP GET FROM PANEL
IPSEUDO SNITCH
IEXIT WITH STATUS BIT IN AC.

THE

/GET

SPA CLA
7614
TAD
JMP I

5666
5667

21.

XCBSW

/EX.

LAS.

PSEUDO SHITCH REGISTER
STATE OF BIT 8 IN LOCATION

IE. FROM PANEL OR
DETERMINED BY THE

ICBCKSN=

23-MAR-76

SWITCHES

WITH

LAS

/****Ri***********iiifi*iit*****i***********t***it*******t*i**it******t
/C8TTYI

/THIS ROUTINE HILL LOOK FOR A INPUT FROM THE TERMINAL
IAND REMOVE ANY PARITY BITS, THEN MAKE IT 8 BIT ASCIC8TTYI= JMS XCBTTY
/
JMS
XCBTTYI
IREAO CHAR FROM THE CONSOL DEVICE
IEX.
/
/RETURN TO CALL PLUS ONE AC CONTAINS

/CALLS

USED

oNONE-

BUT

CBCHAR

OFF

PAGE

AND

ROUTINE

CALLED

THE

XCBECHO

/
8888

2767

6831
5271

2768

6836

XCBTTY;

8378
1367
3766‘I

DCA
TAD
JMP

1766'
2773
2774

8
KSF
JMP
KRB
AND
TAD

5678

/LOOK FOR

KEYBOARD

FLAG

.-1
(177
(288
CBCHAR
CBCHAR
I

XCBTTY

IGET CHAR
IMASK FOR 7 BITS
/ADD THE EIGTH BIT
ISTORE IT
IEXIT

llfititI*iifififittii*ittiit***i******ktiii*iti****iifi**fi*fi***fi*iti*ifititt

2779
2788

ICBPRNT

CHAR

,MAINDEcuaB-DJADA-C

V142A

PAL18

MULTIPLEXER oxacnostxc

CONVERTER.

A/D

PAGE

11:82

23-MAR-76

H
NTENTS OF THE C8 PRINT BUFFER. THE LOCATION
PRINTING OF THE
FOLLOWING THE CALL.
2 PER WORD.
WHEN A 88 CHAR IS DETECTED. CHARACTERS ARE PACKED

1-64

see

0019

1-65

SEQ

8888

$5?1?H§°35§?ER"1111TE§EIL THEOADDRS

3321

273;

IWILL STOP

§;gg

BUFFER

XCBPNT

C8PRNT=

JMS

/EX.

JMS
HE$S77

XCBPNT

2786

27:8

THE

ICBPRNT

ILOCATION OF

CONTENTS OF THE
CBPRNT BUFFER

FOLLOWING

2789

§;ZT

THE POINTER FOR THE
ICBPRNT WILL USE THE LOCATION FOLLOWING THE CALL AS
8
ICBPRNT ROUTINE.RETURN TO CALL PLUS TWO WITH AC3

2792
79

S793

/CALLS USED ARE-XCBTYPE-XCBPNT

2795
2796
2797
2798

5781

28;;

27:3 1781

2881
2882
2883
2884

5784
5785
S786

2885
2886
2887
2888
2889
2818
2811
2812
2813
2814
2815
2816
2817
2818

5718

5787

5711
S712
5713
5714
5715
5716
5717
5728

5721

XCBPNT:

8888
7 88
3334
2381
1734
8365
7458

CLL
I

LA
TAD
DCA
I52
TAD
AND

C8001,

IGET CBPRNT BUFFERS
[STORE IN PTSTOR

XCBPNT
PTSTOR
XCBPNT
PTSTOR
(7708

/GET

7828
7881
7812

7812
7812
4764'
1734

XCBPNT

JMP
SHA
CML
IAC
RTR
RTR
RTR
JMS
TAD

7588

PTSTOR

XCBPNT

(8877

7588
1361
1368

AND
SNA
JMP
TAD
SMA
TAD
TAD

JMS

(188
(248
XCBTYPE

2823

5731
5732

4764'

182

PTSTOR

2824
2825

5733
5734

JMP

C8DO1

(3748

ROTATE
ROTATE

188
/ADD 288
ICBTYPE ONLY BITS 4-11
IBUHP POINTER FOR NEXT WORD
/DO AGAIN
ISTOR FOR CBPRNT BUFFER

/ADD

PTSTOR:

8888

WORD

IPUT CHAR IN BITS 4-11 MAKE IT 8 BIT ASCII
/C8PRNT IT ON CONSOLE
IGET DATA WORD
/HASK FOR RIGHT BYTE
ICHECK IF 88 TERMINATOR
//EXIT
IADD FUDGE FACTOR TO DETERMINE IF 288
[OR 388 IS TO BE ADD TO CHAR

XCBTYPE
I

8363
7458
5781
1362

2334
S386

DATA

FOR LEFT BYTE
ICHECK IF 88 TERMINATE
IEXIT
IIS AC MINUS
[MAKE CHAR A 388 AFTER
IMAKE CHAR A 288 AFTER
IMASK

SNA

5781

STARTING LOCATION

RETURN

IBUHP

5722
5723
5724
5725
5726
5727
5738

2819
2828
2821
2822

2826

/**************i*t*******t**********A******t*titittiitititti*t*t**i*i*ti*it

2827
2828
2829
2838
2831
2832
2833
2834
2835

/C8PAUS
/THIS ROUTINE WILL CHECK IF THE CONSOL PACKAGE IS ACTIVEIIF ACTIVE
/IT WILL RETURN TO CALL PLUS ONE AC: 8. AND DO THAT INSTRUCTION,
/IF THE CONSOL PACKAGE IS NOT ACTIVE THE CALL WILL BE REPLACED
/WITH A 7482 HALT AND THEN RETURN TO THE HALT.
C8PAUS=

/MAINDEC-88-DJADA-C A/D CONVERTER:
2836
2837
2838
2839
2848
2841
2842
2843
2844
2845

2846
2847
2848
2849
2858
2851
2852
2853
2854
2855
2856
2857
2858
2859

MULTIPLEXER

DIAGNOSTIC

PAL18

XCBPAUS

/CHECK

V142A

23-MAR-76

11882

PAGE

IEX.

JHS

ANYTHING

IRETURN

HERE

ACTIVE CONSOL IF NOT
IF ON ACTIVE CONSOL

HALT

HERE

5735
5736
5737
5748
S741
5742
5743
5744
S745
5746

8888

XCBPAU'

C8803:

CLA
JMS
JMP
CMA
TAD
DCA
TAD
DCA
JMP

1335
3335
1357
3735
5735

7482

5761

8248
8188

2862
2863

S762
5763

2864
2865
2866
2867
2868

5764
5765
5766
5767
S778

2869
2878
2871
2872
2873
2874

5771
5773
5774
5775
5776
5777

USED

7848

5768

5772

/CALLS

7388
4777'
5346

5757

ARE

-CHKCLA-

CLL
LOC 22 BIT 3 CONSOLE BIT
CONSOL PART RETURN CALL +1
IDEACTIVE CONSOLE PACKAGE PUT HLT
IGET CORRECT RETURN ADDRS
/SET UP RETURN

ICHECK
IGO DO

CHKCLA
C8803
XCBPAU
XC8PAU
(7482
XC8PAU
XCBPAU

I
I

/GET
/PUT

IGO

FOR HLT
IN CALL LOCATION
HALT OR RETURN TO NEXT

CALL

CODE

HALT
TO

LOCATION

3748
8877
6477
7788
6475
8288
8177

6441
6235
6488

6423
8488

6224
6688
6888

2881

XC8PAU

2861

2876
2877
2878
2879
2888

JMS

/
/

2868

2875

BUFFER

PAGE
/*******t******Attittt*tttititititttiAttitttittttittitiittttttti*tttii

ICBCNTR

/THIS ROUTINE WILL
/IT WILL CHECK FOR

CHECK FOR THE
THE FOLLOWING
XCBCNT

2882
2883
2884
2885

CBCNTR=

JMS

IEX.
/

JMS
JHP

322;

/
/

JMP

XCBCNTR
ANYTHING
ANYTHING

2888
2889

IRETURN

CALL

PLUS

PRESENCE OF CONTROL
CHAR C-R-O-L-S

CHARACTERS

ICHECK FOR CONTROL CHARACTER
ILOC FOLLOWING CALL IS FOR CONTINUING THE PROGRAM
/LOC, IS FOR RETURN IF INHODE SET AND NOT CNTRL CHAR

ONE

CONTINUE

fiMAINDECFBB-DJADA-C A/D CONVERTER:
2090

gggz
5:32

2904

2905
2906
2907
2900
2909

6000
6001
6002
6003
6004
6005

0000

6006
6007

3774'
3255

2910
2911
2912
2913
2914
2915

6013
6014
6015
6016
6017

2916
2917
2910
2919
2920
2921

6021
6022

1257
3256
1656
795%
5226
1773'
7650
5243
2255

2932
2933
2934
2935
2936
2937
2930
2939
2940
2941
2942
2943
2944

6020

6023
6024

2946
2947
2940

2949
2950
2951
2952

6044
6045
6046
6047
6050

6051
6052
6053
6054
6055

6056
6057

6060
6061
6062
6063

2955

6064
6065
6066
6067
6070

295
2950
2959

295$

60 7 1

2960
2961
2962
2963

6074
6075
6076
6077

2953
2954

6072
6073

2970

DONEA.

4767'
2200

5600
EXITA.

2200

1773'
1773'

JMP
TAD
TAD

GOITA,

1366

DCA

1260

1255

TAD
TAD

3254
1654
3254
5654

DCA
TAD
DCA
JHP

0000

GOTOA,
INDEXA.

0000

GETDAT,
XTABLA.
XTABLB.
TABLA.

0000

6147
6136

HOSAVE

/SAVE

INDEXA

ISET

SEE BOG!

“‘Ilfli

GETOAT
DONEA
CBCHAR

I
I

70 IF HATCH
iMATCH
INO HATCH NOT

DIAGNOSTIC

PAL10

/LOCATION
/ADDRS OF
IADDRS 0F

TABLA
TABLB

“?"

Ii’

1‘

/DISPLACEHENT

7575
7564
7557
7556
7555
7573
7574

/BUHP RETURN
/EXIT CALL+2
IBUMP RETURN FOR HAIN PROGRAM CHECK OF CHAR
IPUT CHAR IN AC.
IEXIT
[GET THE CONTENTS OF CHAR
[ADD 100 TO FORM A GOOD ASCII CHARACTER
/RESTORE CDFFECT CHAR
IGET START OF TABLE 0
/GET NON FAR INTO TABLE
/STORE IT
/GET THE ROUTINE STARTTING ADDRESS
ISTORE IT IN HERE
IGOTU CONTROL CHAR ROUTINE
IADD OF CNTRL ROUTINE TO EXECUTE

(100
CBCHAR
XTABLB
INDEXA
GOTOA
GOTOA
GOTOA
GOTOA

HULTIPLEXER

/C0PRNT CHAR
/GET CODE FOR

XCBCNT
COCHAR

0000

END OF TABLE REDO
IBUMP INDEX FOR EXIT HHEN CONTROL FOUND
[BUMP GETOAT FOR COMPARE OF NEXT CNTRL CHAR.
/CHECK IF PROGRAM EXPECTS CHAR
IIBCHAR EXPECTED
0: NO CHAR EXPECTED
/CHAR EXPECTED
/GET CHAR
NOT CONTROL + NOT EXPECTED

CBCHAR

THE

DISPLACEMENT INTO TABLE 0
IGET ADDRs OF TABLE A
[CONTAINS POINTER To CONTROL CHAR
IGET CONTROL CHAR FROH TABLE
ICHECK FOR A 0 END OF TABLE
/END OF TABLE ND CONTROL CHAR
/COHFARE CHAR TO CONTROL CHA

XTABLA
GETDAT

/CNTRL
/CNTRL

c
L

/CNTRL O
/CNTRL
/CNTRL
/CNTRL

0
E

/CONTROL

INTO CNTRL

v142A

TABLE

23-HAR-76

11102

PAGE

1-67

ADDRs OF CONTROL CHAR.
TABLEA
TABLEB
BACK TO HONITOR 203
SRITCH ERROR PRINTTING DEVICE 214
START DISPLAYING CHAR. AGAIN 221
BACK TO BEGINNING OF PROGRAM 222
STOP SENDING CHAR TO DISPLAY NAIT FOR CNTRL O
CONTINUE HITH PROGRAH 205
D CHANGE SwITCH REGISTER ON FLY

SEO

0002

223

0000
T ABLB.

6100
6111
6120
6144
6200

CNTRLC
CNTRLL
CNTRLC
CNTRLR
CNTRLS
CNTRLE
CNTRLD

"“r

6100

3772'

6101
6102

1334
7640

6103
6104

5306

6105
6106
6107
6110

5600

4765'
3334
4765'
5735

ICONTROL G
/START SENDING CHAR. TO THE DISPLAY
/THIS HILL RETURN CONTROL TO CALL THAT HAS SET BY
/THE CALL FOR CONTROL S.
/
INHODE
[SET SOFT FLAG FOR UNEXPECTED CHAR
CNTRLD. DCA
TAD
CBSETS
/CHECK IF CONTROL S TYPED IN
SZA CLA
JMP
BYRETR
/CONTROL 3 TYPED IN
/NO CONTROL S TYPED PREVIOUSLY
JMS
CBGET
JMP I
XCBCNTR
/LEAVE VIA CNTR ENTRY ADDRESS
CBSETS
/CLEAR THE SOFT FLAG
BYRETR. DCA
JMS
COGET
/RESTORE REGISTERS
JMP I
/EXIT TO ADDRESS SET BY CONTROL S
CORETR
/

‘

/CONTROL R
/GO TO THE OUESTION CBSHIT
6111
6112

6113
6114

6115
6116
6117

3764'

CNTRLR.

DCA

3334

DCA

3772'
4763'
3762'
5717
3412

CBBY4.

DCA
JMS
DCA

XDOSH.

JMP I
CBSTRT

TTYLPT
CBSETS
INHODE
UPAROH
CBSHST
XDOSH

2991
2992
2993
2994

/
ICONTROL S
/STOP SENDING CHAR.
/

2995

6120
6121
6122
6123

1334
7640
5326

7001

CNTRLS.

TAD
02A CLA
JHP
IAC

/CLEAR THE TYPE FLAG SET TO TTY
/CLEAR SOFT FLAG FOR CNTRL S
/PRINT
ICLEAR
/GO

IDOSH

2997
2990

{-66

FLSAVE

0000
0000

A/D CONVERTER.

6061
6071
7575
7564
7557
7556
7555
7573
7574

TAD
DCA
TAD
SN6
JHP

3773'

0000

ACSAVE
XCBCNT

2990

2996

PAGE

[CHECK LOC.22 0173 FOR CONSOLE BIT
/ON ACTIVE CONSOLE
IDEACTIVE CONSOLEGET AC FOR RETURN
IEXIT NOT ON ACTIVE CONSOLE

.43

TAD

5600

2979
2900
2901
2902

2903
2904
2905
2906
2907
2900
2909

11302

/SAVE THE Ac

CLA
GOITA
152
INDEXA
102
GETDAT
JHP
REDOA
TAD
INHODE
s2A CLA
JMP
EXITA
TAD
CBCHAR
JMS
XCBTYPE
TAO
1277
JMS
XCBTYPE
JHS
XCBCRLF
Isz
XCBCNT
JMP I
XCBCNT
ISZ
XC0CNT

4771'
1370
4771'

2967
2960

2974
2975
2976
2977

23-MAR-7b

ACSAVE
CHKCLA

TAD
SNA
JHP

1772'

2964
2965

2973

REDOA.

7640
5240
1773'

2966

2969
2970
2971
2972

VlflZA

JMP
TAD
JMP
GTF
DCA
HOA
DCA
DCA

5215

/HAINDEC-00-DJADA-C
2945

PALID

ARE-CHKCLA-XCBTYPE»XCSCRLF-CBGET-UPARowuxcaTYI-XCSPSH.

DCA
JHS

2256

6025
6026
6027
6030
6031
6032
6033
6034
6035
6036
6037

6040
6041
6042
6043

XCBCNT.

6004

6010

2931

USED

3777'
4776'
5206
1777'
5600

6011
6012

2922

:CALLS

MULTIPLEXER DIAGNOSTIC
TO CALL PLUS 700

/
/

3775'
7501

2923
2924
2925
2926
2927
2920
2929
2930

IS
IS

INHODE SET AND NOT CONTROL CHAR
TO CALL PLUS THO IF INHODE Is NOT-SET AND NO
ICONTROL CHAR ..THIS HILL PRINT THE CHARACTER AND A 7
ICLEAR THE AC AND RETURN CALL+2.

2891
3593

2097
2898
2099
2900
2901
2902
2903

/RETURN
IRETURN

THE
AND CBCHAR
FLAG FOR CNTRL D OR R
ADDRs OF CBSHIT
IS LABEL FOR CBSHIT OUESTION

1‘_.,V
To DISPLAY

UNTIL A ‘0

RECEIVED

CBSETS

/IF1

CBDO7

/DONT SET UP CBRETR
IMAKE RETURN CALL PLUS

NOT

STORE

CORETR

/MAINDEC-08-OJADA-C A/D CONVERTER: MULTIPLEXER DIAGNOSTIC
1200
3335
2334

4200

3007

6124
6125
6126
6127
6130
6131
6132
6133

7200
5320

3005
3009

6134
6135

0000
0000

3000
3001
3002

3003
3004

3005
3006

CSDOTA

4761'
4765'

TAD
DCA

XCSCNT
CBRETR

ISZ
JHS
JHS
JMS

CBSETS
XCSTTYI
CBGET
XCOCNTR

CLA
JHP

CNTRLS

1764'

6137

3017
3018
3019
3020
3021
3022

6140
6141
6142
6143

7040
3764'

[GET PRESENT CBSHIT
[COMPLEMENT IT

4763'
4765'
5600

JHS
JMP

[STOR NEH CSSHIT
[CEPRNT
AND CHAR ON NEW
IRESTORE THE REGISTERS
[EXIT

6144
6145
6146

4763'
4765'
5600

6147
6150

OUTPUTS

1-69

SEQ

0004

THE

ARE

UPAROR
CGGET
XCBCNT

INDICATOR

‘

INOUIRE

UPAROR
CBGET
I

DEVICE

ERROR

[PRINT THE CONTROL CHAR
[GET THE REGISTERS
[RETURN TO CALL PLUS ONE

XCSCNT

[CONTROL C
[RETURN TO MONITOR CONTROL
TTYLPT
CNTRLC; DCA
DCA
CBSHST

3764'
3762'

[CLEAR
[CLEAR

THE LPT FLAG TO PRINT ON DISPLAY
THE FLAG FOR HULTIPLE ENTRIES
[INTO CSSRIT
[CDPRNT A‘ AND LETTER IN CHAR
[GO TO 0 FLD
[CLEAR THE WORLD
[GO TO DIAGNOSTIC MONITOR
~

6151
6152
6153
6154

4733'
6203
6007
5760

JMS
GDP
CAF

CIF

JMP

UPAROH

(7600

If*itittitittitttitititiittititttttittttttttttAittttttttttttitttttttit
/

[

3053
3054

6171
6172

6476

7600
5670
6344

6215

[MAINDEC-08-DJADA-C

3055

6173

3056

6174

3057
3058
3059

6175
6176
6177

A[D

CONVERTER:

MULTIPLEXER

DIAGNOSTIC

V142A

PAL10

23-MAR-76

11802

6475
6713

6714
6600

6712
6200

PAGE

3060
3061
3062
3063
3064
3065
3066

[

[CONTROL D
[CHANGE THE SHITCH REGISTER
[THE PROGRAM RUNNING.

6200

6201
6202
6203
6204
6205
6206
6207

6210
6211

4215
1213
7640
5207

CNTRLDI

1777'
3214
2213
4255
3213

£80011:

4224
5614

3077
3078

6212

3079
3080
3331
3332
3333
3334

6213

0000

COSETD'

6214

0000

CORETDA

3215
3213
3217

3333
1373

JHS
TAD
SZA CLA
JHP
TAD
DCA
ISZ
JHS
DCA
JHS

UPAROH

JR?

ANYTIME

CNTRL

AND

RETURN

RETURN ADDRS

SAFE

CBSETD

[CHECK

CBDOII
XCSCNT
CORETD
CSSETD
XCSPSR
CSSETD
CBGET

[DO NOT CHANGE THE RETURN ADDRS
[GET THE RETURN ADDRS AND SAVE IT
[SAVE THE RETURN HERE
[INDICATE RETURN SAVED DONT DISTROY
[GO CHANGE THE SWITCH REGISTER

CBRETD

[RETURN

CHAR

THE

[CLEAR THE FLAG
[RESTORE THE AC
THE

MO LINK
PROGRAM

ETC

[

[THIS

0
0

HILL

TYPE

ARRDH

AND

THE

CBCHAR.

3335

UPARDH.

3775'

3339

3223

1774'

3393
3391
3392

3221

4775'

3222
3223

3773'

3224

3333

3225
3223
3227
3233
3231
3232
3233
323a

7233

3393
3394
3395
3096
3391
3393
3399
3133
3131
3132
3133
313a
3135
3133
3131

PAGE

CHAR

6521
6224
0100
6423
0277
6477

3337
3333

0083

JMS
JHS
JMP

CNTRLE;

3047
3040
3049
3050
3051
3052

3333

SEQ

[CONTROL

6160
6161
6162
6163
6164
6165
6166
6167
6170

3076

TWO

TTYLPT

3042
3043

3074
3075

THE

CONTROL

TTYLPT

3040
3041

3071
3072
3073

REASK

CNTRL O R

DCA
JHS

3025

3067
3068
3069
3070

NOT

TAD
CHA

CNTRLL:

/
[

3046

1'60

‘

[CONTINUE RUNNING FROM A

3045

PAGE

3024

3044

THE

[IF

3023

3038
3039

[GET REGISTERS
[CHECK FOR

[
[

6136

3037

[SWITCH OUTPUT FROM ONE OUTPUT DEVICE TO ANOTHER
[CONSOLE AND THE PRINTER HITH DEVICE CODE 66.

3014
3015

3029
3030
3031
3032
3033
3034
3035
3333

11102

[

3016

3026

23-HAR'76

COSETSA
CORETRp

3010
3011
3012
3013

3027
3024

V142A

PAL10

[GET RETURN FOR THIS CALL
[STORE IT HERE FOR USE BE CNTROL O
[SET FLAG TO SAVE CALL
[LOOK FOR THE INPUT

5315

3
TAD
JMS
TAD
ans
ans
JHP

IcaPRHT

1333

[CODE

XCBTYPE
CBCHAR

[CSTYPE

XCBTYPE
xcaanF
UPARDH

[EXIT

THE

FOR

AND

THE CHAR CBTYPED

THE

CHAR

[tittittiitititttttttitttttitti**6*itttitittittttttittttttitttttttiaiitt

1772'
7421
1771'
7333

7233

1173'
5324

caGET.
'

CLA
TAD

HnsAVE

HGL
TAD

FLSAVE

[RESTORE

TAD
JHP

[RESTORE THE LINK

RAL
CLA
I

AcsAvE
CGGET

[RESTORE THE Ac
[GET THE REGISTERS

lMAINDEC-08-DJAOA-C A/D CONVERTER,
3109
3110
3111
3112
3113
3114
3115
3116
3117

MULTIPLEXER

PAL10

DIAGNOSTIC

V142A

23-MAR-76

11102

PAGE

1070

SEQ

0065

/********t************fi*****t**tttiti*itiii*it*ii****i************it*

ICBINOU
ICBINOU

ROUTINE WILL PRINT A NAITING
/AND THE PROGRAM IS EXPECTING A CONTROL CHAR INPUT
IIF CONTINUE FROM CONTROL CHAR RETURN I8 CALL PLUS ONE
/IF NO CONTROL CHAR ENTERED THEN WAITING IS REPRINTEO
IAND PROGRAM WAITS FOR A CONTROL CHAR AGAIN.

.‘.‘fli

3118
3119
3120
3121
3122
3123
3124

3125
3126
3127

0000
4767‘
7010

CBINOU

IEX.

JHS

ICALLS

USED

XCBINO:

3138

XCOINO
WILL PRINT A WAITINGAND WAIT FOR INPUT
IRETURN IS CALL PLUS ONE AC :0 CONTINUE
ICB

XCBINO

ANYTHING

-CHKCLA-XC8PNT-XC8TYI'CBGET-XCBCNTR'

ARE

ICHECK LOC 22 BIT 3 CONSOLE
IACTIVE CONSOLE PACKAGE
[NOT CONSOLE LEAVE

CHKCLA

JMS
SKP

XCSINO
XCSPNT

JMP I
JHS
WATMES
JMS
JMS
JMS
JMP I
JHP

5635

4766'
6250
4765'
4224
4777'
5635
5236
2701
1124
1116

JMS

TEXT

NATMESA

IINOUIR NAITTING
IGET CHARACTER

XCBTTYI
CBGET
XCBCNTR
XCBINO
XCBINO+1
"WAITING

BIT

CONTROL CHARACTER
CONTINUE

ICHECK IF
IEXIT AND
IREASK
"

0740
0000

3139
3140

/fi******t**t*ii***i******titi***t**ttflii*t***t*tiittiiifii****ti*i**i*i

3141

3142
3143
314a
3145
3146

ICSSHIT
HILL CHECK IF CONSOL IS ACTIVE IF IT IS ACTIVE DISPLAY
BUT
/SN OUESTION . IF NOT ACTIVE IT NILL NOT PRINT THE sw GUESTION
/RETURN TO CALL PLUS ONE AC=0.
SWITCH
PSEUOO
/CSSNIT NILL SET UP THE
IREGISTER NITH THE NEW DATA ENTERED
/ROUTINE

3107
3148
3109
3150
3151
3152
3153
3154
3155
3156
3157
3158
3159

3162
3163

3164
3165
3166
3167
3168
3169
3170
3171
3172
3173

3174
3175
3176
3177
3178
3179
3180

3181
3182
3183

3184
3185
3186
3187

3188
3189
3190
3191

CSSWIT

6255

0000

6256
6257
6260

6261
6262
6263
6264
6265
6266
6267

6270

6271
6272
6273
6274
6275
6276
6277

JMs

/CALLS

USED

XCRPSN,

SKP

JMP

1344

TAD

7640
5764'
2344
4766'
6346
1020
4763'
1362
4775'

szA CLA
JMP
CSBY4
Isz
CSSHST
JMS
XCSPNT
MESA
TAO
20
XCBOCTA
JMS
TAO
(40
JMS
XCBTYPE
Isz
INMODE
JMS
XCSECHO
JMS
TSTCHA
TAD
CSCHAR
DCA
20

4760'
4314
1774'
3020
1357

6305
6306

7106

6307
6310
6311
6312
6313
6314
6315
6316
6317
6320
6321
6322
6323
6324
6325
6326

1774'
3020

3205
3206
3207
3208

6331
6332

3209
3210

6334
6335
6336
6337
6340
6341

6333

CBROPS.

2761'

3345
4760'
4314
1020

6330

MULTIPLEXER

JMS

GETCHI.

TSTCHA.

CSCHAR
20
TMPCNT
GETCHI
ENDIT

/GET

1355

TAD

7710

SPA

5335

JMP
TAO

1774'

CLL

(215
CLA
ENDIT
CBCHAR

(-260
CLA
ERRI

CBCHAR

1354
7700
5335

TAO
JMP

ERRI

1774'

TAO

CSCHAR

0353
3774'

AND
OCA

caCHAR

SHA

ERRI,

JHP
TAD

ENDIT,

JMS
JMS
JMP
JMS

5714
1352

4775'
4773'
5265

4773'

ONéaAC

23-MAR-76

PACE

11:02

1-71

SEO

0086

OUESTIoN

I“..‘f

MINUS

TEMP

COUNT

CHAR
CR +

GOOD CHAR
CSSNIT REGISTER
/ROTATE IT LEFT 3 PLACES

IGET

CHAR

ADD

CONTENTS

[SAVE

NEN CONTENTS
IBUMP COUNT
IJMP BACK 4 GET NEXT CHAR
IEND a CHAR CBTYPED IN

SNA
JMP
TAD

1774'

CALL PLUS

/SET FLAG FOR CHAR EXECTED
/LOOK FOR INPUT
INOT SONTROL TEST IT Is LEGAL
/STORE NEH CHAR IN SH REG

/GET

CIA
TAD

5341

IF
IS

/GET CONTENTS OF SN
/CONVERT IT TO ASCII
/GET SPACE

/STORE IN
/GET NEXT
/CHECK IF

JMP

PACKAGE.

V142A

PAL10

(-3

5341

CBSHIT

/CHECK LOC 22 BIT 3 CONSOLE BIT
/ACTIVE CONSOLE
/DEACTIVE CONSOLE PACKAGE
/RETURN HITHOUT ASKING PSEUDO SRITCH
[IS THE SOFT FLAG SET FOR SNITCH?
/SKIP IF ONE ENTRY AT ATIME OK
ISECOND ENTRY NITH OUT A EXIT GO TO SH
IFIRST ENTRY SET FLAG
ICBPRNT SR:

TMPCNT
XCBECHO
TSTCHA
20

DCA

1356
7650

DIAGNOSTIC

TAO

Isz
JMP

0000

XCSPSN
CSSNST

JMS
JMS
TAD

2345
5302

7041

/SET UP PSEUDO
ION THE CONSOL

OCA

RTL
RAL
TAD

7004

CHKCLA
I

XCBPSN

-CHKCLA.XCSPsw-XCSPNT-XCSOCTA-XCBTYPE-

5655

6301

6304

ARE

4767'
7410

6300

6302
6303

JMS

’Ex'

6327

3211
3212
3213
3214

V.-ifl

(MAINOEC-08'DJADA-C A/D CONVERTER,
3160
3161

(-270
CLA

TSTCHA
(277
XCSTYPE

/CMPL CHAR IN AC
ITEST IF IT IS A CARRIAGE RETURN
/SKIP IN NOT CR.
/NAs CARRIAGE RETURN
/NOT CR. GET CHAR
/CHECK IF IT IS IN RANGE
/IF NOT POSITIVE CSERR CHAR SMALLER
ICBERR - CHAR TOO SHALL
/GET CHAR
IGET A -270 0 CHECK IF IT IS LARGER
/SKIP IF LESS THEN 7
ICBERR ON CHAR NOT IN RANGE
/GET CHAR
/MASK FOR RIGHT BYTE
/STORE IN CHAR
IGET CHAR IN AC

/EXIT
/CaPRNT
/?

XCSCRLF

CBRDPS

IEXIT
/DO A

XCSCRLF

ASK

AGAIN

THEN

260

THEN

7
,

“-j‘i

IMAINDEC-0B-DJADA-C
3215
3216
3217
3218
3219
3220

6342
6343
6344

3344
S655
0000

6345
6346
6347

0000
2322
7540

6350

0000

6352

0277
0007
7510
7520
0215

A/O

CONVERTER:

MULTIPLEXER DIAGNOSTIC

DCA
JMP

CBSNST.

TMPCNT,

MESA:

TEXT

CBSWST
XCBPSW

"SR:

PAL10

ICLEAR

IEXIT

23-MAR'76

V142A

THE PSN
ROUTINE

ENTRY

11102

PAGE

1-72

SEQ

0087

PAGE

1-73

SEQ

0088

FLAG

3221
3222

3223
3224
3225
3226
3227
3228
3229
3230
3231
3232
3233
3234
3235

6353
6354

6355
6356
6357
6360

6361
6362
6363
6364
6365
6366

7775
6463
6476
0040
6400

6115

3236

6367

5670
5701
6600

3237

6370

6712

3238
3239
3240
3241
3242
3243
3244

6371
6372
6373
6374

6714
6713
6423
6475

6375
6376
6377

6477

0336
6000
6400

3245
3246
3247
3248
3249
3250

/OCTAL T0 ASCII CONVERSION
ITHIS ROUTINE WILL TAKE THE
/THE RESULT WILL BE PRINTED
/
CBOCTA= JMS XCBOCT

3251
3252
3253
3254
3255
3256
3257
3258
3259

PAGE
ICBOCTA

THE

NUMBER IN THE AC
CONSOL TERMINAL

AND

CONVERT

IEX.

6400

0000

6401

3262
3263
3264
3265
3266

6403
6404
6405

7106
7006
3221
1377
3222
1221
0376

6402

6406
6407

XCBDCTp
‘

C8DO4.

JMS
RETURN
USED

6410
6411
6412
6413
6414
6415
6416
6417
6420

6421
6422

ARE

TAD
DCA
TAD

CALL PLUS

IAC CONTAINS
ONE Ac=g

NUMBER

CHANGE

-XC8TYPE-

IPOSITION THE FIRST CHAR FOR PRINTING
/SAVE CORRECT POSITIONED NORD HERE

C8TMP1
(-4

ISTORE COUNTER IN
IGET FIRST NUMBER

C8TMP1
(0007

MULTIPLEXER

TAD
JMS
TAD
RTL
RAL
DCA
182
JMP
JMP

C8TMP1,

0000

CBCKPo

HERE

IMASK

DIAGNOSTIC

(260
XCBTYRE
CSTMPI

1221
7006
7004
3221
2222
5206
5600
0000

3280
3281

CBCKP

AND

1375
4277

XCEOCTA
IS

CLL RTL
RTL
DCA

/MAINDEC-08-OJADA-C A/D CONVERTER.

V142A

PAL10

[PUT

NEXT NUMBER IN
ISTORE IT
IDONE YET WITH FOUR
INOT YET DO MORE
IDONE WITH FOUR

C8TMP1

CBCKP
I

23-MAR-76

THE PRINT CONSTANT
ITYPE THE NUMBER
/
/ADD

C8004
XCBOCT

POSITION
NUMBERS

/*******tt**i**t*t****tt*tttt***********tt*ittttititt*ttttttittttittti

/C8CRLF

3282
3283
3284
3285
3286
3287

/C8TYPE CR

AND

NITH

FILLERS

FOLLOWING

EACH

AND

C8CRLF=

JMS

XCBCRL

JMS

IEX.

3288
3289
3290

XCSCRLF

USED

ARE

XC8CRLF;0
CLA

CLL

ICALLS

/C8PRNT

/RETURN

CALL

LF WITH
PLUS ONE

FILL
AC

~XC8TYPE-

3291

3292
3293
3294
3295
3296

3297
3298
3299
3300
3301
3302
3303
3304
3305

3306
3307
3308
3309
3310
3311

3312
3313
3314
3315
3316
3317

3316
3319
3320
3321

ASCII

/
/
ICALLS

i360
61

3267
3268
3269
3270
3271
3272
3273
3274
3275
3276
3277
3278
3279

OCTAL
ON

6423

0000

6424
6425
6426
6427
6430
6431
6432
6433
6434
6435
6436
6437
6440

7300
1374
4277
1237
7040

3240

1373
4277

C8002,

2240

5233
5623
0004
0000

1215

TAD
JMS
TAD
CMA

FILLER,
FILCNT'

DCA
TAD
JMS
152
JMP
JMP
0004
0

CODE

FOR

ISTORE FILLER
/GET CODE FOR

/GET

XCBTYPE
FILLER

FILCNT

(212
XCBTYPE
FILCNT
C8002
XCSCRL

ICHECK

HERE

FILLER CHAR

iTYPE A NON PRINTING CHAR
IEXIT
/FILLER SET FOR 4 CHAR
ICOUNTER FOR FILL

//**t*iiitiAtit*Aiittiitttti*t*tt*******t****t*tttfit*ti****t**i
/C8CKPA
ITHIS ROUTINE WILL CHECK IF A CHARACTER HAS ENTERED FROM THE
/TERMINAL. IFTHE FLAG IS SET AND THE CONSOLE PACKAGE IS
/ACTIVE A CHECK IS MADE TO DETERMIND IF IT IS A CONTROL CHAR.
/IF IT HAS A CONTROL CHAR THEN ITS CONTROL FUNCTION IS PERFORMED.
/IF NOT A CONTROL CHARACTER OR A CONTROL E-D-L-O- IT WILL DO
/THE CONTROL FUNCTION AND RETURN TO CALL PLUS
IA NON CONTROL CHARACTER WILL BE PRINTEDAND A "7” IT WILL RETURN TO
ICALL PLUS 2,
IIF NO FLAG IS SET OR THE CONSOL IS NOT ACTIVE THE RETURN IS TO
[CALL PLUS 1.

11:02

/HAINDEC-OS-DJADA-C A/D CONVERTER.
3322
3323

MULTIPLEXER DIAGNOSTIC

CSCKPAB

FALlfl

V142A

zs-ma-u

11102

PAGE

1-74

see

8889

JHS

JMS
XCBCKPA
[CALL TO CHECK IF CONTROL CHAR SET
ANYTHING(SKIPJ
[RETURN IF NOT FLAG OR NOT CONSOLE ACTIVE
ANYTHING(JMP EXIT SKIP CHAIN)
[RETURN IF NOT CONTROL OR CONTINUE CONTROL

[EX.
[

[CALLS USED

ARE

uXCSTTYI-XCBCNTR-CSGET-

XCBCKPI

ACSAVE

[SAVE THE AC
[SAVE THE FLAGS
[SAVE THE FLAGS
[PUT MO IN AC
[SACE THE MO
[CHECK THE KEYBOARD FLAG
[EXIT TO CALL PLUS 1
[CHECK LOC 22 BIT 3 CONSOLE BIT
[ACTIVE CONSOLE PACKAGE
[EXIT TO CALL PLUS 1
[GET THE CHAR
[GET THE FLAGS
[CHECK IF CONTROL
CHAR[RETURN IF A CONTINUE CHAR.
[BUMP RETURN FOR CALL PLUS 2
[GET REGISTERS

FLSAVE
HOSAVE

CSBY3
CHKCLA

CBBY3
XCSTTYI
CBGET
XCSCNTR
XCSCKP
CSGET
XCSCKP

COBY3I
5641

[SAY GOOD BY

//ii******i**i*************A*******A*AitflA****!****fl**t*******t***i****

[CBECHO
[THIS ROUTINE HILL LOOK FOR A CHAR FROM THE KEYBOARD.
STORE IT IN LOCATION CHAR
[CHECK IF IT WAS A CONTROL CHARACTER
SET INHODE - PRINT CHARACTER
'

CSECHO
JMS

/EX.

USED

[CALLS

JMS
XCBECHO

ARE

XCSECH
[LOOK FOR CONSOL CHAR
[RETURN CALL PLUS ONE

CBPRNT
AC

CHAR

CBTYPED

-XC8TTYI-XC8CNTR-CBGET-XCBECH-XCOTTYPE

/
»

6463

0400

6464

4766'
4765’
2276
4764'

6465
6466

6467
6470

6471
6472
6473
6474
6475

3394
3395
3393
3397

3398
3399
3488
3481
3482
3483
3484

3425
3406
3487
3488
3489
3418
3411
3412
3413

6476

JMS
JMS

ISZ
JMS
JMP
JMS
DCA
TAD

5663

4277
3276
1275
5663

BOOB

A/D

CONVERTER,
INMODEI

[CSTYPE
[THIS ROUTINE

WILL

DIAGNOSTIC

CBPRNT

[
/

CSTYPE=

JHS

[EX.

JMS

V142A

PALIO

11802

PAGE

NEEDED

BYCSOCT

23-MAR-76

SEO

1-75

GOOD

XCBTYPE

6477

@600

[CALLS

USED

XCSTYP;

THE

CONSOLE

THE

[CBPRNT
[RETURN
[DO NOT

[STORE CHAR

JHP

XDOLPT

[DO

6504
6565
6566
6597

TAD
TLS
TSF

PNTBUF

6518
6511
6512
6513
6514
6515
6516

TCF
JMP
TAD
PSTB

PNTBUF
PCLF

[GET CHAR
[CSPRNT IT

JMS

CBHANG

[CHECK KEYBOARD

PCLF

[CLEAR

76OO

XCOTYP

[CLEAR
[EXIT

COBYS,

JMP

6517

TTYLPT:

3414
3415
3416

6522
6523
6524

CSHANGp

3417

6525

3418
3419

6526

6527
6536

6531
6532
6533

6534
6535
6536
6537
6540

6541
6542
6543

66.

ROUTINE

VII"

[CHECK

OBTTY

7777=LPT

CLA

JMP

XDOLPT:

DEVICE CODE

THE CHAR IN THE AC.
CALL PLUS ONE AC =OOOU
CLEAR THE LINK IN THIS

PNTBUF
TTYLPT

TAD
SZA

6522
6503

WITH

ARE 'COHANG-XCBCNTR-XCBPNT-XCOCRLF-XCBINOU-

DCA

6500
6501

LPT

XCSTYP

PNTBUF:

3429
3438
3431

MULTIPLEXER

/**i********i**************fi**********i*******i***t*********i*******‘*

6521

3427
3428

CHAR

6520

3428
3421
3422
3423
3424
3425
3426

[WAIT FOR CHAR FROM KEYBOARD
[RESTORE THE REGISTERS
[SET INMODE IDENTIFING THIS AS A EXPECTED
[GO CHECK IF IT IS A CONTROL CHAR
CONTINUE RUNNING
[WAS A CONTROL CHAR
[NOT A CONTROL CHAR CBPRNT IT
[CLEAR FLAG THAT CHAR EXPECTED
[GET CHAR IN AC
[EXIT

XCSTTYI
COGET
INMODE
XCSCNTR
XCOECH
XCOTYPE
INMODE
COCHAR
XCBECH

JMP
O

COCHAR'

0000

[MAINDEC-OB-DJADA-C
3377
3378
3379
3388
3381
3382
3383
3384
3385
3386
3387
3388
3389
3390
3391
3392
3393

XCSECH:

OUT

PUT

LPT

.‘1
CBBYS

THE
THE

HUNG
‘

FLAG
AC

CLA
TAD

DCA
PSKF
SKP
JNP I
ISZ

CSBYS
PNTBUF

COHANG

COCONT

JHP

.-4

ISZ
JMP
TAD

PNTBUF

DCA
DCA
JMS
MESHANG

COHANG

JMS
JHS

.-3
XCSCNTR

TTYLPT

[GET CONSTANT 7696
[FNTBUF IS NON A COUNTER
[SKIP ON PRINTER DONE
[NOT DONE YET
[SAN FLAG DONE
[FIRST COUNTER FAST ONE
[CHECK IF FLAG SET YET
[MADE 4096 COUNTS ON FAST COUNTER
[KEEP IT UP FOR 5 SEC
[GET THE RETURN ADDRESS IN CONTROL
[SAVE IT IN HANG
[ALLOW PRINTING ON TTY

XCOPNT

[LPT
XCOCRLF
XCSINOU

ERROR

[PRINT

WAITING

1‘.‘iy

A/D

/MAINDEC-08-DJADA-C
3432
3433
3434

3435
3436
3437
3438
3439

5722
0000

COCONTo

1420
2440

MESHANGpTEXT

4522.

6551
6552

2217
2200

6562

6235
5701

3442
3443

6571

3445

3447
344a
3449

6570
6572
6573
6574
6575
6576
6577

23-MAR~76

ITHIS ROUTINE HILL CHECK LOCATION 22 THE HARD HARE CONFIG HORD.
/TO SEE IF THE CONSOLE BIT 3 )400) IS SET IF SET THEN RETURN
ITO CALL PLUS TWO PO A ACTIVE CONSOLR PACKAGE AC30
/IF NOT SET THEN TO CALL PLUS ONE FOR A DEACTIVE CONSOLE PACKAGE.

CHKCLAI

6600

0000

6601
6602
6603

CLA
TAD

6605

7200
1022
0377
7650
2200

6606

5600

JMP

6604

AND
SNA

IEX.

CHECK IF
C8ERR=
JMS

6607
6610
6611

0000
6002

6004

6613

3314
7501

6615
6616
6617
6620

USED

XCSERR,

0
IOF
DCA

3312

6612
6614

ICALLS

A/D

CONVERTER;

IACTIVE CONSOLE PACKAGE RETURN
ICALL PLUS ONE (1) FOR ACTIVE
/DEACTIVE CONSOLE PACKAGE RETURN
ICALL PLUS THO (2)

CHKCLA
I

/C8ERR
ITHIS ROUTINE

CHKCLA

WILL DETERMINE WHAT TO DO WHEN A CSERR IS ENCOUNTERED
CLASSIC SYSTEM: WILL CHECK CSSNIT REGISTERS.
JHS XCBERR
XCBERR
/GO TO CSERR CALL IF NOT CONSOL
IRETURN IS CALL PLUS ONE AC =0000

ARE

-CHKCLA-XCBCRLF-XCBSN-XCSINQU-XCSPNT-XCSOCTA-

ACSAVE

MULTIPLEXER

GTF
DCA

/SAVE

DCA

DIAGNOSTIC

7340
1207
3311

CLA

CLL

TAD
DCA
JMS
SKP
JMP
JMS
JMS

6621
6622
6625
6624
6625

ISAVE

XCSERR
PCSAVE

CHKCLA
CSBYZ
CBGET
XCBSN

XCSPNT

3544

3547

6640

3508
3549

6641

3515
3513
3517

3514
3519
3524
3521
3522
3523
3524

3525
3524
3527
3524

AND

SZA

(0000

CLA

XCBOCTA

THE

ERROR

/PRINT

THE

MESSAGE

STSTEMENT

ICONVERT

/PRINT

THE

DIGIT

IPRINT

/PRINT

ASCII

MESS

‘MOSAVE
XCOOCTA
XCSPNT

FLSAVE
XCBOCTA

XCSCRLF
CSGET
XCBSH

£80010:
SPA

CSBYZ
XCBINO

JMS

CSBYZ,

ISZ
JMS
JHP

/RESTORE REGISTERS
ICHECK SWITCH REGISTER
ISKIP IF BIT 0 NOT SET
ILEAVE
/GO TO THE INOUIRE ROUTINE

CLA

XCSERR
CSGET
XCSERR

ERRMESI

TEXT

'DJADAC

MESPCI

TEXT

6671
6672

6673
3529

/PRINT

ACSAVE
XCBOCTA
XCBPNT

6660

6674
6675

FLAGS

XCSPNT

6645
6646

6664
6665
6666
6667
6670

THE

PCSAVE

6642
6643
6644

6661
6662
6663

23-HAR-76

/SAVE THE MO
ISUBTRACT A 1 FOR TRUE LOCATION
IGET RETTURN LOCATION
ISAVE ADD OF CSERR CALL
ICHECK LOC.22 BIT 3 CONSOL BIT
IACTIVE CONSOLE PACKAGE
INOT CLASSIC SYSTEM
IRESTORE REGISTERS
ICHECK SWITCH REG FOR BIT THAT INDICATES
INO ERROR MESSAGE
/MASK FOR BIT FOR NO ERROR PRINTING
IIF THIS ERROR MESSAGE IS TO ALWAYS
IBE PRINTED LEAVE AND VALUE AT 0000
ISKIP IF BIT IS 0 PRINT ERROR MESSAGE
/DO NOT PRINT

6634
6635
6636
6637

SETUP1:

6627

6647
6650
6651
6652
6653
6654
6655
6656
6657

V142A

HOSAVE
CMA

CSDO10
XCBCRLF
XCBPNT

3513
3514

PAL10

FLSAVE

6630
6631
6632
6633

3514
3511
3512

HOA

3313

3499

3543
3544
3545

ISZ

IWILL

/GET THE COTENTA OF LOCATION
/HASK FOR BIT 3 (400

(400
CLA

6626

3542

SEQ

PAGE

3494

3541

1'77

0007

3495
3494
3497
3498
3544

PAGE

0260
7774
6600

/HAINDEC-08—DJAOA-C

3493

11802

6600

6713
6714
6712
0212
0215

liiifltiAAAA’A‘AAi*Atti‘kii’iitit*fiiiiit******ti**i**i’ititiiitttttfitiiiifi

3492

SEQ 0091

6224
5670

/*t*********‘A’A‘ktitttitiflkitttiAiiiiA*ti'k‘fliiAititiitifiititifiitiitti‘flti't

3442
3443
3444
3445
3444
3447
3488
3449
3494
3491

1'76

6000

3451
3452
3453
3454
3455
3456
3457
3458
3459

3466
3467
3465
3469
3470
3471
3472
3473
3474
3475
3476
3477
3478
3479
3460
3481

PAGE

ERROR"

3450

3460
3461
3462
3463
3464
3465

11102

ICONTINUE TO SAVE ADDRESS
ICOUNTER FOR TIMER

"LPT

V142A

PAL10

DIAGNOSTIC

CSHANG

6545
6546
6547
6550

3440
3441

3444

JMP

6544

6563
6564
6565
6566
6567

3445

MULTIPLEXER

CONVERTER:

Pcs'

/GET

FAILED

THE REGISTERS

0092

lMAINDEC-08-DJADA-C
6676
6677

3531

6700
6701
6702
6703

3532

6704
6705
6706

3530

6707
6710

3533

6711

6712
6713
6714
6770

A/D

TEXT

AC1”

4040

MESMO'

TEXT

”

nos"

HESFLI

TEXT

FL!”

PCSAVE:

7777
7777
7777
7777

PAL10

23-MAR-76

V142A

11802

PAGE

1-78

SEQ

9093

1521
7200
4040

0614
7200
7777
7777
7777
7777
6235

6771

6400

5701

ACSAVEI
MGSAVEI
FLSAVE:

6423
0000
5660

6224
0400

7000

0000

7001
7002
7003
7004
7005
7006
7007

1022
0377
7650
5220

7010

5216

7011
7012
7013
7014
7015

7040
3775'
7040

/C8/
/C8/

ROUTINE TO INITIALIZE
THE CONSOLE PACKAGE.

CBIZI

3774‘
5600

FOR

RUNNING

(40 0

/C8/SKP

CLA

/C8/GO
/C8/IS
/C8/
lCS/SKP
/C8/
/C8/

C81 ZN
HCW 1
(34

CLA
CBI ZER

WITHOUT

WITH

EITHER

/C8/
/C8/CONSOLE
ICS/

HCN 2

TAD
AND
SNA
JMP
TAD
AND
SNA
JMP
CMA
DCA
CMA
DCA
JMP

1021
0376
7650

7402

ICB/

PAGE

/C8/

7016

DIAGNOSTIC

MULTIPLEXER

MESAC:

6772
6773
6774
6775
6776
6777

CONVERTER.

2003
7200
4040
0103
7200

CALLED FOR?

PKG

IF YES.
INIT FOR NO CONSOLE PKG.
THERE ENOUGH CORE (8K OR

MORE)?

YES.

ICE/SET CONSOLE PKG ACTIVE FLAG.

CSF

ICBI
C8 IZF
CSIZ

TO RUN WITHOUT

/C8/

lCS/

HCWIo

RUN

ALREADY
CALL¢1-

ICBISET

INIT

ICBIRTN

CONSOLE

PKG:

DONE

BIT

HCWZ:

MUST

WITH CONSOLE PKG; HCN2; BIT 3 MUST
BITS 7'11 MUST INDICATE 8K OR MORE.

ADJUST MENTS

/C8/

MAKE

/C8/
/C8/
/C8/

*ttwARNINsttt

CBIZER'

HLT

AND

ANY

(AT

RESTART

ATTEMPT TO RUN THE
CONSOLE PKG: IN 4K WILL
PROGRAM ACTION.
AN

/C8/SEE

FLAG.

0.
-AND-

LEGAL START

ADDRESS).

PROGRAM: WITH THE
RESULT IN UNSPECIFIED

ABOVE

COMMENTARY.

‘3

‘

[MAINDEC-08-DJADA-C
3576
3577
3578
3579
3580
3581
3502
3583
3584

3585
3586
3587

3588
3589
3590
3591
3592
3593
3594
3595
3596
3597
3598
3599
3600
3601
3602
3603
3604
3605
3606
3607
3608

3609
3610
3611
3612
3613
3614

3615
3616

3617
3618

3619
3620
3621
3622
3623
3624

7017
7020
7021

5216

7022

1373
3010
1372
3410
1010
7041

7023
7024
7025
7026
7027
7030
7031
7032
7033
7034
7035
7036
7037
7040
7041
7042
7043
7044
7045
7046
7047
7050

C8IZNA,

SZA
JMP
JMP

5600

CSTABBa

CSIZF

(C8TABB-1
10
I

10
10

(CSTABE'I
CLA

CBCALA
CSCALB

CBCALF
CSCALG

CBCALH
CSCALI
CBCALJ

CSCALK
CBCALL
CBCALM
CSCALN
CBCALO
CBCALP
CSCALG
CSCALR
CBCALS
CSCALT
COCALU
CBCALV
CBCALN
CBCALX
CBCALY
CBCALZ
C6CALO

C8CAL1
C8CAL2
C8CAL3
C8CAL4

V142A

23-MAR-76

ICE/NO CONTINUE.
/C8/
ICSISET 'INIT ALREADY DONE‘ FLAG.
/C8/NEGATE ALL CALLS TO THE CONSOLE
PKG BY REPLACING THEM WITH A
/C8/
HLT INSTRUCTION.
/C6/
'/C8/
ICE/ALL CALLS NEGATED?

11:92

PAGE

1-79

SEQ

0094

IAC

PAL10

(7402

CBCALC
CBCALD
CBCALE

SSS

7177

CMA
DCA
TAD
DCA
TAD
DCA
TAD
CMA

DIAGNOSTIC

C8IZER

TAD

1371
7640
5224

CBTABEI

3630

3627
3628

CSIZN,

3774'

7060
7061
7062
7063
7064
7065
7066
7067
7070
7071
7072

7171

MULTIPLEXER

JMP

7054
7055
7056
7057

3629

3626

7040

CONVERTER:

7051
7052
7053

7172
7173
7174
7175
7176

3625

A/D

C8IZNA
CBIZ

lCS/
ICBI
/C8/SKP
/C8/
lC8/RTN

YES.

CALL01.

‘~Ilflr

/C8/
lCS/
/C8/
ICB/
/C8/
IC8/
lCS/

/C8/
/C8/
/C8/

/C8/
ICBI
ICB/
ICB/

/C8/
/C8/

/C8/
ICS/
/C8/
ICB/
IC8/

/C6/
'0

/C8/
/C8/
/C8/

lCB/
/C8/
/C8/
/C8/
/C8/
/C8/
/C8/

‘K‘

A/D

CONVERTER:

MULTIPLEXER DIAGNOSTIC

PAL10

V1421

23-MAR-76

11102

PAGE

1-33

SEQ

0095

A/O

CONVERTER,

MULTIPLEXER

DIAGNOSTIC

PAL10

V1421

23-MAR-76

11802

PAGE

1'51

SEQ

0096

/MAINDEC-06-DJADA-C
3631

0156

3632

0157

3333
3634

0160
0161

3635.

3636

6031
6030
7761
0017
3521
1424

3637

[MAINDfic-UB-DJADA-C

0000
0100

11100111
00111111

11000001
11111111

0200

0300
0400

0500

1000

11111111
11111111

1100

11111111
11111111

1000
1500

11111111
11111111

11111111
11111100

2200
2300

11111111
11111111

11111111

2400

11111111
11111111

11111111

2500
2600

2700

3000

3100
3200

11111111

00000000

00000011

11111111
11111111

11111111

11111111
11111111

11111111
11100000

00111111

11111111
11111111

11
11

11111111

11111111
11111111

3300

11111111
11111111

3400
3500

11111111
11111111

11111111
11100000

11111111

11111111
00000000

11111111

(MAINDEC-08-DJAOA-C

A/D CONVERTER:

MULTIPLEXER

DIAGNOSTIC

4000
4100
4200
4300

11111111

4400

11111111
11111111

4500

11111111

11111111
11111111
11111111

11111111

11111111
11111111

4600
4700

5000

5100
5200

11111111
11111111

5300

11111111
11111111

5400

11111111

5500

11111111

11111111
11111111

6000

6100
11111111
11111111

11111111
11111111

6400
6500
6600

6700

11111111
11111111

11111111
11111000

7090
7100

11111111
00000000

11111111

V142A

23-MAR-76

11111111
11111111

11111111
11110000

11111111
00011111

11111111
11111111

11111111

11111111
11111111

11111111

11111111
11111111

11111111

11111111
11111111

11111111

11111111
11111111

11111111

11111111
11111111

11111111
11111000

11111111
00000000

11111111
00000001

11111111
11111111

11111111
11111000

11111111
11111111

11111111
11111111
11111111
11111111

11111111

5600
5700

6200
6300

PAL10

11:22

PAGE

1-52

SEQ

0097

1‘83

SEQ

0098

11111111

10111111

11111111

11111111
11100000

11111111
00111111

11111111

11111111
00000000

11111111

00000000

11111111
00000000

00000000

11111111
11111111

11111111
00000000

01111111

11100000

7200

7300
7400
7500

7600
7700

lMAINDEC-08-DJADA-C
A10

0010

A11

0011

ACL
ACSAVE
ACSV
ACTVCB
ADCL
ADLE
ADLM

7701
6712
3753
3737
4520
4526
4521
4523
4527
4525
4524
4522
1272

ADRB
ADRS
ADSE
ADSK
ADST

ALL18
ALL13A

1315

AOK

3707

AUTMSG

5472
1431

AUTO
AUT01
autoa
BADINT
BLANK
BYRETR
CBACTV

1435
1462
0005
0066

caav3

6106
4475
5627
6662
6461

caava

6115

caevs

6516
2562

can1
caava

C8CALO
C8CAL1
CBCALZ

A/D

CONVERTER,

MULTIPLEXER DIAGNOSTIC

CBCALR
CBCALS

CBCALT
CBCALU
CBCALV

CBCALW
CBCALX
CBCALY
C8CALZ
CGCHAR
CBCKP

CBCKPA
CBCKSH
CBCNTR
CBCONT

CBCRLF
C8001
C80010
C80011

2470
2500
2506
2514
2522
2530
2540
2546

2554
6475
6422
4516
4503
4505
6545
4511
5706
6655
6207

CBSWST
CBTABB
CBTABE

CSTMPl
CBTTYI
CBTYPE
CAP
CHAN
CHARA

DOPACK
DOSET
EMSGI

5611
5647

EMSGIO

4410

EMSG21

4622

EMSGZZ

4644

EM8023

4671

EMSGZ4

4706
4732
4765

EMSGZb

4050

EMSGS
EMSG30
EMSG31
EM$G32
EMSG33

CLKNON
CLKST

CNTRLC
CNTRLD
CNTRLE
CNTRLL
CNTRLG

C001
0002
C003
COMPAR
COMPR1

CONSOL
CONT
CONVT
CRLF
CSNOH
DELAY

DILE
DILX
DILY
0180
DIXY

4530
0733
1001
4533
4531
4532
0043

6147
6200

6144
6136
6100

EMSGZ7

EMSG34
EMSG35
EMSG36
EMSG37
EMSG4
EM8040
E08541
EMSG42

6111

E0806

6120

EMSGT
ENAZ
ENA3

5650
1627
1655

1656
3645
3662

ENA4

ENAS
ENA6
END

0000

ENDIT

3223
1732

EOCER1

3337
0150
0042
4542

4200

4477
4537
4232

4534
0146

3522
3454

1340

E08011
EMSG13
EMSG14
EMSGZ
EHSGZO

CLEO

CLUE
CLRDON
CLRERR
CLSA
CLSK
CLZE
CNTR1

CGSNIT

5645
1356
6026

EMSGZS

CBCALB

CSCALQ

DOCNT
00N1
DONEA
DONINT

3000

CNTRLR
CNTRLS
CNTVAL

2420
2426
2436
2446
2454
2462

23-MAR-76

CLEAN

C8002
C8003

2303
3320

7034
7073
6421
4504
4513
6007
0071
0067
6600

V142A

5630
3051
4535
1253
1231

COCALS
CBCAL“
CSCALA
CSCALC
COCALD
CBCALE
CBCALF
COCALG
CBCALH
CBCALI
CBCALJ
CBCALK
CBCALL
CBCALM
CSCALN
CGCALO
CBCALP

6344

CHKCLA
CHNL
CHNL1
CKCOUT
CKIOT
CLAB
CLADBB
CLADBU

08004
08007
CBECHO
CBERR

C8F
CSGET
CBHANG

PAL10

4444

4571

5022
4270
5043
S065
5113

5132
5152
5177
5221
5243
4311
5265
5306
5343
4334
4360
0226

0251
0274
0317
0342

3034
6341
1063

EOCER2
EDCERR

1115
1057

EOUT

2252
2273

EOUTl

EDUTZ

2270

4540

EOUT3
ER10

4536

ER11

2267
3302
3306

4541

ER1LSB

0151

4537

11:02

PAGE

MULTIPLEXER

/MAINDEC-08-DJADA-C A/D CONVERTER,
ER40

ERCLR
ERCOM
ERCOM1
ERMSG
EROVS
[RPC
ERR

ERR1
ERRINT
ERRMES
ERSWIT
ERTYP

3473
2751
2713
2745

2112
3732
2762
0045
6335
1401

0070
2236

HCOUNT

ExTL

2010
2000
2062
2233

06500
HESPAS

6440
6437

FIRST
FIVHUN

1717
1725
0143
3736

FLSAVE
FSTNO
GETCHI
GETDAT

6714
3520
6302
6056

GLITCH

3433
6043
6054
6004
0021
0022

GOITA
60704
GTF
ch1

cha
HEAOI3

HEAD14
HLT
IND
INDEXA
INITL
INITM
INHODE
INSTR
JMPLOC
K1000
K200
K207

HCTR
MESA

MESA:
MESAGE
MESFL

6040

ExTTE
FADDR
FILCNT
FILLER
FINIS
FINISA

M40

5537
5555
7402
2370
6055
0217
0222
6476

3317
2712
0056
0061

MESHAN

MESPC

MESS
MESS1
MONOT
MOVE
MOVEA
MGA
MQL
MOSAVE
NSGADR
MSGPNT
MSRGHT
MTP
MUX10
MUX11
MUXS
MUXBA
MUX9
MNORD

NEXTIO
NOERCL
NOISE
NOISEI
NOSET
Now
OK

0046

0V2
ov3
OVERR

K212
K215

0047

OVL

0050

PASCNT

K40

0060

PCLF

/MAINDEC-08-DJADA-C A/D CONVERTER,
VDIXY

2557
6250

NATMES
XADCL

0120

XADLE
XADLH
XADRB
XADRS

0126

0121
0123
0127
0125
0124
0122

XADSE
XADSK
XADST
xcacxp

6441

XCBCNT

6000
6423
6463

XCBCRL
XCBECH
XCSERR

6607
6235
0153

XCBINO
XCBLAS
xcaoc7
XCBPAS

6400
5600
5735

chPAU
XCBPNT

5701

XC8PSW
XCSSA
XCBSTA
xcasw
xce777

6255

3417
3416
5660
5670

XCBTYP“
'

XCLAB
XCLED
XCLOE

XCLSA
XCLSK
XCLZE
XCOMPR
XDILE
XDILX
XDILY

xnlso
xoxxv

XDOLPT
xoosw
XENO
XIND

6477
0135
0134
0130
0133

0131
0132
0064

0142
0137
0140
0136
2141
6512
6117

5417
3364

XLABEL

5432

xmove
XPRLP

0062
0065

XSELEC

2676

XSETUP
xsron
KTABLA
XTABLB
KTAL

3347
0063

6057
6060

2600

PRLP
PSIE

4553
'0144
3754
4142
0051

PSKE
PSKF
PSR
P878
PTSTOR

0053
0055
0054
3157
2235

XTALZ
KTAL3
XTEST
XXADCL
XXADLE
XXADLM
XXADRB
XXADRS
XXADSE
xonsx
XXADST
XXCLAB

RANCHN
RBOLDO
REDOA
RESOL
RESOLl
RESTR
RETURN
SCOPE
SCPNOH
SECNO
SELECT
SETCS
SETCS1

6346

6700
2322
6706
6546
6703
5651
6675
3131

3141
3200

SETIO1

7501
7421
6713

SETIOZ
SETIO3
SETIOT
SETUP
SETUP1
SETUPZ

2726
0017

SPIOT
START

2341

STCLDO

2366
0447
0472
0401
0400
0424
3156

STCLER

2200

2213

3016
1201
3254
3265
5640

0145
3246
3476
2046
2106
2111
5646
6662

MULTIPLEXER

XTALI

2630
2624

2614
2632

2400
2450
2406
2422
2456
2440
2430

XXCLED
XXCLOE
XXCLSA
XXCLSK
XXCLZE

2414
2524
2516
2464
2510
2472
2502

XXDILE
XXDILX
XXDILY
XXDISD
XXDIXY

2542
2550
2532
2556

2564

PAL10

PCSAVE
PNTBUF

0052

M2
M4

6665

2317
2320

EXIT
EXITI
EXIrA
6x71

K7
K77
LAS
LAST
LKSV
LSTCHN
M1

DIAGNOSTIC

3531
0057

23-MAR'76
TEMPE
TEMPC
TEMPO

0037
0040
0041

6665
6663
6661
0020
6664

TEMPLE

0152

TEMPX
TIMI

4163

5734
3504
1214
6015
3600
3627
4124
0002
2305
0147
3521

TIMLZ

1601
1712
1630
1657

TMG1

11424

TIMLl

TSTSR1
TNENT
THENT1

0211
1022
1037

TXTIOT
TXTPC
TYPECH

STCONV
STORAG
SWO
$01
802
503
$04
845
846
SYST
SYST1
TABIOT

4061
5600

UPARON

2342
6215

VADCL
VADLE
VADLM

2401
2451
2407

VADRB
VADRS
VADSE
VADSK
VADST

2423
2457

TABLA
TABLE
TADDR

6061
6071
2234
0072
0044
0035
0036

TALLY
TEHPO
TEMPA

PAL10

VCLSA

VCLSK
VCLZE
VOILE
VOILX
VDILY
VDISD

V1424

PAGE

1-85

SEQ

0100

5371

2441
2431
2415
2525
2517

VCLAB
VCLED
VCLOE

11:02

0025
5403
5411
5374

TWENTZ
TXTA
TXTB

3116

0099

6521
0023
0024

TTYLPT

0026
0027
0030
0031
0032
0033
0034
4000
4057

SEQ

1317

TSTERR
TSTJAM
TSTSRB

3074
3105
3111

1-04

1330
0514
0533
6314
0601
0634
0552
0663
0710

TSTDON

3036
3040

PAGE

6345
1476

TMPCNT
75714
7873
75733
TSTADC
7STCAF
TSTCHA

0073

11102

1646
1675

T102
TIMDIF
TIMERR

3066
0074
6626
5624
3060

TAL

DIAGNOSTIC

V142!

6711
6520
3330

2465
2511
2473
2503
2565
2543
2551
2533

23-HAR-76

lMAINDEC-Ba-DJADA-C AID CONVERTER.

566666

DETECTED:

LINKS

6565647261

RUN—TIME!
3K

MULTIPLEXER DIAGNOSTIC

PAL16

V142A

1666
2266

1612

23-666-76

11162

PAGE

1-66

550

6161

164

SECONDS

can: USED

A16
411
AOL
6666v2
ACSV
ACTVCB

ADCL

766

1376

1766

716

945

946

2139

1769
2177

1797
2196

1796
2196

2963
2311
23616

3165
23136
2366
533
2149
276
1213
394

3335

3461

3569

35346

772

962

935

946

967

1619

1625

1167

1163

1211

341
2654
461

463

466

667

652

695

926

954

1629

2156

2374
956

1654

1126

1174

1676

1924

2659

727
741
1662

726
742
1669

729
743

1926

736
744
1936

745
2663

25996
2966

2362

154
76

1227
ADLE

136

1115
AOL"

2667

ADRB

ADRS

ADSE
ADSK

166
732
746
2672
146
966
126
116
644
2388

ADST

6LL1s
ALL1SA
AOK

667656
AUTO
46701
AUTOZ
BADINT
BLANK
BYRETR
66667v

CBBY1
caava
CGBYs
CBBY4
CBBYS
C8CAL8

464

1673
247

1167
371
2165
495
733
769

2169
253
2666
547

521
696

2376
496
734
666
2466
276
2396
552
527
921

2312
556
2334
294

317

1676

1922

416
2396
721
735
626

446
2442
722
736
653

366

323

559
534
956

596

576

621
1623

991

723
737

736

725
739

1646

1672

1124

1195

347

377

466

424

446

465

462

562

662

664

676
626

765
666

747
766

774

1222

1666

923
796
1926

662

1122

762
663
1169

2661

625
2167

595
624
2666

662

663

682

699

669

919

926

685
957

698

643

966

1626

2166

2367

1169
1524
2292

1352
1548
2353

1446

1454

1551
2397

1436
1559

1567

1575

2336

516

545

546

571

594

764

726

771
1121

766

1655

1666

661
1925

649

9476

6436
6626

659

773
1679
661

2224
25176
9436
975

22726

2296

971

977

1653

224

1644
1490
1945
2716

1666
1498
1955

476

726
746

1631
635

2221
2351
934

SEQ

724

616

767
1667

731

1649

9684

636

1266
2973
65
1464
1584
2664

3491

1995
1656
29766
1536

1474
1715
2666
3523

3341

3344

29676
3463

3166
34666
3616
3617

1576*

CBCALI
C5CAL2
C8CAL3
CBCAL4
CSCALA
CBCALB
C3CALC
CGCALD

23374
23544
66!
2254
18454
10694

COCALE

1148'

15854

17164

3618
3619
3628
3598

3591
3592
3593

3594

1482
1988
26996
35256
33566
3416

1696
1588

1139

2823

2887

1516

1264

1532

1436

‘

6162

3595
3596
3597

C8CALF
CBCALG
C8CALH
C8CALI
C8CALJ
CBCALK
C8CALL
CBCALM
CBCALN

1170:
12050
13534
19564
14310
14394
14474

CBCALO
CBCALP

1475a
14834
1491a
1499:
15090

3604
3605
3606
3607

15174
15254
1533i
15414
15520

3609
3610
3611
3612
3613

15604
15680

361%
3615

CBCALG
C8CALR
CBCALS
CBCALT
CBCALU

C8CALV
CBCALW
CSCALX
CBCALY
CBCALZ
CBCHAR

14554

1ubsa

3277#

C8CONT
CBCRLF
C8001

34330

3074‘

C8002
C8D03

.3302

88F
CBGET
CBHANG
CBINGU

C812
CBIZER
C8IZF
CBIZN

3187

3197

3201

3205

3207

1140
1525

1205
1533

1353
1541

1431
1552

1439
1560

1447
1568

1455
1576

1465
1585

1475

1716

1483
2337

1491
2354

3076

30980

3106

3134

3346

3350

3368

1287
2694
3520
34148
1909
35498
3575“
20404
35774

20413
2974
3526

2171

2193

2204

2977

3004

3019

3559
3027

3420
1946
3562
3576
3561

'3426
2088
3588

3432
2293

2398

26324

649

651

CBMOVB
C80CTA

12950

CKCOUT

3177

1069

3587

CHNL
CHNL1

3089

1045
1509

CBIZNA
CBLAS

CHKCLA

2936

30020

CBERR

CHAN
CHARA

2934

28564
3274

C8D04
C8007
CBECHO

CBTMPi

2932

2824
35200

880011

C8TTYI
C8TYPE
CAF

2924

26128

C8DO10

C8TABB
CBTABE

0104

3608

CBCKP
C8CKPA
C8CKSW
CBCNTR

CSSWIT
CSSWST

SEQ

3600
3601
3602
3603

2915

C8STAR
CBSTRT
CBSVSR

0103

3598
3599

2772
33760

C8PASS
C8PAUS
CBPRNY
C8RDPS
C8RE50
CBRETD
CBRETR
CSSETD
CBSETS
C8SR
CBSTAB

SEQ

6430

1099
2636#

26180
31688
1292

3575'

26108

3072
2978
3068

3213
21450
3077
3001
3073

2971

2976

2021

6500
20304

20248

1517

30804
30090
3075
2984

30790
2996

3002

3008:

205

206

207

208

209

210

211

20144

2019

1112

1118

1132

2152

2153

2160

2358

2359

2367

26204

3034

2024
3164

3167

3215

32170

35904
36210
3265

3269

3272

32760

239

481

627

669

804

827

1994

26000

3038

2163
1845
2849

2164

3128
21074

3160

3342

34590

3464

3466

3489

3102
2712

2713

1648
1647
1747

1867

1916

2048

2136

2332

625

631

633

6610

668

673

1640
675

1641

2346

2384

2427

2989
1111

1956

2066
2070
27000

2921

17780

1215

1217

824#
8010
1106

1156

1161
2435

1176
608
632

1181
1179
1178

836
814

1736
2443
2344
6150

27170

10310

2425

2380
2381

1183

3033*
30674
30260

30150
2970#
29834
29960

1734#

3007

1209

2431

2439

2448

1018
1016
120
22824
25924
1886#
11064
1340
1864
98#

10548
10554

SEQ

0105

21864
2276
2605

1911
1144
1693
1737

2032
1706
1741

1870

1884

19770
1775

1984

2281

25#

224
234
218
244

2707
892
2914
879
2678
2701
1244
1260
1237
1261
1262
1245
2297

1939
1193
1902

2081
1246
1247
1248
1258
1249
1241
1250

1251
1252
1253
1254
1255
1243

1257
1263
1242
1232
1259
2454
260
283

2404
2401
2412
2414
2709
9024

‘J
2714‘

29210
8888

2685‘
2708
24888
24868
1238
24884
24894
24814
24908

24918
1225

900

906

2711

27168

1239

1240

1651

24878

24928

24933
2494*
2495‘

2496#
24974
2482!
24988
24998
2500#
25018
2502#
25038
25044

1256

25054

‘3

2483#
25063
25078
25084

1233
24858
251
268‘

292‘

1234

1235

1236

259
274
298

261

1624

282

284
308

306

2484*

1625
1626

NJ
ENAS
ENA6
END

ENDIT

E00581
EOCERZ
EOCERR
EOUT
EOUT1
EOUTZ
EOUT3

ER10
E811
ER1LSB
ER40

ERCLR
ERCOM
ERCOHI
ERMSG

307
330

1809

760

1644

19424
2279

2295

1937
1874
2078
1710
1192

1719
273

429

043

579

599

833
3200
901
3502

606
899

281
451
624
932

630
970

3210!
9168

933

937

1652

1615

1998

1330

1349

1360

1367

3517

35360

1314
101

1711

1720

1901

1938

2080

2296

1721:
297
469

1366#

1359

1302
3305‘

1279
3298
3296

FINIs

1086
1012
181#
2283
2906
2093

21048
29458

3190

2912

2919

2037

2090

HCH1

808

HCHZ

818

3550

2917
2939
25988

13078

23008
3337
2096

31828
2911

20480
29340
2940
2905
3554

GOTOA

1671

1712

FILCNT
FILLER

FIVNUN
FLSAVE
FSTNO
GETCH1
GETDAT
GLITCH
GOITA

1682

1018
405

2923
11648
11568
1200

FINISA

1681!

1232#

1690

EXITA

FIRST

1687

1936

1361

EXTTE
FADDR

1685

SEQ

1335

EXIT
EXIT1

EXTL

1627
1628

1323
1319

1664

EXT1

331
355

1325

2228

ERSHIT
ERTYP

329
353

7468
7164

ERPC
ERR

ERR:

321

3394

1764i
3214#
1807

EROVS

ERRINT
ERRMES

3154

1754
3191
720‘

2941
3336

3483

2942
3482

29030

305
486

320
503

328
524

344
530

352

374

536

550

382
555

667

672

688

707

757

776

792

994

1084

1368

397

561
813

0106

HEADl3

2278

HEAD14

HLT

1ND
INDEXA
INITL

INITM
INMODE
INSTR
JMPLOC

25198
2528‘
1846
1484
1961
1342
2918

2985
2831

1674

1675#

1818
1229
1486
1401
1114
21144
1396
227
1688
1333

K287
K212
K215
K48

K7
K77
LAS
LAST
LKSV
LSTCHN
M1

2389

24444
1331

M2
M4
M48

1569

1456
1578

1466
1586

1345
2339

1356
2356

1597
2371

1681
2428

1691

1694

1698

1782

1355
1534

1366
1542

1432

1448

1553

1561

1164
1957

1172
2852

1197
2855

1328
2158

1614

1672

1683

1898

1336

13734

1375

1377

1387

1392

1781

1785

18298

1852

2288

1288

1281

1283

1284

1286

1298

1386

1613

1628

1673

1327

1286
1518

1526

3369

3373

33778

1889
1874

1892
1877

1189
1928

2454
1363
1869

2466
1612

1328

1143
1588
2355
1411*

1171
1518

8187

3575
2881

29444

1188

1891
297a
1963
894

K1888
K288

SEQ
1878
1492
2338
1344
2938

3174

926

1828

1948

2884

1982

1979

846

1787
1752
2314!
2453

1881

1358
1617

1531

2415

1393

1848

MCOUNT
MCTR
MESA
MESAC
MESAGE

1384

_32284
35388
1896
2257
3532a
343a:

MESFL
MESHAN

MESPC
MESS
MESSl

1339

MOVE
MOVEA
MOA

MQL

MSRGHT

MTP

MUX18
MUX11
MUX8
MUX8A
MUX9

487

MNORD

1838

NEXTIO

1898
759
19164
19258

NOSET
NOW
OK
0V2

0V3
OVERR

OVL
PASCNT

1924
1276a
1385

2834
1278

2987

3338
26818
3339

3484

3485

3513

3535#

1324
1385
1487

1362
1388#
14898

1364

1611

4168
4394
375
357
3924

422
444
383

438
452
385

1834
17588
762
1941
1944
27893
1159
1988
2883i
11954
12284

1837
1764
7714
1958

1338

171a
3126
16924
238
1388
1482

MOSAVE
MSGADR
MSGPNT

NOERCL

431
3698
354
384

2784
1834
1897
2879

1191
1223
12318
2687
25944
3488
3394
125
25974
25954

2691

PSKF

25934

3418

PSR
PSTB
PTSTOR

25968

3485

2881

RANCHN

2865

2883
28928

RBCLDO
REDOA

789

778

2912‘

2928
21368
2182

PCLF
PCSAVE

PNTBUF

PRLP
PSIE

PSKE

RESOL
RESOL1
RESTR

RETURN
SCOPE

SCPNow
SECNO

3485
3585
3398
1238

3181

432
454
1629

1631
1632

486

488

1848
1765

1841

1638
18538

777
2836

779

1645

1745

1756

1759

1761

1884

3418#
1847

3417

3423
19678

1973

1988

2814
2183
785‘

2823

28258

793

795

2284

2294

878

893

1851

1996

3686
398

2835
2166‘
2411

1348
185a
2097

24244
618

13568
1748
2899
238

SELECT

134a

1739
17698
1798;

1777
1886

19858

27158
3487
3533!
3484
1489

1949

1743

17678

1771

1815

18874

18114

1814
1762

17928

SETUP

135:

244
569

267

291

314

592

915

942

614
983

1888

17858
2224
6814

2838

691

1642

STCLDO

2885

415
778

784.

21854

1888

SETUPZ
SPIOT
START

1983

1746
543
887
3495#
26964
1742
68
674

1646

1827

SETIO3
SETIOT

SETUPI

SEQ

794

SETCS
SETCSl

SET101
SETIOZ

1697

1849

MONOT

NOISE1

1326
2358

3531*
2716:
3529a

MESMG
MESPAS

NOISE

18544
13898

689

338

368
696

391
715

1158

2137

2333

668

438

459
888

476

823

493
842

514
867

8188

STCLER
STCONV

6974

710

1643

2143

25294

see

2423

STORAG
SW0

2140

0199

SW1
302
843

1598

1923

SW4
8N5
846
SYST

2348
1602

2463
2361

2433

2460

2464

356
692

386
711

761

SYSTI
TABIOT
TABLA

TABLE
TADDR

TAL

332

409

433
780

473
817

837

507
862

540
as:

989

1125
1813

1127
1919

1186
1943

1157
199a
1891
zone

490

1088

TALLY
7EMPO

574

2188

618
1776
2275

874
2064

1805
2375

949

963

1700

2074

2170

2176

2199

2274

1871
2379

1883
2403

952

966

1872

1893

1906

1931

2392
973

193a

967

1160
2452
1021

1704

2273

1047

1074

1137

1219

1220

2257

1196

1201

1085

1087

1655

997
882

1654

TEMPB
TEMPC
TEMPO

2417
10474
10714

TIM!
TIME
TIMDIF

999

TIMERR
TIML!

1080
1042
1066

TIMLa
TMGI
7MPCNT

9354

3189

75714

9844

rs13
rsrss
TSTADC
TSTCAF

8683
8774
470

460‘

477*
3183

TSTCHA
TSTDDN
TSTERR
TSTJAM
TSTSRO

508
532
488
563
587

TSTSR1
TTYLPT

986

1802
2373

TEMPA

TEMPLE
TEMPx

619

1801
2349
950

1773

2983

3015

32194
878

472
487
31924
5154
538
4944
5704
5934

3017

1650

1633
1634
3209
525
5444
504
580
600

3033

531
551
506
586
607
3395

537

556
1635
588
609

3411*

539
562

1636
564

1637

1638
1639
3427

550

TNENT
THENTi
TWENT2

3119

TXTA
TXTB

TXTIOT

TXTPC

25094

TYPECH

13894

UPARow
VADCL
VADLE
VADLM

3026

VADRB
VADRS

1410
3036

3067

30864

3092

1818
1820
V

VADSE

‘

VADSK

VADST
VCLAB
VCLED
VCLOE
VCLSA

14434

1819

VCLSK

VCLZE
VDILE
VDILX
VDILY
VDISD
VDIXY
HATMES
XADCL

XADLE
XADLM
XADRB

XADRS

XADSE
XADSK
XADST
XCBCKP

33344

XCBCNT

2904

3349
2929

3351
2930

2928
33664
3525

3091
3371
3527
3136

2931

2933

2975

3000

3005

3020

3028

3212

3214

32924

3303

3430

3500

3519

3428

3501

3503

3071

3135

3507

3511

3425
XC8CRL
XC8ECH
XC8ERR
XCBINO
XCBLAS

2693

3182
3487
31274

3375

3137

3431

3524

3171
2683
2852
27984

32594
2699
2853
2800

3275

3506

3510

3514

3518

2855
2802

2856
2806

2817

3131

3168

XCBPSN

31594

3162

3216

XCBSA
X88574

20294
20284

X08007
XC8PA8
XC8PAU

XC8PNT

3130

2680
27654

XC8SW

XCBTTY

2813

XCBTYP

XCLAB

1754

XCLED
XCLDE

1744
1704
1734

XCLSA
XCLSK
xcompn
XDILE

.La156

1618

1619

1621

3521
3367
3090

SEQ

3173

3211

3268

25164
1959

1600
1610
16244
162
168

163
165
169
167
166
164

29474
15956
1607
16164
16284
1667
14264
14734
14344
14524
14864
14684
14584
14424

175

15364

174

15284
14944
15204

170
173
171
172
180
177
178

176
179

2187

15024
1512*
1580#

15554
15634
15454
1571*
36314

2141

2800

2189

1616
16208

1428
1480
1436
1452
1488
1471
1461
1444
1538
1530
1496

1522
1505
1514
1582
1557

1472
1462

1506

1565

1548
1573

1549

SEQ

6L01b4
6L0165
0L0166

.Lfl167
.L0170
6L0171
.L0172
0L0173
.L0174
6L0175

2056

2101

2162

2369

617

1918

2050

3639!

206

207

208

2391

2441

2450

36344

209

210

211

3634

36404

36416
3642#
3643#
36444

.L0176

3645”
36466
36476

6L0177
4L0373

359‘

.L0374
6L0375

9L0376
.L0377
0L0576

205
5294

9L0577
6L0775

5104

pL0776

635

6L0777
.L1175

7634

6L1176

«L1177

.L1372
6L1373

907a

6L1374

IL1375

.L1376

0L2171
0L2172

0L3173
0L2174
nL2175

0L2176
nL2177

0111

3393‘

29464

0L0161
6L0162
0L0163

aL177b
uL1777

3372

1851
1663#
19884
2138

.L0160

.L1775

3300

20014

0L0157

0L1377
0L1576
0L1577
.L1770
,L1771
0L1772
nL1773
.L1774

3295

25144

xnove
XPRLP
XSELEC
xsarup
xsroa

xonLx
XXDILY
xxoxso
xxoxxv

3493
3345
3088

34244
29894

x1~o
XLABEL

xxDILE

2748
3133
2927

1774
1784
176a
1794

xoxLX
xosz
xozso
xoxxv
XDOLPT
xoosw
xano

XXADRB
XXADRS
XXADSE
XXADSK
xxaosr
XXCLAB
XXCLED
XXCLOE
XXCLSA
XXCLSK
XXCLZE

27414
3003
2925

1714
1724
2183
1864

XCLZE

XTABLA
XTABLB
x711
x7111
x74L2
XTALS
xrasr
XXADCL
XXADLE
XXADLM

2695
2773
2822

9114

912#
1001#

10524
11454
1146#
1120

1147#

1148#

11494
11506
11514
1915

12654
1266#
1224
12684
12694
12704
12714

11524

1267#

6564

0112

14146

SEQ

1415!
1416!
1417a
1339
1419*
1420#
1701
1706
1694

8113

1725i
1702

17276

1728#
17298

“HII‘V

17308
1855#
18564
1857:
1858*
1859a
1860‘
1803

1861#

1862#
1863#
18648
1995
1959
1958

28034
2004a
2005#

1981

1938
1921

28864
2887#

1916
2127#

2888#

1875
1867
2885
2888
2853
2848
2821
2828
2018
2306

2277
2226
2222

21324
2133#
23164
23174
2318#
2319#
23203
2287
2322u
23234

2171
2155

2193
23253

2296
2285
2281

2288

.L3771
.L3772
.L3773

.L3774
.L3775

.L3776
.L3777
,L4173
.L417a

,La175

,La176
.La177

2148

2136
2378
2358
2341
2348
2332

0L5757
0L5768

2854

0L5761
.L5762
.L5763

2820

2128#
2129a
2130!
2131#
v

23218
M

2284

23244

23264

2321#
2408

2473#

24744
2475#
24764
24773

SEQ

8114

2821
2818
2815
28643

2813

.L5705

2884

0L5766

2771

2866!

2778

2769
2742
2698

2692
2688

28723

2681
2679

2873*
28748
28754

2677
3839
3003

38448
38454

2987
2986
2983

3817

2974

3004

3836
3833
3819

38478
3848*
3827

38498

3853i
2985
2932

38548
2934

2936

3055#

3846#
3826

2935
2928

2926
2925

2921
2915
2908

2906
2901
2988
3210
3206
3282

3859#

3198
3194
3150
3175
3174

3172
3171
3166
3133
3131
3128
3185

.L6372

3182
3188
3891

.Lesvs

3888

3089

‘1

3229#

3235#
3236#

3214

32404

3187
3173

3197
3211

3281
32428

3205

3287

32418

3345

3243s
3135
34366
34374
337a
3350
3367

3342

34414

3687
3671
3431
3428
3347
3346

3339

3442#

3337
3335
3299
3294
3267
3266
3263
3524
3566

34434

3561
3566
3495

36258
3626:

3578
36284

3551

36304

35414
23224
426

3555

1665
346

3514

3518
3511

3567
3546#
35428
3526

3543#

36274

36466

3641#

32244
379
1173
36298

3266
1766
2656

18628
2161

36428
2162

2369

2391

2441

2456

36348

866

851

912#

1165

12764

1875

1921

26678

36564

36448

34488

1736#
349
32318

2863‘
325
2868#

2826

28618

2935

2769

302
36488
34454
32274

2776

2867#

3645#

3294
11478
2821

2866*

3299
3194
1091
1396
3267

1100

14164

30524

269

278

,V6666

.vz700

565
2346

.v0777

3551

14158
36304
508

3223#
32436
357

359i

847

916#

626

632

635

656#

36478

11468

1691

1694

1961

1938
1156

2005#
255

1867

18593

.v1200
.V1213

759
769

7638

.v1330
.V1356
.v1420
,v1424

869

961
917

762
7658
36384
36374
966
3636#

.V1666

996

999

16614

11504
11494
483
6574
360*
17288
3614
11518

.v1646

1626

.v1675

1656

.v1777

466

.v3000

663

1671
235

1617
1613
1811
1667
1192

.v3057
.V3116
.v3131

.V3336

1696

1738
1742
1796
1332
1236

.v3400
.V3426

1346
263
2621

.VS431

3561

.v3337

.v3432
.v3521
.V3531
.v3611
.V3746
.vuaaa

.v4540
.V5666
.vsooe

.vseve
.v57a1

645

1015
1857#
17298
1224
3628

SEQ
23168

2681

2696

2873i

3462

3544“

1698

1762

1727#

2277

2287

23214

2356

2474*

26666

2686

21288

12714

1867

1916

2296
26683

2317#
2648

21368

2136

23278

2332

1765

2286

2326#

268

17254
2685
23198
269

9674

516#

1696

_11524
1267*
1166

11458

18634
18608
1339
12654
14178

14148
1766

204

265

266

1761
1847
17268
267

2131#
3578

3627#

14268

2171

2193

2664#

3345
3437#
3671

3367
3561
3135

6554
36354

18564

'2147

1697

14184
1469
1693

944

.veaze

.voasw

11484
18648

1342
1292
2818
2341
1175
2146
3493
3663
3131

23258

2366

2477a

.V3616
.vsesa

2155

24768

1958

892

21298

34466

3216
3687
354
36468
5694

.v1063

.v1000

2653

36438

34474

2926
1468

.v2423
,v2632
,v2713
.v3000

35398

402
20036

6V6277
6V6336
.V6466

.v241s

35384
3515

3172
2815

293

.v2111
.v2112
.v2322
.v2407

34398

36294

3495
2226

961

QVQZQE
.v0260

34494
35374
3510
3503
3519

3579

417
393
1995
3266

34384

34484

3581

3559
3555

3425
3368
34464

34444

3492
3462
3585

3561

6115

34456
3446#
34474

3541:
3521
3520
3544a
3624#

3493

SEQ
32448

1287

1855

2281

21278
216

211

3636

2264

2324#

3559

36284

34468
3563
32448

3567
3347

3511

3376

3515
3425

14194
28628

24754
12696
23264
3521
30458

3168
9698
3632#

35398
34386

6116

2187

SEQ

3026
2874i
3543‘

3047#
2977

3431

3524

3019

3027

3049#

3346

3350

3368

3506
3051#

3514
3212

3518
3214

35383
32404

3500

3519

3540i

2924

2934

2936

3055‘

3089

3177

3187

3174
2927

3088

3090

3173

3211

3242#

3160
3444*

3236!

3342

3441‘

2050

2804

28654

36390

34390

3492

3197

3201

0117

3046‘

3171
2872#~
3229i

2866#
32414
2985
2864!
3017
2875*
3059#

3048!
3058‘
3237*
3339
3337

3100

3102

2133*

9110
24734
1861#

3581

3625i

617

1185

1268i

1918

oV7771
.V7772
.V7774
.V7775