0943380 0019_Prototyping_System_ation_May76 0019 Prototyping System Ation May76

User Manual: 0943380-0019_Prototyping_System_ation_May76
Open the PDF directly: View PDF .
Page Count: 693
Download
Open PDF In Browser	View PDF
I

ST
TEXAS INSTRUMENTS
Improving Man's Effectiveness Through Electronics

Model 990 ·C omputer
Prototyping System Documentation
VOLUME 1 OF I ,

PART NO .

943380-0019

Digital Systems Division
:;,.;;r;=

J¥1\
~

L-'~''T£Q-.-INSTRUME~TS
,'-~:'::"AL
1
LM 94:15,N;~1
""\.
NUMBER
!rc==~~:=r===::~~~~~~~f3~~==~~~~~~~1J~~~JfJ;JI~DE~S~C~R~I~P~T~IIOjOcNillij~nH~Pi"e---------------------~
., .- -,-,..-. .....:~., .. -1

Ii

f

0

t NCO R P 0

RAT E 0

PAGE

05125/16

DATE

of "

II

,

Ii .'

QUANTITY
PER

!j

I'll.

UNIT
OF

WVV6

~ . . . . . .., . . v

0002

ooct()1.OCO

;l

:j

).

rI

I

DWG.
SIZE

PART

i

.A

IA

943519-9'01

I AL,

1~IT1',IHITIALllATION,P'OTO-'X."

C002A

, •• ,"·'OCl

q

00021

MUSl I' F.ast IN •• 9"TP-IOOT

II

COel

I'

~I

(OOlA

J!I

COOit

\1

0004.

'Ii

C005

I
r
I:

,
!I

00001.000

fA

945J!4t-99011

At., EMtr-t, •• aOA IIne.aUl'T ,.oc-......

, ••,.,,-.ce,
0004)1.000

fA

941112-99011 Al • •&SP'C.WOIKSPACE MANAGIMlNT-'.990

'X."·'CCT
00001.000

EA

9.'JJO-t9Cll AL. CIIS'"

~

OOOSA

coe6

IJ

L

ooel

00001.000

EA

9.,1.9-9901 I AL,

OOIOl.£OG

IA

OOOOl.OOQ

fA

00001.000

\

I A~, ITF.lO.IN'UT C"A.AtTI~ STaING-'I99
''''"'''''CI(l
9~'3'1-9901 I Al, Gl~IX,IN'UT MlXADECIMAL NUMBER-PI.

IA

941381-9901 I

\

Al, sup,sa.SUPIAVIIOa 'ALL 1/'-'1990
, .... t,...ec.

0~01.000

ecno,
5

/1.'h",

DATE

fA

ICi.:iAiiZA

DATE / APPD. PROJECT ENGINEER

9~~)!2-'901 I Al,

CCNV.',AltII/8INAIY

,.,,.,,·acel

f)

11.~/7~ATE

DATE I TITLE
/DESIGN ENGINEER

DATE

CONVE.SION-'"9~O

",'I.Mt,

LIN.AllE 'IltSCAL

DATE I PROJfCT NO,

Yvta. ~ C,-'f-1~

LM

75""°"
",

i

"

CA1I,F.ONT 'ANEl-'""

P.... ,,·aCCT

COC9A
0010

't~l,OUt'UT

9.'3"-9901

oooe.
COC9

"OC.P.~.fICN)

, .... t,-.cel

0001A

COC8

STa ..IG

'.9~"-lec,

0006A

1I! •

.'''0

----,"c_

,.,1t9O
PArr NUMIIR

94'5'8-00'

~

..:.:.--

---,----/

4P
.

OTEXAS INSTRUMENTS.

.-

-

l'RINf

111M

NUMIIEI

NIl

INCORPORATED
.

,

. '

DATE
",,*,,,,

I

QUANTITY

I'n
AiliEMJLy

00041 ....

U~

DWG.

~

SIZE

IA

COllA
0012

u~ OF

"/1"'•
PART NUMBER

00001.000

fA

9453~"Gl I Al. (~'.I'.CHARaCTE.

00001.000

EA

.945)8J-'901 I Al.

00001.000

fA

00001.0OG

fA

VENDOR PART NUMBER

INPUT-' ••90

us.".,UIER

"0&

spysa

tAllS~'X9.a

941.51-.901 I Al. '1A1Jl,li1AiR OIY'CI eJlvtR-'.'90

,....,,-,eCl
GOOe1.000

fA

94!U17-.tcl

I Al

t

SI.IIT •• IAKftOlNT-PI99O

, .... t,.. "O(t
eoG'll.OCC

lEA

.4S11S-MGtl M. • • "'1 ••• , . " , .MCI/'AIAMITERS-'."

'l.fIl,,-tiCCT
0801 .. 00(l

fA

9.Jl.G-'901 I Al.

I"I~S'I(T

MEMCR'·'.'tO

'1'~TP-'C(l

00001.000

fA

94,tt9-9911 I Al t fe.IIU'ICT CRU ,.OCESSOR-PI . .O

... ,,,,.-,ecl

0019.
COZQ

"'GI.Gee

EA

9.53t)-"e1

I

AL.

I~"'I"

.N.,ect

MOaKSPACE-PXftO

, .... " ....ecl

00 lOA
DRAFTSMAN

DAn: I CKD. DRAFTSMAN

DATE I DESIGN ENGINEER

A!'PD.-MFG.

OATE I APPD. PROJECT ENGINEER

OAn:

DATE I TITlE

".PX9MfP lu• •all 'ARTSCAl .......
I RELEASE[)

DATE

I PROJECT NO.

I

.1LM

PAiT NUMBER .. -

J

94151.-. .1,

T.l.138#

'--

Rev.)

, ....f,-.ce,

C018A
CGl9

PART NUMBER

.lt511.-fJ.Gll Al. '.9IC,11O OlSPAfCHIR-P. . .O

0011'

COl.

~

,,,... " .... OC1

0016A

eOl1

,LM ••"'."001"'1J

" •• ,," ....OCT

0015A

COl.

of"

'.'I"'''.OCT

0014'
0015

Z

945146-,"1 r -I( ;--""lU" _IlII M .LUM-It....

COll.
COl.

PAGE

DESCRIPTION

H12A
001)

MATERIAL

-0----- . . . .

'- .---_._--, o~-~----

o

~

..

REV

..

i~-;-- --~r"Ex~OINS-TRUM-ENT~

I

INCORPORATED

~

DATE

H

n

PIINf
ITEM

QUANTITY
PEl
.u..U_.Y

! ml
~

UNIT

NOell.oOO

l'

OF
ISSUE

OWG.

SIZE

IA

I

Of

MATERIAL

PART NUMBER

DES C RIP T ION

I

IA

9.'3tS-',el

I AL.

G02ZA

OMC1.0eo

! 0025

oocun.• o,o

!I

~

C025'

fl

0026

IA

IeC... JOIIP'

945Jt4-"Ol I Al. MGGC ••

IA

-eMOlY-'.'"

_.&.STla'-'1.90

••

9.".1-990' I Al, 'CC.' • .acIFY NORIS'At .......

EA

9.t31G-9tG1 I 'l, '.'~".I_' MIMOaY.tau .ANGEI-'Itto

,x.,np-aocn

IA

945.11-.901 I AL. ,.'S ... ,.INT ...PSHOT·' ....

, ...,'·ItGCT

C021A

00001.000

IA

~45]1l-9901

I Al.

,alee •• LO.DER D.IVI.-' ....

'.""-"CCf

C028A

08001.000

IA

945161-9901 I AL. OVI.Lj'.OVERlA' 'IOCESIOR-'."O

, ....,,-.act

C029.

ooM

'.01.000

IA

9451'1-9901

I Al.

'Ie_le,lo,. ,.eM ,.OGI ..... -, ....

'•..,f'-Nle,

! 0010'

~

DATE I CKD. DlAFTSMAN

DATE I DESIGN ENGINffR

DATE I finE

fpi).-MFG.

DArt I APPO. ProJECT ENGINEEI

DArt I IIElfASED

DATE I PROJECT NO.

",'....1. LI .... LE ' •• TseAl '-P"91

~,

!I.l_
1_ _ -

VENDOR PART NUMBER

,.'.. "-.ClCT
OoaOl.000

0029

JI

.aGt,y ,au-,x.,.

945166-. . . ' I AL. ~'ft.MOOI'Y

: 1026A

OOZ.

•

...... " ... accT

M001.000

.'1

RfV

...... ,.-taCtt

M23A
Ii GOM
! 0024'
I';1
ti

~

, •••" ....CtT
OOOOl.OOG

11

.41111-001

'.,",,·'C)eT
00H1.0IG

1023

-

- - - - - - ' J ; i T NlIMlEI

PAGE

I

f

ft
LM

'of"
t.n6Z-9--.cra TJ[ ,--10"-",""", ....,..."..,••to
LIST

"'ZI".

0021A
IOU

---~--~---'-~-l
.

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

_

.&:...~ -'____________________~______..____

~.-"

'"

ILM

.

ARt NtiM~-

....11-001 ,

I\fV

•

---~".---." -"-~ ~~./

.
TEXAS INSTRUMENTS
~
0

INCOAPORATEO

.

..

_,

DA1£

UST Of MATERIAL .

01",,16

PAGE

"of

b

LM

DWG.

•

VENDOR PART NUMBER

Sta

, .... ,,-aCoT

CIll'

00001.000

COli

fA

94111'-"01

I AL.

GooeJl.ooo

!A

94512 ..... 1 I AL.

OC001.000

fA

9lt531 .... 9901

,.,",,-JeC,
00001.000

fA

941341-'911 I Jl . . . . . . . . . . .o'eIN' 'lotIISla-,a.to

'.'''''-.OCl

tOllA

00001.0OG

0036

liA

.,," .....01 I Al. CLE ...CLltI COMMAN' "OCfSSoa-,...

, ...."-.oel

OOl ••

0031

00081.001

fA

94515t·t.Ol I AL.

CO!lA
" 10M

O"'l~C'C

MIMOIY FOR VAlUfS-'"to

liA

9"JSI-"Cll M... t4 •••' ..... e.ADIC.MAl AaITHMeT1e..,.99
, ....'f'-ICC1

00001.000

fA

943524-••011 Al •••"" .tIIITI NflTecT-'....

,.,",,-.tCl

00,.,
GOItO

'l.e.SCAM

'.'''''-'ClC'

HllA

0019

,.OG CONTaOL.'IOTO-'

I Al. SJf'''.Slf DAIYift-'J(990

GO'!ltA
COl5

IU.'G'.~lf.

,••",-_eCl

COl!A
10)4

It.tlL.SCA. y,atIS-'.990

,.,tt1,-.aet

teJI'
COlI

'OOOl.OOO

fA

94It21-99011 Al.

"OE.,_.aONT 'ANEl OI"$.'IOTO-'

, ....,.-"t,

001t"
DRAftSMAN

DATE I CKD. DlAfTSMAN

DATE I DESIGN ENGINEER

DATE I TITLE

API'O.-MFG.

DATE I APPD. PROJECT ENGINEER

DATE I RELEASED

DATE I PROJECT NO.

$'.')C9""

LI....... 'MTSCAl ........

LM
'~I*N'

~~__

PAR'r NUMII.

91t)51.-001

---u~~--

PART NUMBfR

.1

"Jlll-H.!-

REV

•

~-.-~ -.~ -~~.-~--- ····-~--~·~·-O----=--'·~··---- -~ ~

-~- TEX~ INSTRUM~N~~
-0

-~.--

INCORPORATED
DATE
I'RINT

ITEM

~41

QUANTITY

UNIT

I"fR
ASSEMBLY

OF

ISSUi

00001.0eo

DWG.
SIZE

IA

--"---~--

.

LIST o. MATERIAL

05/25116
PART NUMBER

PAGE

94"50-9401

00418

MUSt II fd.'·TO-L'5T IN

COlt1C

, .... T'- .. C(1
EA

945)12-9901 I Al. PI£A' •• AIAO'.-ITE D'TA

C042A

'.'''''-'0(11

00428

MUST IE LAST I"

0043

OOOCl.COO

EA

945318-9t01

P.... 'P-A.5
00001.000

fA

P.'~fp-.es

OOOOl.OOG

fA

00001.000

EA

'.'MT . . .

,.e&-'199O

~O'

O~E.\AY

OVE.lAY

PX9~1'-1.'CI

00001.000

fA

'19~lP·t.A(E

00001.000

EA

OY!AlA¥

9453.6-9901 I Al, SIT_ACI.SET TRACE FORMAT-'X990

94'3~o-9901

I Al.

0048.

C041i

VENDOR PART NUMBER

945315-9901 I Al, SITREG.SIT TRACE REGIC_-'X990

COItTA

0048

J

'19"f,-,aACI OYEAlAY

0046A
0047

REV.

945387-9901 I Al, TR,ce"CO,TRACE INTe.'RETER-PlttO

CO,.,.
0046

rLM 9lt3PA:l~-GOl ~

945389-9901 I Al, .ISlC,AISOlUTE lOAOER-PX990

00441

0045

o;~

I Al, A.SC",DUMP ,ISOlUTE-PX ..O

0043A
0044

-.~

--~~

DESCRIPTION

'19"'-.C(1

oocca.coo

I

---

..... CMOILEf ,ce .... 01 ..... "0 ..'-'••••

Q041~

0042

-._---- .--.,-

.

ove.LAY

'.'lAl,lIN_IMb LOADEA MODULE-'1990

'.'~T'-l'L eVERlAY

00001.0eo!

EA

9lt53CJ1-CJ9011 AL,

DAAFTSMAN

DATE I CKD. DRAFTSMAN

DATE I DESIGN ENGINEER

API'D.-MFG.

DATE I APPD. PROJECT ENGINEER

DATE I RELEASED

P.C~P"'"0M

"OGlAMMe.,'A_T 1-PJ(99(1

DATE I TITLE

Sp".,ft" LINKAIlI 'MTSlAl ..... X.90
DATE I I ' I I O J E C T N O . _

\

J LM

PART NUMBER
.J
94S91
... 001,

REV

lit

T.I. 131W9
.

.......,._.

----

~---.-~---.,---~.-

.-----. ---.---- --..~---~:""---~-:-=~-'.-------=~----'--~-~~--'-~-~----~'~-.-.----~~-.----.-.- - /

-. "--..;

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

~
. °

=""""'~---..".........".-----~.

TEXAS INSTRUMENTS
INCOftPORATEO

,

"

IiiiNf

'QUANfj-'- ' .

u~

I'H TY
ASSEM8Ly

ITEM
NUMBER

ISSU£

DWO.
SIZE

10.-9.

DATE

~.--.....,....-,,:,~~:

LIST Of MATERIAL

01/2511.
PART NUMBER

"---.-.- - - - --.-.~

.~"...~.

PAGE

• of (,

,LM •••'1a-001,,J -J
(.

rAfT NUMW

DES C RI P T ION

VENDOR PART NUMBER

'."'~""IOVlILAY

1050

00001.00.

EA

00001.000

.,

'O~OA

OOSl

'~i)'1-'9.1 I AL.

CM••• f,eu., IMPF-, ... O

'.9~1'-'.'FOYE.LA'

9~"15-'tCl I Al. t~l.Cti~'
Plt.'.-HllO

(OS1'

.

Kl-LO,PROTO-' ....

QVI.~A'

/..,
.i~

,-

DRAFTSMAN

DATE I CKD. DlAfTSMAN

DATE I DESIGN ENGINEER

DATE I TITLE

DATE I AJ'PI). I'IIOJECT ENGINEER

DATE I RELEASED

D"TE I PROJECT NO.

.",...., lIMA.M.! '."SCAl .........
[Afflf.-MFG.

T.I. •. . ,

L- ____ _

.-~ ..

.

.1t':L ___ .,

- -. ~. . ~o-=. .=~

.......·-·- ..

1

,- 'lLM

~~~j.;.

9.iii"ER..._~ ~EV·l;

. _.~ ___._____~._..:.....:...... ".: l~_~_._

-0_.~"_
__::

. . .: _________

3•

+

A[
APPLICA TION
NEXT "SSV

C

LTft

USED ON

REVISIONS
APf'IROVEO

DATE

DESC""""ION

7506

Q

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTH£_ISE S"CI~IIED
DIM£NSIONS "It£ IN INCH • •
TOL£ltANCES
ANOLES ~1'
~ PLACE DIECIMAL~010
2 PLACE D£CIMAL~02
IDENTIIIYINO NUM_"
SHOWN IN PAltENTHIESES
ONLY

()

~
C .." "
ENGA

~Olt It£~£"£NC£

QA

INTEltPltET OWQ IN
ACCOltDANCE WITH
MIL STD· 100

...PVO

/
'v'

"

L

/""

CONTRy

"-

OE~ ACTIVITY RELEASE " -

V
l.

Tt-•••

'·c

~

OATY

~. TEXASINCO"PO"
INSTRUMENTS
... , E 0
Equ;pm.n, Gf'OIIp

0ItI,-, T....

tML, PROTOTYPING SYSTEM DEBUG MONITOR-PX990
SIZE

CODE !CENT NO

A

96214
I REV.

"•

SCALE

QRAWINGNO

943518-9901
$MEET

1 of 12

943518-9901**
M~MO~'f

1 ~'0~0

PAGE 2
1435t8 IAIIUUBI

PHASE fil,P)(SlMTP

~435t8

II'1ICI..UOE
INlTIP

943518 0000003'"

MUST Bf FIRST MODULE

E~RXNT

943518 00000041110'\'1

943518 """0"'0050
g43318 0011000f,UIJ
943518 0t3l1U101,
9431518 fU'1IIQ!0tl181'1
943!H! 0tUB/1009",
9431518 0000181130
94~Hjt8 00000110
943tH8 01'10001218
943518 00000130
943818 0010014,
943!H 8 oII! II "'IU 150
943518 0"'000113111
943!H8 00"'00170
9431518 2111'0001811
94~5U 0000(1!190
Q43e518 0(1!00021a(ll
943518 0"'00021£11
943518 ~00"'022'"
943!5t8 000010231
943eu 00000240
943518 iH190002tU!
943'18 0000026Ql
94315 18 00011'10210

IIIKSPMG

CMSTPP
PCOUT

GTFflO
GTMEx
8UPV5R

CONVRT
A$GL.HN

CMAR1N
USRFif;r·,

P)(SlIO

OSR733
S8
FUNr,~

IM
Ie
INwl\SP

INSPSS
MODMF.

MOOCR
MonR~"

MODIliP

PRTMMCR

943518 001130290
943518 0(.""" 0;''' !L~c.,

PXL..DDR
OVERLAY
PROMLO

1:3431518

SSNAp

943518

94315 18 011101'1.11'631 ~""i

seNTSL
RI)Npr;p

sn.pl(
E)KPPR
CL.EAR

FINO
H)(Aj1TH

WI'HPRT
P)«(~ATA

1*

pHASe: 1,lAL
rNCL,.UOE

,.PHASe: 1,,.. ACe:
P)(91.,'I&.

I NCL..ur.a:
TRACEMOO

SETREGN
SErRAtE
I.

PhASe: I,AB!
!NCL.UOE
A8S0Mp
A88l.0
I.

PHASE ',PRPNG
INCL,.UDE

.'

943tH8 000"'0280

PR1SSN

FPOEfP
CHOOE'

00000020

MUST BE NEXT TD LAST MDOUL..E
MUST 8E LAST MODULE OF P~9MTR CROOT)

l!H~01110320
0IiH:'~0330

943518 0(,lJ001034111
9.;HH8 011101110350
943518 0000103EUI
943518 0(110(1141131(11
943518 000(.111380
943518 00000390
9.t3fH 8 0000"4fU~
943f5te 0"'000410
943518 011101'1113420
943518 0"'C!!OJI43e
94~H518 0009104040
94leia 13 eIlHU! 4 !5 91
943518 01U/J0046m
943518 000004'0
9431518 00900480
9.3518 090004890
943518

000~0!50(il

943518 0tUl"0!510

943518 01U00!520
943518 000091530
043518 00"'0IIIH~4'"
9431518 0Q10tl10~!5'"
943fH8

000C110~60

943518 00000!5'h
9431518 00Ql00~8U
943!5t8 000C110!59t11
9431518 000006CiUl
9431.518 00011J06UI
943!518 00000(1529

PRONPG P4RT !

943518-9901**

WHEN CONSTRUCTING THE TAPE, PROMPG PART 11
MuST Bf PLACED BfHt~o PROMPG PART 1.
(_ 1*

PHASE 1,BNPF
INr;L.UDE
f)MBNPF

I·

PHASE 1,HILO
INCL.UDE
OMI1L.

'*FOLLOWFU
EN!)

aV;UPFMONT LOADER
Plt9ASM

BYIUPFRONT LOADER
P)(QEDT
FOLLOWED aya~ELOCATABL.F MONITOR

FULLOW~D

,.

(:'

PAGE 3
g~3e18

000At2l6~0

Q43e18 000006401
!U3e! 1 e 0000101550
g~3!51e 0121001121660
9~3!18 00000610
Q~35 18 00fU)Qlf5a"
g~3e 1 e rtH~'00f5'1!!
943!518 00000100
9435\8 000001113
;43!H 8 0000""20
SU3e 18 01300113130
;43e U 013000140
9435\8 000007150
943518 00000160
943518 00000110
!U3tH8 000010180
!U3!518 00001211.",
9.31518 01013080'
943!'H 8 000008 U!

NOIYMT
" ... A.E I,P)(OMT"
INC\.UO
fIt"",E 1,,,,AL.
INCLUD
fltH.I! 1, T,ueE
INCLUD!
"HAl! 1,A'1
INCLUD
'HASI 1,PRPRG
tNCLUO
"HAl' 1,BN"
INCL.UD
'HAI' 1,totlLO
INCLUD
END
.END 0' BUILD PHASE.

943518-9901**

PAGE 4

0 ",
,.

c

o

lOILIO
P)(IMTP

(

(

••

MODULE
NAM!

llNGTI'4

PROGRAM
ORIGIN

011930
001A
0e8C
0148

0"'1110
lU3e
0f1'A

tNITIA
IRRINT
WKePMG
CMITPR
PCOUT
GT'I\..O
G11'41)(
SUPVI"
CONVRT
ASGl..lJN
CI'4ARIN
USRPGM
P)(010
OSR'33
88
RANGE:
tM
IC
INWKSP
INSP!S
MODM!
MOOCR
MOD RIG
MDOWP
PRT"''''C
PRTISN
P)(LODR
OVE:R\"A
PROHL.D
SSNAP
ItNTa\..
RUNPGM
IIEPR
8KPPR
CL.EAR
FINO
I'4)(ARTH
WRTPRT
'POI'S
tMOOEF
PXOAT'

eR1E

IU8e
1336
030 ..
0"'2
052£
PIS,!

lU1 !

003C
"lOll.!
IIAA

ee08

01'8

074!
leUR

0A!54

0158
0046
0012
0!111t
0058
002A
0030
011982
0082
00SC
0016

08"

0eA",
0C52
flCliE

flcce

flCIA

11101 A

eooc

lI!t!

flE1A
01010
"'7'
10'"

00fU

011A
Ql07!

002A
0080
111030
0008
0eS!
00fIA
003A
0«ue
11106A
CHUA
0000
000A
031C

tt'2

HIC
ttAC
t27C
131A
t312
1308

t.u

1.. 86
te'0
te8.

UUU

183!

(

,

t N t T t 0 NI

NAME

VAL.UE

NAME

VAL.UE

NAME

AtL
81EF

CRUPRT

0~25

...

"020
kl03(~

00li'Jti'I

0(1\31
~~"'2

~~0!U

wRTPRT
...
E QlJ
Rl

00!0~

R~

R:!
R4

'H~33
0(~34

0@~3

0035

vl~~~

!(J,,3fS
V,0'"

~~~C

~0~""

0t110Vi

!iJ~E~

012102

~10"'!2\

0~fII4

03(.i1r.'1

017!06

0010:1:'

~'" 4r"

1.1041
01<142
f9li'4~

0~!H"

011144
0~4e

0046
0041

IW0~
0~0C

0201

0~0~

C601
CHHlA

FREMEf\1
!NIMe:~~

FPwP

1
2

f(~U

~,

E'QU
EQU

4
12

EQU :I
,"\IIPl Ff,/EME;f"

LIM! ,.,

'*
'*
'*

...
...

fIlQll~

h' S f'f

fRONT 'ANEL INTERRUPT VECTOR
LI

IH,El

I;HHH~

0049
005fi1
10~1
~HH52

Ri2
INn

EQU

Mn~tTOR

SVCSR

1d¥'23

~~38

o

'TNI'fIP'

lOT

... TITLE:
INJTJF
... Rf!VISJO~1I
...
ORIGINAL

0i11~4

020C

....
'*

TURN OFF PROTECT VIOLATION FLAG AND eL!.R PROTECT R!

o

.-INITIATE
00153

(

MONITOR

0G1114

091 0 !1l

0C111~

100'7'

00~4
0~5!S

001t"
0018

C32l'1

fHHA

000~
100~

0059

~"'lC

00~iJI

0C111F

0061

00201
0(1122

~r.162

san

0"'241

042!i'1

EQU

S
'DC13~1,Rt2

SBn

>9
)lA
)IF'

seo

~0e3

""no CRU BAS!

)Ie

INITtALIZE Me;filnRV CMAINS

BLWP 'INIME'f'1

0000

0011'5'5

~~2B

042Q1

Rl,WP 'GETBtl,

0061

tl02A
e02C
002E

0~0:21
04e~

B

'CSP

E.NO.

INIT

00614
0"'010 EI'I$

PAGE

WRTPRT

MOV

seo

'*
'*

••

TNtTYALIIE 7:53

sen

lO0C

e"6~

1.?102';

'*
'INI133
*

1001..
l.nlllB

0064
09'165

9.3!519·9901

'*

0U!5R
00151
09158

PROTO

flI00~

943519-9901**
ge0 '" 960
t

CON.CORDANCE

CMDT81~
C~UPRT

0~37

0051

0011
0f?128
0"'19

esp

0052

(H,lIte

0~58

!I

0P2~

1210141

FPST~T

0~21
0~26
0~23

0038

0P24

0~e6

0(:1125

0~15!5

~"'" 1 ~

0c~e8

FREMEM
Gflf3UF
IN113:S

0P!5'

INn

0~J7

Rl

I2HJl32

IH2

0!?l3~

INl~EM

R2

ofJl 3:-'

~3

0(,1/34

lilA

01~3!5

5VCSH

0Q!41
0Q!!5'

c

0r;;e'

OC1331
FP~P

PAGE 0004 of 0004

0~14e

0Q!~8

002~

svcwp

0~21

,,'HPRT

011153

o

•

AI
APPLICATION
NEXT ASSY

(

USED ON

REVISIONS

amc....,.1ON

L,",

APPROVED

o.t.TE

7506

NOTE: REFERENCE 945384-FPDEFS.

.

',h

.~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLIESS OTHIE_ISE S ..ECllfIED
DIMENSIONS ARIE IN INCHE'
TOLERANCE.
ANGLES !"l·
J fl'\.ACIE DECIMAL:!: 010
2 "LACE Dt:CIMAL + .02
IDENTII"YING NUM. . . . .
SHOWN IN "ARENTHESES
.. OR RE"IERENCE ONLY

c

,.,

INTER""ET OWQ IN
ACCORDANCE WITH
MIL·STD·l00

~N
CM"
ENGR
QA
APVO

CONTR

/

"/'\.

"'-. . . ,I·C

/

,,/

"7'

OE~ ACTIVITY

V

-~

OAT)!

~

TEXAS INSTRUMENTS
I .. CORPORAI £D

0./,., T....

Equipmwt, G-..p

AL, FPDEFP, FRONT PANEL DEFINITIONS, PROTOTYPEPX990

~

RELEASE " . , -

',,-

SIZE

COCE

A

96214

SCALE

+

!CENT NO

r REV.

DAAWINGNO

943523 - (1")D I
SHEET

1 of 3

'MONT PANEL, OfF'S PROTO

9431523 ... 9911

"0Vl3

tOT

'FPOEFP'

0004

ClEF

FPSrR'T

0m0!S

,WMLDR

0V1~1

DE'
oe'F
OEF

000f'J

DEF

00~6

Icl,,~q

001 (1\
0t1; 11

0012
0013
k't014

CRunFF E(.JU
CRUPIH EtW

,. J, F A0

EQU

>F8"'0

FPSTRT
ROMI..DR

"~Itl!1

FPWP

0

CRUPRT

~:QU

FEItl"

PAGE 00132

CRl)()FF

FPWP
.FE!!I0

FFF I.
1FEV'
lFAt7!

••

eau )oFFF,

>tFE0

CRIJ PROTECT REG tON REG
FRONT PANEL. WORKSPACE

t:NO

0000 EIo($

c

o

943523-9901**
'~0

~

CRUOFF
( - CRUPHT

gee

CONCOROANCE

0~11

00~~

0~

CtlC"07

t2

00~'

.'PSTRT

000Q
0~13

~008

~OMLOk

0~1@

000e

,pwp

PAGE 0003 of 0003

o

c·· ·

..

o

•

AI
APPLICATION

(

NEXT ASSY

LTIIt

USEOON

REVISIONS
APPNOVED

OATE

DE8C""'1ON

7506
.

.

(,

...

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

U ... LESS OTME"-'SE S~CI"IED
DIME ... SIONS AltE , ... INCH • •
TOC..EltANC.S
" ...aLES ~I·
a l"LACe DICIMAU:.OIO
""LAce DECIMA"~_02
ID....T'...,' ...a "'UM._
SHOWN , ... P'''''....TH •• E5
..0It !te ..EltE...CE ONL.Y
(

''''TE!tP'''ET DWQ , ...
::ACCOItDA...C. WITH
"M'L-STD· 100

~N
CH~

"-~ /

ENGA

Q4
,",PVD

CONT"'~

DE7
",-•••• ·c

/

~ TEXAS INSTRUMENTS
'NCO"P'D"ATIED

E/fII""'" G,...

OM..,

r__

AL, WRTPRT, WRITE PROTECT-PX990

/'-

"-

ACTIVITY RELEASE

V

~

O,",T~

"'"

SIZE

CODE ICENT NO

A

96214

SCALE

•

REV .

DfltAWINQ NO

943524-9901
SHEET

1 of 5

••

~RITE

PPOTfCT

*

"00~

*

til!!", ..

""'iliA

,

REGtON

,

•
•

CLEAR REGION BtT 16 ('~8001"
CALL SET REGIONCCLEAR REGrON)
END
P~OC£DURE SET pqOTECTED REGtON(CPL POYNTER)

•

OECJ,.ARE

•

t

*

0009

CLf~R

DECl. ARE

*

"00~

0006
fi001

PROCEOURE

0Alq
0020

•

CPL eIT 48
(COMMAND PARAMEtER LIST)
2 PAR~ tOUNT ~l' 8
2 PRESE~ce AIT 8
2 PARM 1 aXT '8
2 PARM 2 MIT '8
1 BASE BIT IA ('.201')
1 REGION 8IT 18
2 LOW BOUND 8IT 8
a UPPER BOUND 8tT 8
IF PRESENtE(1) • 0 THE~ CALL EM-OR,

0t)!2t

•

•

fl.-SE

QHH(~

*
*
*

, 0011
0012
0~13

*
*

""'14

16015

0018
0011

•

•

•

ftl~lA

0022

..

0023

..
..

0~24

IF PRESENCEC?) • " TMEN CALL

..

0021

..

LOW BOUND ~ PARM! MOD eASE.
UPPER BOUND • PARM2 MOO SAS!'
IF LOWER BOUND ,OE, UPPER BOUND TMIN CALL ERROR,
EL.se:

CALL SET REGION(REGION),
END
PROCEOURE SfT R!GtONCRESION)
CRU(PRDTECT REGISTER' • ~EGION'
ENO
JOT
'WRTPRT'
WRTPRT
TITLEI
WIHTE PROTECT
REVISION'
ORIGINAL.
COMPUTER I 9Q0,ASM
ASSTRACT;
1) TMIS ROUTIN! WILL .TORE TME SOUNDS FOR
THE WRITE PROTECT IN THE tRU REGISTER,
ANY BOUND NOT ON • 256 WORD BOUNDARY
WILL BE TRUNCATED TO TME NEXT LOWER
2~6 WORO AOUNOARY.
2) CLEAR TME PROTeCT REGtSTER.
CALLING SEQUENt~1
CALLEn FROM COMMAND STRING PROCESSOR,
ENTRy • Rte POINTS TO PARAMETER LIST

..

002-'
0~ag

ftl~3~
~",;S1

*
.*
*

IJH~32

'0033
e~34

003S
0036

•
..
..
..
..

0031
0038
'039
0040
0041
ta042
1043
0044

•

•
..
..
..
•

iHU!5

,H114"
0047

..

iC!l48
0049
"~5fl1

e'iHH
flJ0'~

iUl!53
1'0'54

0000
00$'11

005~

tUfII2
01103

e~'6

0"04

..
.•

E~ROR'

ELSE

*

tI!'l2~

0026

o

WORKSPAC~

RCII

o

REGISTfR DEFINITION'

fQU
F" CHI

0

M'

R2

FQU

2

R3
R4l

!(HJ
FQlI

3
4

t

o
---------------------

-,-

---

,III

iAlRITE PROTECT

0051

0005

A~

EQLJ

FQU

0IiH5()

000'"
00167

Rf5
R7

ilFMt,tJI

0008

RR

EQIJ

EQU
EQU

0"'5l~

(

0~151

~{1\0g

R9

0f()d2

"'00/.

RU

0063

~"'06

Rtl

01(164
00155
0Q)tSI'i

0~0C

R12

0P00
0Ui0E
0"'0"

i1~1'j1

1¢~68

Rt3
IH4

E'QU

Rte

f,QU

14
15

PEF

13

REF

AeL
RR

0~72

0~'3

REF
liEF

1..0PRT

0(-'74

I')EF

0~75

REF
REF

CLEARP
CRUPRT
ERROR

EQU

0~1R

0Wl'
0078
0079

>20fl1

~!5e

CLRPRT EQU

.R0i~0

SET foIIGH

020e1

"'S0!"i

EQU

.02~e

ERROR

0082
008;'

008"
011181
01'A8R
0(7!8Q

.

•
•
CL.EARP

0~00'

0fi!0P

0427'

~1'i'02

1;H-'lfiH'

~?l04

020A

""06
0IMi.~~

.

UH3

..

\110-91
0Q!92

."

0093

.."

LX

R4,CLRPAT

JMP

LOPRTl

('.800

AI"WP ,AC\.,

' .. CALL SET REGYONCCLEAR REGtON

I1'-ENO
(.II-PROCEDURE SET PROTECTED REtn
i-DECLARE
CCOMMAND PARA
2 .. 1 CPl. BIT 48
3.2 PARM COUNT BIT e

3-2 PRe:SENCE

."
."

0tt19Q

."

."

'~V'0C

0Q10t.'
042!1!
",H'I0~ ,

(~00F

C?1 t.

\~ 1?l1 Q'

oASH')

0!7112

1714

LOPRT

*
."

...

BtT

8

3·'

PA~M

3.2

UPPER AOUND eIT

1 erT 1e
3.2 PARM 2 BtT 115
2-1 .USE BIT 115 (t 1112(.110')
2 .. 1 REGION etT 115
3-2 LOW BOUND 81T A

."

11'(.>,98

010~

S

.

IfHHH5
01t1gFl
IdrJI91

it'l107

te

2 .. 1 CLEAR REGION BtT

EQU

."

~0~.4

IH03
0hl4
0105
o\liHS

REGION

CLE~R

l",OECL AIH

."

rl~0A

IN CII?U TO CLEAR

"f!I~H'!

0~91Jl

011391
filhH
0102

elr

~FSSAGE

QI-PMOCEDUR!

."

0084

WOAOa

BASE:

600!'1

00an

0V185

STRPRT

020~

\1)081

(

1V!
11
12

IMJJ71

0\i.\7~

f

H.HJ

5
6
1
8
9

EQU
EQU
EQU

•*'

1i:l"'6?

PAGE 0003

943524-9()01*.

E(.Il!

s

e

SLWP .ACI..
MOV

.IHlh,R9

$LA

R~,9

JNC

LDPRT2

\-tF PRESENCEe!)

..

I

TMt:N CALL

i.ELSE
.. IF PRESENC(C2)

..

(I

THEN CALL

~

......
i,

I

"'RIff:.

01149
011{01
lUll

PROTECT

(101.4

041~

"'0I1~

17 t 2

94Je2' .. 990!·.

••

··.0112
C~fA
04C~

tHHFt
001A
C01C
001f
U11I2V'

Jest

l!I02P

0U9

0()124

C17A

012111
0121

~j ~2(5

(1122

00211

0123
0UU
0t25
0126
0127
16128
'0' a9
013'1

0Q1!2~

8102
"InS

0113
0114
011~

0116

... Rt0+,fHJ

04t4

Roil

;)001

..

01v

Rl,R'

C

..

JHE

R2,R4

oAlH'!

~14'l2F

IH0~

I(H~3~'

,

00J~
0~32

C804

0133

0~J~

020C

0~36

001tH'I
3(1104

0142
Q1143
0"~1D

PARMi MOD eASE'

3"UPPEA SOUND

• "AAM!

3.1F LOWER SOUND

MOD AASE

.GE. UPPER

eo

Lnp~T~

SlA RP,8
MOVe R2,1oi'

3·ELS!
,.CALL SET RfGtON (RrtHON) ,
III!.ENO
0.PROC!DlIRf SET REGIONCR!GION)

EQU

$

MOV

R4,'STR"AT

1.1

RUl. CRUPRT

1004

LOC~
~'MP

l:U,0

2 .. CRU(PROTECT REGISTER)
SAVE.PROTECT REGION

•

lUG!

.

!/'I.e.-NO
$

~03C

1t'21H

LI

R"I'J,MSI!5

~(I!3f

020e;
6L

'ER~OJ:i

0(l1401

ij6M1

~~42

0~00

00144

042""

~Q!46
(!I 01 4fi

0Aea

fH1I4,4 ,

C

L.OPRT~

0C113C' LOPRT2 EQU

IU31

0140
0141

...

•

0111~:1'l

01~15

"139

...
.LOPIHl

0

IH, ~ASE

MOY
CLR

01~2

0138

wRt0+.R3
R2

R,,'"'2

"~2C

0038
0li'\3.

R9,1

I".nPRT2

() I V

0131

0134
013S

MOV

020~

•

~tU"

2 .. fH.SE
:5.\.0111 eOllN!)

CLR
tI

0201

14111
IBIS

SL,A
JNC

PAGE

LOPRT3 EQU
ElLIMP

S
'r.fR

0li'\00
~T

fNO

EMS

o

PAGE 0005 of 0005

943524-9901**

gee •

ge£!

CONCORDANCE
0"84
0010
"US

,.1

(\CL.

·SASE
CLEA~P
CLkP~T

CRUPHT
ERROR
LDPRT
LOPi( T1

0t01

0123

0116

012Cl1

0113

011~

013"

0116

0122

0t2e

0121

0119

01201

0t2~

012'

",!Ii

01(119

LOPHT3

0106
0'.35

'4806

G!l14~
W~1g

IU!

0~5?'

~1~

0l'1ltj4
~0tH~

'B"

rn

0~61
0~54

"3

"'~5!"1

Ae

011'5
0\03
01;'3

0P1b'l

R16

fU
,,!S

(H3~

0"'15;5

"13

01;'~

01t~

0P1ea

0~63

e1~A

0139

013111

IHl

0t37

010"

0~"eI
0~"3

Ii:H37

0t.Ats2

01;'0

.0081

"""5

R10

008~

~0!'14

0W1'-

LO~Rr2

ru

(

0071
~Qle4

0"'1

(lIf/l5~

0ttA
tH 13
0081

0til57

0118

R'

01,'158
0059

A8

~06(i\

A9

0q161

0103

AR

001'1

STRP~T

THEHE ARE

0011'-

003111

0141
0132

SYMeOLS

0'32

0134

o

'f

()

o

+

A[
APPLICA TION

(

(

,.--

NE)(T ASSV

APPIItOVEO

DATE

DESC.....,.ION

L~

USED ON

REVISIONS

7506

.

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHIE_ISI: S"IEC''''IED
D'MENS,ONS ARE IN 'NCHIES
TOLI!ItANCI!S
ANGLES ~l'
I "\.ACE DtC'MAl:!:010
2 ..LACE OIEC'MAl+02
IDENTII'Y'NG NUM • •..SHOWN IN ,.AItENTHESES
"'Olt ItE,..EItIENCIE ONLY
\

INTEIt ..ItET OWQ IN
ACCOItDANCIE WITH
M'LSTDIOO

~N
e .." ,
ENGA

QA
"PVC

'."

.'" A

L

/

~/

eONTR~

'"

OES/,'ACTIVITV RELEAse ' "

/
"'-•• ,1I.C

~~

DAT~

TEXAS INSTRUMENTS
, .. co"po" "I £0

OM_, TIl_

Equipmtrrtr Group

AL, DMHL, DUMP HI/LO, PROTOTYPE-PX990

.
SIZE

COCE !CENT NO

A

96214
I REV.

"•

SCALE

ORAWINGNO

945325-9901
SHEET

1 of 20

DUMP HIGH/LOW FORMAT
rOT
• TITLE I

000:\
001'"
001d5

.
..
.

0f111~6

oVI'" ,

0008

RfVISION;

[)U~P

001~

~

0014

REF
REF
REF
REF

~1Il15

0016
liH:111
0018
0"'19

IilEF

0"2r~

REF

0021

'", EF

REF
REF
REF

0022
0023
llt'!24
00~H'

0026

01>l0~

0021

21002
IlHHll4

41
001""
0000

0029
~03t.1

00;,)1
00!2

02itH5

0033
0034

0P101
1103
0100

ft!03!5

003(';
0031
003"
~039

0008
0001'

004t'1

0041
0042
0043
0044
00.HS
012146
0041
0048
0049

011'06
000E1
0rA0P

00f>II'I

0fi'10~

00tH

0"'06

0053
0054
00tHI
0~~Hi

PAtTERNS FROM HEMORY TO
BY 2ea HIGH/LOW FORMAT

CASS~TTE

COMPUTE~I

0011
tHU:?
fClii13

0052

~3/15/"f5

ORIGINAL

.• ABSTrOCT,
256 A"'fUT
..
TAPE IN TI'8
•* •• EXTE"RNAL 990,ASS!MBLY
RfFEPENCES
•
OEF OMHl.

0009

0026

o

'PMHL'
OMHl..
DUMP HIGM/LOW

000C
000!
0911"

.

ACt.

PRCRLF
PRNTC
PRNTH~!
E(~STGN

PRNTHX
SVCAL,T

PRTPfiUl

TEXT 'HL'

OATA OMHI.

OATA

*•••
..

"

MSle

EQU

M)( lilt

fQU

OF'''!

EQU

.02t)le
IIrorA001
>11913

fOU

>0H10

"'P00

•**.

$VC/P~B

•WRITA

00 lUI

0000

WEOP'

··C','

00

PRe
PRsse
PRBOP

01

PRBI..U

0111 PReSfl"
00 PReu,"
00lA' PRB~F
00tH5 PReLN
0t?l!50 PRece

r'

REQUIRED PARM MISSING

UNRECOVERABLE 1/0 ERROR
OUT OF BOUNDS
INVALIO PARAMETER

EQUATES

FQU

11

WRITE ASCrt

EtlU

9

READ ASeU

EOU
EQU

liur!

EQLJ

s

13

.. PRS.OfFINfTInt-l!
.•• *

•**.

C

eJHHlR M!SfUGE EQUATES

READA
OPEN

l!HUH' ,
000f2!

ERROR
RR

DATA

"
BYTE "

BYTE

7
0
ElVTE 0

~YTe:

DAtA aFR
OATA 8~
('AT A 80

MISCELLANEOUS DATA

OPEN FILE
WRITE END.OF.PILE

SERVICE TVPE
110 COMMAND
LOGICAL UNIT NUM8ER
SYSTEM COMPLETION FLAGS
USER FLAGS
OUTPUT SUFFER AnDRESS
OUTPUT eUFFER LENGTH
C~AFUCTER COUNT

c·\,

.,

':

OU"'P HIGI'I/lOlrl
IrH'!~1

(.

011158
III 0 t'lc;)

1!I(I!12

ItHi\t:11II

001&1

0Q114

006~

00'91
0140
0U54

0018'5
leNS'

002~
0~llP

0Q1U

0"'64

0Ql6R

01i'6Q

11'(;'118
001111
0~lC

fblJl10

(
0~11

01i'172

0P73

(

0P1tiH'
0P0(11

o01 VI fil

0Q\22

e'fAQI~

0Q1 'Hil

$

DATA "00~0

MPRT
TPRT
8LANK

EQU

("'ARAtTER COUNT FOR WRITE
ftI£MORY ~!ORO TYPe:
TAPE \IIORD TvPE
8LANK.' I

EQU

"1C1!I)I+'M'
"100+'1'

.l-fL

EQIJ
fQlJ

S

BFR

DATA
DATA

0,0,0,0,0,0,0,0,0,~

,,
I

HL

I

EIG"'TV.

01;'1001

01)12~

0~ItH'I

0""21'

0(/1eltn

01i12B

0t)IM!

p'!Ql2A

li!!CHHll

0Q12t

01f10~

0!i12F

0000

0~;'Hfl

0(l\1l!"

012132
011134

0Q\0V\
0Q1(l11J1

0(.l13f:

001Mil

011138

000~

0~3"

00011'

0(113C

{(H~Il1Vl

~~3F

flIQl4t'!

0Q1i/1t11
0PfllQl

0f)!'2

0P~H1\

00144

0ri'00

~(il4fi:

0~001

0t"4f!
0!'14"
0(?i4C:

000C11

DATA 0,0,0,0,0,0,0,0,0,e

nATA

0,0,0,0,0,0,0,0,~,~

PATA

~,~,0,P,0,0,0,0,0,e

SI)(

BYTES

0NH'l
000('1

0~.e

0121(71111

0N5P1

0Q10Q1

0~!H?

0(110C:'!

0NSoII

0Q1 0 (1'\

~Q\5f.

0P~QI

0NH~
0rA5~

0000'1

0N5C
0(}!5f

0~0~

0P\6Ci

0~1/l0

OF

0(l10'?l
0~0Q1

Vi(~62

0(110~

0!11t;4

00101]1

0Q\tJf'
0Pl(S8
iHi1 6A

0Nl"

0Q16E

PAGE

.

4~4C

0ti11E
0(l12'"

~(l!6C

....

SAVERG ['lATA 0
",YPHON !QU 11>20"'0
20IlH''I
11"111 A' END ADO FQU $
OATA 0
000!ll

00100

01?1HI' C",ARCT EQU

0~e2

0063

94~~25·9901

FQf!!MAT

00\0'l'l

0qt01f1
00\00
1/I1'.II012!

OATA 0,0,121

ZfAOES

DUMP HIGM/LQw

PAGE 0014

FD~MAT

*.*

REGISTER DEFINITIONS

.*.

o

,f--"

~,/

c

O~MP

HIGH/LOW FORMAT

•
•
••
.•

0~16

0011

(

0~1H

0"'79
0~8P1

0!!'81
0082

•••
•••

0PJ8~

0000

R0

14086

0~01

0087
"((ISH

0P102

Rt

ALL ~EG. REFERE~ICe:S HI fiNPF QUMP ARE VIA SYMeOLIC
ACRONYMS 1""OICArlve: OF 'HE tUR~ENT USE OF TH! REGISrEP. THfSE ACRONYMS ARE DfFINEO BELOW. ANV Tr~E
II REGISTER FREES up, OP IS !o!f,' .. ASSIGNf!'O, ONt! OF THE
FOLLOWING COMMENT CA~OS wILL APPEAR IN THE LUITING
REGISTER REASSIGNMENT a OlO WP'ta'PTR1'. NEw WPl(a'FMEE'
REGISTER REASSIGNMENT. OL () \ljpX.'P"'~l' , N!W W,Xa'PTR2'

0~8Q

~003
0~0t

lI.I~g",

000!5

IZlI/ISJl
011192
00~3

000~
000~
0~HH5

CPRM
HOR
ACT
STAT
HEM
END
ROM ADO

00g4

0(1101

BIT

EQU
fQU
EQU
EQU

0
1
2

f!'QU

4

EQU
EQU
EQU
E'QU
EQU

0095

0~08

1i109tS

0C1109

0fl1Q7

0~II1A

BFR.
BFR!
PRBA

0~98

0001-

R10

0099

000113
0000
00111E

IH3

EQU
EQU
EQU
EQU
EQU

R14

E:QU

0~0F'

RU5

0l1rH1
0HH
0Hl2

(

•

0084
0085

PAGE ~00f5

RU

EQU

EQU

:3
~

f5
6

e
1
e
9
1(11

10
11
13
104
115

SCIU1CIo!

SCRATCH

prJ( TO CQMMANr'l PARM L.IST
~ F. "',ER FROM tMO. PARM, LIST

DUMP OR COMPARE TOGGLE
DU~P OR CMPR START ADDRESS
OUMP OR eMPR STRT·CURA£;NT IND
DUMP OR CMPR ENO AOOA!SS
FiOM waRD AonRESS
BTT OtSPLACE'MENT WITHIN WORD
OUT BFR SASe: + CURR INDEX
PTR Tn MX DATA 40DR II\! eUFfER
.OORESS OF PRe
SCRATCH
R!TURN AODRESS
PTR TO PREvtOUS WORKSPACE
SCRATCH
SCIUTCH

DU"P HIGH/LOW FOIIHUT
0~1~

C~8A

EQU
MOV

•RUI,C'RM

rUle

0072
0(.1174

'U20

81..WP

'ACI..

iHI1

0~1f1

ceeD

MOV

IH3,.,UV!RG

lH""
0105

0010' OMHl;.

001fa

''118

0~1A

il11\lJ
0111

1I)t;'!7C

0012'
CQlF2

I~(ST~Te.ANO~EN08.IQ,~'CALl

0A10

SlA

eI

JECI

0""00

'l'P OR 'C'
TMEN CAL.L. ERROR(MP"!'!)

00132

0U!S

0"'86

oHUt"

Move

0132

eUA

0(11st

0119

fiH?!8F

0284

009~

01344

SRL,

098~

0~92

1303

131'194

0284

"""g6

004~

eI

09JgA

lfS17
,,,,gAt OM"'l'Ie
A08m

IN!
eQU

':'>" 120

0P19C

rU13

008E

:'1127
IU28

0(11A2

111:!
C172

SLA
JNC

,,9UI

." 129

0(1!A4

U!11

0130

00A6

:0131

0A15

0(11A~

0Al~

01~2

0~AA

110e

euu

\:rU24

·':;'11 t 215

0~ge

0"'A~

il133

0(11AC

~t34
ru;,~

0~Af

013e
fH31
(11138
IU39

01'182
01'4841
o(118 e;

014(11

"1411

0~e0

01'1!CC'1

f/H 43
01441
fllt 415

0P1CP

0287
000C
11503
100!1

1lJ0C.d'
02fU

01l'1C"

0?0!1

OMH~l

ill.,

,,!.'ItA

00CI' ASORT
06A0

00C,\

0~"0

11048

01i'lCC

10411

014g

JH
JMP

AeO~T

OMH01A

AeORT

!QU

I

LX

R10,Msee

SlA
CLR
SL.A
JNC

0Q!C4

0.146

BtT.t2

Mev
Joe

lUH'
"4t1
0A13
170A

0142

MOV

SL.A

SlA
JNC

"eu.'

CtF2

*

ABORT

s

el

Joe:

SAA

00e~

IF TOGGI..£ HE

DEFAUL.T Tn PI
END OK, CHECK FOR erT
JUMP IF NOT PRESENT
eIT otSPLAC!M!NT IN Wr.'lRO
IF BIT VALue OUT OF RANG!

SRL

lseB

ACT~'C'

TOGGLE

RI'I,CPRM
HoR,t
OMhft'll
"'CPRM.,STRT
STRT"
ABORT
STRT,t
HOR,t
OMM"1
*CPR"+,END
END,l
ABORT
11110,1
BIT
HOR,t
OMM01A
.CPRM.,!IT

A

MOV

C182

0!?1BA
0(!1Se
00Bf:

A80RTtM'0e)
SHIFT ACT !'REIENT elT INTO
CARRY

CHAR COUNT TO RI
TRUNCATE TO EVEN NUM

0Q18~

01~2

HElOER WORD

.CPR"+,R0
R0,g
R0,t
·CPAM+,ACT
ACT.a
ACT, 'D ,

0U4

0

SAve: OLD WKSP 'OtNT!ft

,",ov8
SRL

0201.

012P1
1121

NIW WORKIPAC!

09901

1ll~7E

01'1180
0(1182

0918A

A

HOR,9
OMh01
1110,M1I00

0113

0086

~OY
*CPAM+,HOR
PARAMETER vAL.IDATION

LINK

SL.A
JNC
LX

0Afil3
1122

1112

0116
fUt?

•••
*1

P.61 0f1U1J8

**

IUl00

01(119

J

94f532e"ogc~ 1

tQlI

$

AL.

.ERROR

JMP

OMMTRM

INCREMENT CPl POINTER TO STRT
SHIFT aTfn PR!IENT BIT INTO
CARR\,
OUMP STARTING ADDR
IF STRT NOT EYEN THEN
CAL.L ERRORCMP00,

C

START 01<, CHECK FOR END
DllMP END ADORESS
IF ENO NOT fYl!N THEN
THEN CALL ERROR

AeORT.R!QUIREI') "ARM MISSING

0

DUMP HIGH/LOW
t()10(ll

OMH01A EQU

0~CE'

*1

0151,
01~2

0111Cf

C~0e

0153

000P'

0201.

0"'02

1103

tl15A

0f'lO.d

0151

000fS
0(llDA

0280
01P!

I/,IUJ8

01i'D_

IPF~

S

JH

01tH
0162
0163
0164
0UH;

0002

0003

~16R

*

f.QU

2

R3

fQU

;,

•

0("OC' OMH02

011'~

0(1!0('

0201

"G'iOf'

00f1JB

0Q\Ef'

0!l1E4

ce2~
0~Hl'
0(Al~'

0f,1!E~

0284

0C11ffl

0Pt43

01!1E2

0P1EA

1602

0~EC

0201

011iEE

0009

0~F'"

0176

(IN LINE

EQU

$

LX

Rl,OPEN*2ee.WRIT. OPEN LUND 7

.

,
i

'~

SET CHAR. CT. FDA WRITE

DMH~2.

'C'

IF TDGGLE SET TO COMPARE

el

ACT,

JNE
LI

0"H02.
PREPARE TO READ
Rt,OPfN.28e+R!AOA CPEN LUND 1

EQU

$

~'OV8

R t , 'PRBOP

PRBA,PRB

IlJP'iF2
0178

0~F.d

020"

1.1

0119

0(i\Ffi
001F(oI

000~'
042~"

0000
0t'Cl

BLWP 'SVCALT

0V1FA

SWP8 Rt
MOVe RI"FReDP

8ET THE PRe TO FUNCTION
COOE TO WRITE/READ ASCII

0008'
0209
004A'

LI

BFRE,~FR+A8

SET UP

0UH~

Ct'0~

MOV

ENO,.ENDAOO

0HHI

11.1014'

. 0te£"

0PFC

0181

0!11F!'
011/JV!

0182

0hl2
01164

0811.11

04ce

~NO

of OUTPUT BUFFERS

04CO

CL.R

ROM ADO

010C

CLIO'

IH:3

trlJ!

[.:1284

el

ACT,'C'

IF TOGGL.E SET TO COMPARE

0t1~

00'143
1318

JEQ

DM~0'

BRANCH TO COMPARE SEQUENC!

CHIIlA
1/.1

0U'8
IHag
019V1

2"6 WORDS

E~PANSION)

00F!lI'
Deptl
0V,08'

0181

~

*1- CALL OPEN(PRS.'

01""9

0183

~!N

A80RT

R~

*

01SA

0117

END OR

til

10167

IU1.
011!1S

STRT,P0

* PARAMETER VALln,TION COMPLET!
••
* **
OLD ~2~ePRM. NEW R2.FREE
* **
OLD R~~MOR
NEW R3-FREE

kl1e£"

kl173

JUMP IF START IS GREATER

IFCX~LE.0'CALL A80RT(MPOe,
IF(~.GT.2e6)CALL AaORTCOP03l
el
R0,~lFE
THAN

01t59

0172

$

)(-e:NO-START
MOV ENO.RQ!
L.I
R1C11,DP0:3

6~(,l\5

ICIU'5
0156

011t

PAGE 0001

FO~MAT

U 1l?

.. 1. MEM-STRT

• **REGISTER REASStGNMENTIOLD

.. tw 00

~HILE(MEM.LT.ENO'

SFT BEGINNING ROM ADDRESS

R~'ST~T,

NW Re.MEM

DUMP HIGH/LOW FORMAT
*2

~hH
011~'

0UH!
kll~3

0llA
011tl

0194

~'lfo\

"""11.'
0~A~

21 t 1/1

0264'

011C:
0tiE

06A(1'I

0120
0122
13124

0(fSA0

•*1.

020~

021111
0202

13126
012f4

020~

21204
02015
0206
0201
020~

2112.
012C
012f

iHUfli

e211
0212
tl21!
0214
0215

021R

21219
0220
(4222

IU23
0224
0225

0000

022t§
0221

0228
0229
!U31~

BLANK.FtLL TM! eUFFER

FILL eFR W/ANP' DATA

AfiORT

JLE
LX

OMM03
SFRA,SFR

0014'

013A

DtH'I~

0!.;'.

21008'

eeA0

*1- CALL wATROCPR8A'
LI
R0,wEDF*256
Move R0,'PRBOP

02C4'

01~(l\

If!it;3

lP10'
0144' OMM"'''

0004
IU4,

0208

014"

09111.'

0148
014A
014e:
014E

0(fiA0

WRITE AN END-OF.F!L,E
SET OPCOOE

c~

*1 CALL WPTRO(W!OF)

0142

fH.

'WRT!'HI

JNE
JMP

ABORT
DMMTRM

trQu

$

EIIlU

4

LX

BFRA,eFA

AeO~T

l' wEDP 'AILED

••• REGISTER REASSIGNMENTs OLD RA.ACT, NEW

R4

*1-CAlL WRTROCPAB)
IH.
'WRTRO

02C4'
~ov

C"40
024{,
4000
16tH.
0241

RQI,Rl

ANOI R0,)tA00Q1

R.'FRE~

SET UP STRT OF OUTPUT BUFFER

REAO A RECORD
SYSTEM FLAGS

JNf ABO~l
ANOI RI, Jlt 2P1(i!1Q!

2Q!00

taU5S

1604

01tU

06A0

0115£

0l0e;'
101tJ1

oU5C

.BL,NI<

JNE

12F:!

0136

01152
015A
ItH5t1

BL.

eI~85

0UI!3

01!5~

.11221

SET UP START OF OUTPUT BUFFER

CONTINUeAI
ROM40n,e

00rF

021'
0218

BFRA,BFrIf

CAL.L WRTRD(Pf(FI)
8L
'WRTRO

022t1
ViVl09

0'~4

~H3E

Ll

CALL FILLC8FRA,f,MEM,ENO)
BL
'Flt..L

1601

02fi'18

0131:

$

0~C4'

0J3Vi
0132

tn09

fQU

flt16C'

flIUilA
0U~9

o

C.LL RLNKCSFRA,BFRE)

OMHQl3

0208

0UH!
0196
lOt9'

PAGE 0008

10Ft

JNE OMHTRM
IF EOF TM!N EXIT
*2 CALL UNFILL(BFRA,E,MEM,INO,
SL
'UNFILL
COMPARE BUFFER AND MEMORY

JMP OMI-1TRM
*1 CONTINUE
JMP OMHIi'.t1
*1

END

O~HL

OMHTRM EQU

I

fSC RETURN

o

ou~p

023'

(

~232

0233

(

Sl4532S·9Q01

HIGI"f/LOW FOF?MlT

0162

C36~

0164
016fi1
111168
0HiA

0t"1~'

04291

MOV

8LWP ,RP

0\1lfD~1

IlIAee

.SAVERG,R13

RT

...

PAGE 00'9
RETURN

\II14.8P

POINTER

"

I

FILl.. THE OlllPUT BUFFER
111236
0237
023"
0239
0241'1
f11241
0242
0243
16244

PAGE 00tA
IFILL
FILL TH! OUTPUT BUFFER WITH HIGM/I..OW FORMAT

• TITLE

*
*•

REVISJON1 03/15/7e

."
ORIGINAL
.. ABSTRACT.
FILL eUFFIR ~ITH Tl • X 2eo HIGH/LOW FORMAT.
COMPUTER, 990,ASSEM8LY
•* CAI..LI~G SEQUENCE'
."
ENTRY,
ReaMIM wAnDRISS OF M!MORV OAT •
Rs.eFRAaADDRESS OF OUTPUT SUFFER
."
R9.8FR!'AOD~. 0' END OF OUTPUT BUFFER
R6~f.NO -ENDING ACOR. OF MEMORY O.T.
Re,ROMADO.AODRESS OF ROM WORD
**
R1.eIT .BIT DISPLACEMENT IN MEMORV WORD

•

0245

..

024fJ
02"
0248
0249
0200
0251
02'2
0253

..

0254

..

R0 •• R~

02D5

..

HEM ,ADOREIS OF NEXT eYTE TO 8E CONVERTED
8PRA,ADDA+l OF LAST eVTE IN OUTPUT BUFF!R
THE eNPP RECORD IS FORMATTED IN 'BFR'.
•••• ENTRY POINT ••••

•

..

12155

..

el6C' FILL

0.t!

017"
0172

020.4

~17'"

0203

LI

0118' FlLt

EQU

$

eLF!
OIV

Re
R3,R'

, '" tee:

Cli.I4l5

0~64
0.C~

02tJR

917.

\\C03
"2201

1276
0271
8271)
16279

0280

QH7C

017!
0l8V.

0182
0184

0eCfl!
OE00

,tNO DIGIT
CONYERT THE DtGIT TO DECIMAL

R0,:»:5121

siIIPe R9I

Move

CLR

0~C2

OIV

111188
11H8A

A0C2

A

R"',*eFAA+
R2
fU,R2

R2,R3
R2,R2

CQl82
16f"!

fIIIOV
IN!

"Pl!

SRl

0201
201110

L,l

OEiI!
C04e
0221
0001

MOVI Rl,*e'RA+
MOV
ROMAOO,Rl
Al
R1J1

Vl1S~E

020~

LX

01AA

0084

eteE

0190
IU92

oHIlA
011H'1

0U~8

0282

01&).
Bl&)e

lSIA

,

~'-'---~--

Joe;

...

FLL!

RUf,l
FLI.2
Rl,HVPHON

Ascn AND
IT ORE IN TH! OUTPUT BFR.
REDUCE NUMBER OF
DIGtTS RE~ArNtNG BY 1, AND
~HEN ~ OF otGITS R!~AtNrNG 18
NOT Z!ffO, REP!AT
ELS!, IF COUNT"
~DV!

---.--~--.-

HYPHON TO SUFFER, SET UP

TO CONYERT END-OF-LtN! ADDR
TO DECIMAL AND REPEAT CONVEA.
SION

R:5,1091

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

c

MAX • OF OGTS IN CNVTD

rR3,10P1

00a0

3C84

~IUH

0283

At

918f5

0u.e

FIRST OR LAST LIN! ADOR COUNT
tN!TI VALUE TO 8f CONVERTED
CONYERS ION fUSE

e00A

0178

0273
0274
02715

*

"t6t

0261

1/1272

$

CALL 8INOEt(MEM,IPRA)
IN LINE EXPANSION
CLR Rt~
MOY ROMADO,Rt
LX
R'I,10

.1

02ee

0270
0271

EQU

."

0176

0269

EX I fa

*

111256
16251

0208
0259
0260
0201
02152
02153
0264

o

o
-~--------------

..-----

FILL THE OUTPUT eUFFER

('"

0284
0285
0286
0281

01A2
01AA
01A6

028R
028g
02911l

01AfIi
\ilU.

021iH

0tAf

01AC
01a~

0292
02;3
029.1
0295
02SHi

0291
02QI'I
0299

It.H6?

0tSA
~Hefi

01 f,H~
01SA

01SC
01SE

INC

Hi4

JMP

FLLl

FI..1..2

f'QU

INC

$
BFIH

lIq AlP FL.\..3

EQL!

S

10EO
k'Ue
0t588

I

~Hllae

INC

0201

1..1

BFRA
Rl,A

C

HEM, .ENt:unO

JH

FLlfiJ

0P104
S'-0!5
k'lPl14 ,
1fHt'"

Cfl,Fe
C001
1301
0UI3
01SC:' FL.L.4
020~

MOV

tMEM.,RJ
BIT,RIII

MOV

etT TO ee; STORED IN ARRV STAT

DF.l~

0tCC

lf1!0!'5
0tCE' FL\..6

lutE

!lI2~2

01D~

0018'

0lDP.
0104

0601

030f1i

0307
0308
0309
031Vl
0311
0312

13:513
0314

0t06

01DB
0tDA

0lor:

leFt'

Dfl~

16Fe

SHIFT WORD TO eIT
IF BIl WITHIN WORD NOT ZERO,

R3,t

kHC6

0305

PUTS A BLANK IN 8UFFER
aIT COUNTER IN Rt

SLA

0302

0f\01

IN BUFFER

AOOR. OF 'ML' IN R2

S

INC R2
MOVB ttR2,tAFRA.
DEC R1
,I Nf
Fl.L'"
JMP FLL1

0tta

~LANI<

R2,AML

VH582

01e.

~

RJ,R0

0301
030~

PUTS

EQU
Ll

.Joe

031/1A

JNCR CT TO tNnlCAT! LAST AODR

FLL.4

U01

FLL.!5

PAGE 0011

Je;Q

0018'

0A13

••

!lLA

01CV'
IOtC2
0tCA

030~

(

0eaE

9'532e.gg0t

FLL.5

(QIl

$

LI

R2,AML

MOVB .R2,ttPFRA+
efC Rl
JNE FLUI

01D'P Ft"L.7

EQLJ

$

8248

C

lAEl'J
045B

JL

8FFU,RFRE
FLL.3

RT

JUMP !fOR POSITIVE BrT
INC TO , L' FOR NEG~ fUT

STORE 110<41 OR , L. I
DECREMENT eTr COUNT, AND
LOOP BACK IF BVTE NOT CON!

GFT HIL. I

F:ND
FILL BVTE wtTiol IoI'S.MEM
DEC COUNTER UNTIL END OF" BYTE

eYTe:

."'0

OO~lE' • CHECK END OF BFA,
JUMP fHt:K IF NOT

UNFILL-READ AND COMPARE
fc)31'

• TITLEt
UNFIlL
•
COMPARE BUFFER .ND MEMORY
• REVISION. 03/15/78

0:518
"3U~

*

032111
0321
0322
0323
032'

*

1/1326
0321

*
*

•
•
•

032~

•
•
..
..
..
..

0329

0330
03;H
0332
0333
rlJ3:SA
0335
03315
0331
0338
033;

*

..
..

••

0341
034.3
0344
03415
034e
034'

0352
13tt3
1354

BtDE

01EP!
01E2

0U:'

C3ce

EXIT,

R~ •• R4

0~14'

01E~

058S
21201
0004

tUEE

1830

EHFOI

1i1306
11351
030fl

C0FS
C001

0tF6
01F8

0A0Z
01F"
21202

0lFA

0018'

""a
01F4

1359
03f51
1362

01FC

0383
1il36'

020(,-,

rUFf

0365
136ft

--~"-

SAVE RETURN ADOR!SS
MOV Ru,Rle
Al
BFRA.8

01E4' UNFI..L4 !QU
8805
C

01£6
01EP
01£C

..

0228
000.

13515

1i13tHl1

GENE~ATE

•
MEM .ADDRESS OF NE~T eYTE TO ME CONVERTED
..
BFRA,ADOR.l OF LAST BYT! IN OUTPUT BUFFER
..
THE eNPF RECORD IS FORMATT!D IN 'BFR'.
010£' UNFILL EQU S
•••• £NT~Y POINT ••••
*
.1 CALL BINOECCMEM,eFRA)

03142

0351

THE SAM! FORMAT A8 IN SUBROUTINE FILL.
INSTEAD OF STORING CONVERTEO VALUES tNTH!
BUFFER, COMPAR! THEM TO T~E VALUES AlREADV
THEWE, IF THE ADDRESS!S 00 NOT MATCH RETURN TO
READ ANOT~!P RECORD, IF STAINGS 00 NOT MATCH
8RANC~ TO A OISPLAY ROUTINE WHICH DISPLAYS EACH
STRING,
COMPUTER. gg0,ASSfMBLV
CALLI toIG Sf(WENCE.
ENTRY,
R5*MEM .A~ORE88 OF MtMO.V DATA
Ra.8F~A.ADDR!88 OF OUTPUT eUFFER
RQ.BFRf.AOOR, OF ENO OF DUTPUT BUFFER
M6.ROMAOO.AnDRESS OF ROM WORD
R7.AJT .BtT DI8PLACEMENT !N MEMORY WORD

..

134~

0350

o

ORIGINA~

• Aft8TRACTa

032~

0348
0349

PAGE (11012

1~01

eAl!

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

HEM,.ENnAOD

UNFL13
BFRA

Ll

IH I.e!

MOV
MOV

*MEM+,R3
BIT,RqI
UNFLLS

IF HEM> END ADnR THEN ExtT
SKIP A BLANK IN BUFFER
elT COUNTER IN Ri
8HIFT WORD TO BtT
IF BIT WITHIN WORD NOT tERO,

R3,~0

S

LX

R2,AHl

ADDR. OF 'HL' IN .2

aLA

R3,1

erT TO 81 STORED IN ARRV STAT

Joe
1801
tNC
liH582
0202' UNFI..L8 EQU
CB
9112
JEQ
1321.

.• - ••

$

JH
INC

JEQ
SlA
UNFLI..l5 EQU

SkIP ADDR!SSES

UNFI..L6
R2
$

.Aa,.IUrRA+
UNFLl1

-------_ _ _ _ _ _ _ ~~_

,

);1,__

INC TO 'H' 'OR N!G~ 8lT
COMPARE 'HI OA '1..'
IF EQUAL CONTINUE COMPARISON

o

UNFIlL-REAO AN"

06"~

DEeT

Me:~

C(ll4~

~OV

ME'M,FU

0369

020~

C1 HS

031A
0311

020C
020E
021V'

C0C7

MOV
!"IOV

SIT,R3

Ll

RP,12

021P
01U"
021"

6Q10:5

S

R3,R0

"80~

SRC
SLA

fU, R0

8L

.DISPLV

031'
(631~

"31"

JU,12

06A!!I

£!21~

£1268'

"21t
021E

01410

022~i

0201

0222

2020
0?2A1'
0fY0.

DEC

0381
1/1382

21224
022fi
121228

90~8

CS

16FO

0,383
0384

fll22A

022C

0385

022E

0tHJI
0704
02"2

JNE
INC
5ETO R4
RIl,AHI.
LI

0316

037'

0318

0319
038Ji1

023\71

DATA MPRT
JMP UNEXIT
fH, ,
LI

1~23

UNFLI.7

EQll

0388

0232' UNFL.1.8 EQLJ
94fU
ce
1302
JEGl

"JtH~

0236

0A14

023f1

l~(fIt

038'

03riQl

03SH
0392
0393

023"

0~!H

023C

039~

023E

0396

0240

03g,
03$18
03gg

0242
0244
0246

5LA
JMP
EQU
UNFL.1.9
0231.'
0f!4F4
SRC
023C' UNFL1'" £QU
9"'58

16F!:I
0AC4
c~.e

0AC3

0.40~

024A

0EiAtll
0268'
01!54

0401

024C

l~CIIC

0402
0403

024E

05C~

0250
0252
02!5A
02ef5

0280

0248

0404
0A0~

0004
ie01
0AC~

ce

JNE

s

SFRA
*RFRA,Rl
UNFLL.'
BFRA

JNE
CLA

U""104

0601

0Al~

DEC

025C

l~CO

JN~

0411
fa412

025E'

0~8e

0"13

02ti~

8246

0414

0262

02!5'"
0~5t'

lAC0
026~'

*BFRA,Rl
UNFI.L.8

TPRT
UNEl(IT
MEM
Rt3,4

fll25A

UNI'L12 !QU
INC
C

JL.
UNFL13 !QU

ESC RETURN

1(1 CONTAINS BLANK

DECREASE eUFF!R ADDRESS
UNTtL. AODPtESS OF IIREVIOUS
IS ENCOUNTERED
SKIP BL.ANI(
eIlFF!R eyn: VAI.UE TO Be: IN
ADDR
'lolL' TN RI

,,

0'

"'' ' ,

IU

SHIFT t INTO RIGHTM08T BIT IU

S

DATA
JMP
tNCT
eI

lP!0~

GfT COUNT Tn 8M!,T 8tT STiltING
TO "10HT OF woFtn THEN Tn
l E'FT •• Cl.e..,U RIST OF WORD
ANO DISPLAY

RA,15

,

CLR
BL

UN'U,. e: CHI
JMP
UNFL.l1 EQU

GET MEMORV WORD

IF JHJFF!'R CONTAINS
JUMP TO STORE A 1
SHIFT 0 INTO RIGHTMOST

rU,12

02(58

02~ft'

~et3

S

ROMAOO,fU
A3
.DISPL.V

Mev

PAG!

*8FRA+,.R2
UNFLL9
ru,1
UNtrL.l(i1

SI..A

041615
0401
0408
1"09

(U16

,

0~18'

0232
0234

0386

(

0AC.4

*MEM,R4

0211\

037~

(

0200

01i10C

••

GFT PREVIOLIS WORD AODIltESS

0206
0208

0361
03tsA

('

94eJ2e·IH~e 1

CO~PARF.

erT

ru

IF NOT END OF BVTE,
CONTINUl CONVERSION
GET eYTE VALue
AND OUPLAY

ESC RETURN
GET NEXT WORO ADDRESS

Rt3

s

UNFL12
i

R1
UN'LLa

DECREMENT 8tT COUNT, AND

ROM ADO
8FRA,""U:
UNFt..L.4

GET NExT ROM BYTe: AOORES$
eVTE OONE. CHECI< END OF 8FR,

s

S

AND JUMP lUCK If' NOT

UNFIL.L.-RfAD AND COMPAR!

1418
0411

0418

02,5"

0"Cr

0256

02t58'
045F'

UNf)tlT

94S;US-SH),1

!NtT Rlf!
E.QU

S

P

t'H!5

--

PAG! 0114
NORMAL RETURN TO CALL.!R

0

DISPLAY STF98

028t1'

AU, fll

04tH
0462

MOV

D$E~lT
FU,Rl~

CALL PRINT(ADOR)
Bl
'PRNTIoiN
JMP

Ll

•

ESC

RETURN

GET ADDRESS

•

CALL PRINT (BIT)
81..

'PRNTI-IN

08EI(1T
RU1,EOSIGN

029/1

1~""t

JMP

020A

1..1

029F:

~}~0~

02M1
02A2

0fiA!?l
029(-1'

•

OSE)(IT
R10,PRTPRO

ESC

RETURN

CAL.l PRINT(.)
8L.
'PF(NTC

029C

(0453

046A

•

1"'13

0459
Ii)

JMP

0()11llQl

040es

C'

PAGE

REVISION. 03/1!5/76
ORIGINAL
ABSTRACT.
DISPLAY STRING AS BYTE AD~RESS.elT.STRtNG
COMPUTER a g00,ASS!M8L.V
CAL.L.ING SEQUENC!:'
ENTQYI
R1 r.ONTAIN8 ADORESS
R14 CONTAINS STIH"'G
EXIT.
Rl,R1I'!,ru DfI!STROYEO
BFRI!' SAVED
DISPL.Y EQU $
****ENTRV POINT*···
P'lOV
IH 1,R:iI
SAVE RETURN ADDRESS
~OV
BFRE,R14
SAVE ~'~e:

lQ!lD
0~,e'

0447
0448

TITLEI

••

•*
•*
*
*
*
*
*•

\Cl42A
0425

0443
0444
0445
0448

945~2f1.9Q0t

ESC RETURN

CALL PRINT(.)
ElL
'PRNTC

04t5~

0~A.d

H"(~!3

0?AfII

JMP

OSEXlT

0416'"

C2tt4

~Ov

R4,R1~

ESC RETURN
G!T FOlJR",EHT STRING VAt"UE

DISPLAY STRINGS
0At$1
1il4tHl

It

0248
02A.

0"A0

••

PAGE 0016

o

CAL.L PRINTCSTRtNG)
"PRNT~l(
!'H.

0fl!00

0469

02A(:

lQl01

04111

02AF'

05C~

028~

021:H'l ,
C24E

0282

0452

0471
0412
0473

94532e.9901

JMP 08£XIT
lNCT R2
OSE)(IT EQU
~iOV
R14,8FRE
B
*R2

,

hORMAl RETURN Tn CALLER
RESTORE eFR!

o

8L.ANK FILL. eUFFEF1

•.
•..

0A7e

('.

0A71
047M
8147Q
0A8J

048'
IU83
0484
0485
0486
0487
0488

0r50~'

(

c

ABSTRACT.

0284
02BP

028A
028C
02BE

eLJFp'E~

ORIGINAL

TO BLANK FILL

ENTRY'

R8·H~'FU'.OORESS

EQU

$

0200
2f1120
0288' BL.Nl
HIGH LIMIT THEN DO,
INSTRUCTION COUNT. INSTRTUCTION COUNT .1'

".

CALL SCAN TAALECeREAKPOINT,USER PC,FOUND),

IF fOUND THEN DO,

CALL BREAkPOIN1 PROCE8SCUSER PC,BREAK .,
8REAK ENTRV,TERM),
IF TERM THEN SIGNAL RETURN TO OPERATOR
ENOl
IF INSTRUCTION COUNT ,EQ. 0 THEN
SIGNAL ~ETURN TO OPERATOR'
IF I~STRUCTION COUNT .EQ, -1 TMEN
INSTRUCTION COUNT. INSTRUCTION COUNT
CALL MONITOR CHAR(CHAR,NO WATT)'
IF CHAR ,fQ, eSCAPE THEN SIGNAL
RETURN TO OPffUTOfq

.1'

..

".

*t

...
.

.
••
..

Efl.J() ,

E:N!H

RETURN TO OPERATOR.
ENO RIIN,

Tor

TITLE:

".

...

'RUNP(;P'
~llN

RUN USER PGM UNDER DE8UG

REVISION,
ORlrH~!AL

COMPUTER: P90,A5~
AeSTRACTI THIS ROUTINE CONTROLS THE oeeUG EXECUTION'
OF' A USER' 8 PROGRAM.
CALLING SEQUENCE.
61~

...

•

no,

IF TRACE N! RESIDENT TME~ ERROR E~IT'
CALL TRACe~(USER PC,U$!R w~'U'!R S1),

....
....
.....
...
*.
.

...
.

o

ttl

..
•..
..
..
..

IHl42
~H'!43

PAGE 0811'2

R!0

flRUN

• PTR TO COMMDND PARAMETER LIST

REF'S AND PEF'S

DEF

RUN

o

Ot:.8UG RUN

(

COMMANO PROTO

9 AI ~ ~ 2 th· fHHU

"'0:57

REF

..,0t)8

R~F

RETIiUF

A0!59
"061('1
Ii:\Vlt:il

REF

I_WP

wEF
REF
REF

REF

~9I64

REF

IiHIJC)!'1
011.166

REF
REF

6kPT

10067

Rli.F

BKPTPR

REF
REF

0t.171i'

p,;'EF

~0'1

REF

"072
0013

Io(EF'

0fi174

I-iEF

0015

REF

~EF

ESC
SIe:
TRACER
SREGN
MONCH""

011'17;:'

QE,F

CRUPRT

STRPRT

011J82
111,;1183

I:JQl0~

•.WORKSPACE
•
F,'QU
R0

Y.HHU

00~1

Ri

EQU

1

~~65

~~~0~

R2

t:.t.lU

2
:3

REGISTER DeFINITIONS
0

~'\lJ86

\:~r1I0~

0087

0004

~1~tH'
rIHHH~

khH"'!5
rl00ti

R3
R4
R5
R6

PH'J9fJ1
0\1191

0~01

R7

1(l006

EQU

a

E:{~U

f".QU

EQU
FQU
EQU

4

e
6

7

a0~2

if.I(l!0~

R8
R9

EQU

9

0tl'19-'

V,l0\0A

R10

ElW

0t~1II4

Vl01d6

Rl1

VJ095

000C

R12

EQII
EQlJ

0~"'Q6

~t?l0D

R13

EQU

10
11
12

00191

0(:l!l-'Ie:
000F

FH4

fQU

Rte

EQU

k,ltllSHi
0\~9Q

\lJl~~

IH~l

~HH'4

~t~2

~Ql01

0103

l!'!kl01

0hl~
0'~0~

~t10

PRTVIO

•

, RUN
."

Q\ ~~ ~ ",

"Yl02

'B09

JIo1X04
M)(07

E. QU
E-QU
E.QU

>Q10rA4

fQU

S

>rA0~~7

(/I42Vl
00VJ!1'
."

.

TRY TO EX TRACE WMEN NOT IN 0
WRllE PROTECT VIOL.ATION

1

l .. PROC~OllRE RUN(CPL),

."

01\Hj
lc'!U7
IOhH~

•

1~

14
1[15

."

01ft)4

".'/

PCOU'f

0Vl18

01J'181

INSTRUCTION COUNT

LOIt!l-IM
HILIM

USRI"C
SCTS

0fi118;~

("

TRACE
ERROR

REF
REF
REF

1'3016
0V!17

(

RWP
ACL
RR
INSCNl

0~62

0!iJ68

PAGE 0003

GETBUF

0V\63

0009

.-

.ALLOC,COPV,LtNK
BLIHP '.CL
2 .. /- RUN CONTROLS TME !)(!CUTIO
USER PROGRAM UNOER f!TM
2·

,.

O~lhJG

RllN

COMM4ND PROTO

945~2~·'UUH

••

".
2-

...*

" 111
0113
0112

...

2-

0~04

C27A

,.lOV

H~10+,Rg

~111

"~06

0A9!',)

('1V1~8

1111~

SLA
JNC

R9,9

~11~

f.lJ00A

ce 11,

MOV

*Rl k11 ,'%NSCNT

~1)\0C

00~0

E:QU

;It

012'"

*...

0121
0122

0~0E'

IU2'012~

f:100F

020,.

~1~H'l

IiJ~0~

~'H<

C260

~014

~:HH'\~

~OIlt1

0~AI~

00 J, A

0~~0

0129

0~lA

C28A

~130

0!1I1 C

130J
001£'

ij121
~128

iH31

0132
il13:!

~ltHe:

0(SA~'J

0021f1

00"~'

01\54
"t3~

('4022

01315
iDtfl24

C2AQl

0026
1a1l'28

00~\1l

f.H!12 II

0eA0
00071

13;'('1

0143
~144

002E

t0J1

0145

003~1

0fjA~

003-1082

!!JAlI\~

iH~84

~HH1~

I6H~4

t'08b

141"5

~08~

1~C3
1~04

01Q6

C

0197

•

lNSTRTIJC

TAALE(8RtA~POINT,U

4",If FOUND THEN 00'

e·CAU. 8REAKPOINT PROCESS(USER
ENTRV JTERM) ,

~L

.RKPTPR

MOV

R10,RU

JNF

RUN~61O

Eyp

S

,s.IF

n:R~

TMEN StGNAL RETURN T

4.£1'011) ,

t-IOV

4tINSCNT,RA

JEfJ

RUNI36'"

e1

R(!I,-t

JNE
INC

RUN0e0

~QU

$

81..

..MONCHR

A.. IF INSTRUCTION COUNT .fO • 0
5.SIGNAl RETURN TO Ofl'EIUTOFU

"' .. If INSTRUCTION COUNT .fO, .1
INSTRUCT
!5 .. r~S'TRUCTION COUNT

•

NO INSTRUCTION LIMIT

fFFf

0191
~19J

..

02th'l

H185

01d9

.
RUN040
..

COUNT

e.. SRE'AI(

.

13174

(

,heAlL SCAli!

.
.

0171

.A
,1'/\6(:

4.INSIRl.JCTtrlt.!

Lt

VN0C'

IH75

S

020A
0!;l1091

IH~58

"'173

.
.

'INSCf',IT

\Il"5~t~

el'51

RUN0I35 EQU

DEC

., iii :) I'i

iilt65
0106

RQ,·LOIIIl.IM

tHH't!
01iH"')!
0V!56'

PAGE 0005
3 .. 1F USER Pc. c LOW LIMIT ,OM.
4wHIGH L.IMIT THEN 00,

C

lilt b;~
~1t,)4

....,

0P14E
OJn~4

••

tlllSIOfPC,Rg

1')05'"
~"Hj2

0161
0Ui2

94!5326 .. fHHU

RUN~5t1t

.
..

..

'tNSCNT
•• CALI.. to10NtTOR CHAR(CHAR,NO WA
ih.!F CHAR .EG, ESCAP! THEN SIS
!5.RETURN TO OPEAATOIH

ce

HQ,"ESC

JNf
JMP

RUN0Ul

RUN061'11

3.ENO,

2wfNO'

94e;'26.998t w.

ot.I3UG RliN COMMAt.lD PROTO

0t9A
0199

~0~HI '
~H118A

nest

0092'

k1205
1l:'I21d1

0~1it2

!J42~1

f1P1Q.4

('00tl1

tH?l9ti

v14tsS

e:QU

$

£:H.

'ERROR

o

'*
''**

RIJN~6~

EQl)

t,.END RUN,
.LINK TO PREV WKSP, RET CURR WKSP
6l..WP fRR

R1

ENO

~208

0ral!!~

I

RI0,M1(04

~,~\!!~

0204
02~f5

RUN057

(~IiIiA~

w.!21tl2
02~3

~~QlJ

Ll

iH:H14
~08EI

O(llSE
v'di~ 9 0

RUNld55

02lH~

ERS

0····

_"I

PAGE OOO? of OOO?

945326-9901**
gel!.!

•
(:

•

CONCORDAI

k'l148

II't 17

U~67

CAUP~T

R8

0139

0125
0176

0'29

011~

Bl(fJTP~

RS!

iU29

Q1t8'

~108

"'16~

R4
R!5

0188

0UH

006t

!tJt?ltH>

L.OI'wLIM
L.WIo!

('

0178

0164

~20J

ACL.

Rll

0U52

0t~e

0131

020 01

BI(PT

ESC
GET6UF

01!54

0136

0122

:,~

RlJN~~~

rH

RUNiIl57

t'2~f/I

RUI~"'61J1

020~

9~

RIIIP

SRt:.GN
STRP~T

TRACE
CTRACER

USRPC

'MERE ARf.

005!'.>

('('156

0161

0194

0116

0182

012'1

0HS'1

01!52
0125
0126

SYM80LS

0HJ5

0195

c

o

+

A[
APPLICATION

(

NEXT ASSY

USED ON

REVISIONS
A~"ED

DATE

~

LTJit

7506

(

....

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE_ISE S"ECI~IED
DIMENSIONS AItE IN INC"ES
TOLEItANCES
ANGLES !:l·
»"LACE DECIMAl:!:.OIO
2 "LACE OECIMAl:!:.02
IDENTIn-ING NUM . ."
SHOWN IN "AItENT"ES£S
.. Olt "E~£ItENCE ONLY

("

\

INTE ...... ET DWQ IN
ACCO.. DANCE WITH
MIL STD· 100

~N
CM""'ENGA
QA

"'-~//

",pvo

CONTR~

A

/

/

TEXASI .. (O
INSTRUMENTS
....O .. AI£O
OMIa, T,,_

Equ""."."t G,..,.

AL, CMSTPP, COMMAND STRING PROCESSOR, PROTOTYPEPX990

~

DES"""ACTIVITY RELEASE " ' -

1'1-•• ,»·C

~ gJ

OATY

~

SIZE

eCCE IOENT NO

A

96214
1 REV .

SCAI..£

•

ORAWINGNO

945330-9901
SHEET

1 of 13

COMMAND STR PROCESSOR PROTO
0003
0004
0005
0006
0007
0008
0009
0010
0011
(j012

0013
0014
0015
0016
0017
0018
0019
0020
0021
0022
0023
(1024
N~25

:t.

*
**
*
**
**
:t
:f,

:f,

:t

*

:t
:t

:*

:t

*'

:t:
:t

:*

*'

0026
0027
(2)028
0029
0030
0031
0032
0033

:t

00~::l4

:t

0035
0036
0037
0038
0039
0040
EH)41
0042
0043
0044
0045
()046
01347
01348
0049
0050
0051
0052
0053
0054
0055
0056

**
*
**
:t
**

**
**
*

:t

:t

:f,

**
***'
*
*'
*'

*l
:t'

**'

945330-9901

**

PAGE 0002

PROCEDURE COMMAND STRING PROCESSOR
DECLARE
1 BUFFER
CONTROL PTR,
2 CHARCNT FIXED(S).
2 TERMCHAR CHARel).
2 CSTRING(30) CHAR(l);
DECLARE CHAR CHAR(l);
DO FOREVER;
IF WRITEPROTECTERROR THEN CALL ERROR;
CALL PRINT(PROMPT);
CALL GETF I ELD (PYR); .
DO 1=0 UNTIL CMDFOUND OR CMDNOTFOUND
IF PTR,CHARCNT (2 THEN SIGNAL CMDNOTFQUND;
IF COMMANDTABLECI)=PTR, CMD THEN
SIGNAL CMDFOUND ;

o

1==1+1;

IF I>MAXCOMMAND THEN SIGNAL CMDNOTFOUND;
END;
CMNWT'FOUND: DO;
CALL RETBUFCPTR);
CALL ERRORCCMDERROR);
END;
CMDFOUND: DO;
CALL RETBUF(PTP);
CALL GETBUFCCPLPTR);
CPLPARMCOUNT = 0;
CPLBITS =: 0;
CPLCURRPTR = CPLPTR + 2;
PARM r NDE:x:=0;
DO UNTIL ENDOFRECORD OR PARMERROR;
IF TERMCHAR = 'EOR~ THEN SIGNAL
ENDOFRECORD;
IF TERMCHAR = 'ESC' THEN SIGNAL ESCAPE
PARM = COMMANDTABLEPARM(PARMINDEX)i
PARM=HAB: DOi
CALL GETHEXVALUECVALUE.TERMCHAR);
C(CPLCURRPTR) = VALUE;
CPLCURRPTR ::: CPLCURRPTR +2;
CALL CPLPARMMARK(CPLPTR.PARMIN
END;
PARtr1=STR: DO;
CALL GETFIELD(PTR);
IF PTR,CHARCQUNT+2 + CPLCURRP
- CPLPTR > 30 THEN SIGNAL PARME
CCNT == PTR,CHARCQUNT
IF CCNT > 0 THEN DOl
PI ::: PTR;
CPLCURRPTR.CHAR = Pl.CHARCNT;
Pl = Pl+2;
/* SKIP TERM C
CPLCURRPTR = CPLCURRPTR + 1;
00 WHILE CCNT >= 0;

c

Pl,CHAR=CPLCURRPTR,CH~R;

Pl=Pl+l;
CPLCURRPTR ::: CPLCURRPTR+li

- - - - - - - - - - - - - - - - --_._--------

o

COMMAND STR PROCESSOR PROTO

945330-9901

0058
005'3

CALL CPLPARMMARK(CPLPTR.PARMIN
EHD;
CALL RETBUF(PTR);
END;
PARt,'HHHER. DO;
/tDON'T PUSH INDEX PAST END OF PAR
PARMINDEX = PARMINDEX -1;
TERMCHAR = 'EOR';
END;
Et'-lD CASE;
PARMINDEX=PARMINDEX+l;

Ov.lf;3

0064
0065
006(;
0(:H37
OCH,3S
OOI~;9

0070

0071

END

OO~:;'2

00:30
00:31

00:3,2
(lOS]

0(j84

0085

0086
00:37
008S
00:3:9

0090
00::) 1.
OO:;)Z
(\ 0 :::) '3
0094
OO~::I~;

00::)13

00::)7

0098
()09!j
(101)

0101
0102

010:::
01 !(:14
0105

010f:;
010?
0108
01 (:"jCj

0110
0111

c

IF r:'TF,: tiE. ~, THEN DO.·
CALL COMMANDSERVICEROUTINECCPL)

nWF~ECORD:

OCJ)3

OO?';)

00~)3

), 1) ,1.)

0060
0061
0062

12JO?S

F'AGE

COlT =- CCHT -1 i
END
CPLCURRPTR = SLA(SRL(CPLCURRPT

~1057

0074
123075
121076
0077

**

nw,

**
*
t

ELSE MISSINGOVLY DO;
CALL ERRORfMISSOV);
END
PARMERROR: DO,
t
CALL ERROR(PARAMETERERROR);
t
END;
ESCAPE:
*
CALL RETBUFCCPL)
END;
:t
END;
tEND;
t
PROCEDURE CPLPARMMARK(CPLPTP,PAPMINDEX);
;r
/t CPLPAF?t,j "-I I LL I NCREr'iE:r,IT
t
THE PARAMETER COUNT AND SET
THE PARAMETER PRESENCE BIT
r
FOR THE PARAMETER CORRESPONDING
:t
TO PARMINDEX.

*
*
*

iU

TEMP = SRL ( '80'. PAf~~l) I t'4DE/<) ;
CPLPTR,BITS = CPLPTRBITS .PR. TEMP;
CPLPTRPARMCOUNT = CPLPTRPARMCOUNT+l;
END CPLPARtdt'1AFW;
END CMDSTRPROCESSORi
I DT
.' CHSTPP'
r TITLE:
CMSTPP
;.
,.,
COMMAND STRING PROCESSOR

*
t

RE\lISIO~~·

*r* COMPUTER.
ABSTRACT
*
*
*
*t

ORIGINAL
990.ASM
THE COMMAND STRING PROCESSOR PROVIDES
THE SYSTEM KEYBOARD INTERFACE. THE
PROCESSOR ACCEPTS STRINGS FROM THE
KEYBOARD WHICH ARE PARSED IN ACCORDANCE
WITH THE COMMAND DEFIHITION TABLE. WHEN
A VALID COMMAND STRING IS INPUT, A COMMAND
F'f4RAr~ETEP T(IPLE IS 81.) I L_ T I,JH I CH COHTf:~ I t',IS

COMMAND STR PROCESSOR PROTO
0112
0113
0114
0115

945330..,.9901

**

PAGE 0004

011(;

THE I
PARAMETERS
** CALL SEQUENCE:
l
BL
CSP
*
REGISTER DEF I NIT I
:t:WORKSPACE

011?

;j:::

0118
o 11 ~1
0120
0121
0122
0123
0124
01;:::5
0126
0127
0128
0129

0130
0131
0132
0133
0134

0135
013(;

~4PI)T

0

or~s

0000
0001

RO
P1

OOO~~

R2

0(10:3
0004
012105

R3

R4

0~I06

RC·
.:;)
RI3

~1007

R?

0008
0009
0E10A
(1008
000(:
0000
000E

R8
R9
R10
Rll
R12
R:13
R14
RIS

oel0!="

*

:t'

0138
0139
0140
0141
0142
0143
0144
0145
0146
0147
0148
0149
0150
015.1
0152
0153
01540155
0156
0157
0158
0159
~H60

oH\(;

T(-1E:L Y TRANSLATED.

@

013?

0161
0162
oif;:::
0164
0165

51)!

H~G

*

:t

EQU
EGlU

0
1
2

EOU
EOl)
EGlU
EOU
EOU
EGiU

-,
,-

ECiU

8

EOU
EQU
EOU
EG!U
EOU

9

EOU
EGll)

"')
•.,.1

4
5
G

10
11

1'-'Co
13
14
1[3

REF'S I;ND DEF'S
REF PROMPT
REF CRIIOFF
REF USRPC
REF PR I ~~T
REF GE'fFLD
REF PR~HC
REF Ct~DTBL
REF ~'WCMDS
F:EF F'COUT
REF GETHEX
REF ERROR
REF TERMCR
REF EOR
REF BLANk
REF COM~,1A
REF PLUS
F'EF MINUS
REF ESC
REF GETCHR
REF CPLSAV
REF CRIJPRT
REF STRPRT
DEF CSP
REF GETBUF
REF F:ETB:UF
REF Ll.JP
REF RI.,JP
F~EF
ACL
REF RR

MONITOR PROMPT STRI NG

C
COMMA"lD PARAMETER LIST
NUMBER COMt>1ANDS
PRINT ERROR SUBROUTINE
CHf::'RS

3-DEClARE
4-1 BUFFER

CON.,

PTR,

0

COMMAND STR PROCESSOR PROTO
0167
0158
c:)1 69
0170
0171
(1)2
01?3
0174
I() 175
0175
O:L77
0178
0179
(H2O

181
0182

~)

018]

0184
(l185

0131:;
0137
(~) 138
013~)

01Sl0
0191
0192
OH)3
(H~::lr:1-

0195
0196
0197
0198
0199
02~)t3

c\

-.,

'"

*
*J
*
'-

945330-9901

**

PAGE 0005
5-2 CHARCHT FIXED(S),
5-2 TERMCHAR CHAR(1'.
5-2 CSTRING(30) CHARel);
3-DECLARE CHAR CHARe!);

>K

:t~

0000
0004
0005
0201
0100
0Chl3
0007
0001
0001
000;2
0001
00(10
13001
0002
000:3
t300D
OQl0B

EQU o
EQU 4
EOU 6
EOU >0201
EQU >0100
EQU >0003
WRITE PROTECT ERROR
EOI) >00(~7
~D<07
PROTECT VIOLATION FLAG
PRTVIO EOU 1
1
TRI-,-lCH~~ EOU
EOU
2
STRtlG
SCERR EOU 1
PDSTR EOU 0
F'HSTR EOU 1
PCSTR EDU 2
PHULL EGIU 3
EGIU >D
HAB
EQU )B
DAB
REGISTER ASSIGNMENTS
t
R2
PARAMETER TYPE
:*
R5
COMMANDTABLE - POINTER TO CURRENT
t
ENTRY IN COMMAND TABLE
::I:
R5
PARMINDEX
INDEX IN PARAMETER LIST FOR
:r
CURF~ENT CN1MAHD
:t
R8
COMMAND PARAMETER LIST POINTER
R10
PTR
POINTER TO STRING RETURNED
:t
BY GET FIELD
t
R12
COMMAND PARM LIST CURRENT LOC

01DCDE
CMDRTN
CMDLEH
O'IDERR
PRMERR
f,1ISSO\.1

*

*

COMMAND STR PROCESSOR PROTO
0202
0203
0204

945330-9901

0000' CSP

EG1U

$

BL

@PCOUT

LI

R10,M><07

L.I

R12, CF:UPRT

0000

06A0

000;E

\:l000

0004
OOOG
0(108

020A
000?

*

**

PAGE 00(216
NO PROI_OGUE REQ'
2-DO FOREVER;
OUTPUT USRPC TO PANEL
3-IF WRITEPROTECTERROR THEN

0206

OOOA

o:::oc

1Z,210

(100E
(1010

000121
1F01
1603
302:0

0012

0000

(~j211

0014

(12 ()8

0209

oooe

UHF
~)01.G'

0212
~l213

TB

PRTVIO
CSP00S
LDCR @STRPRT,0

JtlE

,.JHP
CSP0CS EOI)

*

~)214

-w

3-CALL PRINT(PROMPT);
P10, PF:OMPT
@F'RNTC

OiJ 1::3

0(100
06A0

BL

12101C

00lE

12100121
1000

~lOP

0218

0020

06AO

f:L

0()::~;2

0219

0024
00213
00:23

000121
D82A
0001
00\)0

002A
002C

04C4
0205

OO:~E

0001Zl

021(3

,11·

LI

001A

0215

CSP02c:

3-CALL GETFIELD(PTP);

0217

0220
0221
0222

0030

022:7

0228
022':;1
121230

0036

1;

MOVB @TRMCHRCR10).@TERMCR

*

4-DO 1=0 UNTIL CMDFOUND OR CM
eLF:
LI

CSP010 EOU

022]
0224
02:2

@GETFLD

F:4
R5.

cr~DTBL

$

t:
DO~;A

t·lOVB

003;2

0981

laO~l4

01341
110(-1

SRL Pl . 8
DEeT PI
JLT CSP020

",.,t·

~~Rl0,Rl

::I:

4-IF PTR.CHARCNT <2 THEN SIGN
Rl0.POINTS TO STRING BUFFER
RYTE 0 - @ CHARS
5-IF COMMANDTABlE(I)=PTR. CMD
6-SIGNAL CMDFOUND ;

(7:)2]1
02:32:

00::::12

1 ::lO[

0234
0235
0236

003E

0534

5-1=1+1;

R4

C

R4,@NOCMDS

0040

8804

004:2

0')00
140]

~!HE

CSP~)20

AI

R5,01DLEH

JMP

CSP010

EQU

$

02]:;'

0044

121239

0046
(1043

0225

0240

004A

10F2

()241
0242

*

I ~K

5-IF r)MAXCOMMAND THEN SIGNAL

4-nmi

(lOOt;

004C'

*CSP020

4-CMDNOTFOUND: DO;

c

COMMAND STR PROCESSOR PROTO

(-"
",.,'

0243
0244
0245
0246
El247
0248
0249

0420
0000

0050
0052

02ElA
LI
0201
0054' CSP022 EQU
06AO
BL
0000
:t
10D3
JMP

(

0270
0271
~'il272

0273
0274
0275
0276
02?7
0278
0279
0280
13281
0282
0283
0284
0285
0286
0287
"02S8

0053

R10,CMDERR
$

@ERROR
,;t·-END;
CSP

MOV

R10,R8

CLR

:tR8

't:
.i",

005C

04D8

13060

C308
05CC

13062

04C6

*

R6
5-DO UHTrL ENDOFRECORD OR PA
:II;

6-rF TERM CHAR ::: 'EOR' THEN SI
7-ENDOFRECOFm i

:*:

9820
0028'
0(100
134E
9820
006(3 '
135B
C045
05Cl
C0El6
0240
0007
C091
0Al0
1:301.

@TERMCR,@EOR

JEQ

CSP09G
6-IF TERMCHAI:(

CB

@TERMCR,@ESC

JEGl

eSP105

*

6-PARM
MOV
INCT
MOV
ANDI

R5,Rl
Rl
R6,R0
RO.?

b10\l

:1:R1,R2
R(l,l

SLA
...JEGI
Of:~02
SLA
0(18r; , C2
EQU
09E2
SRL
0(:)88' CSP060 EQU

0086
00;38
008A

OC~82

0001
1611

0(~8C

C'

--.-~-----

*

CB

:::

'ESC' THEN 51

0(012)

(1074
01376
0078
007A
007C
007E
0020
0082
0084

---------~--

+ 2;

5-PARM I t'mD(:::0 ;
CLR

:4:

006C
006E
(12)70
0072

CPI_PTf~

:::

R8,R12
MOV
INCT R12

:1:
0064' CSP030 EQU
(.;064
0066
0068
0'216A

5-CALI_ RETBUF (PTR) ;
5-CALL GETBUFCCPLPTR);
RE-·USE D~IS:TING BUFFER
5-CPLPARh'lCOUI'n -. 0;
5-CPLHITS .-. 0;
5-CPLCURr~PTR

:t
0~\5E

: DO;

$

:4:

C20A

5-CALL RETB:UF (PTR) ;

4-CMDFOU~m

*

005A' CSP025 EQU
:t
OEl5A

PAGE 0007

5-CALL ERROR(CMDERROR);

*

0054

**

:tRETBUF
BLI;IP @RETBUF

004C
004E

0~'56

02513
Ql251
0252
0253
0254
0255
02 1;6
0257
0258
0259
0260
0261
0262
13263
13264
0265
026.3
0267
0268
0269

*:t

945330-9901

--

-,--

*

:::

COMMANDTABLEPARM(PA

ISOLATE 2 BIT FIELD
BITS OF R2

C2
R2,R0
$

R2,14
:II;

7-PARM=HAB: DOi
C1

R2,PHSTR

·JNE

CSP065

COMMAND STR PROCESSOR PROTO
0289
0290
0291
13292
0293
13294
13295
13296
0297
0298
13299
0300
03131
13302
03133
133134

0Q8E
0090
0092
01394
0096

013A4

05CC

@0A6
00A8

136A@
13134'

~)09A
~,@9C

009E
00A0

}~~~

0333

0002
00D4
00DE)
00D8
00DA
~!0DC

@GETHEX

**

PAGE 0008
7-CALL GETHEXVALUE(VALUE.TER

0

130013

0@A2

eE)98

lo0D0

0329
0330
0331

BL

104B
JMP
JMP
1001
Hi09
JMP
0098' CSP061 EQU
ce4C
t·10V
6048
S
AI
0221
FFE2
JGT
1540
:+:
C7@~1
MOV

13305'
0306 00AA
00AC
13307
13308 e0AE
0309
0310
13311 00B0
00B2
0312 (10B4
'13313
13314 00BS
013B8
0315 00BA
00BC
00BE
0316
0317
13318 e0ce
0319 0()C2
13320 00C4
0321 0eC6
'0322 0 11.)C8
0323 (10CA
0324 00CC
0325 0eCE
0326
0327
0328

*

06A0

945330-9901

@0AI~

I

D809
006E'

*
*

CSP1@5
CSP@61
CSP062
$

R12.R1
R8,R1
R1.-3@
CSP1@0

8-C(CPLCURRPTR) = VALUE;

Rl@.:+:R12
8-CPLCURRPTR = CPLCURRPTR

INCT R12
BL

8-CALL CPlPARMMARK(CPlPTR.P

@CPLPM

CSP062 EQU $
MOVB R9.@TERMCR

SAVE USER INPUT

TER~1

CHAR

7-END;

:+:
102A

IF II--IPUT ERROR
IF VALUE INPUT
IF ~w Vf~LUE H~PUT

JMP

cspe8e

7-PA;~M=STR ; DO;
00B0' CSP065 EQU $
R2,PCSTR
0282
CI
0002
H;23
Jt'-lE CSP075'
8-CALL GETFIELD(PTR);
:+:
@GETFLD
BL
06A0
0022'
SAVE TERM n~AT I NG CHAR
MOVE @TRMCHR(R10),@TERMCR
D82A
01301
e0AC'
8- IF PTR,CHARCOUNT+2 t' CPL
:+:
8- - CPl..PTR > 313 THEt-i S I Gt~AL
:+:
MOVB :+:Rle,Rl
D0SA
0981
SRL RL8
I t'-lCT Rl
05Cl
0911
SRL RL 1
0A11
SLA RL 1
A
R12.Rl
A04C
R8.Rl
61348
S
Rl,-29
0221
AI
FFE3
1103
JLT CSP068
:+:RETBUF
:+:
BUJP @RETBUF
0420
004E'
...Jh1P CSP100
11324
$
00D~1 ' CSP0e8 EQU
8-ceNT = PTR . CHARCOU'NT
:+:
MOVB :+:R10.R3
D0DA
SRL R3.8
0983

*

C

0

COMMAND STR PROCESSOR PROTO
13334
13335
0336
0337
0338
0339
03413
0341
0342
13343
0344
0345
0346
0347
13348
0349
0350
0351
13352
13353
0354
0355
13356
0357
13358
0359
13360
13361
13362
0363
0364
13365
0366
13367
13368
13369
0370
13371
0372
13373

CCDE

13CB

C0E0

C08A

0CE2
00E4

DF12
05C2

~\378

i{0$4

*
*
**
*
*
*

CSP073

MOV

R10 . R2

MOVB *R2,*R12+
INCT R2

DF32

0CE8

06133

eeEA
C0EC

l3FD
15FC

*

MOVB *R2+,*R12+
DEC

R3

JEG
JGT

cspe7C
CSP07C

091C
0AlC

00F2
e0F4

06AC
13134'

*
*

SRL
SLA

R12.1
R12,1

BL

@CPLPM

0CFA

0CFG' cspe73 EQU $
**-RETBUF
134213
BLWP @RETBUF
CCD6'
*1004
JMP CSP08e
:t:

C0FE
1311313
131132

B-DC WHILE CCNT >= 13;
9-Pl.CHAR=CPLCURRPTR.CHAR;
9-Pl=Pl+1;
9-CPLCURRPTR = CPLCURRPTR+
9-CCNT - CCNT -1;

8-CPLCURRPTR
9),1),1)

CCFC' cspe75 EGU
0606
DEC

= SLACSRL(CPLC

8-CALL CPLPARMMARKCCPLPTR,P

RETBUF(PTR)~

7-END;
?-PARM-OTHER: DO;
B-/*DON'T PUSH INDEX PAST END
8-PARMINDEX = PARMINDEX -1;

**CCFC

B-CPLCURRPTR. CHAR = Pl. CHA*\\:;?~~
8-P1 - Pl+2;
/* SKIP
B-CPLCURRPTR = CPLCURRPTR

8-END;
B-CALL

**

CCF6
C0F8

8-Pl _. PTR;

8-END

*
C0EE
0CFC

> 13 THEN DO;

$

:+::

ceE6

PAGE 1313139
8-IF CCNT

JEG

0CE6' cspe7e EQU

0374
13375
13376
13377
0379
133813
0381
0382
13383

*

9453313-99131 **

$

R6

8-TERMCHAR - 'EOR';

D82C
MOVB @EOR,·@TERMCR
131;:168 '
CCBE'
131134' cspe8e EQU $
7-END;
6-END CASE;
G-PARMINDEX=PARMINDEX+l;

*-

**-

131134

13586

01136

lCAE

131138

01138' CSP0geEQU
*C1A5
MOV

INC

R6

JMP

cspe3e

5-END
5- ENDRECORD: IF PTR . NE. 13 T

*

G-CALL COMMANDSERVICEROUTINE
@CMDRTNCR5),R6

COMMAND STR PROCESSOR PROTO
0385
0386
(1387

010A
010C
010E
0110

0118

0004
1307
C'-":;':'l
,,;:.<:'6
C8('S
0(l00
0896
C2r-:1(J
0112'

0llA

1008

ra11:2

0388
038S1

01.14
0116

03gel

0391
0392
0393
0394
(1395

011C 1
011e

OIIE
0396
121397
0398
0399
,'2)400
0401
0402
(;403

0120

0122'
0122
0124
~)126
(Hc~8

0404
0405
0406
0407
0408
0409
(2)410
0411

020A
000:]
1002

020~1

012C
012E

0412
0413
(..)414
0415 '0130
0132

MO\/

lR6
@CF'LSAV, R10

Jb1P

CSF'1H)

EOU

$

LI

RI0,MISSOV

JMP

CSP102

BL

*
*CSP095
*

*
*CSP100
*

(~010

0'
")

( REMD'lEER CPL PTR)

M[SSI~~GOVLY:

DO;

6-CALL ERFWR (M I SSO\}) ;

5-END
5-F'ARt~ERROR

EQU

$

LI

P10,PRMERR

: DO;

6-CALL ERRORCPARAMETERERROP);
:II:

@ERROR
5-END;
5-ESCAPE:

EOU
MOV
012(' eSP110 EOU

0460
0000'

PAGE

5-ELSE

C288

0420
00FS'

**

5-END;

**eSP10S
*
*

CSP095
R8,R10
R8,@CF'LSAV

b10V

01(12)
0126' CSP102 EOU
06AO
BL
0056'
012A'

012A

JEQ
t,lOV

945330-9901

,
C

$

(,

R8,R10
$

S-CALL f':ETBUF (CPL)

:tRETEUF
BUJP @RETBUF

;j(

4-ENDi

*
*

2-nWi

3-E~m i

B

@CSP

,

"

COMMAND STP PROCESSOR PROTO
0417
0418

*:t**-

0420
0421
0422

;t

0423

::r
;1:

0424

0432
0433
0434

:t

:*

::r
l

13134' CPLPM
0136
0138

013A
013C

0435

0436
0437

02131
0080
C006
1301
0%1l

('

EQU

$

LI

Rl,>30

~(jOV

EOU

$

*

SOC

Pi. *R8

·)EQ

3-CPLPTR.BITS = CPLPTR.BITS

013E

E6el

01413

StJPB *R8
RT

0440

0142
0144

0443

13146

C45B

PFi~ESENC~V\:D.l

3-TEMP - SRL( '80',PARM)INDEX)

SPL

0441
0442

THE Pf;PAMETER

FOR THE PARAMETER CORRESP
TO PARMrNDEX.

REGISTER ASSIGNMENTS
- POINTER TO COMMAND PARAMETER LIST
RG
- PARM INDEX
R0,Rl- SCRATCH REG

013E' C4

06D8
0598
06D8

~3'-

33-

R8

R6, RC
C4
Pi. RO

0438
0439

PAGE 01311

3-:1U

::r

13134

**

2-PROCEDURE CPLPARMMARK(CPL
3-/* CPLPARM WILL INCREMENT
3THE PARAMETER COUNT AND S

:t

0419

0425
tl 42G
0427
0428
0429
(1430
0431

9453313-99131

3-CPLPTR.PARMCOUNT
SklPB ::rR8
I riC

= CPLPTR

::rR8

2-END CPLPARMMARK;

13444
(l445

121000 ERS

*-

END

i-END CMDSTRPROCESSOR;

PAGE 0012

945330-9901**
960

-

$

980

CONCORDANCE
0202
0294
~~393

ACL
BLANI<
C2
C4
CMDCDE
CI'~DERR

CMDLEH
CMDRTN
CMDTBL
COt,n,1A
CPLPM

0283
0435
0174
0177
0176
0175
0429

0247
0239
0384
€l142
€l15€l
0304
015~~

CRUOFF
CRUPRT
CSP

0137
0156
0158
0209
0240
0228
0211
0232:
0380

CSP030
CSP~)60

10285

CSP~)05

CSP010
CSP020
CSP022
C:SP025

CSPO(31
CSP062
CSP065
CSP063
CSP070
CSP0?3
CSP075
CSP030
CSPE'90
CSP095
CSP100
CSPI02
eSP10S
CSP110

DAB

02~:N

(312)5
0310
0:3:30
0344
0362
En70
0374
0382
()3El3
0399
04·£;:12
0406
('403
(li9E)

EOR
ERROR

ESC
GETBUF
GETCHR
GETFl~D

GETHD<

HAB
Li.!JP
1.,1 I NUS
MISSOIJ

MX(17
NOCIr1DS
PC:OIJT
PCSTR
PDSTR
PHSTR
PLUS

0223
€l310
(N02

0242
0330
0406

0248
0344
0408

0253
0362
0429

0266
0370

0283

0285

C)374

0382~

0

(~\435

01133
014::3
0281
0433

CPLS~iV

'3202
0212
0223
0242
0248
0;253
0266

0212
€l3€l5
0399

0222
0359
0387

0389

0207
0251

0415

0237

0292
02S13
0283
0326
13:352

0335
0312
0303
0270

C
0353
0366

Q)385

0293
0396
El273
0391

0329

0148
0146
0153
0159
0154
(l140
(l145

0269
0249
0272

0373
0403

0218
029(l

0314

0291

0189
0179
(l180
018?
13185
13186

0161
0152
0395
()206
0143
0144
031.1
0287
0151

0236
0204

C!

PAGE 0013 of 0013

945330-9901**

(C

PNULL
PRINT

0188

PR~'lEI~R

0178

PRNTC
PROMPT
PRTVIO
R0
Rl

(H81
0118
0119

RiO

~J123

Rll
R12

(1129
0130

R13
R14
R1S
R2
R3
R4
R5
R6
R-'
,/
R8

0131
01:32
01:33
0120
0121
0122
0123

R9
RETBIJF

0127

0139
0401
0141
013(:;
0208
0'-'
-'-"1
c:.,/
/

(-

Rl,)P
SCERR
STRNG
STRPRT
TERMCR
TRt,1CHR
USRPC

0432
0276
0322

0434
0279
0323

0295
0324

0296
0325

0297
121431

0219
0337

0225
0386

0231
0389

0247
0395

{?,12!:;6
0401

0:::00
0407

0315

0261
0357

0262

0295

0300

0302

(~3~~3

0341

0348

0282
0333
0234
0231
0277

(~284

0287

0311

0337

lB41

0:::42

0348

035121
0236
0239
0371

0275
0378

0384
0384

0388

0432

0259
0440

0261
Cl441

0296

0324

0386

e:::8?

el407

0437

0245

0328

0364

0411

0210
0219
0315

0269

0272

0306

0315

0373

0207
0356

0279
0332
0221

0256
0439
El306
0160
0164
0162

F~R

0282
0275
0321

0278
0226
0319
0437
0214
0332

0~'''''''''
c:.r::.c:.

0125
16126

0280
0227
()320

0225
0318
0434
1,)206
0318

0264

~)124

0215
0214

0184
0183
0157
0147
0219
0138

0182

THERE ARE

0087

SYMBOLS

o

o

+

Al
APPLICATION
NE)(T ASSV

(

REVISIONS
DATE

~ION

L,",

USE:O ON

APPROVED

7506

.

c

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE,..ISE S~ECI"IED
DIMENSIONS ARE IN INCHE.
TOLERANCES
ANGLES c!'l'
:s '"LACE DECIMAl:to .010
2 PLACE MCIMAl + .02
IDENT',...,ING HUM.En
SHOWN IH PARENTHESES
"0" "E"E"ENCE ONLY

(

).

INTE"~"ET DWQ IN
ACCO"DANCE WITH
MIL·STO·lOO

~N
CM ..' "
ENGR

QA

APVO

Ii:'

'"

CONTR/-"

/

DATy
/

""-/

A

"I-••• ,.c

INCORPORATlD

Equ;pm.,r

0./_, T....

G~

AL, ASGLUN, ASSIGN LUNO-PX990

""-

DES.7' ACTIVITY RELEASE " ' "

/

~~

TEXAS INSTRUMENTS

""-

SIZE

C

0V10C

R12

EfJU

011i~f)

Rl~

eQu

12

~1II11-1

eV'11

0Q\~E

R,4

EQLJ

14

0~1';,

01i'l(IF'

R,!5

rQU

15

UIVTE

EQU

25E!

'*

BREAKPotNT ENTRV

0~1;:'

kHl14
Vi075
fOOI?6

V;Il77
001lol

0"'\11:1\
4 "'(it~"

!/,ltl\7Q

V,iI/lHiII
1lJ081

iin•., a2

(

PAGE "'003

•

•BPOE,..

fCW

1~

o
lt4f!!·L~VTE

01f101

SSO!' EQU
6PSSNf" fQU

0~'~2

BPPC

2

EfJU

1

01?1""~

CURREF FrJU

(;

~",a3

0((108

0V!B4

8114llliil

Looper HIU
PRESEN n.lL}

>tHhLAVTE

liJ~tH5

0081
fJIIHiA

000!1l'

0069
0~lg~

e

•'*

fl)1A86

'*
'*

t

",PROCF-OlIRE 8REAKPOI NT PROCESS
ENTRV ~,BREAK ENTRV PT

2.A~EAK

BKPTPR fall

0Q101ii

1 BYTE

$

.ALLoc,cnpv,LIN~

Bt,.WP .ACt..

0~02

0091
k1VtQ2
!tl"'Y;'

IOIi!g4
VlnQ!i

0Q104

05A8

"VleI~

0~0~

C'l~~0e

0ltC?

0\119"
0"197
0t·H,1 ~

0V'9g
0H'lV'!
0UH

P.HHH

8A28

~ fA "" ('

01;l!fi}t}

vW~f

0\1106
lfi24

0~1V

~H~

1~

£0728

001"

0PHHI

V!1f!1~

P'20ti

(~tI11P.

0P,00
A189

010:"01~3

yHI! 1 A
1f:

01)\

D816

'*
'*
'*
'*
'*

2.. RREAK fNTRV PTR.REF COUNT •
~.RREAK FNTRY PTR.REF COUNT.
JNC.

'C\JRREFCR8)

tt,.R

R7

2-1f B~E.K ENTRY PTR.RfF COUNT
3 .. SREAK FNTRV PTR.LOOP COUNT T
C

'CU~REFCR8)"LOOPCT(R8)

'*

'*

LI
A

MoVe

R9,R6

.R6"BKSTR6

.'"

I!!REAKPOINT PROCESSOR **

0108

0q1U:
0020

000121
0201.
0(110111

LX

RU),BI(STA

1/11112'
oIII 2f1
0P126

06'"

f:ll

'PRNTr;

1000

NOP

00!2A

06A0

0PJ2C

\400~

0~22

1101
0108

0111
0112

iU 13
flU4

01112f
0Cl13'
0P132

011!.5

0k'3i1

0ue
0111
011A

0rJ13f5
01i138
0~3A

CtfU

Bl

.

•

MOV

JEQ

*

\42.1.

01.11'"
Cl8A
0201

MOV

fH0,Rfi

LX

R1,SNAPS

MPY

.... eR" ,Ae

39A1

0~4"

0004

000~

02.,
8000

0124

01'14C
004E

017150

eAt1

0t21

01i1f52

015A0

0~154

0""0~

005fi

1001
210'8'
0101

eKP01'~

001!U'

*
BKP020
*

IH2~

~132

00lU

C741

1131,i,
01;)1 1 0P.iI5C

'U2~

005ff

0000

00e~

C280
0415e

014(.'1

C

)

1304

w

0Alilii'

,, ONLY

ANOI R1,PRESEN

01a~
1c112~

0138
0139

eVTE

0000

0V14A

01;S~

... CALL PAINT INAPSHOTf!REAK EN

MOVe ,aNPTA8CA1),R1

OtEl

0123

0133
0134

3·I'CBREAK ENTRV PTR,FLAGS .AN
4hlSSDEF]
.Nf, e TMEN DO'

BI
0122

SSOEF

VlUR

71

R2

R9

II'U'

130H~~

l.\tI~

Re

0133

0f.J17fi

8PPC
epSSNM
CLST

PRt.SEN

PAGE

"·ki'(

0079

TloIfR€ ARE

"U.s
0"'4~

SYMROI..S

Ql119

~121

~12fi

!IIt31

~Ul

01.3!5

0005

o

o

+

AI
APPLICA TION
NE)(T ASSV

(

(

\..n.

US€OON

REVISIONS
A........aVEO

DATE

DE!IC...-TION

7506

..

.
REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE_ISE S"ECI~IED
DIMENSIONS ARE IN INCHIES
TOLERANCES
ANOLES ~l'
:J PLACE DECIMAL ~ .010
~ "LACE DECIMAL +O~
IDENTII'YINO NUM.IERS
SHOWN IN "ARENTHESES
~OR RE~ERENCE ONLY

c

"".

INTERPRET DWQ IN
ACCORDANCE WITH
MIL· STD· 100

~N
CM .." "
ENGR

QA
. ",PVO

""'",A
/

CONTR NO , /

,/

/

/

TI- ••• ,.C

TEXAS INSTRUMENTS
I .. CORPORAl ED

0./,..,

Equipm«rr Group

r....

AL, CHARIN, CHARACTER INPUT-PX990

~

OES~.'CTIVITY RELE"'SE~
,,/

,,/

~~

DATE/

"-

SIZE

COOE !CENT NO

A

96214
I REV.

SCALE

+

"",AwING NO

945348-9901
SHEET

1 of.10

ERRQR OUTPUT
10m3
1~IiU

00015
letll6

0001
0008

0009
1010
10U

iHH2
111013
0014

10115
0016
IhH1
0018

0019
102f/!

00il

·.
•
t

..

'*
..
*
'*
*
*
*
'*
'*
'*

'*

•

'*

*
'*

I1)(U2
0023

•

111024
0021S

'*

fJlU8

9021
0028
00~H~

1010
0011

0032
00;'3

00'A
0035

lune

'*

'*

'*
*

•

·
'*
'*

",

'*
'*

111039

•

trU5

'*

'*
'*

*

..

'*
'*
'*

",

tUUh'!

t

01351
00152

",

lilfUi3

10154
tHH'15
IUH56

C~AR

'*

",

'*
'*
'*

T~!

o

133
~o

CHAR AS 'CR'

BLoc~,eMAR"

*1

IF UNRECOVERABLE ERROR TMEN RETURN('E8C'),
RETURN,
'NO GETCHR
PROCEDURE PRINT(STRING,CHAR COUNT)
I.

.,

OUTPUT CHARACTER STRING

PROCEDURE PRINT tRLF,
'.PRINT cLINE FEIO •• CARRIAGE RETURN. */
CALL PRr~TCLOe(CRLF')'
!ND PRINT CRlF,
CHAR COUNT ~ STRINGel)
PRS BUFFeR PTR • STRING'
PRe CHAR COUNT • CHAR COUNT'
CALL svt(SVC CALL BLOCK),
x, UNRECOVERABLE ERROR THEN DO'
RETURN(!RROR),
ENI"

PROCEDURE !RRDR(ERA CODE),

,.

t

*

0046
li0,'"
IU48
00410

,. INPUT A 'ROM
*'CALL SVCCSVC
CHAR.
'CR'
'* TR!AT
CALL

'*

0031
0038
0040
0041
1111111'2
0043
1044

PRoceDURE GETCMACCHAR)

",/

ERROR ACC!~TS AN ERROR COO!,
CONVERTS IT TO AN ASCII STRING
ANO PRINTS tT.

ERRPTR • LOC(!RRQR OUTPUT BUFFER)'
CHAR. CLST1(ANOCSRC(!RR COo!,12),'F'l"
ERR COD! w sRcrEAR COO!,te,.
!RRPTR , ERRPTR +1'
ERR CODE, IRC (EAR eOD!,st)'
ERRPTR,CMAR • CLST2CANOCERA eODE,"'))'
!RRPTR ~ EARPTR +1'
ERR CODE, SRC(IRR COD!,le),
!RRPTR,CHAR • CLSTCAND(ERH COOE,'F'»)'
ERRPTR , ERRPTA +1'
ERA COOE • IRCCIAR CODE,tl)'
ERRPTR,CMAR • CLST(AND(ERR COO!,IF'»)'
CALL PHINTCER8U',_WCHARS"
END ERROR,
lOT 'CMAFUN'
TtTLEI
CHARIN
INPUT StNGL! CMAR IN CHARACTfR MOne.
RI!:VISIONI
ORIGINAL
COMPUTER1 990,ASM
ABSTRACT. CHARIN INPUT8 A StNGLE CHAR FROM
THE '33 USING C~ARACT!R MOD! tim,
CALLING SEQUENt!.
8L 'GETfHR

106i1l
8061
00612

00100'1

PAG! 0113
•• 0453A8.0001 REV ••
CHARACT!R R!TURN!O IN RIGIIT!R
•
•
•.WDRKSPAC!
REGISTER Dl!fI'tNtTtONI
•R0
!QU

IIUI3

0001

006A

Rl

0"'02

R2

"16e

1J00:S

R3
R4
Re

•• CHARACTER INPUT
0157

('

0058
1'6050

106e

18067
0068
0060

0011111
0071
0012
0013
0rn.
0075
1i1076
0071
0018

000A

RO
RUJ

0008

I'll

000C
0000

IH3

EQU
EQU
EQU
!QU
!QU
!QU
EQU
EQU
!QU
EQU
!QU
!QU
EQU

Rl'
R15

!QU

1'10'114
!lI0"S
000~

0A07
0001
0000

000E

000"

RS
R1

IU

Rla

•

EQU

"
1
2

3
4

5

e
1
8

0
10
11
12
13
I.
US

11

o

STRING PAINT ROUTINE

(

0118
0U9
0120
mUll

Ql122
012;5
01a ..

112S
012e

lua1
012e

0ta9

0130
0131

• TITL!'
."

." RI!VtSIONI

•. COMPUTER.

g04e348.g9I/lt· ..

PAGE 00015

PRNTR
OUTPUT eMARACTER STRING

ORIGINAL
990,ASM
." ABSTRACT. PRNTR ACCEPTS A POINTER TO A STRING
."
AND A CHAAAeT!R COUNT A8 INPUT ANn
."
PRINT! TH! STRING TO l.OG •
• CALLING S!QUENCe-i
Bl 'PRINT
."
R10 POINTS TO STRING
."
R9 CHARACTER COUNT
."
R11 " ERROR RETURN
."
Rl1+2 • NORMAL RETURN

•

STRING PRINT ROUTINE
iU;J3

....
..

IU""
i4138
0139

0140
1141
il142
1143
0144
i14'
IU4e
0141
0148

....
.

lUst

rue ..

flHU0'
(UI291

0201.

0022

0000

IHG7
IHiS

lueg

fll1 e0
lUst

iUIS
IU53

Ite4
81e15
rHee
It81
Ilea
0189

i170
ill'!

11172
0113

01,.

DEF

REF
OEF
REF
EVEN

PReRLF EQU
LI

PFlINT
PASBU'
PIliBUER
PRBec
8VCWRT
PRCRLF
CRLI'
a-PROCEDURE PRtNT CRI..FI

s

a"24

~-EN" PRINT CRlF,
'TRINGel)
2-CHAR COUNT

..

leaf!

1028

ceSA

002A

00013

002C
002e:

ceeS)
0000

.

..

EQU

S

SRL.

.RI0+,AO
"9,8

Move
!QlI

MDV

•

Rtil, 'P'U~IUJI'

MOV

R9,'PRSCC

LX

R10,8VCWAT

It

0030

IIUUU

0032

0000

0034
0036

042m

003A

lUIS 0
HUH

003C
003f

Il5ee

004~

e.se

I!I

a-PR8 CHAR COUNT

, CHAR

STRING'

(;

COUNTI

2-CALI.. 8VCCSVC CAL.L. BLOCI(),

2-:rF UNR!COV!R UH.! rRROR THEN
3_R!TURN(!RROR),

It

D2e€!

2-PRI BUFFER pTR

8L.W' 'SVCALT

000C'

003e

3./.PFUNT .cLINe: F!eD .... cARIU AGE
3-CALL PRINTCLOC(CRl")"

Rl0,CRLF

It

0024' PRNTC
027A
ageg
IZIA2t' PRINT

"'.1

REF'S AND OEF'S
DEI' PRNTC

It

01159
il'8

0'

2-"1

REF
REF
REF

IU49
111191

ruea

2-/·
2- OUTPUT CHARACTER STRING

•..

IH~5

"1~8

PA"! 0091e

i.PROCEDURE PRINTCSTRING,CHAR

'III
'III

01:54

IUD3

946348.0011**

•

Move

'PRBU!R,RO

JNE Pt
INCT Rll

0040' P1
\It

!QU

RT

•

a-END,

o

PRINT HEXADECIMAL VALUf:
017'
0118

(

''**
'*
'*

21119
rU812l

0183
0184

else
0188
16189

0190
lUSH

.aUla
IU9:!

il1ge
aU1
0198
ilPP
0200

210.2
00 ....
0046

Blue
004.
004C
13041
012150

0201

(

0(Ue' PRNTHN IOU
Ll
0200

•
PRN00e
•

0~04
1~02

PRNiII0e

JMP
004[' PRNTHX EQU
Ll
0200

0052

0420

00541
00:56
0058

0000

1Il204
"21U5
0206

005A

0204
00021

021'

00SE

0420
003ts'

18200

0060
0062
006,.

rU0g

0066
0068

R0,4

'*

MOV
MOV
L.l

C2421

ceeA

R0,RD
IU 18, A0

SLWP 'SVCAlT

0201.
0000

1..1

Rt0,CeH0

8L

.PRINT

1002

JMP

PRN!!!10

0tJA0
0021'

INCT .fIlU*2(IH3)
iH5ED
0016
0070' IIRN010 EQU S

0070

0420

0012
0014

0000

045e

CONVERT 8tN TO

Rtlll,CeM

006C
e06!

0rue

• CHARS TO

PRINT

S

006.

0213

• OF CHARS TO PRINT

,*.LLOC,COPY,lINM
8LwP .ACI..

0211

0121"

PRINTED

S
R0,e

11210
0212

HEX ASCII EClUIVALENT
FOLLowEO BY TWO BLANK8
A8CII CHARACTERS

0QHIle

0052' PRN00!5 EQU

0202
0203

10se

JMP

100~

Q".~e,

R!VISIONI

ORIGINAL
COMPUTEFU 990,ASM
A8STRACT. PRNTMX PRINTS THE
OF ITS INPUT ItAfIlM
'*
PRNT",! PNtNTS TWO
''** CALLING SEQUENCE
a
8L 'PRNTHX
R10 , VALUE Tn 81
'*
DE" PRNTHB
DE" PRNTHX
Of" PRNTMN
REF C8H
REF CBH0
0042' PRNTHB IQU
R0,2
1..1
0200
0002

PAG!!

PfIlNTHX
PRINT VALUE IN HEX

..

0ue
eU7

1"196

TITLEI

••

0181
0182

01f~4

945348-9901

*

·t.INI< TO PREY WKSP, ReT CURR WKS ..

8LWP .RR
RT

HE~

ASCI!

PAGE 0fUJ8

ERtlOR OUTPUT
e218
021P

• TtTLE'

•
• R£VUUON.

1i1220

1221
1222

•
•
•

1J22~

822e
1226
0221
1228
1229
11l2~0

.,

8L

IiUUl

.,

IHI1!

••
•

111232

1233
0234
123e1
0231
0238
falU;

040
tSl

12110

e241
8242

REII' fRSTR
REF CL.ST
TEXT 'MDL.P'
TEXT ')(PSL.O

f

0BtlA'

12AeI
0248

e.. l •

."

•
•
•
•
•.,

e241
0248

e-

22-

."

1249
IUtS0

12tH
12a2
rUS3
00e8
00eA
0r11le

00.E

0090
109a

eaCA
C2~A

",'n,

0@!98

0BCA
C2AA
1112040
0elll'

009C

109r;

2",*1

2-eRRPTR _ lOC(ERROR OUTPUT eu

L.t

RS,I!R!U'

IRC

RUI,12

~O"

R1QI,R9

I-CHAR, ClSTtCAND(SRCC!RR Co
2-ERR COD! , IRC(ERR CODE,ie"

0220

00911)

009A

IRROR ACCEPTS AN ERROR COD
CONVERTS %T TO AN ASCI! ST
AND PRINTS IT.

001e'

0"'94

0098

c

AND! R9,.,

02040

0280
In6t
11262

la88

ERROR
ER8UF

1080' ERROR EQU I
."
*ALL.OC,COPY,L.INK
0420
8LWP 'ACL.

12044

0283
0204
la85

DE'

."

124:5

12158
025P

CLITt
CLIT2

'ER~aR

CONTAINS ERROR COO!

RIF'S AND DE"8
REF

111236

1251

o

•
ORIGINA~
• COMPUTER. 991,ASM
• ABSTRACT. ERRPR ACC!PTS AS INPUT AN IRROR ceo!
AND CONVERTS %T TO A STRING REPRESENTING
TME ERROR CODE. TME FIRST TWO M!~ DIG!TS
*
ARE USED Ta INDEX INTO A TABLE 0' CHARACTERS
TME LAST TWO ARE CONVERTED DIRECTLY AS MEX
CHARS
• CALLINt; SEQUENCE.

11223

12tS4
IltSe
fa 2 tHS

ERRPR
ERROR CODE PRINT ROUTINE

0220

••
•
•

SRC

RUI,12

PilOV

rU0,R9

ANot R9,IIIF

2-!RRPTR , !RRPTR +1'
2-ERR COO! , SRC CERR eOOI!,12)
2-!RRPTR.CMAR • CL.ST2(ANO(ERR
2-ERRPTR • !RRPTR +1'

g4e;'4e.g90t··

!RROR OUTPUT

('C

0281
0268

00A0

00A2

0289

0270
f427t
0212
In?3

0274
021e
e218
127'
0278
0279
028121
e281

meA,.

efue
00A8
0QlAA

00AC
00AE

0282
028:5
0284
e2ee
0286
0281

e288
02eS!
0290

0SCA

IZHUO

IUB2

e8CA

0086
0088
008A

10CR!
leC2

021'4A

00CA

06AQ)
002.4'

00ce

1000

eRlCA
0(11Ce
00CE

0420
01312'
0 .. 55

02fH

1Il01l114 ERS

••

S2.0
000F
0220
0121 AP.: ,

oeo"

MOVa .Ro,*Re.

IRC

Rle,12
RlIhRg
~ov
ANOI RO,>'

AI

ca4A

0P1Sf

luce

••

01'4 Ill'
022g
00021
00 gO

008,.

...

ca.u

01'480

IIIf8C

(

0011.'
COgg

•

0000

.,.

•

PAG! 0011'0

2.ERR COO! • SACCIAR COOE,12),
a.!IU'PTR. CMAR • CLST(ANO(!RR C
a-ERRPTR .. fRRPTR

.1'

Ro,eLIT

MOV8 *RO,*R6.
SRC
MOV

RI13,12

ANDI

RO,.'

AI

RO,CLST

a-!RR COO! .. SRCC!RR CODE,ta),
e_ERRPTR.CMAA • CLSTCANOCERR C

Rt0,ru~

Mova .RO,*RfS
Ll

Rte,ERSTR

BL

'PRNTC

2-CALL PRINTC!RBUF,.WCMARS)'

NOP
a-END ERROR,
"'LINt< TO PREY WI(SP, R!T CURR \IlKSP
8LWP fRR
RT
ENO

945348-9901**

081 • 0811

CONCORDANCE

I

QlUJ0

020t
0008
0181
0102
01238
0257
rue8
rUI8S
0141
0238
023"
0131
0093
0108

ACL

caM

'CaMa

CL8T
ICL8Tl
CLaTa
CR
CRLF
!RaU'
ERA OR
!RITR
ele
GET010
G!T8UF
G!TCMR
INCHAR
LWP
1'1

.PRSBUff
PRBCC
'RBUIR
PReRLF
PRINT
PRN00S
, lit NtH 0
'RfI4Te

,,,NTH8
PRNTMN
PRNTH)(

RI

Rl

Rtl

0218
0240

0242
0112

0112

LUDa

011S8
0201
111212
11156
0113

(ute

0108
0082
8083
0012

eUI4
0118
flJ218
0171

10'.
0015

RII
RIA
RID
RI
R3
R4
RS
RS
R1
R8
R8

0eel
fUS7
1284
0281
0005
108D
1087
108e
0188
1082

"R
RWP

8VeALT
avePRB
IveSFe;
8VCWRT

IUS

•• 153

THIRI AR!
---~---

--_._---_ ...

fUSI
0242
0244

021011

11281

0188

ItDO

0171

0103

rUle

1180

0

fH02
IUS3
12~1

0284
0113

- ..

1112

0UJ8

0USt
0U'3
0188

0209
et8e

018fS

G
IUI1
ItG"

0200
11IU~

1284

aHa

110!
ItD3

020e
018"
0211

IIlU

12155

8283

12158

128'

0275

0282

IU,8

e28e
0281

1183
1288
0282

I'll'

1214
01'.

e214

1288

rUls

018e

IHS'

0284

oHit
0211

018e

1272

020!
1218

021t

0076
"0'7
0084
00e8
008e
0087
00se
0"S8
0010
0071

I.TIUF

...

1211
1212
0203
0206
1208

008A

0081
00S0
0086
0t10
0142
0t44
0143
0146
0141
o tI~S
0210
0138
0188
0t80
''180
0184

0100

0113

'UI
'UI

PAGE 10 of 10

(&'104
e117
118S

118'

12111

SYMBOLS

~-------

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

else 1158 II'"
0273

1.74

02715

Ilea

1119

,0

+

A[
APPLICA TION
NEXT ASSV

(

(

L.n.

USED ON

REVISIONS
APf'IAOVEO

DATE

DESC""""ION

7506

...

14-

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE_ISE S"EC'~IED
DIMENSIONS AltE IN INCHIES
TOLE .. ANCES
ANGLES ~l'
J PLACE DEC'MAl~OlO
2 ..LACE DECIMAL .02
IDENTII"fING NUM.IE_
SHOWN ,N "AI":NTHESES
1'0" "EI'EltENCE ONLY

c

-\

.
.

INTE ....ltET DWQ I"
ACCOltDANCE WITH
MIL·STO·1OO

~N
CM~
ENGR

QA
APVD

/

'" ."
"',
,

CONTR NO

DES~,kTlVITV

"'-••• ,.c

~~

DATE/

TEXAS INSTRUMENTS
INCO"PO"ATED

DIll,..,

Equipmwtt GffIIIP

r.lf..

,//

///

'"

RELEASE "

AL, CLEAR, CLEAR COMMAND PROCESSOR-PX990
SIZE

eCCE IOENT NO

A

96214

"•

SCALE

J

REV.

ORAWINGNO

945349-9901
SHEET

1 of 6

PAG! 0112

."

e00~

*
*
."
*
."
*
."
*
."
*

0004
k1A0!5

0006
0007

"0IDa
0009
ilPl 1 !II
0011

iHU2
(UI1;'
0014
0..,15
emlt!

*
."
."

*

0~17

*

0ft'11A
0019

'*1

T8LPTR , TABLE TVP!(I),
NUMENTRIES ~ TABL! TVPE(2),
ENTRY SIZE. TABLf TYPE(3),
CALL RANGECLnw,HtGH.NUME~TRlfS,!RROR)'
IF ,NOT, ERROR THEN 00,
TBLPTR • TllPTR ~ ENTRV StZE ." lOW'
00 WHILE LOW ,LE. HrG~'
TBLPTR.D!F •
TBLPTR • TALPTR + ENTRY SIZE,
lOW. LOw +1'

0'

ENO,
t: NO'
ENO CLEAR,.
TOT 'CLEAR'
* TITLEI
CLEAR
*
CLEAR STANDARO TARLE ENTRV
.. R!VlSrON:
*
ORIGINAL
* COMPUTER I 9g0,AS~
* A6STRACTt CLEAR PROCESSES THE CLEAR BREAKPOtNT, S~APSHOT.
*
TRACE, PROT!CTED REGION CO~MANDS. IT IS ENTERED
."
wITH A TABLE DEFINITION LIST AND A eO~M'NO
*
PARAMETER LYST ANO CLEARS ~ RANGE~O' ENTRIES
• CALLING SEQUENCEc

."
."

fH1J2~

0021
0022
0023
002tS
tiHHie

0026
0027

0028
802Q
e2l~~1

0L7!31

*
*
**

0032

I

B~

003!.5
003!!\
0[<1137

.

0031"

DEF

CRP

ells

OfF

0~41

~e:F

SNAPS

0(1t42

('Ell'

CRR

00~3

Ioi'EF

TFUCE

10 ill 44

REF

HANG!X

0046
0041

REF
REF
"EF

RF,T9UF

~E'

BKPT

GET8lJF

L.wP

0Vt4A

~e:F

RIIIP

1i1049

REF
REF

RR

ACL

005'

.,

0~~2

tWORI0tl

2,,*1

'*
cep

V1Cl1~H"
~WViV

l",P R OCe:Ol!R. E C.L.l!. ARCTABLE TYPE,CC"i

2"'/* CLEAR WILL CLEAR A RANGE
2.
ENTRIES (TRACE. BREAKPOTN
2"
IN A STANDARD FORMAT TABL

Ahi GE)(

"H'l2rt1

CHl7

01'11''1
o\1(1 t

0~~22

04C5

MOV
CL,R

~;024

0102
0103
0104
lalI{J5

0!1i2~

39(.19
AUf!5

i'l1F'V
A

0C~2R

8289

C

S
IHl,R1V!

0U1.lt'i

liHI\2A

lBiil4

,J~

Ct,R\7I2~

iW2C

040~

elR

.fH5

r£I\1ttl

0V!2F'

A181

.4

R7,Re

0111
0112
0113

0'~~W

058r:;!

!NC

RQ

0114

0p13~

l~FA

JMP

CUH1t!l!

EQII

s

,

~101

0H1S
0hH~

0115
~1115

0fi1;'4'

0111

EQU

042m
11HH/!\1!

2"C, ALI.. R.ANGE (. 1..0.111, HIGH, NUMENTRI,,-~.,\
R9. LOW
RUt. HIGH
:~:

4.T8LPTR.OfF • 0,

'*

•
•
'*
'*
CLR(,l!2~

'*

TVPE(~)'

Re'/,R6

A.TBLPTR • TBLPTR • ENTRV StZ!
A-LOW. LOW +1'

111

0118
0119

•

CU~r.illlll

SIZE. TABLE

2-1F ,NOT. ERROR THEN DO'

0~!I1Q

01~28

• TABLE TVPE(2]'

.LINK TO

P~EV

FlI..WP .RR

t"FNO CLEAR,
WK8P, RET CURR W~SP

o

**CLEAR
012~

CO~MANO
0~~H

0121
"~IiII!d

(

ERS

rAOC!SSOR ••

0A56

RT

ENO

980

.

9110

rONCOR!,)ANCF

S
ACI..

011\7~

QJ(;'17°

IM/!.:1 A

8!F'FF'
0P'100

0~76

0174
011"
"-'t11
Vl17R

0Q178

0119
018 ~1
0UH
klU2
10\63

0''''7 A

40
7FFP'

0~7C

GilVlI!H~

0185

0£i\1F

AI)

~18~

01118~

FFFF'

0181

09182

vHHH'l

HIP
'I w'

"'OOIF'1 CRU
REF

MOOCRlI

'fEXT

'Me'

DATA PH",4+PH",.+PN·4.PN.,+PN.4+PN.4+PN*4+PN
DATA ,.,ooeRU
MOOIFV ME,",ORV
kEF

DATA
DATA

•

019¥1

t

",

40

0fi'11H'
0Vi8P

7FFF
0Vi£1lQ!

'MM'
PH*4.PN.4+P~.'+PN.'+PN.4+PNt4.PN.4+PN
MODME~

~O{'lIFY

J:fEF

Re:GISTE~S

MRP

!JATA PN*4+PN*.+PN*A.PN.A+PN*4+PN*,+PN.4+PN
IHTA MRP

MODIFY WORKSPACE REGISTERS
REF

008A

MtlDMEI"I

TEllT 'MR'

0180

018A

kEF

TEXT

TEXT
*
*
*

~18.4

("

•

•
•

01'"

INSPECT WORKSPACe-

rlAT A PH*4+PH*4+PN", •• PNt.+PN"'4.PN.4+PNt4.PN
OATA IWP

0H:i1
016R

0\Q5

INSP!CT SNAP8IoH'lT

",

0106
0U51

0\511
0192
0Hl3
0Ul4

REGIST~R8

INSPECT

",

0149

(

Ql0~!

REF IMP
TEXT '1 M'
nATA PHt4.P~.4+PN.4.PN.4+PN.4.PN* •• PN.4.PN
OAT A IMP

0142

fi'J

PAGE

t

0141

(

g4!53e0.gSH!ll ••

TExT

•

,",Oowsp
'MW'

I)ATA PH*4+PN*4+PN",4.PN.A+PN*4+PNt4+PNt,+PN
nATA MOOWSP

••

COMMAND

DEFINITIONS

..
.'*'

01S~e

IOUil1
kJlge
" H~Q
0:;HH~

0~f:U

5:!1

((i:t'01

0fHH':

55FF

102412

0~&f

0CHH'1

fl:~03

021114
021lH5
(ljU16
~201

020A
0209

0Q19m
0(1192

0t1l94

021 ell

"'~0(i11

021~
0~1~

0~9f'

5:5

0214
0215
10216

0P1fH~

5~H;J~

IiH'I9A

0VH1!li'I

021'

153

~"-2fA

G'leJ9C
0P19f

()FFF

e221

elC!lA(i\

0000

0222

0224
0f1A2
ot~ AA

5:5
OFF!,

~22~

0~A6

000e'l

ki229
023'"
0231
0Q1AfI
oIII A.6
0!1!AC

5FF!'
£1000

02~fIl
023~

5FFF

((H~82

000~

~244
024~
0~4tti

0ae(~

B~EAKPOP1T

REF'

SAP

'TE)(T
DATA
DATA

PH.~.P~.A.PM.4.P~*4.PN*4.PN.4+PN.4+PN

SBP

SET

SNAPSHOT

REF

SSS

0"'BAt

01l1f.H~

43
5F,.,

lll!iHH~

0000

0

'S6'

'SS'
nATA PHw.+PH*,+PH*4+PH.4.PH*.+PN*4.PN*4+PN
C'ATA ass

SET

Fo?EGION

TEXT 'SR'
rATA PH •• +PH*4+PHt4+PH*.ct+PC*4.PH.4.PHt4+PH
DATA 0

SET TRACE
TEXT 'ST'

DATA PH.4+PC • .ct+PN*.+PN*4+PN*4+PNt4+PN*.+PN
DATA fa

8fT PROTECT REGION

REF
TEXT

I..DP~T

OATA

L"P~T

C

VI~~

,spr

",AlA PHt4+F'H*"+PN*4.PN •• +PNt'tPN.4.PN*4tPN

•
•
•,.

4~

01?1AF
0P181f1

21243

0241
02''''
024Q

•
•
•

'*

0239

£1241
0242

S~EGN

4~

0231
024~

.

...

•

023~

kl234

SET

PAGe: 00018

It

0225
il225
0li!21

0235

g4~:se0I11ggClll."

T!E~T

.'*

lO22~

"23~

....

53
351'

0211

&!l21A
021Q

••

•
•
•

•

CLEAR BREAKPOINT
REF CMp
TEXT Ice'
DATA PH.4+PH.,·PN*4+PN*4+PNltA+PN*'tPN*4+PN
[)ATA cap
CLEAr~

REF
lEVT
rlAT A
('lATA
CI..EA~

SNAPSHOTS

cas
letp
PH.4+PHt •• PN*.ct+PN.4+PN*4tPN* •• PN*4+PN

css

REfHON

REF eRR
TEXT 'CR'

DATA PH*4+PH*4.PN*4tPN.4+PNt4+PNt,.PN,*.+PN
DATA CRR

0

",':,1

••

COMMAND DEFINITIONS

16251

'.*

~2!5?

(

02'3
w:;H"4

\I,l~BA

1IJ265

~"'Bt

FF'FF'

02fSfIi

~)l7!aF

0(ilJ0V1

4~

0251

.

•

1t12!5~

02eQ

'*

026~

02tH

••

CLEAR PRnTECT

"'~C2

e5!5f'P

raTA

~26~

1(j[~CA

0~0(71

DATA FWD

026f1
0~61

026R
10269

o(I. C"
It,I Vl C8

!55FF

~P7~

0PCA

.0(1\~!:'I

Ae:J

0271
0'72
0273

...

•t

027d
1t'~1!5

ItH"Cr:

48

~27fi

0!>:CF
~)Ifi 0 II'

5FPIf

VJ'777
0"8
0279

",CUB'!

028t~

1')281
e2a~

0~O~'
0t:'O~

0'83
1210 tI! 0 ERS

0"2~

.
t
..

NOCMOS

~e:GlnN

REF FWD
TEXT 'FW'

k'I~e2

...

Q!0Q!1

FINO WORD

4e1

0?'6~

PAGE

REF Cl.EUI~
TEXT 'CP'
(HTA PN.~+PN.4.PNtA+PN.4+PN.A+PN.4+PNt4.PN
DATA Cl.EAR'"

0I?CC'

~264

(

9 45~!5r~.~H~~ 1 ....

PH.4+P~.4.PH.4+PH .. 4+PN

••• PNt4+PN.4+PN

FINO BVTE
~EF
FIH
'E)CT 'FB'

nATA PH.4+P~.4+P~*A+P~.4+PN.4+PN.4.PN.4+PN
[lATA FBT
HEX ARITHMETIC

REF H~A~
TExT 'HA'
flATA PH.4+P~.4.PN.A+PN.4.PN.4.PN.4.PN"4.PN
DATA H)(A~

$
Er..ILJ
OATA 35

ENO

945350-9901**
srae.GN
5SS

(

(

THERE ARE

0031
0''''6

0~09

PAGE 0009

c

C-,",'
'

c

,

+

A[
APPLICA TION
NEXT ASSV

(

(

APPROVED

DATE

~

LTI't

USEOON

REVISIONS

7506

.

...
.

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTf4E_,SE S .. ECI"'ED
DI ... ENSIONS AlliE IN 'NCHES
TOLElilANCES
ANOLES !"I"
3 ..LACE DECI"'AL:!:.OlO
:I "LACE DECI ... AL+O:l
IDENTII"YINO NU ....E ...
SHOWN IN "AItENTHESES
,.0111 IIIE,.EIIIENCE ONLY

c

'J~~ .

INTEIII"IIIET OWQ IN
ACCOlilDANCE WITH
""L·STD·lOO

~N
CH~
ENGR
QA

/,/

~

"PVO

CONTR~/

.r.'

TI- • • ",C

TEXAS INSTRUMENTS
INCOIIIPOIII"'£D
OMIa,
Equipmllnt Group

r ....

,.'

AL, CONVRT, ASCII/BINARY CONVERSION-PX990

.'

""" ~

""

OES/"."CTIVITY RELEASE " "

l'/'

~~

DATE,,/

"-

SIZE

COOE IOENT NO

A

96214
I REV.

SCAU

•

ORAWINGNO

945352-9901
SHEET 1 of 13

~*

A!ClI/81NARY CONVERSIONS ••

""'ftlI3

."

"005

."
."

0004

21006

..

0001
00(U

...

21009

...

...

001A

...

~0U

."

0012

'*
...'*

k1lU3

0014
01dU'
0018

""'11

..
."

'*

001R
0019
0020

."

PROCEDURE CNVRT(See,VALUE),
1* CNVRT USES GENE~ALlt[O BASE CONVER.tON
ROUTINES TO PERFORM ASCII TO/FROM BINAAV
CONVERSIONS. CONVERSION IS PERFORMfO
BY USING A TARLE TO PROVIDE THE ORDEREO
SET OF NUMERIC CHARACTERS WITH MOOULUS
ARITHMETIC IN THE SPECIFIEO BAS! ON THE
ASCII STRtNG TO 00 TME CONVERSION. *1
DECL.ARE
( 1 sce,
/* SUP'll CALL SLOCK */
FIXED(S),
2 SCCMO
FIXEDCS),
2 SC!RR
2 sc;nAT',
3 STRINGe!) CHAR!!,),
t'l!CL.ARE
( 1 VAL,
2 VALUe:

'III

2 OUM

t

~0a1

."

DECL.ARE

0022
0023

'."*

DECLAR!

00~U

."

00215

."

0026
e021
0028
0029
00~V'I

.

..*
."

•

IUI;'U

."

00;'2

'*
'*
'"
*'III

(11033
00:34

00315
00aB

t11031
LiH.II:311i

0039
004t'l

0041
0042
0043
0044

*....

'*

."

00415
0046

*...
*
'."*

0041

."

0048
tl049

"0SA
01i'HU
,tl0D2

00153
0"154

IRISS

0056

...

'*
..'*
."

'til*
*."

FIXe:O(US),
'1 )tEn (usn,

(OA~,8DA,HAe,eMA)

CLSTC16'

o

FtX!O(8)'

1* CONVERSION TABL! *1

CHAR(1)
INtT ('0','I', ••• ,'9','A', ••• "')'
CALL G!T ~KSP(VALUE,R0'
ERRIIIICl!
SCeSV!IILOC(SCR)
no CASE UNTIL ERROR OCCURS'
ctl SCB(SeCMO"oAS,
It 151 C~AR IN STRING IS SIGN *1
CALL CNVF(LOC(STRINGr2),5,VAL,10,ERR"
IF VALU!>32618 TMEN SIGNAL
I!'HUIR OCCURS,
IF STRING(l) NE Ie' OR '+'
OR t t OR '0' THEN
ERROR OeCURS
IF STRINGCS).'-' THEN
VALUE' -VALUE'
C21 SCSCSCCMO),HAB,
CALL CNV'(lOC(STRING(1),4,VAL,18,ERR"
C3; SCBCSCCMD).eOA,
IF VALUE."PI THEN 00,

c

STRtNG(~).'+"
ENfHF.:L.~f!

VAI..Ue: •• VAL.U!'

STFUNG(1).,.f.

CALL CNVR(LOC(STR!NGr2»),!.V.L,1~"
C41 SCBCSCCMO,.SMA,
CALL CNVR(LOC(STRING(11,~.YAL,le"
C51 SIGNAL !RRDA OCCURS,

eNO CAse:,

fRROR nCCURSI IRR. ERR+1'
CALL SET WKSP(VALu!,R~),
SCe(SCERR) , ERR.
R!TURN

o

•• ASCII/BINARY CONVERSIONS ••
00~1
0t11~A

0"'~Q
0f1!e~

0061
0[1162
0~6~

0PH54

117065
0068
0~67

011168
kHH39

0011.1
011111

11""'2
001~

1/)074

'*

•..
."
."

•.

..'*
•.
..
...

•

."

'iJC1I11

*

lD~tHI!

k'Jt1ISl
~~a2

01f1d3
ItHila4

0085
01HH5

0081
01,1108
0"'89
00SH'I
009t
00g2

0093
0094

WAgS
l/lP,gfll

0111g1

009"
0099
010'"
0101
01~2

0103
01~4

0103
0106
01~'

010A
klUJQ

011C1l
01H

NUM FJXEn(tfs),

VAL. FIXEO(32),

RAnrx FlxED(1e"

."

007~
0~7f1l

II"'''' 8
0010

PROCe:OUR! CNVF(STR,NUM,VAL.,RAOIX,£I'R,
1* CNVF CONVE~TS AN ASCII STRING WHICH
REPRESENTS,. BINARY VAL.IIE TO BINARV
CONVfRSION TAKES PLACE TN ANY BAS!
FROM 2.'6. IF ANY CHARACTER IS INVALID
OR THE RESULT CANNOT BE REPRE!ENT~O IN
1~ RIT$. AN ERROR IS RETU~NED. */
OECLARE
8TH POYNTER

."

•'*
•

'*
*
'*

•..
..
'*
*

•
."

ERR F'IXEO(16),
t
FIXED(UO,
J
FlxE0(16),

11110,

VAL.1II0'

on

NO L.F.Af)JNG 8LANKS .O~. ERR!'HU
(STR) ."IE. ' ') THEN
SIGNAL NO LEAnING BLANKS,
tllll+1
IF I~-NUM TH~N SIGNAL ER~OR,
STRIIISTR+l

IINTIL

IF

'*
*

..*
*
*

•..

..
•.
.
.*

(c:

ENO
NO LEADING B~ANKSI
DO UNTIL I_NUM .OP. PRRQR,
VAL.IJEIIIVAL.Ue,*SASe-,
IF VALU!.2*.1~ THEN SIGNAL !R~OR'
DO FOR J~BASE TO 0 AY .t UNTIL MATCH,
0'" fRRO'"
IF CC(STR).CLST(J-l) THEN SIGNAL ~ATCH'
J.J-t,
IF J,0 THEN SIGNAL, ERROR,
E~JO

..'*
..'*

I.VALUE IN ~OST SIGNIFICANT
U5 Bns *1

,

MATCHI
VALUe:-VALUE+J-1
sn~IIISTfhl

11111+1
EN(' ,
END,
ERRnR.
e:RlhEFH~+l

END,

END CNVF,
PROCfOURE CNVR(STH,NUM,VAL.RAOIX)
1* CNVR CONVERTS fA. fHNAIii¥ VAL.UE

TO A CORRESPONDING ASCII STRtNG
IN THF SPECIFIED RADIX. T~~ BINARV
VAL,0E IS ~ POSITIVE vAL.UE REPRESENTED
IN UI ens */
OECL, ARE
8T~ POINTER,
NUM Flx!O(,e"
1* _ CHARS IN TARGET
VAL FIXEI'I(:52)

*/

.

•• ASCII/BINARV CONVERSIONS..
0112
IDS 1;"

•
•
•
•
•
•
•

k11 14

0115
fU 16
8111
0118
0119

*

IB2A
0121
!H22
kH23
fUiA

•
•
•

111130

01al
rataa

01a5

rna!

013'
0138
01ag
f41 .. "
0141
81 .. 2
11143
IH44
IU41

114e
1111.9

0000
0001
0002

81"

CNVRT

*'
•*'
*'
*'
*'
SCCHD

SCERR
SCITR

•

3. (
A.
A.
A-

EQU
EQU

III

!QU

2

1

••

lue0

IItfH

0800
0A00

ICI'"
0000

*'DAB

1

2
2
2
3

sce.

5COMMAND
ERROR RETURN
CONVERSION STRtNG
2_neCL.AR!
4-

EQU

lIteee

EQU

IItAI0
IPC00

EQU

-000

IDA
eHA
HAl

!QU

*'

REF'S AND

'* sUP

SCCMO
'I)(EO(8),
SCERR
~1)(EDC8',
SCOATA,
STRtNG(6) CHAR(1»'

3-( 1 VAL,
.- 2 VALUE

*'

alSO

11ee

REM'MOO(VAl,RAOI~)'

VAL,VAL/RADIX,
C(STR)'ClST(RIM),
8TRISTR_l1
NUM,NUM_t,
END,
END CNVR,
END CNVRT
rOT 'tONVRT'

*'

It58

lue3
1104
elee

o

•

0145
0146

Itea

000A

.,

IH33
0134

fuse

PAGE

•
CONVERT
• REVISION.
ORIGINAL
• COMPUTER I 991,ASM
• ABSTRACT. USES GEN!RALIZIO "ASI CONVERS!ON ~OUT%NES
TO PERFORM ASCII TOIFROM BINARY
CONV£RSION8. CONVERSION 10 P!R'ORMEO
*'
BV US1NG A TABLE TO PROVIDE THE ORDERED
*'
SET OF NUMERIC CHARACTERS WITH MODU~US
*'
ARITHMETIC IN THE SPECIFIED BAsr ON THE
ASCII STRING TO 00 TM! CONV!RSION.
•*' CA~LING S!QUENCf.
*'
8L
'CNVPT
Rl0 , ADDRESS OF PRe 8~OCI(
*'
l-PROCEOURE CNVRTcsce,VALUE),
*'
t./. CNVRT USIS GENERALIZ!D 8A
*'
RRDUTtNES TO PERFQRM ASCII
*'
RCONVERSIONS. CONVERSION I
*'
2BY USING A TABL! to PROVI
*'
2SET OF NUMERIC CHARACTER
2ARITHMETIC IN TM! SPfCrFt
*'
2ASCII STRING TO DO TM! CO
*'
2-nECL.AR!

rU2e
IU2'
0128
0129

IU501
1151
IU52
1153
115A
ItS5

••

RAnI~ FIV!O(le),
STR.8TR+NUM-l,
00 WMILE NUM>P,

• TITLEI

liH25

Q45352.gg~1

2

DU~

~I~EO(le',
'I~EO(16))'

2-DECL.ARE
3-CDAB,BOA,HA8,8HA' 'IX!D(8',
DeCIMAL ASClr TO 81NARV
elNARV TO DECIMAL ASCII
BINARV TO HEX ASCII
H!~ ASClt TO 81NARY

o

PAGE "'QlQI!5

•• ASCII/BINARY CONVERSIONS ••

.

kH61
1D\6~

OfF

CNVRT

~'6Q

REF

IF.IHl

0111

REF
REF

0t7~

~EF

PLUS
MINLIS
ttt'NK

.H 7~

t't "

\"~.,

~'-'
REF

(4"_ ll:'ll'

wH

,(4

t \1'&
0\75
0176
0\17

RE'
REF

RETBUF
LWP
~WP

017~

~EF

~t'o

ACL

IOJI!F

R~

1618~

..
..

r/l1 81
0182

0183

*

eLST

0~~0

..

0184
018~

111186

2.0fCLARF
3 .. CLSTrUI)
TEXT

..*WORKSPACF

'~1234e67AgA8CO!"

0~00

R0

EQU

0Ut~

0"'01

Ef..lU

1

kH 80

0~0~

R1
R2

2

0\9~

1/i"'1/!~

R~

FQU
!QU

1"1 SH

0~0~

R4

fQU

0U~2

0()!05

R!5

e:QU

0tQ;'

001"'~

Rfli

I! Gil)

!5
6

0194
0Ul5
0196

011107
0008

R1

EQU

1

Rt'

8

000~

R9

EQU
EQLJ

0U~7

Rt0
IHt

EQU

11-1

EQU

IH2
IH3

EQIJ

\ t
12

02~A

000A
0A0A
0010C
13000

EQU

t~

0~01

0 fA 0E

E. QU

14

020:2
0203

000'

R\4
R\5

EQU

15

01913
Vl\99

01104
0205
t'!~0f111i

02VJ7
02id8

0209
"!l1V!
0211
0212
0213
fd214
0215

.

*
*
*
*

.

*

.

*

.'*

..

*

A.. tNIT ('0'.'1'" •••

REGISTER OEFrNtTtoN$

11.1181

0

3
..

g

REGISTER USAGE

~

lOCAl

~ORKSPACE

R14 • CALLER'S WP
R10 • seA.
g
• * CHARS TO CONVERT
e .. BASE

.,

6

IS
1

.. CONVERSION VALUE
.. ERR
..$C~

,

/*

CHAR(1)

eONV!RSION

fg.,,_, •••

•• ABCll/8INARY CONVERSIONS ••
0217
0218

0219

001~'

e01V1
0"'12

C3.~

BOlle

0011.
CU.,!

0226

0221
0228

00U

I6Q29

01!112~

0230

0"'2~

04C4
0111.
0264

0f1124

oFUlfil

0~2e

1f51g

~232

02"3
02~4

011128
002A

0221.
leH!I 10 3

002C

020:;)

002E:

0005

0236

0Q!3~

16208
000A

16237

0032
0034
0CA3~

0(.l1C4'

023t'

02491

0038

tlse

0241
0242
024;'
16244

01i13A

1 ~ 3(:

0 cqr:

~e01l

0248

il11I4fi'!
0042
004.e1
011111\6

9811.

004A

9811.

raruc

0251.

00.E

0252

00150

0253

0111152
0e15A

fi1259

•
•

f114

1:1

ru,OA~

JNf.'

CNV~lP

IF NOT OAB

R10,SCSTR+l

.eI.
1* 1ST CHA~ IN STRTNG IS S
4-CALL CNvFCloeCSTRtNGC2"e.VA
START OF DEC 8T~rNG

Al

.~10.~4

1.1

•

COMMANO FIEL.D

•

LX

R8,10

BL

fCN"F

MOV
JL.T

R6,Re
CN\lQ!!5t1i

DEC

IH0

CMARS

TO CONVERT

ARITMM!TIC BAS!

4_ l' VALUE.32e78 THEN SIGNAL
e-fRROR OCCURS,

•• IF STRINGO) NE '.' OR '.'
5-0R , , OR '0' lHfN
e_!RROR OCCURS

.

133£!

02!5f!1

02ts~

CloR

Move

JEQ

CNVA6@
*R 1111, 'PI~US

JEQ
CB

CNV060

JEQ
C8

CNV060
.Rtli),'MINtJS

JNE

CNV0t5ti1

ca

"811.
000!I'J
13;Se

115'

2-00 CASE UNTtL ERROR OCCUAS,
~.el' SCA(SCCMn).nAe.

0~01lJ

rlJ04~

02!lU'
~t~~

•

2-SCBSV-LOC(SCA)

t

0249

IU~4

•

t

o(:A u:

o

'R13.2(Rl~),R14

*

0239

0247

MOV

01U0

0238

0245
024e

S

•
•

IU24
022t'

11'2:31

fQU

SL,WP .4CL

0PId!2!

0V114

"220
022'
0222
0223

CNV~T

0420

tRl~"8I..ANI<

0000

1333
&)11)11.
0000
1f1J2F

..

•
•

00151,' CNV01111

.-1' STRtNG(l)"-W THEN
S."'lUE • -VlLUE.
11;"\\

"'fI

JMP

CNV,",,6~

eQl.I

$

o

••

ASCll/81N.ARY CONVERSIONS

026~

('

0261
026'16263
0264
02tH5
02156

10267

01'15.

028t

005C

IOO(6~

0Q1~E

1608

0Qlb"

0~CI.

0()162

020(')

0~6A

1i"-'0t

0()16~

02(U

0t?t6f\

0Pl~

0Q!6A

({J~A~

0~6r.

0V\Ctt

0~6F.

1~2~

026f4

JNe

CNV~2P1

INCT RU
IoU.!, ;1\
LI

LI

R8,16

81,.

,CNvF

JMP

CNVl~6(i!

HA,8DA

0211
021?

011174

le11(

JNE

CNV~4t'i

0273

0~76

else; *

~ov

0~74

0"'7B

1104

JlT

R6,R6
CNVVl31t'!

0~'A

OAA(I\

0P17C

0Pl4C'
0rAI/.IZ

Wl27()

11lf';'1H

'1)277
16278

0V18l1'

0~19

028Vl
0281

02 ... 2
0283
021)A
ft:l2tt!'i
02fH5

0287
.,288
0289

0t?182

029~

0~a?'

CNV~30

0746

"'0~8e
' '841

UAA0

008P

0IiH~~

0~tlA

CHARS

IHOIx

!5-STRINGCO·'

JMP

CNV(U0

P"QU

$

5-VALue •• vALuE,
ABS

R8

Move

e.STRING(l'.'-"
,MINUS,'SC8TR(R10l

A.CALL CNVACLOCCSTRINGt2)),5,V
fH0,SCSTR+l

ST~ING(2)

R9,5

.,

0G11$W

L.X

RA,U

BASE

Bt..

'CNVR

0(;01

nEC

l1il0r.
IIHHH"

J"IP
Eat I

R10
CNV061i1

0~03

0~9~

01f10~
02~e

0~9A

0P0t

0t1

03id'
030l:!
f11303

CONveRSIONS

0Q1At

0V1 UI

0~A~

0~A"~

01i1BV1

0102'
""'01

0~a~

031d4

0301':1
03lDA

011164

0~V,j1

0084'
0t'HH5

0111se'

030$4
0309

0f1lfH~

C78el

QHllIH~

0tSC!5

0"8~

1)8415

0rJ!6t:

0001

"31~

1t.1311

0312
10313
0J14

~~8~

0.42(,~

03HS

011lCIl
0v\C2

0ti'0Vl
~ 4 t'H!,

.

•..
CNVI:Ilt',SQI

••

BI"

_CN"k

JMP

CN,,!I'I6(A

•

PAGE' 0008

0
3-058

EFU~OR

SIGNAL.

OCCURS'

P_ENI')

CASE'
P-E'RROR OCCURS.

fQU
1NC

eNVIII601 F:QU

.

9.4~3!52 ... 09Pll·.

~iOV

ERR- ERR+t'

S
Rl5
$

R6,*R14

2-CALL. SET WI
0110
IU'"
0292

030fS
030'
0358

03tU5
£1380

0391

0403

0Alti
0"2~

01le
011'

R.l'
,,~

It.1

R..
•

RS
IUS

120'

028t
e2ea
IU81

'1911l

11191

8191
e193

R~

0194

R'

0185
rUle

It,

IcaTM
ZeRO

0380
0~g8

0~0'

0:57'

e153
0154
0te5

0291

e381

la8'

... S!!'

8:588
04"

0

02151

015'

0"13
038e

111:599

IU1'
fUfUJ

0

.,'11

11251
0248

0215
.,t5
027'

1'1312

IU81!

IU3,
028.

021'
Int'

1211
0211

IIleg

0351

03sa

039.
0'18
0313
0t23
eflt
0181
038'
0rue

II8a
12.'
1410
0306
0240
0S85
.45&
ease
rue4

ruel

ef:!5
0t77

IItwfl

If 0'

04 ....

PAGE 0012

0:"8

fllt7'

lit"

leCHD

II.e

0229

all3

12.1
029111

02.8
IIU!97

01 .. 8
.119

04.5

Ille

el"l

011a

1378

1393

rue,

.... 5

e4.'

, •• 8

I."

e19'
821C!!
1'1 •
lIB
824P}
1385
e45g
8288
0287

,484
1280

14e.

117m

8.94

83el

8383

837t

8312
1288

e3a,

IIA18
8"3
141"8

01'3
0.U'"

8.81
lU58

13 ••

II1e3

12.'
"9'

8183
03'3

01."
'112

e'",

.,51

0'13
0t7S

,,'ITeu,
.ICERR

0''''

0237

11e5

"11

lua

02'"

0t8'
013(1
0'7'
021e
(lit 7.
0t'l

"tIHI

0a85

0278

0"S

0"'5
0.51

018'
01ee
0197

11192
042'"

02"

0A"

0217
1162

0218

12'"
'''11

",et

I/J A fUll

"lINUI

In ..

"'3
023t

0280

IiLUe

lUi

181"

0A, ..

L.Wfl

"0

I'"~
0270
02'"

945352"9901**

ta2el
11391

115~

elSI

0214
("10

lIt'

0116
02 .. 6

....,

lilA!'

'111

0
e281

1288

...

945352-9901**

PAGE

0013

c

c

+

AL
APPLICA TION
NE)(T ASSV

(

(

L.,",

USED ON

REVISIONS
DATE

CEtlCfltPTlON

APPROVED

7506

...

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLIESS OTHIE_,SIE S~£CII"I£D
DIM£NSIONS ARIE IN INCHES
TOL£RAHC£S
ANGLIES !:l'
• ~LACE DECIMAL :!:010
2 ~LACIE DECIMAL'" ,02
ID£NTII"YING NUM_...
SHOWN IN ~A"£NTHI!SIES
I"OR R£I"IER£NCE ONLY

c

'.

~N
CH~
ENGR

QA

//
;},r

".

"

INT£R~"ET

OWQ IN
ACCDRDANC£ WITH
MIL·STD·1OO

,#'1'

"-se".

SIZE

CODE IOENT NO

A

96214
I REV.

",

SCALE

TI-••••• c

.

Equ.",."t GI'DUP

DIII_, T•••

Al, DSR733, 733 ASR DEVICE DRIVER-PX990

",/'

OES~,eTIVITV RELE....

,--".-~,-------

~ TEXASINCOIIIPOIIIATED
INSTRUMENTS

/;~

APVO

CONTR NO,ii'

-

~

DATE/'

..

ORAWINGNO

945353-9901
SMEET 1 of 77
..

**733 DEV SER ROUTINES**
0003
0004

*

945353-9901**

PAGE 0002

IDT 'DSR733'
PROCEDURE DSR733;

/

o

**733 DEV SER ROUTINES**

(

12101216
121007
12101218
012109
012110
0011
0012
~)013

0014
0015
0016
0017
0018
0019
0020
0021
121022

0023
0024

*
)I::

**
**t
**
t:
*
**
*
*
*
**
*

PAGE 0003

945353-9901**

DECLARE ( 1 PHYSICALRECORDBLOCK.
3 PRB CONTROL (PRBPTR) .
5 lOOP BIT un.
5 LUNu en \ S),
5 SY'$TEHFU~GS: .
7 FILLE~:l BIT (1) ,
7 UNRECOVERABLEERROR BIT
EOFFLAG BIT ( 1) ,
7 FILLER2 BIT (5) .
5 USERFLAGS.
7 FILLER3 BIT ( 3 ) .
7 CHARACTEF: I 0 BIT (1) •
7 NOI!.JA I TFLAG BIT(l) .
7 FILLER 4 BITe)).
5 BUFFERADDRESS PO I ~nER.
5 BUFFERLENGTH FD(ED ( 16) ,
5 CHAR COUNT F I :iD I D' ,
PLYH~ LITERALL.'y' '''3G'I+f~DID',
Fl.lJDBl..K LITER(~LL'( ''']/'''',
BCfiOD (6) BIT (8) rHITI~iL

(1.0.

1.

0.

L

,..·1);

CASSETTE - OPEN
0130
0131
0132

0133

945353-9901**

***
*

PAGE 0008

0'"

PROCEDURE CSOPEN (PARMLIST);
CALL RSTMOD;
RETURr·j;
END CSOPEN;

:,1

c·"'·
I"

o

:

945353-9ge1**

CASSETTE-FORWARD SPACE REC
0136
0137
0138
0139
0140
0141
0142
0143
0144
0145
0146
0147
0148
014:3
0150
(1151
0152
0153
G1 154

*
*
:t:

(liS!:;

t

('156
0157
015:3
0159
011:30
0161
(l162

***
:t

~1163

:t

0164
C1ES
ro166
0167
0168
C169
0170
0171

:t

**
***
:t
~t

PROCEDURE CSFWD (PAR~LIST);
DECLARE (1 DU~~YSVCBLOCK,
3 DMYSVCCODE BIT (8),
3 FILLERDMYl BIT (8),
3 DMYIOOP BIT (8),
3 D~YLUNO BIT (8),
3 Dt'iYSYSF"LAGS,
5 FrLLERD~Y2 BIT (2),
5 DMYEOFFLAG BIT (1),
S FILLERDMY3 BIT (5),
3 DMYUSRFLAGS BIT (8),

:*

3 DMYBFRADDR POINTER,
3 DMYBFRLNTH FIXED (16),

::j(

*

:t*
*::t:;¥
~*

:t
:t

*
*
**
**
*
~t

PAGE e009

3 DMYCHRCOUNT FIXED (1S));
DECLARE D~YBUFFER BIT (8);
DECLARE READASCII LITERALLY '9~;
DECLARE IOREQUEST LITERALLY '0';
DECLARE I FIXED;
DECLARE WKSP POINTER;
DMYSVCCODE = IOREQUEST;
DMYIOOP = READASCII;
DWr'LUNO = LUNO;
DWiSYSFLAGS ::: €I;
D~1'y'USRFLAGS = 0;
DMYBFRADDR = ADDR (DMYBUFFER);
D~1YBFRLNTH

I

= 0;

= 1;

CALL GETBUF (WKSPl;
DO WHILE I < CHARCOUNT & DMYEOFFLAG
CALL 10 (WKSF');
SYSTEMFLAGS = DMYSYS~LAGS;
I

=I

+

1;

END;
CALL RETBUF (WKSP);
RETUR~j ;
EHD CSnJD;

= 0;

CASSETTE - BACKSPACE RECORD
0174
0175
017(~

0177

0178
017:3

0180
0181

**
%
*
*
*:*
*

945353-9901%%

PAGE 0010

PROCEDURE CSBACK (PARMLISTl;
DECLARE I F I >:: SP .OR.

--

CR;

(CHAR >:: BEL & CHAR / .-.- Hi) ,OR.
CHAR :: FF ,OR, CHF~R :: CR
THEN DO;
CALL PUTCHR (CHAR, I ) ;
I :: I + 1;
END;
IF CHAR :: DC3
THEN DO;
IF I :: 0 THEN EOFFLAG :: 1 ;
CALL RCVCHR (CHAR, ["IA Ii);
IF CHAR .NE. CR
THEN ;CALL CMND (ADDR (RTAPE) ) ;
END;
ELSE CALL RCVCHR (CH('~R , WA r T) i
END;
DO WHILE CHAR .NE. CRi
CALL RCVCHR (CHAR, WA Ii);
END;
CHARCOUNT :: I ;
RETURN;
END CSRASC
~,

Ij"jl.-.

CASSETTE - WRITE ASCII
0225
0226
. 0227
0228

0229
0230
0231

0232
0233

0234
0235
0236

0237

*
**
*
*
**
*
*
*
)I::

)I::
)I::

0238

*

0239

)I::

0240
0241
0242

0243
0.2440245

*
**
**
)I::

945353-9901**

PAGE 0012

PROCEDURE CSWASC (PARMLIST);
DECLARE I FIXED;
DECLARE CHAR BIT (8);
CALL CHGMOD (PRBPTR. DCTPTR. MODRCD);
CALL STTCHR (CHAR) /*GET STATUS
IF RCDRDY - 0 THEN DO;
UNRECOVERABLE ERROR = 1;
RETURN;
END;
CALL CMND (ADDR (WTAPES));
DO I FROM 0 TO MIN (CHARCOUNT-1. 79);
CALL GETCHR (CHAR. I)
IF CHAR = CR THEN CHAR = ETB;
IF CHAR )= SP .OF<:. (CHAR )::: BEL 8& CHAR
.OR. CHAR = FF .OR. CHAR = ETB
THEN CALL SNDCHR (CHAR. 0);
END;
CALL DELAY (CCOUNT)
CALL CMND (ADDR (WTAPEE));
RETURN;
END CSWASC;

o
~~.

<= LF)

o

CASSETTE - WRITE END.OF.FILE
0248
0249
0250
0251
0252
0253

0254

**
*
**
**

945353-9901**

PAGE 0013

PROCEDURE CSWEOF (PARMLlST);
CALL CHGMOD (MODRCD):
CALL CMND (ADDR (WTAPES));
CALL CMND (ADDR (EOFSEQ»;
CALL CMND (ADDR (WTAPEE))i
RETURN:
END CSWEOF;

C'·.
...

•.. ~

.l.

••

CASSETTE-REWIND TO LOAD POINT 945353-9901**
0257
0258
0259
0260
02(; 1
0262
0263
0264
0265
02(;G
0267
0268
0269
0270
0271
0272

0·;:>·" ..,:i
,..,
~,1

02:?4

::I:

*

)I(

::I:

PAGE 0014

PROCEDURE CSRWND ( PARMLI ST) ;
DECLARE I B:IT (1) ;
CALL RSH10D;
CALL CtrlND (ADDR (RkIDSEQ) ) i
0;

)I:

I

)I:

DO WHILE I :: 0;
CALL STTCHR (STATUS);
I :: BOE (ABS ( ~lOD (DRIVEID, 2) - 1)
END;
CALL CHGtrlOD (PRBPTR, DCTPTR, MODPBK) i
C~~LL U~ND (ADDR (LOADSQ)) ;

:::t:

**
**
:*:*
)I(

:t':

**"
*

I

,.-

) ;

0;

::

DO WHILE I :: 0;
CALL STTCHR (STATUS) ;
I

::

PB~(RDY

EHD;
RETURH;
END CSRWND;

C'"

,

(,

c

\

...

CASSETTE - UNLOAD
0277
0278
(1279
0280
0281
0282
0283
(12:34
02:35
0286

0287

945353-9901**
::I<

**
*
**
*
**
;I:

*

PAGE 0015

PROCEDURE CSUNLD (PARMLIST);
DECLARE I BIT (1);
CALL RSTMOD;
CALL CMND CADDR (RWDSEQ));
I

= 0;

DO l.dHILE I = 0;
CALL STTCHR (STATUS);
r = BOE (ASS 010D (DRIVEfD, 2) END;
RETURN;
END CSUNLD;

1));

LOG - READ ASCII
0~90

0291
0292

0293
0,294

0295
0296
0297

0298
0299

0300
0301

0302
0303
0304
0305

0306
0307

0308
0309
0310
0311

0312
0313
0314
0315
0316

0317
0318
0319
0320

0321
0322
0323

0324
0325
0326

0327
0328
13329

0330
0331

0332
0333

0334
0335
0336
0337
0338

0339
0340
0341

0342
,,~3,~,3

1.;--

t••~.r

PAGE 0016

945353-9901**

**
*
*
**

*
*

*
*
**'
*
*
**
**'
**
***
*
*
**
*
**
*

**
*
**'
*
**'

*
*

**'
*'

*

***
*'
*'
*'
**

*

o

PROCEDURE LGRASC (PARMLIST);
DECLARE I FIXED (16);
DECLARE CHAR BIT (B);
I == 0;

DO WHILE EOFFLAG = 0 & I < BUFFERLENGTH
& UNRECOVERABLEERROR == 0;
IF NOWAITFLAG=0 THEN
CALL RCVCHRCCHAR,WAIT);
ELSE CALL RCVCHRCCHAR.NOWAIT);
IF NOWAITFLAG=l & CHAR=0 THEN RETURN;
IF CHAR NE BS THEN BSFLAG :: 0;
IF CHAR >= SP & CHAR < DEL THEN DO;
CALL SNDCHR (CHAR,DELAY3);
CALL PUTCHR (CHAR. I ) ;
r = I + 1;
EI'W;

ELSE IF CHAR == DEL THEN DO;
IF CHARACTERIO = 1
THEI'I DO;
CALL PUTCHR (CHAR,
I :: I

+

I);

1;

E~m;

CALL CMND (ADDR (ECODEL));
END;
ELSE IF CHAR == BS THEN DO;
IF CHARACTERIO == 1 THEN DO;
CALL PUTCHR (CHAR. I);
I == I + 2;

nw;

MAX (I - 1. 0);
CALL CMND (ADDR (ECOBS));
IF BSFLAG EQ 0 THEN DO;
BSFUiG :: -1;
CALL SNDCHR (LF.DELAY3);
END
END;
ELSE IF CHAR == HT THEN DO;
CALL PUTCHR (CHAR. I);
CALL SNDCHR (' " DELAY3) i
I' ==

c

I == I + 1;

END;
ELSE IF CHAR == DC3 & I == 0 THEN ~OFFLAG=l
ELSE IF CHAR = CR THEN DO;
CALL SNDCHR (CHAR. DLY27)i
CHARCOUNT = Ii
RETURN;
END;
ELSE IF CHAR = LF
THEN CALL SNDCHR (CHAR. DELAY3)
ELSE IF CHAR = ESC
THEN UNRECOVERABLEERROR = 1;
END;
CHARCOUNT = I;
RETURN;

o

0344

PAGE 0017

945353-9901**

LOG - READ ASCII

*

END LGRASCj

' - - " ,...

,~

..

-.'

945353-9901**

LOG - WRITE ASCII

PROCEDURE LGWASC (PARMLIST);
DECLARE (I, J) FIXED (16);
DECLARE CHAR BIT (8);
DECLARE FOUND FIXED (16);
r = CHARCOUNT;
IF I = 0 THEN RETURN;

0347
0348
0349

Q1350
0351
0352

I

0:35:::

=::

I -

c

1;

DO J FROM 0 TO r BY 1;
CAU_ RC\lCHR (CHAR, NOWA r T) ;
IF CHAR = ESC THEN DO;
UNRECO\lERABLEERROR = 1;
RETURN;

0354

0355
0356
(.1357

E'358
035:;1

nw;

0360
0361
(2J362

0363
~l3G4

0365
03 (::;r.:;

036?

PAGE 0018

:r

0368
0369

:t

0370

::K

CALL GETCHR (CHAR, J);
IF CHAR = HT THEN CHAR = SP;
IF CHAR >= SP .OR. (CHAR >= BEL & CHAR <= LF)
THEN CALL SNDCHR (CHAR. DELAY3);
IF CHAR = CR THEN CALL SNDCHR (CHAR, DLY27);
IF CHAR = FF THEN DO K FROM 1 TO 8;
CALL CNND (ADDR (ECOFF));
END;
END;
RETURN,
END l_GlJASC;

:C

c

(-

PAGE 0019
SINGLE CHAR INPUT FOR MONITOR 945353-9901**
;
PROCEDURE MONITORCHAR (CHAR)
0373
*
(1)
i
CHARACTER
DECLARE CHAR
0374
0375
0376
0377
0378

'::t;*

*
*:t:;

CALL RCVCHR (CHAR, NOkIA IT) ;
RETRN;
D-m MONITORCHAR;

CHANGE RECORD/PLAYBACK MODE
0381
0382
0383
13384
0385
0386
0387
0388
13389
0390
13391
13392

*
*
*
*
*
*
*t:
*

0393

*
*
:*

0394
0395
0396
0397
0398
0399
041210
0401
041212
0403
0404
0405
0406

*

)I':

:*

)I':

)I':
)I':

**
*
*
**
)I':

)I':

945353-9901**

PAGE 0020

PROCEDURE CHGMOD (PRBPTR, DCTPTR, MODE) j
DECLARE MODE BIT ( 16) j
/* NOTE PREPTR A~m DCTPTR GL.OB~~LL y
DEFINED */
DECLARE ( r NUSE, OTHER) FIXED;
INUSE :: MOD (UNITNO, 2) ;
OTHER ... ABS ( I NUSE--1) i
IF (MODE :: MODPBK &,
CASSETTECONTROL (INUSE),PLAYBACK = 1)
(MODE ::: MODRCD &.
CASSETTECOHTROL ( r NUSE) . RECOF.:D ::: 1)
THEti RETURN;
CASSETTECNHROL ( II'WSE) :: 0;
CASSETTECONTROL (OTHER) :: 0;
IF MODE :: MODPBK THEN DO;
CASSETTECOtHROL ( I ~WSE) . PU~'I"BACK ::: 1;
CASSETTECONTROL (OTHER) ,RECORD :: 1;
CAL.L CM~m (ADDR (PMODE) ) ;
END;
ELSE DO;
CASSETTECONTROL ( I NUSE) , RECORD ::: 1 ;
CASSETTECONTROL (OTHER) ,PL.AYBACK :: 1 ;
CALL CMND (ADDR (Rt>10DE) ) ;
END;
RETURN;
END CHGMOD;

o

0 ")
"

GET STATUS CHARACTER
0409
0410
0411
0412
0413
\21414
0415

945353-9901**

PAGE 0021

PROCEDURE STTCHR (STATUSCHAR);
DECLARE STATUSCHAR BIT (8);
CALL CMND (ADDR (STTS[Q));
CALL RCVCHR (STATUSCHAR. WAIT);
RETUR~4 ;
Et~D STTCHR;

SEND COMMAND SEQUENCE
0418
0419
0420
0421
0422
0423
0424
0425
0426
042?
0428
0429
0430
0431
121432
0433
0434
(\435
0436
0437
0438
0439
0440
0441
0442
0443
0444

**
:t
**
**
**
***
**
*
**
:+::

:+::
:+::
:+::

**
*

PROCEDURE CMND (CMNDPTR, D~IVEID)
DECLARE (CMNDPTR, B'r'yEPTR) PO n~TER;
DECLARE COMMANDBYTi/FIXED (8)
CONTkoL (BYTEPTR);
DECLARE DRIVE-ID FIXED (8);
DECL~RE BYTE FIXED;
BYTEPTR = COMNDPTR
DO FOREVER;
BYTE = COMMANDBYTE;
BYTEPTR = BYTEPTR + 1;
IF BYTE = ENDGROUP THEN EXIT DO;
IF BYTE = DELAYGROUP THEN DO;
CALL DLYCHR (COMMANDBYTE);
BYTEPTR = BYTEPTR + 1;
END;
ELSE DO;
IF BYTE < 0
THEN /* THIS IS A COMMAND BYTE
TO BE MODIFIED BY DRIVEID
J = MOD (DRIVEID, 2);
IF J

.I'-IE.

0

*/

D

(~

THEN BYTE = BYTE + BYTMOD (BYTE);
CALL SNDCHR (BYTE, 0);
DW;

:+::

:+::
:+::

PAGE 0022

945353-9901:U

END;
RETURN;

Et--ID 011 ~m ;

()

o

SEND CHARACTER TO 733ASR

(

0447
0448
0449
0450
0451
Q)452

0453
0454
0455
13456
0457
0458
0459
~'460

0461

(-

*
*

*'
*'

**
**'
**
*'
**'
**

945353-9901**

PAGE 0023

PROCEDURE SNDCHR (DELAYTIME, CHAR) ;
DECLARE DELAYTIME FIXEDi
DECLARE CHAR BIT ( 8) ;
IF D5R = 1 THEN DO;
RTS = L
DTR :: 1 ;
OUTCHR = CHARi
DO WHILE WRQ = 0i
END;
CLRWRQ ::: 1;
CALL DL 'y'CHR (DELAYTIME) ;
END;
ELSE UNRECOVERABLEERROR = 1;
RETURN;
END SHDCHR;

SEND DELAY CHAR TO 733 ASR
0464
0465
0466
0467
0468
0469
0470
0471
0472
0473
0474
0475
0476

*
*

945353-9901**

PAGE 0024

PROCEDURE DLYCHR (DELAYCOUNT) ;
DECLARE (DELAYCOUNT. I ) FIXED;

***
*
***
**
**

0

I = DELAYCOUNT;
DO WHILE I > 0;
RTS = 0;
OUTCHR = ANYTHING;
DO lo-IHILE WRQ = 0;
END;
CLRWRQ = 1;
END;
RETURN;
END DLYCHR;

c

()

--------~---,----

-

------._-------"

--

---

---~~~-~-

--."-"--"-

------".--~------~---.-

..---

RECEIVE CHARACTER FROM 733ASR 945353-9901**

(

0479
0480
0481
0482.

04:33
1214::::4
0485

t
t:
::t:
;t:
:t;

04813

:t

04:;:':7

*

O'~;;;8

()4:;:::9
(OJ 4 ~:;1 i)
04~:;ll

04'J2

(

*:t

:f

t:

l
:t.
1:

PAGE 0025

PROCEDURE RCVCHR (WAITFLAG, CHAR) ;
DECLARE klA I TFLAG FIXED;
DECLARE CHAR BIT t 8 ) ;
IF TIMERR :: 1 THEH CLRRRQ :: 1 ;
DO l,jHIl_E RF:Q :: (),
IF l,jA I TFLAG . ~~E . 0 THEN DO;
CHAR :: 0;
RETUF:N;
END;
END;
CHAR :: I rKHF-iR ;
CLRRRG! :: 1;
RETURH;
D4D F:C\lCHR;

GET CHARACTER FROM BUFFER
0495
0496
0497
0498
0499
0500

*
***
**

945353- 9901 :h:f~.:·

PAGE 0026

PROCEDURE GETCHR (DISPLACEMENT, CHAR);
DECLARE DISPLACEMENT FIXED (16);
DECLARE CHAR BIT (8);
CHAR = BUFFER (DISPLACEMENT);
RETURN;
OlD GETCHR;

o

c

o

PUT CHARACTER INTO BUFFER
0503
05(14

(

(

0505

:*
i

:t
.• J..'
,"

0508
0507

:t

0508

t

945353-9901**

PAGE 0027

PROCEDURE PUTCHR (DISPLACEMENT. CHAR);
DECLARE DISPLACEMENT FIXED;
DECLARE CHAR BIT (8);
BUFFER (DISPLACEMENT) = CHAR;
RETURH;
E~m PUTCHR;

RESET CASSETTE RDD/PBK MODE
0511
0512
0513
0514

*
**

1Z,515

**
*t:

0516
~)517

0518

*

945353-9901**

PAGE 0028

PROCEDURE RSTMOD;

0', \
,',1,)

CASSETTECONTROL ( 1 ) . PLAYBACI< = 0;
CASSE TTEe 01'1T ROL (2).PLAYEACK = 0·
" ,
Cr~SSETTEC()NTROL ( 1 ) . RECORD =: O.
U~SSETTECOrHROL (Z).RECORD _.. tiL
RETURH,
END RSTttlOD;

o

**

733 DEV SERVICE ROUTINES

052i
0522
0523
0524
OS::?5
0526
0527
0528
05:29
053(1
0531
05:;:2
05]'3
0534
0535
05]6
0537
0538
0539
0540
0541
0542
0543
0544
0545
0546
~l54?

0548
0549
055(;
0551
0552
0553
055'-10555
0556
0557
0558
0559
056()
05E;1

05(:;2
05(-33
05134
0565
()56f:;
0567
0568
0569
05:70

0571
05:?2
05:73

0574

**

*
* REVISION:
*'\::

:t TITLE:

t

CO~1PUTER:

~

ABSTRACT'

*
**
t:
**

945353-9901

**'

PAGE 0029

i-PROCEDURE DSR733;
DSR733
DEVICE SERVICE ROUTINES - 733 ASR
01~

I G I ~1AL

990
A GROUPING OF SUBROUTINES WHICH CONSTITUTE
THE SILENT 733 ASR (1200 BAUD INTERFACE)
DEVICE SERVICE ROUTINES.

TABLE OF CONTENTS:
I. LEVEL ONE SUBROUTINES
t
A. CASSETTE COMMAND PROCESSORS
1. OPEN (CSOPEN)
::I:
2. FORWARD SPACE (CSFWD)
3. BACKSPACE (CSBACK)
4. READ ASCII (CSRASC)
5. WRITE ASCII (CSWASe)
6. WRITE END OF FILE (CSWEOF)
::I:
;t
7. REWIND (CSRWND)
8. UNLOAD (CSUNLD)
*:
B. LOG (KEYBOARD/PRINTER) COMMANDS
1. READ ASCII (LGRASC)
2. WRITE ASCII
(LGWASC)
II. LEVEL TWO SUBROUTINES
A. CHANGE RECORD/PLAYBACK MODE (CHGMOD)
B. GET STATUS CHARACTER (STTCHR)
III. LEVEL THREE SUBROUTINES
A. SEND COMPLEX COMMAND (CMND)
IV. LEVEL FOUR SUBROUTINES
A. SEND CHARACTER TO 733ASR (SNDCHR)
V. LEVEL FIVE SUBROUTINES
A. SEND DELAY CHARACTERS (DLYCHR)
B. RECEIVE CHARACTER FROM 733ASR (RCVCHR
C FETCH CHARACTER FROM BUFFER (GETCHR)
t
D. PUT CHARACTER INTO BUFFER (PUTCHR)
E. RESET CASSETTE RECORD/PLAYBACK
MODE (RSHlOD)
:t: CALLING SEQUENCE:
THE STANDARD CALLING SEQUENCE FOR ALL LEVEL
t
:t
ONE SUBROUTINES IS MADE BY THE 10 SERVICE
:t:
DISPATCHER. UPON ENTRY THE DATA STRUCTURE
I S AS FOLLOf,J$;
CURRENT WORKSPACE:
t
R13 - ADDR OF DISPATCHER WORKSPACE
t
R12 - CRU BASE ADDRESS
;j(
R11 - RETURI'~
R10 - ADDRESS OF PRe
DISPATCHER
WORKSPACE:
(READ ONLY)
*
R10 - ADDR OF CURRENT WORKSPACE
R9 - DEVICE TYPE
R8 - UNIT NUMBER
R7 - 10 OPERATION CODE

**
*
*

**
*
*
**
**
*
**
*
*
*
*

*
*

*
*
*
*
*
*

**

733 DEV SERVICE ROUTINES

**

945353-9901

*'+'

05?5
0576
0577

)/:

R6

- DEIJ I CE

)f::

R3

-

0578

::I<

05?~j

:t

05>30
('581
0582

:t

0583

1;)584
(1585
12)586

()587
0588

:t.
Jt:
OJ(

**
::t'
;f:
)/:

i:

0 1389
10590
oE; ~:J 1

:t
:t.

0592:
059::

:t

('594

Q15'jt;

t

*
*t

PAGE 0030
COHTf~OL

PRB ADDRESS

TABLE (DCT) ADDR

0';,',

RULES FOR SUBROUTIHE REGISTER USAGE ARE:
i, RO, Ri. R14 AND RIS ARE VOLATILE AND
MAY BE USED BY ANY SUBROUTINE
2. LEVEL 1 SAVES RETURN ADDR IN R2
LEVEL 2 SAVES RETURN ADDR IN R3
LEVEL 3 SAVES RETURN ADDR IN R4
LEVEL 4 SAVES RETURN ADDR IN R5
LEVEL 5 SAVES RETURN ADDR IN R11
THUS LEVEL 1 MAY USE R3-R5 AS VOLATILE
STORAGE (LEVEL 2 R4-R5 AND LEVEL 3 R5).
3. SUBROUTINES MAY MODIFY ONLY THOSE
REGISTERS DESIGNATED AS OUTPUT PARAMETER
OR VOLATILE FOR THE APPROPRIATE LEVEL
4. SUBROUTINE PARAMETERS ARE PASSED
ACCORDING TO PX990 STANDARD (R10 TOWARD
R0) EXCEPT FOR ASSEMBLY-TIME CONSTANT
PARAMETERS. WHICH ARE CODED AFTER THE
BL IN THE CALLING ROUTINE

(}

**

733 DEV SERVICE ROUTINES

135:37
0599
0600
0601
(1602

t

4-

*
*'
:t.*'

~11;03

t:

('604
06ra5
06 1216

:t:

06(37

:t

0608

:t

",.

~)G09

Q'623
0(~24

ot~; 2'5

121626
OE;2?
0623
0629
Or;30
0631
0632
0633
OE;34
0635
0636

7

7

~t:

:*

4--

*'

3

i2'f2) 03

D I SPlI:,C:t:~1EI>ITS :

EQU
EQU
EQU
EQU
EGlU
E(;)U
EQU

~'00D

000C

UE
EOFLG
CHRMOD
HWFLG

*'

[0 OF' CODE
LOGICAL UNIT NUMBER
SYS:TEt.1 FLAGS

13
1
2
3
4
6
8

USEF,: FUiGS

BUFFEP FIDDPESS:
HUFFEF:: LnlGTH
CHf~RACTF'::R

FLAG

:t

000F
0r2l0E

(i),

NOWAITFLAG 8rT(1),
FILLER 4 BIT(3),
BUFFEF.~ADDRESS PO I !',ITER,
BUFFERLENGTH FIXED (16
CHARCOUNT FIXED (16),
PRBRESERVED BIT (32));
BSFLAG FIXED (lS) ;

PRB [OUfHES

t:
:t

lOOP
LUNO
SYSFLG
USEFLG
BFADD.R
EFLNTH
CCOUNT

5
5
5

4--

*:*
13131313
0001
01302
0el)3
0004
13(106

~:.

44-

t:

061?

0621
0622

5-

:t

081(3

0620

5 USEF-~F·L.AGS,
:7 FILLER3 B!T (3),
:7 CHARACTERIO BfT

*'

0610
0611
0612
0613
0614
0615

(-

".

2-DECLARE (1 PHYSrCALRECORDBLOCK,
33 PRE CONTROL (PRBPTR),
45 lOOP BIT (8),
45 LUNO BIT (8),
45 $YSTEMFLAGS.
57 FILLERl BIT (1),
S7 UNRECOVERABLEERROR BIT
7 EOFFLAG BIT (1),
57 F!~LER2 BIT (5).
5-"

**

~)598

01318
0619

PAGE 0031

**

EG1U
E0U
EG1U
EGlU
REF

16-1
16-2
16-3
16-4
BSFLG

REF
REF
REF
REF

UEMASK
EFMASK
CMDMSK
UEFMSK

COUNT

SHIFT COUNTS
UNPECOVERABLE ERROR
END. OF. FILE FLAG
CHf;F~F:ICTER

MODE

HO b.IA IT FLPIG
BACKSPF1CE FLAG
FLAG SET Mf-iSK:S
UNRECOVERABLE ERROR
END.OF.FILE
CH~iP~:ICTER

~~ODE

UN.ERROR AHD EOF FLAG

**

733 DEV SERVICE ROUTINES

**

945353-9901

0638
0639
0640
(H341
0642
(l643
0644
0645
0646
0(347

t

*t*
0000
0002

0651
06!32
0654
0655

0656

0000

0000

0657

~lO(;)2

00

0G58

0003

00

EH3 ':;; 9

C·.,'

DEVICE CONTROL TABLES 733ASR

DCTCRU EQU
CSTCNT EQU

*
*

Of353

PAGE (.)032

2-DECLARE PRBPTR POINTER;
2-DECLARE DCTPTF~ PO INTER;
2-DECLARE (1 DEV[CECONTROLTABLE73
33 D(T733 CONTROL (DCTPTR
45 CRUBASE FIXED (!6l,
4'3 CASSETTECONTROl (2),
57 PLAYBACK BrT (1),
57 RECORD BIT (1),
5; FIlLER10 BIT (6));

:t

12)642:
12)649
06':;e,

**

0

2

CFW BASE
CASSETTE CONTROL ARRAY

EVEN

DEF DC7331
DC7331 DATA >0
BYTE (;)
BYTE (\

733ASR :#:1
(CRU BASE ADDR)
(CASSETTE CONTROL LEFT)
(CASSETTE CONTROL RIGHT)

E\/E~~

c

o
\

**

733 DEV SERVICE ROUTINES

**

945353-9901~lc

PAGE 0033

OGt;]

2-DECLARE BUFFER (1) CHARACTER
2CONTROL lBUFFERADDRESS);
2- Ii EeL.. I:~ RF F' 1::1 f~ ~'Il \ c, T \ 1 r h r.:: H I \ 'y'

~)GG4

(.

OGGS
(1 E; r:; 13
Ot;G?
013138

,:

Oi36~3

444-

0661
06132

...,'

I

4 -;..1 --

(1670

0671

4-4 -4-'

06:73

067,1·
06:75

".~""

(1 r:;? I:;
0677
Or:;7S

• F'I;'FI'TI~, tIE . VT1'I-'E, UH 1n,IO
DC
I L 1::1::;1:,',':::13 1 NPUT
-,
,.:1 ~~SP?J3 1 N CFi 1I C() 1',1 TF.' 0 L ( C
~;
I HCHf:iF.: B I T ( :3 I ,
.,
r." >< t{l T I I'IG
,::.
E I T I J. )
I:
(
F:. I T
J. ) ,
,-' PISF: I D
c:·
(
1,.1
F~
C!
'.
EIT
:1 ) ,
,-'
~~; Pf,' 0
BI T ( 1 )
c· DeI)
,.,'
F" I T .: t ;. ,
E:; DSP
B r T ( :1 ;. ,
r;'
,r ~,IT
v r T ( t :. ) ;
'-'

_. DEC L_111\ E

J

".

2:- DECLARE

F'?:::: :30U TPU T ,

1.

~i:3

":)

~1

4444-

r":)

OUTCHf:~IR

(1682

4-'

0683

44-

.....) -~

(1 i3 7 '~I

06:;;::0
0(381

0684
OC;S5
0i:38r:;
0(:;8?
~!

S:F,'? =::::::0 U T

CFWCONTROL

~::;

B I T ( ;. ,
F:' I U._EP73]1 E I T ( 'l J ,
DTI:;'
E I T ( 1 ;.

[::;

I?TS

~:::
I::'
_.'

eLI:,: 1,,1 r:: 0
CL.PF::F':O

.'

CLf~:HSF

~:;

,....

(c,

t.~,

r·.

t;· [

T C 1. I
.,
i3 T ( ;.
P;. I T I .,.., I
B I T I.. 1. ;.
r

.1.

,
,
,

;. ,

".,j..'

'1'.

t

(;83

0000
0008
000:3

Oi3:3D
01::;:::10
06':11

OOi(IA

I;) ~:; ::i 2

(10(1B

06 :~i~]

000e

Ot=;94

OE!t;)D
0(101::

06~35

ooor·-

1069(;
069/
06'38

()(IOO

0699
0700
0701

0009
Q)OOA
i(I00B

oaoc

O?12~2

07r.B
(1704
0705

OEJOD

CRU

*INCHAR
:)':~iT

EOU

0

I NG EGIU

R
'-

TIMERR EQU
ASRID EGiIJ
I~IRO
EGiU
J=;:F:O
EOU
EOU
DCD
DSR
EOIJ
INT
EOU

9
10

11
12
13
14
15

INTERFACE DEFINITIONS

I t>IPUT CH~:IRFICTEP
TRANSMIT IN PROGRESS

T I bi I ~,I G E F( r~ 0 I;;:
AS!=" I DEt'·ll' I F r. EF<:
kiP I TE f,:EOUEST
REPID REQUEST
DATA CARRIEP DETECT
DAT~:I SET REf:iDY
I t'ITE:RPLIF)T

f

OUTCHR EQU
EOU
DTR
EQU
RTS
CLR~JRO EQU
CLRRRO EGiU
CLF:NSF EQU

*

0
9

to
11
12
13

OUTPUT CHARACTER
DATA TERMINAL READY
PEOUEST TO SEHD
CLEAR WRITE REQUEST
CLEAP READ REQUEST
CLEAF: Hf::kl STATUS

:f

07()6

4(180

O?(l?
~Q703

0709
0710
0711

(

,..-

~,

8040

0004

coco

*t,10DRCD
*
~,10DPBK

t
~1ODBTS

0712

:t

0713
0714

:r

::t:

2-DECLARE ~10N;:CD L [TERALL Y , 4080" , ;
SET RECORD ON CASSETTE
2-DECLARE t>10DPBK L I TEF~~~LL'(
804C.;" r ;
EOU )8040
SET PLAYBACK OH CASETTE
2-DECLARE MODBT'S BIT (:16) INITIAL ("
DATA MODRCD+MODPEK
2-DECLARE (1 STATUS.
33 FILLERSTT1 BlT (2),
33 PNTRDY BIT (1),
/I

EOU

>4080

J' 1\

**

733 DEV SERVICE ROUTINES

13715
13716
13717
13718
13719
137213
13721
137;22
13723
13724
0725
13726
13727
13728
13729
~)73e

13731
13732
13733
13734
137:35
13736
13737
13738
13739
137413
13741
13742
13743
13744
13745
1374.6

"'

-------""-

945353-99131 "t~

**

*

***

PAGE 131334

333-

3 RCDRDY BIT (1) •
3 HOE: (U BIT (n,
3 F'E:I11313
3
27

MOVE LI TERAL TO LEFT BYTE
DELAY -,"::1 CH~IPAC"ERS
"',"., CHARACTERS
DEL.A'l ,:/

e~)50

*t~AXCHR

Eau

80

MAX CHf:IRS F'ER

13~I13D

1300B
e~)G9

1313130
1313131
1313132
1313133
1313134
1313135
1313136
1313137
1313138
1313139
GGGA
1313GB
eeec
eeeD
GeGE
GeOF

**
*RG
Rl
R2
R3
R4
R5
R6
R7
R8
R9
RiG
Rl1
R12
R13
R14
R15

r~ECORD

I,..JORKSPACE REGISTER DEFINITIONS
Eau
Eau
Eau
EOU
EOU
Eau
Eau
Eau
Eau
EOU
EOU
Eau
Eau
EQU
EOU
Eau

*

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

0

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

13
1
2
3
4
5
6

7
8

9
113
11

12
13
14
15

0

ASC I I LITERAL VAL &. COMMANDS
0749
0750
0751

(

0"'i1-'-'
. / :::!c:

0~)

10

0Ql12

0(10D

0?64

0()20

0(~

13

OQl14

000A
007F

(

~)78]

0784
0785
0786
0787

DC3

EGlU

>13

*DC4
*
CR
t
LF
t
DEL
:t
SP

EGlU
EGlU

>OD

EQU

)i)A

EQU

>7F

EQU

)20

EQU

>09

>137

0C10C

FF

*

EQU

>0C

ETB
'I/'T

EQU

0(180

BS
:t
:t

EOU

>0B

EQU

)08

EQU

1(JJ2)B 1
0(lB:3

LOAD

EQU

'3'H1DID

(1(1B';

*RECORD

ECll)

'5'H1DID

'l"H1DID

t

t

COBb

PLYBK

EGlU

'6'+I>1DID

0037

*FklDBLK

EOU

' 'i
.••. ,

0038

07~35

0(13C

BCKBLK EQU

' 8'

STATUS EOU

1

<

(1l/.)FE

L I TEF:f-'iLL. Y , "OA" , ,

!'"

()D"

4-DEL L I TEFUiLL'y' 1'1I?F

II

,

~

4-SP

L I TEF:ALL Y '"20''' ,

4-HT

LITEPALL'r'

' " i)9" .' ,

4-BEL LITEPALLY , "07"

n"DGRP EOIJ
:t
DLYGRP EQU

I

,

L I TEF:ALLY 111l1C"',

4-ETB L.l TEF;:~1LL,( )' "17l!

J' ,

,+-\/T

L r TER~1LL. y " "OB" , ,

4-B5

L [TERi;U. 't' '" 08"

1 ;

2-DEClf~RE

HDID L I n:RALLY 11180"';

2-DECLARE

RE:I~.1

r ND

Ll TERALL Y '''31''+MDI

4-LOAD L I TEPALl_ Y 11'33"+MDID',
4-RECOF'D L [TEFU~U. y '1I35"+MDID',
4-PL VB~< L I TER~1L.L V '''36''+MDID' ,
I

1 II

38 11

4-STATUS L I TEPALL '{

,

3C" , ,

4-ENDGF'P L I TEF'r~LL'y'

, II

L I TEf.?ALL 'y'

II

,

J

1

:t

OOFF

4-LF

4-BC~30

~~D I D
:t
REWIND EOU

0792
0793
0794

4-[lC4 L I TEFi:ALL Y , " 14 II

>17

t

0008

10" , ,

4-DC3 LITEPALLY , " 13" , ,

4-FF

:t

r2l00B

11

4-ESC L I TEF;:~iLL.Y '''lB'' 1 ,

t:
(lOi?

,

4-DC2 L I TEf~Al_L 'I' '''12''',

>14

EQU

(3796

(

)12

130137

079.0
07~31

EQU

)lB

0:788

078'3

DC2

EQU

0(l1B

~)77~~1

0780
0731
0732

"",

*HT
*
ESC
*BEL

0009

\~~j??5

0776
0777
(1778

>10

t

07?:3

0774

2-DECLARE DLE LI TERALLY
EQU

',j".

0753
0754
C'755
075G
0757
07138
0759
()760
0761
0762
0763
07135
0766
07r37
0768
0769
07713
0771
0772

*
DLE

PAGE 0035

945353-9901**

>FF
>FE

FF II

,

,

4-DLYGRP L I TEPf-'iLLY II1FE"';

945353-9901 ~yr

COMMAND TABLES .:
0802
·08133
13804
0805
0806
0807
0808
0809
0810
0811
0812
(1813
0814
0815
0816
0817
0818
0819
0820
0821
0822
0823
0824
0825
0826
0827
13828
0829
0830
0831
0832
0833
0834
0835
0836
0837
0838
0839
0840
0841
13842
0843
0844
0845
0846
~i1_7
,:,,,,,,,.

,', ~

;;

0006
0007
0008
0009
000A
00eB
000C

000D
000E
000F
00113
0011
0012
0013

0014
0015
0016
0017
0018

0019
eelA
001B
001C

0010
001E
001F
0020
01321
0022
0023
0024
01325

0026
0027

0006'
FE
3C
10
FE
03
a5
FF
000D'
FE
3C
10
FE
03
136
FF
0014'
10
FE
03
37
FF
0019'
12
FE
133
' FF

001D'
0D
eA
14
FE
133
7F
FE
03
FF
0026'
13
FF

*
*RMODE

EQU $
BYTE DLYGRP.60

PAGE 0036

2-DECLARE RECORDMODE (7) BIT (8) IN
3-(DLYGRP. 60. DLE. DLYGRP, 3, RECOR
RECORD MODE

0

BYTE DLE
BYTE DLYGRP,3
BYTE RECORD
B'YTE ENDGRP

**
PMODE

EQU $
B'rTE DLYGRP,60

2-DEClARE PLYBACKMODE (7 ) BIT (8 ) r
3-CDLYGRP, 60, DI_E. DLYGRP, 3. PLYBK
PLAYBACK ~1ODE·'

BYTE DLE
BYTE DLYGRP,3
BYTE PLYBK
BYTE ENDGRP

*
*RTAPE

EQU $
BYTE OLE
BYTE DLYGRP.3
BYTE FWDBLK.
BYTE ENDGRP

**
WTAPES

EQU $
BYTE DC2
BYTE DLYGRP.3
BYTE ENDGRP

**
*
WTAPEE

EQU
BYTE
BYTE
BYTE
BYTE

$

2-DECLARE READTAPE (5 ) BIT (8) INIT
3- (OLE. DL 'y'GRP, 3~ Ft.JDBLK, DWGRP) ;
BLOCK FORl~IARD

2-DECLARE WTTAPESTART (4 ) BIT (8)
3-(OC2. DLYGRP, 3, ENDGRP) i
BEGIN WRITE TO CASSETTE

C

2-DECLARE WTTAP~END (9 ) BIT (8 :' IN
3- (CR, LF, DC4, OLYGRP, 3, OEL. DLYG
3-ENOGRP) ;
ENO WRITE TO CnSSETTE

CR
LF
OC4
DLYGRP.3

BYTE DEL
BYTE DLYGRP.3
BYTE

**
EOFSEQ

Et~DGRP

2-DECLARE EOFSEQ
3-(OC3, ENDGRP) j

(4) i3 I T (8)

INITIAL

EQU $
BYTE DC3
BYTE ENDGRP
EVEt~

0
llo

945353-9901 *¥

COMMAND TABLES
0348
0349

(

0000

~~8S2

12' 8 !::;3

0854
0855
r()856

0:35::'
e858

0000
012)1,) 1
0002
12100]

00040005
0006
en) 0 7
0008

0000
FE
10
FE
0:3
B1
FE

0009

086::':

OOOt4

0364

(looe

0:3135

OOOD

OOOB

0009
10
FE
0:3
B3
FF
00C1E

000E

10

(100F
012110
0011
0012
0013

FE
03
3rj

(,873

O(H4

FF

0874-

0028

*BI
'..!

BYTE STATUS
BYTE EHDGRP

3C

FF

(18:3:8
0829

0891

2-DECLARE ECHOFF
3-(LF, DLYGRP,
ECHO F~ F'

...:1

BYTE EHDGRP

0881

(l02C

EOU $
BYTE DL.E
B'/TE DL YGF:P, 3

2:-DECU'1RE B'f::ICKSPC ( 7) BIT ( 8 ) INITIA
3-(DLE, DL\'CiRP, :3J BC~( E D (16 )
3 DMYCHRCOUNT FIXED (16
DMYBUFFER BIT (8);

2-DEClf~RE READASCII LITERALLY '9';
2:-DECLARE rOREQUEST LITERALLY '0';

*-

1:J0()A

0970
0'371
0972
097:3
0974
0975
0976

,":1-

*-

(aSS3
0'354

0968
0969

1-PROCEDURE CSFWD (PARMLIST);
2-DECLARE (1 DUMMYSVCBLOCK.
33 DMYSVCCODE BIT (8),
33 FILLERDMYl BIT (8),
33 DMyrOOp BIT (8).
33 DMYLUNO BIT (8),
33 DMYSYSFLAGS,
45 FILLERDMY2 BIT (2).
45 DMYEOFFLAG BIT (1),
45 FILLERDMY3 BIT IS),
]3 DMYUSRFLAGS BIT (8),
3 DMYBFRADD~ POINTER,

*

r')942:
0943
r')944

rZ,955
0956
09'::;7
0958
0959
0960
0961
0962
0963
0964
096!:;
10966
0967

STANDARD LEVEL ONE ROUTINE.

CASSETTE - FORWARD SPACE
2-DMYSVCCODE = IOREQUEST;
BUILD DUMMY PRB/SVC
2-DMYIOOP - READASCII.

2-DMYLUNO - LUND;
MOVB @LUNOCR10).R4
SRC

R4.8
2-DMYSYSFLAGS
2-DMYUSRFLAGS

*-

000E

04C5

CLR

R5

0010
0012
~)'o 1. 4

02AG
0226
0,a1E

SHJP RG

AI

RG.R15*-2

0016

0207

LI

R7.1

= 0;
= 0;

2-DMYBFRADDR = ADDR (DMYBUFFER);
USE RIS AS DUMMY BUFFER
2-DMYBFRLNTH

= 1;

o

Pf-'1GE

CASSETTE-FORWARD SPACE RECORD 945353-9901**

(,

(JOIS

0001

0979
0930

001A

0(iC 1

0981
0982

Oi(11e

C?4A

()OlE
0020

0000

*

0985
0986
0~387

(1022

:3 t:\(:l-l
0CI 1213

0982

012124
0026

140F

09:39
0(128

0~391

002A

(IBE5
180D
0421;)
0l2J 0 121

O~3~~14

002e

()~395

002E
01;):30

(j ~~i ~~i r3

00:3;2

Cc.~8D
(1 ;~~ c~ I~

0(:)34

0(108

(H)36
0038

0GAO

1002
1003
1004
1005
1006
lOr;)?

1013
1014
H)15
1016

CF020

SRC
Joe

R5,EOFLG
CF020

IF I

)=

PRB

CH(~RCOUNT

&

DtrlYEOF

CHFIRCOUi'n

IF EOf::- DETECTED

3-CALL r 0 (['JI= SP .OR.
(CHA~~)=

BEL &. CHAR

CHAR:::: FF .OR.
IF CHAR >= SP
IF BEL

<~

1 H)9

·.JL T

0:289

CI

CSR120
R9.HTtLBYTE

OOB4
1 136
1 137

OI.)B6
0()B8
00BA
()OBC

0900
1.207
02:89
raCO(1

·JLE
CI

CSR130
R~3, FFlLBYTE

1304

')EO

CSR130

()OBE
OOCO

0;289
OD()O

CI

R9. CF::t:LB'y'TE

114el
1 141

'~lOC2

. .,lEO
1:301
00C4' CSRI20 EOI)

CSR130

1142

00C4

10~H

C3R140

JldP

t:
00C6' CSR130 EQU
1

CHAR <= HT

IF CHAP :: FF
I F CHAR :: CF:

4-THEN DO;
$

5-CALL PUTCHR

<=

CHAR

0/'00

(j(~B2

114::;

\

IF r >;:: BUFFER LH. IGTH

(lOBO

1144

&.

0;

CSR500
R6,@BFUHH(RI0)

1135

114:3

CR
::::

IF

1134

11]2:
113 ~:j

I LE CHAR .HE.
&. EOFFLAG

$

*:t

1 1:30

l~H

R9.CR:t:LBYTE

.JHE C:SR500
MOVB @SYSFLGCR10l.Rl

1433

1L~3

IGNORE DEL. GET NEXT CHAR

1?9

2-DO

D061~

1132
1133

2-IF CHAR = DEL THEN CALL RCVCHR (CH
R9.DELtLBYTE
IF CHAR .NE. DEL

2-

Q) 121 '3 4

11:31

o

$

:*

11Z?

IGNORE IF. GET NEXT CHAR

R9
@fKVCHR

o

0092

1121

PAGE (21044

945353-9901**

(CH~iR

J

I);

HT) .OR.
= CR

-.----~

----

CASSETTE
1146
1147

(

1148
1149
1150
1151
1152
1153
1154
1155
1156
1157
1158
1159
1160
1161
1162
1163

-

00C6
00C8
0 10CA
00C(:

00CE
0000
(IOD2
00D4
(1006
0008
00DA
00DC

READ ASC I 1
C206
06A0
043,~

MOV
BL

111:37
1168

(

1169
1170
1171
1172
1173
1174
1175
1176

0289
13(10
160F

(186
16(13
Ff:,AO
0000
0002
00DE' CSR150
04C9

00E2

0412'

1003

117~3

1180
1181
1182
1183

00FC

1184
1185
1186
1187
1188
1189
, 1190

('

00FE

1 +

1;

5-END;
$

3-IF CHAR -- DC3
IF CHAR . ~~E . DC3

R9.DC3*LBYTE

JNE

CSR170

4-THEN DO;
5-IF I = 0 THH~ EOFFLAG
IF I . I'-IE . 0

MOV R6,R6
...INE CSR150
SOCB @EFMASK,@SYSFLGCR10)

= 1;

SET EOF FLAG

EQU

$

CLR
BL

R9
@RCVCHR

Cl

5-IF CHAR .NE CF:'
7-THn4 CALL CWW (ADDR (RTAPE») ;
IF CHAFt: :: CR
R9,CR*LBYTE

130:3
06A0
0396'
0014'
00F0' CSR160

JEGl
BL

CSR160
@01ND

!:;;-CALL RCVCHR (CHAR, ["IAIT) ;
GET CHI~R ~'1FTER DC3

*
*CSR170

04C3

5-END;
JMP

CSR180

EQU
CLR
BL

$

06Ala
0412'
00F8' CSR180 EQU
t
10C7
JMP
00FA' CSR500 EQU
t
0289
CI
0000
1304
JEO

0100
0102
(1104

04C~3

0106

1(IF9

06AI;)

*

GET REST OF BLOCK

DATA RTAPE
EOU $

*

00FA

=

loD00

12112lF2 '

00F8

R6

(1

*:t:

00F0

1173

*

06{·po

0;:'~89

1177

*
**

(10DE
00E0

0 roF2
00F4
00F6

5-1

*

INC
*
0121CE' CSR140 EQU

0586

0(:)E4
00E6
130E8
012lEA
00EC
00EE

R6,R8
@PUTCHR

,

11154

1165
1166

PAGE 0045

945353-9901**

4-ELSE CALL RC\lCHR (CHAR, WA 1T)I;

R9
@RCVCHR
$

3-ENO;
(SP100
$

R9,CR)/(LBYTE
CSR600

CLR
BL

R9
@RCVCHR

JMP

CSR500

2-00 WHILE CHAR . I'-IE . CR;
IF CHAR = CR
3-CALL RCVCHR (CHAR, t.JA IT) ;

0412~

*
*

3-ENDi

CASSETTE
1191
1192
1193
1194·
1195
1196

- READ ASC I I
0103' CSR600 EQU

0108
0l0A

CA36
0008

(l10C

0452

:*
*
#:

PAGE

945353-9901**

(~046

$

1>101J

2-CHARCOUNT
R6, @CCOUNT CFU 0)

B

*R2

2-RETUR~~

-

I

i

C;

;

2-END CSRASC

it"'

"~,,'

c

CASSETTE - WRITE ASCII

* TITLE:
* REVISION:
*::t:

1 El~3

(

1200
12CH

1202
1203

t

121214
12(j5

120;7
1208

1209
1210
1211
1212

1216
1217
1218

1219

(

010E
0110
0112
0114
0116
0118

*

(IIHl

0BD9

011C

18(14

011E

FAA0

0120

005('

~1122

0~102

0124

045;::

SI~C

R9, RCDRDY

*

,JOC

CIAJ005

t

3-UNRECOVERABLE ERROR = 1;
SOCB @UEMASK,@SYSFLG(R10)

2-IF RCDRDY

1226

B

*R2

EQU

!It

BL

@CMND

t

0126' CWOO5

123(j

Of;~10

0128

0396 "

012f~

001'3

2:-])0

:t:

1232

,-, ..':,.J._,")
1 c.

1

1234
1235
12::36

012C

04C(;

012E

CLUJ
121008

o 13()
0132

r~)?'~87

0134

O~150

0136
(:)138

(1;::07

013A

1202

eLR
NOV

RG
@CCOUNTCRI0),P7

CI

F?7 , ~1r;iJ020
R9,ETBJLBYTE

EQU

$

::\:

13150
0152

0289

C1

2(:10~)

12~:'1

0154

140D

JHE

0156

(~?8':!

C1

LL20
PSi, FF:t:LBYTE

0158
1253
1,::;4

OE:lI:;
~~ 1 SC

,)EO
CI

LL20
R9,ETB::t.LBYTE

1255

(liSE
Gi6E)
0162
~) 1 134

0C00
130(1
(1289
1700
130?

..lEO

LL20

0;289

C1

R'3. LF:t:L.BYTE

0f:iOO
1503

,JGT

0c.~89

CI

LL1S
R9 BELtl_BYTE

0;;'00
1.401
016E' LL.18
1 ~:10J
01;;"(')' LL.20

JHE
EQU
Jt.1P
EQU

1257

0H313

1. c~ ~:::; 8

0168
Ol6A
1;:116C

12:)~1

L?C;O

12G1
12(:;2
1263
1264
1265

0lGE
0170
01.72
(JP4

06AO
O]DA'
000(;)

12G8
12G~3

0176
() 178

12?0

12)1
12?2
1 ;2:?3
L~?4

1277
1273
1279
1230

BL

LL20
$

Cl,J030
$

4-THEN CALL SNDCHR (CHAR, 0) ;
@SHDCHR

DATA 0
3-EHD;

o 17~)
(Jl?C
EJ17E
0180
121182
0184

EGlU

$

I tK

U;El
Ell?I;' Cl")100

Jt·1P
EG!U

RG
CI..<.I010
$

0208
0015
6:22A
0008

LI

R8,32-11

S

@CCOUNTCR10) IRS

()6AI2)

BL

@DL.YCHR

BL

@01ND

:r

2-CALL DELAY (CCOUHT)

03FC'
-.v

".,

0188
018f:1

06A0
0396'
001D'

0l8e

()45:2

(1186

2-CALL CMND (ADDR (&JTAPEE) ) ;
~JR r TE END OF RECORD SEQUENCE

DATA lJTAPEE

*'

*

2-RETURN;
B

C

(.":",

017f3 ' OJ 030
0586

1275

1276

*'

I

:t:

1266
121~;7

0

3-IF CHAR >= SP .OR. (CHAR >= BEL &.
4-.0R. CHAR :: FF .OR. CHAR -- ETB
R9, SP:t~LB'y'TE
IF CHAR t"OT IN SET

1 f:~S?

1256

PAGE 0048

:*R2
2-Et-W CSLdASC;

,)

* TITLE

1283
1234
1285
1236
1287

(:

PAGE

945353-9901**

CASSETTE - WRITE END.OF.FILE

CSWEOF

C~S5ETTE

*'*

REVISION:

t

AB~~'l'f\'~~'T

- WRITE END 0F

(~(~49

r

~ILc

OR 1,; t lint.

'"
) CALLING SEQUENCE
STANDARD LEVEL ONE ROUTINE

12 ':! 1.
12'32:

'*

**

1(~':n

1294
12':;15
12~3r3

1297
1298

r~

0I:;Ai(1

1302
1304

019C
01 ~3E

OE3AO
(13:36 '

1305
1:306
1307'

01A0

00c'6'

03~313

PL

$

Rl1.R2
@CHGMOD

*

BL

1308
1:309
1310

iHAS

045,::

CASSETTE - WRITE EOF
LEVEL ONE RETURN SAVE
2-CALL CHGMOD (MODRCD);
ASSURE RECORD MODE
2-CALL CMHD (ADDR (WTAPES));

@01~m

'

DATA I,JTAF'ES

*

PL

@CMHD

2-CALL CMND CADDR (EOFSEQ));

DATA EOFSEGl
2-CALL CMND (ADDR (WTAPEE));

:1<

OGAE)

1-PROCEDURE CSWEOF (PARMLIST);

DATA MODPCD

0019'

01A2
01A4
OlAG

1311

0 ",l

CSLdEOF

:;+:

0196
0198
019A

13131

CS~JEOF

COSB

06AO
0]42'
4080

noci

Co

018E'

0190
0192
0194

1299

(

018E

DEF
EOU

BL

@CMHD

()]:Jr3 '

001D'

DATA V.ITAPEE

*
:;f:

c:-RETURr~

B

>l:R2

;

2-nm CSkIEOF;

CASSETTE-REWIND TO LOAD POINT 945353-9901**

* TITLE;

1314
1315

:+::
:+::

1320
1321

1323

:t:

1324
1325

0000
0000

0000
C08B

131302
13004

,Q16A0
0448'

01306

0GA0
13396'
1310013

0t30A

Q1Q10C

1337
1338
1339

06AQI

t3t31C
0131E

17F6

0020
131322
0024

06A0
0342'
813413

0026
131328
0e2A

06A13
13396'
00139

0018
(H211 A

1345

134f3
1347

1348
1349

1350

1351
1352
1353

1354
1355
1356

002C

1357

1358

@RSTNOD

BL

@CNND

CASSETTE - REWIND
2-CALL Rsn10D;
FORCE NODE CHANGE NEXT TIME

DATA RWDSEQ
2- I

CRWD10 EQU

*-

$

e6~\lZl

03813'

3-CALL STTCHR (STATUS);

BL

@STTCHR

NOV

3-1 = BOE (~IBS 010D (DRIVEID, 2) @R8*2(R13),R0
DRIVE ID MODULO 2

AND! R0,1

*
**-

*

AI

R0,BOE

SRC

R9,e

·)HC

CRWD 10

BL

@CHGMOD

DATA

~IODPBI<

BL

@CMND

IF NOT BOE

2-CALL CHGMOD (PRBPTR, DCTPTR, MOD

2-CALL CMND (ADDR (LOADSQ»;

DATA LOADSQ

*
*CRWD20

SHIFT COUNT TO BOE FOR DRIVE
3-END;

EQU

$

BL

@STTCHR

2-1 = 0;
2-DO WHILE I

= 0;

3-CALL STTCHR (STATUS);

:+::

ee2C
002E

= 0;

2-DO WHILE r - 0;

:+::

C02D
131310
02413
0001
0220
t3130B
0B09

0010
0012
01314

01316

1344

BL

0386'

1.340

1343

*
:+::
:+::

1336

1342

DEF CSRWND
DORG 13
CSRWND EQU 'it:
NO\) RILR2

2-CALL CNND (ADDR (RWDSEQ»);

1335

1341

I-PROCEDURE CSRWND (PARNLIST);
2-DECLARE I BIT (1);

;t:
;t:

0008
1334

ABSTRACT:

*

1322

1332
1333

o

THE INDICATED CASSETTE IS REWOUND AND THEN
LOADED.
*- CALLING SEQUENCE:
:t:
STANDARD LEVEL ONE LINKAGE.

1319

1327
13;28
1329
1330
1331

CSRWND
CASSETTE - REWIND TO LOAD POINT

**- REVISION:
ORIGINAL
*-

1316
1317
1318

1326

PAGE 0050

o

PAGE 0051

CASSETTE-REWIND TO LOAD POINT 945353-9901**

('

(-

c

1359
1360
1361
1362
1363
1364
1365
1366
1367

3-1 =

0030

0B99

*

SRC

R9.PBKRDY

0032

17FC

*

JNC

CRWD20

0452

*
*

B

*R2

0034

3-END;
2-RETURN;

:t

01AA

PBKRD'l~

RORG

2-END CSRliJND;

CASSETTE - UNLOAD

* TITLE:

1370
1371
1372
1373

1374

*
**

1378

1379

1380
1381
13131313

138f3
138?
1:388
1389

1390

13000
00013

CQl8B

1313132
12112104

G6AG
104-48 I

0006
0008
1210 0 I~l

06Ae
0396'
001313

13:31

eQlOC i

1398

F~1LR2

BL

@RSTIYIOD

BL

@cwm

GG0C
OI2leE

06A0

130113
0E'12
13014
1()12116

CI212D
00113
13240
0001

038r;"

CU~~L

UNLOAD

2-CALI_ 01ND ( ~~IDDI~ (RI,JDSEQ) ) ;

*

= 13;

$

3-CALL STTCHR (STATUS);
BL

@STTCHR

MOV

@R8*2(R13),R0

:3-1 :: BOE U!JBS 010D (DRIVEID,

2) -

DRIVE ID MODULO 2

ANDI RO,l
BOE

0220

AI

R(~,

001C
OGlE

1300B
OBe9
l7F6

SRC
JtK

R9,0
CUNL10

1404

01320

0452

B

*R2

1405
14elf.;

01AA

1403

--

2-CALL RSH'IOD;
FORCE IYIODE CHANGE

2-DO WHILE I
113 EQU

0018

14013
1401

CASSETTE

2- I = 0;

C;)01 A

1399

i-PROCEDURE CSUNLD (PARMLIST);
2-DECLARE r BIT (1);

DATA RI,JDSEQ

.:t

13:~i4·

1396
1397

MO\l

*l

1392
1393
1395

DEF CSUNL.D
DORG eJ
CSUNLD EOU $

*
*

IS REWOUND TO CLEAR

STANDARD LEVEL ONE SEQUENCE.

*

1384
138r5

CSUNLD

CASSETTE - UNLOAD
*** REVISION: ORIGINAL
* ABSTRACT: THE INDICATED CASSETTE
*
LEADER.
** CALLING SEQUENCE:

·1375
137f.;
1377

1382
1383

PAGE 0052

945353-9901**

*
*

SHIFT COUNT TO BOE FOR DR[VE

2-RETUR~~

.:t

;

2-END CSUNLD;

RORG

c

* TITLE:

1409
1410
1411
1412
1413
1414
1415

)I:
:1(

CHARACTERS ARE TRANSFERRED FROM THE 733ASR
kEYBOARD TO THE USER'S BUFFER UNTIL:
- THE DESIRED NUMBER OF CHARACTERS HAVE
:t
BEEN TRANSFERRED,
- A CARRIAGE RETURN (END OF RECORD) IS
DETECTED, OR
- A DC3 IS THE FIRST CHARACTER DETECTED
:r
(END OF FILE CONDITION).
CALLING SEQUENCE:
STANDARD LEVEL ONE SEQUENCE.

*
*
**
*
*
*
**
*
*

1418
1419

1420
142:1
1422

1423

01AA
01AC

04U3

01AE
01B0
01B2
(HB4

1440
1441
1442

1443
1444

01B6
0183
elBA
01BC
01BE

0iAE' LR0i0
D06A
0002
OBEl
1839
0001 EOF2UE
OB 1.1

EQU $
MOVB @SYSFLGCR10),Ri

LR028

D06A
e(~03

elC8
(llCA
elCC
01CE

e4C9
e6Ae
0412'

*

*

113133

SRC
,JOC
EQU
SHC

(llD0
01D2
~HD4

01D0' LR013
0709
06A0
0412'
01D6' LRe14

ISOLATE SYSTEM FLAGS
IF EI'm. OF . FILE
IF UNRECOVERABLE ERROR
IF I >= BUFFER LENGTH

3-IF NOWAITFLAG=0 THEN
MOVB @USEFLG(R10),Rl
SRC
·JOC

Rl,NWFLG
LR01:3

CLR
BL

R9
@RCVCHR

JMP

LR014

EGIU $
SETO R9
@RCVCHR
BL
EQU

4-CALL RCVCHR(CHAR,WAIT);
WAIT FOR CHARACTER.

3-ELSE CALL RCVCHRCCHAR,NOWAIT);

:+:

1454

SAVE RETURN-LEVEL ONE
(L

2-DO WHILE EOFFLAG = 0 & I < BUFFER
2& UNRECOVERABLEERROR = 0;

JHE

0BCl
1804

1457

R6

0006
1434

~HC2

1455
1456

CLR

r =

·Joe

elC4
e1C6

1453

2-

C

1447

1452

~~11,R2

SAS6

G1Ce

1451

$

18:3?

1446

1450

LGRASC

Rl.EOFLG
LRe28
UE-EOFLG
Rl,EOF2UE
LR028
R6,@BFLNTH(R10)

1445

1448
1449

*
t*
*

1436

1-PROCEDURE lGRASC (PARMLIST);
2-DECLARE I FIXED (16);
2-DECLARE CHAR BIT (B);

DEF
0iAA' LGRASC EQU
C0BB
MOV

1435

1438
:1439

ORIGINAL

)I:

1417

1437

LGRA5C
LOG - READ ASCII

REVISION:

** ABSTRACT:

1416

1424
1425
14;26
1427
1428
1429
1430
1431
1432
1433
1434

PAGE 0053

945353-9901**

LOG - READ ASCII

$

LOG - READ ASCI I
1458
1459

~HD6

1460
1461

01.D8
lHDA
'2l1DC

*

D1216A
01303

3-IF NOLdA r TF'LAG:::1
MOVB @USEFLG( RH))

opel

SRC

1703

"mc

OiDE
01EO

C;24~3

t~O\./

1601

')rlE

1464
1465
1466

0:l.E2

0452
01E4' LR01?

B

Rl, NL,JFLG
LR01?
F:9,R9
LR017
tR2

EOU

:It.

14(37'

01E4
01E6

C1

R9,BS:tLBYTE

1468
1469

01[8

1:302

OLEA

04E0

.JEQ
CLR

LF:01S
@BSFLG

EOU

$

1462:

1463

01l::C

1471
1472
1473
1474
14?~i

1476
1477
1473
1479
1480
1481

*

028~3

'a800

oooc)

OlEE' LR018

147'0

0239

OH'O
OlF'2

2001,)

01 FA

0:::::::::::'1

\)1 Fr3

?F00
14 12)3

('IF8

01FA
0iFC
01FE

CI

110B

*-

06AO

BL

@SNDCHR

(:;'::06

I~OV

RG,R:3

13202
0:::04-

OEl~IO

BL

@PUTCHR

()431~

~);~06

0586

INC

R6

() ;2 108

1 (158

Jr~P

LR200

,

~w

CHAR RETURNED

CHf~R

~4E

:::

0;

('

DEL THEN DO

IF CHAF,: .- DEL

4-CALL Sr,IDCHR (CHpiR, DELAY3) ;
ECHO CHM,:ACTER

149:3
1494

()210
13:::12
(1;?14

CC~C)13

4-CALL PUTCHR (CHf:iF( , I ) ;
PLACE r t'-1 U5E-:RS BUFFER

=

+

02014 '
:LEi0F

14~:l5
(~;::16

C16AO

0218

043A'

0;21.A

05813

O;21C

1001

1498

O;?lE'

*LR020
;¥*

3-ELSE IF CHAR
EQU
",IHE

*
*LR023

LR030
!::-THn~

R1,CHRMOD
LFW23

BL

Ri;, R8
@PUTCHR

INC

R6

,JMF'

L~:026

EOI..!

$

1"<10\1

= DEL

THEN DO;

rF CHAP .NE. DEL
I 0 -. 1
DO;
IF NOT CHAR~~CTER MODE

CHF~RACTER

MO\lB @USEFLG(R10) , F: 1
·J~jC

*-

:It.

4-IF

SI~C

*

C

\,,1

j. ;

T

~)2()E

THEN BSFLAG

BS

4-END;

:t.

020C

0

4

4-I

:t

DOGA
012103
ODDl
1705

1500
1501
1502
1503

LR0~:Ej

RE

RETUF.:N

DEL*LBYTE

0;~OO

020A

14~39

..JHE

R'~l,

:t.

148(3
1437
1488
1,+89
1490
1491
1492

1496
1497

Lf~020

DATA DELAY'3

O(l03

14:3414S~;

IF

3-IF CH(ll;;: >= SP t. CHAR
F.: 9 .' SP~i<

(I

-

1. 0) ;

4-CALL CMND (ADDR (ECOBS) ;
DATA ECOBS

*

4-IF BSFLAG EQ 0 THEN DOi
MOV

@BSFLG,R8

JNE

LR038
5- BSFLAG

*

SETO @BSFLG

*

LI

R9,LFtLBYTE

BL

@SNDCHR

5-CALL

DATA DELAY'3

*LR038

5-END
EQU

$

= -1;

s~mCHR

(LF,DELA'/3);
4

LOG

-

1550
1551
1552
1553
1554
1555
1556
1557
1558
1559
1560
1561
1562:
156:3
1564
1565
1566
1567
1568
1569
1570
1571
157,:::
1573
1574
1575
1576
1577
15?8
1S79
1580
1581

READ ASC I I
l02C

0262
13264
0;266

:t:
0262' LR040
0289
1391313
160A

0268
02GA
026C

C2e6
06RO
043A'

0;26E
(1:=:70
0;272
OC~74
0~~76

0209
2000
0,SR0
0JDA'
0(103

0278

0586

QI2?A

101F

*

158~

1586
1587
1588
1589
1590
1591
1592
1593

tSSM

*

*

JMP

LR200

EQU
CI

$

R9,HT*LB'r'TE

JNE

LR050

MO\l
BL

RG,R8
@PUTCHR

LI

R9,SP;f::LBYTE

BL

@SNDCHR

0

3-ELSE IF CHAR

= HT

THEN DO;

IF CHAR .NE. HT
4-CALL PUTCHR ( CH~,R,
HT H~ 13UFFE~7.

I);

4-CALL SNDCHR ( 1 1 DELAY3) ;
SF' TO PRINTER
I

DATA DELAY3
4-1

*

=I

+

1;

INC

R6

JMP

LR2e0

EQU
C1

$

R9,DC3:t:L13YTE

IF CHAf::: .NE. DC3

JNE
MO\J

LR060
R6,R6
LR060

IF

4-ENDi

*

*
:t:
027C' LR050
O289

3-ELSE IF CHAR

= DC3

& I

=0

130121

1606
C186
1604

·Ji'lE

THEN EO

CI
.'

r ; t'4E . 0

)I:

(1286
0288
028A
028C

SOCB @EFMASK.@S'r'SFLG(RI0)

FM-l0
0QIDA'
0002
112)16

,.H~P

LR200

EOU
CI

$

R9,CR:t:LB1'TE

JNE

LR070

BL

@SNDCHR

*

3-ELSE IF CHAR

)I:

"-1,298

028E' LR060
0289
0D00
16(16
:t:
06A0
03D,~ ,
(101B

0,'29A
029C

CA86
0008

028E
02~30

1582
1583
1584

4-END;

*

13260

027C
027E
O,:80
0282
0284

PAGE 0056

945353-9901**

0292
0294
0296

029E

0452

IF

CH~1R

4-CALL SNDCHR
DATA DL.1'27
4-CHARCOUNT
R6,@CCOUNT(R10)

*
**

B

:t:R2

*

EQU

$

CT

f~9.,

~10\l

4-PETUR~~

=

THEN DOi

.NE. CR
(CHAF~

, DL 1'27) ;

t;

;

4-END;

:t:

O;~t\()

= CR

3-ELSE IF CHAR

02A0' LR070
('PStl

-----_. . _--_. __ _-_.. _..

LF:t LBYTE

~~~

= LF

IF CHf'lR .NE. LF

0

-------,Iji,i, ,"-. _ .

LOG

-

REI~D
0;:~A2

(:

1595
1596

()2A6

1598
1599
1600
1601
16(l2
1603

02AA
13c:AC

~)2A8

1604
1605
16~)6

1607
1(12)8
1609
1610
1611
1612
1613
1614
1615
1616

(

O:2A4

15~37

1617
1618
1619

945353-9901**

ASC I 1
0A00
1604
0GA0
03DA'

*

JNE

LR080

BL

@:5:NDCHR

1 (106

*

02B4
02B6
02B8

02f1E' LR080
0289
1 B(~0
1603
:+:
FAA0

3-ELSE IF CHAF::
EQU
Cl

$

·JNE

LR090

R9.ESC:+:LBYTE

IF CHAM: '. NE. ESC

4-THEI'>I UNRECOVERABLEERROR
SOCB @UEMASK,@SYSFLG(R10)
JMP

LR200

EQU

$

EQU

$

B

@LR010

EQU

$

3-END;

:f

02BA' LR20G
0460
01AE'

*

02C2

ESC

0002
G2BA' LR090

02BE
02C0

::

13120'

**

02BA
02BC

4-THEN CALL SNDCHR (CHAR, DELAY3)

DATA DELAY3
JIvIP LR200

0Q,03

*

02AE
02B0
02B2

PPiGE 0057

02BE' LR900
*
CA86
0008
:+:
0452
:+:

MOV

END.OF.LOOP
2-CHARCOUI'-IT :: [ ;
R6,@CCOUNTCR10)

B

*R2

2-RETURr4 ;
2-END l_GRASC;

::

L

LOG - WRITE ASCII

* TITLE:

1622

1623
1624
1625
1626

*»:: REVISION:

C·

LGhJA:SC
LOG - WRITE ASCII

i ... J

** ABSTRACT: ORIGINAL
CHARACTER'S ARE TRANSFERRED FROM THE USER'S
*
:t:
BUFFER TO THE 733 ASR PRINTER UNTIL:
- THE DESIRED NUMBER OF CHARACTERS HAVE
:t*
BEEN TRANSFERRED, OR
::r
- UNTIL ALL REMAINING CHARACTERS IN THE
*:t: CALLING SEQUENCE:BUFFER ARE EOUAL TO SPACES.
STANDARD LEVEL ONE SEQUENCE.
*

1627
1. ~;28

1629

163(j
1631

1632
1 ~;:33
18:34
1635

)1:::

i-PROCEDURE LGWASC (PARMLIST);

1f336

:U337
1638
163'3

:t:

2-DECU1RE

:*

2-DECLARE CHAR BIT (8);
2-DECLARE FOUND FIXED (lS);

*

1640
H:;41
U342
1643

02C4

1644

O;?C6
02C8

DEF
02C4' LGWASC EOU
t,10\/
COSB

*
*

C1AA
0'308

1645

1646

02CA

1647
1f;48

()c:CC

1649
1650
1651
1652

PAGE 0058

945353-9901**

1601
0452

02CE

LL8
:t:

0606

FIXED

(16);

LGI.,JASC
Rl1,R2

SAVE RETURN - LEVEL ONE

t',10 V

@CCOUNTCR10),PS

JHE

LL8
*R2

CHF'IRCOU~n;

2-IF I

EOU

,J)

$

2- [ :::

B

02CE'

CI,

=0

THEN RETURN;
(1{ "

$

2- I ::: I -

l",t~",,/

1;

DEC

R6

CLR
EOU

R7
$

It~ITIALIZE

R7,R6

IF

2-DO

:t:

.)

FROM

'21

TO I BY

1;

02D0

04C7
02D2'

16'34

02D2

1655

0;2[14

81.87
1 ~j30

1657

0;2:06

070~3

16'38

02D8

06f~0

02DA

0412'

02DC
0c:DE
OZ::EO

028~3

CI

3-IF CHAR::: ESC THEN DO;
R9, ESCtLBYTE

1 Bori)
11304

-J~)E

Ud035

02E2
02E4

FI~~A0

02BI3

02E6

0(~0;?'

0;2E8

04~;2

16'33

*

1659
1661

1662
1663

*

02EI~

1668
16(-3'3

tte;:" . \

.)

>

3-CALL RCVCHR (CHAR, rWt.JAIT:r ;

4-UHRECOVERABLEERROR
SOCB @UEMASK,@SYSFLG(R10)

= 1;

I

16136

166?

LI,,19\~O

SETO W3
@PCVC:HR
BL

:t:

1664

1665

c

JGT

165f;

U3 1=; 0

U')030

J

,

*
*LW035

4-RETURN;
B

:tR2

EOU

$

4-0m;

3-CALL GETCHR (CHAR.

:t:

0;?EA

CC'0":'

r~OV

R? , R8

\.1,'1.":

\) t:; f'l (l

F l,

~ii

GET t: HR

J);

c

-------

·----

LOG

-

1671
1672

(

1673
1674
1675
1676
1677
1678
16731
168(1
1681
1682
lf383
1684
1685
1686
1687
1688
1689
1690
16:31

(

1692
1E;93
1694
1695
1696

WRITE ASC I I
02EE

042C'

02F0
02F2
02F4
02F6
02F8

0289
0900
1602

02FA
02FC
02FE
0:300
0302

1699
1700
1701
1?02
1703
1704
1705
17(16
1707
1708
1709
1710
1711
1712
1713

C

R9.HT*LBYTE

JNE

2(100
02FA' LL12

EQU

$

C1

R9,SP*LBYTE

JHE

LL14
R9,BEL:r.LBYTE

*

0289
2~)(10

028~3

030f~

0A00
1503

Cl

030(' I_L14

*

JLT
CI

U •.1040

JGT
EOU

Ud040

BL

@SNDCHR

0003

DATA DELAY;:::

*
0312' UJ040
0289
0N:)!)

EQU
CI

16 (:1:3

J~~E

06A0
0:]Dr4 '

BL

(:l:31 C

O()lB

3-IF CHAR >== SP .OR. (CHAR
IF CHAR >= SP
IF CHAR

>==

< BEL .OR. CHAR

BEL &.

> LF

4-THEN CALL SNDCHP (CHAR, DELAY3)

031.0

,

SPi

$

06A0
r2l3D~~

--

R9,LF:r.LBYTE

030C
030E

0312
(:l:314
031E;
0318
031.A

3-IF CHAR == HT THEN CHAR

LL12
R9,SP*LBYTE

~n06

3-IF CHAR

= CR

THEN CALL SNDCHR (CHA

IF

CHAF,~

. NE: . CR

$
F~9,

i

CR*LBYTE

UJ045
@Sl'-IDCHR

U~LL

SNDCHR (CHAR, DL'r'27)

DATA DLY27
)I':

031E' LW045

EQU

$

CI

R9,FF:r.LBYTE

)I':

031E
0'''';:>';:>
..... 1;....1;...

0289
0e0l2)
1607

.JNE

LW050

0324

02~)3

LI

R~:

(B26

0100:3
EGIU

$

BL

@OH~D

(:)320

1697
1693

CI
LI

~n04

(neg

*

0,~09

14-06
0;::39
07(10
1106

PAGE 0059

945353-9901**(

0328 '

LL16

J

06A0
0396'
(12)28'

4-CALL

0::3:30

0603
1 ~;FE:

0332
0:334

13332' LW050
('1587
10CE

C~1ND

( f~DDR (ECOFF))

4--END;
DEC
,.JGT

R3
LL16

EQU

$

II'K

JMP

R7
UJ030

EQU

$

B

:tR2

3-END;

)I':

)I':
)I':

13336

FF THE:.N DO K FROlrl 1 TO 8
.NE:.. FF

DATA ECOFF
)I':

03;~E

==

CH~iR

B

)I:

0328
032A
032C

3-IF CHAR
IF

0336' LW900
0452

,...I

2-RETURNi

== ,...I

+ 1i

i

LOG - WRITE ASCII
1714

945353-9901**

*

PAGE 0060

2-END LGWASC;

C'
.'

c

SINGLE CHAR INPUT FOR MONITOR 945353-9901**

(

**::t: TITLE:
RE'I./ISION:

1717
1718
1719
172()
1721
1722
17 :>-:l
~

~

,_.1

1726
172?

1728
17:29
1730
1731
1732
,':1.,.:1

1737
17:38
1 ?]~=i
1740

1741
1.742

1743
1744

1745

t
1:

NON-STAND~RD

*
**
*
1:
*
*
*

1. . , ...,-,
17J4
1735
17JG
/

ORIGINAL

*
*
:t
*
*
*

1724

1725

0338
033A
033C

13709
(::320
0000'

033E
0340

0460

LEVel ONE

SU~RuUTINE.

THIS SUBROUTINE PROVDES SINGLE CHARACTER
INPUT FOR THE MONITOR.
IF A CHARACTER IS
F'RESENT Ot~ THE CF':U i rH[f~F:?-)CE, I TIS RETUF~NED
IN R9, LEFT JUSTIFIED WITH ZERO FILL.
IF NO
CHARACTER IS PRESENT ON THE INTERFACE, A
ZERO IS RETURNED IN R9.
CALLING SEQUENCE:
BL
@MONCHR
UPON RETURN CHARACTER IS IN R9
R12 DESTROYED
1- PROCEDURE MONITORCHAR (CHAR);
2-DECLARE CHAR CHARACTER (1);

DEF
0338' t,1ONCHR EQU
1:

(~061

M0NCHR
SINGLE CHARACTER INPUT FOR MONITOR

*

* ABSTRACT:

PAGE

~1Ot--KHR

2-

$

2--CALl_ RC'v'CHR (CH~1R, NO['JA IT) ;
SETa R9
SET NO WAIT FLAG
MOV @DC7331+DCTCRU,R12
B

@RC\/CHR

041.'2'

*
",.
,.~

2-RETF.~H ;
2-END MONITORCHAR;

CHANGE RECORD/PLAYBACK MODE

* TITLE:
** REVISION:
t
* ABSTRACT:
*:**

1748
1749
1750
1n::1
171::;2

1753
1754
1755
1756

:f

1757
1.758
175'.:)

*

171:;0

)I:

17f; 1
17f;2

:t

1?63

:*

:t

17C;E;

*
*
*
:t

17~38

1769

0346

C3AD

0:348

N110

034~~

0;:~4E

034C

()(lO1

034E

1777

1778
1779
1780

1731
1782
1784

0352
0354

(lGD
000C
A14E
53E5

1785

03r:.;r;
0353

00El2
1601

035A

0453

0350
1783

1786
178?
1788
1789

1 ?~3Z~:

*
*

035(
035E

614E
496(2)

0360

01;)04 '

~10V

$

tRll+,R15
Rl1,R3

FETCH MODE INDICATOR
LEVEL TWO RETURN
2-INUSE ::: t,10D (UHInw. 2);
2-0THER :::ABS (INUSE-l);
@R8:t2(R13),R14
UNIT NUMBER

AHDI R14.1

*
**
*:t
MOV

~lODULO

2

2-IF (MODE::: MODPBK &
2CASSETTECONTROL (INUSEl.PLAY
2(MODE = MODReD &
2CASSETTECONTROL (INUSE) .REeo
2THEN RETURN;
@RG*2(R13).R5
DCT ADDRESS

r~
R14,F':5
52CB @CSTCNT(RS),R15

*
**

035C' (M010

1790

1791

i-PROCEDURE CHGMOD (PRBPTR. DCTPTR
2-DECLARE triODE BIT (16);
2-/* NOTE PRBPTR AND DCTPTR GLOBAL
2-'
DEF I H[D t/
2-DECLARE ([NUSE. OTHER) FIXED;

0342' CHGMOD EOU
t,·jO V
C3FB
MO'
\)'
UlCP

17?3

1776

BL
@CHGtriOD
DATA (DESIRED MODE INDICATOR)

0342
0344

1??0

1774
1775

ORIGIHAL

*

17~)?

1771
17?2

CHG~1OD

CHANGE RECORD/PLAYBACK MODE

THIS ROUTINE IS CALLED BY THOSE CASSETTE
FUNCTIONS WHICH MUST INSURE PROPER PLAYBACK/
RECORD MODE. THE DEVICE CONTROL TABLE
CONTAINS CURRENT MODE.
IF A CHANGE OF MODE
IS REQUIRED. THEN THE APPROPRIATE COMMAND [S
ISSUED TO THE 733ASR.
CALLING SEQUENCE:
LEVEL TWO ROUTINE.

:*

17134
1765

PAGE 0062

945353-9901**

Jt--iE

Oh)10

IF PLAYBACK/RECORD BIT
~WT Ot,~ I H DeT

B

2-CASSETTECONTROL (INUSE) ::: 0;
2-CASSETTECONTROL (OTHER) - 0;
EQU

$

SZC

R14.R5
@MODBTS.@CSTCNT(RS)

s

OO(~?

1?93

1794
1,1:95
r ,>I';~"

0:]1;;;4

1';04F

PI5.Pi

2-IF MODE = MODPBK THEN DO;
4-CASSETTECONTPOL (INUSE) ,PLAYBACK

'·.·
C
J

CHANGE RECORD/PLAYBACK MODE
179E:;

1798

**
:t

17~39

:t

17:37

(

18081

1801
1802:
1803
1804
181()5
1806

*

1:
:t

:t
0366
0368
036A

C38E
1:::101
0t;CF

036C
036E
0:370

E':i4F
01()132

r()J72

18~~/'

1808

1809

1810
181 1
1812

0:376

$

0c~81

CI

Pl,

4080
1604

Ji'lE

01030

BL

@C~1HD

1

CM0Z0

*

0:373

0GAO
0]'36'

1813

OJ7A

(:If)0G'

1814

(137C

1816

C1]7E

1003
03?E' 01030
06(10
03913'
00(iD'
:t
0:384 , CM040
04-5:3

unr::;

0380

1817
1818

0:382

1319

1320
1821
18:::2

0384

R14,R14

JEG)
0.1020
SkiPS R1S

EOU
SOC

03~;C

0374

MOV

PAGE OO!;3

945353-9901**

4-CASSETTECONTROL (OTHER).RECORD 4-CALL CMND (ADDR (PMODE));
4-END;
3-ELSE DO;
4-CASSETTECONTROL (INUS[) .RECORD =
4-CASSETTECONTROL (OTHER) .PLAYBACK
4-CALL (MND (ADDR (RMODE)),
4-EHD;
IF RIGHT CASSETTE. SWAP
BYTES IN MODE MASK

R1S,@CSTCNT(RS)

SET MODE BITS FOR BOTH
IF NOT RECORD MODE

~10DRCD

SEt-H) PECORD MODE

DATA RI,WDE
.) riJ F'
01040

EOU
BL

$

DATA

F'~ODE

EQU

$

B

:tP:3

SEND PLAYBACK

@CHr·~D

2-RETURN;
RETURN

::t::

*

2-END

CHG~1OD;

~ODE

GET STATUS CHARACTER

945353-9901:1<:1<

PAGE 0064

1825
1826
18;27

1828
1829
1830
18::::1
183~?

1833
1834
1835
13:36
1837
1838
18:3:3
1840
1841
1842
1843
1844
1845
1846
184?
1848
1849
1850
1851
1852:

0386

EQU
NOV'

11:

BL

@CNND

P1t, R3

:k

0388
038A
038C

06A0
0396'
002e'

038E

04C9

~r390
~)392

06A0
0412'

03:34

0453

DATA STTSEO

*
*
;r:

CLR
BL

R9

B

*R3

2-CALL RCVCHR (STATUSCHAR. WAIT);
SET WAIT INDICATOR

@RC\/CHR
2-RETURt~

;

2-END STTCHR;

c

SEND COMMAND SEQUENCE

iSIS?

1868
18(39
1870
1871
1872
1873
1874
1875
1876

*

1877

0396

*
*
*
*CMND

0396'
C10B

*

1890
1891
1892
1893
1894
1895
1896
1897
1898
1899
1900

c

MOV

:tR4+.R14

039A

04C9
CLR
039C' CMND10 EQIJ

039C

D27E

R9
$

0289
FF00
131A

Cl

3-IF BYTE
R9.ENDGRP*LBYTE

JEQ

CMND90

Cl

3-IF BYTE
R9.DLYGRP*LEYTE

JNE

CMND20

:t
03A4
03A6
03A8

0289
FE00
1605

**

03AA
03AC
03AE

D23E
0~J88

06A0
03FC'
c-

*

3-BYTE = COMMANDBYTE;
3-BYTEPTR - BYTEPTR + 1;

MOVB *R14+.R9

:t
039E
03A0
03A2

LEVEL TWO RETURN SAVE
2-BYTEPTR = COMNDPTR'
2-DO FOREVER;

*

*

Rll.R4

:t

03B~l

1905

$

C3B4

1901

1902
:1903
19(14

EQU
MOV

0398

1888
188~3

PAGE 0065

* TITLE:
CMND
*
SEND COMMAND SEQUENCE
)I: REVISION:
)I:
ORIGINAL
)j( ABSTRACT:
*
A SERIES OF CHARACTERS IS TRANSFERRED TO THE
*
733ASR UNTIL THE END GROUP CHARACTER IS
)I:
DETECTED. THIS SERIES OF CHARACTERS BEGINS
*
AT THE ADDRESS PASSED BY THE CALLER AND CONSIST
*
OF THREE TYPES OF ENTRIES:
:t
1. A CHARACTER TO BE SEND WITHOUT CHANGE.
:t
HIGH ORDER EIT = 1 ==> MOD EY DRIVE ID
)j(
2. DELAY GROUP INDICATOR. BYTE = )FE.
:t
NEXT BYTE IS COUNT OF DELAY CHARACTERS
:t
TO ISSUE.
*
3. END GROUP CHARACTER. BYTE = >FF.
CALLING SEQUENCE:
:t
LEVEL THREE ROUTINE
:t
BL
@CMND
*
DATA (ADDR OF COMMAND SEQUENCE)
:t
RI0 - PRB ADDRESS
:t
R8. R9 RESERVED
:t
1-PROCEDURE CMND (CMNDPTR. DRIVEID
2-DECLARE (CMNDPTR. BYTEPTR) POINT
2-DECLARE COMMANDBYTE FIXED (8)
*
2CONTROL (BYTEPTR);
:t
2-DECLARE DRIVE-ID FIXED (8);
2-DECLARE BYTE FIXED;

1855
1856
1857
1858
1859
1860
1861
1862
1863
1864
1865
1866

1878
1879
1880
1881
1882
1883
1884
1885
1886
1887

945353-9901**

MOVE *R14+,R8
SRL. RS/8
BL
@DL 'r,(HR

= ENDGROUP

THEN EXIT DO;

= DELAY GROUP

THEN DO;

5-CALL DLYCHR (COMMANDBYTE);
5-BYTEPTR = BYTEPTR + 1;

5-END;

SEND COMMAND SEQUENCE
1906
1907
1908
1909
19113
·1911
1912
1913
1914
1915
1916
1917
1918
1919
19213
1921
1922
1923
1924
1925
1926
1927
1928
1929
1930
. 1931
1932
1933
1934
1935
1936
1937
1938
1939

03B2

JMP

1011

*
*

03B4' CMND20 EQU
03B4
03B6
e3B8

03BA
0:3BC
03BE

C249

15ec
13eB

03C0

C3ED
0010
024F
0001

03C2

1:306

i213C4
03C6
03C8
03CA

i21A19
0999
D3E9
00i21B'
eB8S
B24F

(~3CC

03CE

**
*

03D6

03D8

06A0
03DA'
00130

01ND40
S

0

4-ELSE DO;
·5-IF BYTE < 0
IF BYTE

MOV
JGT
JEQ

R9,R9
CMND3e
CMND30

MOV

556-J
@R8*2(R13),R15

13

/*

THIS IS A COMMAND BYTE
TO BE MODIFIED BY DRIV
MOD (DRIVEID, 2);

THEN

=

>=

AND! R15,1

*
*

6-IF J . ~~E . 10
JEQ

SRC
AB

*

CMND30

7-THEN BYTE
SLA R9,1
SRL R9,9
MOVB @BYTMOD-'l'(R9),R15

*
e3De' CMND30 EQU
03D0
03D2
03D4

PAGE 01366

945353-9901**

BL

*

+ BYTMOD (BYTE) ;

RS.8
R1S,R9
S

5-CALL SNDCHR (BYTE, e) ;

@SNDCHR

0

DATA 0

*
*
03D6' CMND40 EQU
10E2
JMP
*
*
03D8' CMND90 EQU
045,:1B

= BYTE

5-END;
3-END;
S

CMND10
2-RETURN;
$

*R4

2-END CMND;

o

SEND CHARACTER TO 733ASR

* TITLE:
* REVISION:

1942
1943
1944

1945

** ABSTRACT:

1946
1947

**
* CALLING
*"
**
*:t:

1948
1949

1950
1951
19 1;2

1953
1954
1 ~355
1956
1957

:*

*l'

1958

:t

1959
19130

1961

:*

1963

03DA
03DC

19641'365
1966

03DE
03E0

19r32

03DA' SNDCHR EQU
C148

C235
1F0E

*

16(~9

SNDCHR
SEND CHARACTER TO 733 ASR
ORIGINAL,

ONE CHARACTER IS SENT TO THE 733 ASR THROUGH
THE CRU INTERFACE. AFTER WHICH A CALLER
SPECIFIED NUMBER OF DELAY CHARACTERS ARE SENT.
SEOUENCE:
LEVEL FOUR ROUTINE
BL
@SNDCHR
DATA  , R8
@DL,(CHR
BL
:t:
t:
R10 - PRB ADDF:ESS
DOES NOT ~10DIF1" r·~ 14 OR PiS
*

19~38

t
t
:f

1

2002
2003
20 1chl
20(15

:t:

20(lG

2007

t

i-PROCEDURE DL 'y'CHk~ (DELAYCOUHT);

20ldS
2 C:HJ 9

:t

2-- DECU:IPE ( DE[_ (-'I 'j" C(i U~~ T ,
2-

::](

03FC' DLYCHR EOU

2010
2() U.
21,312

2013
2014

03FC
~nFE

C048
1103

,: - I
r~O '\I

JLT

2011:3
2017
2018
2019
2020

0400
0402

0601

04(14

lE01~

2021

040r3

3209

11. 06

2022
20c~]

04()8 .'

*
*
:*
*
DLY020

SBZ

3-RTS

$

SBO

CLRklRQ

JNF'

DLY010

El40A

16FT

202?
2028

04(1C

lD0B

213;29
2(1]0

040[

HlF8

::

0;
:::

(4NYTH I NG i

,('-~'\

I~

klHILE ktRG! -. 0;
4--EHD,

0410

04·1121' DLY090 EGiU
B
0'~5B

bJRO
DL 1"1320
3-CLRWRQ

:::

1;

::;:-END;

:t:

2-RETUR!'-I i

i:

:t:

0;

RTS

EG!U
TB
JNE

20Z~6

2():34

:>

3-])0

1 F('):8

20]~~

[

R1

DI_ Y090
::::-OUTCHR

13408

20:31

t~HILE

$

LDCR R9,8

20242E'25

*

DELAVCOUHT;

::

2-DO

DLY010 EOU
DEC
.JLT

FI>(ED;

RS,R1
DLY090

:t
040(~ 1

r)

$

:t

2015

2(0:3:3

, ,';

:t: ABSTRACT:

1999
2000
2(H~

PAGE 0068

945353-9901**

$

*Rll

2-END DLYCHR;

c

PAGE 0069

RECEIVE CHARACTER FROM ?33ASR 945353-9901**

("

2037
2038
20:::9
2040
2041
21342

FR~1

2045
2(l4G
2047
2048
2049
20!30
2051
2052

~10V

(~

206?

2070
2071
2072

~1

(I).JA

['H1

0412'

$

=.

0412
13414
0416
()418
041A

1F09
1601
lIl()C
0418' RCV010
:t
1F0C
1:304

041C
041E

C249
13FC

*

0420

JNE
SEO
EQU

$

TB
JEO

RRQ
RC\l020

MO\/
JEQ

R9,R9
RCV010

RCV010
CLRRRQ

)\(
)I:

0422

04513

E
:t
0424' RC\l020 EQU

R9

0424
0426

04C9
35C9

2082

0428

lDr:,C

042A

045B

2083

= 0;

,.

4-RETURN;
4-·END;
3-END;

$
2-CHf~R

= INCHAR;

CLR R9
STCR R9,?
:I(

*
*

SSO

CLRRRQ

B

:tR11

(~ ;

3- IF lJA I TFLAG .NE. 0 THEN DO;

:tRll

:t

20?9
2080
2081

2-DO WHILE RRO ..

4-CHAR
CLR

04C3

i

H~G

)\(

2078

c~

f~IND

CHOSn~

f-~~~D

2'~?:::

2085

LF.~FT

1~lf~

f~C\lCHF;:

2074
2075
207f3
2077

2084

!Jf~

[,,1

~)

201;8
20G9

~~S

UPOt~

)j;:

20~~'.3

20G4
2065
2066

[t~E

(,,1

TRANSI~

20S4

2CI~;3

CHAR~1CTF.::R

NTEF'F~~CE

2043
2(244

2055
2056
2057
205:3
2059
20(30
2061
20(;2

** TITLE: RC'v'CHR
733ASP
RECEIVE CHARACTER
REVISION:
**:t: ABSTRACT: ORIGINAL
ONE CHARACTER IS RECEIVED FPOM THE 733ASR
*:t
. rF A
THROUGH THE CPU I
IS NOT PRESnn, THE SUEPOUT I t·IE WILL COt-iDITION*
CHARACTER IS
ALLY' AI T UtH IL SUCH T
*
I TTED .
*t: CALLING SEQUENCE:
t:
LEVEL FIVE ROUTINE.
I T=0/tW WAIT =0
< AI T CODE},R9
**
@RC\lCHR
BL
BYTE OF R9.
D.R9
BL
@PUTCHF~

l:

**
:f
:t
*
:t:

21(~5

2126

:t
043A' PUTCHR EQU

21~::.7

21;28
21;29

21:]2
2133
2134
2135
2136

PUTCHR
PUT CHARACTER INTO BUFFER

* ABSTRACT: ORIGI"IAL
A CHARACTER
*t CALL I SEQUErKE:

2124

2131

TITLE:

:t

21;2:3

213('

PAGE 0071

945353-9901**

'-.1.-

.",

i-PROCEDURE PUTCHR (DISPLACEMENT. CH
2-DECLARE DISPLACEMENT FIXED;
2-DECLARE CHAR BIT (8);
$

2-BUFFER (DISPLACEMENT)
ANDI R9.DEL*LBYTE

043A
(143C
l)43E
0440
0442
0444

0249
7F00
C06A
0004
M)48

A

D449

~10VB

r<~9.

0446

045B

B

*Rl1

MOV

@BFADDRCR10',Rl

R8,Rl
:tRl
2-RETURN;

*

2-EHD PUTCHR;

= CHAR;

RESET CASSETTE RCD/PBK MODE

* TITLE:

2139
2140

* REVISION:
*:* ABSTRACT:
**

2141
2142
2144
2145
2146

c

RSTMOD
RESET CASSETTE RECORD/PLAYBACK MODE
ORIGINAL

THE RECORD/PLAYBACK BITS IN THE DCT
CASSETTE CONTROL FIELDS ARE RESET. THIS
FORCES A FUTURE MODE CHANGE.
r CALLING SEQUENCE:
r
LEVEL FIVE SUBROUTINE
r
BL
@RSTMOD
i-PROCEDURE RSTMOD;

*

;2147

2148
2149

2150
2151

0448'

2152
2153
2154

2155
2156
2158

PAGE 0072

~:

2143

2157

945353-9901**

0448
044A
044C
044E
0450

C06D
000C

*
*
RSTMOD
*
**
*

486(~

$

MOV

2-CASSETTECONTROL (1)
2-CASSETTECONTROL (2)
2-CASSETTECONTROL (1)
2-CASSETTECONTROl (2)
@R6*2(R13),Rl
OCT POINTER

SZC

@MODBTS.@CSTCNT(Rl)

B

*Rl1

.PLAYBACK = 0;
.PLAYBACK
0;
.RECORD - 0;
.RECORD - 0;

=

RESET EITS

00134'
0002
2-RETURN;

2159

2160 0452
2161
2162
0000 ERS

2-

EQU

045B

*

2-END RSTIYIOD;

END

c

960

-

$

(-

~SRID

(-

BCKBLK
BEL
BFADDR
BFLNTH
Bf(SPC
BOE
BS
BSFLG
BYTMOD
CCOUNT
CFOlO
CF020
CHGNOD
CHRNOD
CLRNSF
CLRRRQ
CLRv..lRQ
CM010
CM020
01030
CMDNSf<
CNND
CNHD10
CMND20
CNND30
CMND40
CMND90
CM040
CR

CRIJD 10
CRI.dD20
CSB010
CSB020
CSBACK
CSFWD
CSOPEN
CSR005
CSR010
CS~020

('

CSR100
CSR11e
CSR120

CONCURDANCE
12181214
0877
1032
1141
1212
1328
146S
1549
1641
1707
1884
1988
2128
0691
121793
0871
0770
11:33
i2l623
2104
01:324
1118
(1868
1046
072:0
1343
(1778
0891
06::::1

------.-------- ..

980

0904

0625
Ql986
10(19
17713
0629
0703
Q1702
0701
1790
1807
181.5
1884
1890
1908
1927
1 :333
1:337
1819
0758
1337
1356
1040
1050
1032

121812
0883
1040
1144
1227
1337
1470
1554
1648
1712
1890
2010

0820
0890
112150
1151
1237
1356
1488
1570
1653
1739
1908
2015

0827
0896
1077
1160
1247
1384
1503
1580
1667
1770
1927
2024

- --_.. _-------_..._---

0834
0904
1092
1170
1260
1393
1507
159::::
1675
1790
1933
20::::2

0844
0919
111216
1174
1262
1429
1513
1602
1683
1807
193?
2059

0852
0962
11l. 2
11??

0861
0986
1115
1181

12t")7

J.2:70

143£;
1517
1688
1815
1961

1454
1530
1611
1694
1819
1975

;:~tM:;4

2077

1587

1616

1644

1 f.:',0~j

0868
112109
1127
1191
1295
1457
1535
H;14
1699
t842
1984
2102

2152

1258
2131
144::::

1923
0987

1679

1398
1467
1469

1518
1540

1543

1039

1193

1233

1273

0991
1080
1522

1215

129B

1349

1007
0988

1035
1493
2063
1979
1785
1805
1810
0635
1045
1352
1934
1899
1911
1906
1896
1814
0835
1689
1346
1362
1048
1043
1031

0962

0961

0919
Hl92
1106
1112
1115
112?
1141

0918
1086
1103
1109
1179
1125
1134

II

I
I

2082
2028

I
1096
1389

1168
1509

1912

1919

0899

1116

1229
1537

1276
1701

1301
1812

1304
1816

1307
1845

1333

1126

1139

1166

1183

1244

1581

,

~
.

TEXAS INSTRUMENTS
INCORPORATED

DIGITAL SYSTEMS DIVISION
AUSTIN, TEXAS

DOCUMENT NUMBER

945353~·1

REVISION

SHEET

,...3

CSR130
CSR140
CSR150
CSR160
CSR170
CSR180
CSR500
CSR600
CSRASC
CSRWt~D

CSTCNT
CSUNLD
CS~.IASC
CSI.~IEOF

CU~IL 10
CI~005

CW010
CL~020

CW030
CIAll00
DC2
DC3
DC4
DC?33!
DCD
DCTCRU
DEL
DELAY3
DLE
DLY0l0
DLY020
DLY090
DLY27
DLYCHR
DLYGRP

1144
1151
1'160
1170
1174
1177
1181
1191
1077
1328
0651
1384
1212
1295
1393
1227
1237
1247
1267
1270
0752
0754
0756
0656
0694
0650
0762
0723
0750
2015
2024
2032
0724
2010
0799

DSR
DTR
ECOBS
ECODEL
ECOFF
EFtrlASK
ENDGRP

0695
0699
0890
08913
0877

EOF2UE
EOFLG
EOFSEQ
ESC
ETB
FF
FWDBLK
GETBUF
GETCHR
HT
INCHAR
tNT

1440
0628
0844
0768
0774
0772
0791

0797

2102
0766
0688
0696

10

lOOP
LBYTE

_

~

0619
0722

1132 . 1136
1142
1158
1167
1154

1138

1140

o

1.17~:

1117
1184
1076

1119

1122

1189

1784
1332
1211

1792

1808

2158

12~~4

1401
1221
1235
1245
1261
1239
0828
0845
0337
0655
1742
0839
14?8
08(16
2030
2026
2013
1585
1274
0805
0855
0900
1965

1269

1153

1571

1742
1108
1547
0814
2017
1692
19134
08137
0857
1898

1474
1563
0821

2107
1598
0354

2130
1686
0862

0869

0884

C
1981
0813
0863

0815
0870

0822
0872

0829
0879

0838
0885

0840
0892

0853
0898

1159
0817
0887

1576
0824
0893

0830
0901

0841
1895

0846

0858

0865

0873

1121

1438

1440

1660
1246
1252

1254
1696

0984
1670
1555

1672

1126
-"---

1131
-_.-

1133

1135
..

1137

197~)

1538
1510
1702
0634
0809
0880
1441
0990
1305
1603
1124
1137
0823
0983
1242
1135
0997

0998

1102

1108

TEXAS-TN-STR-iTMENTS
INCORPORATED
DIGITAL SYSTEMS DIVISION
AUSTIN, TEXAS

(}
1116

1124

,

DOCUMENT NUMBER

94 g~S'3-9yo'
_... -

REVISION

---

.

"-"-

---

SHEET

'4
i

(

LF
LGRASC
LGI,JASC
LL12
LL14
LL16
LL18
LL20
LL4
LL8
LOAD
LOADSQ
LR01C
LRC13
LR014
LRC17
LRC18
LR020
LRC23
LRC26
LR028
LR03C
LR035
LRC38
LRC40
LRC50
LRC60
LR07IJ
LR08C
LR090
LR20IJ
LR90IJ
LUNO
UJ030
U,JC35
UJ040
LI,JQ, 4 5
U,J()50
LW90C

0760
1429
1641
1675
1683
1699
1260
1262
1535
1648
0785
0861
1436
1454
1457
1465
14713
1488
15133
11307
1513
1517
1530
154~3

1554
1570
1580
1593
1602:
1. 6(:'9
1611
1614
0f320
1653
1667
1688
1694
1::-;07
1712

LI..·JP
r~~lXCHR

MDID
W:mBTS
~lODPBf<

MODRCD
MONCHR
HLdFLG
OUTCHR
PBKRDY
PL'y'Bf<
PMODE
PUTCHR
R0
R1

UI
~

o

(1726
0781
13711
137139
07i()7
1.739
(H330

1139
1256
1571
1681
0836
1428
1640
1673

1153--1r6i:;
1258 1467
1581 1594
1689 1696
0878 0897

1472
1603
1895
11132

1253

1259

1474
1660
1898
1256

--1246
1518
1672
210:7
1545

1577

1599

1559
1398
1121
1493
210f3

1400
1437
1521
2131

1183-~1244

125~;-

16i'4,

1252
1555
1677

21::::0
1594.

1681

1545

1254
1561
1679

16?8

17135
1257
1251
1533
1646
13864

1255

1353

1612
1448
1452
1461
1468
1473
1494
15(11
1439
1489
1523
1541
1519
15513
1572

1463
1475
1442

1444

1574

1582

1595
1604
1485
1514
0969
170S1
1661
1680
1690
1697
1655
0'393
1234
0783
17~32

0711
13711

1512

1551

1567

13787

0789

1081
1299

1350
1809

1497
1343
1005
1460
2104

1526
1396
1120
1492
21135

1682

0994
1236
0785
2158
11336
1216

17J8

1447

1460

11385
13816
1817
114:7
1341
0980
1447
21312

13613

(11:;98

0:72:1
0789
0812
2128
07:313
0731

1481

1342
13987
1459
201t;

TEXAS INSTRUMENTS
INCORPORATED
DIGITAL SYSTEMS DIVISION
AUSTIN, TEXAS

DOCUMENT NUMBER

1438
1522
21:::2:

~ 4 s: 3S'3-99u ,

1441
1793
2133

REVISION

1446
1809
2157
SHE~T

,5

.\

R10

0740

Rl1

0741

R12
R13
R14
R15

0742
0743
0744
0745

R2

0732

R3
R4
R5

0733
0734
0735

RG

13736

R7

0737

R8

0738

R9

0739

RCDRDY
ReV010
RCV020
RCVCHR

0719
2064
20/7
2059

RDASCI
RECORD
RETBUF
REWIND
RMODE
RRG
RSTMOD
RTAPE
RTS
RWDSEG
Rwe
sNj~0'10
SND015
SND020
SNDCHR

0957
0787

.----o

~

2158
0969
1193
1521
2131
0920
1642
2109
1742
0995
1/'/'5
097t;
1925
0920
1213
1430
0965
0967
0973
1962
0975
115)
1480
1558
1782
0978
1669
1146
1540
2105
0982
1116
1162
1252
1462
1571
1679
1898
2021
2133
1219
2062
2067
1100
1743
0967
0808
1011

0783
0804
0693
2152
0820
071210
0852

..

0995
1233
1587

0996
1273
1606

1039
1437
1616

1088
1443
1644

1118
1446
1663

1120
14!:;9
1986

1159
1492
2104

0963
1771
2135

1033
1772
2160

1078
1843

1213
1885

1296
1962

1329
2033

1385
2075

1430
2084

1341
1776
1771

1400
1783
1784

1775
1791
1793

1782
1804
1806

1916
1804
1808

2157
1887
1916

1893
1917

1902
1923

0924
1225
1464
0996
0969
0990
1963
0976
1157
1483
1565
2157
1039
1708
1241
1558
2132
0987
1124
1166
1254
1462
1581
1681
1910
2069

0963 " 1014
1279 1296
1590 H::18
1698 1704
0970 1885
1003 1782
1989
1038 1041
1193 1232
1496 1499
1573 1573

1033
1310
1642
1772
188?
1783

105~:

1329
1647
1787
1938
1784

1078
1365
1665
:1820

1090
1 ~385
1713
1843

U95
1404
1851

1791

1792

1808

1587

1094
1241
1525
1616

1118
1268
1.528
1.644

1146
1432
1 ~;32
1650

1149
1443
1534
1654

1042

1233

1234

1236

1238

1652

1654

1272
1669

1273
1775

1341
1902

1400
1903

1480
1916

1496
1963

1525
2012

1003
1126
1175
1256
1467
1594
1689
1910
2069

1085
1131
1183
1258
1472
1603
1696
1921
2072

1099
1133
1186
1344
1474
1657
1741
1922
2079

1102
1135
1219
1360
1518
1660
1848
1923
2080

1104
11 :;:7
1244
1397
:1545
1672
1889
1924
2106

1108
1139
1 ,~46
1450
1555
16?4
1893
1925
;:~107

1110
1153
1250
1455
1561
1677
1895
1972
2130

1111

1163

1176

1187

1451

1456

1658

1042
1238
150~)

0

C'
. Jf:

2070
1105
1849
1012

085G

1813
2()6G

09;::2

1331
1169
2019
1390
1001

lOS?
1968
1334
1000
1977
1966
1983
1264

1975
1984
19S8
1961
-

0982
1223
1576

1387

C
1477

1546

1562

1584

1597

1685

-.------~-

TEXAS INSTRUMENTS
INCORPORATED

·.DIGITAL

SYSTEMS

AllOT....

DIVISION·

'l"C'V" Q

------~-

...

DOCUMENT NUMBER

94 S~$~..l)90 I

1691

REVISION

1929
SHEET

,tc>

(

SYSFLG

0764
13795
1842
13383
0621

TIMEF~R

136913

UE

0r;2?

SP
STATUS
STTCHR
STTSEQ

UEFMS~<

UD1ASK:

USEFLG
\JT

WRQ
lJTAPEE
tJTAPES
XtrlT Il'lG

13622
13776
0692

0834
1382:7

o

'UI

1250

1472

1561

1674

1677

1218

1339

1358

1395

1088

1120

1159

1223

1437

11388
1459

1223
1492

1606

1663

1986

1976
1277
12310

2~'25

1576

16136

1663

152:1

1308

13132

~'689

THERE ARE

~

1131
0386
1083
1846
10103
1986
21361
14410
01336
10633
1446

0203

S'YtrlEOLS

TEXAS INSTRUMENTS
INCORPORATED
DIGITAL
SYSTEMS DIVISION
AUSTIN, TEXAS

DOCUMENT NUMBER

945353-990 I

REVISION

SHEET

'1'1

0

~'1'1

c

C,\
'.',

•

A[
APPLICATION

(

,

NEXT ASSV

Ln.

USED ON

REVISIONS
DATE

CIE8C"-'1ON

APPAOVED

7506

:

·

(

...

~
I

,t'

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE_'SE S~ECI~IED
DIMENSIONS ARE IN INCHES
TOLERANCES
ANGLES ~l'
3 ~CI DECIMAl. + .010
2 ~LACE OECIMAU: .02
100NTII"YIMQ NUM._
SHOWN IN PARENTHESES
ONLY

c

~N

/

CM""
ENGA

~OR RI~ERENCE

QA

INTER~RIT DWQ IN
ACCORDANCE WITH
MIL·STO·1OO

APVC

""-A

CONTRNO
OESIGN

/
9O-. . . . . C

~~

OATE /

/

~'l/ITV

/

INCORPORATED

Equ.",.,'

o.n..

a,..

T._

AL, ERRINT, ERROR INTERRUPT PROCESSOR-PX990

/

"

TEXAS INSTRUMENTS

RELEASE "

"'

SIZE

COCE !DENT NO

A

96214

SCALE

•

JREV.

·

DRAWINQNO

945354-9901
SHEET

·

1 of 3

.,...

PAGe: 0112

lee~

*
*
*
•
*
*
•
*

I (UH'

IIUH'

1017

8",,8
""'9
1110
10U

••

le12
el13
1"14

e'le

I,ue

.ruo

0001
000e

0ea0

1021
BIUI

1023

1000
0002

'02"

IU0A
III PI 16

00011"
02E0
.0000
0360
020A

"'H'Je

000!'

"8"
eeee
lea7
1.8'
11"29

1010
1.31
1.;52

••• e

ORIGI~'L

COMPUTER a 990,4S"
A8STRACT. WHEN AN IRROR OCCURI AND J TRAP TO LOCATION
8 OCCURS,TRA~ WILL BE CIR!CTte HERE.IF PROGRA
WHICH CAUSED ERROR IS IN stE, SIr WILL BE
TURNED OFF, PROGRAM WILL BRANCH TOMONITOR~
O!'

REF
REF

101e
8'17

100A
00et

•
•EI

Rte
MXle

C80A

111080

o

rOT '!RRtNT'
TITLEt
ERROR INTERRUPT
REVISION. 11/251115

RE'S AND DI'.

EI

REF

FR!MEM
ERROR
IN!T

EQU
EQU

.00~e

EQU

S

10
E~EeUTtON

LWPI FREHEM
RSET

l.X

Rtl.ErA

MOV

R10,'1It80

'*
Be0!' ftA

IF IN al! PROGRAM WILL BRANCH
EQU t

1J11I0!
eQ!10
ICH2

020A
0CHlJe
06A0

BL

'!R~OR

0f:ll144

0000

0016
0018

0460

8

'INtT

0000

ERROR

I~

BAC~

TO HERE

()

I R t", MU.I(iJ

END

!RS

o

945354-9901**

gee •

•

('

II
!IA

980

CONCORDANt!

0022

0 .. 22
81tH A

0028

0"2e

ERROR

0016

'REMEM

INIT

Mxee

0025'1

Rl0

0019

THERE ARE

PAGE 0003 of 0003

ellee

0"28
0Q131i"

01Ue

(1023

0~17

0031

0020
0"2e

011.128

fUJI;

SVM80LS

\

:i

1

""",
C

"

c

.'

•

A[
APPLICATION

(

'~

NEXT ASSY

USED ON

REVISIONS

7506

APPAOVED

DATE

~

L,",

.

-

~

!If: I
I

REV
SHEET
REV STA.TUS
OF SHEETS

REV
SHEET

UNLESS O""E,",,ISE SNCI~IEO
DIMENSIONS ARE IN INCMU
TOLERANCES
ANGLES ~ ••
• PLACE DECIMAl~.010
2 PLACE DECIMAl:!:.02
IDENTII"YING NUM._
SMOWN IN PAltENTMESES
POtt ItEPEltENCE ONLY

c

'\

INTEltPRET ~ IN
ACCORDANCE WITH
MIL·STD·lOO .

~
eM..." "
ENGA

QA
APVC

""

eONTA~

"'-../

TI-••• , .•

/

/

TEXAS INSTRUMENTS
INCORPORATED

0./_,

E.,."." GI'CIIIP

r __

AL, FIND, SCAN MEMORY FOR VALUES-PX990

~

CE~T''''TY

/

~~

OAT~

""-

RELEASE

"""

SIZE

CODE tDENT NO

A

96214

SCALE

•

IREV.

DftAWINGNO

945355-9901
SHEET

1 of 11

.

•• SCAN MEMORY FOR VALUES ••
'~0id0\4

11'10\5
.il016

;a011
~1018

I!.'Ilh19

002'"
0021
0022
~Vl23

00214
tatOa~

0Vl2t'i

.a02'

laet2A

i.HII29
!h1;'HI

tlJ031
00.52
11~'J3
~~J4
~~)J5

1tl036

003'
003~
~039

\404(/1

0'141
id042
004:3
~lij44

~04eA

0048
1?l041
~04R

004$)
B050

ta051
1111152
00:53
~054

0055
th156

...
...
...
1r

.....

,..

.
...
..
.
...

...

..
...

,..

...

..

...
...

...

...
.

..'*
.

..
...

....

."

.
..
..
...
.
..'...*
.
."

•.

.
....
..
•.
.

FWD (CPl POINTER),
nECLAR! (MASK, VAL) FIXED (16)'
neCLARE WORD TESTED Fl~En (16)
CONTROL (TEST POINTER),
DECL.ARE: (TEST POINTe:~, LIMIT POINT!f'O

P~OCEDURE

POINTER,
DECLARE OPTION BIT (1),

oeCLARE PAqM$ LITERALLY
'TEST POINTER, LIMIT POINTER, VAL, MASK',
CALL FWBPP (CPL POINTER, PARMS),
TEST POINTER • TfST POINTER •
MOO (TEST POINTER, 2)'
LIMIT potNTEQ • LIMIT POINTER •
MOO (LIMIT POI~TER, 2)'
no TF.ST PDTNTEIl • TEST POINTe:R
TO LIMIT POINTER BY 2'
IF (wORD TESTfO & MAS~) • VAL T~EN DO'
CALL F~BP~T (TEST POINTE~, OPTION),
IF OPTION. 1 THEN RETURN,
EN!,),
PRO~EDURE FBT (CPL POINTE~)'
OECLARF. (MASK, VAL) aIr te),
DECLARE eYTE TESTEO 81T (8) CONTROL
(TEST POINTER),
DECLARE (lfST POINTER, LIMIT PDtNT~R)
potNTER,

OECLAR! OPTION B1T (I),
nECLARE PARMS LITERALLV
'TEST POINTER, LIMIT POINTER, VAL, MASK"
OECLARE CPL POINTER POINTER,
CALL Fwapp (CPL POINTER, PAHMS',
nO TEST POINTER • TeST POINTER
TO LIMIT POINTER BY l '
IF CeYTE TESTED & MASK) • VAL THEN 00'
CALL FWBPRT CTEST POINTER, OPTION)'
IF OPTION • 1 THEN RETURN,

c

ENO •

ENO FRT,
PROCEDURE FWBPP (CPL POINTER, BEGIN PTR,
ENO PTR, VAL, MASK)
PARSE PARAMETERS .,
DECLARE (VAL, ~ASIO eIT (113)'
DECLARE (BEGIN PTR, END PTR) POINT!RJ
DECLARE (1 COMMAND PARA~ETER LIST,
3 CPL CONTROL CCPL POINTER),
~ NUMBER PARMS 'I~EO (8),
, PARM PRESENT (8) BIT (1),
5 FIRST PARM FI~EO (8)'
DECLARE NUMERIC PARAMETER FIXED (te)
CONTROL ('ARM POINTER),
OECLARE (1 CHARACTER PARAM~T!R,
3 CHAR PARM CONTROL (PARM POINTE.),
e STRING LENGTH FIXED (8),
e PARM STRING (t) CHARACT!R (1))'
DECLARE (CPL POINTER, PARM POINTER) POINTER'

'*

C·"-·'
,,"

:1

•• SCAN
0057
1tt0!S8
lihll!5g

1d0&lA
\i1(1!61

1d!il6'~H)6J

~H'I64
~~6!S

t:Hl!(i6

0V161
~!II68

0"'60
"'01Q1
il!011
W~12

1r.1073
i'1 014
vH~7~
~) \(J 1 t;

f/J011
PVl1R
Vll(l79
~(~8~

t)VJ6'
kllh82

''''63
Ul!'a4
W'-"85
Wl.il86
1/,1 Vi 87
00\148

v:J1li6Q

ME~ORV

PAGE 00"3

fOR VALUES ••

•

•
••
.
•
•
•.
•..
•.
•.

.*
*
'*
•

•
•*

'*
.*
."

.

..•

•

."

PARM POINTER .. AOOP. (FIRST PARM),
/* seT DEFAULT PARAMETER VALUES .,
BEGIN PT~ .. rA,
fNO PTR .. "FFFF",
MASK .. 0'
IF PARM PRESENT (1) • 1 THEN 00,
BEGIN PTR • NUMERIC PARAMETER,
PARM POINTER • PARM POINTER • 2'
END,
IF PARH PRES~NT (2) • , THEN on,
END PTR • NUMERIC PARAMETER,
PARM POINTER • PARM POINT!R • 2'
END,
IF PARM PRESENT (3' • ~
THEN CALL ERROR ("020~"" /* NO RETURN
VAL" NUMERIC PARA~ETEA'
PARM POINTFR • PARM POINTER + 2,
IF PARM PRFSENT (4) .. 1 THEN 00,
MAS~ ... NOT. NUMERIC PARAMETER
END,
IF END PTR C BEGrN PTR
THEN CALL ERROR ("1'01"" ,. NO RETURN .,
RETURN, ENn FWBPP,
PROCEDURE FWBPRT (PTR, OPTION"
DECLARE PT~ POINTER,
DECLARE OPTION BTT (1),
CALL PRTME~ (PTR, PTR),
CALL GET HfX VLAUECNO LEADING BLANKS"
ERROR, TERM CHAR,),
TF TERM CHAR .NE. BLANK THEN OPTION-t,

*'

F<'e:TURN
F,'NO

IDT

FWBPRT
"'11110'

•• SCAN

~EMDRY

'OR VALUES

0091
0M92

*.

• llTt.E:

..

'*

((1093

..

0094
IiHll~HS

REVISION:

PAGE
FTNn

FINO WORD AND FIND RVTE

~1!H/14

CO"~ANO

P~OCESSOR

9Q0

0098

..
..

1t10gQ

..

010111
ellt'll

..
..

THE FINO RYTE AND FIND WORD COMMANDS ARE
DECODED. MF~ORV IS SEARCHED WITHIN THE
BOUNDS tHOleATEO tl~()ER MASt( FOR EQUALITV.
WHEN A MATCH IS FO~NO, TM! MEMORY AODRESS
AND CONTENTS ARE p~INTEn, AND A USER RESPO~S!

11091

1 S R e: (.I Uf. S Te. D•

•

W102

..
..
..
..

A

CAR RIA GERe: Ttl RN TE RM! NAT! II

011A

THE Sf ARCH, wHILE ENTRY OF A VALID HEX NUMBER
OR A SPACE INDICATES CONTINUATION OF THE
SEA~CH.
Mf~ORV MODIFICATION IS NOT SUPPORTED
BY THTS COMMAND.
.. CALLING SEQUENCE.
..
CALLEn FROM COMMAND STRING PRnCeSSOR
.. CALLING SEQUENCF,
..
i-PROCEDURE FWD (CPL POINTER',
..
2.nECLAR! (MASI<, "AU FI)([O (1
..
2.nECLAR! WOAD TESTED Ft)([D (1
..
2CONTROL CTEST POINTER)
..
2-nECLARE CTEST POI~TER, LIMIT

(Ul!')

..

2-

..

3-'T!!T POYNTER,

IdlltJ;!

0104
01",,5

P.lU'6
~107
~11dR
9l1~9

Id 1 U'I

raut

0112
0113

a 1113

..
•

011"
0118

.• WORKSPACE

~H 201

~H2t.

1a1ll00

R~

Er~l)

0123
0124

!80~1
v.HIj~2

R1
R2

FQlJ

EQU

2

IH2~

0!H'~

R3

n~u

!al12R

0(1104

FQU

1412'

0005

R4
Rel

3
4

iH28
0129

0(,,106

R6

FQU

fa001

R1

r:QU

01301

~008

R8
RQ

FQU
':QU

RU
Rl1

~QlI

0131.
0132
13133
'U.:i4

0001.

1"1"5
1111 J (Ii
.;HJ7

13000

~13A

0139

!U4t?1
0141
111142
0143
0144

'l/(1I0f'

000C
01111tlE
0t?t0F

FQll

F: GIll"

POINTER

0
1

5
6
1
8
9
10

Erau

11
12

R14

fQlI
F:QU

14

Rte

F:'~U

U5

REF
REF

BLANK
GI!THXN

REF

PRTMEf'I

R12
R13

LI~rT

REGISTER OEF!NITIONS

~122

0A~H')

POtNTEFH

2-0eCLARE OPTION BIT (1)'
2-DECLARF. PARMS LITERALLV

..

I4UQ

"

ORIGINAL

.. COMPUTE:R I
.. A8SHIACT:

1{1096

0··':

13

."

REF
REF
oEF

ERROR
ACI..,R~

FWO

C

••

SCAN

MEMOR'I

~145

J14R

(

!~01i'1~

FOR VALUES

EQU

$

CiI!86

MOV

R11 , R2

'~'A02

ra6A0

I1J (II 1114

~[ilI44'

"'149
~Uh"

01!H
01:52
0U53

'~i-106

~~1f)

0!A0f1

0A18

01:54
01'5
tU56

01110A

0811

0~0r.

0A11

~157

(lISA
~to9

~~I6E'

,a Hi r~

..

•

•
,.
..

BL

SRA
SLA

R1,1

R7,1

FW010

EQlJ

$

*

MOV

.FoI8,R4
R5,f.(4

4HH5

SlC
C

id164

a~14

llH'~

JNE

Ii'

115

061\0

;Jill€!

~CII7'i')'

;avIlA

U14t

101.61

0188
0169
k:l17~

!tW1t: '

Rd,R6
FWD20

2"
POINTER • LIMIT !lOINTE
(LIMIT pnINTI!R, 2"

,.no TEST POYNTER

•

8L

,FWBPPT

•
,.

JMP

FWBENf')

FwO,tlJ

FQIl

$

FweENr)

1.1M1T

111 TEST POINT
POINTER BV 2,

3.tF (WORD TESTE!) & MASK)
wnRD UNOER TEST
A!\!Q",E 0

WITH

•

IF NO MATCH
FWBPRT (TEST POINTER, 0

,"IF OPTION •
A.ENO'

0171

0(~

8leB

c

;J!~tE

144~

JHf:

t211112(11

915C8

0~2~

l!AF'!5

INCT REI
JMP FW010

R8,R7

VA

MASI(

.heALL

017'
017 "
0174

1C

"

5·TO

8\84

,,~

TEST !lOINT!R
'-TEST POINT'R
!5 .. Mon (TEST POINTER,
ADJUST TO WORD BOUNDARV

RRd

SRA

3~q ~1

Hili;

RR,1

SLA

0012

~

'FWBPP

2·LIMlT

4H62
vH63

C116

SAVE RETURN
FW8PP (C;PL POINTER, PAR
GET PAI:UM~T!RS INTO REG!ST!'"

5.MOO

~II!

016~

('

•
.

PAGE 00QJ5

2 .. CALL

U61

10 E

g45:$!5'5,,99f)l1*.

001(H' , FWO

~147
014~

*.

1 THEN R!TURNr

~

••

SCA~

MEMO~'

FDR VALUES

0111'3
0111
0116

;,

.
..*

k'lUJ0
~ 181
018~

*..

0183
01$4
0Ue
0166
0181

0024' FeT

liIitHl

C(lS6

GH91
01S~2

l-PROCEOURE FBT (CPL POINTER),
2-0EeLARE (MASK, VAL' eIT (8),
2.0ECLARF. AYTE TESTED elT (e)
2.
(TF-S1 POINTER),
a_DECLARE (TEST POINTER, t.l~rT
2"
POINTEFU
2-MECLARE OPTION BIT (1),
~-OECLARE PARMS LITERALLV
3-'TE5T POINT!R, LI~IT POINT!R

.

el1~.J

IHS!,)
0HH'I

**

.
..

riH~26

I1JtiA~

0(1128
0r~2 A
0912(':

0V!44'

EQIJ
"10V

R11,FH?

RtI,8

R5,a

0(11211:' F8T10

EQIJ

$

0118

~10V8

*Re, R '5fS

1{I(.l5A

0?:5Q

t:1FA
~!fl5C

e2!5q

MOV

"R1!~+,RA

trw

$

SLA

R t,1

!lJv15C

1Il261
02Ei2

(lI(~

Sf:

i/1A

11

171!)

0~63
0~6(/1

CHit.

"FFFF'"

,

FW!3PP.

•

..

•

•

FWapPA

$

SLA

Rl,t

JNC

Fwar:1

MOV

.RU+,IHS

1 THEN

PRf.'SI!NT (2)

•

1 THEN

IF NOT PREseNT
3.e:t-W,

F,'QU

•

•

PAR~

~_PARM

1IR1~.,R1

(1)

IF NOT PRESENT
3-BEr.lN PTR • NU~EAIC PAlIUM!T!
;'.PARM POINTER
PAR!o1 POtNT!R

3-FNf'I

I~QV

:5

~,

2·IF PARM PRESENT

'-If

PTR • NUMERIC PA!UM!T!R'
POINTER • PARM POINTER

2-1F PARM PR!S!NT (3)

11

02e1~

2.ENO PTR

~r

3-ENO,

11

IH?5~

("

SLA
JNC:

.1 Nr.

02:'4

0264
02615

R5

AOOR (FIRST II'

•

2·I'4ASK

CLR

11

0;2!H

0~51

.
.
.
FwepP2
.

,

2-R.EGIN PTR
R8

'II

BITS

P~ESe:NCE

2 .. /* SET DEFAULT PARAMETER VAL

SETO R7

0243

~2:52
1t1<~3

CLR

'II

0244

ISOLATE

2 .. PARM POINTF.R

11

0~41

ltl241
1CJ24>l
\0 2 4 1J
flI::2tH'

s

'PRMPST (RUIn ,Rl

INCT R10

i1!1C.e.

~231

~242

MDve

1

FwapP

11

0236

(:

:?""OECL4RE C1 COMMANO PA'U~l!T!R
3•
3 CPL, CONTROl.. (CPL.
d_
!5 NUMeER PARMS FIX!
;4_
e PARM PRESENT (8)
S FIRST PARM 'Ile!D
A2... PECLAR£ NUMERIC PARAMETER '1
CONTROL. (PARM POINTI!R),
2'-OECLARE C1 CMARACT!R P.rUMET
3 CHAR PARM CONTROL.
3A•
S STRING L.ENGTH FXX
4_
e PARM STRING (1) C
,-"EeL ARE' (CPL POtNTER, PARM P

11

~2~Q

02.,,8
kl2J9
024('

"T,.,

..,

0?2A

~235

,wepP (CPL POINT!
MASIO I· PARS
VAL,
~.END
MASK) BIT (tel
(\1.1..,
2-0EC\..ARF.
,.oECLARE (BEGIN PTR, ENO

11

i02~1

00tJ11

PT~,

..
..•
..'"

0221
0?22
0223

PAGE

\-PROCt!DlIRE

•.

ftl2\9

fcl? ·'3

...

11
11

0217
1tl21R

~:> 3

gA!53~5,.q9CJI1

•.

~21J

(:

••

•

PI

3·THEN CALL ERROR ("0205"),
IF RQO PARM p.trSSING

I.

2-VAL • NUMERIC PAIIUMETER,
2,.PARtol POINT!R • PARM POUlTER

~

....

SCAN

~E~OItY

FOR

(Il2~t5

02ti7
02es

0!tlt:i2
0fi164

0A11

1'11lJ:.'!

0269
027~

0271
0:?72

!i.l!ii(jti!
(1068

•

•

0e54~

••

0ri1(iA
!,i!~6r:

IiW6E

8201
11. 11

R1,t

,t PI! C'

FWBPpe

0451'3

PAGe: Q!01!l8

2-YF PARM PRESENT (
~

tlOV

*f")1!lJ,R5

HJV

R~

...
...

Q45~!55.ggQll.*

SLit

'*
EQU
itHHSA' Fwi3PPtl

0273

0274
027!.5
0276
0271
0278
0219

CieA

V~I..Ue.:S

,

.. .,

1 THINO

IF NOT PRfSF!NT
.. M.SK • .NOT. NUMERIC PAFUM!T

;'-F.NO,
11

C

R7,R8

JL

FI~eE2

~

.Rl1

2-1F ENO PTR c BEGIN PTR
3.TH!N CALL ERROR ("1101")' I·

2-RETURN, END FWepp,

o

.*

SCMJ f-IEMORy FOR

1b21:i\
~2d~

(-

1U:i'1:J3
028.1
\!l2iH5
0?dli

011!7~"

k1V171i\

0072

Y'I (A (,II C!

0f~7 "

0:?8H
1tl21i9

~H~

71"

C248
C?88

0C~7j4

·id;:;A~

001A

~(..HH'

0r~7C

1rJlIt'I?

1d291
iIl2Y2
0'Y~

007f

06A!/1

~1'>180

~2Q4

1/lfi18:!1

!i'fiI elli'
1 r.. QI!5

tD:::!9~

~r;'84

1 ~tJ)~]

~V'86

!H!v.l9

0'''8A
i-J r,q; A
0(;18C
k1i1!8E

0~il~1I

0~~;;

0297
lIl:>q8
02IJQ
031tl~

03idt

(

"'3~J
03~4

..

.

ill fJi If! ti'I

0(11S/4

0456

POV

RA,~9

MOV

R" ,

AL

'PRTME~

JMP

FWSPT2

8L

'GETH)(N

JMP
NOP

FWBPT2

CB

RQ,(l8LANK

ij

l.P

ESC f!I'\TEREO
,.CAl.L GET HEX VLAUECNO LEADtN
~"EFiROR,TERM CHAR,),
ERROR OR EXt:

2-YF TI!RM CHAR ,N! • BLANK THEN

JIIIE
FWSPT2
INCT (HH 1*2 (R13)

FwtJPT2 fQU

s

RLwP 'RR

042171

03t.1?

$

fo4LwP 'ACL

16"J~

Vlll9r1'
0(:'92

PAGE flII 001 9

t .. PFH)CEOURE FWBPRT (PTR, OPTIO
2·0ECL.ARF PTR POINTER'
p .. OeCLARE OPTION BtT (1) ,
,.CALL PRT~!,M (PTR, PTR),

FWBPIotT fQU

0!'iEI)
0t~ 1"
"!119~'

9 4!5 ~!5!5", Q Ii r.u '* ..

**

'*
'*
•'*

0412~'1

~21i7

III 2 !h1

,

VALUES

•
*

~ .. FlETURN

H

.RU
2 .. e:NO

FWBPRT

...

~E/Io!OR1

SC.t-1

FOR VAI..ItES

0301J
03i1J7

0P."'~'

03~H

0;;)96

\1~0A

0309

.QlfliQA
9.l r1.9A

""205
HI'''~

l'J0~~

10, >Pl2P1e

FIol8F.HR

0P.9C

fMH1A

LJ

0(l\!.IE'

Rll1J,>1113

1113

0V1A(Il
0P!A2

0"'MI

0~14

0315
0315

~

$

,

FWBERR

'::QU

"MS0!5"

~0t0

PPQCESSING
RQO PARM

MISSING

C

"OPt!" ENOceEGtN

s

AL

'ERROR

t::: I~I)
fi

*P2

0!i'!0(1l

0PA4' FloIeF:ND
0r~~u

PAGE

$

JMP

~H1A~l

••

E~RnR

FrJU
l,l

EI~U

Ill!l?'

0313

945:5e~",g9"'1

011'9C' FWeF.2

031~
0~1t

•

FWBEl

..

045~

S

RF.TURN TO

Cf04NI') STRING PROC

l!:NO

ERS

o

o

9150
S

(:

.

SLAN/(
e:RRO~

014~

ACL

FweER~

,wspp

FWBPP2
'WSPP.t1

FWtiPPR
FWSPHT
FWSPT2
FwD
''''01111

Fw02;d
GfTH)(N
PRMPST
PRTMEM
RCIl

IU

R10

0187

0'815

0195

0210
121201.'1
02e2

020fi

031117
k'l~lP
0~14

0:31?
0232

03~(./I

0:3Q\7

0208

0,sHS
0310

PAGE

0011
02!111

PJa!e

0312

0232
0314

0271l!

0288

8308

8311

02flH)

02:58

0~>ri'6

0291
0313

0204

0t~e

019121

0231

024!!1
02!3

0251'"

0'5f!
0~13

0215A
0t(H5
029tA

028t5
Vi 3 11\ (ll
01415

0202

029.4

0298

0144

0159
017P:

0174
01e4
01.40

0230

0P33
0141

"'22
0123
0132

0293
028Q

0233

024.4

0252

02e~

0235

02!5'

02ee

0188

0249
0279

0299

0303

C,H4e

0te R

03H'l

0'61
0162

111162
0HH?

0197
02"2

019a

0199

IiIU~8

IU7Pl

0271

0191

121199

0Pfj5

0171
liB 6 t

0201
0111
028A

02·Ul
0113

02157
0191

0tJ3

R12
R"J
Ri4
R,e

0134
0135

0299

121287

013('\

0137
\in 24
0t25
012(;

JU
Rei
RI5

012f4

016~

R7

0129

R8

013/t1

01155
0HH
0249
0281
li'll4!

R9
RR

0187

0112

RU

R3

0'59
0P8!5
0286

017ti'1

0271
flI tese
0309

0233
014e

R2

945355-9901**

CONCORI')ANCE
0145
0273
0143
0139

FAT
Fe T1Ii:l
F812111
FWeft
FwSE2
FwBENn

(--

g80

0127

VJ131

THERE ARE

004CA

oU5f5

0U,2
0216
0291

0301

SV~BOL8

0163

0?81

0276
0207

o

o

•

A[
APPLICATION
NEXT ASSV

(

USEOON

REVISIONS
DATE

c.SC1WI'T1ON

L'TJIt

A~

I:>Ub

-

:

..

...

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHERWISE S"CI~IED
DIMENSION. AItE IN INCH ••
TDLEItANCES
ANOLES ~I'
• ~CE DECIMAl:t.OIO
2 ~CE DECIMAl:!:.02
IDENTIn-IHO NUM._
SHOWN IN ~AItt:NTHESES
~0It ItE~EItt:NCt: ONL'Y

c

INTEIt~ItET DWO IN
ACCOltDANCt: WITH
MIL·STD·IOO

D~

C"~

'"

E_

QA
APVO

'" ;'''''"'-/

L

./

~ TEXAS INSTRUMENTS
INCO"~"A'I[D

Equ.".,.", G,..

0.1... r __

AL, GTFELD, INPUT CHARACTER STRING-PX990
•

/

CeNT" " ' "

DE7
/
,.,-.... ·c

~

DATE/

"'-

ACTIVITY REL.EASE ~

"'-

SIZE

CODE ICENT NO

A

96214
I REV.

SCALE

•

""AWING NO

945356-9901
SHEET 1 of 6

i

••,t INPUT CHARACTER STRING ••

.....

••• a

••15

••• 8

'Ie,

1'111

••••
',eu
.Ul

"11
.e13
1'1~

.115

IIUJ

•

•

•
•
•
•
•

•
•

•
•

1113
'II~

IllS

•• al

"1'
"1'
•• 31

,"18

1111
'.111

'Ial
Ila~

IllS
1.1.

Ila,

11.8
II"

.....
••••
.....
II.,

II ••

"45

114.
I •• ,

11.8

,,'1
1111

1 •• 1

.,11

...

'1'1

"'4
"
•• SI

00 UNTIL CHAR ,EQ, BLANK
"DR, CHAR ',IQ. 'CR' ,OR. CHAR .EQ, '. "
IF CHAR .ECI, '8S' THEN
CHAR eNT • MAX(0,tMAR tNT-I)'
ELSE IF CHAR .!Q~ 'RU80UT' THEN
CHAR eNT • 0,

•

*

lilt
IIII

.'al

ELSE Oar

IF CHAR tNT c 30 THEN 00,
CMAR CNT,CHAR eNT."
eSTRING(CMAR eNT) • CHAR,
END'

*
•

•
•
t

•
•
•
•
•
•
•
•
•
t

•
•
•
•
•
•
•
•

••
•

c

END,
END,

*

'1'8
1111

"1'

PROCEDURE GET FIELD
CALL GET8UF(PTR),
CHAR CNT • m,
TERM CHAR_ 0,
IF NO LfADING 8LANK!,-' THEN 00,
DO UNTIL CMAR ,NE, 8LANK
CALL GETCH" (CHAR)'

•

•
•
•
•

PAGE 0"182

END,

CALL GETtHRCCMAR),
END,
TERM CMR .CHAR,
END GET FIELD
rOT • ITFElD'
GTFILO
TtTLE.
INPUT CHARACTER FIELD
REVISION.
ORIGINAL
COMPuTER' "',A!M
ABSTRACT, GET FIELD INPUTS A CHARACT!R STRING ON!
CHARACTER AT A TIME AND BUILDS A BU'F!"
CONTAINING TH! S'RING. SIPERATE ENTAY POINTS AL
LEADING BLANKS. THE STRtNG IS TIRMINATEO
ON A COMMA DR 'CR', A STRING GR!ATIR THAN
38 CHARACTERS IS TRUNCATED ON TME RIGHT
WITHOUT ANY WAANING.
CALLING SEQUENC!'
8l
'GITF~N
DO!S NoT 8~IP lEADING BLANKS
BL
.GITFLO
SKIPS lEADING 8lANKS

c

RIF'S AND OE"S

OIF
OfF
REF
RfF
RE'
R!,

REF
AIII'

G!TFlO
G!TFLN
COMMA
SLANt<
lee
EOR
PERIOD

as

c

..,. INPUT CHARACTER STRING

PEl"

I'll
1158

ICIS'

(

1080
1081
1'82
•• 13
1'8.
'015
1011
'.81
1188
1181
le70
1071
'.72
le13

...
1810
Ilflll
IIfII2
I'I~

1114
Ieee
111115
0011
1011'
00119
lelA
0018

11715
IUJ7S
1117
1.78
1119
1.le
fII.ll
'fIIla
1'13

(

'IIC

1110
filiI!

eel'

••••

eilit

Ilia

1"'3
eUI.

Itl5

1111
1117
11118
lUll
(~
">

.

Re
Rl
R2
R:5
IU

RS

FIe
A1
R8
Rg

lue
AU
R12
R13
R14
R15

.

EQU
EQll
EQU
EQU
EQU
!Qll
EQU
EQU
EQU
EQU
EQU
EQU
EQU
EQU
EQU
EQlJ

00Q!~

RUeOUT
GETCHR
G!18U'
RETeU'
LWP
AWP
ACL
RR

I
1

2

3

•
!5
IS
7

8
51
10
11

12

13
14
15

...

RIGI'T!A ASSIGNMENT,
AUI •
CHAR
R8
• POIII/TER TO 8UFFER
R1
• TE~P
•• 10' GETFLN EQU
CLR Ae
0'C0
JMP 6!TQJ10
HUH
•• 114' GETFLO EQU
SITO R0
0111
1101' GET010 EQU S

..,
...
..,

1189

I'f'
1"81
11.'

PAGE

••

•..,

1 •• 5
1188
.087
1188

life
IlrH
1IJI512
IIf3
1119.
le98
10915
1'97

REF
R!F
REF
REF
RE'
RE'
REF

gAS3e~.g9"'1

.WORKSPACE REGlST!R DEFINITIONS

,.,.

.,"

••

lIJeltll

rnl2

001'
0'le
IIHUla

GUllA
Iflle

(u,e!

0.20
01'0

0e'l
C1.A
14DA
CR0A

0R11'

ColUI

I,se

•.

".20

0012

l!tIll1

•

1~1'

•
•

.
•

•
•

.ALLOC,COPV,~tNK

BLWP 'AC!..
tG!TBUI'
8Lwp .GITBU'
MOV

R1fIJ,.'H3

CLPf
MOV

.Rl11!
Rl0,RI

MOV
J!Q

R0,Re
tUTI'31

3.CALL

GET8U'(PT~)'

PLACE • IN CALL!R WP
eNT • 0,
3.T!RM CHA'h e r
~.CHAR

3-1F NO L.EAOfNG 8LANI91100

00915
0097
0098
009;

'II

•.,
.,
•

fUlfl!

0101

•'"

14102
010~

ttH0A
0106
0108

IIB"'0," '

0101

IIH1l0v!

0108

0002

£I4Cg
10101

0Q!0A

07eg

~004'

k1UQ
0U~

0111

000~'

•
•
•GETHXN

REGISTER AsstGNMFNTS
filttil

R9
R8

R1
R6

R!5

RA
R3
EQU
eL.R

JMP

GP!THfX
Ge:T~10

3

til'!

0000

.,'"

nEF'S

ClST
GETSUF

01381

0~9!5

PAGE 0003

ESC

R5
Rf5
R1

EQIJ

••

GF:THeX
GETHXN
GETFLf'
GETFLN
ERROR

10088

0094

("

'"

g4~3e',d~901

REF!S
OEF
OfF
REF
REF
REF
REF

1I}062

(

...

e'QU

SETa
eQl!

RUNNING PTR IN CtUf( STRING BUFFER
TERM CH.R
SAVe: FOR PTR TO CI·U.R STRING BUFFER
CHA~ COUNT
VAL.UE TO BE R!TLIf~NE"
CHAR
HEX ARRAY COUNT
TEMP
i_PROCEDURE GET HEX VALU!(LD I
2-TER~ CJoIAJ:h NO VAL.UE INPUT',
$

R9
GI!T010

1..0 8LNI(

•

FALSE

R9
:Ii

LO BLNK

•

TRU!

s

--

INPUT HEXADECIMAL

1112
1113

000ft
0~0"

0U'
0U'
11145
1111

""'0A
000t

0118

01i'l0E
0tll1 p

IU9

0012

luam

0t21
Isetl

0~0(1!

Ct4"

ru;u

l'ill 3"

luas

1iJ13e
0131

ruaa

13e~

015Ul
0000

"11118

C20A

001A
001C

01'A

01412

It43
1144
rat 4e
11416

0271,

01U0
0022

08e$)
ltl03

8!?11e

0660

0A2e
0Aa~

*

Mova

SRL

'*
*

•

~U.R8

tRtl1J+,,,'

2-PTR SAVE IIPTA,
2.CHA" COUNT .. PTR.CHR eNT,
2",PTlhPT'h t,

R7,8

a-TERM

GET03"

C~AR .• PTR.TERM CMAR,
2-PT" • PTR+1'

2.r,

TERM CMAR.lESC' THEN RETU

C

.Rl1*2 UU3)

IN!
JMP

GETIIJ''''

•

H'0~

04ce

017'

003A

IUC4

erne'
0211
lUI Ie
A0C4

lu,e a(Uti o.. ee

131e

I

e.rF CHA. eOUNT.e TH!N R!TURN(

tNCT .Rt1*2CRUD

101A

BeJaR

0~4.

I

IN£

•Me
•

Move

*RI0+,"5

CLR

R4

a-r,,,,
a.DO WHILE

~.QU

.,

CL.R

•
•

I,

2-VALUE

G!Te3a

."

0040

.GETFLN

A9,'ESC

OEcr

t-ILSe: CALL GET FtELDCPTR,NO L

$

CB

.flJ3.' GfTfa40 EQU

IU"

GET030

."R1
GET03ft

f/ltA38'

0ear

fGETFLD

MOV8 .R10+,R9

t

0AIC

R9
G£T021'1

MOV

05£0
0flU)

00~e

IH~,

GET01P1

0~~0
00~2
00~A

IUJ5
IUU'

1150

..

MOV

FI!

3-ALLCW LEADtNG 8LANKS)'

JMP
101'
0,-,ac' GET"3e fQIJ

C1C'

8148

0153
It5'

GEHI30 EQU
*

C

01i'U5

IA2C
0t1tRE

1149
IH50
tJU'2

aL

0~00

0~2.

i147

IUH

~OV

JMP

0987

0f11E

0e".

P'Cit!

t-IF LO 8LNK THIN CALL GIT

Jl!Q
Bt.

""'100~
{/lin
00111'

1130

'l.tIt
81411

*

0014' G&:T020 EQU

0014

••

*ALLOC.COPY,LINK
HLWP 'ACt.

06A0

0121

It28
It29
O130
8131
fU32

..
..

•• 945357.9001

t

00115

1123
112A
0125
It26

0'20

NU"aE~

."

0&:T05111 EQU
LI

S

II

2"DO WHILE CHAR COUNT .GT~
3·CHAR

I

0

,

PTR~CHAR

a.plTR,PT".!'

.

lelS AND CHAR.N!.CL

R~,CLST

A

IU,R3

CEt
JEQ

GET000

"t5''''R~

0

.* INPUT fo1fXAOECIMAL. NUMBER
" 1<5£.1

01(51

(

0162
0163

0164

0"'46

0584

0P14fi1
0ClA'\
V,lCII4C

0284

R4

eI

R41,t6

JNE

GfTOI!5Vl

16F7

3.Yf"

.

".CALL.

0v.5fi:

010t1l

01.69

0~!52

06~1}j

00154

161:1100

0f}\fi6

0660

OEeT .Rl1*?(lH3)

0~!5R

0(11H!l
111101

GETI!'I1~

0"'''E'

0."'6t~

02tH5
0FPfI"
1RFti

~17R

01'11(52

0"'At)

10119
018111
VJ18\
1il182

!jH'!6A

AU!lt

o1.1 tHI

i/:H3Vl7

0183
01<:\4

0~6~

1f1E7

0C115C

005f
IrH 7fi

kltl1

11:'1185
01815

06?1fjA

C~8e

~181
0~ec

0420
01/1100

0191

0!1!1~
0Q!7~

CB4Sl

019'

0(1174

C84e

~(;l\7~

~ rt'l1

0J]11f1!

0420

001'
007C
0r:A7!

0t110t11
05C6

019~

l61g4
01!i1~

•

.
..

.
'*

'*

0P6E

0193

Rt0,OP0~

BL.

'EFi~OF(

IH~6

130"'0 EIOIS

*

'*

FORCE RETURN TO CALL+2

S

CI

R6,,.FFF

JH

GF.T{II!5~

SLA

R6,4

A

R4,R6

OEC

R1

JNf.

GFTI"API

3.IF VLAUI! :.. 'FFF' THEN RETURN

!.VALUe:
3 .. CldR

•

VALUe:*t6 ... lJ

COUNT

•

CHAR COUNT

2.FNO

MOV

S

2.PTR
R8,Rl~

• PTR

SAVE'

2 .. CALL IUTeUF (PTA) ,
*RET8UF
el.~'p

'RETeu,

~ov

R9,'RQ*2(R13)

p.lOV

R~,

01i'!1~

t

04(5e

no,

!AROR 01!)( CONY)'

A.RETURN(E~ROR)

0!l'16A' GET"'7f1t I:.QU

0tea
0189

.

t .EQ.16 THEN

$

LX

JMP
0P15C' GETA(50 EQIJ

IH1A

0175

GETOI!5!5 EQU

02(:1)1.

10171A

0"'5A

~00!5

3.ENI),

*

0173

PAGE
4.t-1+1

0~"F

0112

••

;.,

lNC

0166
0U.i7
0168

0111

(

•

945;:'51",9gfl!l

~Pl10

0t6l'

I(

*

••

BloWP IRR

tNCT Rll

rn

END

fiR' Ih2

o:u:.n

t-I! /1/1'1 GET HEX VALUE,

.u

945357-9901
960 - 980
S
ACL
CLST
DP00
ERROR
ESC
GET010
GET020
GET030
GET035
GET038
GET0410
GET050
GET055
GET060
GET0?0
GETBUF
GETFLD
GETFLN
GETHEX
GETHXN
UJP
R0
Rl
R10
. Rl1
R12
R13
R14
R.15
R2
R3
R4
·R5
RG
R7
R8
R9

RETBUF
RR
RWP

CONCORDANCE
0106
0167
0070
0065
0092
0168
0063
0064
0111
0108
0121
0117
0123
0119
0138
0135
0145
0141
0148
0183
0155
0164
0167
0176
0173
", 1 59
10184
0137
0066
0061
0062
0109
0059
0106
0060
0068
0075
0076
0~85
0125
0086
0136
0087
0088
0136
0089
0090
0077
0078
0156
0079
0153
0(180
0151
13081
0146
0 12182
0128
0083
0125
012184
0107
10067
0071
0069

THERE ARE

0041

0109
0173
0113
0156

PAGE

**

0121

0123

0138

0145

013,2

0151

0168

0186

0192

0171

0194

0111
0184

0148

0006
0155

C~

0169
0134

0143

0172

0118
0122

0128
0142

,,~

0142

0171

0191

0192

0157
0157

0158
0161

0193

0179

0158
0175

el?~

@1r~

012~

0140

@!40

0192
0181

0116

0116

0H3~

0110
0189
13193

.... ~,., ""'-'

01..:1..:

.~.,;.

~134

~191

0191

SYMBOLS

o

.

A[
APPLICATION
NEXT "'SSY

USE:O ON

REVISIONS

L..T"

APPAOVEO

OATE

OESCPftll'T'ION

7506

t
f

•

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE_,SE S~ECII'It:O ~N'
OI ... ENSIONS "'''E IN 'NCHIl.
TOLE"ANCIIS
ANOLES ~l'
C ..~
J PLACE DECI ..... L:t 010
;, PLACE DECI"'AL:!: 02
ENGR
IDIINTII"YINO NU ....I."
SHOWN IN PAItIlNTHIlSES
,"Olt ItEI'EItIlNCE ~LY
QA
IHTE"~"ET cwo IN
ACCOItDANCE WITH
"'LSTD·1OO

APVO
CONTR

0E7
V
"'-••• I·C

~~

O"'TY

/
/

'" ,

TEXAS INSTRUMENTS
INCOIIIPOIII""£O

OM_.

Equ.""."t Group

run

AL, HXARTH, HEXADECIMAL ARITHMETIC-PX990

""J

/'..

"?'

SIZE

COOE IOENT NO

ACTIVITY RELEASE " -

A

96214
I REV

"\..

SCAL..E

•

QRAw'NGNO

,."

945358-9901
SHUT
.

1

Of]

!

111'13
1'841
'1815
I,rae

'.fl1

III.

.'.0
IIIIUI
•• U

IlUI

..•• ,ss

"la...

''I't
1"
'1'1

Irn.
IIII
811111
1.11

8'la

t

•
•
•
•

•
•
•
•
•

*
*
t
t

•

*
t

*

•
•

*
*

IIa4
III!

t

'115

t

'118

*•

.1.,
'I.'
1.11
I.at
I.al

"11
.1".
.Ial

leae

flea1

""1,
I.ao
'141
IIUS

10'1

fle ... 3

114.
flI48

,rue

114'

'.48

1.40
'III
.1.1

el.1

•
•
•

*

••
*
•*•
t

•

*•

•
t

•
t
t

•

*
*
*

PROCEDURE HXAR (CPL POINT!R',
oICLAR! CIUM, 01", OP1, OP.) FIXED (18)'
DECLARE (1 COMMANO PARAMETER LtST,
:5 CPL CONTROL (CPL POINTER),
S NUMIER PARMa 'IXED ce),
S PARM PREIENT (8)8IT Cl),
5 'lR8T PARM 'IXID (8'),
oECLAR! NUMERIC PARAMETER 'IXID (Ie)
CONTROL (PARM POINTER),
DECLARE (1 CHA~ACTIR PARAMETER,
3 CHAR PARM CONTROL (PARM POINTER),
IS ITRING LENGTH 'IXfO ce),
S PARM ITRING (1) CHARACTER (1»)'
DECLAR! (CPL POINT!R, PARM POINTER) POtNTER,
OPI Ii I,
ope !I . ,
PARM POINTER. AODR (,IRIT PARM),
IF PARM PREIINT (1) " 1 THEN 00,
OPl , NUMERICPARAM!T!R,
PARM POINTIR '. PARM POINT!R • • ,
IND,
I' PARM PREIENT (I) " t
THIN OPI • NUMERIC PARAMET!R,
tUM , OPl + OPI'
01"'1 OPl '. OP8,
CALLPRNTC (ADOR (PTaUM»),
,. PRINT H!ADINGFDR aUM
CALL PRNTH~ (aUM),
,. PAINT V_LUI 0' 'U~ IN H!M .,
CALL HXARPD (aUM),
PRINT VALUI 0' aUM !N O!CIM_L .1
CALL PRNTC (AOOR (PTOl")',
,* PRINT H!ADING 'OR Dt"
CALL PRNTHX (0%"),
PR!NT YALUI 'OR ot" %N H!X -,
CALL HXAR"D (01""
'.PRINT VALUI 'OR 01" IN D!CX~AL .,
RETURN,

c

*'

'*
'*

*'

'*

PROCEDURE HXARPD (YAL),
""INT DECfMAL .,
DECLARE VAL FIXED (18)'
DECLARE DIC .TRING CHARACTER (e"
CALL CIO (YAL, DIC STRING),
CQNYERT TO ASCII .TRING
CALL PRtNT (D!e 'TRtNG. e),
,. PRtNT THI A.Clt STRING
RETURN,
END HXARPD,
!ND H)cAR,
tOT 'H)cARTH'

'*

t'

*'

c

.... HEXADECIMAL ARITHMETIC

..
..
..
..
..
•

IUI54
0055

(

eraee

TITL!'

M~ARTH

HEXADECIMAL ARITHMETIC

REVISION.

...

eeSl

..
.
...

elisa

'0S3
00S4
eliHUS

0058
0007
15008
000"

0010

0001

.•JUJWORKSPACE
EQU

(1071

00012

R2

001a

0003
0004
000!S
001U5

A!

(40eg

0073
0014
0015
0016
0011
0078
001;
0080
0081
008a
0"83
008.
0085
0"'6

0001
1001
"'UI 0

Rl

AI
R4

'us

R7

RI

Ri

001.

RU

011108

AU

1000
0001

RU
Rl.

000"

R1'I5

0raec Ali

0fl01

00.,
lue8

008;
0"g0
IU'H

..
PRMPST
...
....
.

.
•
•.
..
..
...

fUUJ2

0083
00g4
00g5

0086
0091

erue

00g9
IHI0
11'11

0112

0103
0UU

wHee

fHets
0101

PAG! fl013

ORIGINAL
COMPUTER. 980
AS.TRACT.
THE aUM AND DI'FERENCE 0' THI 'IRST 'Twa
PARAMETERS ARE COMPUTED AND PRINTED IN IDTH
HEXADECIMAL AND DECIMAL 'ORMAT8~
.. CAL.L.ING IEQUENC!i
CALLED 'ROM COMMAND 'TRtNG PROCEISOR~

0057
0058
0059
iHUS0

(

*.

801m' H)(AA
01UJ0

Cels

EQU
EQU
EQU
EQU
EQU
EQU
EQU
EQIJ
EQU
EQU
EQU
EQU
EQU
EQU
EQU

REGISTER DEFINITION8

e
1
2
3
4
5
6

.,
8

9
10

11
12
13
14

115

EQU

1

DEI'
RE'
REF
RE'
REF
EQU
MOV

M)(AR
PTIUM,PTDXP"
PRNTC,PRNTM)(,PRtNT
I"CALT
CBD,C8DSTG
•
R11,2
lAve RETURN, ePL POINTER

1.PROCEDUR! H.AR (CPt. POINT!.'
I-DECLARE t.u~, OtF" OP1. OP2
I-OECLARE (1 COMMAND PARAMETER
33 CPL CONTROL (CPL.
A5 NUM!ER PARMa Fl ••
A! PARM PREIENT (8)
••
5 'tRST PARM 'I_ED
I-DECLARE NUMERIC PARAMETER 'I
2CONTAOL CPA.M POINTER)' ,
2-DECL.ARE (1 CHARACTER PARAM!T
33 CHAR PARM CONTROL.
••
15 'TRtNG LENGTH ,XX
••
! PARM STRING (1) C
2';'DECI.ARE (CPL POINTER, PARMP

•• WEXADECtMAL ARITHMETIC
IUJ8
8109
811111
rUB

ella
811a

IUA
8U5
8116
0U1
IU8
IU9

CLR

R1

ruea

•
•

CLR

fife

D1AA

'*

Move

'PRMPSTeRs'"Re

101a

lAC'

0004
IfH"e

1"0e

09101
ISCA

000C

pUie
11tH

00014

0'0e

lUlU.!

IU21
0122

0'12'

rU23

0124

.*

INCT IHI

••
•HleAR10
•

8LA
JNC

Re,t

Egu

I

'LA
JNC

Re,l

0012
0114

0AUI
1701

0116

CatA
MOV
0111' HXAR20 EQU

0130
0t31

.'H8
00114

C18'
14188

MO\l

0133
eU4

0mlt

cuel

IUie

Ilie
0121

luae

01a9

"1~2

lIH36
11136

lUtE
00a",

1131
(H38

1139
11.U'
8141
0142
1143
81441
IH46

814e
0S4'
0148
0149
1150

00a2
0Q12A

0Q12t.1
0tU'
00214
01112C
a0a!

,ea0
0032
0034

•
•
•
•
'"

A

HlCAFHI1I

HlCAR20

.Rlm,RS
•
R1,R8
Re,Re

06A0

8L

'PRNTC

0000
1013

JMP

HXAR90

MOV
8L.

Re,Rt0
fPRNTH)(

JMP

MXAR90

MOV

Res,R0

'"
ca.e '"

08140
0000
10'"
CI0e

0tU0
0050'

'"
'*

51..

'*

•

Rt0,PTOl"

08A~

81..

'PANTC

I1S2

021314
113e
013E

JMP

HlC'~90

0155

01410

ce.,

MOV

R1,RUI

01Sa
liSA

14018

0'24'
1107

•

'*

~

I-r, PARM PReleNT (1) • 1 TMeN
I' 'IRIT PARA MITER NOT PRESEN
3-0Pl • NUMERIC PANAMETER,
a_PARM POINT!R , PARM POINT!R

a.END,
I-I' PARM PRIIENT ~I) " 1
I' PARM 2 NOTPR!S!NT
3.THEN OP2 , NUMERIC

PARA~IT!R

I.SUM _ OPl + OPI,
SUM IN Rt5

'II ••• ERROR EXtT
2.CALL PRNTHX (SUM)'
A-/. PRINT VAL.UE OF SUM IN MIX

'II ••• ERROR eXIT
a-CALL. HXARPD (SUM)'
A./. PRINT VALUE
SUM IN Dec

0'

I.CALL PRNTC CACOR (PTDI")',
•• ,. PRINT HEADING 'OR or" *1

LI

liSt

"

fMXAAPO

010A
00fUJ

rUlle

"_PARM POINT!R " ADDR r,tRST
ISOLATE PARM PRESENCE 81TS

"""!

'-CAI.L PRNTC (ADDR (PTIUM))'
A./. PAINT HEADING FOR SUM'll/
RUJ,PT8UM

0111fUI

DE'AULT OPERANDS TO %!RO~
"-OPI .. 0,

2-0X" " OPt - OPI'
OlF' IN R'

L.I

.20A

C

a-OPI " 8,

if~'
i'(j

•• HEXADECIMAL ARITHMETIC
1115e

ItU2

fJ 11"

afue

aUH

1111 .. '
021 .. '

00 ....

(

IUI8
lUSt
IU80

alue

lUll

Ilea
Iue ..

••

eeA0

81-

'PRNTIoI.

100~

JMP

H)(ARI~

alac'
CII'

•
•

.eA0
III."

to'ov "',RIl
BL

•

....!' M)CARI' !QlJ
IIU!

sa"'358-'8'1 ••

llA52

B

PAGt: 0"5

• ••• IRRDR IXtT
I-CALL H)cARPD (OX""
PRINT v'~UI ,aR D1"

._,*

.MXA"IIC

•

.tt2

I-RETURN'

IN D

IIAG!

...

Itle

...
...

1117

Itl8
IUIO

. It1C11

It71
e171
11173

1114
1175

It78

1177
et1.

1170

Itl'
1111
8181

111 83

aell
ICIIIA

••••

0ese
0158

lUI I!I I

1'I5A

•...

SAYI R!TURN
a-CAL.L ceo (VAL, DIC STRING),
5-1. CONYERT TO .ICII STRINGt

III.

001121

0012

0eA~

0000
10'3

0188

0414

.e.0 IRS

RUI,C8D

•

...

L1

RUJ,CIOSTa

Ll

RO,e

8L

'PRINT

JMP

H"ARSHIL

8

.R4

000e

0014
00ee

1115

L.X

C

8L.WP .lveAL.T

142~

aeec 0"."
ae.! 12.0

0114

rUle

...

::PROC!DUR! H)(ARPD eYAL), I. III
3-0ICL.AR! VAL 'IXID (I",
3-DfCL.AR! DIC STRING CHARACTER

1151' HXARPO EGU
CllB
MOV

ael5l aliA

01UJ8

•
•

...

IND

a-CALL. PRINT (DIC STRtNG, 8),
PRtNT THI .ICII STRtNG .,

a-I.

•• *. IRROR I!XIT
3-RITURN,
I-IND H)(ARflO,
'-INO MXAR,

o

PAGE 7 of 7

945358-9901**
gel • ge0

•

CONCORDANCE

(

0105
0105

CeOSTG

HxAIt
HXARlA

H)(AR2A
HXARSIA

H)(ARPO
PRINT
PRMPST
PRNTC
PRt.THl(
PTOIFF
PT$UM
Rl
IU0

0010
0019

"11

0080

fu3
Ill"
IUD

Res
R8

R3
RA

(

R,R6
R9

8VCAI.T

0t7~

0152

01157

0181

112r/!

0121

013e

01411

IBee

0131
0155

0141
0160

0148

0125

0138
01"
0t1lJ3
0113
0103
01f1J!
0102
0102
01 ... e

01413

0161
0leH
,U31

0USt

0t44"
0150

015e

0136

01ef!
011A

0113
0118
0101

0081
0082
0083
0084

e011
00'2
0073
0074

112

01e3

0117

0088

011!eg

Iuas

0118

o1fIJ t

0118
0122
012e
01e3
0170

110

R12

0122
01744

0108

ceo

It71

Ille.
0111

0183

10'~

Itl3

euOl

0076
0077

0116
0120

0124

(lJUH~

0130

0133

0111

0127

01~H

0133

00"

017;

THERE ARE

(ura.
0031

8175

SVMBOl.S

...

..,..,.--,'

~"'

----

----------~--,.- ""

015!

017.

o

o

c

+

A[
APPLICA TION
NEXT ASSY

(

(

REVISIONS
APPROVED

~T£

0E5C~1ON

LT..

USED ON

7506
"

.

.

,

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE_'SE S~ECI"'t:D
DI .. ENSIONS AItE IN INCHIl.
TOLEItANCt:S
ANOLES ~ ••
J ~LACE Df.CI .... l~ 010
2 ~LACE Ot:CI .... l . 02
IDt:NTII"YINQ NU".IUtS
SHOWN IN "A''f:NTHt:SES
!'Olt ItE!'£ItENCt: ONLY

c

INTEIt~ItET OWQ IN
"CCOItD.. NCE WITH
"'L,STD100

-,"-

~N

O''''x

/

"

ENGR
QA
APVO

CONTR~

,,/
/'...

/

" "-

DE~ ACTIVITy RELEASE,,"

V
,., ...... ,c

~~

DATy

I

TEXAS INSTRUMENTS
''''('0''100'' A T l D

Equ.""."r Group

OM",

r ....
I

AL, IC, INSPECT CRU PROCESSOR-PX990
SIZE

eCCE !DENT NO

A

96214

SCALE

•

ORAwtNGNO

945359-9901

J REV
,."

SHEET

1 of

4

**

1~8PECT

tRU

P~OCESSOR

.*
lOT

e0~3

.. TULEr

0004

.

ftH1l0fi1
091 0 t1'I

.. RI!VISIONI

flHh~1

PAG! 0002

INSPECT CRU PRocessoR

ORIGINAL

..'* COMPUTER; Q9tl1,ASM
.. ABSTRACT. THIS ROUTINE PROCESSES THE Ie CMC. IT FIAST
CHECKS TO MAK! SURE THAT LOWER LIM C UPPER
'*
LIM ANO THAT THE C@U AOORfSSE! AAE LEGITIMAn:.
'*
IT THEN CALLS THE ~RINT CRU RANGE ROUTINE TO
'*
PRINT THE CAU INPUT VALues.

0008
0009
111111 1 ~

0011

tUU2

.

(UH3

09114

..'* CALLING SEQUENCE.

0All5

B0le

R10.~TR TO tHD PA"M LIST
CMO PARM LIST • NPARMS/PARM PAES LIST

..
..

eMl1

..

iHHH
"Hill 9

PARM VALUES

'*

fd020

..

0021

'*

0022
0023
eCil2A
00125
1Z1026

•

RL

OfF
REF
REF

PRStTS EQll

2~00

CRNU~

FQU

0l"'H~

0A0t

ONlt1

003'"

e~10

CRwtOT

F'QlI
FQU

"0~t

0"''''l?l

R0
R!5

eQU
EQU

R~

EQU

!5
8

eGHI

(II

E()U
EQl)

t~

0034
1'691315
0036
0031

0AIU
01l!0e
0(1!l"JF'

R9

RU
Rl1
IH8

f QlJ

~OIJT!NE

e

21001

00015
00108
"'PleQ

R0,R"R2,R3,~5,RO,R8,A1~,R12,RI5

ICP
PRTCRU • PAINT CRII RANGE
fUNGEX • RANGE E)(TFUCTE~

0028

01!l33

-Iep

DESTROVS

0021

00~2

o

, Ie'

ICP

"20(;110
4

.10
0

C'

11
t!5

c

••

INsPECT tRU PII:OCESSOR

00;)9

(-

f(l0 <4 PI

0000

C3Ce

fllIU1
0A42

1D"'3
01114'

0~02

000.

004!5

001""~
0(110~

004'5
0047
004 ..
0049

000A

000C
0010£

02fU
2000

0(1112

0063

0~14

RIP-If!

"AS'
001.55

0Q!1~

001A

ItHHjR

91001" ERS

•
•

02(1I8
0010

meA0

o 0q!
111100
04e,.

MOV

•*.

9'S3159.;90S ••

PAGE

00Q1~

SAY! RT • tST LEV!L

RU ,R115

GO GET L.IMITS
LI

R8,CRNUM

BL

"UNGEX

8

.rue

SRA
SLA

0840
04.0

(HH51

0P1U

..

eeA0
00il0
rue'

tallies,,,
0~!.52

ICP

••

PRINT tRU

ICP(lle0 Ll
BI..

Rp,ONtfS
R9,ONte

TRUNCATE
!iCI(

lUNGE AND PETU~N

RB,CRWtOT

R8tCAU elT WIDTH

'PRTCRU

£II

NOP

e

ENO

FALL ,.RHU' ON ERROR
tRle

945359-9901**

gel • 981
ClithUM

CRWIOT

leP

lCP0'V'l
ONlfJ

PRitTS
PRTCfHl
RI

"10

CONCORDANCE

0028

01114011

0~3'"

00~2

0

IU31r
0(1152

111024

0"'2P
0021

0041

0048

arne

00'~

1031
003(5

fit"

0Q!36
00131
09132

(UI4C11

. Rle
IUS

0"'''0

0011116

"8

0033

004'

00e2
014A
Ifue

fill

rt!!/13 A

RANG!X

THERE ARI

om .. ,

0e2t!
00U~

PAGE 0004

00tH!!

S"MeOLS

c

•

A[
APPLICA TION
NEXT ASS""

(

Ln.

USECON

REVISIONS
OATE

DetlCMfl'TlON

APPII'OVEC

7506

.

..

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE_ISE S~ECI"IED
DIMENSIONS ARE IN INCHE.
TOLERANCES
ANGLES ~l'

~N
e ......, , -

~ ~LACE DECIIIIIAl~.010

2 ~LACE DECIMAL'" .02

IDENTI ...... 'NG NUM_1tS
SHOWN IN ,.ARENTHESES
1'0101 IOIEI'ERENCE ONLY

.

c

INTER,.RET DWQ IN
ACCORDANCE WITH
MIL·STDIOO

ENGR
QA
APVO

'"/"

/
"J

CONTRy

OIE.Y'
/
.,.-••• ,.c

~~

DATy

/

"

TEXAS INSTRUMENTS
INCOIOlPOIOlAJ£D

Equipmtlrrt

01/,.,

G-.

r._

SDP, IM, INSPECT MEMORY-PX990

ACTI"ITY RELEASE " -

SIZE

CODE ICIENT NO

A

96214
I REV.

"+

SCALE

ORAWINGNO

945360-9901
SHEET

1 of 4..

.'

•• INSP!CT MEMORY PROCESSOR ••
lOT

01303
0004
000t'J

." TtTLEt

0(1108

." REVISION,

000'
41100"
001l1P

8017
0011J

."'" COMPUTER' 990, M4~
." ASTRAtTr T~rS ROUTINE PROCESSES TH! INSPECT MEMORYCIM)
CDMMAND 8Y 8ETTIN~ UP AND CALLING THe P~INT
MEMORY RANG! ROUTr~E (PRTM!M). IT VERI'!!! 1MA
."
LOWER LIMIT IS c UPPER LIMIT.
." CAL.LING SEQUENCE •
."
8L
'rMP
R10~PTR Tn tMO PARM LtST
CHO PARM lIST • NPARHS/PARM PRES aXT8
'"
."
PARM VALUES
."
DESTROYS R0,Rl,R2,R4,Re,R8,RP,R12,Rl .. ,Rl~

0'UP

."

."

£1012

8013
0131.
00115
0018

..

0020

•'"

'''''~H
0022
fli023

"024

REFS,D!FS,EQUS
DEF IMP
REF PRTMEM • PRINT MEMORY RANGE ROUTINE
REF ERROR • ERPOR PROCESS
REF RANGEX • RANG! E~TR.CT!R ROUTINE
L.IM!RP e,QU Il101101

0025
0028

H01

002'

0P100

Rf'.lI

000~

R5

012101
000g
0001.
0A0e
0001'

RS

l/I0~a

0033

c

..
..

00U

003t

INSPECT MEMORV COMMAND PROCESSOR

ORIGINAL

""10

0028
. 0029
0030

'1M'

1M

e:QtJ

"

Rt"

e:QU
EQU
e:QU
(EQU

5
8
9
10

RU5

EQU

R9

rut

EQU

11

c

1!5

C,·

' ",I

•• INSPECT MEMORY PRoceSSOR ••
00a!5

111000

c3ce

0~as

(-

11"11 a 7
"~3~

0039
004"

0002
0P0'
000e

0041

0008

04ce *
0ftA0
0"'0~
100~

11J04~

0043
Ic"U4
004~

000A
0f110C

08A0

0~0!

1000,1

004'

0f1110

0415'

11I00~

••

MOV

RU.IHe

SAY! RETURN • L.EV!L 1

GET I..tMITS

NO

CLR
BL

RS

JMP

1 MP0511'1

MA~

ADDRESS CHECK

IfU NG!)(

PRINT MEMORY
..IMPIUOJ
BL

AND 1)(IT

'PRTME~

0011H1I

10.Hi
004~

..IMP
GO

PAGE 08':$

9"5361l1.99~1."

NOP
1"'P05111 B
eNO

tR15

ERS

,
II

I'

Ii

ii"

i:

(--

!
:

I

•
IRRO~
9811)

980

001241

IMP

0~3e

tMPCJl41"
XPAP 050

0t1'4e

L.tMERR

t1C12?

0~4'

*

PAGE 0004

C"'

"

0041

0Q12~

PRTMe;M

0"'23

RIll)

0~27
0~~1

Rl1

0t:1132

fDf'}I3!5

rotlft

0t113~

0035

R!

0~2B

rote
R9

0It:1129

lUI

945360-9901-k

CONCORDANC!

01(145

0~'4'

VJ~39

0~3(1'!

IUNGE)(
TIolERE ARE

1lI0l2S

001'

004@

SVM130l..S

C

'J,'

','

+

A[
APPLICA TION
NEXT "SSV

(

Ln.

USEObN

REVISIONS

OE~ION

APPROVED

DATE

loUb

.

.

(

.

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OT"E_ISE S~ECI"IED
DIMENSIONS "RE IN INC"ES
TDLER"NCES
ANGLES ~I'
I ~LACE DIECIMAL:!:OIO
2 ~LACE DECIMAL'" .02
IDENTI..vlNG NUM.E...
S"OWN IN P"RENT"ESES
.. OR RE .. ERIENCE ONLY

(

"

INTERPRET DWQ IN
ACCORDANCE WIT"
MIL·STDIOO

"

!~
CHK " "
ENGR
QA
APVO
CONTR

""

/

~//

/

,/~

""

DES7ACT'V'TV RELEASE " "

/

TEXAS INSTRUMENTS
.NCOIIIPOIIIAJ£O

Equipm/lnr GItIIIP

DIll,.,

ril_

AL, INSPSS, INSPECT SNAPSHOT-PX990

NO,./"
/

YI- ••• S.C

~~

DAT7'

"-

SIZE

CODE !CENT NO

A

96214
I REV.

SCALE

+

ORAWINGNO

945362-9901
SMUTl of 4

....
.
...*
..
•.
...
....

flGH.3
,ef"
0015

lillIe
'007
.1.8
.1.9
.010

PROCEDURE INSPECT SNAPSHOT( CPL),
1* INSPECT 8NAPSHOT PRtNT8 THE DISPLAY
'OR A RANG! 0' DE'INED SNAPSHOTS.
*/

CALL RANG!(LDW,HIGH,4,!RROR),
IF .NOT, ERROR THIN DO,
DO UNTIL ALL SNAPS COMPLETE'
CALL PRINT SNAPSHOTCLOWl,
LOW .. LOW + 11
IF LOW .GT. HIGH THEN SIGNAL
ALL SNAPS COMPLET!,
END,
ALL SNAPS COMPLETE.
ENe.
END INSPECT SNAPSHOT,
tOT 'INSPSS'
ISS
• TtTLEI
IN8PECT SNAPSHOT
.. REVISION.
ORIGINAL
COMPUTER' 000,A8H
* ABSTRACT. THJS ROUTINE PRtNTS THI SNAPSHOT DISPLAV
ASSOCIATED wITH ONE OR MORE SNAPSHOTS
CALLING SEQUENCE •
81.. 'lSS
Rtf' , enMMANO PAfUto1!T!R LIST

I/HUt

1112

8013
10i4

"H!
8016

0017

8018
.0U~

•

1020
1021
'022

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

,0a3

1110a4

'0al5

-IAle

,.,a7
,1028
1"20
8010

''''It

101~

REF'S AND OEI"I
DEI'

REI'

1013
1014

litJe

REF
RE'

1037

REI'

REI'

10;tt;

.eJR

REF
REF
REF
REF
"'IF
AfF

.0;39

10040
0041
'0~2
10~:5

1044

8045

1046

18041

'048
IIU9

'05'"
105t

e.ea
'00a
'0e ..
eese
esot;

0

0000
0001
0002
0003
0004

0,,,5
0~0"

0007
011108
100g

.tWORKSPACE
.
EQU

RI

Rt
RII

R3
R4

R5

RS
R7
R8
RI

EQU
EQU
IQU
EQU
EQU
EQU
fQU

IQU
EQlJ

0

188
NUMaNP
'NPENT
SNPTAB

PRTsa

RANGE)(
GETBUF
RET8UF
LIlIP
RIlIP
ACL
RR

REGZIT!R OI'tNtTIONS
0
1
2

;,

..l5

e

7

8
9

0

.(

IN8PECl SNAP8""OT PROCESSOR

00"
0058
0050

000t.

R10

E.QU

000e

fH 1

[QIl

000C

00eOl

0016t

0000
11I1"¥lE

R12
R13
R14

EQU
EQU
EQU

0062

0!110F

RU5

EtW

0063
008.

0~0e'l'

'ISS
*

~QlI

0~6!5

'*

0066

0081

0Ql0'"

"420

0002

0~01?1

0068
0069

0Pi04

01?'06

02218
0V10V\

007.

0Qi08
0rA0A

0t\A0
0P10!l!

0075
0016

(li~0C

lP!0&

0017
16078
001Q

0PlllE

tttA

0~

H'

(

0082
0083
0084

C28el

01i'1ri

0PMI

o!II if!

058e

0086
00U
0q11C

008Q

81tti
\2'1.

(/H~90

0091

o(iHiI 2

0~1['

(jI\ag3

001g4
0ege
00ge
00{11

12
13
l'

15

$

0~1E

042!11

00201

0~00

0~22

(41)6

0000 ERS

%NSPfCT 8NAPIMOT(

•'*

2-/- INSPECT SNAPSMOT PRINTS T
FOA A RANGE 0' O£'IN!D SN
2-

'*
'*

i-CALL AANGECLOw,HtGH •• ,ERROR'
2-1F .NOT. ERROR THEN oor

•

06A0

00815
0P187
00eA

10
11

1.PFH')C!DUR!

2.*/

1..1

R8,NUMSNP

filL

'RANGEX

JMP

158021"

MOV
MOV

Rt0.R7

,.

0012
0Q!lA

PAGE Cl!003

•• LLOC,COPV,LtNK
SLWP .ACL

tieg
0012' 158(1110 EQU

01D8~

210181

94!5~fj2.9901-'*

•

0""'P!

(&1071

0012
0013

'*

••

'*

.

..

...

.
..

3.nO UNTIL ALL SNAPS COMPLETE'
t-lIGIo4 LIMIT
lOW Lt"UT

RP,RfS
S

PRINT $NAPSMOTCLOW',

~hCALL

MOV

R6,Rll1!

aL

'PRTSS

INC

Rt5

C

Rt),R7

JLE

ISS~10

15811120 EQU

".LOIII

LOW

•U

A.. IF L.OW ~GT~ HIGH THEN StGNA
e-ALL SNAPS COMP!..!"!,

3_I!NO,
3-ALl SNAPS COMPLETE'
a.ENO,
S

.L.INK TO PREV WK8P,
BLwp 'RR
RT
END

•

fUT

i-ENO INSPECT SNAPSMOT,
CUPR WKSP

••• • ,8e

•ACL

CONCOROANC!

GITftU"
1,8
IlalU'
11802'"
LWIP
NUMSNP
P.TSI

""

Imse
2I'U',
011se

'H~

0048

1t3

004~

IU

fU~SV,

0,e1

RS

00e~
lIIe5~

",

lUI

".RANGI)(

"P3t

rue1
0.".
"030
0032

I"".

"rue

05181

QU"S

05180

,,,,,

0t1l'"

all'! I"ee

e!'le4
elee

,US3

ItU8

"0'.
0""
121"38
a"a8

r'fTeUF

''''

0.. 4.

"wIP

""3
1(1")4

0

11"'0

' ' 'ENT

"fl13

1",'TA8

003.

TMIRI ARE

.

.J

1103'

0059
0061:'1
0062

"t.
RtO
"2

R8

~

C

.08e

0ru,

'UI
"t!
R12

.;

"".,

.eea
1",8
.081

IGIl4e

IU

UJ

"'8 ra"ot

01183

'031

SYMeOL'

TEXAS INSTRUMENTS
IN CORPORATED
DIGITAL SYSTEMS DIVISION
AUSTIN, TEXAS

DOCUMENT NUMBER

94 ~3(Dl-99f)'

REVISION

SHEET

1..\

o.c.4

•

AI
APPLICATION

(

NEXT "SSy

c.

L.~

USEOON

REVISIONS
DATE

~

"PPROVEO

7506

-

.

(

.

...
i

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE_ISE S~ECI,"IIED
DIMENSIONS ""IE IN INCHES
TOLIE"ANCIES
ANGLES ~l'
J ~LACE DIECIMAl:!:.OIO
2 ~LACE D£CIMAl + .02
IDENTII"YING NUM . . . . .
SHOWN IN "A"ENTHESES
'"0" "EP'E"ENCIE ONLY

".

( .'

INTE"~"ET OWQ IN
ACCO"DANCE WITH
MIL·STD·1OO

~N
e ....."',

'" ~

/

E~R

QA
,,"pvo

CONTR

/

//

""A ""-

NCl'/'/

OIES~'lO.CTIV'TY RELEASE~

./,.""
TI-••• ~.c

q~

DATE/

TEXAS INSTRUMENTS
I NCO"~O"A' E D
011/_,
Equipmtlnt G,..,.,

r._

AL, INWKSP, INSPECT WORKSPACE -PX990

.
SIZE

COCE IOENT NO

A

96214
I REV.

SCALE

"'" +

ORAWINGNO

945363-9901
SHEET

1 of 5

.*

INSPECT WORKSPACE PROC ••

0003
IIJfIl0-4
001115

0001'S

8007
0008
0009
0010

.,011
0012
001~

0014

01t1US
'HUIS
0011'
10114
0f/11~

002t1

00'21
0022

0023
802.4

0eas
01326

0027
0028
0Sag
8030
"1I~1

0032
1"3~

0034
(h'~5

0031'S

'037

803A

0039

1040
0041
(/)042

0111043
80044
'004!5

leus

0047

0048
1049
fJl1H'fIl
01i51

•

*

•

*
*

*

*

*

•

*

•

*

•
•

*

•
..

*
*

•

..

..

*

PAG! 'IUl2

PROCEOUHE INSPECT ~ORK8P.e!(CPL)'
/* INSPECT WORKSPACE DISPLAYS THE
CONTENTS 0' ONE OR MORE OF TH!
USERS WORKSPACE REGrSTERS. INPUT
IS A REGISTER OR RANGE 0' RfGISTERS
TO BE DISPLAYED (NULL oeFAULTS TO
ALL REGISTERS.
*1

CALL RANGECCPL,LOW,HIGH,"',ERROR)r
IF ,NOT. ERROR THEN DO,
MtNT ~ 8' ~.~ - REGS ON tST LINE
DO t • LOW TO HIGH 1* REGISTER RANG! *1
CALL PRfNT('CRLF'"
HIS. CHAR LtsTCr),
CALL PRINT(HEG NO STR),
VALUE. USER WORKSPACE(I),
CALL pRINT HEX(VALUE1,
~CNT • ReNT-I'
IF ReNT .EQ. 0 TMEN CALL PRtNT(tCRLF')'
I'f+1
NEXT REGtSTER *1

'*

ENO

EN"
ENO INSPECT
10'1'

WDR~SPAee

'tNWKSP'

.. TtTLEIXNWI(SP
•
INSPECT WOR~SPACE
* REVISION.
*
ORIGINAL
.. COMPUTERI g9~,A8~
* ABSTRACT. INSPECT WOR~SPACE DISPLAVS ONE nR MOR!
•
OF TH! USER'S WORKSPACE REGtSTERS.
• CALLING SEQUENCE.
•
..

8L '!WP
Ht0 POINTS TO COMMAND PARAMfT!R

..
...
..

..*

PEP"S AND Of""
OEF
~EF

IWP
PRCRLF

Fi'EF

PRNTC

PRNTM)(
IUNGEX
RGSTR

0083

REF
REF
REF

10!S4
105'5

REF

RGSTFU~

REF'

e0e~

FIEF

GETBlJF
RFTaUF

1052

c

~IST

,.PROCEDURE tNSPECT WOR~8'AC!(
2-/* INSPECT WORKSPACE DISPLAY
2CONTENTS 0' ONE OR MORE 0
2USERS WORKSPACE REGISTERS
2IS A RESISTER OR RANG! OF
2TO Sf DISPLAYED (NULL DE'
2ALL REGISTERS.

*
*
t

•

c

2-.'

o

••

INSPECT WORKSPACE PROC

REF
REF
REF
REF

0051
0~tH~
0~59

(

...

011!6~

FiEF

10061
0062

LWP
RWP
ACL
FiR

CUlT
USRWP

121('10£'1

0067

1IJ~01

Rt

E'QU

1

0"'68
006C)
001'"
00171
01fJ72

0"'~~

R2

EQlJ

1IJ(,l!03

R3
R.

EQu

2
:5

EQU
EQlI

5

.WORKSPACE' REGISTER DEFINITIONS

1IJ~6!S

""'Cit!

12111104
1illi'l0!5

0(11i,H5

1/)013
00111

0(1107

¥l075

0008
000g

007~

00161.

0~77

0(11~e

0Q11~

Re
RI5

R1
Re
Fig

tou

fQU
~Q\)

EQU

0

A

6
1
8

EQU
EQ\)

9

RU

R12
Rt3
RIA

11
12

00dtil

0Q10C
011100
000E

EQU
EQU
EQU
EQIl

0Q181

21"'0"

RU5

EQU

1A
15

EQU

$

0019
0~EH!
01j1!8,~

101!l84
e08!5

0(1111J~'

0"'01"
00162

f6.d20
0C1l0t'!

0Q10A

021iHl

0~0~

0171U

0086
001:51
21088
0~~ag

0(110«

0"'04'1

000C

1(112:!

0"9,
Q\Qlg2

0rJ!0f,
0~1~

020e
0('108

0094

0(;112

C1Ct

01i4Y5
fhFJR

0[}114

C180

0tJ1Q)'

0Q11t;

0tiA(II

01'i!18

0(l1111~

QH~g3

0QJ9~

0~1~

'*

0C111C

01~2

01112£'1

02frlJ4
0GHi'l ~
A106

Id h'l3

0"'2~

0814

00211

0I1HH"

00!H

13

1,

*ALLOC,COPY,lINK
BLWP 'ACL.

LI

R8,1I1P

Bt..

.RANGEX

JMP

lWPlJJ;"QI

\,,1

R5,8

'*

MOV

MOV

R10,R7
R9,R6

R\..

'PRCRI, F

•

!

1V!

'*"

2-eALL. RANGECCPL,LOW,HIGH",i,

2."
..
~

.NOT. ERROR TMEN 00'
• S, MAX ., RIGS ON 1ST

~CNT

• LOW TO HIGH I- RI!GtS
UPPER REGISTER LIMIT
\..OlHlH~ REGISTER LIMIT
3.CALL PRtNTt'tRL")'

3 .. 1'0 I

NOP

l(1\~ti'I

0UHl

0tidA

'IWP
*
'*

0Gl11C' lWPQl10 EQU

00IJQ
01~1

RU

0t5A~'

o£II 0 A

0~QV!

(

REF

PAGE 0003

g4!5~e3.gg0l1·*

•
•ROl

1/l1Jl63

011164

(

.*

'*

*

S

LX

R4,CLST

/1

R6,R4

MOVe

.R4,'~GSTRe

... REG
3

•

eMAR L.TITO)'

"",CALL PRINT(R[G NO STR),

••

INSPECT wOAI<8F'ACf PROC

9d53153"gg~1"ft

1ll02~

020A

L.I

R10,RGSTR

0028
(1~2A

0000
06A0

51..

fPRNTC

!!l02C

0P!00

11'"

002E

1011

.JMP

IWP(lJ301

0109

0"'30
0032
0034
0P13ti
0038

C2A0

MOV

"lHHhIP, R10

A

RfiI,RU

Q!03A
003C
003f.

0e AIi'!

eU5
i

1 '
I

••

1ll!0*,

011:i8

1111'"
11111
IU2
0113
0114
flUS

'11e

000~'

A286

A28e

;.

C2'U

MOV

.R1 C11 ,FftCII

51..

'PRNTHX

JMP

I WFH"3Q\

nEC

RfS

JNE

aL

IWP020
'PRCRlF

JMP

IWPA3 01

tNC

Rfj

R6,R7
tWP0I1P

*

1000

0C11"~

et.'i05

011142

fU20

004,1
004~

lf503
015A0
0018'

0121
'122
IH23

0C1146

1004

8124

00.A

*

.

£lees

Ilae

,.

81Ctl

C

11127

00.€

HE8

JI..T

1128

0f1!5~'

13El5
00(52'

11~1

8132

1133

0052
0Q1~4

11310

005e

el~5

11100

WORO OFFS!T

'.CALL PRINT M!X(V4LUe;"

0A20

0000

0ASS

'wRCNT

JEQ
.
lWP030 EQU
•'* ·LINt(

, ReNT-U

•• t, RCNT .f!Q,

~.I.t·l

QHUC

It29
1131'11

•• VALue; • USIR WOR!CSPACE (I),

RI5,~10

IWPf.IJ20

•

~"'IU

0

00100

Itt1
IU1S
111119

fua15

*

PAG!

0

THEN CALL PRt

1ft NE)(T REGISTER ft/

3w!ND
~~

IWP~l~

aw!ND

""

$

t-END tN.PleT WORIE
0701

00141

l~OC

0010

018~

M00060

•M0001.
•

019tl'

ce

JNE

*

0452

~\94

0~7~

007lP MODEl
0201.

0UUIj

0v<114
0P17C
0V7E

06A0
0000

0hH5

0~8""

10FA

0\Y3

0198
"'00~

ERS

R9,~8

ERROR !)(IT
GETHl(N (V4LUI, TER .. , 'L.

••••

R!t'!VCL.! CONV!RSION ERROR

1'12

•

'LAG NO INPUT
0 TMEN CRU (CRU AD
3.1' FLAG
SAVe:

•

TIRM CHAIUCTIR

R7,R7
MOO~7~

H5,8

SET tRU eASE
LOCR R10,cerT WIDTH ..
3.eRU ADDRess • CRU AOD,.!8.
3-1F TERM

•

eR THEN

MOD03Pt

3-ENn,

$

S

2-RETlJ"N,
EtHJ
1..1

.R2
:5
R10,)o1112

8L

'E:R~OP

JMP

M00211!fJ!

B

ENr'l

"OP12"

BtT WtDTH ERRDR

2.ENn MODeR,

•

FLAG • • t

feR,""

SETO R7
JMP MOOPl3t}1

01'1176

v) 1 Y7

MOV
MOV

*
00715' M00100 EQU
007ti' 1'400200 EQU

il189
0UH
0192

0"~8

0~(S~'

0"6£

••••

.GETHXN

C20g

i!119
011H'

PAGE 000.15

001d!1l

0!,l!5A

017!5
0176
0177
017M

••

~.CALL

01tS9
011\11
0171

e17A

(

101(;

••

II.

..

•eftCRwIOT

945364-9901**
5'80

r.:aNCO~OANCE

0Q!f!J9

EIltF\'OR

GElMXN

0H2

012~

00841
0111
0P91

I.H8A
019~

0089

016.4

l.DCR
,..00010
,..r.Ull1J20

012170
0128
0140
0148

MOD040

018~

CHes
0108
0176
0180
0189

0165
01f56

MODI3V'

"'OD0~0

MOD060
,..00010

MOD100

tU!i2I

iHHH5

0119

0!'J196
010!5

0070

0158
Fll"
IU.

IU08
lUlU
flU 10

'HO

NI

FlI
lit 4

liU03

0ue

0133

0UH

0152

0U53

Its'

0U'~
019~

0138
(/IUH
0122

011g
0'75

013111

012"
019~

0113
0111

."•. "c.

0097

III 113

<4.,..;)

0192

lite

01.0 t

0115
011'
0181
0tA!

0102
eUJ3

0146
0160

0149
011(11

GU04

0t159

011'"

fill

ARE

C

018'

fit!

THERi

01901

0137

198
0099
010P

fit,
R8
R9

011U~

CH74
0172

M0
Ml
lue

0106
0107

0176

0123

01152
0&188
IH36
0090

MUe

0use

0131

0100
121112
0193

FlU

01i1fl1

0144

,..0020111
MOCCRLJ
MOD!l

PATCRU

01A~

PAGE 0006 of 0006

it103.4

0126

0HH

0U5~

0t80

0111

0180

018t

01;13

013'

0141

0152

0U53

0160

0113

0142

fiB 43
0lA9
0ie.4

0U.4
0U"

0'1'
14111

0111

0183

0186

SVMBOt..S

0180

•

A[
APPLICATION
NEXT ASSY

USE:O ON

(~

REVISIONS

CESC......,.ION

LTIIII

APPfItOVEO

OATE

7506

I
Ij

:1

1

(

•

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNL£SS OTH£_IS£ S~I:CI,"II:D
DIMENSIONS Aln IN INCH • •
TOLEIU,NCES
ANGLES ~l·
~ ~UIoCE DECIMAL:!: 010
Z ~UIoCE DECIMAL :!:O2
IOENTII'YINQ NU....1l1tS
SHOWN IN ~Alllt:NT"ES£S
,"Dill IIIE,"£III!NCI: ONLY

(

~'"'

INTEIII~III£T OWQ IN
ACCDIIIOANeE WITH
MILSTD100

,

~N
CH~"
ENGR
QA
APVD

/

L

"/ ,,
'-V'

,.-

...

V
,.(

ACTIVITY RELEASE

TEXAS INSTRUMENTS
I"COIII~OIllA'I:D

Equipmtlnt

OM.,

G/'OfIP

r...

AL, MODME, MODIFY MEMORY-PX990

CONTR~

0IIE.7

~~

OATY

"

SIZE

CODE IOENT NO

A

96214

"•

SCALE

J

DRAWING NO

945365-9901

REV
...
~

SMI!ET

1 of 4

•• MODIFY MEMORY PROCESSOR ••
00113
IUUJ .10VH5

lOT

PAGE 0".2
'MOOM!'

'*
'*

TITLEI

'*
'*

COMPUTER' 900,A$M
A8STRACTa
DIS'LAYS AN~ ALLOWS TME USER TO
MODIFV ONP nR MORE caNS!QUTIV! WO~DI 0' MfMORV

MODMf

MODIFV MEMORY ,Mar,ISSaR

o

'* REVISION'
•
ORIGINAL

tlIIJflH5

8081
IH!l08

fUIIO

'*
'*

ill 1QI

•• U

.012
1013
.,01·

'*
''**

'*
'*
'*
'*
'*
•''**

""l!

'''UI

0111
ee18

i!.U~

0020
"021
f6022
IU23

CALLING SEQUENce,
SL
'MOOMIM
Ht0_ POINTIR TO COMMAND PARM LXST
tMO PARM LIST. N PA~MS/'A~M PRES SITS
LOCATION
Of8TROYS R0,Rt,R2.R3,.4,R~,RO,Rt2,Rl.-,Rt5

REFS. OfF!

'*

0024
102!5

eEl'
REF

8'ae

~e:pr

REF
REF

0027
102e
Iq,29
'0~Hl

8031
8032

1000

e03~

00"~

8034' ,
103!
103'-'
8031

''**
'*
ru

!,QlJIS

R3
R!S

EQU"
FQlJ

e

E'QU
EIlI)

a
9

Rll

EQU
EQU

11

RUt
BVTI!

EQl.1
EQU

8

Re

0~0C1

R~

elne

0(110.

RUI

001e8

00~0

000'
0A08

c

3

[QIJ

IPlee
II fill fU

8039

MOOMEM
G!TJoIXN
elAN"
PRTMEM. PRtNT MIMORY RANGE ROUTINE
RANGEX

10

t!5

o
------~-~-~-

..

----~-

. .-

...-.~~-

. . . ~-~~-

••

MOOIF'¥'

~EMlJRY

PROCESSOR

(

0010~

(00144

C3Ce

10045
0~46
IIH~47
rlH~4~

0002
000A

"ACe

012149

000~

0"'08

1801
0588

000.'

11l6AIi'J

000C
0"'0E'

0Pl0m

01fl6C1
2111.161

0"'01.'

1001'

kHHS5

0fJ16f\

(

0fHi7

006H

eLR
MOVe
IN!
tNC

MOOC/HI)! EQII
BL

JMP
..
PRINT LOC
.MOO010

RS
.. R10,~3
MOO00e
RA
$

'RANGEl(
MODt?13~

AND

06A0

8L

"PRTMf~

0CJ116

1/1000

0tUa

1001.

JMP

MOO030

001A

0!J11C
0!J11E
01'120
0022
002A
002f1l

I3L

1007

JMP

MOO03Cl!

CACI.

~OV

R10,"~3

01)172

e02B

C;~83

0{l12~

eH5CA
l(11F1

002C

CB

ge00
000!'1l

0V113
01i'74

... 8ET
..
1'40002'"

JNE

~OV

'II

RETURN
..MOOQl!!QI
EQU

002!'

0\~8l71

00fnlc1 ERS

j

~,1

RO,'8LANK
MOOIiJ!12I

IF TERMINATOR

R!,~Hl!

'II

045'

.1

'GETfotXN

INCT R'0
JMP MClO01~

0~1f1i

0P12E

II

ESC ERROR EXIT

FOR NEXT LOCATtON

Ie.H~1f1i

0t1\17
0(.118

RQ,Rl!J1.RANG!
R31lSAVEO lOC

GET NEW VALUe:

06A0
0P1fDQ!

1603

IF !RROR

VALUE

011114

...

SAVE RETURN

CALCULATE LOCATION

R10 ~ R9
R9,R3

C241.

0 r"70
0'nl

0l711g

Rll,R1e

MOV
MOV

0~12

0f.i.l69

('

....
..

Mav

CQlCC

21"'101

01i'162
I/lIJJ63

0V!64

MOOMEM

0('101.

005'"
.0051
00e2
0053
0iA54
0Ql5!"1
005'-;
0057
00514
0P159

PAGF. 000:5

fVE'N

0042
1i:'l~4J

94e>~6e\!ll;Vt1l1 ••

'II-

e

ENO

$
.Rl~

R ,. 0-NEXT

CONTINUE

lOe

NOT

A Bl..ANK

945365-9901**

,e0 •

•BLANK
BvTe:

981

CONCORDANC!
APel
00215

0"'78

0025

0~64

MOD00!S

00(51

MOD0' ~~

0001
0 f11 72
09178

00e:s

004~

(1)(1124

PATM!"
Re
Rt0
RU
RtO
It:!
R5
RS
R9

C

0"81

1i104f1l

Gl!lHl(N

M0002'"
M00030
MODMEM

PAGE 0004

~'''49

£1074

0""6(.\

I3P27

0059

"~37

0048

00157

rUI38

0""3

0Q1fH5

001.5*'

0068

0072

011166

0Q172

0032
0043
00148

""'39
0033

eft73

0019

0A58

IdPJ34
09135

0036

IUNGf!)(

THERE ARE

011119

0!!'47
0051

00(50

0~2e

0G1152

0Q!5M

0087

SVMeOLS

o

0 ·,

,.

•

Ai
APPLICATION
NEXT .... SSY

(

USEOON

REVISIONS
....PPAOVED

DATE

DESC.-..ION

L,",

7506

·
·

(

.

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE_.SE S~EC'~IED
DI"'ENSIONS .... "E .N INCHIES
TOLEIt .... NCES
.... NGLES ~l'
• ~LACE DEC."'....L:!:.O.O
2 ~LACE DEC''''AL +02

~N
eENGA
..."""

'DENTII'YING NU"'.IE...
SHOWN .N ~AItENTHESES
~Olt ItE~EItENCIE ONLY

QA

iNTEIt~"ET

(

"

DWQ IN
ACCOItDANCE WITH
""L·STD·1OO

"PVO

'""'/

CONTA~

~

7

/

/

TEXAS INSTRUMENTS
'NCOIt~OIt"'I[D

0.1...

EquiptNrrf G~

r....
.~

AL, MODREG, MODIFY REGISTERS-PX990

•· ."

~;.

""

OE~ ACTIVITY RELEASE

TI- • • • I·C

~~

OATE/

"\

SIZE

eCCE IOENT NO

A

96214
I REV.

SCALE

+

ORAWINGNO

945366-~90l

SHEETl of 6

,~,

100;!
113001
1005

81306
1001
1008
1009
101l1!

8011
10112
0013
"014
001 !,Ii
09118

0011
0018
001A

0\1121'1
0~21

0022
0023
8024
e~2e

..
..

..
..
..

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

*

..
..
..
..
..
..
•
•
•

0028

..

''''21

•
..

0028
0029

*

8030

*

1032
1033

..
•

80,B

10;) ..

fUne
011J3fS
0031
IlnR

103g
1040
1041
11342
0!U:S

1044
"04!S

1046
1041
rUl48
1040
0090
IiHU51

111102
'~5~
0fU,..
'059
'056

•

•
•
••
..
•
..

*

•
•
•
•

•

•..

PROCEDURE MoorFV ~EGl$T!RS(ePL,FL.G',
/* MODIFY ~EGIST!R8 PRINTS TME
USER PC, wp, ST AND .LL~WS 1H!
USER TO MODIFy ANY OR ALL OF TH!M

c

*/

• LOCC'WPe'l,
STRING. LOC('PCe'"
Pi • LOCCU8ER PC)
C.LL MRSUBtSTRtNG,Pl)
Pt • LOC(USER wP',
CALL ~RSUB(STRING,Pl)'
STRING. LOCt'ST-')'
Pi • LOCCUSER ST)
CALL MR8UBCSTRING,Pl'
RETURN,
END MODIFY REGISTERS
PROCEDURE MRSUBCSTR,PTR),
IF ,NOT. NO USER INPUT THEN CALL PRtNTC'CRLF')'
CALL PRINT(STR),
CALL PRINT HExCPT~.VALUe),
IF FLAG, INSPECT ONLY THEN RETURN'
CALL GfT MEX VALU!CNO LEADING BLANKS,
HEX VALUe.ERROR,TERM CMAR,NO USER INPUT),
IF ERROR TMEN R!TURN(ERROR),
IF ,NOT, NO USER INPUT THEN DO.
PTR.VALUE • HEX vALUr,
IF TERM CHAR .NE, , , TMIN RETURNt'CR')'
END,
ST~ING

RETURN

ENO MRSUa
IND MODIFY REGIST!RS'
lOT , MOOREG ,
MR
TITLE.
MODIFV REGISTERS COMMAND PROCESSOR
IR
INSPECT REGISTERS COMMAND
REVISIONI
ORIGINAL
COMPUTER' 990,A8M
ABSRACTI MR PRINTS TH! PROCESSOR REGISTERS (WP,PC,ST)
AND ALLO~S TH! USeR TO MODIFV TMIM~
CALLING SEQUENCE
8L 'MRP
R10 , POINTER TO COMMAND PARAM!TER LIST
BL 'IRP

REFIS AND OfF'S
R!F USRPC
REF USRWp
REF

lJSRST

D!F

MRP
lRP

OEF

J(fF

REF

PR I. NT

PRNTHX

c

** MODIFY USER R!GISTERS **
REF

PRNTC

GfTHXtlI

0060
0061

PEF
REF
REF
REF

0062

~EF

""'83

REF
REF

1d0fS1
01'1158
21059

1iJ064
tHIIl'S!5

REF
REF

0'116';
0061

I!H!ltSQ
0~1r"

051! 0 0'1
001111

16071
0072

0"'02

0073
0074
01'176

000~

001214

000!5
13006

001e
'/J01.,
0079
008H
0081
1il082

0083

0084
00815
008(1;

0088
0080

00gVj
1(1091

0092
01'.1193

0094
00915

0QlgA
00Q1
0098
0099
'Hep!
0101
0102

01110'"

0001

fCW

0

EQU
E'QU

1
2

EQll
!'QU
EQU

3
4
5

R3

R4
R5
RS

R9

EfilU

9

0C/10t.
00ri1e

RU

EQU

10

RU

EQU

11

0(l10C
0000
000E

R12
Rt;!

''''

Rl~

EQU
EQIJ
EQU

14

000'

rHe

1e

03

•WPSTR

EQU

peSTR

BYTE 3
TEXT 'wp.,
8YTE 5,.0,.A

STSTR

BYTE 3

51

000'

0!5

000r5

11'0

001216
000'
000A
0Q10B

01.

50
0~

Rft

R1

•

0Q10f

0'20

0010

0012

0000
0,tC4

0014

100~

o(!I 1';

{!t01e' MRP

••
•
•••

13018
rU06
0t07

001,4

6

7
8

1~

n:XT 'PC.'

TEXT 'STat

!5~

0l11et' lRP

0103

0UJA
01015

*
Rt1I
RS
R2

EQU
EQll
EQU

0"'01
0001
0"'00

0078

0081

BLANK
GeT aUF
RET8UF
LWP
RWP
ACL
RR

*
.WORKSPACE
REGISTER O!'INITIONS

"1-168

(

PRC~LF

•

EQU S
.ALLOC,COPY,LINK
BLWP .ACL
JMP

CLP

R4
MRP00!5

feW

s

i-PROCEDURE

.ALLoe,COPY,LINK
BLwP 'ACL
SETO R4

~ODIFY

R!GtST!RICC

2-1* MODIFY REGISTERS PRINT. T
2US!R PC, WP, ST AND ALLOW
2USER TO MODIFY ANY OR ALL
2-*1
LINK TO NEW WORKI'ACE

*.

MODIFY USER REGISTERS ••

011~

011t
0112

1115
8116

IU?
0ue

..

001C
0(l11!:

2.1'1 • LOCCUSIR PC)
002(11
00'122

020tJ
0021'"

002'

f:)I'~0

0026
09128
2102.A
1102C

004C'
100!'
21201.

0113
0114

c

001 C' MRP0fH5 EO!'!

0UU
fHeg

L.l

R6,USRPC

JMP
LX

MRPP!ltf!
R10,WPSTR

I..r

RfJ, !JaRWP

'*'

00ltHII'

002l!
0~3P!

0eu.,

."

8L.

004C'

1121
012'
IU23
0124
012e

191211

JMP

02211.
00211.'

Ll

00~U

luat

020e

0P13E

001110

21038

..

L1

R6,USRST

Bt..

.MRSUA

1126
06A0
004C'

0121

rlUae

10210
NOP
004e' MRP010 fQU

IrH29

•
•..

fU30
0131

0132
1133

It34
81315
0136
0131
fU38
0139
0140
IU41
014112

1143

01114fi1

21420

004A

04ee

01ue

e14!!i
0146

It41

111148

IH

011l4C' MIUau8

!QU

I

C14e

MOY
MOV

RU ,Re

MOV

R4,RA

.

Cl04

1303

JEQ

0~f5A

0C5A0
0P100

BL.

1~0m

NOP

a.PROCEDURE MR8UI(STR,PTR),

RU'.R~

MRS00e
'PRCRlF

0t.115A' MRSAiHl EQU

00t5A

C283

"'"
(5C
le!S!

06A0
0000
0455

01600

It49
Il~~

a_RETURN,
a-END MOOIFV REGISTERS
*LINK TO PREY WK8P, RET eURR WKSP
8LWP .RR

21(;!(50
00(52

et44

$

0fiHUl

ceCA

001(56
0t11t5S

IF ERROR OR TERM FROM USIR
i_STAING • LOC('ST~'"

0f118'

..

.

MOV

81..

'!'RNTe

o

MODIFY lJ$!R R!GtSTER$

--0151
(

0152
0U'3
0US'
0U5!5
01156
IUS'

0158

0Q1()"
0£l!66
0068

006"
006C

0163

CUI4

06A0

0000

0072

"'!U5

em7.

ceeA

016011

elete

06176

IiH~0"

011178

01615
fUS7

007"
0'7C

0000
1301
064e

fU6&

0169

0170

017'

0172
0173

011l7f

0"'7£:'
0SC!

0080

".55

0174

('

•

1308

006E
0070

0161

et62

8L.

'PRNTHX

B

.fH5

MOV
JEG

R4,R4
MRS01rt'

0000

luse

g.Hi:56e.SSU,I**

*

0leQ

01et0

~HU0

••

ill?S
0000 ERa

8L.

'GETHltN

*

e

.RI!

MOV

RHII,.F(t5

*

•
•
MRS0UI

•.

00~5

a.IF FL.Ath INSPECT ONL.V THIN ".
3-CALL. GET HE)( VAL.UE(NO LIADIN
CHA",ND

.-IoIE)( VAL.U(,ERRaR.T!R~

*

•.

PAGE

ce

3.IF .NOT. NO uaER INPUT TH!N
... PTA.VAL.UE II H!l( VALUE'
._IFt TERM eM .. R ,N!,

t

, TMEN

R

R9,'8LANt<

JEG MR8010
DECT Rts

EQU a
INCT R5
e
wRS
!NO

3-1F fRROR THEN R!TURN(IRROR),

FORC! 'CR' RETURN
3-ENO'
3.RETUfitN
'

I
,

I

2.!'NO MR8U8
I-END MOOt'" R!GtITERSf

Ii
, rl
,:' :1

.,e. I.,

CONCOROANC!
011110

'VMBOLS

~-'"

'~

c
o TEXAS INSTRUMENTS
~
'Ut

INCORPORATED

DIGITAL SYSTEMS
DIVISION
AUSTIN, TEXAS

DOCUMENT NUMBER

9t\ ~~(. ~.99£>1

REVISION

SHEET

b~lo

•

A[
APPLICATION
NEXT ASSV

(

USED ON

REVISIONS

~"""'ION

L,",

APPIItOVED

DATE

;,

7506

.

(

I,

_.

...

!

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLIESS OTHIE_'SE S"CI~IED
DIMENSIONS AItIE IN INCMIE.
TDLEItANCES
ANGLES ~I·
• fO\.ACE DIECIMAL~.O.O
2 "LACE DECIMAL~.02
IDENTII'YING NUM. . .
SHOWN IN "AItIENTMIESIES
ONLY

~Olt ItE~EItENCE

c
.,

INTEIt_1T DWQ IN
ACCOItOANCE WITH
i MIL·STO·lOO

~N

/

C ....." "
ENGR

QA
APVD

CONTA

""""'/
A

r«J/

/

"".""-

DESIGN/T'V'TV IllELEASE

/
Y'-... ,.c

~~

DATE/

TEXAS INSTRUMENTS
''''CORPORA' ED

0./_.

Equ.".,r GIIII4D

r._

AL, MODUP, MODIFY WORKSPACE-PX990
SIZE

COCE IOENT NO

A

96214
I REV.

SCALE

+

DftAw!NQNO

945367-9901
SHEE'T

1 of 5

.

PAGE
00l0~

01;1""

•
•
•
•

0!110A
e0il1Q

*
•

o£:'I °4
10ee
0001

e0it"

eel1

0012
fcHII13
0014
IiHU~

"01e
lilli'll'
0018

011119

*

*
*
*
•
*
*
*
•

I\'

*

PROCEDURE MOOIFV WORK8PACfCCPL)'
/. MODtFY ~ORKSPACE ACCEPTS AS INPUT
A USER REGISTER AND PRINTS T~!
CONTENTS ~F EACH M!GISTF.H AND ALLOWS
THE USER TO MODIFY tT,
*1
CALL RANGErCPL,LOW,HIGH,r,f,fRROR),
I. RANGE IS FAOM USER SPEcrFIEO REG
TO MAX POSSIBLE REG *1
IF ,NflT, FRROR THl!N DO UNTIL FfEGS E)tHAUSTED
OR USER eR,
REG. CLST(LOw)
CALL PRINT(HEG 8TAl
1* CR,lF,'RX.' */
RGPTR • LnC(U$!R WOAKSPACECI",
CALL PRINT HEX(RGPTR.VALUE)
CALL GET HEY VALUECHEX VALUE.
TE~M

er;,2!11
"£!lit

•
•

0022
0023
0P1i4

I\'
I\'

END,

1il02~

I\'

LOw

0026
0021
0026

.,

0029

I\'

003111
0031
0032
0033
00311

I\'

00J~

00J6
0031

00;'A
0039
0040
e041

eV!42
fH~43

0044
8HU5
1&046

fH1I41
'0t1H~

'lUg

lue0

00151
iHU52

THE SIGNAL USER CR,
USER wnRKSPACECI' • HEX VAlU!'
IF TfRM CHAR ,HE. RLiNK
THE~ SIGNAL USER c~,
II

L'c)W+l1

IF LOW .Gr. HIGH THEN SIGNAL
~EGS EXHAU8TEO,
F,NO'

EXHAUSTF-O.
lISF.R CR.
•
ENn MODIFY WORKSPACE
TOT 'MOOW""
.. TITLE'
MOOWP
*
MODIFY ~ORKSPACE
~EGS

•

ORIGINAL
COMPUTER; 990,ASM
• ASSTRACT, MODIFY WOR~SPACf PRINTS THE C"NTfNTS OF
•
A USERS WORKSPACE AND ALLOWS TME USER
*
TO MOOlFY THEM,
* CALLI~G SEQUENCES
..
BL 'MOOWSP
*
R10 II POINTER TO COMMAND PARAMETER LIST

*

••

REF'S ANO OEF'S
OEF' MOOll4SP
REF USRWP
REF CLSf
REF'
PRNTC
/(EF F'FlNTHX
REF PRCRI..F
REF BLANK

IfUJ3

REF

GETH)(N

011154

REF

IUNGElt

0055

FIEF
REF

RGSTR
RGSTRB

005f11

CHAR,~RROR',

E~~OR

IF

•

..•

~002

c

PAGE 000:5

REF
REF
REF
REF
REF
REF

0f1e1

0"'58
IfH;'5Q

(:

o!'-16 VI
'!hH51
0~'62

0~'6 ;,

*_WORKSPACE

~H164

l.11'16"

•

IIh16 '5

0Q10~

l/lV101

0~!{l1

~NH~

0~~~

RI1I
R1
R2

0('160

0011!:5

1'3

1/lV:7r1

001 It'l 4
01A0!5

R'
R!5

0",~t}

0Vl11
0012

F.:QU

EQU
EQU
f" GIlJ

fQU

GE,TaUF
RETSUF
l.wp

RwP
ACL
RR
REGISTER O!FINITIONS
OJ

1
2
:5
4

!QU

~

EQU

6

fGW

1

0In;~

0"'11'11

RtS
R1

0W14
0015
011\111\
0f/t'17
0018

0",,,,8

RE!

r.QU

000:;>

RO

E'QU

0~1lIt.
0~0~

R 10

EQU

9
10!

0""0C
0V1r1!D
00tt'E

lift!
R12
IH J
IH 4&

EQU
FQU

11
12

EQU

13

EQU

14

0~al
00e~
~Vle3

0r;11?!F

R15

EQII

15

0(~e4

0~0~'

001Q
011i1h"

kl~e5

0V18R

0(}!0~

042~

0~\12

0019~

rlHl!9J
~0g4

".ca

0P19!S

0 P1 eA

0096

0(1'l0f'

06A",

(!I9'I~fii

0P10!?!

01HIA

1025

000C

f11201

01l10r

1210111'

0IAgq
~1i(IJ1

o(i111'1

C t8~

01(1)2

0"'12

8161
112m

01i1)~

0~lA

0'~4

fdG'll~'

Itlh'l~

0\l6f1l

MOOWSP EQU S
..
.ALLOC,COPY,lINK
~LWP .ACL
2-/* ~OOJF' WORKSPACE ACCEPTS
A USER REGISTER AND PRINT
2cnNT!NTS OF EACH REGISTER
2·

•
•

00!H
0092

1160

..*
..

0081
0088
011189

((j

a

01'11'"

02filA

'1(:111P
0V1lA

0"'00
Ali1'1~

•
-••
•

2-

2.eAlL

JMP

MOO9l3P

R1,,,'

C

Rq,R6
R1,R6

JLT

MOD03P'

MOV

..,OOqlU EQlI

•

RANGECCPL,LOW,M!GM",~.

2./* RANGE IS FROM USER SPECI'
2.
TO MAX POSSIBLE REG *1

Ll

•
•

THE USER TO MODIFV IT.

2",·/

LI
A

S

FORCE HIGH LIMIT
2.1F ,NOT, !RROR THEN DO UNTI
2.0R USER CRI
LOW

I..t~

110e

IAtC
0AtE

DAtA
elall)!?'

0020

leA"

00a~

eUt
e112

002.

0tU0

002C

000q)

811'

0~a!

0ur;

00130
0032
8013'
rlUl3e

0000

eus

eU1

eus

l.I

R10,RGSTR

BI..

'PRNTC

JMP

MODPJ3Ql

Mav

'U8RWP,R4

011Htl0

101 ;,

Ct2e!

'"

Ales

A

Re,~.

A10e

A

R6,RA

C2~4

MOV

elL

.RIIt.RU
'PRN1M)(

JMP

MOD~30'!

0121

003"
003A
003C

012e
It83

00.00

00.3!

HUll!)

eeA~

e12e

0040
0042
0044

IlIA
1129

f/l6ArD

..

BI..

'G!TH)(N

JMP

MOOL?l~UI

MOV

Rle,.R ..

a.CALL GET H!X VALUE(H!X VALUE

A_TERM CHAR,!RRDR),
3-IF ERROR TH! SIGNAL USER CR'
ROB0 • TERM CHAR, Rt0 ·~R8L

0000
UH:l'

C!50A

fatUI

8131
8132

...

...

lUI.

euus
ela1

STR)

NOP

IU9

IUR0

P~INTtR!G

CR I l.'

0000
1000
0201.

e02f1i
0tr1as
002A

1113

a-CALL

'"

...

...

•

10.8

ca

R9,'BLANI(

IN!

MOr,H13P1

A.US!R WORKSflJACE (I) • HE. VAI..U

0

4-1' TERM CHAR ,N!. BLANK
!.THIN SIGNAL USIR eR,

004A

8133
e134
8135

004C

1136
el31
il138
etag
fll1.0

e141

It.2

81143

81'.

et."

et4t1l
8141
8148

1149

•

leA!' M0002e E~U
...
INC
0158e

...

1iH'15f1

00a2
00541

8tCe
t1501
10Ut

'"

•*
•'"

C

JGT
JMP

3-l0W • Low"'lI
Rfl

RI!I,R7
MOO G'l 3
M000U

3-tF LOW .GT~ HIGH THIN StGNAI..
4_REGS EXHAUST!D,

!.'I

a-!NO,

a-REGS !)(HAUITID~
a-USER CRI
t.END ~OOtFY WQRKS'ACI

MOD"'~fJ

...

•

EQU

$

*LINK TO PREY WKSP, RIT eURR WKSP
8LWP 'RR
~T

rNO

o

945367-9901

,gee •
(

g80

0UA
0P86

00152
0046

0132
iii Ulf{

t!l~84

GE1BUF

00e7
0A!5~

I,.IIIP

00!50

MO!')wSP

"'004
013~

CBI!!~

~[.l\8"

00Ae

Qlr)l6f1l

iH

0067

R10

0016
0'1>77

R13

0[117A
0",19

FUA

0[118'"

FU2
Rt~

0081

R2
R3
RA
RS
RfS
R1
RS

0.~6~

RS)

0147

QJ11.d

(l!U?2

0121

0'~3

0141

0'26

0trl13

0(,114;

011 Ii'!
0113

0"'5(,11

0121

0112

012~

0129

0HHS

0t01

0108

0111'S

0U7

P'!Ofl

012'"

0U1

0102
0102

0107

0111

0118

'H37

014P

00~1

PRNTH~

RU

7

0!41

R0

0!3~

0142

PRCIofLF
PHtliTC

(

00161

Ge:'H~N

MOO':'l2~
MOO~301

PAGE

CONCORDANCE

At\..
8\..HiK
CI,.ST

M000101

,'o~

0P169

0P170
21071
0072

0~H~8

00-13
0014
00715

"0ge
0101
0054
005e
CHII!5 !5

fU~GI! X

RETnUF

0132

0096

0Q15t5

0112
0108

RR

0062

0149

USR\IIP

0041

RGSTR
ROSHiR

RWP
TMt.RE ARE

0"'6~

"031

Q'lt16

SVM80LS

014fl!

111129

0005

c

c

+

A[
APPLICA TION

(

NEXT ASS ...

USED ON

REVISIONS
APPROVED

DATE

~

L.TJIt

7506

..

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHEItWISE S~ECI~IED
DIMENSIONS A"E IN INCHES
TDLE"ANCES
ANGLES c!"l·
»PLACE DECIMAL+.010
2 ~LACE DECIMAL +02

c
"

IDENTII'YING NUM.E....
SHOWN IN ~ .. "I!NTHE.ES
,.0" "E,.E"ENCE ONLY

~N
CM'"
E...oR

Q"

INTI!"~"ET OWQ

IN
ACCO"DANCI! WITH
MIL· STD· 100

APVO

',,-

/

/

A

'"

OES""ACTtvtTV RELEASE",

TI-• • , •• C

~ TEXAS INSTRUMENTS
INCO"PO" .. J £0

Eqv.""""t GI'DUp

DIII_,

r __

AL, OVERLAY, OVERLAY PROCESSOR-PX990

"'/

CONTR~

V

~

DATE/

'"

SIZE

COOE ICENT NO

A

96214
I REV.

SCAL.E

•

ORAWINGNO

945368-9901
SMEET
1 of 7

•• OVERLAV PROCESSOR ••
0003
8004
000(5

001216
0007
1008
e0fiJP

"H~

IIHHl

'~12

1013

0014
'HUS

eflll e

*'*
*
'*
'*
'*
'*
'•*
'*
'•*

•

8034

'"
'*
'*
'*
'*
*
*
*
'*
'*
'...*
'*
'*
'*
'*
'*
'*

1035
'038
8031

''"*

0011

rUts

0010
8020
1021
0022

. 0023
1024

102e
002~

0021

• "26

01329
e0~0

00,'1
8032
e0~3

fUJ38

8039
1040
8041
1042
11443
8044
8914"
Ifl4«5

0041
111)48

'*

'*

''**
'*
'*

'*

'*

.•
.'*

ai'll,..

''**
'*
*
•'*

1015
8058

'.*

1049
e015~

10151
10152
8~53

•

o

PROCEDURE OVERLAV,
I.

. OVERLAY IS RESPONSIBLE FOR
MANAGING THE PX8ge TRANSIENT
~RfA. TH!S INCLUDes,
1) DISASLTNG COMMANOS FOR T~f
CURRENT ARP!A.
2) CALLING TME LOADER TO lOAD
THE NEW OveRLAY.
~)
ENABLING T~£ COMMANDS IN T~E
NEill ave-RLAY.
4) eUTLnYNG A TRANSFER VECTOR FOR
USE BV THf OVERLAY IN CALLING
'HI! SYSTeM.
*/

OECLARf.
TRANSIENT AREA('0e) FrXEOCte) CONTROL TPTA,
VfCTOR(2) PTA CONTROL TPTR,
/. SVC CALL */
r>ECLARE
1 COMMAND ENTRY CONT~OL CPTR,
2 COM~'NO STRING
CHAR(2),
2 COM~ANO ROUT
POINTER'
CPTR ~ LOCtTAANSIENT .REA) • l!NCV!CTOR),
00 WHILE CO~MANO ENTRV .NE, 0,
CMDPTR • LOC(tOMMAND TABLE)'
CCNT • NO CMOS'
00 WHILE cCNT.e,
IF COMMAND STRtNG ,N!. CMOPTA,COMMAND
TMEN DO,
CMOPTR • CHDPTR + LENCCOMMANO)
CCNT " CCNT .1'
END,
CPTA " CPTR • L!NCCOMMANO INTRV)'
ENO
BUS. I..OC CINXTl
CALL LOADCFLAG,81AS.!RROA)
IF LOAD SUCCESSFUL THIN 00,
CPTR • LDC(TRANSIENT AR!A)
Da WHILE COMMAND ENTRY ,N!. 0,
CMOPTR " LOC(COMMAND TAILE),
ceNT " NO CMOS
00 WHILE CCNT.e,
IF COMMAND 8TAtNG ,EQ. CMDPTR~CO~MAND
TMEN 00,
CMOPTA " CMOPTR • L!N(eOMMANO),
CCNT • ceNT -1'
END,
CMOPTA.COMM.ND ave ROUTINE I COMMAND ROU
CPTR " cPTR ~ LENCCOMMAND ENTRV),
END,
(NO,eL.!! on,
/* tNOIC.TE NO COMMANDS ./
LOCCTRANsreNT AREA) , 0,
fNtH

L.

o

•• OVERLAY PROCESSDR ••
0Q1e1

tOT

• TYTlEt

0058
0f?1tSQ
006(11
0'061

•
• REVISIONI
•
ORIGINAL
• COMPUTER. 990.AS~
• A8STRACT. OVLV IS RESPONSIBLE FOR MANAG%NG THE
•
PXQ90 TRANSIENT AREA. SP!CIFre.L~VI
•
1) DISABLE COMMANDS !~ CVRRENT OVERLAY.
•
~) CALL LOAOER Tn LOAD OVERLAV.
•
3) IF LOAD SUCCESSFUL, !~'A~L! (::OMMANDS
•
IN ~fW OVERLAV.
• CAL~ING S!QUENCEI
•
bL 'OVLY
•
R10 CONTAINS POINTE~ TO COM~AND PARA~~TFR LIST
*
~Ef'S ANO OEF'S

0062
011163
0064
0065
0066
0~e1

rcHH58
fHlIe9

0010
0P1l1
il012

•

0(1173

0014
0015
0016
0011

REF

GET AUF

FilEF
REF
REF
REF

LWP

DEF

OVLV

DEF

OVI.RET

FiEF

TRNAIU

REF
REf'

IN!T

REF

001A
0079
00811
0081

REF

0082
0083
0084
1D08~

REF

0086
012187
0088
0080

REF
REF

*.WORKSPAC!

RETsuF

RR

NOCMOS

PRCRLF
PRINT

REGISTER

•

EQU

till

illlllQJ

(1I~01

0~94

Yl00~
00~3

Rl
R2

EQU
EQU

1
2

R3
FU
R5

EelU

3

EQU"

00SH~

009Q

olit"''

ella1

0U2
0hl3
01((}tt
iIl10!5
010(1

IOlta1
0U8
0109
011~

0111

000~

0006
0001

R~

EQU
Erw

6
6

0G1!08

R1

twU"

R&

EQU

8

0U100
0vHlA

RP
R10

EQU
fOU

9
11'1

R11

0008
000C
1lI~00

0C1f0E
000F

eQU

11.

R12
R13
rH A

Etw

12
13

EcaW

1 .4

Rte

EQU

15

•

•
•
*

nw

STA~T

C~OTf.H.

R0

oIt'I 9'

II

L,OAOQV

00(11!{l

0U104

,

RwP
ACL

00g.,
0091
o£115~ 2
009!5
iHHi6

('

'OVERLAV'
OVERLAV
UVERLAY SUP~RV!SOR

OEFtNITIO~S

OF TRANSIENT AREA

I
I·

*.

OVERLAY PROC!SsnR ••
0000' OYLY

0112
0113
~lt4

0~0V1

042~

0002

001tH'I

01115
0'116

0111
1118

•

!QU

S

*ALLOC,COPV,LINK
eL~p '.CL

•
•.,
.,

2-1.
2- OVERLAY IS RESPONS!!L! FOR
2- ~ANAGING T~E PXP90 TRANS!!
2- AREA, T~t1 INCLUOES,
2- 1) DISABLING COMMANDS FOR
2CURRENT AREA.
2- 2) CALL!NG TM! LOADER TO
2TME NEw OVeRLAY~
2- 3) ENABLING THE COMMANDS
2New OV!RLAY~
~4)
BU!LnING A TRANSFER VE
2US! 8Y TM! OVERLAY IN
~TM! SYSTEM.
2-.1
2-0ECLARE
3-TRANSIENT AREAU'00' ,Fl)((0015
3-VECTDR(2) PTR CONTROL TPTR,
2.0ECL.ARE'
3111't COMMAND ENTRY CONTROL CPT
4.2 COMMAND STRING
CHAR(2),
POINTER,
4-2 COMMANO ROUT

."

0119

•
•.

0120
0121
('122
0123

",

0124

."

eU!e

",

11215
0121
fUiS
0129

."

•'*
*

0130
0131
fU32
0133
£1134
0135

."

•..
•..

01.16
0131

0004
e00e1
0000
00212

fU38

IH39

"140

0141
0142

0\43

01<44
01<45
01415

..

CMORTN EQU
CMOLEN EQU
COSTR

fQU

4

6

o

COMMAND TIXT STRING
COMMAND SERVICE ROUTINE.

CORTN

eQU

...."

REGISTER ASSIGNMENTS
1<1P1

..
..
..

R8
R7

.

2

~9

0147

•

R 6 . COMMANO ENTRV POINTER

IU4S

•

R5

..

11149

-

1150

ru 51

0004
0910~

eUli
rU53
0154

01515
SHUS

eu"

POINTE~

2-CPTR • LOCCTRANstENT AREA' •

LI

2.00 WHILE COMMAND ENTRV ~NE~
-R6,."'6
nVLV!50

000(:

020~

R!5.CMOT!L

01!10F

00100

0P1U'

C1211.1

•

I

3-CMDPTR • LDC(CDMMAND TABLE)'

."

0rt112

01tS"

0UH
0162

TEMP

000.

0158
IU!U~

- COMMAND TABL!

R4.

0008' OVLV10 EQU
C5ge
~OY
1310
JEQ

000e

c

lUll"

0000

•

00'114' ovLV20 EQU

$

130e

OVLY50

JEQ

o

•• OVERLAV PROCESSOR

l!5se

•

0018

13004

001A
001e

0225

001F-

01504

o01 2 GIl

JMP
"'022' O\lLY40 EQU
CLR
"4ES

0UH5

~Q!lf

IU66
0167
0HS8

0111
0112

0113
0114

0022
002.

10FO

0171
0178
0179
018"

0"'2~

022ti

0P128

01il04

0e2_

1111EE
'-'~2C'

0Uf
'H8~

0(112(;

"'0~!5

"-IF COM~AND STRING .N!~ CMOPT
•• 'MEN DO,
*~e,.Rs

JECI

OVLV-U"

'*

Al

R5,CMnL.fN

'*
'*

DEC

R4

".CMOPTR • CMOIITA + LENeCCMMAN

OVLV20

4.CCNT • CCNT .U
3.ENDI

S

,eMORTN nuS)

0004

011~

0176

c

PAGE

000e

0Ug
011~

Q45368.sa801·.

•

IHe~

016d

C-

••

0201

'*

At

R6,CORTN+2

'"

JMP OVLV1f'i'1
OYLYSP.! EQU S
LOAD OVERLAV

••
.

L.1

Rl,INXT

3.C:PTR • CPTR + LENCCCMMANO IN
p.!NO

2-Bl.'1 LeC(IN!T'

01112E .0000
IH83

0184

0teS

(--

~03~

015A0

00132

0000

0U8

0189

003"
0(.1)3"

CA00

0192

0038

021e

00".

1!It g3
lUg.

lUg!,)

0P;SC
01'!3E
004Vi

"''''3C'

cege

131C

"20~

'"
'"

1..1

Rft, TRNAFU

'OVL21P1
"

ECIU

S

•

MOV
JIQ

OVLZfJ@

Ll

R5,CMOT8L

MOV

'NOCMOS,R4

0048

00"8' O\ll..Z20 fQU
JfQ
131!5

01'!4C
fl04E

0eep

8!55e
0228
00ee

'"

..

t"

OVLZS~

",FH5, .AS

At

R5,CMnL!N

OVLZ30l

I:

,I
"

)

3-CPTR • LoctTRANSIENT ARIA'

~.

4,.CMDPTR • I.OC(COMMANO TAIt.!"
•• CeNT

• NO

CMOS

w... Ilf CCNTJlllIl,

S

c:

JEQ

1304

,

4 .. "0

'If

0£111 ••

2-1F LOAD SUCCESS'UL THEN 00,

*RI5, .liUS

'If

•
•

I

3.. no WHILE COMMAND ENTRV ~N!.

C120
0012'

02tll4

(~

JNE

RPI,R0
OVLl!5P1

091"4
0046

ei~3

820S
0206
02'"
0208

MOV

'"

000e:'

0200
821111

0202

S

09142

0"~8

0199

EQlI

00liHP

tbUH5

el!n

'L.OAOO\l

161£

IU9~

IU91

~L

0£1l34' OVLRET

0186

0181

'"

2.CALL LOADCFLAO,8tAS,!R.OR)

S-YF COM,.AND STAING .!Q. CMOPT
e.TMEN DO,
5.. CM"PTR • CMDPTR • I..!N(COMIIlAN

.
."

OVERLAY PROCfSSOR

0209
021~

00152

0604

0211
0212
18213

001541

10FS
0056'

0214
IUUS

0Q15f!<

022(11
0221

0~6.c:1

C285
0209

121066

0Cl102

0(l1ee
0P16A
0~t5C

e.CMOPTR.tOMMAND svc ROUTINE
'CDRTNCRel,'CMDRTNCRe)

'PRtRLF
fHS,RUJ

LX

'HU0
000?1

8L

'PRINT

1000

NOP

00!7~

0004

121072

10E4

0231
iHU2

04EC'!
0031.'
~071P

023;'· 0P178

001.
0Cl17C

ERS

042171
0000

0Aee

,.CPTR

'*

Al

FHlS, CO~TN+2

*

JMP

OVI..ZU

EQlI

S

•

0014' OVL150
0~1"

$

fHh2

0226

'*
'*

C

ceNT .it

is.ENO,

MOV

00!6E

!II

~ov

"lOP

006P!

0062

0(1176

12100

e: QI}

81,.

022~

0234
162315

QVLZ2f.Jt

0et0!!'
100:11

0226
0221
0228
0230

•

JMP

06A0

022A
02a~

OVL2~0

R4

0~HH

fn~2

0223

•

PAG! 0006
5.CCNT

DEC

0CH5C

,,!?If5E
I!U1
1218
021Q

'*

9415388.99(111 • ."

C9t5ts
000=:!
0004

0"'5~

It16

'II.

II

eFTR

• I..EN(COMMAtwD

•

21J11(NIHELSE 00'

• A, *'

.TRNARA

OVLZ60 EQU i
fl,LwP tiRR
IH

ENO

EN

3IJ11END,

3 .. /. INDICATE t.lO COMMANDS
3.1..0('; ('fJUNSIENT AREA)

CLR

•

2-eND,

/(~~''>c',

V

ge0
$

(

'"

980

ACL.

(tJ

tH?27
0078

023~

0176

0215

0131

0'6~

0206

CMCilHN

0t3~

01.7,4

0~15
0t~7

CMlHtR

,,~e

GEl fHJF

0~74

NOC.i'1(IS
OVL.RET
OVL,V

QVI,.VllA
OVI,.V20
OVI..Vcl~

OVL.Y~~

QVI..Z b'

OVt..Z20
OVI..Z3~~

OVI.. Z ~,J,
QVL.HH"
PRtRLF

e')

'" QI'' '

0"'82
0"'76
0086
Pl!

e~

0159

0112
1(1153

0\73
0179
V" 93
0201
0213

0Hi~

0~23

0197

019Q

0162

I

"212

0206
13188

0227
0232

"202

01g~

011187

0216
022(11

0187

0187

Rl
RH'

0(f19~

0J8?

011(12
0103
0104
IilHi5

0218

~10f.

0107
0th94
0~95

R4

0t7\9ti

Re
R6

0~Sil7

0(J1QA

R1

01'199

RS

PAGE 0007
0213
0193 0201

0225

0~8A

Rg

~ 1l~5

0178
01'2
0U5e

0161

0f:'92

R13
Rt.Q
R15
R2
R3

0P9

"'1.8;;'1
0184

R0

R12

017~

0~8'
0~8"

PRINT

Rll

0UH

0'1 A

013.:)
0131'

INll

0159
"'157
~'5t
0'1~

017P
016~

111154

V'l19Q
0168
0154

"'174
111165

0191

023f"

""21'"

0:?2~

010~

0Pt9

0101

iuTeUF

RWP

0P17!5
0",,.9
0'171

0'33

TRNARA

0"'83

0'51

~~

THERE .filE

(

Hi:5

0112

CORTN
COST"
CfIolULEN

I.OAIiOV
'-\lift

(

945368-990 1-1(;,(

C:ONCQR!"lHICE

0Q1 <4 !'I

SYMBOLS

0197
0176

1712~H;

02"'8

01g1

~t94

ft112U5
IH94

0218

02GH5

c

..£...."'.

'0

C"·,
,

".,l

+

A[
APPLICA TION

(

NEXT ASSV

USEOON

REVISIONS
APPROVED

DATE

~ION

LTJIt

7506

.

.

.
REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE_ISE S~ECI"IED
DIMENSIONS AltE IN INCHES
TOLEltANCES
ANQLES ~I·
J ~LACE DECIMAL:tOIO
2 ~LACE DECIMAL + 02

c
,.ell"

IDENTIn-INQ NUM"RS
SHOWN IN PAltENTHESES
"Olt IU"EltENCE ONLY
INTEltPIUT OWQ IN
ACCOltDANCE WITH
MIL·STD·IOO

~N
CH~
ENGR
QA

~

//

/'

""

./

CONTR NO

/

OES~JCTIVITV
/
YI- •• ",C

/

/

~ TEXAS INSTRUMENTS
I"CO~PO~A'£D

Equipmwrr GI'DIIP

DIt/,.,

r __

AL, PCOUT, OUTPUT DATA FOR FRONT PANEL LIGHTSPX990

/~

APVO

/

~

DATE/

~
RELEASE " "

SIZE

COCE IOENT NO

A

96214
I REV.

SCALE

"" +

-

ORAWINGNO

945369-9901
SHEET

1 of 3

.

· t OUT~U'

.",a

.....
...

.'.1.

' •• A
••• S
1018

".,

1.1.

..
..
.

"U'
"1.
'"la
'"'A
1118
."e
'1117
lilt

.".

II.C
I'IIA

' •• 1

.1.1

••••
••• e

'118

IlfIIl

",A

•• a, ••• e
•• 18 .... !
•• al

.
.PCOUT

IHI
Rtl

DE'
REF
RE'
rQU
rQU

RE'I AND
PCOUT
CRUO"
UIRPC

Ie

S

clue

MOY

'U8RPC,RI0

~2'A

LOCR RUI.,
8111P8 RUI
LOCR Rte,8
RT

101"
IUSCA

31.'
,Ase

0

E~O

•••• IRa

,ANIL LIGHTI.

12

Rtl,CIltUn"

'0'"

'Ra~T

DI'.

EQU

.,ee

0

D!ITRQVI Rt2,1It1'

1..1

10118'
•• If

••• A 00f11A

.Ias

rOT 'PCOUT'
TITL£' OUTPUT USIltPC
RIYlsrONI
ORIGINAL
COMPUTERS ""AIM
4aSTRACTI OUTPUTS U.IR ,C TO
CALLING SEQUINe! ~
BL ,,,caUT

•

'I,a

.'.2
1 •• 3

PAGI •• '1

TO LIGHTS ••

o
------- -

~--

---~--------

._-

------_._----- -

---~------.

981 • gel

CONCORDANt!

S

CRUO"
PcaUT
Rtl
Rli

~S~PC

(

0022
i~22

0020
0~19

0'te
00t5
002A

0023
0017

945369 - 990 1~'n\-

PAGE 0003

o

o

.-

A[
APPLICA TION
NE)(T ASSY

(

(

USED

ON

LTIIt

REVISIONS
A

OATE

CIEaC""""1ON

7506

.

.

.

...

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE_,SE SPECI~IED
DIMENSIONS ARE IN INCHES
TOLERANCES
ANQLES ~1'
:J PLACE DECIMAL~.O'O
2 PLACE DECIMAL'" .02
IDENTII'"YINQ NUM.ERa
SHOWN IN ,,"ARENTHES£S
ONLY

~OR RE~ERENCE

c

....

..,\".

INTER,,"RET OWQ IN
ACCORDANCE WITH
MI ... ·STD·l00

~N
C""
ENGR
QA
APVD

L

'\...

L

""

OESrCTIVITY RELEASE " " -

"I-•• '~'c

TEXAS INSTRUMENTS

D.,..,

INCOIOlPORAJ£D

EquipmtMt

G,.,.

T.Kft

PRTMMC, PRINT MEMORY AND CRU RANGES-PX990

""/
A

CONTR~

/

~~

DATY

""-

SIZE

CODE !DENT ND

A

96214
I REV...

SCALE

•

ORAWINGND

",

945370-9901
SHEET

1 of 8

PAG! alea

-,'

*
*

1083

1014
"(11~5

008.,
10~7

101d8

""9

*

10U!

0113

1114
101~

1016
1017

....

'''18
0019

'020
1021
i(illa

102'3
Ifll24
fUla!5

leafS

1121

rrHitae

10a9

1''''0
1032
flHU3

IIJ4
1035
10\)"

0031
1038

0'3g
1041
eQL42

8143

(UHSOI
(HUH

1002

•• 53
1054

.",.

801e

RETURN,

CALL

'"
'"
'"
'"
..
•

DO WHILE (START + t '" MULTIPLIER, •• INOI
AOOR • START + f '" MULTIPLIER
IF MOO (1, 8) • e THEN DO,
CALL PRCRLF'
CALL PRNTHX (ADDR),
CALL PRNTC ("')'

'"
'"

(START ADDR, IND ADDR, CRU,
MULTIPLIER, WIDTH),

PRT~0~

RETURN'
!NO PRTCRU,
PROCEDURE PRT~'0 (START, END, c~u FLAG,
MULTIP~IER, WIDTH)
D!CLARE (START,END, MULTIPLIER, wrOT~,
CPU FLAG) BIT (16',
DECLARE I BIT (1e),
PECLARE ADOR POINTER'
DECLARE MEMORV WORD 81T (18) CONTROL (AOOR)'

r • car

'"
•
•
'"
'"
'"

1040

..
'"

END'
ELSE IF MOO (1, ., , 0 THEN CALL PRNTC ('.'"
IF tRU 'LAG • 0
THEN DATA • MEMORY WORO
ELSE DATA. CRU (AODR),
CALL PRNTHX (DATA',
I • I • l'
EN'H

RETURN'
END PRT000,
lOT

'" TITLEI
'"
!Ii REVISION.
'"
'" COMPUTERS
.. ABSTRACT.
'"
'"

•

o

ENO PRTM!M,
PROCEDURE PRTtRI' (WIDTH, START ADDR,
END ADOR),
DECLARE (START AOD~, END AOOR, etT (te"
DECLARE ~IOTH FIXEO,
DECLARE MULTIPLI!R LITERALLY '3Rt,
DECLARE CRU LITERALLV '-1"

..
'"
'"
•
•
..
'"
'"
'"
'"

'"

II~t

IUI4R
1049

CALL PRT00ta (,TART ADOR, IND ADDR, NOT CRU,
MULTIPLIER),

•
..
•
..
•
•
•

i"'Hl

1'145
1048
10141

•

I.*

1010

114"

..
..

PRTMEM (START AODR, END ADDR),
DECLARE (START AODR, END ADDA, etT Cle"
DECLARE MULTIPLIER LITERALLV 'at,
DECLARE NOT CAU LITERALLV t0 t ,

PROCEDU~E

'PRT",MCR'

PRTM!MCR
PRINT MEMORY AND CHU RANG!S
ORIGINAL
gglll
THIS SUAROUTIN! PRINTS MEMORY AND eAU RANGES~
THERE ARE TwO ENTRY POINTS, PATM!M AND PRTCRU~

o

••

PRINT HEM

4ND

CRU RANGES

0051

ClEF

(/lVleR

•

0P1SQ

(

ill-HI¥'
0~tH

.0062
011163
0C11/54

•.WORKSPACE

01?1d~

1091""

0002

1/111173

0P1ra4

(

"

0t'10e
0"0~

R'
R2
R!
RA
Re
RR
R1
RA

EQLJ
EQU

fQlI

EQO

0f110!:)

RO

kl~7Q

01110.1.

Rtl

EQIJ

008t11

0~0B

IHt

Ria

~QU
~QU

0P10e

0000

0083

0P10f:
012101"

IH~

Rt.
Rte

•

REGISTER oe:FINtTION$
1
2
3

0~01

lUSt

PRNTHN
PRNTC
PRNTH){
ACI..,RR
PRCRI..F
Er.lSlGN,f)MP$PR

III

fQU

•
15

e

FQlI

7

FQU

8
g

Eall

[QU

FQU
fQIJ

PAGE 0UI3

PRTME~
P~TCFW

E£JlI

09101

I/l PI 82

94e37t11.gSHH·.

EQU

0@16

1IJ1485

,/

1/l00~

•RPI

100111
0P.7A

1608A

("

000",
001111

rUI71
16012

0"".
0075

REF
REF
REF
REF
REF

0r.'le7
0V17~

OEF

REF

0liH55

160tH~

••

lP1
11
12
13

144

15

!

*.

PRINT MEM AND CAU RANGES

...

IiHU1

0088

..

01'1192
'HlIg~

0094
00SHlJ

01'1196
0091
e098
0(J!99
0UIr.1
lUlU

0102
0HU
0104
0002

(1)l01

tHe8

iH 115
iUl?

IU&

c

PlnME~

PRINT M!MORV RANG!

COMPUTER. ;90
.. ABSTRACT'
..
THIS suaROUTINE PRINTS T~f CONTENTS OF MEMO~Y,
..
EIGHT WORDS PfR LIN!, FOR THE INCLUSIYE RANGE
'*
CSTART ADOR. TO . THIS DATA IS
'*
PRINTEO AS 'OUR HEXADECIMAL OtGYTS.
'* CALLING SEQUENCE.
'*
MOV
,RO
..
HOV 
014("
21141
0\42
0143
0144
002~'1

0Q11~

(

PRINT tRU RANGE
ORIGI~AL

990

THIS SUBROUTINE PAINTS TME VALUII OF TME e~u
INPUT LINES. THE CRU INPUT LIN!S A~E T~!AT!D
IN GROUPS 0' SIXTEEN, ALTHOUGH NO BOUNDARY
'*
RESTRICTION IS PLACED UPON TH! STARTING AnDRESS
."
OF A GROUP, ONLY THE FIRST ~WIoTH. LIN!S O~
."
EACH SIXTEEN LINE GROUP ARE READ AND DISPLAY!D,
." CALLING SEQUENCE.
."
MOV cwIDTH>,R8
."
MOV cSTART AnOR>,R9
."
MOV (END AnOR.,Rt0
•
8L
'P~TCRU
."
JMP
••• ERROR EXIT
•
R~ ANn ~1 A~E DESTROYED
'*
,.PROCeDURE PRTCRU (WIDTH, STA
e.I!NO AOORl,
."
2.DeeL4Rf (START ADDR, END ACD
2.0ECLARE W!DTM FIXED'
2-nECLAR!
MULTIPLIER LtT!RALLV
•
~.nECLARE CRU LITERALLV 1_1',
'*
EQU l{1l*2
INC tRU BASE BY SIXTEEN BITS
CRUMLT

0PU

340.t.
STC~
STCR RUI,0
$
0!i112' prnCRU fQU
04201
8LWP 'ACL

0~14

0fii10~'

0141
0t4R

PRTCFili

••

0145
0148

TtTLe:

."

014Q
0H50

0UH

•
•

2R8,R2
R2,12

0U52
1C15J

001t'

C~88

t-iOV

0C~

0104
0tt5!5

QlVll.

0AC2
0Qe2

SLA
SRL

R~,6

0£'11C

APlA~

A

'STCR,R~

0U5f'i

0~H
0~2V'
0 01 22

0010 ,
021i'lA
002Q'\

Ll

RA,CRUMLT

01~'

01A24

010~

SETO R3

015A
0U'9

1e

'."*

(START AnOR, END
WIDTH),
GENERATE STeR INSTRUCTION

~.CALL PRT~0~
~.MULTtPlIER,

."

MULTIPLIER

crw

"LAG

,.RETURN,
2.e;NO PRTCRU'

•• PRINT MEM ANO CRU MANGES ••
~11f.H

0Ui2
0~2~'

011'i3
0Ul4

1165
0HHi
0161
0168
0U$9

0170
0H'1
011~

0QI26

11$113
01"4

0028

01115

0020'

0111

..
•
PRT000

EQU

$

*

MOV

fH~, Rf5
fHPI,R~

.
..
.•
..'*

~\OV

eAt1

011~

PAGE 0106

*

eLf(

PRT01~

fQU

.

h,PROC!OlJR! PRT000 (START, END
5_MUL.TTPLIER, WIDTH'

R'
R'HA,AU

0(1!2t

C2C7

!l!OV

0119

0~2E

~Ut4

MPY

003(,11

R!5,R12

0CA32

A303
182C

A

0UH
0182
0183
0184
0185

JOr.

PIH20Q<

JH

Rt2,RfI;
PRT2P1£t;

riHS6

0036
0(1134

IUS?
0188
0189
fJi90

0·f1j~l4

0~3"

(uec
IB2A

C2A1

c

.

•

,~u

IU,Rg

024g
0(1H" ,

ANDI

~9,7

0~3E

Hie"

JNE

PRTQl30

0t1l4!1'l

06AQI

8L

,PRCRI.,F

0~42

JMP

PRT!50~

MOV

IH2,R10

BL

.PRNTI-IN

IU91
0192
0193

0(114<4

01tl46

teec

ftl194

0~4e

0eA~

004.

fil9.l0!?J

At

1021

JMP

PRT~0(11

004E

1..1

RU/J,EQaTGN

8L.

fPRNTC

JMP

PRTt500

~HIi

"HHS

11a9'
0HH~

0Ql52
01'!H54i

0201.
fIH1I00
0f'iA!1l
000f1'l

0199

liHl\5~

101C

0fll!5Q!

0:2\lH~

00e)8

1008

IUi/l4

09,1 (5 A

iHhH'

~'(II~r:
0\1le~

001H. , PRT0;)0 flQU $
ANOl R9.3
02A~
0003

02131
0~1(l2

020~

0206

IU'"

006P

ltHtH5
0alU

III !'lI 152

1t'!11I'!

0t11/54

~f'iA!1I

R1 • t
a-DO WHILE (START • 1 .. MULTIP

I ..

"lUI.. TIPLtln~

1 • MULTIPLIER • START
IF END.OF,LOOP
, START. I • MULTIPltE

e, •

3-t, MOD Cl,
MOV

0000
10215

01915

2.X • 0,

~.AOOR

1?}(,1l3C

.

a-DECLARE C8TAAT,!NO, MULTtPL!
e-CRU FL.AG) AIT (16),
~-DECLAR! I 8IT (t6),
~-DEeLAR! AOOR POINTER,
a-DECLARE MEMO~Y WORD BIT Ct6'
Aa • STtR INSTRUCTION FOR CRU
R! • tRU FLAG (NONZERO • CRU)
R4 • MULT!PLIER
R!. START
R~ • END

$

01711)

oU3!t1

0

•

JNE

PIHl7I!5~

LI

RHh OMPSPR

~L.

'PI;NTC

IF

J

MOD

e

0 THEN 00,

NON-ZERO

e-CALL FlRtRU"

NEXT LINE

•••• ERROR E)(!T
e.CALL PRNTHX (AOOR),
PRINT STARTING AODR OF LINE
•••• ERROR E)(!T
e-CAlL PRNTe (,,'),
PRINT EQUAL SIGN

..... EFUlOR EX rT

e_!ND,

~.ELSE

IF MOO (I, 4) • 0 TWEN

IF t MOO 4 NON_ZIRO
P~INT

SEPAfUTOR

c
•

••

P~INT

02L'l8

(

HEM ANO CRU lUNGES

006~

0~~t'

0~68

1"'1~

0209

0211

"PleA
0111ec:
0Q116E
0f117f1!

CI'IC3
1~02

cage '*
100~

~21'"

0217
021A
0219
0220
0221

0~12
0~7A

0AC~

0P17f3

111288
1II()\08

00l7~

It'10t

1t12a~

0~7C

08Cl,

0224
022!5

0~1e:'

022A

007E'
0Q18P

08 A!.'I
0A00

0221

0~e2

If)10~

11)228
0229

0084

£leST

01i186

028C

0~8'"

FPFE

0(118.

lAD!il

023'"

(-

023~

02:34
023!'S

IIHH~e '

0Cl!8C
0018£

00ge

0092

((1Q10f?l

023R

~Qlg4

045P

0239
0240
1'1000 ERS

PRT!S0P1
R3,R3

MOV

.R12,R10

JMP

PRT 11P

•
•

EXIT

•

III

IF CRU FL.AG NON.tIRO
MEMORY WORD
DATA

... n"!'N

•

... EL.Se: OATA

• tRU

(ADCR),

IHe

R2
RB,S

PRTl1f11
$WPB Pt0

PlnU0 I!QtI

fIU~OR

$

JGT

'*

••••

~IU'

S
PRT~1'"

eL.R

PAGE

3.1F CRU FLAG

MOV

x
CI

s

BL,

'PRNTiolX

JMP

PRT!500

INC

RT

eI

R12,.FFFE

STCR INTO Rt0
II' BYTE OR LEse, R!GHT
JUSTX'.,
3.CALL PfilNTfoIX (OATA)'

'*"'**•
3.r

ERROR EX%T
I + tr

3.fNO'

il

1

:1

•

P~T200

0~EO

0fill15
0i?19C11'
0420

02315
16237

'*

0Ae~

~Ql7"

16232

..

9415!1(;11.09~h'.

IN!'

00172' PRT"'!.!! EQtI

0222

0231

JMP

0061.' PRT0150 EGU

0210
21212
0213
021"
021e

•

••

PRT50~

•

JL.

PRT01!1!

I~

>

2_RETURN,

EQU $
INCT 'Rl1w2(R13)

INtHCAT! NORMAL EXIT

EGlll :1/
Ell.""'P 'RR

lUCI< TO

OLD WK8'

liT

END

2-ENO PRTfU0'

h

PAGE 0008

945370-9901**

gee "
I

Q80

CONCOf(DANC!
019)8

0147

U6~

01119

0148

0236
01ilts!

ACt..

CRI.IMI"T
OMPSPR

flRCR!..F
flRNTC
flRNTHN
flRNTHX

0U!l~

0171

0065
006"
0{!11e"

0206
0191

0""e1
0g1e0
0062
tH 16

0108
0194

021tA

021111

PRTQl1P1

0217

0212
021!5
"181

022!5
0~Ji!I

PR1!50~

ee3~

PRTCRU
!'RTHEM
llUl

IH

rHe

0188

020:3

flRT2\:1(~

£H9t

21141

~'l058

010!

0051

0183
Ql19~

0199

0~0~

022'

0",ep
001({1

0206

lUi

0(1181

0\80

0U11(

21'.93

0P1A

0231

~1235

IU4

0082
0083
0084

0Vl1~

(~--"

\"-./

0(i!11

CHIS2

0~'?

"114

0US3

0t54

0151

0211

01';

00':5

~~ 115
l~172

1I.l15e

001f)
00'6

0182

RI
RR
STtR

0~1'

CH13
["1'5
01f52

0018

0113

0141'5

0t5S

\!fORO

010'

0115

RIS

R8

R'R8

0~i'4

00e~

THERE ARE

0223

0222

ot. 91

R2

0219

C

02'' '

0193
0235

R3
!U

021.4

0234

022~

0113
0119

!Ue

IU2S

11'207

0146
tH18

R13

0211

010~

~HHH~

R11

021111

0232

flR"030
flRT0!5A

PRT 1 H'I

1'03

0156

0145

IQ8ICiN

flIH~0P1
fiR T~"1 PI

0171

0038

018~

015!5

0220

0211

011~

0186

0"'2Q

0221
1tl112
02:51

0186

eitel,

020A

SVMAOLS

c

APPLICA TION
NEXT .SSY

(

,-

+

A[
Ln.

USEOON

----

REVISIONS

DATE

DESCfItPT'ION

.PPROVEO

·
·

7506

·

(

..

.

...

,

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLI •• OTHI"W'.I .... CI~I.O
OI .. IN.ION ......1 IN INCH ••
TOLI""'NCIS
ANQLIS ~I·
31 ~LACI OCCI"Al:!:OIO
2 ~LACI DECI .. Al +02
IOINTII'YINQ NU.......
SHOWN IN PA"INTHISES
~O" "I~E"INCI ONLY

(

INTE"~"IT DWQ IN
...CCOItO... NCI WITH
"IL-STO-IOO

~N

,,/

./

eM..""
ENGR
QA

"'-

"PVO

CONTR~/

/,l"

_L

TEXAS INSTRUMENTS
, .. CO" PO" A' IE D

Equipmtlnt G-.

DtII•. T__

~L, PRTSSN, PRINT SNAPSHOT-PX990

......,\.,,//

//"'-

'" "'-"

DE7~T'VITY RELEASE

"'-••• ,-e

~~

OATE//,

SIZE

COCE IOENT NO

A

96214

SCALE

•

1

REV.

·

OIItAWING NO

945371-9901
SMEET 1 of 5
,

0003
.,0041
0005
iHHIJ8

0001
0P11118

0009
e141C11

0"11

tHH2

tHU3
S01'
101f5
0"16
iHH1

liHue

8019
002A
0021
0022
0023
002'
0025
fIlPJ26
112121
002ft
0029
0030

1031
0032
0033
01213 ..
011135
10315

003'

slue

0039
1040
01Ul

111142

•.

.*
•.*

PROCeDURE PRINT SNAP8HDT(SS.)'
1* PRINT S~APaHOT PINOS THI! SNAPSHOT
ENTRY ASSOCIATED WIT'" A SNAPSHOT
AN PRINTS TH! CONTENTS OF TH!
SNAPSHOT
*1

Oe:CLAR!
1 SNAPSHOT CONTROl.. SNA.P ENTRY'
2 S5FLAG 81T(8),
2 F ILL.!ft U) ,
*
2 LOW RI!G 'IX!D(8)
*
2 HIGH RI!G FI)(!O(8)
*
2 ME'" RANG! 1 (2) PIXEOC1S),
P MEp.4 lUNG! 2(2) FIXI!D Cle"
DECLARE
spaE" LITEFULL Y '80', It sS DEFINED *1
SFMRl L. !T!rULL v '40' , I'll M!M RNG 1 fli
'*
SFMF?2 LITER ALL, Y '20'
/* MEM RNG 2 */
*
sr.".p ENTRY
LoceSNAP TABL!) + ss.·aILEN,
*
IF (SSOEF AS8FLAG) .EQ. 0 TMI!N RETURN'
CALL. PRINT( , SNAP ',ss.) ,
*
CALL PRINT REGeLOW REG, HIGH RIG),
CAL.L. PRINT M!MORY(MrM IUNGI!
'*
END'
PRINT SNAPSHOT
'* !NO lOT
'PRTSSN'
FlRTSS
*TITI,.E.
'* REVISIONS PRINT SNAPSHOT
ORIGINAL.
'.COMPUTERI
*
99111,A!M
.AIUTRACU PRINT SNAPSMOT "'UNTS THE CONTENTS OF A
SNAPSHOT. IT IS ASSUMED THAT THE SNAPSHOT
*
IS PROPI!FH. Y OE'INI!O
• CALLING SEQUENCE •
!It
BI.. 'PMTSS
Rl0 III SNAPSHOT

•..

..
...

..

.

..
..

1"

•

*•
•*

.,

REF'S

ANn OEFtS

REF

IHU1

~!F

PR'fME~

104ft
0049

PEl'

OfF
REF

HEF

10'~
10~Ui

1050

REF
REF

1051
1052

REF

f;tEF

PH'

IU153

REF

0054
0e5S
10156

C

•

PRTSS
SNPENT
SNPTAB
CLST

0043
0044

C

REF

*

IWP

PRNTc
SSSTR
SSSTRFI
GfTaUF
R!T8UF
ACL.
RR

C

'*'* PRINT

SNAPS~OT PROCESSO~

• WOR~SPACE REGISTER DEFINITIONS

0Q'!~"

(

0058
0111e)9

0000

01116~
0~6\

0001
0002
01111/13
0004
00t,H5
000e
0007

oIII tH!

011163
0111154
iHH5e
~{II66

011161
0068

10(1169
001~

11:711111
0012
0013
001A
IOr;II1e

'*
RI'!
Rl
R2

EQU
EQU

EQU

R3

EQU

RA

EQU

Re

EQU
EQU
EGIU
EQl l

R/5

R1

0~08

R~

00.H)
0001.
000e
000C

R9EQU

R10
Rll
fH2

EQU
EQU

0000
000E

R13

EQU

000'

R15

Rl~

EQU
EQlJ
EQU

III

1
2
3
4

5
6

1
8
9

10
11
12

13
14
HS

01)180

'*
...'*
'*
'*
."

l.PRnC!DU~E PRINT SNAPSHDTCSS.
2./* PRINT SNAPSHOT ~lNOS TH!
2.
ENTRY ASSOCIATED WITt'! A $
2.
AN PRtNTS THE CONTENTS OF
2.
SNAPSHOT

0QHH

."

2.·1

0¥182

'*
'*
*
'*
*...
''**

0016
0'1t1'
0~18

0079

01?18~

0064
0\11Se

0086
0081
0088
0060
00\HIJ

0000

SSFI~AG

EQu

o

00g1

000~

88LOAG !QU

IIlpjQ2
00!1l3

0003

SSt'!tRG
'*
'*

2
:5

0094
009!i

EQU

*

0096
0P1Y?

'*
SSD!F

EQU

"(iHJS

0!?18al
00004

SSf'1Rl

EQU

,.80
4

0090

0100

L.8YTE

EQU

2f56

EQIJ

$

01t6~

1tJ1IH

IU"'2
0103
0104

c

••

00@I?!
0Q102

0004
0P106
0008

000tn'
04211'
0t'100

Ct8A

prnss

LOW ~EG
HlSH RP!.G
2.n.e:CL.ARE
3-SFOEF LITERAL.LV '80',
3.SFMRl LITERAL.LY '~." ,
3-SFMR2 LITERALLV '213'

1* SS

1* ME
1* Mf!

MEM RNG 1

9l"WP fACl"

.

020e
erMlnl

2.SNAP ENTRY' LOCeSNA' TA!L!)
~OV

5S.

RPJ,SNPENT

ENTRY LENon"

RPJ,Rf)
R1,R6
R6,SNPTA8

Re • SNAP ENTRY PTR

0910A

~g8e

MPV

0U)!"
0107

0910[;

MOV

0011JE

C187
022tl

0011l!

0Q100

AI

*

R10"u~

L1

1Il10!5

0108

2.nECLARI!:
3.1 SNAPSHnT CONTROL SNAP ENTR
•• 2 SSFLAG 81TC8"
4.2 FILLER C8"
A-2 LO~ REG F1~ED(e)
•• 2 ~lGH REG FIXEO("
4.2 MEM RANG! 1(2) FYX!O(18),
4.2 MEM RANGE 2(2) FIX!O(1e),
FLAGS

•• PRINT SNAPSHOT PROCESSOR ••
IHaO
IU1f,11

0012
001'

C0Hl
02411'1
812100

0t 11

0¥'18

132f5

eUI
0113

001A

0221.

tHHC
00lE

0000

01141

01ue

0tUfII

IUS

t116
0111

eue

0022
'''HI! 11

002.

1000

002C

0Q12E

M9,8
Rt),.'H0'"

'FFe

00.C
0fUE

"gag
eeag
06A0
0000

t21A

09!!2

0'20
0000

21135

C2Ge

0C115e

0004

005A

C2Ae

0fl1St

010e

IUEl0

0000

0062

1~0'"

lua5e:

IleA

0420

006.

0000
el1513

Ieee

IH!lA0 IR8

'SSHlIi?G(R.-),R9

SRI..

RP,!

AI

R111',.41

•

•PRT0I2e

•

!>IOV

Rt), -R 11/1

at..

f!WP

MOV

R4,RU

Bt..WP

'MEreu,

MOV

'SSMFU (REI) ,IHJ

MOV

fSSMR1+2(R6"Rll

Bt..

fPRTMl!M

NOP

,

tRfTBUF

06AOI

{IHae4'

01"'1

•

M9,.RU!.

~ove

0003

0133
aU4

e~!e

MOV

C!80
0266

0~5V

00t5l1

~OV

09ap

0132

iH44
IH4e

flLwP 'GEnH'F

SRL,

0041.

2.CAL.L PllflNT( 'INAII' , ,8840,

2.CAI..L PRINT REGeL,OW REG,HtGH

faeL.ORG (fIun ,RO

003A

C!

FLAGS

*GET8UF

Move

022A

e142

..'"

clep

IiHU,.

1143

NOP

Oa6ei
0002

0130

1/)14(11

,PRNTC

003fi

e12S
IHag

0139

BL,

0038

0040
0!i142
00441
0046

IH38

R10,SS8TR

R9,2*L.BYTe:", .. Cfl'l

0121

0141

LI

fHQI,fU

003'

PAGE !UHU

MOVe *HI0,'ISITH8

cuu

003C
003!

0136

H10,CLIT

0~00

luae

rU~l

Al

f.ljOV

0032

fU26

PRT02~

l.X

003~

~J122

IU24

0420

JEQ

0200
02C0

0t2t

0123

..

0f.100

01lA0
0000

0U9

iH20

frR6,R0
ANOI R0, S8nE'.1~8¥T!

~ov

08U·
f)0091
020A

0026
002f1

94!31t.A9",t*.

SAVE BUFFER PTfIC
ANI'.) US!

INSPECT WORKSPACe:

LOW R!GtST!R

MtGj.1 RllnST!R

PTR TO cPt..

RESTORI BU' PTR

2.CAlL PRINT M!MORV(M!M

EQl!

el..wP fRR

C

R~~G!

awEND'
t.!NO PRtNT SNAPSHOT

RT
ENO

C

PAGE 0005 of 0005

945371-9901 **

,gee • 980

C:ONCOROANC!
010121
1110154
011415
00152
0048

ACL.

(

CLST
GET6UF
lWP
L.8YTE
PANTC
PR1Pl2A
PRTI"IEM
PATSS
R0

Rl
R10

01t199

01101
00149
IIIU1
IIIGJ'4'
00143
0109

0141
01001
0P1!59
0060,1

0069

0103

0132

RU
R12
R13
Rl"
R16
R2
113

0138

011'"
0113
0131

0114

0115

0UH

0123

0126

0129

0130

0062

0121

111132

0Hil4

(Hillel

117

006~

0103

0105

010(14

01e,

111109

0124

{II

127

lu3e

0137

00156

010~

Rf;l

0067

R9

0~6e

(!H22

0123

IU24

0t2e

&'128

0127

0128

0129

0138

0053
012155

013;1

0143

0044

0104

0045
0110

0107

RElaUF

f

0t2~

0116

02171
0072
0073
00741
0061

0063
0064

RR

SNPENT
SNPTAB
SSO!F
SSFLAG
SSI1IRG
SSLORG
SSftlRl
SSSTR
SSSTRB

0131

0t.'l 7 (II

R4
R5

Re

BUt
0101
01\:5
0120

0097
009P'

0121
0124
0136

0092
0f1lSH
00ge

THf:RE ARE

0~50

0Q!51

0031

0137
01 HS
01141

S'(HeOLS

,;(--., ,
\~y'

•

A[
APPLICATION

(

NEXT ASSY

Ln.

USEOON

REVISIONS
APPROVED

DATE

~ION

70Uo

.

I

(

.

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTME_ISE S"CII"IIO
DI..ENSIONS Alit. IN INCME.
TOLElitANCES
ANGLES !cl"
• ~LACE DECI"AL:!:.OIO
2 ~LACE DECI"AL:!:.02

c

.,

IDENTII'YING NU.......
SMOWN IN ~AlltENTME.ES
I"OIllIllE'EIIIENCE ONLY
INTEIIt""f:T OWQ IN
ACCD"DANCE WITH
"IL·STD·IOO

~N

eM'"
ENGR

QA
",pvo

'"

"-/
A

CONTR~/

DESIGf\I~TIV'TY

/
y,-••••. c

~ tP

OATV

/

"

/

TEXAS INSTRUMENTS
I NCOlltfOOlIt ""I: 0

0./. .,

Equ.",." G-.

r __

AL, PXDATA, READ/WIRTE DATA AREA-PX990

RELEASE " "

"'-

SIZE

CODE !DENT NO

A

96214
I REV.

SCALE

+

DAAWINGNO

945372-9901
SHEET

1 of 20

;.. e~'I.'.'I*.

8Y8TIM WORKSPACe!
1013

.TITLEi

lil84
8085

IrUIS

100'
1018
1011;
leUI

leu

0012
fJDIH3

10'"
rorue
8111&6

001e
0011
000A

00eo

lOT

!QU
fQU

C

'PXOAT"
PX9;0 DATA IEGMENT
P)(OATA

•'* REVISION.
ORIGINAL
•*COMPUT!R. 9;0,AII"I
*A8eTAACT' THIS SEGMENT DEFIN!S
READ/WRXTI DATA AREA
•.CALLING SEQUENCE.
REF'S TO APPROPRIAT!
'*
EQU 5
flf5
EQU .,
R1
RU
RU

PAGE 0002

TH! ')(;IU.!

VAlUA8LES

10
13

C'

i'"

_,,--"

o

SUPERVISOR CAL.LS
1tl0U~

(

*

00121

•
•10

IIIC

8MA

000A

BOA

0028
0029
0030
0031
00;$2
011133

0000

HAS

00118

DAB

DEF
EQU

00~4

0000

OPEN

!QU

0

OEF

~OASC

EQU

9

DEF

WTA8C

0020
1021
0022
00a~

0024
002e
0026

0021

00J!5
1/1036

0011U)

00J1
16038

0008

PAG! Q!003

94!5~'2.;901.*

••

ROASC
WTAIC

DEFINITION'S FOR Ive's AND PRe 110 COD!S
EQU
DfF
EQU
DEF
EQU
DEF

0
8MA

£QU

OEF

fQU

:.c

8!NAAY.M!X ASCII

-A
HAS

BINARY-DECIMAL ASCII

.0

MEl(

eOA

DAB
:118

OPEN

:.8

Alen • BINARY
DECIMAL Ascn • BINARY
OPEN LUNO

READ Ascn
W~

IT! Aac It

I
Ii

'.

('

.ICII

•

IUNARV CONVERSION BLOCKS 945312 •••• 1 ••

••
•

'IUi
ilUi

1043
0044
0045
00415
fU47

,.,.;

1048

IIIID' CHe
1100

00

001111
0002

00
20

e0el!!
0052
11053
fU54
10515

."

'00e
0001
0058

e0e~

8~59

0001

10150

0008

01481
01402
8003
00154
105e
1056
0007
008S
1069

000A

0010
•

8071

0mee'
IC

00
20
20

CaM0
CBM2

•

•*
ell!
00eF
0010

eA

00

DE'

DE'

!QU

caD

CHI

CHBVAL.
I
HAS
0

avc ID

,

IRR RETURN
STFUNG TO B! eONV!RT!D

!V!N

BINARY TO HEX

oe,..
orF
O!,

caM

C

HEX TO BINARY

ByrE
Byn:
CHeVAL TEXT

••

IUl51

PAGE ml"u

EQU

eVTE
eVTE
TEXT
TEXT
EveN

CBM
CBMI
CBM2
I
8HA

IVC 10
ERR RETURN

",,

lUNARY TO DectMAL ASCII

DE" ceo
DE' CeOaTG
8YT! BOA
eYT! e

CBDSTG 881 0
EVEN

ave

~-"

10

ERR RETURN
CDNVERTED R!IULT

10

o

INPUT/OUTPUT PRBS

('

..
..

007.
00715
00715
0017

0078

OEF
DEF
DEII'
DEII'

80.0
0081

00U~

001A
01UB
001C
00lE

002'
0022

avCPRe BYTE
BVTE
0g
8YTE
BYTe:
00
00 SvCS,G 8YT!
1'1 SVCUSR eYTE
OAT.
0022'
0001
DAT'
OAT.
001UJ
00 INCMAR BVTE
EvEN
00

00

."

0"Q7

'*
'*

009g
0U10
0Ui

0102

18108
IBI9
0110
lUll

0112

0024l

00

00125
09!2t!

00
013
00
00
00

0P127

0PJ28
0029
QUHZA

002C
002E

0113

."

'*
'*

0117

0ue

(B1G

0124

euus
IU215
(6121

DEI'
OEF
DEII'
DEF

8YTE
eYTE
BYTE
BYTE
fIIRIUER 8YTE
BYTE
PRR8UP' BS8
DATA
PRsee ess

01115

rU2a
0123

1/0 ave
ERR RETURN
READ Ascn
LUND .. KEYBOARD
SYSTEM Ft.AGS
USER P'LAGS • C~ARACTER MOO!
euFFER
eU"!R LENGTH
CMAIUCTER COUNT

10

0
ROASC
13

"INC"'AR
.UI

1
0
0

OUTPUT CHARACTER STRING TO 733 PRtNT!R

."

011e

(~

0000

•tVCWRT

0114

IUalll
0121

'fOP OF ave BLoet<
SYST!~ FLAGS BYTE
ON! CHAR INPUT eUP'FER
USER FLAGS 8YT!

."

16ege

01tn
f6104
0105
0106
16107

sVePRB
avcs"
INCHAR
SVCUSR

."

0016
0017
0018

0098

(-

INPUT ON! e~ARCT!A FROM K!VBOARO
IN CHARACTER MODE. TEST 'OR ESC
INPUT •

."

0070

0082
0083
0084
ee8e
ie8e
0087
0"88
0089
eeQ0
00gt
00g2
leg:!
"tag4
001H'

PAG! 0008

O.5~7a.OO0,."."

0030

0032

SVCWRT
PRBeUF
PRSCC
PRBUER

TOP OF avc BLOCK
8UFFER AOOQISS
CHARACTER COUNT
SVaT!'" FL.AGS (UNIU:CDV!R ABL.! ERR IU
110

10

avc

ERR RETURN
INR I TI Aae It
LUNO • 733 PRINTER
SVS1'fM FL.AGS
USER ~LAGS
BuFf'rR AOOR!IS
UNUSED (BUF'ER LENGTH'
CHARACTER COUNT

"WTASC

iii

0
0

2

"2

SUPERVISOR CALL ENTRY

OEF SYeA!.T
DEF Svcwp
REF svcsru
01Ae' IyeA!,.T DATA SVcwp
DATA SVCSRA
0000

•
•*

LOADER PRB & BUFFER
DEF

DE'
DEII'

LDPRB
LDoPcn
LOLUN

TOP '0 lye BLOCK

lOOP eooE

10 LUNO

I
:!

INPUT/OUTPUT PRII

DEF

IUIa

oeF

11ao

"''131
"'
0
'11111
81133
81134
11315

1136

1131
1138
11139
01.0
"'1~U

1141
8t43
8144
11145
1146
IH41
1148
(H49
11(50

0014
0035

0038

0031
0038
"o39
003A

003C

003!

elll
00

10
00
0044'

•LDPRB

OfF
OfF
DEF
DE'

"
eYTe: "
'"
LOADDR DATA LOBUF

Loce

DATA 821
DATA

012142

'*
8S8
L.DCfU
LDceec 88S

012144

'*
LDBUF

88S

'*

EVEN

IHUI2I

LOFLG
LOADOR
LDCC
LoceA
LDBU'
Locsse

InTE 10
BYTI
L.OOPCD B88 1
LDLUN IUS 1
LDFI..G IHTI

01UJIlI

012180

"AG! 01e6

94537'.OIUI t ••

"2

SYSTEM FL.AGS
8UFFEt( POINTER
CHARACTER COUNT
CURRENT eUFF!R ADDRESS
8UFFEA
10

C

ave

ERR RETURN
OF' CODE

LUNO
8VST!M FLAGS
USER FLAGS
BUFFER POINTE,.
BUFFER LENGTH
CHAI'UCTER COUNT

2

CURRENT BUFFER ADDR!SS
CURRENT BYTE elT COUNT

82

BUFFER

o

LOADER PARM TA8L.!

•'*

rue3

(.

9l1le3".tget'*,*

lue4
01ee
01ee

IU59

DEF
DE'
DE'

at!!!"

0160
0181
0162
16163
01e4
iHee
0168
'11181
0188

LOADER PARM TAB!.!

DE'
DE'

01S1
0H58

"OtO!

DE'
'*
EQU
0'H~e , LOTSL
001/10 LDENT\, DATA

0"'08
000.
000S

1605110

0082

00A0

00

PAGe ee01

L.DT8L.
LOENTV
L.OLOPT
LONMCC
LDPGNM
0'81A8
S

LOLDPT DATA '"
LDNMCC eYTE (6
LOPONM 888 23

'"

'*

0'81A8 DATA '-01A0

EVEN

START OF TABL!
ENTRY POtNT
LOAf POINT
PROGRAM NAME CMAIUeT!R COUNT
PROO'UM NAME
DEFAUL.T LOAD 81A8

(MAX NAM! • 23 eMAR)

CHARACTeR' AND PRINTABI..E STRtNGS 1453'2.0101 ••

••
•

'117.
(4173
11174
1118
1175
1177
1118
It1!;)
0t80
e181

ruee

fH87

fUll
rU89

euu,
lUSH

1192
1193
1194
81115

IUle
rU91
8188

81190
1.80
lall
1202
12143
1104
02015
12015

lala'

1208
1209
1210
0211
la12
1213
1214

0084
001!
10BG
00B'
108t!
00BI
IUJIA

101B

IIIC

0080
808!

1120
la21
12aa

•ClitC

000A

L'C

IrtlC0

"

CR

88

ESC
RUDOUT
TERMeR

, ,,
,'" ,,,
,,

CAJUnAG! R!TUIlfN
L.IN! FEED
8HIFT FACTOR TO L.I'T BVT!

•TERMeR

LA8T

."COMMAND STRING TERMINATOR

e8S

1

*

PRINTABL.E STI'UNG8

CRL.'

EVEN
DEF CRLF
eVTE 3,.0, ••

•*
•

IJ
00
01.

1310

""C6

0A

IE

,~"\

'IU

•

MONtTON 'NOMPT
DEF 'ROMPT
'NOMPT DATA S'l·PROMPT·t*LBY'!+CRC
BYTe: LFC,'.'

00CI' .Tl

•*
.,

!QU

,

PEIUOO
L.F

..

10C4
10C1

DEI'
DEI'
DEI'
OfF
DEI'
DE'
OfF

h

ZERO
BLANK
MINUS
COMMA
PI..U8
EOR

EOU ",0
EOU lilA
0UI0 LIVTE EQU 1110e
IQU t
0020 IP
20 BL.ANK TEXT
TEXT
30 ZERO
20 MINua TEXT f . ,
2t COMMA TEXT ,
TEXT ,
28 !PL.",S
ar: PERtOD TEXT
EQU S
0e8A' lOR
flYT! CRt
00 CR
lUTE LFC
II. L'
BYTE .8
0. 8.
flYT! _liS
Ul ISC
RUSOUT eVTE

.

0(l1Ce

.au~

0000

0011'

"eCl
leU5
0216
ea11
1118

DE'
DEI'
DEI'
DIP'

(6183
1184
I U'5

'C

CHARACTER DIPIN%TIONS

DE'
DE'

It82

PAGe: eee8

I

C

CHARACTERS AND PRINTABLE STRINGS e.e87P,';'OIPJ1 ••

(-

8a23
la2.
la25
aa2S
8227
e2al
8180
823P1
1231
0232
"233
0234
02315

EVEN

oe,

lece

QUID

IUCA

0A

0Q1CB
IUCD
8001

fRBU'

21.
0003' STI

•
'*
'*

000'

"PlCfS

e!51A

rsa

•
'*

02D2

IIlIOA

010C

"20
21Z!

aa5g
8280
112e1
02e2
eae:..
e2e4
020S
aaee
e207
eaea
020g
(1)270
"271
0272

TE)(T

..'.. ,
'

EQU

I

EVEN
DfF
DATA
TEXT
EQU

Io4!X,CECJMAL IUM
PTIUM
STa-PTIUM-l.LBVTE.LFC
'SUM"
I

EVEN

"'!X,D!CUlAL DI"ERENC!
PTOX"
DATA IT4-PTcr"-t.LBVTf+SP
rEXT , 0111".'

0"'E2' ST4

EQU

•

eQUAL SYMBOL
EQIIGN
013D EQlIaN DATA ST!-EQIIGN-t*lBVTe+ t "
EQU
00£4' STe

DE'

•

•'*

00E'

EVEN
DUMP SIPAIUTOR
OEF O"PSPR
OMPSPR
DATA
STe-OMPSPR-t.L8VT!.'~'
et:S!
EQU $
0MEe' IT.

••
•

IflEts

eveN

DEF PFfTPRO
PIltTPRD DATA ST7-PRTPRD-1*L8VTE+'.'
fQU $
00£1' .T7

(Ha!

•
•*

EVEN

OEF
DATA
eVTE
TEXT

8KITFf
SKITRS
STe-8KITR-t*LRVTE.CRC
L'C
'8KPT.'

EQU

1
S

DE'

0275

0~f8

00fA

00'0

08eo BKITFf
0.

"2

ee't'

81(ITFf8
.T.

aas

I
iJ

H

il

EVEN

•

e0!e

0276
0277

(~

IIIIE'

0273

e214

PTOr"

''**

025:5
8254
0255
025e
e25'
8258

tRROR COots
ERSTR
DE' 1I'8U'
DATA ST2-!RITR-l.LBVTE.CRC
BYTE LFC
TEXT '
ERROR CODe:
ell 4

DEII'

02'0

(

PT'UM

0001.' IT3

(41248

02e0
eael

!RITR

2A

123e

aa37
11238
8aag
ea,IH/1
02·H
0242
0243
0a ...
ea4!S
(I1a.6
0a47

PAG! .1111

I!

CHAfUCT!AI AND PRINT.alE STA!NGS
1218
1210
"280
128t
8282
fr3283
fr3284
12815
828S

1281
1288
0289
1290
fr3291
82ga
8all;'
£D21lAl
.,2ge
.,aSHI

eag,

94e3'2_09~1.*

PAG! "'IHe

*

*
*

C
J

'".

EVEN

RIITR
RGSTR8
DATA
ST9-RG8TR-l*LBVTI+'R'
AGITR
rlJ3l5a
RGITRB eS8 1
re)(T
30
EQU I
00Fe' STQ
DEI'

OEF

00'2
00'"

""'Fe

,Ill'

•*

00,e

0100

00'8
00"

014
153

00'0

eeFE'

SSSTR
saSTR8
SSITR DATA ST10_SSSTR-t*lBVTI+CRC
BYTE L'C
TE)(T 'SNAP'
SSITRe BSS 1
EQU
ST10

OE'
OEF

,

EVEN

,if-"
(1
0011
rUU2
t.UH3

1014

lIHue

'Hue

1017
"(118
0019

0020
8021
'022
0023
8024
0(1125
8Ol2e

lei'

082e
1029
0030
0031

0032
0033

00;)4

0035
00315
091J7

00Je
0039
0040

0041
0042
0043
104.4
1045

0046
0047
0048
0049
0050
0051
0052
filla53
0054
1(1051'S

80015

•

•

*
•
*
*
*
*
*
•
•

*
*

•
•
•

*
*

•

*

..
•
•
..
..
•
..

*
*

..
..
..

..

*
•
*

•
•
..

**
..
•
•
..
..

*

•
..
•

*

•

,.
•

~002

PROCEOURE LOADER OR!VER(CPL"
1* LOADe~ DRIVER WILL ACCEPT TME
INPUT LUND AND CALL THE LOADER
TO LOAD THE USER'S PROGRAM.

c

*1

LOADER LUND . "
/* DEF , CSt *1
IF CPL.PARMI .N!~ NULL TMEN
LOADER LUND' CPL.PARMl
LOAD PRS LUNn • LOADER LUND,
IF DEVICE TYPE ,NE, CS SIGNAL ERROR
LOAD PRe OPCOD! • 'OPEN"
CALL SVC(SYC CALL BLOCK)'
IFCLD FLAG,LE. l' THEN
IF(CPL PARMa .N!. NULL)THN
BIAS- PARMa,
ENO IF,
ELSE RIAS'Of'AULT 8tAS'
CALL SET LOADER WORKSPACE'
CALL SET WORK8PAC!(Rl1,LOCCLOAOER ro",
CALL SPTWORKSPAC!(R9,8tAS)
CALL LOADERCLOADER 10,
8IA8,CA8S 'LAG)
IF ERROR .NE, 0 THEN DO'
IF PROGRAM NAM! CHAR COUNT ,NE. 0
THEN CALL PRtNTCPRnGRAM NAM!),
IF PROGRAM ENTRY .N!~ 0 THEN
IF C_LLER NE OVLV THEN
USER PC , pROGRAM iNTRY
IF CALLER EO LOAOUPFRONT THEN
CALL UPFRONT LOADER
[NtHELSE
CALL !RRORC'L000')'

EN",

RETURN,
PROCEDURE LOADER 10,
LOADER 10 PROVIDES 10 SUPPORT
FOR THE ROM LOADER, TH! OPEN
HAS AE!N PRoceSSED BY THE MAtN
DRIVER,

'*
*/

CHAR COUNT,CHAR COUNT -1,
XF CHAR COUNT -~l TMEN DO'
LOAD PRe OPCODE , 'READf,
CALL SVC(SVC CALL BLOCK),
IF ERROR THEN E~IT'
IF EOF THEN f~IT'
CURR BUFF ADOR • LOADER BuFFER AOOR,
OUTPUT LOAD ADDRESS TO LIGHTS
END,
CALL MOV! !IT(RETURN VALUE,CURR SUF ADDR),
CURA 8UFF AODR - eURR BUFF ADOR+t'

END,

END LOIO,
00 FOREVER,

o

•• LOADER rRIVER ••

(

0057
00158
00'9

111

•

14Q161i'1

0061
01"462
0""63

"'0641
0(J!65
0066
0061
006A
0C11!59

•
•
•
111

•

*
111

•
•

0~7fi1

•

001 ,.
0072
0013

•

01i'114

•

0075
~07e

0077
01i'11B

0019

(

*

0081i'1
0081
0082
0PHJ3
0Ci18A
0085

008"
0081
0088

00Sf!)

009'"
01i'191
1tI1tH~2
0~93

11109'0095
0096

0lH11
0C11iR
0~99
0U~

0tldl

olit'?'

011153
0hU

0hHI

otid 6

*

•

*
*
•
*
111

•
•
•
•
•
•
•
•

CALL GETCHAR,
ENO

END LOADER DRIVER'
lOT 'P)(LDDR I
TITLEt
PX9Q0 LOADER DRIVER
PXI,.DDR
Rf,VrSrONI
ORIGINAL
COMPUTER I 990,AS~
ABSTRACT I PXLDOR IS RESPONSIBLE FOR FOUR FUNCTIONS'
1) PROCESS LP,LA KEveOARo COMMANDS AND
CALL ROM LOADER ANO ABS LOADER RESPECTIVEL
2) INTERFACE TO THE ROM LOADER
3) PERFORM to TO SUPPORT TME ROM LOADER.
4) CALL ROM LOADER TO LOAD OVERLAY
CAL.L..ING SEQUENCE I
1- KEVBOARD COMMAND
R10 • POINTER TO COMMAND PARAMETER LIST
BL 'LOAD
LOAD PROGRAM
BL
'LOABS
LOAD AASOLUT!
BL
'LOADOV
LOAD OV!RLAY
ENTRY
R1A - POINTER TO COM~AND PARM LIST
~l
- LOAD BtAS FOR OV COMMAND ONL'
EXIT
R0 NOT EQUAL to 0 FOR ERROR
2- LOAO~R 10
8L 'Fill
(MAIN DRIVER SITS POtNT!R

•

••
•

IN Rit)

REF'S ANO OEF'S
OEF
OEF
OEF
DEF
REF
REF

REF

REF
REF
REF
ilifF

kEF
REF
REF
REF

REF

LOUFL
L.OABS
LOAO
LOAOOV
SVCALT
SVC\IIp
SVCSR
SAVWP
CS
CLOT
OVLRET
LOPR8
LoopeD
LOLUN
L.OFLG
LOAODR

01ti17
0108

FIEF

Loce

0111)9

REF

lin 1 UJ

REF
FIEF

L.OeBA
LOBUF

IlIUl

CR

••

LOAD!R ORIVER

••
REF

1'1112

IHl;!
0114
iHt!

PtEII'
FIEF

REF
REF
REF
REF
REF
REF
REF
REF
REF
REF
FIEF
REF
REF
REF
REF
REF

IHUI

8111
eU8
lUg

lua0

0tU
01aa

1123
81a4
~la5

01a6
IiIli?

tHiS
'HiP

0130

IrH 3 1
10132

ASSL!)R
ROMLOR
LDTBL
PRNTC
PRCRLF
TRNARA
USRPC
ERROR
L.ocser:
L.ONMCC
OFBIAS
INlT

CRUO"F
GETBUF
RETSUF
LWP
RWP
ACL
RR

lilt

013i8

0002

0131

000~

R0
Rl
R2
R3

EQU

0
1
2
3

0138
01J9
"1"0
IHoU
0142
tiU 43
fU44

0004

R4

EQU

4

0(1105

FH5

EQU

0134

IlHHH'l

fU3e

0001

0148
0t41

1148
''149
IHi0

00!tlQ

Re
R1
Re
R9

IIHHU,

IHri)

000e
000C
0000
000f
0021'

RU
R12
R13
Rt4

0100

L8VT!

0P10!5
0r10?'
0008

IHH
fJ152
0153

0000

lilt f54
01155

2400

ell,e

EQU
eQU
EQU

EQU
EQU
EQU

oxnp

ave, U5

EGiLI

EQU
EQU
EQU

EliIU
EliIU

PE50

..

e

i,(-"

0

(;

7
8
9
10
U
12
13
141
Hi

*
.UFLBIA

rues

tU03
ItO.
Iloe
IHI6

few

20401

00011)

01lUl

rUtia

Rt~
lilt

EQU
EQIJ

OPN
EQU
RlAn
LDERA EQU
LUNI!RR EQlJ

fJHl7

IUS0
fU61

0

'*
.WORKSPACE
REGISTfR DEFINITIONS

1133

11A5

PAGE 0118A

94e373-SlS01 ••

2!56
0
9

.2400
"'24~1

INVALIO LUNO

IIPFRONT lOAD!R DE'AULT BtAS
!QU

" JIoUI0

."

*
*
*."

lilt

l-PROCEDURE lOAD!Ft ORIVERCCPI..)
2-1* I..OAO!JII DRrVER WILL Att!PT
INPUT LUNQ AND CALI.. UII! I..
2.
TO LOAD TH! USER'S PROBRA
2.
2.*1

C

•• LOADER r.RXVER

*.

••••••

16te1
fU6A

(

0169

0f11filVl' 1.0UFI.

Wll1fi1

04Ce::

0111

1l'!05

0~0A

011104' 1.0AO
02V1f

0P!0t1

001101

0008

1(1!0~

0113
ltI17!5
011~

0)7'

0"'0Lf

ftl116

0~"'£

121179
018""
(rH 81
16182
0183
018.4
~

UH5

$

CLR
JMP

FHA
1.0A"'~2

S

Ll

IH4,1

JMP

•••••

ABS

EQU

LOAas

LQADER ENTRV POINT •••••••••••

EQU

Ll

LOAt/l0~

1.0AnER FNTRV
$

FHA,2

•

00V1E'
(IIP0E

020$1

(litH""

0fAlII!7l

0C1112

•
XOP INTERRUPT VEcTOR
LOAlllfll2 EQU S
1..1
R9,SVCWP

C",,,g

"PllA

0P7C

0~16

020~

0018

0C1~~

0~lA

CtH)~

0"1e

0D17E

0186
0187

MOV

R9,'lII"E

JMP

LOA!A0t!1

•••••••••• *•••••• OV!RI.AY ENTRY POINT

0188

(

EQlI

••••••••• ROM

0172
0174

UP FRONT LOADER ENTRY POINl ••••••••••• * ••••••

iH8P

0fi'12t1:1' LOADOV

~QU

S

1IJ19~

0?0E

Ll

1<14,3

r!QU

$

0003
0024' 1.0A00!5

•

0024

042(11

0~26

0P100

0(1028

caViD

0(112A

~Pfil\i'l

0f72C
0P2E"
k'l03P

C",EO

*ALLOC,COPV,LINK
9LWP 'ACL
MOV

fH 3, 'SAVWP

HOV

'R14.~(Rt3),R~

RFTRl!V! RtA FROM OLD WS

"Pt!':

C1V:1A

0Ui9

2.1' C'L.PARMl ,NE. NULL THEN
3.LOAO!R LUNO • ePL.PARMl

*

((I20C11

0201
0202
21203
0204
020t5
020R
02fi'17
02it1R

•••••••••••••••••

~1~36

C034

0(;'31:'

!aUIQl

0~3A

170~

fl\0I3C

C274

0P13f

0A8",
0~40'

•

L.OA~10

*

•

jIIIOV .R 4+, IHI
SLA R""~
JNC LOA~lC11
!"iOV .R4+,RQ
SLA R9,8
EQU

C~ECK

PRESENCE BtTS

eVTe SIZE "ARM

S

Mova R9, 'LOltJN

2-l0AO PRe LUND • LOAO!R LUNO'

'II.

LOADER IiRIVER

.*

g.de~'3.~UH'l

MOV

R9,Rl~

SFn
f'L

RU,e

Ll

Ra,es

0211i'
0211

2101441

C2S!')

0(1146

09U.

0212

1{J~4A

0f1Utn

fdlflAA

li:Hl!~!1I

0ft4C
004F

02108

0(11e>~

00a~

SRt

R9,@

ItHH3
0214

0~e2

0~0'"

LI

1f121S

0"'15'
0Pe>6

c

RQ,R8

0211

0~!H'

2iS01
820Q
164C

JNP

LOA1113

PRatTs E'QU
PR6TSM E(~U

t)
(I)

Rt

FYU

1

R8

EQU

8

01t13f'l
0"137

01;,1116
0(710g

RO

fQU

9

0(1\1111,

RU

EQlI

101

0038

ItJflI06

R11

E(~u

11

0034
0(Ut5

M.~

UPP!R L!MIT " MAX

o

.*

EXTRACT RANGE OF MS

0!'1!41i1

(

000!.'l'

JMPTAB EQIJ

S

JMP
JMP

RANUl0Ql

0~42

0C1!0~

1 t~"'!O
l(.11Ii1C

0(:.\43

0(J\ii!4

100E

~JMP

RANi(l2P1

0Vt4~

0~0"

lP!l~

JMP

~ANIiI3{l!

1D~4t

0010fi1

FlAN~tP

~1~4!1i

0\114"
kl~47

0048

SfT UP AND B TO

APPRnpRIAT~

0i1149

0V1t11~

MOV

.IH ("., FH

~HH51i!

0(}10A
",r)!ee:

0P~t

SRA

R1,PR~ITS

0241

ANfH fH, PRe T SM

IiH'I0 E
0(}lrr
0(~ 12

00P1ti
0Afll
0£'100 ,

8

~1Il5t

Cl'll!.

0iA53
0~~A
0(.11~5

~1A5"

0057
0fHHl
11')059

011114
01111fi

0AC9
C281

0tAlA

060A
l£1!liIf:

11!P.1A

ii:11i'6~

ft!JVltH
0~62
~~63
0~64
(ti

(

''**
'*

[HS ei

001E
0f.l12(11

MOY
JMP

''**
0(1122

C251.

0~7t"

0~2'"

C289

002ti

lj,l10~

0~73

0"74
0015

C27A
C29t

0"'7~

0071
0078
0019
0A81~

12102C'

0tJ184

0012("
!1l()!2E
0IilJ£I'
0P132

00S!'I

0~3A

0V'tH?
ilVl8~~

mes"

011136

•

YNOIC EVERVTHINGC0 • MAX VAL)

RANf~415

ONLY UPPER LIM!T PRESENT. ZERO LOWER LIMIT

'*

0071
0012

O",81

FlB,R1Q1
R10

AAN0HI eLR

0V16'
0(.1168

0069

twlOV

DEC
JMP

PlQllr

01i\6~

EXTRACTfA

fJMPTAlHRU

''** BOTH PARM! NULL.
'JUN~0(il
*
eLF\'
R9

•'*

PARAMeT!~

RQ

,*1ol10,R1A
RAN(~"!fl

ONLY LOWER LIMIT PRESENT. SINGLE CONSTRUCT ONLY

RANIlI2C11 MOV
MOV
JMP

*R1!1'1,Rg
Fig, R UI!

RANQ!4P

'** BOTH LIMITS PRF5ENT
'*
RAN~3P
MOV ,*Rl~.,R9
MOV

• LOWER ANO UPPER

*Rl fil,"'lt?1

*'* CHECK LIMIT
'*
RANQl40
EQU S

ORnER AND RETURN

828:;1

C

R9,Rl91

1131716

JH

RANi1I5ffi

C2~8

MOV

JEQ

R8,R8

13",~
82~t

C

fH0,Re

1"~~

JHf:

RANtA51'l

EQU

!

~ANr,,4~

~~8'

0fl38' RAN0I4!5

0i1!8M
0V!89

05ee

INCT Rt1

0A~f)

0"'9(11
0t~g 1

01"3C'

RT
f:QU

$

02P1A

1..1

R tfd, RNGERR

•• EXTRACT RANGE OF MS
0Cl1;'f
fHHH~

111 ~

o1(1 AVI

046'"

0~~42

01i"0C'l

0093
0094
0t:1-4A
1l!0Y5
02100 ERS

01(144'
046t1

ANO RETURN TO CALLER
ftAN0e~

EQU
RT
END

c

$

C"·'
"

..

<"-

,oee • ""

_-----------

..

_-- -----

----

rONcnROANC!
QUI39

0079

0120

0Q111

00815

"''''80

ERROR
JMPTAR

0f113P

0"~H

PRetT~

0"'31

l1J~o49

PRBTSM

R'

0P132
0013;'

01U8

111049

001151'1

IlIPI!!H

1'H0

0P!3~

0""8

0Q1!5~

001157

0pe3

01'/11t1

0G118'"

00184

I!lri'QtI!

fHt

0P!37

0Q!81

R8

0"'3.1

0(.118 A

IUlllfA0(l1

0~~~
0tJ\!5~

0C1l82
III 152

1/!tJ\8~

R9
RAlltlAlrA

~f)62

RA/II~a~
iUN~~!t\

09!6~

00ee
0(11155
0"0
0"041
0(11'2

0017411

0""~

rUfiifll<4t"-'

(('P7P

00!t54

0(11"~

RA/II!I!4!S

0c-8~

0P1ee

I'UN(Il!5(A

0P8Q

0.81

0Q!83
01!l85

RAf.i~6~

eQl~~

RANGEl(

0~'A

RNGf.RR

0f.l131'!1

THERE ARE

"""R

01!lefll

o

otilft A

00169

0~e:5

0(116"

(1H~14

QHA8P1

0Aeo

1'/1(11"4

tU17!5

IU28
rUlgm

0020

SVM80LS

(

~

TEXAS INSTRUMENTS
INCORPORATED
DIGITAL
SYSTEMS DIVISION
AUSTIN, TEXAS

~CUMENT

NUMBER

~3'~-~()1

REVISION

SHEET

50~5

0,
"

o

o

+

A[
APPLICATION

(

NEXT ASSV

-..

LTtt

USEOON

REVISIONS
APPROVED

DATE

CESC"""ION

7506

·

·

.

.-

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLIESS aTHIE_ISlE SI"IECI"IIEO
DIMIENSIONS A"IE IN INCH ••
TOLE"ANCES
ANGLES ~ I·
I "LACE DECIMAL :t01O
" "LACIE OIECIMAL + 02
IDENTII'YING !'tUM . . . . .
SHOWN IN "A"ENTHESES
"E"IE"ENCE OftLY

"0"

c

.\

INTE"""IET OWG l!'t
ACCO"DANCE WITH
MIL·STO·IOO

~N
e .."

ENGR

Q'"
"PVD

.~

"

~L

CONTR"l

A

L

/

1'1-•••

,·e

TEXAS INSTRUMENTS
INCO" ''0""" I: 0

0./_. T....

Equ"""'" G-.

AL, SB, SET BREAKPOINT-PX990

·

'\.

OES/"ACTIVITV RELEASE"

/

~tP

DAT~

"-

SIZE

COCE IOENT NO

A

96214
I REV

SCALE

•

DRAWING NO

""

945377-9901
SMEET

1 of 5

·

PAGE N!IQl2

JOT

0003
81004

SSP

•*

USES

..
SET BREAKPOINT CMD PROCESSOR
• REVISIONI
..
ORIGINAL
.. cnMPUTfRI g~0,AS~
• AeSTR~CTI THIS ROUTINE PROt,S!!S TH! sa COMMAND, IT FtRS
..
VERIFIES AN~ oeT.t~S THE BREAKP' NUMBER AND
*
PC LOCATION, TH!S! ARE PLACED IN TME 8RKPT
..
TABLE, TMEN, A REFERENCE COUNT IS ENTERfD INTO
..
THE TABLE ENTRY, IF NULL, A t t8 ASSUMED, THE
*
LAST PARM,l' PRES!~T, IS A SNAP _, IT MUST
..
BE DEFINED, APTER THfS! DATA ITEMS ARE PLACEO
*
IN 1M' TABL!, TM! BP IS MARKEn AS DEFINED. ANY
•
EA~OR8 RESULT IN A NASTY MESSAGE AND RETURN TO
*
COMMAND PROceSSOR,
* CALLING SI!QUENCF..
•
A10-CMO PARM LIST PTR
*
CMD PAR~ LIST. PAR~./PRESENce BtTS
*
PARMS
Bl
'SRP
*

000!5

001118
001/11
1008
10189
oQ! 1li'l
fiHHt

0012
0~'3

0014
00115
liH'I1 ~
IiH""

1i1018
0019

00a'"
iUI21

0022
0(:123
002'
002'

•.
•

1026
0021
002~

t

0029
003£11

111(1133
I1HU4

REF
REF

003:5

0036
IUIJ1

0038

00001

C0

0039

0!'.l10!

80
0001
0001
112m
0000

0041

0042
01343
004.
004!
01114e
004"
0048
0049
0$'150

OEF
RIP
PEP'
REF

sap

8PTAe • BREAKPOINT DeFINITION TABLE

NUMAP!
ENTSlf
NUMSNP
5NPTAA
SNPENT
ERROR

REF
REF
FLAGSN f'YTE >C0
eYTE >~0
FLAG
PRStTS fEll!,' 8

er.w

1

OP20

I:QU

>1120

IilQl

EQIJ

o

fQU

1
2

51

0Ci1fiH

Rt

000~

R2

000e

R!

000?

Ffg

0D101.
0~0E\

R1B
Rll

EQU
eQU
EQU
EQU
EQU

((HH!lF

Rtl5

j!QU

o

P0,R1,R2,Ae.Rg,Rt~

REPS, OEFS, EQUS

09131
0032

0040

'S8'

.. T TTL! I

•
•
•
•
•
•

o

OF AR!AKPOINTS
ENTRY BLOCK SItE
NUM8ER OF SNAPS
SNAPSHOT TABL!
SNAPSHOT ENTRY SlZ!
fRROR PRnC!S!OR
Nu~eFR

eR!AKPOINT !RROR .

5

g
UI

U
Hi

o

••

SET

B~EAKPOINT

'*
'*

~HH5A

klVi5!5
01il!5S

0rAfl\~

C~:3t.

~0e~

0r;,04$
01'HHl

00!)9

0t110~

"A801
H524
CV'l7,t.

liHH57

liHH5f.l1

0064
0065

't*
0910.

0281

0~0C

0fl10~

0Q10E
0Q1 H'

020~

0~12

0000

1 A2t~

Gin INDEX NUMBfiR

ANO FINO

MOV
SLA
JGT

RtIl,PRPITS

"'OV

tRtl'l+,R1

.Rlli'l+,R~

eLoct<

PQI • .., P M~MS/PRe:I!NC:E

ff!tGlUIREO tNOEle

S~P1~1A

CHECK tNOEX

f'~TRV

FLAGS

MISSING

!\jLI~aER

eI

R1,NU~BPS

JHE

SAPIQ1P!

BAO INOEX NUMB!R

Ll

R2,i!NTSn

0Q11~

3~A~

MPY

0!A61

0~H

022~

AI

R2,Rl
R2,8PTAA

Ft2.r M\\Lf ENTRV PlOINT!R

(lJ01e
CH"P

0fi'10~

MOV

R;?,RQ

Rg.TA8Le: ENTRV POINTER

C2A~

'*

0rA12

0f.l11C

05C~

0~73

0(}11F
fllVl291

0A1ti1
1511

12102?

1~1~

f(t(i'i2.4

Ccg,t.
ceB,t.

0r,q4
0075
00176
I1:lCJI77

0~2f'\

fO~1~
ij~1Q
~vHH'1

011181

IZJ!l'28

073~

~Ple~

C!I:i\2~

o A1 In

0fi!8~

0084

0(112r
0(112F

110~
~AD~

0"'85

0~3(!'

•
•

..

•
•

TNtTIALIlE PC VALUE

INCT

R~

SI..A

R0,Sl

JGT
JEO

SBP10&l\
.Pl~,,*R2.

MOV

.R10+,.R2+

INSERT REF CNT

SETO *R2+
SF.lpC1~fI

CLR

.R2

JMP

S6PIlIA\PI

SBPt1I30 fQU

0\~32

C4Bt.

~10V

0tl1SJ4

I!lP3.d

id6 H!

['llfC

•

1'It'l3t-

o A1I'/l

00g~

0r~JP

16(.194

1'1113

0~13A

DtHS0

Move

003r

0"'01'
lV:Vl1

JMP

fiHHH5

0fi\3E'

I!! 0 SH'I

SRP"49l SLA
JLT

'*
'*

~1lI91

ftllt!\.IA
Ii.'ftlQg
IU",II!

•

Ill'" 4r~

C~1J.

00142

0280

0rJ.AA

0"'00

•

MILL?

$

*R 1 r)t+, 1fR2
.R2

GET SNAPSH.OT NUMBeR

00901
10091
0£1192

'*

ROI,S1

.JL T

0081
0~89

PC MISSING

SBP1f/1lli!

MOV

$LA

ltl10~

1IJ1'I3~'

IlIfA8f1!i

C

PAGE 00Q1!3

011166

0"'68
"0(HI
0071'J1
0f1J71

(

'*
'*

fd061

0rA62
tHH53

945317",,9g~1'*.

SSP

0~152
fiI~5:3

(

PROCESSOR .t

CHECK OUT

S!;PI'lI'0 MOV

CI

RtfI,Sl
SBPtH5P

~itllt1

'FLAG~.Rg

YES, MOVE O!F'D,NO SNAP FLAGS

SRPlA9~

EXIT

SNAP

"

.Rl~,R"

R"', I"U~SNP

1(~.~I'·ap

11/

•• .. SET

BRE,\I(POINT PROCESSOR

81tH
0102
0U13
'H04

004e

fU0l'!

0G'!4"

0106

ceeA

"~4A

OI5I!H'1

00!4C

0000'

1107
IUle
1100
0110
IUH

14041

00!4f

111114

0111

MOV

Move

..
..

88P10O'

PAGE

0Q104

IL.LEGAL SNAIIISMOT NUMBeR

tNSERT SNAPSHOT NUMlrR AND FL,6GS

0

.R10,*R9

'FI,.AriSN,tR9

EXIT

0041' S8P01i1f11 EQU
0415e"
~T

21113

1116

J~f

9 415377.98PH ••

."

8112

111"

....
.

••

0~DIi'J'

0P1f1£il

020t.

0fiH5P

1120

0Cli!54

046~

0(11156

00100

1118

•.
..

$

ERROR EXIT

8ep10~

EQU

$

LX

RUI,OP20

6

'F.R~OR

fHHUKPOXNT SPECIFICATtON !RRO
(SR A"" 0 RETURN TO MV CALL!R

E"NO

01000 ERS

o

o

PAGE 0005

945377-9901**

(-

sus 0 •
s

ge0

CONCORDANCE

BP1A~

OP2111
EN1Sl'l

0Q1A?

EAR"~

FLAG
FLAGSN

0030
21~3R

NUfrlSNP
0~4~

Rt

0014.
0014P
PH'49

IH0

Rll
R1f)
R2

0P187

0t1!;"3

00515
0111

001!5 ('.
0C1i4!'5

flue

21"'83

0ft1134
0f11~'

010(1;

,,,,,eo
e,ee

0"~

0A"
01'1163
00159

00e5
"'(1187

0V182

0t1!92

0(J199

010tl'

0'7~

riH~"

00187

0""09

0UJe

tU 16

0pel'
0"'88

0067

0G'16e

0C1172

0""6

0'"

Ql081

0.,73
"I.'I6f1

R15

0V'4f.

R9

00'47

0P16A

01119·

v..tI"1
0052

0~73

01118P

0t0~
0f119~

0'0~

SI

0(11301

0!l1~Hol

0"'83

0~'84

00'"

0 rA 7!5

s~p

SRP~3~1
SRPf}l4~'

0C1192

t1"'~~

SBPi/'!5tll

0~99

(lI",93
0""95

S~PtA9t"

SBP lld(tl

(-

0"'4f~

lUI

011"

0"';"
0Ut!

011137
0'9'«
0106
0P!32

Nu~ep5

PRE:! ITS

~fle~

011"
0115

SNFI~NT

0I'5i!'
APl3tt

SNPTAH

0'35

THERE "RE

0027

SVMAOI.S

0t01

0084

........

__ .._- ........ - ..

---~----

c

c

o

,.-------~-,

-!.

Al
APPLICA TION
NEXT ASSY

REVISIONS

LT..

USED ON

APPROVED

DATE

0E5C~1ON

7506

(

.

~

)

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE_'SE SPEC,,.'ED
D'III1EN510N5 Aln IN INCHES
TOLEIU,NCE5
ANOLES ~ 1·
J PLACE DECIMAL:t 010
2 PLACE DECIMAL + 02
IDENTlI

SCTQlt0

0UHS
0121

1(1115'
0133
0112

lat3'

0107

R\IIP

seTe

121'27

IUI5~

.uo

RfT8IJF

(

"lee

lue
0121el

012160
0015S
007121

RA
A5
AS

acT02"
scTaile

945378-9901**

lUI 50

0080

THERE ARE

0020

SVM80LS

0t251

121129

PAGE 0005

o

()

()

+

A[
APPLICA TION
NEXT ASSY

US€OON

LT..

REVISIONS
APPROVED

DATE

DESC""""ION

7506

•

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE_ISE S"ECI~IED
DIMENSIONS A"E IN INCH~.
TOLE""NCf'S
"NOLES+S·
J "LACE DECIM"l:! 010
2 "LACE DECIMAL + 02

c

,

-

C"~"
ENGR

IDf'NTII"YINO NUM.~1It1I
SHOWN IN """f'NTHf'St:S
100" "EIOE"f'NCE ONLY

QA

INTE"P"ET OWO IN
WITH

"pvQ

"CCO"DANC~

MILSTD·SOO

OAT/,

~N

'"

/

""/

""'""

DE7ACTIVITY RELEASE

,,-

...

,.(

/

I" C 0101 PO" " , I: D

Dill,., T....

Equipm«lt Group

AL, SIEPR, SIE DRIVER-PX990

~

C~TR"r

V

~~

TEXAS INSTRUMENTS

SIZE

eCCE IDENT NO

A

96214
I REV

SCALE

•

ORAWINGNO

. .. ,

945379-9901
SM£ET

1 of 6

•• atE DRIVER ••

•
•
•'"
•

0003
0"04

011114'
"008

0007
fiU)l1B

101111
011tH
0012
.01/113
001'IiHoHe

'"

*

*1

CALL SAV! CURRENT ENVIRONMENT,
CALL SET FRONT PANFL WnRK$PACE
SI~ FLAG , '99~0'
CALL SET USER ~NvIRONMENT'
."
Sl~ RETURN AnDRESS. StETNT,
SlF IN PROG • -1
eRu AAS! , FRONT PANEL CRU,
''""
CALL Sye: Exe:e,
'"
CALL SAVI USER ENVIAONMENT
'"
IF ,NOT. SIE tN PROG THEN INITIALIZ! MONITOR
'*"
SlE IN PROG • 0,
."
CALL RETURN MONITOR ENVIRONMENT
END StE
lOT 'SI!PIP
SIEPR
'" TYTLEI
."
SINGLE INSTPUCTION EXECUTION PROC!$SO~
." REVISIONI
."
O~IGINAL
." COMPUTER I 99~,A8M
'" ARSTRACTI 5tE EXECUTES ONE INSTRUCTION USING TH!
'"
StE INTERRUPT, ANY HALT INTERRUPT (LEVEL
'"
0 INT!RRUPT NOT CAUSEO 8V MONt TOR INITIATED
'"
SIE) WILL RF.-INtTIALIZE px;
'" CALLING SEQUENCE"
'"
ElL. 'SJE

0017

"1It19
00201

0021
,1022
0023
00241
001!
0028
'i

,,027

ee2S

0029
'''/130
011t~t

&:1032
0~33

00,)4
0035
"'11136
Wl031
0038
0039
0041'1
0Q141
0042

'.""

•

0043

OfF
DEF
REF
REF

004~

~E'

REF

011148

REP'

RE'
UE'

0041
0048

004t:J
0050
0051
1052

REF
REF

REF

•.WORKSPACE

011153
001U1

00o,

•Rill
R,

c

REF'S ANO OEF'S

0045

1058

c

•

ra018

'HlH54
00515

u: J

."

•..
•

1651JH;

i

S

• 91f CONT~OLS THE LEVEL ZIRO INTERRUPT
AND PROGRAM~EO alE FACILITY. WHEN
CALLED FROMT~! Mn~!TOR, IT WILL
EXECUTE ONE INSTRUCTION 0' TH! USIR'S
PROGRAM AND RETURN. WHEN A FRONT PANEL
HALT IS PUSHED, THE MONITOR IS
RE-YNnrALIZED.

."

fl00g

PROCE~URE

51E
StEINT
FPIIIP
USRWP
USRPC
USRST

FRONT PANEL.

WOR~8PAeE

CRuef1'
PCOUT
INIT
SlEWP
SIEST
SlINPG

REGISTER DEFINITIONS

EQU

0

e.Qtl

1

o

••

sn:

0Ql~7

0Ql58
ItIQI!59
&HHSQI

l_

01?1lU
""'6P.
01i'63

""'64

'

000~

000e
011101

0008
0P.10~

R2
A3
R112

000e5

R!5

Eell)

0113
0114

0~1lJ~

Rt;

0001
121008

R7
A8
R9

EQlJ
EQU
EQU
EGIU
EQU
EQLI

IUl rs

c

8
6

,

EQU

0Qt0f

R 13
RU

EGIU

8
9
1'"
11
12
13
14

'@l0'

R15

EQU

1!5

16124

0f10:!l

Ri12!5

*
MXSNP

121100

LaVT~

UH'
E:QU

21515

0126
iH27
0128
·11)129

0tIHH'l
0(.Htl2

01115
"111

. 000,t.

RU

011~

lU!I~e

Ril

0U9
012~

000C
01:'101)

1'6121
0122
0123

""0~g

001i13

0004
1103
1104
1113

IU3~

0131
0132
0133

1134
f11 ~!5

AHi

felll

SSO!F EQlI
SSLORG EQU
SSHIRG EQU
SSMR 1 FQU
DP03
eQI)
OP04
fGHJ

01;';

il142
rU43

*•

.'"

flU'''!?!' SSS

PA~MC

IU~,R10

"1~1

R~

R.
R3

*.

P2
EQtJ

$

·ALLDC,COPV,LINK
SL.wP 'ACL.
2.1* SET SNAPSHOT ACCEPTS AS I
CO~MAND PARAMETER LIST. Y
2OR DeFAUL.TS THE APPRDPRIA
2AND
BUILD'S A SNAPSHOT TA
22 •• 1
t.FLAGS '" CPL.FL.AGS
2.CP!" '" tP!.. • 2
1ST P

'*

'*

lu,e

001214

t23A

11et'S

001(H'j

0A88

01"

000A

CttA

e.l~9

12100A

04CA

'H6A
filtH

00ec

020Z
0001l!
060:5

'*

MDV
eL.A

tR10+,R8

Io10V

R8,a
R10,R1

eL.I'

R4

L- I

R3,NUM8NP

DEC

R3

eLR

Ht

e.PRM DEFAULT. 0,

tl1 :58

001llE

1'1162
0163
8Ul4

.--~--

.

__.-

IiH'I1 ~

- - . _ - _ . _..

0'C2

-

DEFINED

o

P1

Pf>

..

811'2
eU53

AL~EADY

~lN

SUB CALL PARMa
CPL ft'LAGS
CPL CUR~ENT 'OINT!R
S~APSHOT !NTRV POINTER
CURRENT PARAMET!A
PARA~ETER DEFAULT VALUE •
UNCHANGED BY
PARAMETER M•• VALUE
PARAMETER MIN VALUE
* SUAROUTIN£
,.PROCEDURE SET SNAPSMOT(CPL)'

..

01e~

MA~

SNAPSHOT

*..

1'149

01'4

PAFlM ,.

Re

t

rU4S

)01103
>11t114
>1113

REGISTER ASSIGNMENTS

•

0146
ili4'

;)

4

t
t

IU40
rUIH
1"144
IU4!5

SNA'SHOT DEFINED FLAG

",e0

EQU

'*
*'
*

SNAPSHOT .,

2

DP1:5

.*

0136
013"
fH38

~A)(

3

•
•

-----~---

--.~.-

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

a_PRM MA)( • 3'

o
---

----------~-~-

••

SET SNAPSHOT PROCESSOR

0US~

0167

016A
01bQ

0~1~

"'tiA~

0"'16

","8tJ'

0C"lP

lVi33

~11t.i1

!dll!

0112
0173

0~H

0~1r:

00'1001

0~1f

!tIt1!!!

0P1:'U'

380!5
k"!:i'21

0~22

0~H'H'

0P124

CUt

ep'~

fCl119

01i'12~

C~H3

0ta",

0~2~

024"'"

01112A
01?!2C

8~0,"

. 0f.l12f

020;'
0Plll'

0181
0\82
0183

0~3V'

1625

101814
0185

0186
0~3~

0~A'~

fi:H1I34
el?!315

0081'l'
l1i'124

01YlA

09'38

0.8~

0UH

0!1!3~
0~3C

0gee

011'13£

08tH5

0~4~

tHlle

00'~

C08!S

0lH7

(-

0188
iH8P

IU92
511193
0H.,4
Itll9fS
fU!.)6
IlIlY?

"'00~

019~

IH99
020~'

0~4I'
21046

06AUI
0""8."

0201

0~4I8

HH6

021d2
021ri3

0~'A

0A8~

0V!.r

D98!5

0C'14f

06010~

ii20~
Ib2~7

0Q!5P

0ACA

0208

0C'1~2

0203

00r5411

FFFF

~21riA
iHHt~

0209

(:

...
...
...

•...

Ql0~e

PAGe:

2 .. CALI.. GET pAFlM(SS.,PRM O!FAUI..
MIN,ERROR),

3 .. PFlto1

8L.

'GTPA~~

JMP

SSS~301

...

0200

fill 1 A

0178
14117

9415380 9901.·

...
...

016~

(-

...

2 .. IF

Ll

R0,SNPENT

r-IPV

R!5.R0

.1

Rt,SNPTAB

1'I10V

~1,~6

.NOT. ERROR THEN DO,

3.. SNAP ENTRY • LOC(SNAPSHOT TA
SNAP ENTRY LENGTH,

•• S8*

•

,

3.. tF SNAP ENTRY,SNAP FL.A;' ,AN
4.THPN 00,
MOY .R6,RCtl
ANDI RPI,SSOEP'.LBVT!

•
•...
•
•

•
...

...

•
•
*

JNI!

SSS(.'121?!
,hPR~

1..1

*

•

,,. "

'.CALI.. GET PARM(L.OW R!G,PRM
e.PRM MIN,ERROR),
,.IF ,NOT. ERROR THEN 00,

AI..

'GTPARM

JMP

885030

SLA

Mova

rH5, A
R!5,'SSLOAG(rHn

SIU

R!S,e

MOY

Re,~.

MOV

R!5,R2

S.ShAP

ENTRV~L.OW

!S",PRM OEFAlJLT

e.PRM MIN

•

•

AfG

•

or

LOW lUG

LOW REt;,

LOW REG,

e.CAI..L Ge:T PARM (IonG~ REG,PRPII 0
MIty,ERROR)'
e·rf .NOT, ERAOA THEN DO,
8.PR~

AI..

'C,TPARJII

.JMP

SSS03(l1

SL.A

IHI,8

8.SfdP
MOVS fH5, 'SSH fAG

*
*

MAX

R3,'"

CI..R

RA

1..1

R3,"FFF'

ENTRV~HtGM

(liun
e",PRM.OEFAULT

•

AI

e .. PRM,MA)t

•

.. FFFF

e",PRM.MIN

•

0'

REG

, HIGH

R

.*

8ET SNAPSHOT PROCESSOR ••

02111)
021'

00156

0213

09115~

MIN,~RROR),

eR14
02115
021e

0f7!5r.

lf11l1

"211

0~5E

C98!5

0r,tl6~'

0004

0~62

C\0~

0~64

C085

..,
J MP

SSSt13li1

•

0218

III

..,

0222

~o"

!H5, R2

RL

'GTPARM

JMP

SSS~3t1'

MOV

R!5,'SSMR1+2CR8)

•

0223

..,

00e~

06A0

0r,tlf$f!

0~815'

0226
0221

0f1!6A

100A

rrHU"

00tiC

c.;98~

0"'8f'

000ti

e22!5

..,

(/)2;'~

0231

0010

0200
8~00

"2~2

0012
0074

fe80

1233

,.CALL GET PARM(MEM,PRM D!FAUL.
a-PRM MIN,!R~OA),

,.rF

,NOT. ERROR

..,
..,

a_SNAP ENTRY,FL.AGS • SNAP ENTR

lX

g",.OR, SSO!'F

RCiI,ssoe"*t..8vT!

SOC

..,

'.END,

lit\U4

..,

CD23!
02315

.

.ct-RETUIIIN

•..

;'",!NO,EL.SE on,

007~'

0236

1910.4

1it23Q

0240

0917.'

0241
0""~

02101,
1104

01f17C
007E

0000

01i'7P

~080'

0246

0247
0248
0249
02:50

0089'

12~H

0"'8~

0420
0000

0V1SA

0t1l58

IUts4
e25!5

02t56

e-ENO'

SS8010 EQU
JMP

A",!ND

..,SSS02~ EQU
LI

f66AQl

0245

1253

e.. !NO,

..,

(0237

TMEN 00,

S-SNAP ENTRV,MEM RNG+2 , M!M,

•

0229

e2e~

MEM,

t

022~

0242
0243

C

0fUt'l

",,,,se'

02204

".CAL.L. GIT PARM(M!M,PRM DEPAUL.

,.PRM

•
0Pl~.

1221

R2

•

~212

0219

CLR

04C~

PAGE "'''PIe

008e'

'*
SS8m30
EQU

.
.•

2 .. F.NO

i.F.ND SET SNAPSHOT,

-t..INK TO PREV WKSP, RET CURR
SL.WP ,RR

..GTPARM
•

.'*

$

~KSP

RT

fQU

S

2.PROC!OURE GIT PARMCPARM,D!F •

3-/* GET PARM 'INOS THE NEXT P
3IN TME CPL IF PRESENT,
3IT, ELS! THE DEFAULT IS S

4NO.

.*
(-

SET SNAPSHOT PROCESSOR

0267
021H..
0259
0C1t8~

Ct44

0088
01?18A

0A18

taP.152
0:?63
0264
10265

17~1

",~ec

0210
0P18f

04CA

0P19~

8P1e~

•

.R7+,R5

IH0

c

R5,R2

R10,DPS3

.

0201.

0P!9E

1103
00A0' STP030 EQU

S

Rt0dH0

0171A~

1~~4

001A4I

c:5ce

0Q!A6

01.;A0

0Q!A~

01'17£'

0\11 All

04e,.

0Q1.C'
0Q1AC
0~Af

02gfli

ERa

0!5Ce
0'f5P.

Ll

•
•

$

R5,R3
GTP~3GJ!

R10,DP03
3.-tF ERR

P11

,,"9

0'2~

"'4(,1
SUP
011,4
023(7

0~03

01.21
fH2t'

~nH'I

SSf'l~t

0'2P

0Pl~

SSS

014.t1

~Plg~

S8S~1f.'1
SS8~20!

0:;?411'

018P'

Ssap!l!!

0'4~

" U'l~

0221

0'~f,

T..,Ef;e AI"I£

0C1141~

0187

~2'HII

sVt.\jqCl.S

o

+

A[
APPLICA TION
NEXT ASSY

(

LTJit

USED ON

REVISIONS
APPROVED

DATE

CESCftPTION

7506

-

..

c

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE_ISE S"ECI~IED
DI ... ENSIONS AlliE IN INCHES
TOLEIIIANCES
ANGLES "!"lJ PLACE DECI ...AL :tOIO
2 PLACE Ot:CI"'Al:!:02
IDENTII'YING NU ....E ...
SHOWN IN PAIIIENTHESES
~O" IIIE~EIIIENCE OfoILY

c

""1

INTEIIIPIIIET DWG IN
ACCOIIIDANCE WITH
"'IL·STD1OO

~N
C ... "
ENGR

QA
APVD

"./

CONTR

//

""'"
NO,f"
I"'"

/

/~

TI-••• ~·C

TEXAS INSTRUMENTS
INCO"PO,,"" ED

Equ."".,,' Gf'OI4I)

D",,.,

r __

AL, SUPVSR, SUPERVISOR CALL INTERFACE-PX990

//

'"

DES/,ACTIVITY RELEASE " "
'. y.'

~~

DATE / /

'"

SIZE

CODE IOENT NO

A

96214
I REV_

SCAL.£

+

ORAWINGNO

945381-9901
SHEET 1 of 7

PAG!
0'0~

80 IlIA

IHlUH5
1i1016

0001
ell8
Ifll?J9

8e10
001t
0012
0013
fU14
otil I!!!

101e
0011

IUHS
1019

"20

*

*
•
•
•
•
•
•

**

*
*

DECLARE
FLAR BITeB)'
1* PROCESS FLA~8
DltL"'R!
(INTERRUPT ~ASK, CHA~GE WORKSPACE,
WORKSPACE RETURN) INTRI~SIt.
CALL TURN OF' SI!
CALL CHANGE WORKSPACE'
IF scetsCe tHO)
~AX C~ THEN 00.
SCBesce ~!SuLT) • 0,
CALL ,cn~MANO LtST(SCR(SC8 c~o,"

•

END'

•
•

*

•
•

*

rune
10ae

•
•

0ea1
•• 28

I,ag
0CU0

8"31
8032
0033
10:S4
8"35
10;S8
le;S1
1038
I.;SO
afU0

"""'t

.142
8043
104 ..
1045
1048

1041
8048
"HUg

1050
10tH
(/HH'2
1~!5~

1054
005!J
0058

sverse."
1* ave ALLOCAT!S A WORKSPACE TO REPLAC!
THE FIxen WQRK8PAC! 0' 'HE xo~ VICtOR
AND SWITCHES T~ IT, THI SUPERVISO" CALL
IS VALIDATED ('OR to) ANn TH! APPROPRIAT!
SE~VXCI ROUTINE IS CALLED.
WHEN cnNTROL
RETURNS FROM TME SERVIC! ROUTINE, THE
CANCEL FLAG IS CHICKED FOR THE PROtISS.
IF A USEA PROC!S' HAS MEEN CANC!LL!O,
THE PROCESS rs TERMINATED, *1

•

•

*'

.!I

t
t

*
*

o

PROC!DU~E

*

leal
00a2
10a3

lea4

GHI!"t

END

e:LS! SCBCsce REIIILT) .. i,
CALL SWITC~ WORKSPACE
IF StE MOD! THEN DO,
CALL TURN ON SI!,
END,

o

ave,

lOT 'SUllV8R'
• TtTLE'
SUPVSR
•
SUPERVISOR
• REVISIONI
*
ORIGINAL
* COMPuTER' g00,ASM
• ABSTRACT. SVC ALLOCATF8 A wnRw8PACE 0 REIILACE
t
THE 'TXED wnRKSPACf OF 'HE XOII VECTOR
*
AND SwITCHES TO IT~ THE SUPIRVISOR
*
IS VALIDATED C,OR 10) AND TH! APPROPAIATE
*
SERVICE ROUTINI CALLEO. WHEN CONTRDL
*
RETURNS 'ROM THE S!RVtC! ROUTIN!, THE
*
CANCEL FLAG IS CHICKln FOR THI PAOC!8S~
•
I ' A USER PROCISS HAl BEEN CANCEL!D,
•
THE PRocess 18 T!R~tNAT!O.
* CALLING SEQUENCE.
*
BLwp 'SVCALT
*
Al~ • ADDR!SS OF PRB BLOCK

•*

*
*
*

•*
•

leOP

us,.

CALL

'RO~

USER AREA

PROGAA~

1-PROCEDURE IVC(SC!)'
SVC ALLOCAT!S A WOAK,PAC'
1- THE FIXED WORK.PAC! 0' THI
2. AND SwtTCHIS TO tTl THI:
~-I.

ao

•• SUPERVISOR CALL INTERFACE
00~'

(-

006A
0061

0065
0066
0061
IUOS

222p2-

."

."

."

16011

..wORKSPACE
IQU

0P112
0r1.!73

09!0Q!

RPI

0(11"'1

001'

0~02

Rt
R2

0~,e

0P103

0('IJ1~

007A
0Q110

IUl04
0Q10e
0",0e
0/iH111

0£HH1

FQlI
f'QlJ

REGISTER DE'INITION8
CD

1
2
3

R3
R4

EQlI
fOQU
fQU
f.'QU

EQlI

ts
1

0008

R8
R7
R8

EQU

8

0iA8t

0010~

RQ

fQlJ

9

00182

000A

!QU

00183

008'

0A06
0010C

f:QU
P'QlJ

""'8e
008f11

RU
AU

0000
0001!:

RU

f'QIJ

10
11
12
13

1'1.

0f187

0010'

Rte

f:CilU
fQU

'II

REF'S AND OEF'8

~rt.11

00188

0080
0Ci1SH'
0091
ft10g2

0"'93

Re

!He

..
•
*

OEF
"Ell'

kJA94
0A9!5
0(1191;

OfF
REF

0091

REF

0098

BragO
01001
0101
0102
0103

010"

~!F

REF
REF
REF
~EF

kEF

REF
~EF

011~

REF
ReF
REF
REF
REF
REF

011 t

REF

0t05
010R

raul'

(U0A

010Q

IS VALIDATED (FOR to) AND
S!RVICI ROUTINE II CALt..!D~
RETURN! ,ROM 'ME I!~V!C! R
CANCIL 'LAG II CM!CK!D ,aR
I' A USER PROCESS MA8 8!!~
TM! PROCEIS fS TERMINATED.

22-0ECLAR!
I'll PROC!IS I"L
3."L.AG eUTrl"
2-0ECLAR!
3-CtNT!RRUPT MASK, CHANG! WORK
:!I- WORKSPACE RETURN) fNTRtNIl

'II

kHH;Q
00710'1

PAGE "'003
?-

•..
.,.•
•
•..
•

e0e9
0063
16064

C

g4e381.09"'1*.

."

011H58

0Ael2

(-

••

..

e
~
.

I

i

l'

15

8ve
SVCSR
sveS~A

SVcwp

to

TERM
CNVRT
FPWP
SIEINT
URRPC
peOHT
8VCW1Pl
CRUOFF

Ive"'?'

GET8LJF
RfTAUF
LillII'
RIilP

ACl
RR

~

ust!~'S 1/0 CALL
END OF PROr,RAM
8INAAY.A5CU CONVERSJON RQUTIN!S

9415381.990' ••

•• SUPERVISOR CALL INTER' ACe: .'.
(11112

lIe!

0113

."
."
."

eu.
eue

•• 7C

1118

Ive

IU'

."

IUA

ft

IU9

ft

112A
8t2t
fill 22
0123
IU24

•'*
."

.,
..

e121

."

012e

0000

(1H3~

0001

0131
0132
IU33

IflJ00 ,

1011'
121'' 112
0004
01110e
1008

0000

It.4

el4e
0141$
1141
01'8

1149
01~h)

PIP!

CALLER'S WORKSPACE
LINI(AGE
8UPERVtSO~ CALL eLoeK

P)(990 SUPERVISOR

~ALL8

SUPERVlSOM CAL;t "'LOCI<
til

1

FIXED(S) • 8UPV CALL; 10

FIXEO(8) • RETURN coDe

eve SERVIce RoutINES

."

0000
0000

1143

Rl!
1(11

."

IiJt:54

1141
fH4a

)(OP te

.7C

FtEGISTER AS8IGNMENT'

SCBCMO EQLI
SCBERR EQU

.,

1135

0138
8139
1140

EQU

."

0129

rill "7

0

."

IUlle

atae

14

SUPE,RVISOR CALL XOP 15 VECTOR

PORG

0f1100

IU2e
-,

SII'LG EQU

ptAG! 9!01'

100A
101C
001e:

10UI
11018
001'

leu
0018
0P1tA
lIJ~lC

IZIlfUI

scaLST I!QU I
DATA 10
tHTA Ql
DATA 0

OATA

OATA
DATA
100m
OATA
0"10
OATA
0000
DATA
1000
OATA
IiHUJ0
OATA.
0000
DATA
0014'
OATA
ra0U5'
DATA
001.'
OATA
1000
0001' HAXCMO' EQU
0000

~

TERM

1/0 PACtUS!

END of PROGRAM

0

:£"

V

0
121

0
III

CNVRT
CNYRT
CNYAT
CtIIVRT

ASCU

".IIl!

BtNARV C:ONY!RStt'lN

"S.SCBL,8T/R

o

...

SUPEf

01116E

11'104

Rll,RQ
*'LLOC.COPV,L.INK
8LWP "CL

R9
Move .R10,Rg
SWPB R!'.l
R9,t>1A)(CMD
CI
CLR

JHf'

aves!!?!

Move

RQ,'SCBERR(R1(l1)

SLA

RO,l
'SCBLSrCR9),RQ

MOV

•
*

BLWP ENTRV

$

C2ED

015"

PAGE Pl0C!l!5

9453et,.P9Pl*.

0~lF

0154
~t55

.*

JEQ
SL

SVCS1~

JMP

SVCS2tJ1

FRnNT PANEL (FPWP

,.CALL

•

PANEL. RI1"

(CU'U~NT

WORKSPACE,
WI(SP MAV Se: FPWFI)

SF.l USER

p~

CMANG~

OIlTPUT

X(lP

USR~C

TO tNST AFTER )(OP
TO PANEL

EFFECTIVE ADDRESS

..

xnp EFF

nONE ev AtL
ADDR
USER'S WORKSPACE

XI' fFF

AOOR

p-u" scacsce

- sce
CMO)

~.

MAX CMD T

(eM '" SCBCMO-0)

(IF IN'OLIO COMMAND'
0,
3111'SCSCSCA RESUL n
CLR ERR RETURN

,

3·CAtl.. ,COMt-UNO LtSTCscecsce c
(WORD OFFSET TN BRANCH TABL!l

*r;H~

P... EN".
?-F!LSE SceCSeB RESULT)

!!II

11

.'"

SUPERvlSD~

IHil3

01ge

••

",

'Ug.
01ge

CALL INTER'ACE

8070
1012
"9174

09178

0t97

luge

"'70'
020$1

aveS10

11J100
DA8D

0001
1)07"

EQlJ

LX

945381.0901 ••

R9,1!I1 01 0

MOVe R9,'seSf!RR(fi10l
svesal !QlI

$

."

0078

0201'

LX

020~

0P17.
0P,1t

0034'
"'20

BLwp .RR

fail7E

02"2
IU.,3

00.2

130C

091815

21206

0201
0208

0209
1210
0211
0212

0213

0.214
0215

i216
0217

MOV

JEQ
."

008'

"0
••
008A

R7,R7
sv:ca3~

02'U

l.1

R8,FPWP

020$1

1,.1

R9,SIFINT

,eas'

MOV

RP,*R8+

1..1

R9,)o990!l!

0fH~PI

0000
tEe,.,
020$1
9900

MOV

tU!9'

020C

1..1

Rg,.Re
R,a.CRIJOF'

880

SIEf'L.G

118t
008!

lege
00ge
"098
009.

eee$)

""00
lomE

10em

NOP

."

0Q19C'
009C

I1b00!Ra

svcsa0

0380

a-CALL 8WITCH WORKS,AC!

~.t'

\If

Ctt?

0204

02fiH5

R13,8VCWP

0000

IpI,1?!

0

•

fJl99

0201

PAGE 0006

EQU
rnwp

."

•

Sle: MODI! TH!N 00,

3-CALL TURN ON atE'

fr>

2.END,

V

'.ENO ever

!NO

o

,

•

080

(

g80

rONC('!RrJ.H'CF
~,;3~

0149

ACL

~H'I9

017?

Ct./\HH
CPunFF

0P91

0,H

0tPl3

"'~QI()

FPlliP

",pgR

GF1RUF

OI1f2i!'l

""e'

In

0P9~

0134

LWP

tH

!'5~

1i.I,~?

~'4!'1

~1415

014'

0,Q!')

P'6()

Plt9~

QII'9'"

CI!?U

OI"~
(-lUI"

"'"1 p",.
OB 915

0119

o$? (1!.1

~'Ql1

MAXr:MI"l
peOIlT

fA'4Ci

AOI
At

~l'171

li'I,ee0Hl,

"'67

0,!5'
,-,'15')

017!1

017~

~1P~

" "jl'l

C11115R

CJ! , "r~

(}I1!5?
'H6'"

017A

1i'174

0'7~

0'9 R

P!H5Q
0l!51
" U5'

CII~O'I'

t1!?0A
IilH!1'i

~''''
OI?{I~

0""1'

""~R
PUll;

0181il

rt.~7,)

IH0
IH l

tA"'a1

Rt2

~ r~

q13

filr.~·84

~(jf!~

8;-

At"

P!f'l8!"

1'15

eJf!l8f'

~,

Ii'!

".,'t'i'J9

1"117:7A

A~

",,~,

IOU
Alii

(il1'i'7~

Alii

'" (~7f
r'(?7?

R7

I?'r~

7P

,,, 54

R~

'i.lr~" Q

RO

~'!5~

fijP8!l

011601
OIt8'"
~'06

(

Cl!UH

A~TF\UF

~!I?!6

AR

CH 1 P
tH O! P

RWP
seiH'Mn
SC8f:loiw

p!'2P
012Q

SCSL5T

(1'3~

S! I! Fl.'.

r!I , 1 1

STelNT
SVc
svC S t' A

1~
11"93

SVC t:;2i~

Q! U~"

5V(;$3(,'

0118;'
elf AQ
&H't IJI

"",gQ
""'91

~,

~H A 1
tHQt!1

~'1~

SVCSR

~t5~

SVC~RA

t'l151

""PI'

0187

~'t'I~

C1"'Q~

121'0')
G'lU14

01'9.1
~l

1 51

~nifll

fil16'

",~(lI

(;1160

" H5 A

~'~.c1

013fl

"'1"""

~1!5'

~

02f!~

"') ""~

~PQ"

o

~1gA

flI Uil5
0UHI

H'"~

UI

0171'1

"'9Q

lJ~IH'C

T~!PE

rH8~
0P.QI~

0Q1g,

SVCl'll~

SVCIliJ
svr;wp
T1
T2
T;"

0'R~

A!:OF.

~IilA~

Qq gA

Olt611j

SV~f:lOLS

TEXAS INSTRUMENTS
INCORPORATED
DIGITAL
SYSTEMS
DIVISION
AUSTIN, TEXAS

DOCUMENT NUMBER

94538\~()\

REVISION

-,

SHEET
~.,

o

o

•

A[
APPLICATION

(

NEXT .55""

-

REVISIONS
A...-ovED

MTE

~

LTft

USEDDN

7506

·

·
·

(

.

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHIE_ISE S~ECI~IED
DIMENSIONS AftE IN INCHES
TOLEftANCES
ANOLES "!ol"
I ~LACE DECIMAL:!: 010
:r ~LACE Dl!CIM.L:tO:r
IDENTII"rINO NUM ___
SHOWN IN ~"ftENTHESES
~Oft "E~E"ENCE ONLY

c
.(

~N

DATE/

ENGR

"" "'"

QA

.

INTE"~"ET OWQ IN

)

ACCOttOANCE WITH
MIL STD· 100

,

/

C ....." ' "

APVD

CONTR NO

l

/'

tI

,I "

To-ee",e

~

~

TEXAS INSTRUMENTS

011_. r __

I"CO"~O""'ED

Equipnwlr G,...

,/

AL, WKSPMG, WORKSPACE MANAGEMENT-PX990

./

/"~

'"

DESIGN ~striVIT"" RELEASE

,

...

/'

'\,,""

....

SIZE

CODE !DENT NO

A

96214

SCALE

•

fREV"

cRAWINQNO

945382-9901
,
.

SHEET

1

of 7

.

•• WORKSPACE MANAGEMENt ••
111003
0004

1110015
0008

e007
li:!PJ08

000A
111010
0011

0012
1013
0014
0015
101~

0017
101A
11I!I19

eR2'"

1102t
0022
0023
"'flJ2A
"'1I!I215
0028

(402'
IIHua

14029
80;50
'UI~H

Irua

00~~

00"04
00;S5

1038

00'"

IiIIU&

1039
If140
11141
CIIIU2

l'U3
ICU ..

00 .. 15
.,U8

0047
004&

• TITLEI
•
t

PAGE 01102

REVISION.

c

WKSPMG
WORKSPACE MANAGEMENT ROUTINES

•
ORIGINAL
• COMPUTER' U00,ASM
• ABSTRACT' ALLOCATES AND DEALLOWACATES NEW BU"ERS ANO
•
WORKSPACES.

••
•
•

CALLI~G

SEQUENCIa
BLWP .!NIM!M
LINK ALL CELLS TOGETHER IN A

~R!!

POOL

t

•
•
•**

•
•
•
*•
••
*•

•
••
•
••
•
•
t

•
•
••*
*

BLWP flGETeUF
AllOCATE A eUFFER
RETURN
Rt0 • AODR!SS OF ALLOCATED BUFFER
8LHP • RETSUF
ENTRY
Rtl • POINTS TO 8UFFER
BLWP 'LWP
LINK wORKSPACE
ENTRY
Rtl • ADOR OF NEW WORKSPACE TO'SWITCH TO
RETURN
Rt3 • AODR OF OlQ WSP
Rl2 • COpy OF OLD Rl2
8LWP flRWP
ENTRY
RETURN WORKSPACE
R13 • A~DR 0' RETURN

c

~ORKSPAC!

BLWP .ACL
ALLOCATE,COPY AND LINt<
RETURN
Rt3 • An DR OF OLD WOA~aPAeE

t

•
•
t

•

8LWP ,RR
RETURN LINK WORKSPACE AND DEALLOC.Te
ENTRY
Rt3 • AOOR OF WORKSPACe TO RETURN TO
AElUFHI

Rte • AOOR OF DEALLOCAT!D WORKSPACE

o

------

••
(C

wORKSPACE MAN1.CPMENT '*'*

00'A
0051
00152
-0053
0054
0(1j'~

0PHJfIJ

0051
005A
0&11:)Q

0~1It"

0001
0002
0003
0A'U

EQU
FQll

QI

R2

EClll

R:5

EQlI

2
:5

""'III!!!

FQU
f:QU
EQU
!Qt)
EQll

111006
1110101

AfIJ

0t}108

0009

RI}

006:\

I'IHI10 ...

0~64

0P1~e

006S

0A0e
"001'
"00r0rA0'

R1B
RU
R12
Rt;]
Rt'"

0061

0ABA
0061'2

Rte

EQU
fQlI

FQU
f!:QU
£QU
EQU

1

,.,•
7
8
9

10
11
12
13
14
l~

'*

0(1110

'*

01:471
0072

*

'*

0P11J

"""~
"Ut7~

REF'S ANO OfF'S
DEF
OeF
OfF

oeF

0Cl11fIJ

OeF

0071
001A

OE'

REF
PEF

0019

008
0Pl81

Ii'!

(l!F

0082
008~

f'QU

R'
RS

0(1161
0062

(D0f56

WORI
nATA MFMRHI

'*
000!' I.WP

EQlJ

00102'

00Q2

ltl0g,

0001.'

0102

01fl0~

Idlfd3
lilt i4 A

011111(\

0HH5
IH06
BU'!'
01148
0111)0
0111.11

.

DATA MEMWP
OATA MEMIN!

0011115'

00"3

"11tH

INIMEM

0011.14'
ItHH58 ,

.RETBUF

..

011112' RWP
11HH2
0P11A

0£l1e!;'
006'"

e

LINKAGE VECTORS

0088
0089

001i\H~

PAG! 1'il'0"' •
','

INITIAl..IZ! M!MORV

ALLOCATE SUFFER

DATA MEMALC

RETURN BUFFER

S

LINK

$

RfTURN WORI,",

,/

OES~ACTI"ITY

"'-••••. c

, "l

""

TEXAS INSTRUM ENTS
I"COIIIPOIIIAfED
0./•• r __
Equipment GnJIjp

AL, SETREG, SET TRACE REGION-PX990

r"""~

APVO

f

~~

DATE,.!

~
RELEASE ' "

"'-

SIZE

CODE !CENT NO

A

96214
I REV,

SCALE

•

"""WING NO

945385-9901
SHEET 1 of 8

•• aET TRACE REGION **
0003
0fi1Il'AI
I III I/H'!
0~06

"01d?
001118
0009
012110

•

*

•
•
•
•

•
•

000

•

0012
0013
0014
0015

•

00lf11

0011
0018
00113
011920
012121
0022
0023
ile24
0029
0028
0021
0028
012129
IiHU0

0031
0032
0033
0034
0035
003fi1

00J'
0038
0039
21040

0041

0042
16043
0044

0049
0046
0041
0048
812149
00 (51"

0051

"0'2
0053
iHHU

00t5!5
00:56

•

*
•

*

*
*
•
*

..
..

*
*
•
*
..
*
..
*
..
*

*

•

*

..
..

*

..
..

*

..
•
..
•

..
..
..
•
•
•

*
..

*

•
..

PROCEDURE SH CCPL POINTER"
DECLARE NUM8ER TABLE ENTRIIS LITERALLY '4"
DECLARE INSTRUCTlON STEP KEV LITERALLY 'St,
DECLARE (1 TRACE REGION TABLES,
3 TRe REGION TeL (4),
5 TR FL.AGS,
, TF DEFINED BTT (1),
1 TF VARtA8LE (3' I!tIT (0,
, TF INST STEP B1T (1),
., TF FILLER erT (3),
5 TR FILLER fUT (8),
5 TR LOW SOUND POtNTE~,
e TR HIG~ BOUND POINTER,
e TR TYPE INDEX FIXED (16),
5 TR VARIABLE (3) POINTER,
5 TR RESERVED BIT (t6)),
DECLARE CRFGtON JNOEX, TYP! INDEX, Xl
FIXE" (115),
DECLARE (Ln~ aOUND, HIS~ BOUNO' POINTER,
DECLARE (1 COMMANO PARAMET!R LIST,
3 t!PL CONTROL (CPL, POINTER',
e NUMBER PARM! FIXED C81,
, PA~M PRESENT (8) eIT Cl),
e FIRST PARM FIXED (8),
DECLARE NUMERIC PARAMETER FIXED (1~)

c

CONTROL (PAPM POINTER"

OECLARE

(1

CHA~ACTER PARAM!T!R,
~ CHAR pARM CONTROL

(FARM PotNTE~),
5 STRING LENGTH FIX!O (8),
5 PARM STRING (1) CHARACTfR e1'),
OECLAR! (CPl POINTER, PARM POINTER' POINTER,
PARM POINTER • ADOR (FIRST PARM)
IF PARM PRESENT to, • ~
THEN CALL eRRnR C'MS0e'" 1* NO R!TURN *1
REGION tNl)E)( • NIJM!RIC PARAMETER,
PARM POINTER • PARM POINTER + 2'
IF REGION !NDEX ~. NUM TRAce REGIONS
THEN CALL ERROR ('DP10'" 1* NO R~TURN *1
!F PARM PR!SENT fl] • ~
THEN CALL ERROR ('M505'" ,. NO RETURN *1
LOW aOUND • NUMERIC PA~AMETER,
PARM POINTFR • PARM POINTER + 2,
IF PARM PRESENT (2' • 0
THEN CALL ERROR C'MS0~')' 1* NO R!TURN *1
HIGH BOUND. NUMER!C PARAMETER,
PARM POI~TER • PARM PO!NTE~ + 2,
IF HIGH aOUND C LOW BOUND
THEN CALL ERROR C'OP013', 1* NO RETURN *1
IF PARM PRESENT (3) , ~
THEN CALL ERROR ('MS0~'" 1* NO RETURN *1
TYPE INDEX • NUM~RIC PARAMETER,
PARM POINTER • PARM POINTER • 2'
IF TYPE INOEX ~, NUMBER TABLE ENTRIES
THEN CALL ERROR C'DP2e f "
NO RfTURN

'*

*'

o

'*'*

SET TRACE REGION

1/10157

00ee
00159
10060

"0lSt

0062
i/063
006.1

flHHi!5
iHHS6
0067
0068

(ne9
""'701

0071
0012
0013

0A7A
001!5
"07~

0017
1tI£II7"

0079
0080

"0dt

0082
011183
0084
0085
IIH~e6

0087
0088

",,-uu>

IlHHH'
1/!0SH
00gP,
00g;,\

009.1

"0gl5
00915
11H1I97

00""
0£11gQ
01~'"

1t1101

0102
0103
0104

01145
0108
0107
IH~')

0111Jg

1/111'"
011 t

c'

PAGE 0003

,*,*

'*
'*

*

'*
'*
'*
'*
*
'*
'*
•
'*
'*

•
•*
'*
•'*
'*
'*

TRC REGION TeL (REGION INOEX).TR LOW BOUND
• LOW BOUND'
TRC REGION TAL (REGtON XNO!X).TR HIGH eOUND
, HIGH BOUND,
TRC REGION TRL (REGION INO!X'.TR TVP! INDEX
• TYPE tNOEW,

T' DEFINED, l '
IF PARM PRESENT (.) • 1 THEN 00,
IF PARM STRING (0) • INSTRUCTION STEP K!V
THEN TF IN8T STEP. l'
PARM POINTER •
((PARM POINTER. STRING LFNGTH + 2)/2)*2.
END,

00 I FROM ~ TO 2 BY 1,
IF PAHM PRESENT (t.~) • 1 THEN 00'
TR VARIARLE eI) • NUMERIC PARAMETER,
PAMM POINTER. PARM POINTER. i'
TF VARJABLE (1) • l'
ENI)J

RETURN'

ENO'
lOT 'SETRI'!'GN'
SETMEGN
* TITLEt
''** REVISION. PROCESS THE SfT REG tON COMMANn
'*
ORIGINAL
• COMPUTER' 8911J
'* ABSTRACT.
THIS SUARDUTIN! INTERPRETS THE PARAMETERS OF
'*
THE 8R (seT REGtON) COMMAND Tn MAKE AN !NTA¥
'*
IN THF TRACE R!GInN TABLES.
'•* CAlLING S!QlIENCF'
STANDARD CALL FROM COMMAND STRING PRoceSSOR.
CR1P~ • COMMAND PARAMETER LIST POINTER
BL
'IR
'*
i-PROCEDURE SR (CPL POINTER),
'*
2-DECLARE NUMB!R TABLE ENTRIES
'*
REF NUMTTF
NUM81R OF TRAC! TVPE ENTRIES
2-~ECLARE INSTRUCT!ON STEP K!V
'*
LeVTE
EQU ~101;l1

•
•

ISRK!Y EQlJ
REF

'*
'*
•'*
..'*

.'*
•••
•'*

'S'*L6VTE
ERROR

2-nECLAR! t1 TRACE REGION TABL

3A_

e.
e.

e.
e.
4.

••

4.

••
4.
••

3 TRC REGtON Tel

5
7
7
1
1
5

e

5
15

e
5

TR
TF
TF
TF
TF
TR
TR
fR
fR
TR
TR

(~

FLAGS,
OEFINEO BIT {1
VARIABLE (3) 8
INST ITE' AIT
FILL!R BtT (3)
FILLER BXT (8)
LOW BOUND POIN
HIGH BOUND POI
TYP! IND!. Ftx
VARIABLE (3) P
RESERVED ItT (

••

••

SfT TRAce; REGION

0112
0113
0114

~EF

REF

REF

01115
0116
III 111

•

0119
0120
0121
0122

'*
'*
'*

'"
'"
'"
''"*
'"
•'"

0123

IU2'
012!5
012e
0127
0128

0129
0130

0131
fU32
IU33

013e
0131

0001.(1

FH

0002

R2
RA
Re
R6
R1
R8
R9

EQIJ

4$

FQU

~

fQU

g

01110"
0008

Rte

EQU

10

RU

F.GlU

000C

Rl2
Rl3

EQU

U
12
13

FHA
RU'

FQLJ

14

EQU

it'S

(1114'"

000tJ

iH41

0007

0142

0°0.

IU43
tU44

00(1lP

014,.
0149

015t1l1

0010n
0"'0P!
0C11f1lF

R3

,

INO!~,

TVPE

EQU

f5

F.QU

1

FQU

EQIJ

2-0ECLARF. (LOW BOUNO, HIGM BOU
2-0ECLARE (1 COMMAND PARAM!T!R
33 CPL CONTROL (CPL
A_
e NUM8!R PARMS FIXE
4e PARM PR!S!NT (8'
4.
5 FIRST PAR~ FIXFO
2-0ECLAR! NUM!RI~ PARAMETER F1
2CONTROL (PARM POINTER),
2-oECLARe (1 CMARACTER PARAM!T
~.
! CHA~ PARM CONTROL
4.
! STR!NG LENGTH FIX
4.
e PARM STRING (1) C
2-0ECLAR! (CPL P~INTER, PARM P

O!FtNITION8

1
2
!

011103
00004
0005

(11146
0147

EQII

EQU
!QU

0139
0tag

eH4~

'*
'.WORKSPACE'
*
REGISTER
'R0
*
EQU o

011101

"~"','"
.'.e

4-FIXEO (1(11',

.'*

16U8

~H3A
IH~U

'"'E"

TRTBL
TRFLGS,TRLow,TRHIGH,TRTVPE,TRVl
TRt.,NTH
lSRFl.G,NU MTR
2-0!CLARE (R!GtON

1--', '

I~~j

a

'"

c

.... SET TRAC! REGION ••
" 1152
0U53

(

fU~4

wH55
0156
eHI7
14UJ8
0U5D
0U5P1
"Hit

fd001l!'
000~

0002

C08e
Ct3A

2100'
011'06

0A94

0~0A

Ct1A

17'1

0t82

01tS3
0Ui.

rU65

oHitS

000A

0285
0C11001

01tS7

000("
01,l10f.

ilt6A

01?1U

0169
flit 70

017t
frH12
0173
0\14

0115
0176

(~

flH 11
0178
0179
0t8~

011'12
0C11141

000tl!
Ct4(11

0A14
1738

0Q11A

ClB/.

0~1C
0~lf

0A1~

002C'\

C1FA

173e1

0t81

0182
0t83
018411
0185

0188

ilPf2P

0187
0186
0189

0G\2A

eli'"
fill i t

011126

0Al~

0P'2@

11~'"

6187

•.

...

...

.
..
..

..
.'"

DE'

$

MOV

R11, R'

MOV

09'24

C231.

0195

0196

•

...
..

.R1{11+,RA

'LA

R4,9

JII4C

SREAt

MOV

.RH'I+, Rl!'

eI

R!5,NUMTR

JHE
MP'f

SRER2
'TRLNTH,Re

MOV

RI5,Re

SLA
JNC

RA,!

MOV

·'H0+,R15

eLA
JNC

R4,1

MOV

.Rl"'+,R1

SRERl

SRERl

C

R1,Re

,'l

SRER3

ISLA
JNC

IU, t

?n

..

·

P4RM PRE8!NT (I)
3.THEN CALL ERROR ('M8If!'),
'" I·
IF FIRST PARAMETER MISSING
2·REGION INOF.:)( " NUMERIC PARAM
,.PARM POINTF.:R • PARM POINT!R

2.tF REGlON tNnEX •• NUM TRAC!
3.THEN CALL F.RROR (tOPU,,',

'*

~.IF PARM PRESENT C1) • III
3.TMEN CALL F.:RROR ('MSIIl5'" It

?LOW BOUNO • NUMERIC PARA MET!
2.PARM POINTER • PARM POINTER

·

2.tF PARM PRESENT (2)
~.TH!N CALI.. ERROR ('"S0!5'),
'" 1*
~.HIGH BOUND , NU,..!RIC PARAH!T
?PARM POINTER , PARM POINT!R

HIGH BOUND c LOW BOUND
CALL ~RROR C'OPClJ13), It

·

~.IF PARM PRESENT (3'
'" 1*
3.THFN CALL eRROR C1 MS0l5'),

SRER1
2.TVPE INC!" ~ NUMERIC PARAH!T
POINT!!R III PARM POINTER

2.PAR~

MOV

eI

*RU+,R8
R8,NUfoATTE

BA2C

0288

eQl2E
0~3~

"00'?!

IClt9H

JIofE

SRER4

0C1!32

143e1

'15~o

022~

AI

ReI,TRTBL.

0~34

00e!?!

....

SAVE RETURN, ePL POINTER
ADDR eFIRST P

2"PARM POINTER

~.IF
~.TH!N

IUY1

021.10
02141

PAGe: 0Q"U5

SR

EQll

*

0UI3

C'

•

1A;5e

0192

019'

.
.

14'1'\
396!1!

01?1U

001~

SA

94538S .. 09t711 ••

2.IF tvP!! INDEX ~, NUMBER TABL
3.THEN CALl ERROR (I DP2e 'l ,

'*

2.TRC REGION TSL (R!IUON INDEX
LOW 80UND,

31u

.*

....

SI!T TRACe: REGION

0202

00;S&
0038

Cg41!
00(1)0

1203

"2".
0205
lues

1101
0208

0"';S.
003C

CQ41
0000!

0&1100

0042
0.044

02015
80.£10

00 lUI

020g

0aUJ
112U
, ill 1I

0213
0214

01ue

0Al&1
110D

Rl2US

00.'

'BFA

02115
0211
1218
i219
0a20.
0221
fila21

e04C

004E

00150
IiHH52

5300

11502

00158

FlAil)
0000

00SC
0eer

rna~

091fHII

laag

0062

18~'"

1!!12 35

1231
12;S8

123A
1240
lIl~l

1842
.243
124'

,rue

1248
12 .. ,

•

•

..

1(IllSA
0066
006~

(lPl6.

0/116t
006F

01370
21""2
007'

00,e
8018

001.

R1, 'TRio! tGM (IUS)

RI5,"80(10

8LA
JNC

R4,t
SR02e

Move

*"lf11+,R1

$RL

Ft1,8

SAVE CHARACTER COUNT

CLR

eI

Move

R8
.RUI,R8
MS,yeRKEY

ISOLATE FIRST C,",AlIUCT!R

JNE

SR010

SOCB 'ISRFLG,Re

•tNC

Mte

SLA

RUII, t

EQU

$

sru

01HA

02'"

•*

0~~A

0003

LX

"',"'' '0111

LX

R8,3

00'0' SR031
'SCt

01508

OEr.

H8

lt01

JL.T

8RfU0

SHL
SL.A
JNt

R7.t
IUd
8R030

MOV

*R10+,.TRVl fRl)

0911
IA1t
11FA

107C

C8'A

007!

flUI00

*..

PAR~

•

PRPSENT C4'

3-IF PARM STRING

..

(121)

IF FLAG ,NE. 'S'
4-THEN TF INST STEP

..

1 THEN
IN8TRUC

11

3_PARM POINT!R •
S.C(PARM POINTER + STRING LENG

,

(~

~10,t

0"'1

•

2-1F

R" ''H0

MOV
R5,Rt
OECT Hi
EQU S
INCT Nt

cm~e'1

2.T' DEFINED'" 11

3.!ND,

800Q!

e

2-TRC REGION TBL (REGION IND!"
3•• TVP! IND!'X,

LX

A281

0-1A

I.TRC ~!GION TBL CIUGION INDE)(
3•• HIGH BOUND'

RB,'TRTVPfCRS)

S

eee"

0(1)~e

MOV

EQU

•
•

PAGI!

'TRLOW (fU5)

005C' IIhH0

12~a

"2~8

..

0t1!fU' 'RIUI

(laal

MOV

Rt;,

1••

..

ruel

00156

0e5,A

0234

..

0ge1
04C8
0211.

001.54

0223
02a4
rnlS
(l22e
122'

0833

MOV

*
'Hue co ••
0(l14Q1!

g4S38!5.QSH~

2-00 I FROM

~

TO 2 BV l'

IF ENO,OF.LOOl'

3-1F PARM PREIINT U+S)

,

t TM

IF PARAMET!R NOT 'R!8!NT
4.TR VARIABLE (1) • NUMIIUC: filA
._PARM POINT!R , ,ARM POINTER

0

_. SET TRACE HEGION **
02048

(

0249
025'"
02fH

0080

F181

0"'82

10Fe
008.4'

0~8'

CQ4ti

008~

00001

0~e2

0253
025.4

111255
02e~

0257
1025"
0259
026'"
02f51

16264
0265
02fjR

0088

0"'2

0"'8A
0081:
0r;,eE

~~filIl.

0t?tSJQ!
0(l1SJ2
0Q!SJ4
0!?l9t;

0 01 9.
00SJC
009f

0210

(

~27'

0212
k1273
0274

•

11}1~~

SRER2

0201
11 lei
1 '~0!5

~001

4.TF VAR YABl!

soce

~7,R6

JMP

SR030

fQU
MOV

Rf5, .TRFLGS UH5)

EQU

S

en •

11

.h.END,
.$

IEl FLAGS WORD
2_RETURN,

e

.R2

I!QlJ

S

LI

R 10, JJVl2Q1!5

JMP

SRERR
$

e:QIJ
l, I

Rt0,>'lU

JMP
EQU

SRERR

0201.
1113
1002
0"'!H: , SREIU

II

R10,:1111113

JMP

SRERR

E'QU

$

0210 t.

IIMS05" REQO PARM

MISSI~G

LI

RtQJ,.112e

SRER3

s

""PUl" INV. TRACt! REG!ON TNO!

"OP'3" 1'41GI-I c LOW
.

"DP26"

112~

00.C'l'

0Q\A'"

QI~Atl

001A~

000/]\

0G'1A4S

1"'F1

01t10k1 ERS

•.

PAGE

020~

Ql09~'

0:2tsA

0269

SR040

"VIet.' SR!Rl

~Plgr7!'

00g~

0261

•

0088' SRlfi40

0262
026~

•

gAe38!5.99~1·.

SRERR

..

f!QIJ

$

81,.

'ER~OR

J~P

SR1P10

END

2-ENn,

!NV. Tluee TVPE INOEX

I

I'

t150

s

•

IRHOR
ISR"I..G
IISAKIV
1..8YT!

980

CONCOADA!\'C!
0!e3

0223

0268

1ll21(~

0(!1911J
e115

0271
0222

NUMTTE

0115

0166

0P194

0197

0236
0163
0229

R0

01341

R1
Rt0

013~

0235

01414

01515
022e
!54

liH4e
0146

IH;'

014'

c"

1'1-

0148

A15

0149

IU!

013f'

R:5

0131

fU
Rei

Re
R1

fcl14fl1

~1e9

01411
iH 412
0143

0183

SA'H~

0153
0223

51020

023V'

5M030

0231
0252
0255

0152
0220
021:5
0244
024ft11
0212
0UH11
1.'161

RS

AO
SA

SRI'0

5R100

'H?~1

021218

023e

0249
0233
02341

02153
0242

02419

026f!1

0218
0289

01"0

~212

02413

0U56

0159
" HI I;

0"2
0H5A

0119

raU53

0176
0186
0197

018~

0205
0206

021112
0215

0253
CUt4

02ee

C

~HeQ

0211

otS)Q

0210
0216
0218

0'111'

0222

0226
0219

0239

;C
02~!

01';'

0180

0264
0253

026'

oHilt

018'

02e~

0198
0261
0113
0U3
01. l '
0113
0112
fiB 13
tH 13

027'"

TRMIGH
T'fLIIITH
TRI..OW
TITel.
TMTVP!
1M"1
THER! ARE

0201"1

02115

0263

0139

0~59

0221

0U~4

02fSV'l

013fl

0262

022e

018~

0247

0256

SRER2
5R!R3
sIER4
'MeRR

PAGE 0008
0262 021515

017~

0154

SJU:.R 1

T"FL.GS

023fl

945385-9901''o\0252 025!!J 0259

0P97

~UMTH

RU

0231

"219

009'
0P"t;

IU2

02~VI

00.1

0?P.I~

0tee
0202
0toP
020~

024'

5vMf.'QLS

o

•

A[
APPLICATION
NEXT ASSY

(-

(

USED ON

REVISIONS

DESC.....,-,c)N

LTJIt

APPROVED

DATE

7506

•

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLE:SS OTHE:_'SE: SIOE:CI~II:D
DIME:NSIONS ARE: IN INCHES
TOLE:RANCE:S
ANOLE:S !: I •
~ IOLACE DE:CIMAL:tOIO
2 "LACIE DE:CIMAL + ,02

c

~N

/

C"~
ENGR

~OR "E~IERE:NCE:

IDE:NT'''''NO NUM • • _
SHOWN IN ""RE:NTHESIES
ONLY

QA

INTE:"""IET DWQ IN
ACCORDANCE: WITH
MIL-STD-lOO

"pvo

.,,//'

""

CONTR Nell

./

~--"

T'-••• ~'C

"

TEXAS INSTRUMENTS
INCORPORATED

Equipmtlnf

O.,Ia,

G,.,.

r._

!

""

AL, SETRACE, SET TRACE-PX990

' ,/
"

,/~

."'"

O E r ACTIVITY RELEASE

/J'

~~

DATE

~

SIZE

CCXlE IOENT NO

A

96214
I REV.

SCALE

"" •

-

QRAWINQNO

945386-9901
$MEET

1 of 9

PAG!

.*SIT TRACI FORMAT ••
lee3

10(14
101'

'''"8

eel1

•
•

*
*

t

1.lg

e"08
leu,

•
•
•

8"U

•

•

el12
el13

•

10141

•

1118

*
*

.e18
I'll

1118
1010
le20
1121

ee2a

1113
1"14

• eae

leae
eea1

1128

•
•

•
•
•
•
•

*

•

.*

*

*

.Ieao
1""0

•
•

.,,,.
lene

*

'"~U
10\12
IIn3

t
t
t

81"8

•
•

I,ne

t
t

11\10

•

1131
8040
1041
1042
1043
le441

IS415

le4a
.".47
.".48

1040

•• S0

1.51

Ilua

•• 53

."54
I.D8
leae

*

•
•
•
•
•
•

*
t

•
t

*
*
t

•
•
•

IIII

PROCEDURE STRAC! CCPL PotNTER),
DECLARE TRAC! TABL! NU~BER PIXIo (18',
DECLARE NUMBER TABLI ENTRIES LITERALLY f4"
DECLARE NUM LETTERS INPUT FIXED Ct8),
DECLARE ItT ~A8K LITERALLY '"8010""
DECLARE MASK err (1e),
OECLAR! FOUND BIT (1"
DECLARE (1 COMMAND PARAMETER LtST,
:5 ePL CONTROL (CPL POINTER),
S NUMBER PARMS FIXED e8',
S PAAM PRISINT (8) BIT (1),
5 FIAST PARM FIXED (8),
DECLARE NUMERIC PARAMETER FIXED (le)
CONTROL (PARM POINTER),
DECLARE (CPL POINTER, PARM POINTER) POINT!R,
DECLARE NU~ PARAMETIR FIXED (8)
CONTROL (PARM POINTER)'
DECLARE (I, 8IAS' FIXEO (18)'
DECLARE CHAR PARAMETER CHARACTER (1)
CONTROL (PARM POINTER),
OECLARt CHAR UNDER TfST CHARACTER (1)'
DECLARE KEV LETTER (13) CHARACTER el)
INITIAL ('P', It', '~', 'WI, 'T', 'C', 'X' •

o

'Sf, '0', 'E'. 'B', 'A', 'Ft."

DECLARE LETTER TVPE (1!) FlXED (4)
INITIAL (I. 0, A, 0, 0, I, I, I, I,
2, 2,
I. NORMAL" 0,

a,

c

2)'

!IA8. I, &I.SID • 2 *1
DECLARE LETTER etT lIAS (13) 'I.ED (4)
INITIAL (0, 1, 2, 3, 4, a, 6, 7, 11,

'* PoR TVPE
TVPE I,
I,

0, 1, 2, 3"

BIT NUMIER
BIAS
TVPE 2, DISPLACEMENT 'ROM BIAI .,
DECLARE NUM KEVS LITERALLV '13"
DECLAR! TRAC! TVP! TABLE (4) BIT cte"
IF PAR" PRESENT (1) • 0
THEN CALL ERROR t'MSeS')' ,. NO RETURN .,
PARM POINTER, ADoR (FtRST 'ARM),
TRACE TABLE NUMeER • NUMERIC PARAMETER,
PARM POINTER " 'ARM POXNTER • 2,
IF TRACE TABLE NUMBER ., NUMBIR TABLE ENTRIIS
THEN CALL ERROR ('DPle'), ,. NO RETURN */
IF PARM PRESINT (2) , e
THEN CALL ERROR ('M818')' ,. NO RETURN
NUM LETTERS INPUT " NUM PARAMETIR,
PARM POINT!R • PARM POINTER + l'
BIAS " O,
MASI< .ru
00 WHILE NUM LETTERS INPUT •• ,
NUM LETTERS INPUT, NUM LETT!RS INPUT '. l'
CHAR UNOER TEIT " CHARPARAMETIRr
PARM POINTER. PARM POINTER. l'
I " NUM K!Va,

*'

o

PAGE: 0003

•• SET TRAC! FORMAT ••
W0"7

00e8
00e9
~0C50

00151
0062
01/JC5~

0f1JfJ ..

00155
00C5t.i
0007
00fJS

0069
0070
0071
0072
0073
007.
007t5
0076
0077
0078
0079
02180
~081

0082
0083
008A

0085
160815
0087
0088

0089
00gOl
00"1
00"2
00"3
00".

00"t5
0088
fUH~7

00ge
09g9
0100
0101
liHIU!

0103
010A

rn 1115
ttrae

0107
(Ule
011119
IDiUJ
0Ul

c'

••
•
••
••
*

•..
•
•
•*

.

•
•
•
*
•*
•

*

•

!'OUNO I 0,
00 WHILE ! • P

& FOUND. 0,

IIIY-U

I' CHAR UNOER TEST !II KEY LETTER (I) THEN DO,
FOUND !II 11
00 CASE LETTER TYPE (I),
MASK , OR C~A8K RSHI'T CItT MASK,
LITTER 81T 81AS (t)), 1* NORMAL!
RtAS • LETTER SIT BIAS (X), 1* SET BIAS
00'
,. BIASED ENTRY.'
IF AlAS" 0 THEN CALL ERROR ('DPI~'"
1* NO RETURN *1
MASK. nR (MASK, ASHl,T CBtT MASK,
LETTER alT 8IAS (I). BIAS'"
ENO,
END'
END'
END,
t, FOUND. 0 THEN CALL ERROR ('DP23'"
NO RETURN *1
END'
TRACE TYPE TA8LE (TRACE TABL! NUMBER) • MASK'
RETURN,
END STRACE,
rOT 'SETRACE'
TITLEI
SETRACE
PROCESS THE 8ET TRACE COMMAND

'*

•
•
• REVISION'
•
ORIGINAL
• COMPUTER' 990
• ABSTRACT.
THIS SUBROUTINE PROCESSES TH! SET TRACE COMMAND
THE CHARACTER STRI~G SECOND PARAMETER IS
*
PARSED LEFT TO RIGHT, GENERATING A MASK
TRACE ENTITIES WHICH IS PLACED IN THE TRAC!
TVPE TA8LE ACCORDING TO THE NUMERIC rIRST
•
PARAMETER. 80TH PARAMETERS ARE REQUIRED.

•

0'

••

•
•

••

••
•••
••
••
••
•••
•

THE SYNTA~ OF THE STRING IS SIMPLY A STRING
OF CHARACTIRI IN THE SITI
CP, I, M, ~, T, C, X. S, 0, E. a, A, ~,.
IN ADDITION, THE SUBSET (E, a, A, R) IS VALID
ONLY TO THE RIGHT OF AN ELEMENT 0' cs, Dl.
KEYl!TT£R
fit

r

M

w
T
C
)(

N

"'EANING

PROGRAM COUNTER
INSTRUCTION AND 'ORMAT
STATUS MASK
~ORkSPACE POINTER CHANG!S
IRANCH TARGETs
tRU ADDRESS
)toP LEVEL
TRACE NOTHING

I'

, I

•• SET TRACE FORMAT ••

••
••...

1112
1113
"U4
"U!5
0Ue

s

o
E

e
A

•...

14117
0118
0118

M

SOURCI! PRE'!)C
DESTINATION PRI'IX
• EFFECTIVE AOOR!SS (EAl
- (EA) 8E'ORE eXECUTION
- (EA) AFTER EXECUT!ON
- WKSP REGISTER CHANGES
WHEN TSITD .Nf. 0

o·

... CALLING SEQUENC!i
STANOARD CALL FROM COMMAND STRING PROCESSOR.
( I NSTF'O I HTER, F'T':iBLE (F'SOUF~C)
SRCREG. PCCURSOR);
END;
DO;
It GROUP D t /
CALL PGADDR (EXECUTEDINSTRUCTION (0),
>< I NSTPO I HTER, PTABLE (PSOURC)
SRCREG. PCCURSOR);
CALL PGADDR (MW (II F'II IE'SI-! r FT (
E>: I t'rSTF'O [t'1TER, PTABLE

CPDEST) .
PCCURSOR);
SRCREG THEN CALL PUSH (DSTREG);
DSTREG,

IF DSTREG =
END;
END,:
DO CASE I;
/* DO INSTRUCTION DEPENDANT
CAL,I_ I t'ISTE><: E: eu TE DI 1'·1 S: l' pl.IeT I I)N, " FF n) ~<;~: j
PRINTFLAG = OR (PRINTFLAG, CRUFLAG);
CALL. I NSTE>D;:::,
PTR ::: F'TR + 2.,
HEWPC = MEMWORD2;
NEWUSRREG (13) = USRWP;
t·jEI. dUSRREG (14) := F)CCUF.:SOR;
NEWUSRREG (15) = USRSTi
PTABlE (PST) = NEWPC;
PRINTFLAG = OR (PRINTFLAG. BRANCHFLAG);
END;
DO; END;
/ t LREX ILLEGAL t /
CALL INSTEXEC; / t CKON CKOF */
DO;
/* Rrwp ~/
NEWWP = USRREG (13);
NEWPC = USRREG (14);
NEWST = USRREG (15);
PTABLE (F'PT) = t,IEI,JF'C i
PRINTFLAG = OR (PRINTFLAG. BRANCHFLAG);
EHD;
CALL INSTEXEC; /% RSET */
DO; END;
/* IDLE */
DO; END;
It MAP FILE ILLEGAL */
DO;
/* LWPI LIMI */
EXECUTED INSTRUCTION (1) = MEt.1WORD;
PC CURSOR = PCCURSOR + 2;
Cf~LL. I t~STDr.:

029C-i
1,1296
02':)7
(:1298
02::-)9

:1:
)t

0300

0304

J:

::1::

J

0315
C1316

03 J• -,,II"
0'-'
• ..J 18
03 19

REG :: I)JREG~~DDR;
SUBPTABLE (PSP) = MEMWORD;
TETD == RSHIFT (At'W (INST, >:::(:~), 4);
DI:, C{:lSE TSTD.;
DO;
/t DIRECT t /
EFFECTIVEADDR ::: WREGADDP;
blASI< :: 0;

nw;

DO;

t',lf::,SI<

*:*
:t:

*:

t
i:
:t
1:
::t.:

0320

::¥
t

0321
(1J22

*::t:

c-::

DO;

/t
IF (,iHD

t/

F'Sr.:iilSI<;

EFFECT I 'v'EADDI:1

INDEXED */
= rr1Ef.11.!IOPD;

(PEGHUIYIPEP,

"F:!I)

::: 0

THEN EFFECTIVEADDR ::: 0;
EFFECTIVEADDR == EFFECTIVEADDR
+ 1,.I0G:DOFS l.llll NST ;
WOPDOFINST = WORDOFSIMINST;
XINSTPOINTER = XINSTPOINTEP + 2;
PCCURSOR = PCCURSOR + 2;

:t:

0309
03 1 0
(13 1 I.

c

F:EGt,IUHE;ER ::: f~ND (I HST, "JF");
Id F;: E GHDDF' ::: f~l tH) (I HS T. "F") :t: 2 + US: FnJ P

*t

(JJOG:

~":I

I

nm;

:t

03 1 ",c..
OJ 1 c'
(1 :3 1 4-

PROCEDURE PGADDR (INST, XINSTPOINTER.
SUBPTAEl.E, PEG, f='(C:UR:<:OR
REGNUMBER );
DECLARE (XINSTPOINTER. PCCURSORJ POINTER;
DECLARE WORDOFINST BIT (16)
CONTROL (XINSTPOINTEP);
DECLARE WORDOFSIMINST BIT (1S)
COI'ITP()L (PCCUr;,'SOR);
DECLARE SUEPTAELE (4) BIT (15);
DECLARE REG POINTER;
DECLARE REGNUMBER BIT (lS);
DECLARE WREGADDR POINTER;
DECLARE T5rD BIT (16);
DECLARE MEMWORD BIT (16) CONTROL (WREGADDR)
DECLARE MASK BIT (lS);
DECL(iRE f-')SF,'~ISI< L I TEF'HLL.Y "lCIOO";
DECLHF,:E PEUHrif< L 1T[Rf~U. Y "EOOI)";

*:t:

133t~3

0306
030?

PAGE 0010

/ t INDIRECT
EFFECTIVEADDR ::: MEMWORD;

0:302

c.nOs.

t-

l

1
1
:t

0::::01

945387-9901,*

1"'lJ~SK

om;
DO;

::, PSRt>1SV;

/*

EFFECTIVEADDR
t'l~lSV :::: PSfi;:t .1Sf<;

INDIRECT AUTO-INC

= MEMWORD;

[t'lD;

END;
/~ END CASE T51D
SUBPTABLE (PSE) = EFFECTIVEADDP;
SUBPTABLE (PSB) = MEMWORD;
MASK = RSHIFT (OR (MASf<. PEBAMK),
DISP (SUBPTABLE));
PR I ~.JTFI._AG = OP (PR I tHFLr~G, M(.;ISV);
RETURH;
ErW PGHDDP;

*/

*/

()

TRACE

c\

PRINT SUBROUTINE

945387-9901

**

PAGE 0011

TRACE

PRINT SUBROUTINE

0325
0326
13327
13328
0329
13330
0331
13332
13333
0:::]4

*

0'~J--:'
t:'
.....,J._I--.I

;t;

0"""
..
..:, ..:tb
033?
0338
()339
0340
0341
0342
0343
13344
0345
0346
13347
Ql343
0349

**
t*
:t::

*

:t

:t:
)I:

:+:

:t:
:+:

*
'J.'

",.

::t

*t
*
*
*
:**
~:

13350

:t

0351
0]52
0353

:t:
:t:

Ql354
0355
035r3
13357
(l)358
035S'
0360
13361
0362
0363
0364
0365
0366

:r.

**

;f

:t
:+:

*
*:t:
:t:
)I:

:r

945387-9901 ~-t

PAGE 0012

PROCEDURE TRCPRINT (PRINTFLAG.
TRCENTRYADDR. PTABLE);
DECLARE TRCENTRYADDR POINTER;
DECLARE PTABLE (16) BIT (IG);
DECLARE (1 PRINTFLAG,
3 PRTBIT (16) BIT (1));
DECLARE SOURCEVALUE BIT (16)'
CONTROL (SRCREG);
DECLARE DESTvALUE BIT (16)
CONTROL (DSTREG);
DECLARE (I L I tIELD~GTH,l F I > 0;
STACKINDEX = STACKINDEX - 1,
LTR ::: ADDRSTACK (STACKINDEX);
IF MEMWORD .NE. BEFORECONTENTS
(STACKINDEX) THEN DO;
LINELENGTH ::: LINELENGTH - ~ARlNi
IF LINELENGTH < 0 THEN CALL NEWLIN;
CALL PRNTHN (PTR);
CALL PRNTC (EQSIGN);
CALL PRNTHX (MEMWORD);
END;
RETURN;

IlCil 1,8

'I;

[I'm PRTTRACE;

(~367

:t:

:r
)I::

o

o

TRACE

('

UPDATE REGISTERS

TRACE
038 1
12'38 2

,

)!:
"

*

03 ':".' .....,
I:} .~

::t:

J .:,;, ,:1,

)k

v.~

,~=,

0 :.3 ~~; ~~;

l

OJ c· b
."
0 ::-

:*
:*

I~'

'·-1

")

':~)
() ") ,"',
c' '.,,~
(2) 3~·.'J
'~'i

.....

0 ..:' I::] ()
(~ 39 1.
,",
o:"~ 9 c.,
[

,-'

;f,

t

:t
t

t

0:39 ~:\
0] ~:J ,~"

'.",.

C'
::l

:f

0 3S~
0::396
la3~3 ?
03';18
")
121 ... ,1 '~I~:i

04 0 0
01
04 0 2
0 4- 0
(1'~

"

.~

945387-9901 "*~

UPDATE REGISTERS

*

';f:

:t
A<

t
J
1
f

:*

PF'OCEDURE UPDATE REG (PR I

BASE,

PAGE 00:14
~rrFLFiG,

PTf'IE:LE,

I,~EG);

DECLARE REG POINTER;
Dl: n. 1'1 RF 1,1 E ~I\ t,J UF' DEl Til C;) C(I ~n F' (i I.

i.

F,' E G ) ;

DECLARE BASE FIXED (if);
DECLARE (1 PRiNTFLAG,
3 PRTBIT (16) BIT (:1));
DECLARE PTABLE (16) BIT (16);
DECLARE PTR POINTEP;
DECLARE MWORD 8[T (16) CONTROL (PTP);
IF PRTBlr (BASE+PSE) = 1 THEN DO:
PTR = PTABLE lBASE+PS[):
PTABLE (BASE+PSA) - MWORD;
EHD ,:

IF PRTBIT (BASE+PSR) = 1 THEN DO;
PRTBIT (BAS[+PSP) = 0;
IF MEMWORD ,NE. PTABLE (BASE+PSP) THEN DO;
PRTBIT (BASE+PSR) - 1;
PTABLE (BASE+PSR) = MEMWORD;
Et'l[i ,:

nw,:

~:ETUF:t4 ;
END UPD~ITEF~EG;

c

c::

TRACE

PUSH STACK

0406
0407
0408
0409
0410

:t:

(~411

;f

12
0413
0414

i:
t
:t:

0(~

*'
:1<

i:
:t

945387-9901 .~

PAGE

001~;

PROCEDURE PUSHSTACK (ADDR);
DECLARE ADDR POINTER;
DECLARE STACKMAX LITERALLY '4';
DECLARE MEMWORD BIT (16) CONTROL (ADDR);
IF STACK INDEX >= STACKMAX THEN RETURN;
ADDRSTACK (STACKINDEX) = ADDP;
BEFORECNHEHTS (SH~CI< I HDE><) :::: t,1EMkIORD;
STACKINDEX = STACKINDEX + 1;
F;:ETUR~1 ;

945387-9901 ~*

TRACE. -.-- AUTO INCREMENT TEST
0417
0418
0419

**
:t

0420

t

0421

:t

PROCEDURE
IF

~1UTO

PAGE 0016

i HerEST ;

"30" ) ::::
THEN SRCREGCONTENTS ::::
SRCPECCO!..ITUHS +
AND

(SRCR~,:trj

I

OlD;

c

945387-9901

TRACE DATA TABLES
13424
0425
04213
042:7
1342:8
0429
0430
0431
0432
0433
043413435
04313
0437
0438

**

lOD
>OA

OVERLAY PARAMETERS

*
1210040(106
121008

0457

L.BYTE
CF:
LF
;t:
::f

0449

("

PAGE 0017

:t:

04:39

0450
0451
04 1;2
04!::;::::
04 134
0455
0.-:1-5[3

J.~

1

REF SR
REF STRACE
TE:';T 'SR'
DATA, SR
TD3B
BSS
1*2
BSS 1:1(2
BSS 1%2
DATA IN1-ILMSG*LBYTE+CR
BYTE LF
TE>0020
)0002
>0100
>0010
)8000

3--COt,ITPOI_

:*

PRTFLG DATA

*NOP

(HEklt,JP);

2-DECLARE EXECUTED INSTRUCT ION (3) B
2-DECLARE MEMWORD BIT (1S) CONTROL
2 - DEC L. ~I R[ F:' F' r Ir;T L PI C B IT r 1 G ) HIlT Ui

>E000

F:'C,
2-

DATA

[HS·'(',

~Itlj)

STArl)~:

DEC LAF' EeL [: ~'1 F' F L f~ G BIT (1 ';:; ) 1H r 'i' r r~

>1FFF
2-DECLARE NOPINSTRUCTION BIT (1S)
3- HH TI

~:IL

("

H)00" ) ;

NOP

t
:t

2-DECLAF::E i.
2-DECIJiF~E

(FOUr-ID,

t:
:*:
:t
::t:
:t:

2:-DEC[_.I~F~E

XINSTPOINTER POINTER;

2-DE:CLARE

>< I t'~S:TPO r HTER) i

3-COrHROL

2-DE:CLf'IF:E

BSS
DSTREG BSS

(SPCr:EC

COHD I T i

O~Hl1ET)

FIX

DSTPEG) PO [t..ITER

I

;:::-DEC:LAF~t::

'~·F:O(·F'IE,:(:-cCtI'··ITEI···ll'~
B 11"
~. '..••.•.." ... ~
...
~

t:f-COHTF(OL.

(SPCF~E.G)

(",
• .L 6

j

;

2-DE:CLARE USRREG (is) BIT (16) CONT
2-DECU'IRE CFWFLJIG EIT

CRUFLG

OG3C

0200

XOPFLG DATA >0200

DATA >04013

t
l
::t:
t:

F'F'I HT

(lC)

rHITr~'1L.

F'Lf~G

2-DECLARE XOPFLAG BIT (16) IHITIAL
PRINT XOP LEVEL FLAG
2-DECLARE DISTAHCE BIT (16);
2-DECLARE BRANCHFLAG EIT (1C)
::-It~ITlriL

DATA >0800

CF~U

(1I08(~~()");

PRINT BRANCH TARGET FLAG

r<'"

'1\-'
,

1:t:2

13400

BRNFLG

(16);

Fr>~:ED

U:2

*;t:

0800

SOURCE EFF ADDR MASK
EFF ADDR MASK

t:

CPFLG

,)

DEST

2-DECLARE PCCUPSOR POINTER;
c:-DECL{-iRE til[M!MIRDi~: BIT (lf3) co~nRO
2-DECLARE PTR POINTER;
2-DECLARE NEWUSRREG (lS) BIT (lS)

e03A

003E

"

t:
l
t

*SRCREG

0036
0(138

el5i6
05t?

0518

EOLI
EOU
EOU

:t:

0S(;0

0508
05 ro9
051(?

SRCR
DSTR

:t:

1;)4~J5

0499

EOS I GH
PWPMSK DATA )1000

:t:
l

o4 ~3t:?
C)496

C·.·\

GETCHR

F:EF

048~:

0494

F'AGE 0018

TRACE DATA TABLES
0520
0521
0522
'0523

945387-9901~t

:t

0040
0000

0'=;24

0525
0526
0527
0528
0529

2-DECLARE F'F(v'Of;)F L I TERALL Y , 1'; /:t P

PRVOPF EQU

*NPROPF
*

)40

EQU

0

ILLOPF EQU

)80

0000

*LEGOPF

0

EQU

:i:
;t

(15J 1

;t

GAGRPA EG!U

0

0534
053r:;

~'0<
2'--DECU1PE G~;JGF:~F'E: I. I TEP(.,LLY
r:'OPt'if::JT I,l. I,l I r I
2-DECLARE

G~GRPA

2-DECUir.:~E

G,::,GiRPC ! .. I TEP~iLL.'y'

2

F 0 r.:~ rrj I~ T I 'J,

2-DECL.ARE GAGRPD
3

FOP I,llYI'

T

I I,

2-·DECL.(1F~E

t
:f

3 · - " 1);::~1("",

0551

0552

0554

0~)55

005E~

(J78121

0054
0056
0058
005A
0G5C
005E
0060
'a'2l62
(1064
13066
006:.3
OtZt6H
006e
006E

06C0
0680
04(0
04810
0440
0400
03E(1
03A0
038E)
036(2)
0340
0320
02EO
G2A0

/;j(

I

/;j(

L

/*

A

•

,

'3';

I;';(:·:f)P;'
'4~,

113E00",

"lDI)0".,
"0780",
"0480"

(,:G) B r T
"::::001:;". "
II

:l.O~H~",

II

II

0GCI~",

11

J

II

110::H~10!1,

II

la44!a",
(:"]80",

II

"0320",

II

(~2E0",

"

"000!)");

0040' GLBTBL EOU $
GROUP LOWER BOUND TABLE
4000
DATA )4000.)3800,)3000.)2C00
3800
:3('00
2CIZtG
2'2)(11;)
DATA )2000,)1000,)1000,)OC00
iD0E)
10CH)
0800

N

I >< ( f;1 P Y ,

GPOUF'L.OI,IEF~BOUHD

]--INITlr:Il . (",H;Oe,ll,
3-'
"2:001:~",
: : . _ " OE:OO",
3II 04CI)"..

~1547

0040
0042
0044
0046
13048
0'2l4A
004C
0(14E
0050

/*

r:-,:) F? f,'II::1 T I

4

0543
0549

0550

r...

~ITERALLY

3II 0:::E(~".
] - " 0::::40".

;-t:

\I I,

Jl "",;.,

2-DECLARE GAGRPE LITEPALLY

t

0004

i

I UJ)F'F L I TE"'f~Ll_ \' .'.1..' i
II..L.EG(Ii.. or CODE
2-DECUiPE LEGOF'F L. I TERI4LL.'r' "0';
LEG~1L OF;' CODE
~'J [I D F:' E S S

0000

0532

HF'F'OPF L I TEPM,L '( , (21'
NON-PRIVILEGED CODE

2-DECL~iI:;:~E

::t-

0080

0530

PRIVILEGED OP CODE
2-DECLHI;~[

0C~'0

DATA )0800.)0780,)@6(0,)0680

DATA )04C0,)0480,)0440.)0400

DATA )03EO.)03A0,)0380,)03G@

DATA )0340,)0320,)02E0.)02A0

II

945387-9901 ~*

TRACE DATA TABLES
0556

0070
0072

*

0559

)I:

*
*
*:t:

05(:;0
0561

0E.G7

0568

0569
p57(?i

Or;)74 '

0075
0076
(3077
(1073

0079

TDTBL

04
03
02
02

EQU
BYTE
BYTE
BYTE

B'YTE
BYTE

e)3

BYTE

(30?A

00

0571

00

05?~:
0E~73

007B

B'iTE
P'r"TE
B'r'TE

0574

007C
007D

0575

007E

0::;76
el577

OO?F

30
01
82
02
02

0030

(12

BYTE:

~)578

0~181

BYTE

0~:;?9

13082

02
02

0:130

0033
0084
0085

OE;81

0532
0583
0584
0585
0~;8E;

01386
0087
0088
0089

0587

008A

0583
0589

003E
00se
003D

0!:;~30

BYTE
B'(TE

BYTE
B'y'iE

02

B')lTE

C0

B'YTE
BYTE
B\'TE

40
1210

40
C0
C0

E~'y'TE

BYTE
BYTE

B'y'TE

1211
01

01

BYTE
BYTE

81

BYTE

05'31
059:::
(iS93
0~:,94

0E;95

008E

e):)9t~

059?

008E

0605
121606
0607

0608
0609

0000

0002
0004
0006

I'

2-DECU~RE

I NSTFOPp11~T

~J-IHITIFIL

, 9' ,

,It

*

33-

%.
%.
I Nsn1T

EQU

$

(i.~6)

4 ' , , 9'

JI

'~i

J15',

.'

I'G

r ;

rf;'~

'~"~

fA',

IEI'J

'8'1

.~;

I

:'bl~,

"3' ,

l6',
-, , ,
"
':');
."

I'E:'

INSTRUCT[OH FORMAT NUMBEPS

TEXT 11949322X5X666GGG77?77A888X'

**

0GA3

***
***

*%.
31

05~33

0599
0600
0GO 1
0602
0603
0604

1

2-DECLARE (1 TRACEDECODETABLE,
3 DECODEENTRY (2S),
45 LEGALITY
BrT (1),
45 PRIVILEGEDOP BIT (1),
45 DEFILLER BIT (2),
45 ADDRESSGROUP Bj~ (4));
$
TRACE DECODE TABLE
LEGOPF+NPROPF+GAGRPE
FORMAT 1 [NSTRUCTIONS
LEGOPF+NPROPF+GAGRPD
DIV, MPY
LEGOPF +NPF~OF'F +G~iGr,:PC
STCF', LD,:R
LEGOPF+NPROPF+GAGRPC
XOP GAGRPC
LEGOPF+NPROPF+GAGRPD
XOP, cze. CDC
LEGOPF+NPROPF+GAGRPA
TB, SBZ, SBa
LEGOPF+NPROPF+GAGRPA
JUMPS
ILLOPF+NPROPF+GAGRPA
ILLEGAL
LEGOPF+NPROPF+GAGPPB
SHIFTS
ILLOPF+NPROPF+GAGRPC
RESERVED FOR LDS LDD
LEGOPF+NPROPF+GAGRPC
~BS.
SETQ, SWPB
LEGOPF+NPROPF+GAGRPC
BL
LEGOPF+NPROPF+GAGRPC
INC, DEC. !NV. NEG, CLR
,I\,
LEGOPF+NPROPF+GAGRPC
LEGOPF+NPROPF+GAGRPC
B
ELI,IP
LEGOPF+NPROPF+GAGRPC
LRE>(
ILLOPF+PRVOPF+GAGRPA
CI0200,)0000

0200
0000

10557
0558

0563
0564
0565
0E;(36

PAGE 121020

2-DECLARE PTABLE (15) F[XED(lS);
EVEr~

PTABLE BSS
PPC
EQU
PINST EOU
PST
EOU
EOU

0008

Pl,lP
PBT

000A
000C
000E

PCRU
EG11.)
P>-:Fl'UT [O~~
["Il~) r,'1< S P (, CE: REGISTE:R CHI1NGE
:'.,\
FOR TS/TD HE. 0
DE~~.T r H~·!T I ON
,I

I [(, )

PSE
PSB
PS:~'I

PSR
2-DECLARE pro;: I ~nu,G;S (15) CHARACTER
::;:- rrn TUiL (CRLF, ' ><- , , 'ST' , , kiP' , ,
,
"':1_
, >< L ' , "SE' , "SB' , 'SA' ,
-'
J'DE' , .' DA' , 'DR' ) ) ;
2--DECU~RE FOF~I"IHT
L I TERf~I .. L')" F'P I HTT
PPIHT T,",GS

"

Ot36(~

:f

oe61

t

I~)t; '32

::t~

0663

0001

TFVl

2-DECLARE STACK I '''DEX FIXED ( 16) ;
STACK [ HDE><
STACV SIZE
2:-DECUiF:E (1 DDPS:T(IC 1< ( 4 ) PO I NTEFi:;
sn< F I :E000

R9,TRVl

0702
0703

0130

O?O,l

(1132

0229
AI
0000
0130' TRC012 EOU
C208
MO',v"
1]07
JEO

070~;

0134

(l~d8

SLn

PS,l

O?(1r::;;

0136

(11.38

1.?03
C299

,-J!'le
HO\l

TRC013

()7E)7
o7 0 2:

0 1. 3 F:I

06AO

BL

013C

052E'

ISOLATE THE VARIABLE TRACE Br

I
P8, Rf:

TRC01<1·

*R9.R10
@PUSH

IF ALL 8ITS PROCESSED

**

TRACE INTERPERTER

13709
071()
0711

01413

El? 1:::

FAGE 0024

TRC013 EOU
$
05C9
INCT R9
l0F7
JMP TRC012
0142' TRC014 EOU $

*

SZC

2-PRINTFLAG ::: AND (PRINTFLAG. CLEA
@CPFLG.@PRTFLG

0~~06

LI

Rl~, ><

014C

C29[:;:;

tvlOV

tRr3, RJ.O

0.14E

C83C;

MOV

tR6+,@PTABLE+PINST

014:~

4820

0144
()14G

003;:~

()71~;

014:::\

(17 L?
CI?18

,

0030'

0152

I tET

2-PTABLE (PINST) - EXECUTED INSTRUCT

0719

0720
G721

945387-990Hk~

013E'

IH3E

07J.'~

0714

**

(DAO

**

2-EXECUTEDINSTRUCTION (1) - NOPINS
2-EXECUTEDINSTRUCTION (2) - NOPINS
[dOV

@t'jOP,

frl iJ 'v'

@r·j()F', :-¥RG

elF'

RE;

tRi3+

01540()34'

0722
0/,2:4

0156

CSAO

01~;8

0034'

01':;~1

04C6

*

2--1

::: 0;

CI?;2~':;

::\<

2:-FOUr~D

f2l ? ;~~ l:;

:1:
TRC020 EQU

2-DO WHILE FOUND

01se'

072::'
O?E~8

~~~:/31

0732

898A

07:33

015C
015E
(1 H;O

0734

0162

0040'
1402:
05C6

O?JE;

01E;4

l(lFB

*

C

JHE

TRC030

0740

0166
0168

0741

1211.r3A

0911.
D821

C046

*

1,10 1,1'

R6, RJ.

SRL_

IF [NST CATAGORY FOUND

Rl,l

2-FORMAT::: INSTFORtviAT (I);
SET I ~lSTI~UCT I Ohl FORMAT

MOVB @INSFMTCR1),@FORMAT

016C

008E'
00C8'
D1El
00?4!

0;;'4·5

0170
Ol?2
I()i 74
0176

1 ?~)c:

SlA
JHC

TRC()35

0 7 46

0178

0460

B

@TF:;C2:10

0171;

035E'

0::'44

<

$

OH3E

0743

(0)

J-END;
TRC030 EelLi

0?J?
07:32:

0742

ON

(I)

I r,jCT R6
JblP . TRC020

O?31:~;

O?:::I9

= 0;

$

5-GROUPLOWEPBDUND
4-THEN I = r + 1
4-ELSE FOUND = L;
Ri0 . @GLBTBL(RC)

:*

0?30

0;

] - r F D< I NST+2

c

**

TRACE INTERPERTER
0214'
OA37

~)757

0188

1(12D

0758
0759
07GEl
0761
0762
0753
07(34
07G5

OISA
0ISC
El1SE

INI3

1004

JMP
)t·1P
Jt·1P

HIEI~:!

,)~'lP

(H9Ql

1 (~0A

JMP

0756

0467
0188'
0188' TRC040 EQU

*
*t
*
1:
*TRC100

071S7

0192
0~94

0192'
024A
000F

;lkt

R7,3
FO, 11

@TRC040(R;::')

CASE OF ADDRESS GROUP

$

TRC 120

GRP A GF:P f.i: .GF:P C GP PD··

G1:1 ( S ),

D

TRC130

GRP [,.,

GF'!(::~),

GACD)

TRC150
TRC 1 00
TF:C 111)

!:;-

" F'" ) ,

XINSTPOINTEP, PTABLE
SPCREG. PCCURSOR);

55-

:;;-END j
EQU $
ANDI R10,}000F

MASf< W

07:71
0772
0773
1,,?:74

*t

5-CALL PGADDR

;~:

5-

t

1:' _

()7?~;

)I;:

5-[l-,ID;

077l::
07:77

0196
0198

0778

019f~

0779
0780
0731

019C
019E
011'10

,-'

078407:35

.JMP

TRC 15~1

:t

078:1'
(~) 7 8 ~~:
0739

:t

01A2' TRC120 EOU $
024A
ANDI R10.)03FF

01A4

03FF

0790

1:

~,)791

:*

0792

t

0793
0794
0795
0796

)I;:
01~6'

OlAC
131AE

131336'

PCCUF:SOF;:);

*

/* GROUP D ~/
PGADDR (EXECUTEDINSTRUCTION
5XINSTPOINTER, PTAPLE
5SRCREG, PCCURSOR),
5-CAlL PGADDR (~il'lD (" F", RS:[-I I FT r.
5EXECUTED INSTRUCTION
5XINSTPOINTER. PTABLE
5DSTPEG. PCCURSOR);

TRC130 EOU
BL

5-END;
4-DO;
/*GPOUP E */
5-CALL PGADDR (EXECUTEDINSTPU(7ION
5XIN3TPOINTER, PTABLE
5SRCREG. PCCURSOP);
$

@PGADDR

03iA'

(0)E
00LG'

SF'Cf~:EG,

4-DO;

01A2

06iO

XINSTPOINTER, PTABLE

5-CALl

)I;

EI7Sr3

01A6
01A8
01AA

GROUP C t/

$
@PGADLR

*t:
:*
*
1:

13782

/t

(E~ECUTEDINSTRUCTION

DATA PSOUR(,SRCRNM,SRCREG

Hl21

~~'78]

0797

4-DO;

0196' TRCl10 EOU
06AO
BL
O]Af'i I
0(10E
0~H6 '
OE'36 '

NO ADDRESSES TO DECOD
I,J
Gf:i(S)

4-DO; END;
/l GROUP A t /
4-DO;
/ t GROUP B */
5-CALL PGADDR (AND (EXECUT~DINSTRUC

:t

'0768

0769
0770

SLA
SRL
B

0SB?

0766

c

945387-9901

017E
0180
0182
0184
0186

0753
0754
0755

(

**

DATA PSOURC,SRCRNM,SPCREG

*~

TRACE INTEPPERTER

**

PAGE 0026

0798
0799

5-CAlL

080!~

0801
0802
0803
0804
'0805
0806
0807
0808
0809
0810
0811

SRl
BL

01BG

0016

DATA PDEST,DSTRNM.DSTREG

01B8

()014'

01.B{4

0038'

01BC
01BE

8820
0038'
003f; ,
11310

",I~~E

(i :~(11

LI

TRC135
Rl,)30

()(l16 '

S2C

@SRCRHM.Rl

OlCA
(HeC

.Jt'~E

LI

TRC135
Rl.PTABLE+PDEST+PDE

MOV

@PTABLE+PINST,R10

OAM)

SLA

18131.

.Joe

R10.4
TRC133
:t:R1

1211.CE
0ID0

406rc)
113GB
0201.

0813

01DA

INC
0'391
OlDC" TRC133 EOU
0591
ItK
C()51
MOV
C811
MOV

0827
0828

01E8

0829
0830
0831

0832

0833
0834

08~5

",,0,·S;36

0837

01EA
01EC

C"

$

.~

*R1
*R1,R1
*Rl,@PTABLE+PDEST+PDB

00CO'

01E4" TRC135 EOU

$

5-EHD;
4-EHD;
3-DO CASE I;

**

01E4
01E6

0826

C2A~)

:*

1()825

RI+l MODIFIED

00BE'
0121AA'

01DC
01DE
01E0
01E2

=

SRCREG THEN CALL PUSH
WHEN *RI+,*RI+

01C4
101C6
01.C8

0820
0821
0822
0823
0824

~i'

@DSTREG,@SRCREG

01D4
Cl1DG
01D8

". 0818
'0819

RI0,S

5-IF DSTREG

0030

I

@PGADDR

C

01D2

0817

6) ,

096A
OGA0
03AA'

OlCO
01.C2

(RSH I FT (EXECUTED I NSTO
XINSTPOINTER, PTABlE
DSTREG. PCCURSOR)i

OlB0
0IB2
01B4

0812
0814
0815
0816

PG~iDDR

555-

*

0:LE4' TRC15tZl EQU
CLR
0916
SRL
MOVB
D066
0~::40 '
0~371
SRL

e(I·C1

01EE
01FO

O?04

01F2

0,:~06

01F4

000A'

01FG
(11F8
QIIFA
01FC

0209

$

R1
R6.1
@CDISP(R6).R1

LI

Ri. 7
R4, NEt..JPC

LI

RG.

U

R9.r~IHST

B

@CATBl( Rl)

EQU

$

eOOE'

/* 00 INSTRUCTION D
F I XUPS :t..'.

~.jEWJ.,JP

0~:~12'

eli·S1

0IFE'

01FE' *
CATBl

*******************
EOU $

01FE' CATA

4-CAll INSTEXEC; /* FORMAT I */
BRANCH BY CATAGORY OF IHST ..

945387-9901'**'

** TRACE INTERPERTER **
0838
0839
0840
0841
0842
0843

01FE
0200

C3E0
0000

{1845
(1846
(1847
0848
0849
0850
0851
0852

0853
0854
(1855

MOV

@USRST,R15

RESTORE USER CONTEXT
SAVE WKSP LINKAGE

0;202

(::389

~lOV

0;204
02€16
0208

CGOD
C360

1'<10V

P9,P14
Pl],P0

MOV

@USRI~IP.

12l20~1

02(~ll

0;20C

C801
021.'::: '
0::3E:0

02~0E
~l844

0;210
0212
0218
021A
021C
02iE
13220
0222
0224
0226
13228
E'22A
12122C
022E
0230

R13

OiO I; ) '

SET UP BLWP TO TRACER CONTEXT

STklP P'l
Ri , @XBUAIP
~1O\I
•• ..L.

XINST
0420
021C'

RTWP
BSS 3::¥2
BUI'\P @>mL~.IP

**** EXECUTED INSTRUCTION
~~ETUR:';

> -:; Q
.... ~

0916

SOC

SLA

~0C0110}

0240'

0907

0915

rd (I \/

*R9.R0
Re.6
RO.12
R(2i, @PTABLE+PXL

*R9. R0
R0,8
R0.7
@USRI"jP .. R1

Ef:PQ)
00:1A I
0030 '

0:274
(~.2h;

0903

~1(iV

5-PTABLE (PXL) :=: LSH 1FT (AND (II
/'-EXECUTED r ~~STRUCT ION (121)), G);

oH'E' CATE

0893

()901
0902

$

*
*******************

0892

0900

EGU

,.

~:,

PAGE 12112128

00::0 '

0890
0891

0899

945387-991211 *~

:t

0888

0889

**

4-DO;

$

5-CALL XEQJUMPINST (EXECUTEDINSTR
7-CONDITIOt-lMET) ;
MOV

@USRST.R15

ANDI R15.>FFF0
LI

R14.CATGlt3

GET USEP STATUS:
AT LEVEL ZERO
RTlJ.iP TO CATG10

STbJP RCl
RO, @JBL4JPl

t·10V

.

0·····
',~

,'.

**

TRACE INTERPERTER

0969
09713
09?].
13972
0973
0974
0975
0976
,0977
0978
13979
0980
13981
098~:

098:::
0984
13985
0986
13987
0988
0989
099(1

62C8' CATJ
01FE ' CATK
02C8' CATl
02C8
e2CA
(l2CC
02CE
132D0
e2D2
(J2D4
02DG
02D8
02DA

C06(l'
026~j

1008
1009
'"."

. :"

1010

*

4-CAll INSTEXEC:

CATA

4-DO;

/*

0:,'

/:f<

SWPB SETO ABS
Bl

*

*/

EQU

$

~10V

@lISRIJJP . R1

MOV

R5.@Rl1*2(Rl)

~10\l

5-NEWPC = PTABlE(PSOURC+PSE)
@PTABLE+PSOURC+PSE,*R4

5-USRREG (11) - PCCURSOR;

0016

,

C52()

00B6'

*

"

C

8820

0016'
0010'
JEQ

1302

CATlZO
5-PTABLE (PBT)

*

02DC' CATl10 EQU
615A0
O~j4t;

Bl

= NEWPC;

5-CAll AU'i'O r ~KTEST;

::+:

02DC
02DE

PAGE 0030

I

C84';

@ATO I ~K

,

r;:12EI2) , CATl20 EGllI

02EO

C814

02[2

e~IBI2J

(1;2E4

02E[;
0;2E8

E82e
1303E'
e~)30 '

O;2EA

1037

gr.

t~O\l

*R4.@PTABLE+PET

SOC

@BR~~FLG,

'

eiFE'

*

*
JMP TRC2e0
*******************
*
CATM
EOU CAT A
********************

0996

1005
113136
1007

EQU

*+,

CATH

*******************

~)994

1001
11302
11313::1
1004-

EQU

::+:

0995
0997
'13998
13999
11300

945387-9901

*******************
JI':

13991

099::::
099]

**

02EC
02EE

e2EC'
Ce60
13121B6 '

62F0

C651

02F2
02F4

eGf~0

*eATN

EQU
MOV

5-PRINTFlAG
@PRTFLG

= or;~

(PR I I..JTFlAG , BRANCO.'

5-EPW;

4-CAll INSTEXEC;
4"'DO;
5-PTR

= PTABlE

/t

ClR NEG INVINi

/:t: X */
(PS0URC+PSE)i

$

@PTABlE+PSOURC+PSE,Rl
5-EXECUTEDINSTRUCTION (13)

K

= MEMWOR

"

5-CAlL AUTOINCTEST;

1\

Bl

@ATOIi'K

e~A6'

*

~*

62F6

06Ae

'~(::F8

13418'

~lE:FA

64613

e;2FC

011A'

*
::t:

5-CALl TRCPRINT (PRINTFlAG. TReEN
5PTABlE)
Bl

@PRTRC

B

@TRC@l@

5-GO TO TRCXINST,
5-END;

:.

~:

945387-9901 ~

** TRACE INTERPERTER **

(~

1011
1012
1013
1014
1015
1016
101?
1018
1019
1020
1021
1022
1(-;23
1024
1025
1026
10;2;'
1028
1029
1030
1031
1032:
1033
1034

.('

1035
.1036
1037
10:3d
103(:)
1040
1041.
104:::
1043

*******************
,!'
'"

02FE
0300

03132

0304
0306

4-DO;

$

@PTABLE+PSOURC+PSE.Rl

)K

C~;Bl

C05r3
C86t3

0314
0316

C845
N:11C

0318
031A
031C

C860

5-~,IElAi I.JP t\1EMkIORD2 ;
::;-'F'TR .- F'TF: + 2: ;

MOV

*Rl+.tR6

r~OV

*Rl.*R4

MOV
r·10V

5-HEl.dUSRREG (13 )
*R6.Rl
@USRWP.@R13*2(R1)

-

MOV

5-HEI...IUSRF:EG ( 14 )
R5.@R14*2(R1)

= PCCURSOR;

MOV

@USRST.@R15t2(Rl)

E;-HEI,JF'C

*

02CA'

*
*

!::;-I'~nJUSRF.:EG

(1 ~-:;)

..-. USF:::ST;

02~82 1

!:;-PTABLE ( F'HT ) - NEWPC;
5-PI<: I ~HFLJ~G = OJ,: (PR I I'HFLAG, Bfii:ANC

IGDE

*

5-Dm;

JMP CATl10
t************t*****
:t:

G2C6' CATQ
EQU CATH
*******************
*
~11FE' CATR
EaU CAT A
********t**********
:t.

0328

L'SRlAIP;

00U:
:t:

0320
0322
0324
0:326

HEMklORD2 ;

"'

0011~

:*.:

031E

/;t.. BLLdP */
5-F'TP - f::>TAELE (PSCtUF.:C+F'SE) ;

E(~U

12130C
030E
0310
0::-312

032A

C"

E;-om;

,JMP CATl10
*******************
*
MOV

C511

1.048

1055

*

t

031214' CATP

030A

104~)

t

::'-'PTABLE ( FEn .- HEkIPC;
5-PRIHTFLAG .- OF: (F'F<:I NTFLAG. E:RANC

:t:

lG4~;

105]
1054

$

@PTABlE+PSOURC+PSE.tR4

t
0308

:~/

PTAHlE (PSOURC+PSE) ;

CI2160

i210B6 •

(~031

/t B:

-

t,lOV

t

1046
1047

H'5(~

leEC

4-DO;
5-HEWF'C

EQU

t

104'~

l0S()
105:1.

*
02FE' CATO
C520
0(1B6 I

PAGE

,a320 ' CATS
*
C060
0310'
CSAl
*

*

Et~D

.:

/* LREX ILLEGAL

4-CALL I HSTE>·nlD;

CLR

********t*****ttt**

10?1
1072:

1080
1081
11)82

5-PTABLE (PBT) = NEWPC;
5-PRINTFLAG = OR (PR!NTFLAG. BRANC

01FE' CATT
02:CI3 '

PAGE (1f)32

@R15*2(Rl).@NEWST

*******************
)!<

10132

1 (b??
1 1. )?8

MOV

t

l06C;

107r;

945387-9901~

**

1058
1059

061

**

4-[10;
,'* LI Al AHiL. OR!
5-EXECUTABLEINSTRUCTION (1) = NEMW
5-PCCURSOR = PCCURSOR + 2;

5-CALL I HSTE> : ::: TD/T5, [i/S RIGHT ."IUSTIFIED
 : : XEO IHSTRUCTION PO[HTER
::t:
; ;:::: PC CURSCtF;'
1
t:

1175
l1'7G
1177
1178
11.79

*
*
*
*

:1180
1181
11:32

lnn

1134
11 :::::~:;
11::;:6
118?

:t

BL..
Dt:nr:l

*i;

Df~TfCl
D(4T~~

:*:

1188

11 S~:.1
11 ~:H)
1. 1 ~31
1192
11 ~~13

@F'GADDF~


(PTR TO WORD TO GET TS/TD S/D VALUES)
1000

E000 PEBAMK EGiU
03HA' PGADDR EGiU
~10 \1
C03B
:t.

>E000

1000

c:-DECL~1F'[

12(113

1207
1208
1209

0:3AA

1210
1211

03AC

0;20E
00r48

O]B?'

081

(1

LI

R14,PTABLF.:

A

R0,P14

*

SRA

RO,l

P10,P1

1 Z-:: u::;

(nB4

C04A

t,lOIJ

1;~1?

(1]BI3

02'41

AHDI Rl,>3F

CI0:3F

1:~18

03B8
():3Bti
03BC

C]3B
C701

02,)1

L.. I TEFHLL.. C(

"[1)1;;;0";

$

*Rll+,R0

J:

CUBE

F'EE~:II'II<

GET DISPLACEMEHT IN PTABlE
= SHIFT COUNT 2:

*

I

(~l::3E:O

1220
12;21

~:UEPTA£L.E.,

L12-DECLARE

119~;

121~3

o

PGADDR
POST A GENERAL ADDRESS

~iBSTRACT:

1174

1.213
121,1.
1215

PAGE (:)036

*

r,lOV

:n~11+,R12

MOV

Pl.*P12

ADDR OF

SUB PTABLE

ADJUST SHIFT COUNT
2:·-REGHUt,1BEP :::: f::'HD (I lET, "3F")

SET TS/TD S/D
2:-kIPEGADDR ::: AHD

AHDI

F:1,>F

i

(HET,

ifF")

t: 2 +

o

TRACE
12;22

===

POST

03C0

000F

Q~3C;~:

CJEO ,

0::;;C4

945387-9901/t*

GENERAL ADDRESS

r·1(JV

@USRtJP, R1 '3

037A

12;2]

0](:(:\

I~JC

1

I:;

1.224

03(:8

(1:3(:

j

(1

P1,FiE.
F'l,F;:tS

1. ;:~26

O]U~

~~O\i

lRll+,R12

122?
1228
1229

03CC

C:33D
(:70F

MOV

R1S,tR12

~~:3CE

CW:W

03D0

000fS

03D2
0:]D4

C30r21

"

123c:

W3DG

'12:]]
12:34

o::m :3

12:::::';

'2)3Dl'-i
O]DC

12::::3
123':)
1 (:4':'
124 _L

0('30

()3DE'
:!1:

1 (!~!3

J~'-iP

F'(:;A 1 00

D I PETl'

J~liP

F'G(120~)

(~I::::E2

100,11 (lO?

-J~·1 P

ItWIF'[-:CT
I t~D[>t:D

03E4

100,:;'

PGA:300
PGA400

.) 1'1 F'

t

:t:

03E6' PGA100 EOU
03E6

04(C

0:3E8

H)OD
0J[i~1 '

J.~?:!31)

03EA

Cl DF-

1253

0:3EC
1213EE

020'::

:*

ClR

R:12

.J ~·1P

PGA500

4-DlD;
::::--DO;

*

PGA200 EQU

$

4-EFFECTIVEADDR - MEMWORD;

03FO

1(103

b10\l

JFH5,FH5

LI

R12, PSRtrlSI<

:t

1000
·)t~p

:*

125~~

1256

4--[~m

03F2' PGA300 EQU

1c.:58

03F2

C3DF

:*

;

/"

3-DO;

>K

1257

~lOV

$

I

I--I~I[~:E;)

:<:/

I HDE~30

024C

03DE' PG(i010 EOU
03D[
O][rZ,

124 :::

124'3
124(3
1247
124::)

MOV

t

1236
12:::~)

:*

SET WKSP REGlSTER ADDRESS
2-SUBPTABlE (PSP) = MEMWORD;
tR15.@PSP(R14)

t

1230

J.231

*

ADDRESS OF WkSP REGISTER

!:;-+ bIOF:I"OFS i

4-WORDOFINST

!~i!

=
HST' ;

EFFECTIVEADDR

= WORDOFSIMINST;

4->< I t'iSTPO I tlr=T: "'

:< I I'lS'Y'PO I HTEP

-t'

2;

TRACE

===

t

L~71

12?;::

03FC

CE75

1,:'74

03FE

0;::0C

r214 (It;)

1000

04'02

HH)ra

*-

*R5+.tR9+

.,:.,

3-00;
4-EFFECTIVEADDR

:t:

4-MASK

L28~i

4-END;

(~404

rJ404

CB8F

0401~)

00ne)

040:3

CF:lF

040(l

O(~)02

"

F'GA500

1. (~: i=: ~:)
1;? ~;:I (1

EGlU
MOV

$

MOV

tR15.@PSB(R14)

R15.@PSECR14)

J.:::91

~?'-SUEPT('IBL_E

:*

Z-t>1AS[< ==

04(1C

0;~6C

E000

0410

0~J(1C

ORr

R12,PEPAMK

SF~L

R12.0

SOC

R12,@PRTFLG

:t

1 ;:~:3 :::'
(~412

nl(IC

0414

0030 ,

0416

~lc!·5B

F~SH

(Psn)

r FT

C'

(OF:~

t,1FI,II,JOF:D;

(1\1r':6f<,

F'EB(ilrlf(),

4-DISP (SUBPTABLE»;

t

04(J[

INDIRECT AUTO-IN

INDIRECT AUTO INCREMENT

:t:
1 ;,~:8S

= PSRMSK;

/t

= MEMWORD;

3-END;
/% END CASE T5TD t /
2-SUBPTABLE (PSE) = EFFECTIVEnDDRi

t
:t:

1.~:84

F'SF:~jS'V;

,r,

t
, PGA400
03EA

1283

+ 2;

4-EN[r;

J,\

1 ;::8;:::

= PC CURSOR

MOVE EXTENDED PART OF INST
4-'I'(IASI( ::

'J.'

1::81

(~038

LI

*

1 E:??

PAGE

4-PCCURSOR

MOV

127~;

1,~?G

945387-9901 ~f:

POST GENERAL ADDRESS

2-PRINTFLAG = OR (PRINTFLAG.

MASK)

;

t:

2-RETURt·~

:*:

2-END F'GADDR

i

c

TRACE
1299
1300
1301
1:302
1303
1304
1305
1306
1:30/'
1308
1:309

** TITLE:

PRTRC
TRACE PRINT SUBROUTINE

*
* ABSTRAC:T:

ORIGINAL

* REVISION:

*
i

* CALLING
*
*t-*
il':
**
;t
**
*
*:t
*

1310

1311
1312
1313
1314
1315
1316
131?
1318
1319
1320
1321
1'-'--''='
..J

;t

:t

1325
1326
1327
1328

0041
0009

MAXLN EQU
ELEMLN EQU

**VARLN

1::: ~:: 3
1. :3::),4

0418

000B
041.8' PRTRC
C(18B

13~15

041A
041C
041E

C820
000C'
00AC'

13420
0422
0424
0426

8820

13:::2

13::6

.13::8

13:19
13<.13

13(3
'~Y13,44

9

2-DECLARE PTR POINTER;
2-DECLARE MEMWORD BIT (is) CONTROL
2- DECLI~RE \/nPLII LITERALLY' :1.11 ;

11
$

R11, R2

*

MO'v'

SI~'v'E F?ETUF:t·j
2-PTABLE (PST) = NEWSY;
@NEWST.@PTABLE+PST

*

C

2-IF USRWP .NE. NEWWP THEN DO;
@USRWP.@NEWWP

,JEQ

PT010

*

MOV

3-PTABLE (PWP)
@NEWWP,@PTABlE+PWP

*

soc

3-PRINTFLAG - OR (PRINTFLAG. PWPMS
@PWPMSK,@PRTFLG

*

EOU

$

03C4 '
,

1306

0428
12l42A
042C

C820
00(1A'
00AE'

042E

E820
002['
0Q130 '

0430
0432

R7, R8, F9, R10, R12, R14, Ri5

65

....

EOU
EOU
NOV

R(~,

000r~

13(.1

13,·2

PL R2,

if:

132:9
1330
13]1

13:17

RC~,

R3
AF:E DESTROYED
1-PROCEDURE TRCPRINT (PRINTFLAG.
3-TRCENTRYADDR, PTABLE);
2-DECL~RE TRCENTRYADDR POINTER;
2-DECLARE PTABLE (16) BIT (1S);
2-DECLARE (1 PRINTFLAG.
33 PRTEIT (1S) BIT (1»);
2-DECLARE SOURCEVALUE BIT (16)
4-CONTROL (SRCREG);
2-DECLARE DESTVALUE BIT (1S)
4-CONTROl (DSTREG);
2'-DECL.AF([ (I, L I HELEHGTH) F I >,:

R10,1

TRACE T'lPE

0,

2-IF PRI f'HFlAG . r·IE . 0

8(1e'(l

'·~'c
~#
.....~

13i'6
13?7

FU~G

'210j;2'

1 J I::; 4

13f;7
13 Em
1369

PR I hIT

2-PRINTFLAG -, (':ND (PRINTFLAG,
4-1"RACET'y'PES (1PACETYPEINDEX));

';)456

1362
1363

..

DATA PTABLE+PDEST,DSTE.DSTR,DS1'REG

C2~0

1360
13r31

0

2-CALL. UPI)~)TER[G (PRINTFLAG, PTAEL
4-PDEST, [,S'TREC) j
UPDfHE IrEST r HAT I OH REGS

(l452
0454

1.359

I'"~

DATA PTABLE+PSOURC.SRCE.SRCR.SPCREG

1313(12
€lO::3 '
C€l!. I~I
C14~

,:)

PAGE 00413

00~0

€l6il0
05116 '
€l01E'

044C

tt+

2-CALL UPDATERFG (PPINTFLAG, PTAEL
4-F'SQURC, SPCR[G) ;
@PRTFL.G,R10
UPDATE S'OURCE REGS

)I:

0,:J.4E
13'341':"",,::.
:,r::r.'"
1356
1357
'1353

**

945387-9901

.

HOTHIHG TO PRINT
3-THEN PRTBIT ( 0 ) ::: 1i /:i;: ASSURE PC
PC Pf-?HITED

1:~S:SI)RE

2-L r r~ELEHG i'H = tril:)Xl,EriG7H,
2-DO I FF.:O:,1 0 TO lS;
LOOP COUt'~T

EQU
Sl_A
JNC

$

AI

R6.-ELEiI1LN

R7,1
PT0S0

:::--IF PRTBIT ( I ) ,NE. 0

4-LINELENGTH

-

L I NELH4GTH

0
4-IF L I rjELENGTH /,,-

JGT

PT0S0

BI_

@HEVJL IN

THEt~

j'

THE~·I

-

DO;

ELEMEN

,

DO;

5-CALL HEIIJL I 1',1;

0
>,

------

~~~-

I,

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

~~~~~~~~-~-

..

.•

l

TRACE

===

0480

04F4'

1385

(

"

".

945387-9901l1t~

PRINT SUBROUTINE

*

1:38(-)

0482' PT050

138?

EQU

$

4-CALL PPltH

J:

138[:

~I482

1 ::3:~~q
:J9(~'

O~:01:i

LI

04f;6

f~)?8:~:

('48::\

A
LI

R9,2

048{i

0;209
000;::

BL

@PRIHT

--.l1',iP

PT800

(PPIHTTAG';

(1).2);

0434

1 391

1392

~J4:3C

06f:I~I

043E

00012'

04~:'O

1030

1393
139(1.

~)49;~~

0;·::g:~:

l:?':Vj

0494
0496

OOO;:-!
1?J21!::;

1396

0498

i,)?OH

04::jf~

012101,)

*

R8" RiO

tt*t ERROR/ESC RETURN
4-IF I >

Cl

R8,PINST

JLE
LI

PT070
@F'RIHC

04~iC

N:)'~H)

BL

1398

049E
04A0

O]E:4'
1023
04A2' PT070

JMP

PT800

EQU

$

MOV

@PTABLE(RS).R10

BL

@PRHTH><

1400
140 1

04~1;:~

C~A:3

1402

04(:,4
04f1G

O(IA:::;'
06AO

04A:3

001()I,'

04Ml

102::

1403

J404

*

3--[r-.ID;

1407
140:3

~"4AC

0SC:::;

04~lE

Cle'

140~3

04B0
'214B2

16E1
0~:;80

INC
EQU
MOV

@5TINX,R7

1411

*:*

1412
1413

1414

04B8
04BA

04B4' PT(~90
ClEO
00E4'
04B3' PT100
0647
ll1A

04BC
04BE

(:22:;'
00E6'

(~4B4

04BI3
141£;

14U:;
1417

1418

1419
1420

1421
14?;?

04,C0
04(2

8627

00EE'

142:::

04(:4

1424
142t:;,

0ilCG
04C3

1JF9
(:000
l:3CF

04CA

0226

142E;

\'i4'l!7

*ttt ERROR/ESC RETURN

4-END;
:It
P8
P?,R7
PT040
RO

1410

PPHTC (EQ:;I

4-CALL PRNTHX rpTABLE ([));

EO\)
H1Cr
1·1 0 'v"
,H-jE

04AC' PT080

1412'6

C~:,I.,L

tr%y ERROP/ESC RETURN

*:*

1405

THE~,I

F'10,EG!SIG~,1

1397
1399

FI~,I:~T

*
*
*
*

2-DO WHILE STACKINDEX > 0;
3-STACKINDEX = STACKINDEX - 1;

:1&

EQlI $
DECr FO
JLT

PT190

MOV

@ADRSTKCR7),R8

2-LTR

= ADDRSTACK

(STACKINDEX);

2-IF MEMWORD ,NE, BEFORECONTENTS
4-(STACKINDEX) THEN DO;
C

@B4CNTSCR7),tR8

.JEQ
MOV

PT100
RO,P0

"lEO

PT035

AI

R6,-VARLN

3-LIHELENGTH - LINELENGTH - VARLN;

TPACE _._-- PRIHT <;UBROUT I NE

1428
1429

14'30
14:31
14:::2
1.43:3
14:34
14:i5
j ,1-:3 ()
14];7

1,ns
1439

04C!~:

FFF!;

04C[

150?

04D0
04D;2

BL
EOU

$

C28::::

MO'v'

0GAI2!
000(1

BL

R8,R10
@F'RHTHN

1001

JNP

PT800

0G~I(l

04D4
C:14DG
04D8
04DA
04I!C
04DE
04EI('
04E2
04E4

02(h-i
0491;

OG{;lC'

100r;:;

144Z

~~4E8

06HO
04f:18 '
1002
it(JE4
04F0'

04F0

@PRIHC

JMF)

PT81i)0

04F2

*

1110\/
EL

:tR8,R10

04·F4
'~4F6

04F8
04FA
04FC
()4FE
(:)500
05O,:
0504

~~ElAIL

0

I

(PTR) ;

I~ETURH

:t:*:**

ERROFi~/ESC

F~ETURI\I

,.tr~P

PT800

(14F4'
CQ1CB
020A
0024'
OGA0
04E2 .'
10F9
0206
0041
0453

·...!NP

PT100

EOU

$

PTn'0

EGlU

$

PT800

IN(:T R2
$
EQU
B
tR2

PT190

r·~Et,JL

*

*J;U: ERROF?'/ESC RETum,1
3-END;

*

'345c~

1.1r1F.];iJdORD) ;

@PR~HH>(

;:

(2-RETUR~1 i

:t
:t
:t

14'3i3

C('~LL

ERFWR/[SC
([I)SrGN) ;

3-CALL PFnnH>~

0~;C2

04F2'

1457

1461
1.462

EL

:11:

04F0'

1455

1459
146()

R10,EOSIGt~

0~·9E '

c(~98

04EE

LI

THEN

t::t:t:*

3-CALL PFnnC

*

04E6
04EA
04E(:

3-CALL PRtHHI'-1

< 0

I

1441

1458

PT110

:t

145'~

"'-

,)GT

PT110
@NEkILrN

04F,ci· '
04D,:I'

PFIGE 0042

'*'*"

3-IF L I NELnlGTH

*

1440

1443
1444
1445
1446
1447
1448
1449
1450
1451
1452:
1453

945387-9901

0
PRINT ~i NEil..l LIt-IE

I N EQU
NOV
LI

$

R1L R3
R10,NULINE

BL

@PRtHC

JMP
LI

PT800
R6, MA>Y.

1488

1493

'~

ORIGIHAL

~"

148(21

,Cr

UDREG
UPDATE REGISTERS

THE I HD I Cf~TED SOUPCE ([lEST I l'l~!T I ON) EFF EeT I VE
AIJ DF:: E SSiS USE: D T I) S [ T TIi F • f, F T EP' CI) r!T t:: t·l T s:
OF THE EFFECT I \iE ~:IDLIPE~:::~
I r~ ADf l ! T i (11'1. ! F
'REG I STEP' FU4Gi I 3 :::E~T .\ H PP; HT FlJ~C" THEH
I F THE COt'~TE"IT::: UF ll--IF. F:[(; I S"'ER HFiVE CHf:IHGED.
THEH THE I~E[,I COI'ln:HTS f::IRE sr, I I,j F)TI~:IBI. E, ELSE
THE 'REGISTER' FLAG IS RESET
t CALL.ING SEOUEHCE:
( P 1 0 > ::":: F'R I t'l T F L. f~ I::;
EL.
@U[IREG
DATA (BASE ADDRESS OF REGISTER SET IN PTABLE)
D~TA <' R1

CI

R1,

JHE

PUSH90

MOV

R10.@ADRSTKCR1)

MOV

*R10.@B4CNTSCR1)

It-JeT

@STI~~X

EQU

$

8

*R11

STkMI~X

J!:

0538
~)53A

.( ..

l-PROCEDURE PUSHSTACK (ADDR);
2-DECLAPE AD DR peINTER;
2-DECLARE STACKM~X LITERALLY '4';
2-DECLARE MFMWORD BIT (16) CONTROL

:r..

1543

1554
1555

ST~ICK

ADDf~E:;S

1539
1540

1552
1553

N~

GI"ORED .

15:37

1551

UID!)ln:S:~·)

~~BSTPACT.

1534
1535

1549

PI)SH
PUiCE ADDI~E'::S AND

;'f:

153,;:

1548

TITLE:

PAGE (::104-5

* REVISION:
ORIGINAL
:t*
THE PASSED ADDRESS AND ITS CONTENTS ARE PLACED
**
ON THE STACK. STACK OVERFLOW IS DEiECTED
AND I
* CALLING SEQUENCE:
::t:
30

S2(

@SRCRHM,Pl

JNE

ATOl90

*t - : : : - 3-THEN
tflOIJ

@::;PCI?EG,

INCT *R1
l

0556

0000 ERS

0556'
045B

I W:
1. -PRC

lIalg

1131
1131
1;S31
Ila~

1I;S34
1;tIG
1130
IU37

• a3a

• ,3;
11'1

("

0.0388.00et

TO CASIETT!
JEQ

el88

t31.

ruBA

ItBA' OPRG1S EQU
LI
aRIA

Ilac
118E
fuca

81111

Rll.M)(lIt

EQU

I

.HUI

81..

'ERROR

elll

14el

fUC"

e•••

fuel

'4"

ruce

•

s

'HIE' A80RT

IlIl CR '

luca

•

OPRGt9

call

•

•DP"'"
..

••

PAGE ele •
JUMP

IF WED'

IUCCEIS,UL

LOAD liD AIO"T MSGID

OUTPUT THE ERROR MESIAGE

•
BLWP

EQU

'R"

MOV
RT

CPRM,Rll

REI!T Rtl fOR CHO PRce"

TNAN' 18 I%T' T03 BVTEI

ea."
ea
••
ea.,
ea.e
ea47

la.1

la ••

lale

.;all

IlIa
lall
laS.

1,51

ea58
ea5'

III'
la"

1188
118&

lal2

1181

la8.

tall
1"1

I'"
el18

1.1.

I'"

la'l
1"2
la'l

1"4
lit"
la,e

TRI'LT
• TtTLt:.
TRANSLAT! AND TRAN"IR 18 DATA'IITS
• REVIIION,
ORIGINAL
• ABSTRACT. fRI'LT TRANILATla A l ' lIT WORO INTO it IVT.I.
•
A TRrp~!T,AND MoYla THE BVTES INTO THI "",M
BU"ER.
•• CALLING 'EQUENCE'
ENTRY; Rl .. Rl ~THI' BrT AB'~ LOAD TAG
RI ',,'RA ,ADDRISS 0' CURRINT I'"
RI IOATA ,WaRD TO IE TRANILATIO
HP le'RE lEND 0' DATA ARIA IN a'A.

•
•

·,
O

,.'

•••

•••
•
••TRPLT

IQU
MOVS
,RC

HOYS
8Wfl8
SRI..
HOYII
,RC
OAI

!XIT I RI I"RA .CURRENT IvT! ADDR IN I'A
RI,Rl IDI,fROYID
'T .. ,LT~ I' B'R NOT FULL
... G!~ X, eFR 'ULL
,
Rl,Rl
FORMATIYTI • AND 'TOR!
1'1,4
.
IN OUTPUT 8U"ER
Rl,.a,AA+
(SOURC! BIT' '-a)
,ORMATIND 8YT!
RI
Rl,4
('OURC! IIT8 4-P'
RI,Rl
Rl,es
Rl,A81.'111

SAL At,t
.
MOYS RI,tS,RA.
ILA
ORI "l,A.s.a,11

1","

sRL Rid
MOY8 RI,t.,RA+
C
aFRA,B'A!
Rf

81T 'TATU' 8IT' AND RETURN

o

:

WRITE 8UF'ERS TO CASS
..
..
•
•
•
•
•
..
..
•

13"

rn8e
1~81

1;)82
1i)8;)
B~84

1:1815
1;S81
1:181

l;sa,

..•..

138P
Ii)Oe

B;)I,

I;)Oa
Ii)O;S
1i)04
1:S00
1.19e1
1391

,:soe

..

elEE' WRIT!
leUJ'

040e

rlH 1'''
tUFeI

1114'

eJ411Jl

el"

1402

11FC

'~00

040e

EXITa

•

111'0

1404

CALL~

CALLING SEQUENCE I
ENTRY.
R1 ,PRBA~ADDRES' 0' PRe
R8 ,BFRA_ADDR OF NEXT CH~ P08 IN

•

8220

141~

TITLEI
WRITE
REVISIONI
ORIGINAL
ABSTRACT. THE OUTPUT BUFFER POINTED AT BY .PReA~
fS PRESENTED TO MONITOR VIA A WRtTE SERVICE

•
..

IUEE;

0.199

PAGE 8011

01Fa

CSI3S

8FRAIADDR OF 1ST CH •. pas. IN BFR
R1B0~STATUS OF WRITE(SYS~'LAG8 FROM PRS)
STATUS REG •• EQ. FOR SUCCESSFUL
I .NE. I'OR TROUBLE
ALL OTHER REGS UNCHANGED.

EQU
S

,PRe'.,BFRA

MOV

SFRA"PRCNT

S

caS7

MOY PRBA,Rtl
8LWP ,sveALT

el'.

0420
1182'

flll'E
1211

lUlU

LI

00tA'
D0ee

MOYS 'PRSFG,R1

1212
0204

011E'
1458

..

•

RT

I'R~

aFRA.BFR

•••• ENTRY POINT .....

COMPUTE CHAR. COUNT AND
STORE IN

PRB~

RESET THE BUFFER POINTER
GET THE tID STATUS

'~.GS

AND

RETURN TO CALLER WITH STATU
SET.

MaY! 8YTE ANO ,TU"

• TITLE

14'U
.4U

*
•*

lUI.

'413
1414
.411
'417

"'8
"1'
I."

.4',
8412

1413
1.2.
1425

••

8liHU'

8.21

*
e.e8' 'VTOUT

11 •• 1
1120'

.218

(HUJi

' •• 5

ea.A 011'
ealc "8~1
•• aa eaRE DEe,
,.3~
8as • 1I~ll
•• 3. e21a latH
~.

IIS4 .1"
• 4:se 8218 Dill

•• :S6

ABSTRACT.

•
•
•••
•
• CALLING
•..•
•
•

• 4Hi

..•• a,

I

•* REYISION'

'4tl

84.'

PAOI •• 11

IT

e211

1.1:1'

EQU
L.l

SYTOUT
ORIGtNAL
GIT A 'VTI 0' DATA 'ROM t"1 DU"' A~IA. 'ORMA'
WITH ASIOLUT! SVTE TAG, AND atoRE IN THE
.
OUTPUT BU"ER.

SIOUENe!'
!NTRVI
R. "IT .,00RIS80' ,V'E TO II FORMA'TIO
R8 " ""A.PLACE TO PUT REFORMATTED BVTE
EX!T i
CST)" ('''''+1

,

(SFRA),C8'RA'+1
RS DISTROYED
AL.L. OTHER RIG8 UNTOUCHED
•• **!NTRY ;OIN' ••••
•
GET THE ABS 'V'I TAG
Rl,ABS'

MOYa.ST.,RI
SRC Rl,'
MaYS Rl,.8FRA+
IL.A Rl,e
ORI Rl,A8S.'196

MOY8 Rl,.eFR, •
RT

MOYE INTO OUTPUT a'R~
RETURN

<""

i',

,'"

o·

'

CHECKSUM THE OUTPUT BUFFER
a'~i

(

• TITLE

•

••

14'~

I ....

IU'.

14'8
14150
1.151
1 •.s2
1.t5~

(

14'~

04'4
14'0
1410
IU11

1411
1418
""0
fl41,
141a
(UI;S

0.1.
14815
1410

•

02tA

021C

121A' CKSM

fI'C0

to"

021E
0221

QJBB

0222

0810

1111'

•
•
•

0a24' CKSMt
022.

0220

02r111

001A'

•

0228' CKSH2
.,228
022A
ea2C'

2831
8211

022~

1301

.,330

e232
112:14

e23'

1238
e23A
1123C
e2~E

8240
1.11

ORIGINAL

ABSTRACT.
•
THE EXCLUSIVE OR CHECKSUM OF !ACH EVEN NUMIERED
•
BVTE AND THAT OF EACH 000 NUMB!~EO BYTe A"!
•
COMPUTED AND RETURNED IN THE LEFT AND RIGHT
•
HALV!S OF A 15 BtT WORD.
•
NOTE THAT IF THE LAST
•
BYTE IS ON AN EVEN ADDRESS, THE RIGHT HALF OF
•
THE CHECKSUM IS PRESERVED SO THAT THE NUM8ER
•
OF EVEN BYTES XORt!D MAY 8£ 1 GREATER THAN TH!
•
NUMBER OF ODD BVTEs XDR'!D~ WHEN CKSM FINlIM!a
•
IT FALLS INTO TRPLT TO STASH TH! CHECKSUM.
• CALLING SEQUENCE
•
ENTRY~THE VALUE OF jBFRi IS THE STRING ADDRESS
•
RI -aFRA-THE NEXT AVAILABLE BYTE ADOR~
•
EXIT. Re .COMPUTED CHECKSUM
•
Rl .DESTROYED
•
ALL OTHER REGS UN_ALTERED

1.45
144'
1.41

1.154
141515
14158
1.151
1.58
1.l5g
1.8ra
0.81
11482
1.8iS
148.
1.815
1.80
1481
1.8a
1489
04'0
1"1
0"2

• CKSM

•• REVISION.

0440
1441
1.42

.101 ERa

*

lAFD

e8CIll

f1a:sa- CKSM3
eall '
7151'"

2811
0221

QUIl" ..

OEflIl

.,.80
fII1CA'

EQU
CLR
MOV
IRC
JNC

R0
BFRA,Rl
Al,t
CKSHt

MOVB

~0,*ef'RA

£QU

S

S

*••• e;NTRY

CLEAR CHECKSUM ACCUMULATOR
CHECK NUMBEA OF eVT!S ANO
JUMP IF EVEN
CLR RIGHT HALF OF ODD BVTE WD

GET THE STARTING ADDREas
EQU

S

XOR
C

CHECKSUM ANOTHER WORD, AND
IF NoT DON!,
LOOP BACK FOR ANOTHER TIME

*Rl.,R0
Rt,BFRA
JI.,
CKSM2
JEQ CKSM3
SWPB R0
EQU S
LI
Rl,ASCKSM*258

CHECKSUM TME CICSM TAG

XOR
Al

STORE TH! tlCSM TAG IN THE

Rl,Re
Rl,ABS

MOVS Rl,*BFRA.
B
'TRPLT
ENO

OUTPUT 8UFFER AND ReTURN

,.. .

18e

I

AleK'"
AIEND

A.~"

AIL"

AIORT
AIPN
AIR,.
A8R11
A8RTI
Ae8
Ae8e
AeL
BFR
BFR.

CONCOROANCe:
125D
'321
1.'1
0482
.313
'011'
IU8e
eUS8

..111&"

lela

1,1\1
0332
1114
0115
1185
lH8'
eell
ee9S

eu,.,

8118
8421
1113
814,

1148
etlJ83

111181

B,RI
IYTOUT
CKIH
C1

0324

0400

04e~

0300

01~O

0231
0238

0244
0240

032:5
e:U8

0170
21237
0313
fuel
0180
182 18
0365
0314
0484
IUJ7

11O=S

0108
0243
0322
0480
0211
0220
1367

014U1
001;)

IU'5

008tS
0086
0081

TRPt.T
WRtT!
WRTA

21360
0307
0J1213

ave
aveAL. T

0238
fUga

01'~

Rll
RU
Rl3
RITIU,
RiTIIII,
RR
IT

THER!

0~07

0138
0137

f"

('

823.
0234

~u~u

8082
0141
0142

CU15
0114
0111
0171

0018
8135

A~I!

(Ull
21183
024'
0243

0016

945388-9901"\-*

PAGE 0015

0200
02!S1
0326

litH
02!S2
0381

21203
111303
03e'

023!S
0304
035e

0236
8305
04e3

0213
0227
e3eo
0AU
04'7
0238

0214
e28g
e310
0432
21482
0324

02t!5
0381
0311
0433
111483
0330

,aul

0412
18170

fllO'
024 ..
0323
21.83
0212
fl22!5
e3e8
0430
0416
0212

0211
0383
0313
043!S
2148!5
04210

0338
1817:5

0110

0201

0251

21266

0271

84311

023g
01gg
020lS

0325
rU08
21310

04211
11'1488

02A0

0314
0416
01gS
0210
0366
IU03
e4e!S
IU66

SYMeOI.S

0A29

0316

e3e2
0372
043 ..
0484
0330

c

c·

•

A[
APPLICATION
NEXT ASSV

(

(

USED ON

L.T"

7506

.!>"',.

REVISIONS

CAT£

DESCftPTlON

AF'f'OROVEO

.

14-

)

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE_,SE '~ECI~IED
DIMENSION' A"E IN INCHES
TD\.E"ANCE.
ANOLES !'l"
~ "LACE DECIMAl:t ala
2 "LACE OECIMAl:t 02
IDENTII'YINQ NUM.1E1tS
SHOWN IN tt""ENTHIE.ES
!'Ott "E~E"ENCE ONLY

c

'"TE"~"rT DWQ IN
ACCo"OAHcr WITH
MIL,'TO·lOO

.'

~N

O,,",T

C ..,
ENGR
Q'"
APVD

""'-/
A.

CONTR~

orsy

/

L

/

. ' -• • 11.(

INC 0101 POIOI """ I: 0
0",,.,
Equipm«lr GfOtIP

r.II"

AL, ABSLD, ABSOLUTE LOADER-PX990

"-

,,",CTIV'TV RELEASE " " -

V

~lP

TEXAS INSTRUMENTS

"'-

SIZE

CCXJE IOENT NO

A

96214
1 REV
...

.

SCALE

.

ORAWINGNO

"

945389-9901
SHEET

1 of lQ

GIT YAR, " IUTI FROM ASR1JJ '45310.90It ••
"AGI .Itl
••• a
PROC!DURE,ROM8UT
GETBIT • A(GfTerT)
CALL AISLoRe",,,.)
Itllil5
1008
l'CERRORlCALL ·IPlN(I'
1'(PRO& IP,NE,')
THEN
108'
GO TO CeEP)
1119
ELII
1'10
GO TO FRONT PANEL
IIIU
ENor,
1012
INO ROMIOOT
1'13
SU8ROUTINE ABILDR
e'14
00 UNTIL IND OF MDOULE
IfI!U5
0018
RIPEAT tNT!'
CI<8M!OLO CKSM
1011
CALL GET8ITCYALUa;3,CLR)
"IHS
eruo
DO CAl!
CllOO VALUI,IQ,XTND!D TAG
00a0
CALL GETRIT(YALU!,4,CLR)
.011
.I2a
00 CAl!
CllDa YALUE,EO,P6M NAME
le23
II1a4
tFCPARM AoaR,NE,I)
PARM PGN,PARM ADOR~PHMOI'L
leae

..,.

...,

.eae
.la1
lel8

e.19

.rnO!

"It
.,ua
'I~n

Itn.
1115
1018
le37
le38

•••
••
...
..
•••
.
•.
....
•.
..

..
•.•
..
••
.
•.
•..
.

•

lea9
.rue

."
."
."

1"'3

...

'''.1
10.2

111)"
10.5
11.8
le41
11.8
thug
erue

IflJel
IIS2

lel3

."e.

lei IS

lIse

."

."
."

••

."
."
."

."

••
•
."
."

0

I.,.IMIT,a3

CALL G!T8IT(YALU!,',CLR)
NM8R CHAR.ANDCVALUE,.",
DC IF PARM ADDR.N!.I
etpARM PGN).NMIR CHAR
PARM PGN,PARM PIN.~
.
00 WMILE(NMIR CHAR.I!")~AND
(LUUT.GE.e'
CALL GETBITeVALUli1,eLR)
C(PAAM PGN)IVALUr,
PARM PIN,PARM paN.t,
L.IMIT'L.IMIT-S'
END 00,
.
DO WHILE NM8A CHAR~GE.I
CALI,.. G£T81TCVALU!,1,CLR)
NM8R CHAR.NMBR CHAR-!
eND 00,
IND 00 •
END Ctl
CIIDO YALUI.!O~!TRV POINT
CAL.L G!T19(YALUI)
EII,VALUE
r,CPARM ADDR~N!,e)
C(PARM ADDR).!P
!ND CI
.
calDO YALU!,EO~CHrCK'UM
TEMP.eICSM
CALL G!Tll,YALUI

0

I'(NDT(TIMP~!Q.YALU!)~AND,

NOTCIHC(T!MP,I).IQ.VALU!)
ERfUlR R!TURN

0

PAlE 0111)3

•• ABSOLUTE LOADER ••
laee7
0058

8aeo

""'80
111181
808R
"083
118.

Ilee

108e
19187
1'-"88
1010

"07.

107'
107R
1(1173
107.

1"'7e

1078

1077
1078
1070
808111

'1IJ8'
·.,082
1'1183
IfII8.

1"'85
e08e
1087
'''88
1080
011180
8081
8082
1083

108 ..
1085
0088

1087
1008
1080
IU/UI

1'1'

lUll
111113
IU,...

'115
IUle
1117
1118
1110
1110
IU1

...
....
•.
••
....
..

..
•.
••.
.
•.•

••
••
••.
•.
..
•.
.
•••
••
••
•••
••
•.•
•
•..
•

END lrr
ENO C3
CA,DO VALUE.!Q.!ND orr MODULE
RETURN
END c.
celoa VALUE.EQ,R!PEAT TRIPLET
CALL G!TS!T(VALU!,'.CL~)
REPEAT COUNT.AND(VALUE,-3"
CALL GETleCVALUI)
00 WHILE REPEAT COUNT~N!~I
creURR ADOR)~VALUE
eURR ADDR-CURR ADO.I
REPEAT COUNT,REPEA' COUNT-'
END

END 00

ce

••• NOT!,
•••
•••
•••
•••

IN THE INT!R!'T OF SPACE,
THE CODE POR THE AeOY!
XS INCLUDED tN THE
PROCESSING FOR ABSOLUTE
OAT. TRIPLETS,

END CASE
CIIOO VALUE.EO.AIS WORD
CALL GET1ICYALUE)
00 WHILE REPEAT COUNT.GT.I
crCURR ADORlwVALUE
eURR ADnR_eUR ADDR+2
REPEAT COUNT.REPEAT COUNT-l
END DO
END C2
C31DO VALUE.EO,ASS BYT!
CALL GITBIT(VALUI,5,CLR)
VALU!ISRL(YALUE,l'
CALL G!TBIT(VALU!,e,OR)
C(CURR AODR),aHL(VALU!,I)
CUR AODR-CURN AOOR+l
INC C3
C.IDO VALUE.IQ.LOAD ADDR
CALL G!T15CYALUE'
I'CPARM ADOR,NE,0)
CUR.AOOR-VALUE
C(PARM AODR~LOPT)'VALU!
INO C..
celoo VALU!.LT •• 4
ERROR RETURN
IND AISLDR
'UBAOUTIN! GETtS
INO GETle
SU8ROUTINE G!TltT
••• START INPUT STRIAM •••
CRUfUSE-tIQl

BIT.COUNT,0
CKIM.it
tNIITS ••
INS.it
RI ENTRVIACGITII)

PAGE

•• ABSOLUTE LOADER ••
0112
0113
0U4
0115
011e

0111
0U8
0119

01221
0tat
11i2
flU3

'Hi4
flU5

012S

It2'

1128
1129
111l'J
0131

1132
11:53
1134
113!
fH3e

1137
IH38
1139
It.UI

0141
1142
1143
11-14

It4e

114e

r41.'

0148
111140
r/l1150

IHll
1152
0115:5
II1S4
IUS!

1156

ItS'

0158
0110

tuee

11el
rUOI
(UO;)

•
•
•

*
*
*
*
*
*
*
*
..
*

..
•
•
•
..
..
•

*
..
*
..

..

*
*
*
*
*
t

•
t

•
•
•
..
•
•
•
•
•
t

*
*
..
•
•
..
•
t

11.1104

t

11I18e

•
•

lues

01UllA

··'''"
C

.*.N!WRECORO.*.
00 WMIL! CMA~.!Q.LF
CHAR_rN'33
IND DO
IF(CHAR,EQ.OEL)CHAR_IN,33

"~I

•

,

.****GETCHAR** •• *

CHAR. IN733
IF CHAR.!Q.'C~' NEWR!CORO
CKSM,CK8M.XOR.CHAR
ceS_CNC(C8S,CHAR,C8C)
ceC'C8C+'

3

• •• *GIT8T2**.** ••

IF(MODE.EQ,CLR)RBS.I
IF(R8C.GT.ceC)GITCHAR
DO WHILE RBC,GT,I
CALL SLA(R8a,1'
CALL 'LACC8a,1)
IFCCARRY)R88.RBS+'
CIC.C8C-t
ReC-RBC-1
END 00
~ETURN

PROCEDURE GET 8IT (MONITOR CONTROL)
1* GET etT PROVIO!S 10 SUPPORT
FOR TH! ABSLOAOER. THE OPEN
HAl BEEN PROCESSED BY TH! MAtN
DRIVER.

*1
IF CLEAR FLAG •• THEN

1("·...·

!:\~"

e,

RETURN CALUE ,
00 WHILE AEQU!'T BIT COUNT.e,
IF CURRENT BXT COUNT • e THEN 00'
CURRENT BIT COUNT. CURRENT etT COUNT-I'
CALL MOVE AIT(R!TURN VALUI,CURR euF ADeM',
REQUEST 81T COUNT II REQUEST BIT COUNT ,-11
ENO,EL.!
IF CHAR COUNT -0 THIN 00'
eM.R COUNT!CHAR COUNT
CURR!NT BtT COUNT' "
CALL SLA(CURR IU" AODR,CHAR,!),
CK'~ II SWPIC
CHECKSUM • SWP8fCHICKIUM,XORCCH!CKJUM,
CURR aUF' AODR.CHA-,'
CURR 8U" ADDR • CURR BU" AOOR+1'
ENO'!LSE 00'
LOAD PRR OPCOD! , 'R!.O"
CALL IVCCSVC CALL BLOCK',
CURR 8U" AOORII LOADeR BU"IR ADOR'
END,
END,
ENO GTBITM,
lOT 'A8ILD'
TITLE.
'ABILD'
ABSOLUTE LOAOER
REVISION.

-1'

c'

*.

ABSOLUTE LOADER

**

ORlGINAI..
COMPUTER I ggl,.s~
• ABSTRACT I tALL!O BY TME MONITOR AS AN OVERLAV TO
PERfORM LOAns O~ ABSOLUTE COD! MOOUL!S~
SET CALL+a TO ZERO TO INMIBIT RETURN PA~AM.!T!RS
*
ELSE, CALI..+2 IS ASSUMED TO POINT TO A 18 WORD
*
TABLE AT WHICM TM! FOLLOWING PARAMETERS WILL
Be STORED I~ ENCOU~TEReo DURING THE LOAD
LOteIVTE) DESCRIPTION
*
0,1
PROGRAM ENTRY POINTcr, NON-ZIRO
*
2,3
PROGRAM LOAD POINT
*
.o~ eM. IN PROGRAM HAMECt-2S)
e-t') PROGRAM NAM!
* CALLING SEQUENCE.
*
BL
'ABSlOP
DATA PARMTA8LE
•
•
JMP ERROR

SUI?
fU"S

**

lH I5r.J

•

St1QJ
0171
0112

0t13

•

0179

••

•

01,.
11111 !5
0176
0111
1118
111180

0181
0182
0183

·•

118.

01815
01815

*

0181
0188
0189
0t~0

IUJIl!

flFFF

lalll0

0201
0202
rl203
021.

02100
1400A
0008
000C

1211H'
0208

001C

0207
0208
0209

7F00
0A00

11011

0000

0210
0211

021a
0213
lDel.

lalts
0218
1217
1'11218

-••• * GETSIT

0000

0002

0004

CLR
OR

•
•
•OTR

RTS
CLAWRQ
CLRRRQ
RRQ
DCl
DEL
L~

CR

••
•ENTRY

LoceA
LOCC
L.OOpeD
LDPR8

RE!"
REF
RE,.. L.DADDR
EQIJ ra
EQU "-1

••• ,33 AIR eDNTROL & DATA EQUAT!s •••

!QU
EQU
EQU
EQU
EQU
EQU
e:QU
EQU
EQU

!QU
LOADAO EQU
PRGNM EQU

••
•

PARAMETERS •••

OfF .SSLOR
OfF ABSBUT
REF sveA!..T
REF L.OeSBe
~fF

(418 IS

(

..

~EF

"t~l

019a
0193
0t9.
0198
('H81
0t9S
0189

PAGE 0005

9
lilA

lIle
IIC

Ire
-1 Uill

",'00
IIl\!lA00
.. 0000

tRU OUT REAO REQUEST
tRU IN RIAD REQU!ST
READER "ON" COMMAND

cOELETe ..

cL.INE 'EED ..
ceA~RIAGe:

RETURN ..

••• RETURN PARM TABLE DISPLACEMENTS
0
2
4

••• REGISTER ALLOCATION

0415380-1901.. .

0220
0221
0222
0223
e224
022e
0228
il22'

0000

IH

0111~

R3

0004
00015
11I0e
01117

R"

£1228

010.

0229
02""

11!101~

el0A

tJ2i52

IIIDC
01IDO

el~H

02""
0234

12315

0118

"'Ute:

0001'

123ft

0231
0238

8239

ea4llt

1'241
0142
0243
e244
la45
12,.,;.
124'
8248
1249
12150
1251

0252

~0

el01
81112

0112
011"
01'11<4

FU!
RS
R6
IU'
R8

RI

AU
AU

Rli

AU

R14

Rl~
t
."

•ALA
fUHI

A8"O
ABYT
AL.DA

III!
GUile
0011

Xl'

1010

."
EO~

01101

PON

01.,2
0003
0004
00015
ellUS

PtiL

AlP
REA

CK$M

APT

EQU
EQU
EQU
!QU
EQU
EQU
!QU
EQU

0

1
2

"

4
I

6
..,

EQU
I!QU
EQU
EQU
!QU
EQU

.,
9

e:QU

1.
Ie

!QU

1(11

11
U!
13

PAGE 0008
TEMP(INlFT COUNT ItNOE)(tNGO
ADORES. O'~GIT8tT.
G!T8IT~eIT STAING DN N~ND
GETBIT.* OF etTS IN A2
GETtG TEMP(RTRN AOCR SAve,
CURRINT LOAD ADDRESS
REPEAT COUNT,NM8R CHAR
eLIMIT ..
T!MP
!NTRY POINT 0' L.OAOED P~DIRAM
«VALUEII
AUTO sueR. RETURN LINK.'!
CRUeAS!
TEMP
eCKeM ..
ABalDR R!TURN ADDR!II

I

***A880LUTE DATA FORMAT OEFINITIONS
e:QU
!QU

2
"

EQU
EQU

e"

EQU

1

EQU
EQU
EQU

I
1
2

eau
Eau
eau
eau

"4
"e

!QU

.4

R!LDC.AODR(UNIUPPORT!O)
R!L.OC~WORD(UNSUPPDRT!D'

AeSOLUTE DATA WORD(1SeXT.'
ABSOLUTE DATA BYTIC8 8XT.,
A80l8UT! LOAD ADDRESS
EXTEND!D TAG
END 0' M O D U L I £ " r c
!'ROIFfAM NAM!

~V

PROGRAM L.ENQTH(UNSUPPORT!O)
ABSOLUTE ENTRV POINT
REL.OC. ENTRY ADOR(UNSUPPCRTeO
CHECKSUM
REPIAT COUNT

c:

••

ARIOLUTI LOAD!R

l'U14

IrUle

lase
lae7

(~;

l.a8

1189
la80
laet
eaea
la83
la8.

1'"0'

11'
".
rUllla

lalll
11J8'

.0e.
aIle

leAm
IUUA'

IClHU

01'1HUI

eleA

10"

I.ee

ca4'
1311

eael eGlee:
eaee

la87
ea88
8ae9
la7"
a.71

la72
121a
827.
la15
la18
la77
1278

127.

(

eal"

lael
la8a
1183
1284
laes
1288

la81
aa88
la8.
la90

12SH
8282
118a

.a9a

1280

C
c.

•
•
••

II.ID

1111
Ill.

1.11 . IDOTI
1"'1

••

'45380-1111 ••
EQU

LX

•Rt,GETBIT
'Alii

DATA

I

JMP

•

MOV
JIQ

RO,RO
800Tl

8

.RI

8LW"

,e

••
•

•

I

Rl,GTtUT"

•R9R11 ,RtS
'lDtlSC

R:S
Rl •
.RUS,A8
Aa.l
'PRGNM CA"

IOU

I

112!

,.ce

ClR

Re

le:s.

C2e!

MOV

Rl.,R8

1131

1181t

I'~U

1If)

0135
013e

03

aae"

•• :se lel1

•
•••
•

•

BL
."t
BVTE CLR,:s

ex

"_PROCEDURE,ROM8UT
,-GITB!T , ACGITBtT)
ADOR. 0' GET8lT

'-tFCERROR1CALL SPINCS)
R!TURNS HER! ON A80RT
l-tF(PROG EP.NI.')
e.n4!N

a-GO TO cell"
I)(EeUTI PROGRAM
a-ELIE
a-GO TO 'RONT, PANIL
NO !p 'OUND~ •• TRA' TO 'AN!l

t-I!NOI'
",END ROMIOOT
i-IUBRDUTINE Ae'LDR
".INTRY POINT
lAVE RETURN ADD"
CLEAR ENTRY POINT
CLEAR ItT COUNT
CLEAR cHICKIUM

t-DO UNTIL END 0' MODULE

eeaE' A8el

•

PAG! e,e7

t-CALL ABILDR'.AI,

BL

l.t8' ABILDR !OU
LX
11'8 la81
le18 I1AI'
!QU
ealA' A811'
MOV
811A C3ce
CLR
lune '.CD
CLR
lei! •• 11
1120 I •••
CLR
0122 I.C~
011la4 •• C!
CLR
l,afS C11'
MOV
JIQ
0128 1311
eCIJ2A 14EI
CLR
IIZC ,ee4

ea94

12815

•

"Ul

1l18S
1287

••
•ABIBUT
•

RtIiII, )cTF

i_REPEAT CNT.e
l·_CKSMIOlD CKSM
WILL aET CLOBSERID r, 'TAG
IS NOT tKSM, AUT nOlaNT
MATT!R IN THll :CAS!
a-CAlLGITelTCVALul,a,CLRl
2-00 CAle:
:S-ClIDO VALU!~IQ~XTNDID TAli
GET A TAG IN R10
CHICK 'OR EXT!ND!D TAG

** AII'CLUT! LOAD!R **
IIlaA 18.,C
11381
*
l:Sl2 lilac .t81
lUI
flJI3 103!

1:S."

.384
831e
0311

1311'
830'
la,,,
.311
8311
1311
.313
131 ..
131e
.~ue

131'
I:U8

003'
110~UI

01 .. 1

ail .. "
0111 .. e
01 ...
01 .. A
IlII .. C

11311
lall

.a12
lal3

118A
"rltt
U'2e

C21r
131.
0218
1'84

11.1 ' 121'
e.,. 1117

'83Atl
3'"
83."
03 ...
1345
13 .. 8

8a .. ,

IN!

A811

MCV
JI!Q

••ue,RS

R',23

'"

BL
*Rl
BYTE CLR,'

•

AND! RI0,a-3"
MOY

Rtl,R,8

MOV
JICl

R8,R8

C
00'., 1101
JL.E
MOV
IfII' .. C18., ,
0fHUJ I AII10 I!QU
8NP'
"ICA
MOV8
00ee 010A

I.,e

188A'
IIIU

f110ee

010e

110e

Ifill!

e881

1'116

00

0871

01

el'l eeCA

101'
a878
ae18

••
.A813

•

.

•

DIIIA

lei' '"
18"

JUMP'NDT
•• CALL "TltTevALUI,",CLR)

!QU
DIC

JL'T

e.ellDa

VALU!.!Q~PGM

0

NAtefE

a.%F('ARM AOOR~N!~.)
,.PARM PON,PARM ADDR.PHMDIPL

ABel

LI

cal. '"

133 ..

laAt0

Rll,PON

•

elee

t3UJ

cr

!QU

•

'AGI 11111

... 00 CA'!

ABea
*

el3P
CtlA

1333

13118
.330

BL
*Rl
BYTE CLR, ..

R8",PRGNfII

011A

13315

AI13

AI

""e
I."

Ieee 8tCA

8338
13'"

*

02'"

01

lal8

a:S2a
1329
1330
1331
0331

.

"'1
10

(UII!

lal7

*
*

0112
100'

,3a"

132e

IN!

14

0'''E'

lIaiSe

.311

8.,e888.1'"l**

Aa'5

R18,R7

8.LIMI,.13
e.CALLG!TI%TCVALU!",CLR)
I.NMBR CHARIAND(VALUI,.'"

0 \'

1

v

I.Dor, PARM ADOR~N!~.
'.C(PARM PIN)INMBR CHAR

ABIIIII

,

IU,R10
Rtl

Rla,*R,.

.,
I

.

,.PA"" ·Pltt.P.R.M 'ON.l
'.00 WHILI(NM8R CHAR.O!.I),AND.
(L!MIT.GI.I)
I

~

•

.

,

He

A8.'

.Rl
8L
BYTE CLR, "

a.CALL GIT8tTCVAL.U!,',CL.")
, ;,

I.C(PA"M PGN'IVAL.U!,
PIN"ARM PGN.t,

• ..... P.RM

8"P8 RU'

Move

FHII,."'.

DIC
JH

"7

A•• 3

'.L.IMI,.LIM%,."

,0

PAGE 02100

•• A880LUTE LOADER ••
03'-8

rn40

(

001A

1202

•

03e,,~

13tH
rne52
IUs3
e3ts4

I

0881
00
07

51..

.Rt

0080

080e

0082

14FC

0~\e'

0368
0309

0084

(

em8A

Inee

IU8A

ex

RUJ,AEP

JNE

A8e8

81"

'GETU~

0003

0tSA0

008£

0114 ,

00SUl

C2 ••

00e2
0084

C21'

•
....

00g6

ceeS)

0098

10CA

.
.

MOV
MOV

.Rle,R8
A801

JMP

ABel

e:QU

$

eI

RUJ,CKSM

009e:

028A
000!!
180A

JNE

ABUI

00A2I

C20!

011A2
00A4

08AO'I
01104'

..
•

..
..

0380
03U2

...
..
..

0383

..

03e4
11.1385

..
..

00A8

£lAC!

6288

MOV

81"

0388
1380

'3ee BlUe

e-X'CPARM ADDR,N!,I)
8- C(PARM ADDA).EP

R9,.R8

00010' AfUU

009A

e-C2IDO VALU!,!Q~!TRY POINT

e-EP-VALUE
MOV

J!Q

l3CC

0~;1

c\

•

0381

0307

7-ENt'l DO'
"-END 001
IhEND ell
S
A801

0e8C

10ye

11.1382
0383
0384
0385

AB04

JMP

1807

a-CALL G!T8ITCVALUE.1,CLA)

S
R6

EQU

0311
0318
0319
0380
0381

•

EQU
DEC
JHE

00804' ABllltS
19004
AB07

~37P.1

10311
0312
21313
0374
031e
0316

•

...

rUletS
0088

'-END 00'
'-DO WHILE NMBR CHAR.GE.0

8YTE CLR,'

•.

03el

laoe

.

0080' ASIBe

03tH!I

Ine2

AEHUJ

EQU

1D31U~

(o3e3
(0304
03ee

J I.. E

007C' ABfU

03e~

"3tHS
0351
0358

...

•• NOTEISINC! .OF eYT!S SINC!
LAST CK8M MAY BE !lTHER EVEN
OR OOO,tAND WE DON" KNOW
WMICM) •• WE'LI" SETTLE FOR A
MATeM-UP ANY WAY WE CAN ~AK!
IT MAPP!N

8_XF(NOT(T!MP.!Q.VALU!'~ANn~

CI"R

C

RU

RS,RU!

ee-

NOTCIMCtT!MP,8).EQ.VALU!)
ERROR RETURN
CLEAR CMICK.UM POR N!.T TIM!

*.

0 .. etuO.OI01 ••

ABSOLUTE LOAD!R ••

0;598
0;590

0400
0401
{Urn

fiU}A.
IliAC
00AI

13Cl

0082

1004

eecI
8288
menul s:se!

111403
lUlU

041f!!

0084'

i4rae

04ill1
0418
0410
1411
e412
rUt3
0414
04115
0416
11141'

0081

0418

0aCA

121 121 IU

001C

lece
ItU,IC2

(/Jece
"4al 00C8
0eca

eDCP'

e423

•

IUllU;' AI11

eeCF

(ue,

IN!

MH2

INCT RUS

EQU •
INCT R15

!QlJ

I

02814

ex

Rta,RPT

IN!

A611

•
•

001e
lttP!

0681
0121
01

00;S,

0428
1421
lUIS
0410
rU3121

•

•

11433

1434
e43f!!

MOV

SUCCESSFIJL. L.OAD
M!R! FOR ERROR

,.eeIDD VALUE.!Q,R!P!A' TRtPL!
UNSUPPORTED e.TIND!D TAG
e.CALL G!TaXT(VALue.1 f CLR)

....
,....

,,,...
.
..*.
.'U

BYTE CLR,3

ealA
usee

fleD.

laAe
0122'

EQU

•

eI

FHI,A8wn

IN!

AIH!

BL

'GIT1S

."

ellHU

rUl08

0QlDC

a.RETURN

I

BL..

.439
1"'4121

fllDe

S.C ... DO VALUE,EQ,aND OF MODULE

S-CAL.L .,TISeVAL.UI'
5.00 WHILE RIPI.T COUNT,NI,'
'.C(CUMR ACDR),VALUI
'.CURR ADDRICURN ADD.a
,.RIP!AT COUNT.RIPIAT COUNT.!
e.!ND DO
'.END ce
, •••• II/OTE' IN TH! INTIRIST OF
THE COOl FOR TH! AI
18 INCLUDED IN TM!
PRDCISSING FOR A810
DATA T'HIIL.!T'.

."

00D ..

e.ehD C!

R111,IUI

••
•

elD0
oIIlD 2
0003

1441

BAD CM!CKIUM,,!RROR ExtT
8.!Nn x,

AND I R6,"3F

."

111436

CK8M OK.PRcrl. NIXT DATA

'c'"

';

BL
*At
8YTI eLR,1

••
•
•

.4~1

CK8M OK.PROCISI NIXT DATA

S.!ND C4

."
."
."

I·na

e444
e44!

R10,iOr-t

leCt" A812

02.e

14a15

, ... 3

eI

tAt!

CUfA

e424

lu .. a

I

a

842a

0431
1 .. 31

EQU

."

001514
1210e6
0088

14(U

1419
041e

•
•
AI510

J!Q ABQJl
SWPB R8
C
R8"ue
J!Q Aiel
JMP AS 11

PAa! 0121e

•

A.END CASE
S.CI.OO VAL.Ur.!Q,AI. WORD

... CALL G!T1S(VALUE'

-

,,';

•• ABSOLUTf LOADER

.

lAtH'
0A.'

(

IQlDE' A814

..

rUlu

0A49
0A150

III (liD!

COAl.

001'

II.IlHIJ8

IUSl

0.52
04153
rU154
0415t!!
eAS8
0457
0458
04S9
0480
"ACH
0A82
0483
0464
046'

("ee
0487
rue8

(

0469
0470
0471
1472
0413
0474
04715
(0478
0477

•
•

115FO
10A4

00EtIJ'

00Et5

028A

IUle

000~

••A8115
•

A-OO
EQU
MOV

FUe,.R!.

eEC
JGT
JMP

R8
A81A
A8frH

S-MIPIAT

EQU

•

CI

IH0, AeYT

JNE

ASH!

eSOl

00ff'
00E'"

00

0Q1Fe

001A

00F2
00'4
00'15

0801

00'8
00'8

SAIA
004A

00'A

1(1190
00FC' A818

JMP
EQU

•

028A

CI

'He,AlC.

JNE

A817

BL

.GETte

t

Fr

Ie

0111QII5

r/l48~

CHI2

RltUtll

IUIA

0122'

•
•

.

..

itS 0.

0t08

Ct4A

0108
011A
allC
010!

C2l'

0110

UJ8E

'*

*
*
*

13SH

leca
ceeA

0112 ,

0112

•

1004

•

.'III
A811
.

REP!AT COUNT~tn .'

e-CCCUAR ADDM),VALU!
5-CU~R ADD_.CUR ADD~+I

tH!JEC

0t5

w~ILE

$

lfH4I

•

PAG! QlIIH

OAI5389.SHIIQll··

00EA

0"8

0481
0,U2
0483
0484
rU85
il48f5
0481
0.88
0"89
049111
1'91
0482
14g3
fUg4
e.g!5

C

00£2
(D0!4

10Ft
00'1
0U10

fU1g

••

COU~TIR!P!.T

COUNT-,

A.END DO
3-I!NO C2
3-C3IDO VALUE.eQ.AS! 8YT!

4-CALL GITStTCYALUE,e,CLR)

• flU
8L
8YT! CLR,e

A_VALU!,8RL(VALUI,1)
SRL

R10,1

tRl
BL
eYTE OR,!

SLA R10,8
Mov8 Rtl,.Res.
A801

4-CALL G!T!tTeVALUI,e.OR'

4-C(CURR AnOR).8HL(VALUI,I'
.. -CUR ADOR'CURR AODR+'
IQIV TO SL 2 • aWPB
3-END C3
3-CAIOO VALUE.EQ.LOAD AOOR

4_CALL GETtetvALUE'
'.IFrpAR~ ADOR.N!~0'

4_CUR.ADDR,VALUE
MOV

R10,Re

MOV
JEQ
INCT
MOV

'IIIR1!5,Re
A801
Re
RUI,*R8

JMP

ABill 1

EQU
JMP

S

4-

e(PARM AODR.LDPT',VALU!

3.!NO C4
~-C!5.DO VALU!.LT~ ••

4_ERROR RETUAN

AB11

IF VALU!~G!~4, W! WDUI..DNT
Bf: HERE

•• AB,OLUT! LQADER ••

•

PAG!

'.t"

t-END AI'LDR

~.'",.:

V

GIT VALUE 'ROM DAT. ITR!AM

'.'9
IS80J
C'""

mDru
1582
8s83

aeru
Ieee
IDee
1(5117
IfUl8
8fH'I
85l!11
8t511

flJl512
8tH3
1151'
'~He

ItH8
ee17
1518
1519

.eae

(

c

•

8U'

1116
eU8
0UI

rlUA
laUC
111!

8121

1122
flJt 2'
0128
0127
0128

flJ12A
rU2C
0120
,U2E
01311
8132
0133
11~U

8U.4 , GIT11
Ctl!
eell
10
rI:5

118A
811.4
138~

llCO
fU2R' GITUS

'.8381.,001*.
!QI!

•

,nus

l-SUBROUTIN! GITt8

MOV RU,R'
.Rl
BL
BYTE 1,3
Cl

R10,A8WD

J!Q
JMP
!QU

GIT11.
A811

•
Rl1,IU
!QU
e124' GITtlA
•fIJ,e
1811
8'111
cu~e

PAGE

MQV

BL

••• ENTRV POINT •••
IAV! RITUIlfN

.fltS

lUI

815
,11A
SRL
11210' G!TlIA EQU
8L
fUSll
BYTE
Fr'
17
SRL
811A
BL
lIuse!
BYT!
FF

.1,e

1.54

tR.

Ie

.

8

RU,l

•·"1

.1,7

R1I,1
.Rl

DX'CARD TAG FROM NEXT CH~
& OR IN NIXT , lIT.
DISCARD TAG FROM 3R!) IYTI
& OR !N NIXT 8 BtT'
RETURN TO CALLIR
t-END GETtS

PAGe: .el.

•

.513

Isa4

113e' GrTSIT EGU

.

151S
1518

"'7
1'18
1510

153e

.SII

lOll
lUllS

15a4
85315

IS3e
8537
1538
81510
1540
.541
e541

1118
Ille

IIIC
Ill"

IlIA
IIIC

lDID
IOtA
IDle
lDIC

1111

IIID.O

880

sao

S80

0141

188E

MPV

Rt4,R2

fU4A

1111

L.t

Rl,GETITI

114C

1188'

EQU

•

It.E

018e
0151

•.

I.cm

CL" R"
STCR R0,7

1280

IUSA

IAI0

It5C
Ill!
01ee
1182
lI18.

15CQ)

13FI

III'
7FIIlI
1815

••

rue.'

..a81,41

lie,'

Gllft

IEIC.

I,e 13
1!0t4

rllt 86

0 US8

lFIC
le'E

I158e
ISO'
01el
05eo
"5711!1

It8A
Ilee

lece

fa O!

118!'G"fI
11'"

11711

I.C"

eDI0

.
•

l-R! ENTRY,ArIETSI)

t.

sez CL.ARA;

0114

1.CKSM ... e
'-INDITS ••
1.!N!hQl

lEIC
1110' Glru
l"IC
18F!

.

I,. alT ,caUNT.,

Ins

LOCR R2,8

114!:' G81H

0.·.··

CLRW";
CLRRRQ
RI,OCS

UI"
321.

1156
0158

eees

DTA

LX

1552
111553

1'5e
1559
.S10
laet
eeel

seD

•

t.aUBROUTINI ~1.T81T
••• ENTRY POINT ••••
INITIALIZe: GITIIT VARIABL!S
•••••• TART INPUT .TRIAM •••
,.CRueAse:"!,,,

0.1.

15fUJ
1551

15D4
15515
1118
81517:

•••

014"
0142
0144
1146

151541

111544
111845
15.8
1547
eS48

•

EQU

T8

JNE

•

ARG

G802

CI

Re,L'

JECI

GBII

CI

,RIl,OEL

JNE

G818

Eau

I

SBt

CLR"FtCl

18

RRO
GtuU,

Eau

IN!

•

CLR lUI
STCR RI,"
EQU

CX

•

Re,eR

• •• NEwRECORD •••

e.oo WHILE CHAR.la.L'
CLEAR RIAD RIQU!ST

WAIT POR RIAOIf
S.CIofARtIN'33

o

a-END DO

t.t'(CH.R~!Q~DIL)CHA""tN~13

••••••• GITCHAR •••••
HIR! TO G!T ANDTHI" CHARACTIR
CLiAR RIAD RIQUraT

WAIT 'OR CHARACTIR
t.CHAR" IN7:S3
GIT THI CH'R~
'ROM THI CRU
t.IF CHAR.IQ.tCR' NIWR!CDRD
CHICK POR IND 0' RICORD
IF EOR, GO ITART ANOTH!R

i'

GIT VA". " IUTI P'ROM Alllt733 '.5380.0101 ••
JIQ G811
1511 8112 131D
1072
t
)(OR RIlI,IU.
1.73 8t1. 288m
8111P8 RtA
eD1' fat7S ISCE
fUS15
1.7S 8118 8AII *
aL' RId
15,,· 117. cllIca
P40V R3,A3
JIQ GBeeA
1878 It7C 1301
8870 117£ AlUla
R3,"0
8RL FUl, Ae
088'" Ite. IDIII
EQU I
eS8'
e'8.' GIUlSA .oe
RI,R2
0.la It81 1.80
t
1583
R3,1
AI
IS8. 1,8. 0223
111& ta.17
858e
!(ue.' G!T!Ta IOU
IS8e
1587
1.8.
MOV *Rl1,""
1.10 1118 erue
Mova RI,RI
188" 818. 0080
IN! GB07
IS8t IllC lell
1882 11l8! fUCA
CLR RlI
8583
!QU
IS8 ..
lurUI' G81'
1.85
le8.,
IS81 IUDIJ 5010
SZC8 RI,RI
Re,R3
le9S Its. slce
C
JM
IS80 118. lB£7
G81A
leI I
lell
ISII2
Eau
018." GBI8
0el3
lei ..
leiS rU8e "AlA *
ILA R10,1
8elle
SLA R2,t
lel1 111188 0A12
1.,1'
JNC GBeO
lelO eUIA 111t
INC Rll
1&10 1II18C "seA
EQU
leu
018!'
0ela
DIC R3
8e13 Its! lela
lel.
leiS 11AI lei!
DIC R0
l&le
JH
GBIIII
8e11 ItAI 18'0
8"11
INCT RU
le18 11A4 Isce
RT
I'll 11"
"IB

··c'

•

•

".1

•
•

•

.(~

•

•

•

•

•
•

G'.'

\

.... ,

"

" ;ti

.

,

1

"
.

".

c'
'

"'

.

•
•
•
•

•

PAG! lIt!
AICOAD

1-CKIM.CK'M~~OR.CHAR

1.csa'CNC(C8S,CHAR,CIC)
LI'T JU8TX'V THI a DATA
AVOID teetT IHI'T

~IT'

NON,Z!RO 1M COUNT IN Re
IMIFT CHAR BY NO 81TI ON !llANO
OR IN NeW 8tT'
t-cac"cac.,
UPDATE CURR arT COUNT
1•• • •• IITITa ••• • •• •
•••• !COND.RYINTRY POtNT
1.IF (MOD!~!Q~CLR)'RII '.- .

G!T P.IUMITIR8

JUMP t, Ril HAl GOCO DATA
ILl!, CL!AR OUT TRAIH
l-rF(RaC.GT~C8e'GITe!llA"

CLEAR TH! MODI'LAG
CMPR RQa, Ta eXTlaN HAND
JUMP TO lIT MCR! ItT'

1'.00 WHILIRBC~GT~.

I-CALL alA CRal, 0
I.CALL ILA (Cel, 1)
l-t'CCARRY)Rel.Rla.t

l.caCletc-,
I-Rle,Rec.t
D!CR f't!QUII' COUNT AND
l'-!ND 00
RIPIA' f' NCT DON!
I-R.TURN
%NCRIMtNT R!TURN AODRI"

,

.

.\
;'

PAG! 0118

.,
.,

~622

eea41
16aD
eeas
8621
8S28
08ao
eear/!

ItAI'

IU'~H

0e31

IS33
1118341
863e
frH536
1631

~.

a.PROCEOURE I.ET IUT c. MON!T""
a.,GET eIT PROYIDEI to
a. FOR THI A8ILOAD!R. TH! O'EN

'U'~~

.,

tl6R!

..
..

33-

3-.'
!QU

..

0 tAl
elAA
0lAC

MOVe
lSll
IN!
IACA
CLR
01A!' LDI010 EQU

0f5;SO
118410

01A!

D"Fe

0180

098~

16412
0643

81BI

1821l
0020'

rU38

le41

1844

018 ..
0188

DI3e

..
..
GT8tTM

IUB8
fUIU

le4ft

1840
0680
0601

0882

",Us 0 3

,us 0 ..
16eas
0e5S

Blec

018!
01C0
01C2
01C4I

MOV

'LOCllA, lUI

rU1A
D18121

ILA

RUI,l

IA12

aLA
JNC
INC

oEU59

06el1l
B8tH

0681
le63

lee41
eeee

Ieee
lee1
le81
0689
8810

.,

•

l1r41

IUC.

1813

11CA

1011 '*
JMP
BICC' LDI04m IQU
062121

01021

0000
110'

1101
01D4I

0tD8

011lO'.I
000'
CIS0

rUDI

1184'

a-Do

WHIL! RtQU!ST BIT COUNT ••
CALL+I • REO elT COUNT

'-CURRENT eIT COUNT!, CURRINT
'-CALL MOYI BtT(RITURN VALUE,C
.•~.

Mova .RI,HI
RI,l

01ce

11CC
01C!

0'

'aRETURN CALUI ,
CALL.!I CLIAR FLAG.

.1f"

058A
01CI5'
0"02

~651

0858

aaXF CLEARFLAQI' TH!N

Drc 'Locese
LOI04111l

C020
Ifll"

TH11 SUBROUTIN! II

•

JLT

.,6 .. 8

0648
rtJ641

.Rlt.,Rm
LOl010
R10
•

Mova *Rl1+,R3
SRL R3,8

018;' LDI020 EQU

uru

•
MAY USE R0,RI,R3
NON-STANDARD.

HAS e!~N PROCESS!D BY TH!
DRIVER •

EQU

.,

Move

L.DI030

IH0
I

R2,·Hm

DEC

•

.,

•

•'*
'*

t

LOlle"

,-RIQU!IT erT COUNT • RIQU!IT
a-ENO,IL.81

$

DEC

'Loce

JLT

LOllS"

LX

lUI, 1

MOV

Rm,'LocBet

S-CHAR COUNT.CHAR COUNT.',
a-CURR!NT BIT COUNT , "

S-tALL .LACeURR BU"

,

AODR.C".~

e-CK8M i' IIIIPSC
S-CHECICIUM , eWpeCCHICI<8UM,XOR
e-CURRBU" ADOR.CHAR))

SIT YAR. • elTI 'ROM AIR133

(- ,
.'

le71
.872
111873
187.
ae71S
1878
1871
1878
187D
aela
lell
ee.2
le.3
le8.
ee85
18.8

lel1
IS88
lelD
leDI
ae81
8882
.

(

le8S

I1DA
IUDC
rUDE

•

CIIClI

ItDC'
ItEI. 08C!
111. OIlHUI
IU:. ID82
It!8 2B82
IlIA IiIADI
ItlC D.IR
• U:II

.
.

INC

.LDC8A

MOY

'LDCBA,'"

awp, Rt.
Mova .RII,RI
aRL R2,e
XOR RI,Rt.
aL.A RR,O
Move RR,.Re

It!1

JMP. LDllee
111'
liFe' L.OIIISI EQU I

1111'1

lale
IDle
De8"

It,a
81'.
Il,e
11'8
01'A
liFe
atFe:
0210
0111

fIJI ••

C01A

lal.

•

IIe0

ClIe
1.1 •

IIec

1111.'

..

11£0'

lar.. lel0

MOV

RUJ,fUI

L.X

Rtl,L.CPRa

MOV

DIC

'..

•

R0,IHIII

MOV. 'L.DADDR,'L.OCaA

ADDR '. CURR BU"

A

OtlCARO H!GH ORO!" IXT
•• INc,ILI' 01'
a-LOAO

Pfua o,CODI '. 'RIA""

!-CALL IVtCIVCCALL BLOCk),

a-CURR au"

ADCR

'LDCBA
•• !NO,
I_END,

lae!' L.DUJelll EQU
MOV
ceca
JOT
1501
'.Ie

R',.IDII

e-CURA BU"

BLWP .aveAL.T

a.20

I,ee

CIII

LX

PAG! 1111'

Move RI,'LDOPCD

•• 10

•• Ie
821.

.'84
e'8!
le88
1'81 eale:
le8a la10
le8D
1111 e212
I'lt
•••• IRS

c'

le",0
IUBA'

l.eSIO-Dllt.·

RT
!ND

I

RS,RS
LcUlatl

a-e:ND IITaITH,

" L.OAO!R au"

,

945389-9901 **

08e • D••

•

.."

A.'.
Aell
A.la
A.I.I
ABI3
A....
AB.S
Asee
ASI'
ASII
AS10
A.ll
AS12
AS13
'11'
AfUIS
ASUi
Alii 1
A.laUT
AsILDR
AaWo
AeYT
AI"
ALia

.

,

CONCORt'ANC!
1255
rnse
1.75
IS81
le31
•• 5'
.2841
118'
1"1
lIla
1311
1119
IIS1
01.,
1335
lUlU
011S1
ruDe
1111241
1362
0131
0301
031'
e3751
0311
038.
0'1&
0.02
."11
0AUS
0.Ie
IU40
030.
0.411
0.IS3
ruts,
0•• 3
0.80
1"5
rU83
0'71
IU5S
0118
11175
018'
12411
~"I
18.1
0.5'
3111
la4'
0•• 3
0',1
111171
02815
0111
el51
IUle
0a08
011'
011a
"saa
1218
08"
1216
0535
lal7
1455'
1201
0531
0113
1248
134111
e,.3
;;"5.
es.7
iJS41
01150
id501
eSI2
0815.
11150
~5S8
eSIl
13878
050.
13501
01582
0817
leu
138eo
0513
ca •• s
ra587
8510
011'
0seo
0S8e
05a.
1'41151
eSle
0s.e
1828
0278
(UIS
ISOl

100TI
eKIM
CLJC
CLRRRQ
CLAwAQ
CR
OCI
Ol&'
OTM
INTRY
10M

;1"1

GSI2
G8.'
G8115
GaelS
GallSA
Gal7
Ge8.
QefU

GETllA
GITle
GITlI
GET18A
GIT81T
GITeTe
GTBITM
LoDAODR
LoOCSA
1.0CBIC

I'"

ruoe

1.,5

luea
lau

080'11
1880
la03

1.,7
14115
.0151'
0SIl
0aS9

11383

8310

e",

la8a
0382
0.03

03'0

12.,

PAGE 18

lal9

1315

lern
ISl8
1882

1813
l.t5
IUU3

150.
flJI'8

0!J2'
081a

11141"
flU!i4Ia
1118H

III.

fl.tU

8411'

I""

I.U

0 •• 0

1181
"87

IS.'

;

0

i

.e2.
1'8.

la4l8

--------

------~

.---~~--~--

~

----~---------

,

(

0~U8

lAO'

l'fl8

rl5l'

0

"

1313
e5A15

I~U'

1581

.:Uft las.

•• 83

fUle

"'11

rI ..

8'71
1."

. ,
~,

IUlt

1386

C

.,

'''02
ee47
0280

08,e
e843

0e'3

e812

,

let3

:i·

06a8

!
':'~

"-

I

-_._-

~-------

--

-------~-"-.---------~~--~~~.-

"

.

PAGE 19 of 19

945389-9901**

('

1..0CC
1..01010
1..01020
1..01030
1..01040
I..D 10tH!1
1..0112180
I.DOPCD
I.D'R8
I.'
I.OADAO
Oft
PGI..

PGN

IIRGNM
A0

Rl
IHI

0192

tl8~7

0ege

0e41
0853
0e'9
0882
0eg6

0MS1

Q!e4"
fat5e2
121658
01g3
IU94
015153

011118
IU14
0197
0248
0247
02115
0220

11130S
0285
0551
01579
Q1eg8
08715
Gl2S"
0.4e2
e29g

0221
0230

(

R2

0231
0232
0233
023.
02315
0222

A3

022:5

IU

022"
0225
121226
0221

Rte

Re
R6

R1
R8
R9

REA

0200
0239
0252
0205
0202

RPT
RFtQ

RT'
SVCAI.T
)(TF
T~!RI

0282
027'
0153e
0816
0281
0858
&!J!HU

04e0
02e9
03115
0283
0314
02e'

0229
02A0

RI..A

0'42
01504
0888
121218
01529

0228

ROW

rUi'

0eAS
0532
0189
0299

e2A~

ARE

0681
0eae
0688

0 .. 68

ra'4'

Rll
R12
R13
R1A

0e51

0e~~

0094

0312
05152
01580
116115
0619
0216
Q!4S7
0308
eS6e
04150
0512

rusa!

01501

0201
0283
0536
''''1
0571
121601
01509
0472
0321
0326

tuee

0376
0284

0!5e3
e689

SYM80LS

IU5153
058111
083 ..
08e.
0291
0502
0320
0371
lt4e9
01518
0890
111508
038A
0310
0fS40
0878
0511
0891
0519
0A83
033(5
0328
02SH
038'
028e

0ae1
0!582
Q11S,.,

0!5Se
01589
Q1tUSl

0302

01513
01591
Q1ses

0S73

rn·e~

ru20

0431

03~H

0"7
0483
0848

034S
IUI3
0'88
06152

C!lfJ'~

0e11

0321
0381
fU85
01592

0311
051'
032S
039,.
0471
080e

0!542
121330
0.m1
041'
121838

01589

0819

01$34

0839

ee!e 0ee8
0!510

039ft
0314
0ea2
0679
0519

0513

0e7~

0A1Q!
0801

04112

0413

08A9

01584

flH5~1.!I

01518

llle1'"
01590
,use

0ee1
Q1e90
08154
0(1190
0339
0511
0328
11'00
0472
0eu

1111597

065~

0A.e
0seA

IU'"

01598

0613

0830

0tU0

03iH
0481

0'88

03157

0423

"'424

0452

03.6
2131121

0312
0399

0219

0371

0323
0400
0378

lua3

0~91

0485

rn4'

C·'.,\.
"

i
i

•

Al
APPLICA TION
NEXT ASSY

Ln.

USED ON

REVISIONS
APPROVED

OATE

~ION

7506

(,

"

(

.

.
REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE_ISE '~ECI,"IED
DIMENSION' ARE IN 'NCHE.
TOLERANCE.
ANGLES!: 1 •
• ~LACE DECIMAL~.OlO
2 ~LACE O£CIMAL~02
IDENTII'YING NUM.EItS
.HOWN IN PARENTHESES
'"OR 'tElfERENCE ONLY

"

INTERpRET OWQ IN
ACCORDANCE WITH
MIL·'TD·IOG

[~
C"''''~
ENGR

V

NO'
,if

/"'/

/

/

'""-

~;/

APYO

OE.r

".-•• u·.

~

QA

CONTR

-~

DATE/

ACTIYITY RELEASE

~

TEXAS INSTRUMENTS
I NCO"PO" A' E D

0",,., T_...

Equ;pm..r G-.p

AL, PX9LAL, LINKING LOADER MODULE-PX990

'"

"-

SIZE

CCXlE IOENT NO

A

96214
I REV.

SCALE

+

DlltAWING NO

945390-9901
SHEET

1 Jlf 47

PX~L'L

• 'HI3

lar..

e008

ruuus

8001
1008

ruuu

fla10

8011
1012
8013

10114
0015

1016
101'
1018
0019
0020

••

• LtNK ANO LOAD

*
'* TtTLE'
*
'* RIV1IXONI
*
'*

..
• COMPUTER'
''** ABSTRACT1
...,

.,.
fI

*
•'*

P)(tLAl..
l.INKING LOAnER

"0', .
,'.

a5/01/'"

ORIGINAL

0~/'SI1e

Moot'l£O TO BE OVERLAV COMMANO 0' ,WgMTR
99',111 ASSIMBl.V
P)(9LAI.. XS A VERSION OF LALO.e MOCX'XED
To RUN WITH PXtMTR, tHE PROTOT'PING SVIT!M
AND 133AS~ PROGRA~ OEVrLOPM!NT SYSTEM DEBUG
MONITOR
P)(8LAL LO-DS OBJECT MODULES INTO MEMORY,
PERFORMS TH! LINKING OE'INlb IN 'HI
P~OGRAM MOOULI8~ PER'ORMS THE ADDRESS
MODIFICATION FOR R[LOCATA8L! eOOI, AND
PRINTS A LOAD "'AP.

o

.i
I

.
"

'

DATA BAI!

(C
,.

~4e3'UI.0901

0023
1024
102!5
002ft
0027
1lI021'
0020
0030
8031
0032
8033
8034
003!5

'" TITL.Ea

'"
'"
''""
'"

(','

..

,

, 'r-l

<

.c

lefU

~0«5'

0e015

"0ee

10ee
0007
0008

00e7
0068
e0C50
0070
0011
0072
111073
8074
007f5

8"8

000C

0000
110!':

RDRBF

...,

ERROR,USRPC,lNIT,L08UF,GETMEX,PRCRL',SVCALT
LALC8R

MAINWP REGISTERS

0011UJ

""«52
(0063

..,06(5

..
.
TEMP

REF
OEF

.INPTDSwP

0002

'PlC9LAL'

EXTERNAL REFS AND nEFS

000!
0004
001HS
0"0e
0001
0001
0(011)
000A
000C

0001

0002
000!
0004

~06t

lOT

EQU
EQU
ESTPT EQU
EQU
IVMP
ENTpT EQU
ENTVAL EQU
PRNTN EQU
EQU
'PTR
EQU
TPPT
UNOPT EQU
lOP ARM EQU
'FLAGS EQU

0000

~057

005'"

03/115/78

'*

00155

00158
00150

REVISION. 015/01/74
ORIGINAL

'"

larUe

1041
0048
0rUg
00150
0001
10152
0053
00154
005e

OAT8S
DATA IUS!

..

0037

."46

PAGE 0IUJ3

MODIFIED TO RUN WITM P~OMTR
COMPUTER I 800,000 ASS~MALV
''"* A8STRACTI TMIS OATA BAS! CONTAINS ALL WORKSPACE
REGISTER !QUATES, ERROR MESSAGES, AND
'"
MISCELLANEOUS DATA
'" CALLING SEQUENC!' NON.CALLABLE

0038

(4030
804Ft
8041
8042
0043
0"44
1"0415

••

III

1
2

3
A

15

e

7
8
g

10

12

REGIST!'"

EQU
T&FLO EQU
81_8
fQU
NEwLor; EQU
LOCPT EQU
EQU
IVPT
EQU
HLe
FLGVL. EQLJ
EQU
PC:
EQU
LOPT
EQU
INCP
INIIO EQLJ
EQU
TO AT

.,

1
2

3
4

5
6

1
8
12
13

14
115

LOWP REGlSTf!IU

.e00

.
..AD'"

'UUU

'8T

1

00~'

EQU
EQU

I

DATA BAS!

VJa"

g4e~90.9g01

0002
0003

PTR

~018
~079

0004

8VMS

ilea0
0081

000~

TMP
LOC

~0~2

0001

BRSII'!

i1l663

"'alat

0084

0005

000C

0"8!IJ

NMMSG
IoIExP2

...
...

il086
0087
21081'

0(110'~

0089
00$,1"
00!H

0"'0t

EQU

NaMe!..p EQU

•

CI
182~

0S21
0S22

(9/H)

."

0801

fU06
0601

INVALID LOAD COD!
INVALID LOAD CODE
R!LOCATABL! LOAD ADDR!SS
ABSOL.UTE DATUM
R!LOCATA8L.! DATUM
L.OAO BIA.
!RROR
END OF RECORD
REL.OCATABL.! SYMBOL
ABSOLUTE 8y~80L

."

eeSH
leQ3

TAG!
TAGE
TAGA
TAGe
TAGC
TAGO
TAGE
TAGF
TAGG'"
TAGGH

IIHH1

ilRIU

028C
02BE
0290
02g2
0294
0296

042Pl
~421J'

INCREMENT POINT!R PAST ENTRY
TO IGNORE SYMBOL TABLE TAGS

PROCESS MODULE lOT el)
MOV

BIAS"LoePTR

GET PRESENT BtAS

MOV INSIO,INSID
JNE TAG0B
BL.WP 'LOR

PRESENTLY tNStDE MODUL.E'
YES • TEST t, PROPER
NO • PROCESS tOT

JMP

EVIT IF MODULE FLUSHED
IF ERROR, EXIT L.OOP

e

DSP!XT
'ASK

,OIflO

INC
JMP

TAG~CN

CONTt~we

0fiA0

ElL

,CONVRT

GET CONVERTED VALUE

1C11U
~460

012C'
11l58!

0~F2'
0 1 0C'

AFle:5
0402'

02g8

gRIll!

02g.
e2ge

0~08'

130:5

•

."

INSJa

SET INSIO! MODULE FLAG

DATA NWLOC
A
NEWL.Oe,-NWBfAS

ITOR! IT IN L.OCATlON TEMP

CB

*tNPT,'8LAN~

IS tDT NAM! BLANK

JEQ

TAG0C

YES • CONTINU!

MISSING ENO STATEMENT'

LOAD MOaULE DISPATCHER
1623
0624

062e1
0626
062'
0628
(11629
063A
0631

RHUHf

01UU

02Afi'!
02A2

230~

UlE:!

TAG0C
02A.4
02A6

prf'FC

02Ae
02A.
02At

0220
01110C

0220

'*

.,'*

0633

. rae;u

0636
163'

rU;;'8
0639

164!!
0641

02AE
0280
0282
02BA

0ACE
0AD~'

0582

0286

,nlm

02B8

0tOC'

0213.

0380

164;4.

02BC

Cl12

0649

0652

0653
0654

028£
02C0

02t2
e2CA

0Rce

00AI'
HIlA?

*
eRce

Cl82

a6159

16tH

0fUII

lee4
lee!

16ee
e881
eee8
le89

eRCA
0ace
e2C!

'*
'TAG3
*

't*
'TAG4
*

t"sem
e6e3

'*
'*
'*
TAG2

00A8'
A8QH!I

fUll' 6

Lt

IOPARM,,",S!ND

JMP

ERFl

AI

c
AOJUST POINTER PAST LENGTH

AI

INPT.t2

ADJUST POINTER

JMP

CMLP

GET N!XT TAG

IND MODULe: ci)
Cl.R
A

INSJO
'NWBIAS,BtAS

CLEAR INSID! ,",OOUL! FLAG
ADO IN NEW etAS

INC

BIAS

ACCOUNT FOR

ooc LENGTH

LWPI OSWP2
RETURN

0690

flies!

0851
0858

DSP!XT

*
'*
*
TAIH

0e4'
0648
e6SClt
stU, 1

BKOUT

A0A0

ee42
le43
0e45
1648

TAGmeN

1~e4

0"32

0635

'*

0890

IIDC'
A0ce

GIT
MQ'I

RILOCAT~8L!

ENTRY ADDRESS (2)
tf'"

IUA8,HLO
,

'v

GfT ABSOLUTE ENTAV ACOR!SS (1)

BL
-INCP
DATA ENTADD
A
HLO"ENTAOD

TE8T INSID! MODUL AND CONVERT
PLAe! IN ENTAV ADOM!S!
ADD IN Of'PS!T

JMP

GeT NEXT TAG

CHLP

GET AlLOCATABLE CODE REP (3)
MOV

BIAS,HLO

SET R!LOCATA8LE O'PStT

GIT ABSOLUTE COO! R!F ,.)
Bl.
'*INCP
DATA NWLOC
A
HLC,N!Wl.OC

T!ST INS!DE MODUL AND CONVERT
PLACE IN NWLCC
ADJUST WITH Btll

t
t

0200

ClUl0

0202
02004

IADA'
0420

'*

PROCISS REF CHAIN LINKAG!
MOV

INPT,'NSMBL

BLWP 'SRCSYM

POINT TO S,MSOL NAM!
SEARCH SYMBOL TASL!

c

PAGE 0011

LOAD MODULE DISPATCHER
020e
flII511

020~

01572

020A
0ROC
020E

01573
0674
IS15
1816

laEP!

02£2
02['02Ef'I
01!8

1671

!lI157!
01579
I158A
188t
11582
01583
01584
0685
1886
01S87
11588
01589
(IIl5g(ll

01591
1692
1693
11594
168!5
,,1'596

fIIIS97
01S98
0S99
il70(11

02EA
02EC

eREE'

1112F0
12F2
02F4
02'6

0ese'

f11707

07,9
0' HI'
0711

01U!
1713
0714
0115

07UI
"717

IF NOT FOUND, ENTER %T
AOJUST POINTER
POINT TO NEW END OF CHAIN
IF ZERO, NO R!F, SO END PROC

0 .. 20

0e.0'
C11511l

MOY

fl8VMBOL.SYMN~.SYMN~,SVPT

DEC

flSYMSOL.FL.AGS.FLAG8

1100

JI..T

FXRF

IF OEF, SATtSFY CHAIN

AlIC
CUU

A
MOV

I..DPT,LOCPT
-1..0CPT,HLO
ENDLPP
HI..D,1..0CPT
L,PFXR

POINT TO ACTUAL, HEM AODR
GET NIXT CHAIN!NTRV
IF ZERO. END OF CHAIN
CHANG! LOCATION POINTER
CONTINUE CHAININQ

LOPT,LOCPT
*aypT,-1..0CpT

JMP

NEWL,OC,-SVPT
CHL,P

POINT TO 4CTUAL. HIM AODR
BREAK END LXNK
CREATE NEW LINK IN SYMBOL TAB
END PROC. GET NEXT TAG

MOY

*SYPT,NEWLoe

GET VALUE

A

LDPT,L.OCPT
*1..0CPT,HLn
NEWLOC,*LOCPT

J!Q

139.A

GET VALUE

flUS 7 ! ,

01520
057C'

J!Q

1302

cute

02FA
02Fe

AlIC

MOY
JMP

ENOLPR
A

MaY

C5HI
ce .. 3

MOY

108A
f)(RF

0312

CIliDe

03rU

Al0C

(4318
1:518
flJ31A
flJSflJC

Cl9A

0;seE

1083

0103
070"

'7'8

INpT,tI

NIWI..OC,LOCPT
CHL,P
BLWP 'GITSVI..

C1IUJ

115Fe

le8"
0312

CII521

0314

1111578'

031f'1
03t8
831.

ISle
031E

032e
032~

032A
0326
0328
032.
0321:
032!

LPgF

Ct503

071U
0702
07r1H'S
0706

ENTF.RR

~ov

C10!

HIF!

0300

AI

1121015

02F8

IRFE

JMP

U1e
0220

ceA'

12ReI
FFF9
D0711l
0070
0070
00713
0070

oe70
flJ2Re
FFF9

C!543

cele

eMLP3

•-

-

ENTERR

INTERO

MOY
MOV
MOV
JNE

l.PO,

POINT TO 4CTUAL MEM AODR
POINT TO NEXT ENTRV IN CHAIN
FILL IN RESOLVED VAL.UE
CHANGE LOCATION POINTER
CONTINUE CHAINING

JMP

CHL,P

END PROC, GET NEXT TAG

HI..D,l.('!CPT

ENTER SYMBOL INTO TABLE
INC

FI..GYL

SET REF CODE

MOV
AI

FI..GYI..,*8VIIT
aVPT,·7

MARl< FL.AG
POINT TO NAME LOCATION

MOY! *YNPT.,*aVPT.

Move .INPT.,.,VPT.
MOV8 .INPT.,*SVPT.
Move -INPT.,*aVPT.
MOVI -INPT.,-SVPT.
MOY8 .INPT.,.,vPT
8VPT,.7
.1
MOV
MOY

NEWL.Oc,.avPT
SVPT,'ENDST

MOVE IN NAME

POINT TO YAL.UE
MOVE IN VALUE
CREATE NEW !NO OF SYMBOL. TABI..

LOAD MODUL! DISPATCHER
1118

0118
1120
1121
1112
0123
112A
0125
11728
1121
111128
0129
8130
0131
0132
8133
0134
0135
0138
',31
11138
81ag
8'41

', . . 1

., ... 2
81"'3

I:U0

0~~1
03~lIt
033~

1338
033.
033C

0331

01

"!I

1II~42

13....

la4C
la5~

1,.8

.a52
.a5A

. ' ... 8

.7'1}

.ase
rUSA

lasc
e~n!

ea8111

8782

83.1
13.4
83.e
0388

075...

87tH)

1758
.757
8'58

.7Bg

CSI2

lIIeeD

ea ••
laiC
0ae!
0a7e

1372
137.
1378
11378

837A

*
TAGS

•TAGe

IIIIDC'

Al!JCe

••
•

•• 10
IB.Ul'
IIOC'

.eIA'

.llt
lase ".12'

87B0
87tH

,.75a

10ee

13 ... S cl.e
13 ... 8 IBIC'
83'A 1313
e3'!

07 ... ,

ellA
2:U,lA

C

.TDAT,,!NOST

IS LIMIT BELOW SYMBOL TAILI.

JL

CMLPa

V!8 • GET NEXT TAG

••
LOAD
•LOADER
•*

".lIt

" ..e

0SeC'
e81F
Isec'
tAle

PAGt! 1III

MVN~

ADDRESS ERROR

L.X

IOPAR~,LAt!R

JMP

ERR

GIT RELOCATABLE OIl" CB)

MOV

IUAS,HLD

8L
*tNCP
DATA NWLOC
A
HI..D,N!WI.Oe

lET RILoCATABLE OF'S!T

TilT INltDI MoaUL AND CONVERT
PLACE IN NWLOC
ADJUST WITH BtAI

PROCESS DEll' RESOLUTtON
MOV

'LIST,TGFLD
i

11 'ULL

L~IT

DEIIRID

JEG PRNTOV I
BLWP '8INHEX

NO '. SKIP
V!,. CONVERT LOCATION

DATA NWLOC
DATA OEFL
LI
TGFLD,DE'N

LOCATION VALUE
LOCATtON tN MIIIAII
POINT TO NAME IN MI18AGI
MOYE IN NA'ME

8181
0'28'
11Ft

eI

Mova

*INPT+,.TGFLO+
TGFLO,DI'N+e

JLT
AI

MVNM

INPT,.,

R!IIT POINTIR

IfllAe

BL

'PRCRLF

PRINT Cft/L'

NOP
LI

10PARM,DEFM

IGNOR!!RROR RETURN
PRINT DE'INITION MIS,AOI

DC70

21110
FF'A

1132'

unl"

.21A

IIIrn.'

BLWP 'PRINTH

8.a0

lIIesc'
C800
"DA'
0410

15S8'

lice

~

PRNTOV

MOV

INPT,'NSMBL

POINT TO SVMBOL .. AMI

BLWP .SRcaVM

S!ARCH SVMBOL TAILE

JMP

NOT FOUND, !NTER IT

ENTIRD

()

PAGE '121

LOAO MODUL! DISPATCHER
0150

037C

115t

e3801
e382
1138'

037£

175a
1153
'75'
175e
1758

0220

121A
lIe'2'
1'2t!

1188
17eo
11710
8711

138!

108,.

0772

1302
130.

0773
177.
177(5
0778

1300
138e
11388
130A

Inot
2130£
0~U~

leU5C'

IU20
ISA0'

131'

e8e2
18(13

138.
838A

e801

181'

181e

0382

138e

131C
laBf

SDF

JMP

CHLP3

8LWP 'GETSVL

CONTINUE

GET SYMBOL VALUE

I.oe

CLR
MOV
JEQ
JMP

.SVPT
LOCPT,LOCPT
CHLP2
LPD'

Ct80
1571'

lOA!

••
•TAG7

GET CHECK8UM C1'

••
•TAGe

,KIP CHECKSUM (e,

'.20

IUE2'

0220
011114
lIE!

170.

170e
1708
1187
.788
170g
180'"

CMLP2

.SVPT,LOCPT
POINT TO RE' CHAIN
NEWLOC,.IVPT
CMANGE VALUE
'SVMIOL.aVMPTR+SYMPTR,8VPT POtNT TO ENTRY

".0
1181

1780
1781
.782
.783

!OPARM,MULD'

MOV
MOV
MOV

13'4

03AI
13B0

L!

cue
ce.3

03A.

e:uc

MULTIPLY DEFINED SYMBOL

'SVM80L.aVMNM+SVMNM,IVPT POINT TD VALUe:

e3A6

178(5
0788
.781
0788
078g

so,

MOV

CUI4

e3A8
03AA

Je:Q

ADJUST POtNTER

BLWP 'PIUNTN

CHSfJ

213A2

.,82
"83
178.

••
•

le7!'

.777

1778
171;

INPT,e

IU0e

ee20
e!57C'
130(5

0388
1388
038A
e:S8C

1787

AI

C182

leoD

elDC'

A.ce
cala
A21C

l1E1

•••

TAGA

•••
TAGO

BLWP 'CUMCHI<

CHANGI FLAG
WAS ACTUAL RE' U8ID'

NO • FINIIH ,.acrIIING
PROC!IS CHAIN •• TI8'ACTION

CHECK

CU~UL'TtV!

AI

INPT,.

81(IP CUfIlSUM

JMP

CHLP2

G!T H!)(' 'lELa

IUM

GET R!LOCATA8LI LOAD ADOREIS CAl
MOV

In AS, "'LD

8!T R!LDCATA8L! O"IIT

GET ASIOLUT! LOAD ADDRESI (0)
.INCP
BL
DATA NWLOC
A
HLD,NEWLDC
MOV NEWLoe,pc
A
LD'T.PC
JMP CHLPI

TE8T tNIID! MODUL AND CONVIR' .
PLACE IN NWLOC
ADJUST WITH lIAS
lET LOCATION COUNTER
ADJU'T WITH AcTUAL LOAD 'POtNT

CONTINUI

~gAO MOOU~!

DISPATCH!R

18e8
181'
le88
lelO
1810

elc~

Ctl~

ra8U
liHue

111813
0814
e81!
0818

11811
0818

0810
rU21
1821
1822
'123
'II'

182!

,lel8
lel1
0'11
lelO
lIe3..
0831
1832

PC,'ENDST

18 ADORPA'T IYMeaL TABLE'

JH!
C
JH!
MOV

LDAD!R
.TDAT,PC

VEl • lltillOR
xa OLD ~IMIT ABOVE ADD,,!.a,
VE8 • CONTINUE
CREATE NEW LIMIT

81lP'

lICE

MOV PC,'LOADVI
cala
1304'
!'L
.INCP
e80n
1104' LOADVI DATA •

1300
1302
1304
030e
0308

1.B8

1.e1

C1ce

'EI~

leOA

IUDA

CII!

13D!

118~
IIA~

IIDC

IIEe

•*
•
TAGO

81'2'
I1D~'

1004

lal8 Cllt
1814

••
•INCHK
•
•INIR

'.

18.4
1'45

131A

1848

13EE
13'0

IIEC

lilt
211'
,,'Sf'
1281.'

lueUl

11'1

CIIE

II'"
II'fI

CI10

II'A

14.0

11'1

S!T~P

PC,.TDAT

SETL"

ral43

18111

c

laca
13CA
e3CC

03C~

lUI"

II'!'

••

'.

CONYRT

o

BIA"H~D

81e8

1318

1'1.

GET ABIOLUTE DATUM el)

MOY

ISIC'

1840
1'41
1842

"'5t

••
•
TAGB

IIC'

1312
13E4

0841
0848
11849

GET RELOCATABLE DATUMCC)

13C2

1'33
0e3'
0838
le38
1831
183'

Iiao

••
•TAGC

A
JMP

HLD,tPC+
CHLfli.

lET UP LOAD POINT
TEST INIIDE MODUL AND CONVERT
PLACE IN PC
ADO IN O"'I!T
GET NIXT T.G

GET LOAD IIAI (0)
MOV
IN!
8L

INSIO,INSID
INE"
'CONV"T

DATA BIA,we
JMP CHLPI

INI%DI.MOOULt
VIS • ILLIGAL. LDleIUENC!
G!T CONVERTED VALUE
PLACE IN etA'
GET NEXT TAG

TIST %, INIIDI MODUL "ROCIIIING
MOV
IN!

INltD,INIID
CONVRT

INIID! MODUL'
.CONVIRT

vel

OUTIIDE MODULE

Ll

IO"AR~,lL8Q

8

.ERR

ILLIGAL LOAD SIQU!NCI

I~ROR

CONVERT FIELD INOBJ!CT COOl

MDV

tll+"CONLOC

MOVI !N CONVIRIION LOCATION

MOV

INPT"CONVL

POINT TO eU,,!R ARIA

8LwP 'HEIC8tN

CONVERT TO BINARV

o

LOAD MODULE DIIPATCHER

(='

lea.
Ieee
rn5S
111851

c

9.e300.9081

0"10

8eec'
r113'!' CONVL DATA
0'10' CONLOC DATA

"e.ee
. ""

0220

Al

0004
tUBe

RT

"3Fe
lIFE

rU02

S

•INPT, ..

••

PAS! flI13

'0"

DATA
CONVERSION
PLACE IN ~~OP!~ LOC'TION
ADJUST POINTER
R!TUflfN

""OC!IS lOT ENT,."
08fSCII
18~H

18152
IIHJ~

1864

eeee

0408
040A

Iluses

f?J40C
040!
B4HI
0412
(U14

1866
0861
0889

081C1
1871
0812
081~

081.(1
BS?!!!

181ft
0811
IU1S
1810

14U~

0418
04114

e4le

eAIE

0A2(11

0422
0424
0'26

,.,. L.OR
..
L.OWP

IU08'
1000 "8TtM
0000
040t'
0000
0(1100

9415:590."01

IIAG! 0024

(",
..

WORKSPACI! ARIA
OATA
DATA
OATA
DATA
DATA
DATA

L.OCPTR DATA
DATA
05EHI'
DATA
00150'
OAT.
"000
DATA
0000
DATA
0000
OATA
l!Sec'
DATA
0000
DATA
0000
OATA
0000
01Ul0

*.

L.OBUF

IUJ

fa

Al

0

1'2
1'3
PU
IU

NSHaL
0
fc'I

0

IRCSYM
NAMMaG

lite

"7
R,

(II

1'1

{/I

R10

"
"

H!XAt~1

0

0

RO
FIT
PTH
NIH8LP
8YM!
TMP
L.OC
IFISM
NMMSG

lOP ARM

Rll

RTN

'H2
R13
"14

HEXP2

RS!5

Ol.D WP
OLD PC
OLD IT

c

PAGE 0028

PROCESS XOT ENTRY
0881
0882
0883
08ee

81880
0890

085H
0892
0893

0S04
0eg5
0898

08g1
081i18

"ego
0i00

0901
0902
0903
~904

0905
0!HH5
090'
0908
0909

0910

0sa 1
0912
0913
0914

0lHe
tHHs

egl1
e018

*•

{UtA
0920

e9at IA30
0g22

043f
0434

0023

04Jt5

0924

81438
043A
843C

092tl
09a,
0928

09;'"
({I931
0932

c

03/15118

MODIFIED TO RUN WITH PXOMTR
• COMPUTER. 900, ASSEM8LY
* ABITRACTI AN tOT ENTRy 11 CHECK!O. IF TMIS %8
•
THE FIRST MODULE, TH! NAME WILL BE PLAceD
•
IN TH! SVM80L TABLE AND CONTROL RETURNED
•
TO THE CALLING ROUTINE FOR ~OOULE PROCESStNG~
•
IF THIS 18 A LATER ENTRY WHOSE NAME IS NOT
*
IN THE SYMBOL TABLE, IT WILL BE FLUSHED.
•
IF ALREADV DEFINED, AN !R~O~ MESSAGE WILL
•
8E PRINTED AND TME MODULI FLUSH!D. IF ONLY
•
RfF'O. MODULE WILL BE PROCES8!O AS FIRST
.
•
MOOULE, AND TH! NAME WILL BE MARK!D AS OE"O.
•
NO VALUE X8 GIVEN TO TH! NAM! so IT MAY NOT
*
BE USED TO SATISFY REFERENC!S. THRE! ReTURNS
•
ARE PROVIDED FOR ACCEPTABLE MODULES, MODULES
*
FLUSH!O BECAUSE OF ERROR, AND MODULES FLUSHED
*
BECAUS~ NoT REFfD.
* CALLING SEQUENC!'
•
8LWP 'LOR
•
NOT REF'D MODULE FLUSHED. I WO INSTR
•
ERROR • MODULE FLUSHED
• 2 WD INSTR
•
ACCEPTABLE MODULE
• 1 WO INITR
* STATISTICSI WOR~SPACE , LDWP (UNSHAREO,
• ROUTINES CALLED.
*
BINHEX.!RROA,GET8VL,HEXBIN,PReRLF,PR1NTN,
•
R!AO,SRCSVM
LOR
WORKSPACE
DATA L.OWP
04"8'
START
DATA Loes
042C'
LOSG
MOV RO,PTR
POINT TO READ BU'FER
tl!l80
SKIP TAG
INC PTR
0e82

0887
0888

eg2g

•

*

ruee

"'H!l5

LOR

•
LOADER PROCESS OF lOT ENTRV
• REVISION. 0e/01/7.
•
OHIGI~AL

0884

(

• TITLE.

0AiS!

0 •• 0
0441
121444

•

C802
043e'
04lC
"4Je' PTRPT
0402'
0222

CONVERT RELOCATASLE LENGTH
MOV

PTR,'PTRPT

SLWP *HEXPR
DATA S
DATA NW81AS
At
PTR,A

POINT TO BUFFER
CONVERT LENGTH
POINTER TO MOOUL LENGTH
CRIAT! NEW 81AS
ADJUIT PAST LENGTH

1210004

CPlAI
1 f5 HI

C4t2
0411

*
*
*

TE8T FOR LCADA8L! MODUL

FIT,'8T
FrRIT
MQY
PTR,.NIMILP
8LWP .SRaM
~ov

IN!

FIRST TtM!'
VIS • PROCESS
NO, S!ARCH 'OR NAME

P~OC!SS

0933
0934

R)935
0936
093"
0938
e039

0940
~941

PAG!

lOT !NTRY
0446
0'418
0414.
0AAC

100!
082l~

167C'
1:'Ho

•

*

144!
e'50
0.t52

"'5.
eAse

e20',

e30!5
08A~1
erut: ,

.

."

ffADe

04lU

14DC
eADe

~952

0953
iH~5"

rUl5S
e958

C0em
C280
1420

SA8Vi

0RAg

0482

6000
1603

11,1'841

04CS6
0A68
0ACS.

e962
111963

ISUI'
age5

000Q'

0A6C

038!!l

1e,,,

0A6t!:

IACt

0'70

02(U!!
00 flU'

04'2
047"

6820

0'7~

eBec'

0476
047.

".,C
0A7!
fU80

e967

04841
0486

"

;

NO, MARl< AS D!F

PREVIOUSLY LOADED MODUL! ERROR
LI

IOPARM,PALM

PREV L.OAD MODULI IRROR

8L.

'IRROR

CALL MONtTOR ERROR PRoceSSOR

RlA

TAK!!RROR E)(!T

FL.USH MODUL.E
MOV

RD,P'!'

MOV RD,IOP."M
eLwP 'READ

RIAD A RECO"C

ANOI R9,!OF+IO!AR

EO' OR 1/0 ERROR'

JNE
ce

FLAT
*PTA,'COLON

FIRST eMAR ••

IN!

L.PFL

NO. CONTINU!

RTWP

l~'.

V

RETURN

",g
0032
0fHIleJ
1511'0

LP

..
MRKOF'

048C
0A8f

18C2
C120
051.'
1.. 04

CL.R
l.X

FST
TMP,e

CLEAR FtRIT MODUL. FLAG
tN!T COUNTER

S

'TIN"ENDST

8'T NEW INC OF SYMBOL TA8L!

AI

."
."

CUIS
'UI.

PROCESS FIRST MoauL

POINT TO SYMBOL NAME LOCATION

Ct20
00AC'
0224

e971
1912

IID7!5

*
FIRST

IUSIA'

1lI910

0914

MRKOF

c··.· · ·

."

0482

1913

FLRT

.

eg6~

"SUS"
0989

LPFt"

981~

0959

19151

'Lel.

eeu!'

1957
1958
1980

J!Q

INCT

15CE'

09413

1,1951

'LCI..
SYMBOL NOT FOUND • 'LuaH
'SYMBOL+FLAGI.FLAGS PREVIOUSLY D!FtN!D'

."

."

16950

JMP
DEC

,

0942
0944
ra945
ta946
!d94"
0948
18949

e.e8

8YM13,.'

Move .PTR+,*SYMB+
OEC TMP
JGT LP

MOVE IN MoaUL NAME

PROCESS ACCEPTASLE MCOUL

INCT PTR
S~IP LAST TWO CHARACT!RS
MOV 'SYMBOL+SVMPTA+8YMPTR,8VMB
MARl< AS OEII'

c

PROCESS lOT INTRY
e078

C

8077
0078
IU79

fua9
0'81

"'82
a083
ag84
0gae
00'8
1'8'

IUgfll
04g2
e.g.
I.ge
"'08
I.OA
I.oe
21<'0!

e.A ...

rUA2
I'ol.
IUole
l'A8
0.AA
r/I'Ae
IUA!
0.80
1481
14B'

e214
"'0
IRI!
IllSts'
CD74
C074
CD7.
0410
leu"
CIII)
IS7!'

'VMS,.'

POINT TO NAM!

L.t

TMP,NAME

~OVE

MOV
MOV
MOV
BLW"

.SVMI+,.TM'+
.SVMI+,.TM'.
.SVMI+, .nlp+
,gETIYL

'OINT TO SYMeoL VALUE

MaY

,aYMIOL+SYMNM+IVMNM,aYMB

NAME TO

OUT~UT

L.IN!

"14'

DATA LOC'TR
DATA LOCYAL
BL
'PRCRlF

LOCATION VALU!
PRINTING LOCATION
PRINT CIt/L'

NO'
MOV NMMSG,IOPARM
BLWP 'PRtNTN

IGNORE fRROR RITuRN
PRINT MODUL! NAME MISS.II

I'!!'

SAee

lelSC'
I'I!

0902

".tce

"4BE

AI

MOYE IN L.OC VALUE
CONVI"T LOC I'OR ~RINT

l'tH

1418
048A

.1.'

MaY LOC,*IVMI
BLW' ,aIN"'!)t

IUle

I"'"

P'GE

cele

".If)
0S4'"

leA.,
1388'
10.,.,
CIS.

""8
eg8'

045301.00e1 **

ru.e

.".8
038"

Al

'flA,e

TAk! ALT!RtuT! R!'liURN

RTWP

RETURN

c.:
'i

i~ .. " .

CHECKSUM CHICK

•.
•CHIIIP

"UUH'
0988
169"

IU8e
0989
1000

HUH

1002
1003
1004
1005
UHH5
UHIJ'

UI0ft
1019
1010

1111
1012

1013
UH4

04Ct
e4C.
",Ce
0'Cft
tUCA

14ce
lAC!
0'00
0402
0.0'
0408
0'08
14DA
14DC
04D!
04!0

C

CHECKSUM CHECk WORI("AC! AR!A

DATA
DATA
DATA
DATA
DATA
DATA
IIIC'
DATA
eell RLVL
DATA
0110
011t! NwlUAS DATA
DATA
1110
DATA
1000
DATA
0100
I.IID N8MBL DATA
DATA
0111
DATA
0111.1
OATA
1100

14FC'
18111
1.18'
lIlt!
et08'

'AG! flI18

84S:UHa-"ru ••

CI~11?!1

3Hl~

'*
PPOB

EQU

>31~2

310~

PPNM

F.::Qt!

>~U3

3104

'*
PPSA

ECW

>31~4

EQU

>3UJ!5

PPOL

EQU

>310f5

..

.
PPHW
.

COfltl>4ANO

BAD AOOReSS
HARDWARE

02105
02"'6
0207

3HJ6

{(J208

0~'00

RQ!

EQU

It)

0209
02U

0f11lht
kHHl2
olih'l 3

R1
R2

€.QU

EQU

R~

EQll

1
2
3

0fih1A

E: QI)

4

\/I(iI'lt.5

Ril
R!5

E(.HJ

5

1ll1?10~

R6

E:QU

6

0f1107
k1 lit 168

R1
Rill

E"Oll
Ef..lU

7

10216

0211

0009

R9

r:QIJ

0218

0~0/,

0215)
IIHHHI\
0221
frHi22
0223
0224

00VJfl

RU
RU

000(;

fH2

EQU
FQU
E: GlIJ

ItHH~IO

0225
0226

Fwu

10
11

12
13

R104

EQU

14

Rle

€QlJ

Hi

EQU

$

DATA

~

01'154

0~1fI~

0229

0056

00

005'

0Ql

!6!l
\i'!1Jl

.
CONPRB
.
CPRaOp
.-

OEf'INE REGISTERS

8
9

0~~E

0l7!54 ,

0058
0Ql59

RU

ONLtNE

0f110"

0221
0228
023Q\

..

PARAMETER ERRORS
REQUIRfO PARAMETeR MISSING

NO MATCH

3HH5

IiHH~

SEGMENT

OUT""OF.80UNO$

0214iJ

la213
0214

PROGfU~

DATA >rA;'"1"l

F (~II

021d3

0211
0212

INTE'Rf'ACE ADDRESS

'5
lItfi102P1

3hH

0201
021/12

OATA 0

...
PPRr.l

~llJ9
02~VI

OISPLAY MEMORV

$

PG8US OATA 0
$
liHI1 52 ' PROGSZ EOIi

~un

01Y"

fYU

ROM

0(i10~~

0UJ4
k1UHS
01Yfil

O!SPM

C

DATA 1

."

~HPi

~un

.

BtJRN,ROM"TO.M!MORV,SAVE IMAGE
S

0041..' DfSPR

01~4

kll1H5

PAGE 011106

.

kJ118

"'17Q
~ttJfA

....

cnNV!~S!ON

PIHt

OEFINITIONS

110 COMMAND

eVTE 0,0
BYTE 0,0

CONvF.RSION BUFFeR

C

'"
ii,
I,

g4~3Q1.9q"1

Pi'(OM p,"'Or;R"M~ER

0231

0232

C

IIJ2;)J

0G!!5A

°"'151.

1

0n~0

0234
023~

02315
1dP.31

0~Or.

023Q

it1C0~

01'1"'t

•111)(01

$

DATA

~001i'~

E(~I)

S

DATA

~0C()I1.Il

€QII

"~1

1/0

00V1!ll

OPE!'-I

EQU

0~Ir1D

EQU

0'13"

024'.

0006

k/243

00~~

WEOF
WPITA
PEAD'

F.GlIJ
F(,JU

9

kUHn: ,

.pRS

1fl~46

0f)1~H

~HHH'

PRBse

0P47

006V'

~!il

p~Bnp

102404

0"'01

07

ks249

01i!62
01iil63

~m

PRBLU
PReSF
PPBUF
PPBaF
PRBLN
PRete

02!.H
0251

0~64

IlJr"
0 i,H10

k'l2~2

0016';

0215:5
02'4

0~6a

"" \~ b(.
011 !)r~

0Q16A

~W0!l:

0fHjC

01'V.~

02!5~

02515
/j)0!6E'

02!57

0258

0~6F

!i

OATA

>il105V;i
nil!
trP

2'~0~

EOFMSK e: QI.I

026~

0f17!1l'
III 1

/'IIF.MIMG fUU

02t:iR

0!~7 6'

1lJ267
1i!l26A

01i'17A
01(l7g

026~

00e~

027~

00(H

0271

"272
0273

01i!8i1

0274

0275

AD

00&6

000&
iHHHS'

EQU

,,
,

DATA 8

SEVEN

0007

'*

..

EQU
OATA 7
MA)(1MLJIII DUTV CVCL.E

HA)(OC

EQIJ

lA~

FOES

tolAlCCT

EQU

6150\10

000e

MAXPW1 EQU

6

~QU

8

0Pt:t4

ib:i82

0283
02$4

MASt(

BYTE
TEXT 'ROM IO?'
(II'"
.. 11.
BLANKS BYTE 2
2Ql
TEXT
EVF:N
0084' EICfHT EQU s

IcHHH1

02tH

EIIIO-OF.FIL.E
.21i'1 1A 0
S

BYTE '1
TEXT 'HEM TO?'

e2

1lJ21A

027Q

EQlJ
fUll

~1

0276

1tJ271

ROMIMG

UNUSED

MISCELLANF:US DATA
CHMUCTER COUNT

0262
0071

TYPe:

COM~ANO

LUNn
SYS1EM COMPLETION FLAGS
USER FI..AGS
BUFFEQ
OtlTPUT aU'FER I..ENG'tH
CI·urur.TF.:R COUNT

DATA LOBUF
DATA SF!
DATA SA
DATA LiI,0

R

1IJ26b

PEA,., FROM FU.!
PRB.oeFINTTIONS
1/0

0r'~~

0Q!7(J1

OPEN FILE
II/IHTE END-OF.FIl.E
~RITE TO po I I~ E

SE'Ii(Vlf:E

E(W

0008

•

.
.

MAXiliO
."

OPCOC!

UNRE'COVERABLE 1/0 ERROR
SVC/PRB Ef'lUAT!5

13
F4YTE 7
RYTE 1/1
~YTE ttl

026@
0261
0264

Asen

e:RR('I~S

BYTE

,..,

.

ASCll Ttl 'UNARY OPCOD!

EQIJ
$
DATA 0

0A!50
0(14D

02~9

11

.
'*
CHARtT

~00'

BINARV TO He:X

0:l4 ,~

024~

,,

.

PAG~

~F.X

EQlI

024\

0244

C'

•

0!115C' BH)(

02~~

(

•Hxe

••

MAXIMUfol OIlTV CYCLE COUNT

wrOTH

M4)(JMU'"

PtJLSE

MAUMU~

S"!'RTNG WIDTH

MAXIMUM

CRU INTERFACE ADDRESS

pkr:l!"1 pr Or,k A MMf:r~

Q4~39t,",9Q0t

la21:Hi
02dfi

lFFE

F.. QlJ

lIIl fr'E

\(\~~7

.MAXCRU

1:'111'11/1 '7!

ELIU

>~0Ql9i

~21;H

~U\,.H':

1tl~~9

~~klf/:

Afit) P0
.4()uRl
\J PH

l(I:ih/(;~

1i!~~1.

2l~8R

IiI~Y<
i(! 2 '.1:\

eJ2YiJ
lfl2\i~

0291

1''''8A

IO~IJP!

ilJ299
0341\1

>CH·1Vl
>~3I(l0

[{j!HH':

PWO~

OOUTI

nATA

lIt70v1

014D

MPRT

f IJI.I

>H,iA+'M'

01t)2

RPIH

~. t~ /I

>11/!~+'R'

0~8Af

RUF~n

F Gill

$

DATA

.

~(}!00

,,;)~t

0!i101

BUFRT2

f.1.~U

'"

.

DATA

~

YES

~.QU

1
1

MfMROM Fillil

V,lJCI!Vl1
0PtI{l~

~OMMEM

F (.Ill

10.'0.4

l!II!.Ikl3

SAVIMG

VlPlV,P'

•GOSP

e'~tl

tl31()7

0'" {(if")

L!1

!C3VH'

1/!00£
0V!It)E
000F'

EQU
F!.tlU
F.CW

031.'19
0:311-1

0311
~31P

0313

0(11SE
(8r1lgl(j

0V1~2

11)314
kJ31!5

0316
0317

IE
OL

FQU

BUSV

..

0fHHl

<
3

~~9t'1

IiH'I~1

I(H"!U. '

fFFF

0((l9C

FFFF

~,tII 9f

FFFF'
FFF'fJ'

031R
"319
032f~

0321
032~
~J23

15

Er~u

S

OEFTS3

E'QIJ

~

OATA -1,-1,.',-1

..
...
.

COMMANO TABLE FOR PROCESSING COMMAND
PAIUMETER L.18T

CC.H1MANO IMPLEMENTATION ROUTtNES

..

CNAME

NUMRER OF PARAM!TERS,PARAMETER BIT
AOORE!!!!!!! OF OEFAULT VALU!S
PARAMETERS PASSED TO SUBCOMMAND!

e:QU

IHT A 'CS'

f.QII

!

~JlI!6

0f101,42

435:5

0t:'A4

""1

BYTE

00~~

DATA

IiIVlAe<

DATA CS

l(j:~31

MASt(

$

032'

03;)iIt

~

:6

0P!A2' CMNOl

00.A6
00A8
0filAIi

.4f~~'

Pf

OATA 1tl,2!'l,1

1!J3i:H5

0328
0329

DEFAlJl..TS

OATA 0,1,0

0Q!A~'

IdS

~JTS

14

nw

0324

0~

INTERFACE

15
13
14

0P!01
000t'l

~~9A

~,~ACtI

~fTl.JRN!

PAIHMe:TE~

0"'tlE' nEFTS!

01A0t'11
01i'l1g

W~QIi

FW~

$

C~u

0!119'<' OEFTS2 EQIJ
r1r~94

C

SELECTS

TOGGLE COMPARTSI"INS

til31fl2

0:5!IJ!'\

ROM ~I!Gt$TEIIf

TVPE_MEMORV OR

8UFFErq

Ii) 3Vl:~

1tl3Mi

(11008

"V'l5w'~
~MH"

VH'J0~

IlHH!C'

41 i~ 8 r

ECW

0'Vd"

0:a9~

PAGE

CRU INTERFACE
FUW
EGlll

.

••

1,>~11

6!i'l

ItHH,A

'"

nATA RCIHJU

0~4E"

CMOLEf\1 EGJU

C

S-CMNnl

"

i

Ii
!

'.\j
.,

- -- - - - - - - - . - - - - - - - -

---

_ .. -'

--

--

----- ------

---------

·~-.---~---

pROM PflOGfHMMER

C

0P"AC

414F

0Q1AE
01l1AF

~0

0334
0335

0"'B~

0t'1~~

0082

019C'

Vl336
0331

0(}l84

000'"

0086

404~

0V16S
01(189

lA~

033Y

00e!t~

0~ar.

0341

11'J06E

0t.'1;'HS
003f'

10342

0~C~

4049

til34;~

00C2

Vl-t

0344

0~C4

til34~

00C6

0~42

0J4~

091C8

0VlfllC'

0347

1a0CA

t5~42

!aJ4rl

I/}V1CC

102

0~lcn

C0

034C0
0

BOUNDS
aeA
'RC'
6,lIIi'E'-'l

DEFTSP
RC
IIIWIO
I RI ,

4,>R0

DATA
IIATA
OATA
DATA
eYTE

OEFfS1

OAT A
OATA

VJ

HUGE

IRT
'SW'
1,>80

sw

SWBLI<
OATA 'T5'
8YTE 4,0
DATA

*
00FC' swelt<

F"QU

00F~

0371
031A

OEFTS1

01o'!FC' CMN2

0371
0372
031J

0(1182
0(1I4e; ,

0@FC

2,>C0

DATA OFF'TS3
OATA T5
DATA CMPR
EQU S

0~F'"

0f1iF8

00Ff

0
'M8 '

0t11

ilI31V1

031t;

OATA
OATA
DATA
DATA
BVTE

,«}!.'It)!'"

00gl.'

0375

OATA
DATA
OAT A
DATA
BYTE

,

0~H19

0374

DATA
DATA
DATA
OATA
BYTE

0~

036rlf
III 3tH

0~F!5

GO

OATA QI
nATA Bnu"lOS
OATA 8MA
DATA , MI '

eJ243

0"o6

0

BYTE 4,>80

80
008E'

!l1l71 F A

nATA
DATA
OATA
DATA
BYTE

ern

006.

00EE

PAGE 000g

1t\C!l

034 ...,

0ii1C3

••

DATA 'GO'
eYTE /tI,0

0332
03.n

033(4

(

945391 .. gQ01

0~0A'

001E'

*
*

s

TWO PARM! PASSED TO SW,LOCATEO IN SweLt<

DATA SWT
OATA SWTR
STORAGE FOR L.(lOP

eIT AOORESSES

COUNTE~S

FOR COMPUTING

PkOM PROGRAMMER
0319
038('"

east

010Vl

0U;?
010.4

" UHIH
00., III
0f110Q1

iH1t0e-

oHH'J'

0382
03t13

g4f\~91

i"'~~

0109

\H~l, '

01011

~~0V1

039~~

•

010C

IU!JR

eJ Hilt)

(cHI'

21101;' 8FHH2
vW

03~1

*

010E' ERltIA

010!

iii 1 H~'

01 Hi

0111

fU~5

~~

0111
011~

0112

0401
1041d8

•

MSTRG

!hI?

eTT wITHIN eYTE

~

"

AVTE

!II
0

Et:W

~

AVTE
~.QU

'"

y,

EtHl

$

RYTE
B'lTE
EQU
!'IVTE

ae:Gl'NNING

eIr

WITHIN WORD

ENOTNG ROM WORD AODRESS

S

DATA

, RSTRGl? Ffm
RVTE
0';)

0tl~

0t1~

, RSTRG

efGINNHIt;

BEGINNING Rnl"l WORD ADDRESS

0111' MSTRG2 Ef.olU

04~3

~4v)"

0(A0~1

Me~ORY

;&
E:QU
DATA

010r.' BRWf)8T E:QIJ

0394
0395

041/.14

*

BRIU

eVTE ADDRESS

aEGINNING
I)AT A 0

RYTE

II:H~

C

$

0tltlf\

•

03SH~

0398
0399
04l(Jv!
0401
04182

~QU

PAGE @0UI

S

011rH' ' BMSVtH F: t.I tJ !
i1nE 10
~H"
0109 , B~iB T2 fUU
3\

1tl387

0391

•BMB'lA

....

DATA 0,0.121

0fAIIHIJ

0;Ht5

03&8
038Q

E.QU

0UHi

iO;H~A
t03~H1

CT

.. 990t

MI!MnRV

ANI') ROti

STRINGS

VJ

i

"
$

,;('"
'V

'$"
\II

c

PROM PROGRAMMER CSt
• TYTLE:

0411
0412

•• REVISIONI
•." COMPUTER:

0413
(U14
041P§
rU16
0417

PPCSI
PROM PROGAA~MEA

cn~MAND

STRING

rNT!RP~ETER

03/'5/715

ORIGINAL
990,ASSF.MBI.V

." ABSTRACT.

...

0Al~

CHECK FnR MISSING REQUI~EO PARAMETERS FOR
COMMAND. FINO SUBCOMMAND IN COMMAND TABLE.

."

0419
144lt"

••
...•

1114cl
0422
0423
04i:!4

OPTIONAL PARAMETER MIsstNQ GET DeFAULT VALU!
CAL.LING SEQUENCfl
ENTRYI
~10 CONTAtN~ ADDRESS OF CO~MANO PROCESSOR LIST

04~!5

."

EX IT I

ilI4..!6
042i'

."

CONTROL PASSE" DIRECTLY TO

...
...

T"'ROUG~
~3 CO~TAINS

0418
0429

0114' PPCSI

144"~

EYU

!Ii

."

0432
0433
0434

011~

MOV

043~

011~

SltA

10+, RQ
R9,9

JNC

REQMIS

MOV

.R 10+, R3

Cllt88

01111

•

e4.~8

04.t9

00e

044~

0111:.

04,H
0442
0413

...

•

043~

04.!7

PRES8T.LSHFTCePL(1),9'
.~

wOl.LSMFT(CPL(2),~)

MOVe H3,R8
~02.RSHFTCCPL(31,8)

."

~ov

.Rlll1+,ru

012(1\

C13t.

0122

OAe4

012.4

0f5C~

irU,j7

icH26

1tJ9ge

1b44U4

012f\

SRL R8,g
SLA RS,!
oECT R8
A

i444
.4415
~44~

0449

012A

0A18
0648

04ti14

012C

A2S!

04hl
04h2

14403
04b4

•
•

•
•
...•

CMNO.OR(WOl,WD2l

Move

R.4,R3
SWP8 R3

~8,Rt!1!

...
...

04~!5
1D4h~

..

0.th7

00 ,

...

04bA
04~9

ROUTINE

AODRESS OF SUBCOMMAND PARAM!TER
R9.R4 CONTAIN SU8CO~MANn PARAMETER VALUES

...

04';1

SU8CO~MAND

R,t

"12~'

020!5

013P1

00A2'
0t3~'

04t'~

.46t
04b2

141M?

e04~

04b3

0134

1306

..PPFLOI

FINO COMMANn IN TABLE AND USE
TABLE V-LUES TO CHECK THA'
REQUIREO PARAMETERS FOR
COMMANO ARE GIVEN AND TO
OEFAUlT OPT tONAL PARAMETERS
THAT ARE OMITT£O
J.t,r;T~LSZ

IF(rMND.~~.CNAMF(J))GO

LX

H5,CNAMf

eQU

s

C

R3, .IH5+

JED

PPFL02

•

TO 19

P~OM

PROGRAMMER CSt

!(lAd4
04tj~

0468

0t3f
013e
ilt3A
fH3(,,;

0467
0AO~

0131"

PAGE 0012
R!5,CMnlEN",,2

fll~!lle

1:1

(32t!15

""Fe'
16F9

1/1464
0A 7~}

102~

(l471

i14~'

'*
'*

,'NE

PPFL.01

JMP

BAD ADO

PPFLOP FQU

l~

14'

...

~H4

0475

R,2.CNAMEtJ+l'

NO. 0' PARMS.

Rl~.CN.ME(J+2'

PARM. aIT MASK

Rt5.CNAMECJ+3)

DEFAULTS

Rl1.CNAME(J+4)

COMMAND ROUTINE

.R!5.,Rl~

i"iOVe .R5+, R 14

1(1476

'*

0411
d47R
041<:1

..
...

1(1481'1

0481.
04l:S2
0A8~

'*
'*

0484
04d!5

MOVB

CALL ERR

$

>/)4/'2.
1(1413

a14A
-NO. OF PARAMETERS
R1_,00R(ROI)

STWP Rl

•

~~03

~fi08

'*
'*

SUBCOMMAND PARMS

...

05~'

~50.
~5~5

..

SML.

...

04g~
~4~9

PARMS.

01S1C'

~4a1

1848A

FO~

ALL sueCOMMAND ROUTINes
EXCEPT GO ARE IN PROGRAM
EXTENSION AND ARE LOCATED 8'
AnDING EXTENSION PROGRAM AlAS
TO SU8COMMAND ROUTINE AOORESS

~48~

obtl9!5

c

J=J+3

'*

02~5

~,~~

1804

*
'*

IF (MASK.EQ.l' GO TO 229
CHECK FOR REQUIRED PARAMETER

IF REQUIREO JUMP TO SEE IF
PRESENT
MOVE nEFAULT PARAMETER VALUE
INTn rrUNSFER REGISTER

0

PROM PR()GRAMMER CSt
i4~lA

H

f)f'

MOV

C47F

10515

C

ilHH6
0511

"518
01''119
1352'"
14521
0522
"023
0524

~16'

0Al~

'H6£:
.H6f

180~

•

SLA

1'1111,1

JOe
JMP

GP0U5

EQII

i

GP020

IF(PRES8T.EQ.P)CAl.L ERR

0t7Vl

V.lA 1,,~

iiJBaR

0172

17~115

JNC

Rlil,t
REQMIS

IiJl1A' GP0t!5

EQlt

S

05"2
~5J3

iH,4

IH'iJtI
13535

C47t.

14531

:d17t'

14538

0171'1

~539

017A
017C

V)641
l!1lF3

0200
0UHl'

LI

04~e

*
*
*
'*

0UH')f

REQMIS

05011t1

1117f'

"548
0549

:"UH!

1d2~)J.

HS?

J11{1\

-1\&4

t,

t 8 f.
.H88
;, 1 & ~
(~

1008
018~

GP0"'G!1
$

IS .. u USE FOR COMPARISONS
IN COM,UNn fWlJTIN!S TO CHECI( 'OR
MISSING PAR4pt1ETERS

RETlJkN

BRANCH TO
~

*Rt1

EQIl

1Il

LI

R10,PPRQ

JMP

ERR
R10,PPNM

31~3

ERR

18C

icl~0L

LI

R10,PPBA

JMP

ERR

.H Clf

31il1A

:" g~

100~
019~'

~558

.1192
1·11 9",

OUTSOS

0201.

S

EQII

S

\. 1

IH(.lJ,PP08

310~

215:H~

;21

"'56"1

t

9~5'

BY'"

0f)A~

1,19A

00100

~tlilA

041S~

ERR

SET UP ERROR RETURN

RtlI,ERR
IU2

Ll

0201.

Gt!T NE)(T TRANSFER REGtSTER

Rt

, NMATCM EQU $

0556
"557

0!Hll

$

JMP
lOl0!5
0t8C' SADlD() EQU

tb!lt)4

"555

..

IF REQUIRED BUT NOT PRESENT,

CALL. ERROR

PARM (t) -CPL (L+3)
MI)VE PARAMETER VALUE INTO
TIUN$FE'Q REGISTER
.R10+,.f-U
CONTINUE

'*

id546

05!S3

DEer
EQU

054~

05'2

*

JMP

\lI544

V)~~1

EQU

0171.' GPll1l0

0542
0543

\455111

~ov

•

219
0tUP GP020

~53"

1154'"
0641

~L.A

....'*

0~Jl

T('I 2U)

IF PARAMETER PRESENT

IF PRESENT JUMP TO REPLAC!
OEF oAtIL T VAl liE WITM ACTUAL
\/ALUE

229

..

05J!~

C

• Rl,+, .. Rl

0"'26
0!;'j27
0!S2C)

PAGE 0013

C,",Eel(

•

11/103

....

IF (PRESBT.EQ.0)GO

.'*
.'*

f!Jt7"" GP010

1tH.~a5

C~

94!53Q b.9QI/J1

EQU

S

SL.

'ERHQR

B

*R2

SU8eO~~ANO

ROUTINE

GO
'4~o4

•

16:565

TJTI~E:

0')66

GO SI)F!COM"'APIIO
03/t5/'~

• REVISION'

~'61

...

ORIGINAL

~36d

... COMPUTER'

9~~,ASS!MeLY

~!'Hj9

•

...
...

"57 i"

01j71
3!51'-

• CALLING

~314

BEGINNING BIT AND WORD ADDRESS!S. TEST
TOGGLES ANO CALL SUBROUTINES FOR TOGGLES SET •

GEN~RATE

SH~llf NC~:
ENr~YI

"'17()
4">77
0~'~

019C'

0"'8~

,.J H~C
\" gf
JIM'
01, A2

0583

!~

•
•
GO

0201n
0f,Jlt" ,
C?31.

I

NONE

.

d116

18"9
i5 !'HJ!l1

ABSTlHCTI

•...

.o~7\~

c

Gn

•

EX I fa

COMPLETION RETURN CONTROL TO MONITOR
THROUGH R2

UPO~

EQU

$

LX

ROI,HMT
.R!i!+,R8
*R0+,F/8
.R0, Rg

GET MMT (1)
)( =MMT (ll*MMT (2)
N(1)·MMT(!,.MOO(W)

J'3~

I"!()V
MPY

1 A~
'~t A6
.U Afd1bd
~ 1 ~f,

ii"~2C '

~j8'

a'S4

"''Sd!'i
0"566

3Ath~

390'1\

0~81

~~a8

0'5ijf)

ill "9/5
o':iSH;
0'HI?
~'96

05519
"t511 ~,
0611'.11
06\d2
0"1!!3

•.
•
•

MEMORY

MRT

C;13m

MOV

'tR0+,"l4

3Q30,l
31:HH1

t'lPY
MPY

,*R0+,R~

GP:T MRT (1)
)( =MRT (1) ",Min (~)

*R0,R!'5

NO(1).MRTC!).MOOCX)

~1BA
~lac

C0C4

~10V

38f.)tll

MPY

R4,R3
*RIII,R3

~tBF"

A144

A

R4,R!5

911C'"

8188
16El
6141

c:

JNE
C

RH,R6
NMATCH
R7,Re

.u t;B

1i6~4

(ue:?

i)60!'S

'UtA

06d6
06\d7

~1PY

••.•

He6

151)F'

JNF:

NMATCH

~1Cf\

020 ('!I

LX

RI?I,CMPR

:.11CA

0V145'

05(0"

~lCC

C38~

~10V

.R0+,R1A

~60q

111 1 Cf

MOV

.R0+,R9

at31(~

:HOIl'

C21t1'
C2Sll

MOV

3611

;'102

03091

MOV

*RIH,R1Vl
*R(,'J,RU5

Ifl12
d613
01'514

~!.

014

1608

~lIH;!

0~80

.

JNE

rr

NO(2).MRT(3).(X/eee)
NO(2)·NOC2)+C4RRY(NO(t»
He,Re CONCATENATED CONTAIN
NUMBER OF LOOPS THROUGH ROM
IF(N.NE.NO)CALl EPR

GOF1.0
R9,SAVIMG

,

Rl~ • CMPR TOGGL!
R9 • OIRECTION TOGGLE
~10 • DISPLAY ROM
R1e • DISPLAV M!MORV
CHECK IF SAve IMG 15 ONLV TOG
IF MEM OISP II "
ANO 0 trUeT • :5

o

i

---_ .. _ - - - - - - - -

941!'l391 .. P901

GO
D8
, iiH

:~,

~611S

('

,?

0610
0617
1061B
~61Q

l6((l~

JNE

Gl1FL(II

t;Y'0E

RU,Rf/\

~10E:

4~0t.

Ht:.~'

16k'~

t<10V
A
JNF

GOFL0

11 E2

046",

M

"GOFL 1. 2

~ tI

~MH'I

tb~~t

(~1

Efii

r~H,8

01Ee5' GOFl0
0204
1?111'01

0~c!!i

\06<1'\
~627

\" , E "
'tltEC
Ql H.E'.

C166
1601
0605

~1531

I{)lfV!' GQll

0~3~

C11 F"

06015

~t"n
af,3~

~'F2

011tlJ.

1:')63"

;HFd

1003

>!631
~l5jB

~f539

01F~'

w)64~

~HF~

04C!5

0641

,UFe

1i)4Ce)

0643
0644
0645
iQl't46
l(!J641
ta648

01FA

V!4CA

G081<1

•

R6,R6

oe:c

R5

(i11l t

f.YIJ

$

r)EC

Rfi

FLAG.INOIC.TE MAXIMUM COUNT
Ct"If'IIPUTATION L.OOP
SETI)

R1~

JMP

GOaRl
00

U5~

Kk=l,N

I(.KK·t
FEQIJ
CI,.R

$

BEG!N AT LOOP COUNT ZERO

fH5

IH5
CLF!
EQU $

FLAG.MA)tIMl'M COUNT
lION COMPL.ETe:

CLR

RU

EQU

$

SET UP PROGRAM 8IAS TO LOCATE
$IJ8ROUT I NEB IN EXTENSION
PROGRA~

'PG8IAS,rU2

•'"

a2fliQl

042C

~2vJ2

002t,1

•

cALL

MMT
A CT

0011P

DATA

02\ll6

0111!t;'!1

OAT

...

'.*
02'iH~

0'2C

0~f~A

01'12A
00v.1C'

01tael'
0!il1JE'

COMPUTE CT VALUES TO BE USE"
IN A8ART
CTRT

(f!tMT)

BLWP flCTR(R12)

021(14

ra2i!.'!C
iJ2iOE:
021f"

CO~PUTA.

0~5~j I

06~7

0663

""OV

MOV

C32?l

01558
0659
frHH50
0661
c'l662

C

•.

OISPl.AY FtAG TO BE OEeR

(lISPL,AV
COMPUTE M!MORY ANI) ROM AOnR!!
USING fIIA)(tMlJM COUNT

...

UFC
01fE

"

TO lERO IN OISPLAV RQUTIN!
TO INnIC:ATE PRINT CARRIAGE
FfETLJRN , l.INE FfEO BEFORE

...

~6d?

0tS::HS
ta656

•

01FC' GOBRl
...

0651
0653
0654

SFT

11

0649
0651i1

$

R4,1

JNf

01ft,1 fiOFLOl

~64?

•

CAL.L SAVEtMt;

'"

0634

(

EQIJ

Ll

•
'"
.'"

\doc4

06,Hl

AND Mf!1'1 DISPLAY

THEN

..'"

~H\~~

~Ai28

AND ROM

Rl,0,RP!

~31J.'

0~ra~

!l}629

PAGE Ul015

k'I~03

a,oc

i' ,

••

cnMPUTE M!:MORV AOORESS ANO
STORE
CALL Be ART ('(' f'IIT)

Rl.WP ,a8ARCR12'
(lATA IMT
OAT A CT
OAtA 8MA

G!1

94ei391 .. SHHH

~fi64

:h~1~

1lI1At;~'

J16fS5

.~~

14

~66F,

?J~lf

(10111)'
ii:ltltlil'

400'

021f.

0",,41)1'

DATA EIGHT
DATA BMBYA
OATA 8MB YlH
[lATA EMA

IHS68
06eiq

~~i?lA

10192'

riAT A

OlllAI)~

?I21r
021F

~42C

BLwp

'CT~(R12)

'Jjfijl(11

06'11
v:lR12

0613
0614

"'?2r~

;'?22

*

01.'2C'

o HJ'i1'

~1'I76

"224

042C

0226

011124
1002""

rJ6"~

i1l22~

0()7Q

"'~2A

~6d!/I

()22C

1bt;81

•,..

RLWP 'BeAR OH2)

1)4T A

003~'

OATA

0662

i323V

1?J683

1i'li?~2

"'6tH

rb?34

01M. ,
011iiC'
0H44'

ill 61:J!S

i:'23b

1d1li12'

06d7
t1 tH~,;j
I,HHjQ

1{!?3f1

*
cnu, *

MQV

R10,RUlI

:(,H~!i ~~

0~3~

1"'011

.JNE

GOBK1

i?Jfii9?

;!,I23r

CPEf~

HOV

.SWT,R:5

~:?3f-

0111V1t,I

~6!i1~

:a24v'
r,p4~

0"'''~

flEe
A

f.i3

061;4
.a6~!'i

.,,244
H'4f)

17141
05tH"

JNC

GRFLf>1

;i 2 4 fi

(.1248'
3t':201

~24A

~W3~

;HHi~

1Cl6~1

0~99

CM'JZ;

024f

01 fdF.: ,

~:25!/l
a~e..a

026tl
00101

Hilt

07~!5

042C

14701

02~15
02M~
~~OA

wt01)'

07ftH)

02e5C
a?IH

\tl1H'

a26p

"'11111'

~111

•

G~FLt)1

ERROR E~IT
IF MAXIMUM COUNT COMPUTATION
Lr:lOP, GO IUr,t< AND BEGIN
LOOPING AT COUNT ZERO

£).

V

!~WA·(BReA+SWT·1'/WWIO

R3,~1

l~C

R~

t (~LI

$

DIV

flWWXfJ,RV'l

MOV

f.?j;1.~E~WA

IF(nIRECT.EQ.MEMRUM'C4LL MGI!TFO
FI~ 18 OlRECTll')N TOGGL!

'*

07(64

.'1d8

nATA ECA
LlATA OUTAOS

,

:324C

A25~

07\1)6

eeA

I'IWlrJ
rlAT A 8R\IIA
DATA 6f.1i11/0Br

A/tl.a ~

illlld1
07~3

[!

*

0' to'"

il1102

COMPUTE ROM AI')DRESS ANO STORE
R6ART (tRTl

nATA 1RT
AT A CT

\(jP4~'

~6~8

ERROR EXIT
COMPUTE CT VALUF.S TO BE USED
IN IHURT
CALL CTRTC",RT)

CALL

~22f

~6[.,J6

C

DATA MIH
PATA CT

"'IlliJ!'

166Q7

PAGE 0016

01'tl2~~

1061~

ij6/'

,..•

,..,..

'*

CI

1i<9,""EMROM

,J NF.

GOFL02

~

•

'*

BLWP .HGETCR12l

GET MEMORV STRING IF TOGGLE
SET 10 BURN

0£IJ26

l41"'1'S'

OATA 5MBYA

001llt.'

OATA t;MBV8T
OATA SkiT
nATA MST~G

,..

IF(DIR!Cf.EQ.MEMROM)C4LL

f3RO~

0

I

94!5391 .. gQ01

GO
07\2

0713

C

01\4

i/

01\5
07 HI
07 \."

01'i.8

01U~

*

0?6~

042C

0~I).tI

0~2C

026#\
0268
0?6A

01filC'

026(,

0101.'

0261:
027 ~,
0?72

~fI!3:2'
0~34'

~~'M.

0111l'

027A

01915'

027~

010('

0123
0724
072!S
01~"

nIRECT.EQ.RO~~E~lCALL

0278' GOFL02 EQIJ $
C2Ael
0041.'

1'10V

"OISPR,R1Pl

027C
027E
028111

lfi0e1

JNE

C38E

~~O\l

1~0~

JNE'

GOFLO:5
R14,R1.
GOFL03

0731

0R62

i326Q

CI

R9,ROMM~M

028A

0("0~

JNE

GOFI.. D4

0?66

lf50B

•

"'734

01-'6
028fl

0.42C

~28A

0(113~'
0@3~'

~i3~

~26C

0739
lJ7i4Vi

026F:

0741

iIl~!n

074:?

~294

0C1J4E'
\lJ1JI0t.'
010','

0743
0744

iiI~I:H'

0196'

02SH\

0081"

074~

0~gA

0746
074;

029C

0101::'
0\1~ ,

02~~

07~H

•

~'289

1l!29E
02M,
02A2

10002

212A.4

042C

02A6

~U~,

w'J75!5

0001.'

07~6

02AA
02"(;

07e7

0~AF

01e~

*

\t.iWln
BRW06T
HCRUIA
S~T

BRWA
DATA ERR
DATA DOUTt
DATA ERWA
DATA RST~G
IF(nI~ECT.EQ,ROMM!M)CALl

RTOM

!Ii

R9

C1

R9,ROMMF.~

JNE

GOFlO!5

f3lwP

'!'HM (R U)

tS OIR!CTlnN TOGGLE

I'H'M.TO.MEMO~Y

0034

02A~

013tJ

•

If\"0~

~7!SA

",tiP

BLwP 'RGET(Rt2)
OATA
OATA
DATA
OATA
OATA

"'hie'

0752
071.53

*
*

GET RO~ 8TR!NG IF TOGGL.!S SET
FOR ROM-TO.MEMCRY,OrSPLAV ROM
OR COMPARe:

029E' GoFlO4 fQU

074~
074H~

01~~

RO IS OJR!CTION TOGGLE

0288' GOFL03 E!.lU S

07')~

0731

RGET'O

Rt. CONTAINS COMPARe: TOGGL!

."

0'1~n

".,>

IF(DlSPR.fQ.YfS.OR.CMPR,EQ,YES~OR.

."

027«

STRING

ERROR E'lCIT

0727
07214
0729
141.3)1
073?

C'

OATA POOz
(lATA 61010"'0
OATA EI'lR
DATA EFlWA
."

027.

(~

SIIRN

kl.WP 'ARI>1(R1?)

DATA iIi\'J 11)

032(7' ,

07;(2

PAG! 0011

DATA BIH~I)BT
OAT. SwT
!':lATA MSTRG
DATA BRWA

,

01 ~!'"
01;\

••

0108'
0112 '

•
•

."

DATA BMBVA
DATA $"'T
t)AT. BMBYBT
DATA RST~G
IF(rMPR,EQ.vES)CAlL CI"lMPAR
IF(OISPM.EQ.YfS.OR.CMPR,EQ.YES)
CALL MGETfO

GO
0161
0'b2
070:'
0164
0165
071515
0107

94~39t.9Q0t

1!12fH1l , GOFI..05

,:' f~ U 'I;

028,i

C~C,.

f-iOV

0262

16~~
C~6E'

0?64
0~e~

•

077a

t/J77!'

" NE

GOF'106

,,~O

R14,R,,01
G('H,01

V

",

042C

iZJ2t.u
026('

0@21J

021H
02C0
02C2

fJ17~

HLWP Ct""GET (02)

IIIlltl~'

OAT'A

IIItvl6 '
0t1l0A'

DATA HJ'l8VaT
DATA 8io1T
nATA MSTRG

04C1
C38E

eLf.;!
~()V

R1
R,4,R14

0179

0RCf4

l~ftle

JEtl

GOF'I,,08

..•
•

078tJi

0181
0182
01d3

078~

018fi

*

0:?CA

at;2(~

02CC
":(lCE

0111<' ,
0U;:!'
lJI£14
07 I'll 1

0200
0?O~

0187
0'~8

0204
2HW6

'"

020·~

019~

0201.'
02{)A
020r:

Rod ,1

"'OFI..8.

GOFLOa EQtI
MOV

RU5,RU5

13w,

JE(~

GOFLt)Q

E(JU

S

020!: t

.

GOFt,~A

.

0t\A'1
"j~Cf!

ot 4('

'"

IF NOT SAME,8!T FLAG SO TWO
STRINGS WILL BE DISPLAYED
SfT D!SPLAY FLAG TO BE DECR
TO ZERO IN DISPLAY ROUTtNF:
TO tNI')lCATE PRINT CARRIAGE
RETURN , LINE FEED 8EFORE
OISPLAY
JUMP TO OISPL.AY
IF(OISPM.EG.YES'CALL (HIPLV
~HS

IS OISPLAV MEMORY TOGGL.!

DISPLAY MEMORV STRING IF
TI'lGGLe: SET TO DISPLAY M!~OR'I
OR IF COMPA~E" STRINGS 00 NOT
MATCH

*
021)f

I(~-'

V

CALL DISPLY(MPHT,BMWA,8MWoeT,MSTRG)

•

0?f. V,
02E?
02E4

.FUTRG

$I

C3CF

~61t12

81,.

'11ISPLY

DATA

MPFn

,

08io§1

0~f."

0AI8t4

02Etl

Id Hlf. ,
01 r.H"
~HU. '

IiPhJ9

fi:li?EA

lfi11t'

0tHVt

Ll

."

iHHU

16~it26

GOFI... D8
IH

JMP

1V!02

1C161t'lfl'

08~5

JEQ
SETa

",

0:?!)R

01~4

IOA03
Vi8\d41

4II~1STRG,

•

01!H

07!H,
0196
0791
01SHi
","g9

c

•*

07~0

(LEAH FLAG. Nn COMPARE
FH4 IS COMPARf TOGGLE
IF(M8TRG.eQ.RST~G'CALL otSPL..Y(MSTRG'
IF(MSTRG.!Q.RSTAG)CALl nISPL..V(RITRG'
IF TOGGLE SET, COMPARE
STRlNGS

0""01

ii?S9

01~~j

GET MEMORY ST~ING IF TOGGLES
SET TO COMPARe: OR DISPL.AY
MEMOHY

01 H'J'
1112C4' GnFlO7 ftW $

0:;.tC.a
02C6

M!J184

0

tHlfHA

13778

0717

IS OISPlAV MEMORY TOGGL!

~

•

17i2tH~

1?!018

R1' IS COMPARe TOGGL.E

•

077v!

077';
id71'J

Ht5

J E(~
02tH' , GOFCOb f' Gill

0769

P4G~

R1.~,R15

13(M)

~76a

07 "

••

DATA BM8VA
QATA 9M6T2
DATA MS'I(G~

JMP

*

GOFl.l~

E"ROR RETURN
IF(OISPR.EQ.YE5,CALL OlaPLY

0

945391.gQra1

GO
\6812
0813

02EC

1lI2EC' GOFLD9 E{~U
MOV
eft) 4 t

0814
0815

0~EE'

1~0~

02FV1

081~

0:?F2

~all

('"

08.~ "
08~)2

08,~

08.4

~IOV

k10,Rt0

131117

JEI'J

r,nFLO~

0f1.AtJl

'OISPI. . Y

02F4
02F6

03Cell'

02F8
02F'A

010t.'

02FC

""0!')'

0'Ff"
030111

0113 ,

U0E

•

OAT A BRBT2
DATA RSTRG2
JMP GOfL1Q1
CONTINUE

160

0~e:;>

0~86

EQU
INC

Vi831.

0~1d41

If'itil1

JNF

GOFL0r

0832

0306

0585

INC

1<5

~31t18 I

\0833

d;tll:l~

GOFI~00

GOFt.0C EQU
C

31

03~A

1~1I.l~

JNE

GOFL0D

083~

03\11C

8141

C

R7,~5

08J7
083R

0~0E

l~lI:'l~

G(1FL~A

01339

~~1~

031('1'
04f>0

JEI'l
EQU
A

0::312

lilt!'t.'

"'84~

\il843

0844

0314
031 f)
031f\

1d845
084';

0"8~

CI
~rNF

16VJ~

0311. '

$

CONTINUE: LOOPING

'GOFLDt
S

IF (OtRECT.FQ.SAVIMG)CALL
R9,SAVlPo1G

GOFL12 EQU

GI1FLt~

SAllE

1d84Q

031A

i(l46'1l

0:51C

044~'

03U'"

If'

045~

F~OM

B
GOFU0 E'1..ll!

'*

STANOA~O

.SI/SrIM
$

RETURN
8

.R2

HUGE

RETURNED TO MONtTOR
SVSTIM THROUGH R2

CONT~OL

•*

ra~

SVSTtM
w9 IS DIRECTION TOGGLE

$

'*

084~

0JHH
VJ802
0853

••

CHECK FOR LOOPING COMPL.ETED

0~0~

~847

108!)QI

GOPL0A EQU

CARRY TO R5

wH,RS

0835

031~'

VALUe: GREATER THAN p.FFFF ADO

$

031/18

GOFl.00

IF COUNT IN Re INCREMENTED TO

R6

(0834

0!34V1
0841

nlSPLVrRPRT,BRWA,BPwOBT,~STRS~

DATA RP~T
DATA BRjl/A

0829
083;.'

030~'

IS nrSPLA" ROM TOGGLE

DISPLAY ROM STRING IF TOGGLE
SET 10 DISPLAY ROM OR IF
COMPARED STRINGS ('HI NOT MATCH

51.

12l15~

06,:6

R10

CAL.L
S

0~C!R

(

•
•
•
•

02Ft.' GOFL9A EQU

08;"5
08~:7

8FT

C2tH.

0A~~

lEST FLAG", JUMP TO DISPLAY 11'

R 1, rq

GOFL9A

01H9

PAGe t'lA19

$

JNE

0811
0818

•

••

iI.

,"

all/ORO
tWIo(N wORO
... REVISIONI 03/1!"i/7B
...
OR
NAI..

'"

1tl8tH~

rcu

... COMPUTER; Q90,ASSEM6L.V
... ABSTRACT'
...
LOAO AOORFSS, PULSE WIDTH, AND SUASTRING OF
...
PROGRAMMA8LF STRING WIOTH IN eMU ~!GI!T!RS •
...
ON RETURN FPOM PROGRAMMING CYCL!, LOOP FOR
Rf1RV IF NECESSARV AND REQU!STE"
." CAL.LING SEQUENCE •
...
ENTRYI
...
HQ CONTAINS sueST~ING OF ROM WORD WIDTH
R7 CONTAINS ROM WORD AOORFSS
."
R7.~1~ , ~13.Rle ARE NON.VOLATILE TO THIS RTN!
EXIT',
'*
R3 CO~,TAINS L.OOP COIJNTER FOR 8wORD ROUTtN! AND
."
IS NON.VOLATILE TO ALL SUBROUTINE! CALLID ev
...
"WORD

1IiIS(j(.1

01:HH
0862
0S6;}

liSae4

•

0~6!5

0tHHi
~ao1

ilI6ti8

..

0869
087c,
10811
10812
0873
0814
0875

'"

HIIIORO

...
..
..
..
..

081il
~61"

0818
10879
0IHH'I

081H

c

., TYTLE:

0806
0857
0fHiP!

032(1\

C12','

0~~2~

1il~3~'

0~2~

C"2~

032'"

Il'HJ!3C'

0BtS3

i:: QII

$
MAS~ NUMBER OF AITS TO Bf BURNED AT
ONCf, THEN LOAD VALUES IN tRU REGISTERS
CALL SU8ROUTINE TO SET GO erT AND TEST
FOR ERROR~

Mav

II.w~IO/PSTW

'WwIO,R4

.

COMPUTE HOW MANV TIMES
PROGRAMMING LOOP TO
PROGRAM STRING OF ROM WORn
WIDTH IF PROGRAMMING sueSTRING OF PROGRAMMABLE STRING
WIOT'"

...

0H84
0t1tH'

THROUG~

..

lil$466
ttHI1:f1
IiHli::t8
0€Hi9

.-*

•

0f.igl)l

.

DIV

RI"t,~3

MOV

f./4,R4

IF(JI*PSTW.N!.wwID)!!_IY+l

0f,,91

\1:52A

08~2
0~~3

0321':

1301

JE.(J

all/FLOt

il!~2f

0563

! Nt

k3

C Ull-4

03am' BWFLOI €QU

0~!144

.
...
..

0895
0896
0891
06ga

0899

$

SETO R5

IS RIGHT JUSTIFIED
STRING OF ZEROES OF PROGRAM.
MABLE ST~tNG WIOTH

MASK

09111'11

0901
0902
ItHh:l~

091D4
i0905

00 2'0 I-t,U

'If

0334'
0:334

0420J

033"

"H~"'I,~
C(:IiAO

033~

awFLO~

..

fQU

$
IF(POnZ.EQ.1)STR'AND(ST~,.OR(MASK,.1)'

su,p 'ACL.
MOV

'R2.2(R13),~2

GET NEW WORKSPACE

o

BURN wORD
033A
09il1i'

('

OA!i:S91.9901
C12~

033E

0915~~

MOV

,

~912

0913

...

I!IYlt

0914
091~

0340

C041

0918

0342
21344
0346

130~
424~

09114
0Q~1

10101

034A

$

MOV

'RCRUrA,R12

MOV

Ri',Rl

SRL

R 1,8

BL

"lOADCR(~A)

210AE'

",92A

1lI:35~

0981

0352

1(16A4

03f1A

11.122e:

0~~6

000t1!

09315

035A
035C

06A4

0937

0:5e'JE

el10C11

0::StH"

0~.cIl

06Af.

0942

0302
036.t1

0:?215

0943

0~66

((\30~~

tt)Q44

cCRURG1>·MOD(ADOR/2~6'

GET LS8 0' ROM WORD ADDRESS

...

MOV

R7,Rl

Sl

'LOADCR crU)

LOAO IN
OATA AOORl

*
*

MOV

R9,Rl

8L

'LOl\OCFlCR4)

OATA

DIN]

C02tt1

036.

00315'

0947

MOV

,pwt,RQ!

036C
03ef:

Ii:HHH1

0~~71i'!

1/.195\
09!52
11.1953

0372
14:374

MASI1

RU,8

5tH' RETURN

~1.' CA
J~Cr:

0210e
iOA2!Z:

8 L.~! P

,ACt..

0~CF

GFT NEW wORKSPACe:

~33e.'

1(il35

l!A3R
1 (.137
~ ~13 Ii

~3DV

1 \1139

~~rJ?

1 ~14 Vl

IF(COUNT.EQ.0)CALL PRCRLF
CHECk FOR NEW LIN!!
DEC
JNf

R4

Bl.

,FlRCRtF

t~3t

JMP

02J'4

l.I

OSElClT
h4,4

0f;V14
11'1 Vl"

OISPl

11

H!41

0304

01\4!71

~"ot\

~Wv.!t.'l

tt!142

.,,, Ofl
""hi A

1043

..
•

AorH~ESS

CARRIAGE

~ETlJRN,

LINE FP.'EO

SET FLAG TO DISPLAY RfST

~~oc

011l"'.~

03DF

CQl41

M()V

IH ,R1

0~E0
~3E2

1306

,JE fl

nrSPl

1 \~47

02~A

LI

Rl~,OMPSPR

ClF L.INE wITHOUT CR LF
CHECK FOR CO~PARE ERROR
IF NOT, Sl(lP F.RROR PRINT
GET ERROR INDICATOR

1¥14a

'a31!A
:33Ef-

11')44
1f~ o4!5
lV'146

It.l!49
Ul'CI!

f8~H10

0t\Afli
0f!\fllQl

~L

'PRNTC

ANO DISPLAY

03E~

V,I:3E.A
[d"EC

1025

JMP

OSEXIT

01'),,~

ABORT IF f!RROR IN PRINT CALI..
SET FLAG TO DISPLAV SECOND
DISPLAY STRING ANO THEN START
A. NP.'w LINE

...

li(j~H

..

1052

03EE' OISPl
,.,
...

10~3

10154
llil~H,

HH56
hHHI

J.~!fH

CB4t

~3F'"

tlJ0~'

t5~F~
~JF4

C283
0~C~

1~6fi!

UHH
l\?lea
UlfJ3

nEcr

EQU

R4

s

...

1056
l!H"

...

...

MOV

R4,"R4.~(ln3)

/010 V

INCT

R3,Rl~
~3

RL

'PRNTC

...

,UFti

06AI1I

~3F8

03E8'

COUNT-COUNT ... !
SAVE VAL.UE !N A. OF PREVIOUS
WORKSPACE

CALl. PRINTCTVP!,
1'H0 CONTAINS ADDRESS OF 'HI
OR , R , TO 8! PAtNTEO

C

DISPLAY

,

('~
..... ~

ST~lNG

!U5~91 "9~HH

hHS4

03F6

$(1120

JMP

OSEXIT

HHS5

e~,c

CV7~

1066
1067
1008

.,~,~

t281

MOV
f

100~

(~43e

ii)'3r

I!H5Ef'
0016
043C'
0420

r.1A3F

03el!'

.,44'"

0A~8

0'3A
1 h1Ll1
110 t

11\1.1:2

R10 cnNTAtNS !QUAI. SIGN

CALL PAINT (STRING)
fH Ih CONT AI!'.'S STRING

SL

"PHN'fHB

JMP

DSEXIT

LX

R10,8lANKS

BL.

'PRNTC

,

,~Sl9

CAL.l PfUNT (f\WOBITl
R10 CONTAtNS 81T WITHIN B'tT!
OR WORD

CALL PRINTC.)

l08Q

*

AOD"ES8

*R~+,Rl

*Rt ,RU

~42~

l.,,~t

ST~!NG

RSP.! CONTAINS ADDR!SS OF
PFRIOD

Move

hHHi

1092

~'"

BL
JMP

Ut!5

"

CALL PIUNTC.)
R10,PRTPRO

MOV

1"'b4

C·/·

LX

un ~

ll}t~ 3

(~

DSEXIT

C0i'~
I) 2 {.I t

06A!I!

CAL.L PRINTOHU)
fH0 CONTAINS

JMP

~UVJF

0-114

.R~+,IH

'PRNTHN

041V

•..

PAGE A02!

P,L

111'78
HH7

107 Q
1\lib'"
11l1t\1
HHI2

••

C.ALl PRtNT(

JI'IP OSEXlT
tNCT .Rl1*P(R13l
OSEXIT EQU $
SLwP .RR

e

*Rll

)

E~ROR

R!TUPN

RETURN WORKSPACE

SAVE ST"NOARD IMAGE
1\16'"
~

.'"
..'"

1III tl

UliJ1
1 hl~
l1lh9
l1U!

11

...
...
,.,
...

1111
Ul~

111 ~,
1114
U 1!5
1116
Ul1
l11R

..'*

022
1123
11241
lHH'S

044~'

~44i?

13444

C32111
0050'

TAKE UUGF.S IN WOAI<:rNG TABLE AND 8TOR! TME'"
A USFR.f!JROVIOEO 10 C~ARACT!R STRING IN
HEX ASCII FM~~AT ON CASSETTE OR REPLACE RECORDS
WHICH HA"~' 10 CHAlUCTI!R STRING MATCHING USE"
INPUTTen

CALLING SEf.lUENCEI

0446

06Artl

034

044A

H3!'>

""'4C

0A~H!

0.1141:
04!5P1

C80A

NON~

EXITa

UPON COMPtETION RETIJRN CONTROL TO MONITOR
THROU(;H R2

al/STIM EQlI

.s

S~T UP PROGRAM BIAS TO LOCATE
SIJ8ROUTJNfS IN E)(l'ENSION

..

PROGRAM

MOV

'PGB US, FH2

PRINT QUESTION ANO GET
RF,8PONSE, SAVe: SUFFER RETURN.
NUMeER OF CHARS. IN MEMORV 10
STRING, ADDRESS OF to4!MOAV 10
STRING
CALL PFBPCG

"OleA'

*10fJ1

81-

DATA MEMIMG
,*R2

e

*

Rt!lI,flaUF'RTl

~ov

114(11

C2. 3"
0!HU

S~L

.R1Q1+,RA
RA,a

11411

t1A06

C204

I"OV

k4,h'8

"'4f)~

ettA

MOV

R 10, R7

AL

'PFAPCG

U4~

1144
114'5

'*

•..*

1141'S

U47
114~

114Q

111415 A
Cj4!5C

U

!)rA

1d415f

"€SAUl
r.!lti06 ,
1Il"'7 til'

H5t

~l4(HI'

ilIi1lS~

UfH?
tllS;~

.

ntt6~

CIHtl 1.

~14eA

0 v1 8C'

•

ESCAP!
SAVE RIP!

MOV

..

SAVf. AOOR!SS AND

..

.. OF

CHARS

Nt/MeIER OF CHARS, IN M!,.,ORV to
STRING
/lOOR OF MEfio10RV 10 STRING
PRINT QlJESTION AND GET
RESPONSE, SAV! suFFER RETURN,
NUMBER OF CHARS. IN RnM In
5TfUNG, AOOR OF ROM 10 STRING
CALL PFSPCG

DATA RO"'IMG
8

,.

(IIPFapCG

"'452
111454

tt 43

STRING

EtJT~YI

..

0 4 4A

C

WlTH

'.*

0~08'
0f117~'

1138
1139

AfHiTRACT.

'*

02A
1129
U3ii1
1131
U32

PAG! 0028

SvSrrM
SAVE STANOARO IMAGE

.'*

H27

U36
1137

••

RI!VISrONI 03/151115
ORIGINAL.
COMPUTfPI 990,ASSEMALV

...'*
...

U2:A
U2J

U33

TIHE'

...'*

1119

lUi!f:I

94l5391 .. SHHU

.P2

ESCAPE
SAVE R'10

~ov

R1.fJI,'AUFRT2

()

SI\VE STANDARD HU.GE

(~:

1 H54
115'
,l.lbi\

A46"
0"68

C13t.
09t\4

He1
11 SI3

,wHTRO

161E

JNE

m6A~

6L.

S\le
.WRTl

JNE

ave

~47'"

0eAV-l

t1472
C1.1l1A

0664'

1 u);

11615

",A1f)

&1478

Vlfil~'

1167

0~7~

CtAt.

162. e

~47C'

). H~9
02~1

~'147F

tH'hH,!

t1.48V.

(11",,91

t"48~

~672'

0484

1621.

l17,\

\174

C

1176
1111
1176
~A86

C0~a

'~488

1:5kl1

n~8A

C047

11815
f14 8 r.
(.·1A8F
(149V.

'~49'

11"5

l1YR
1197
1 UI,\
119g

..:~.,:

•

'1,4 g.4

06AC

•

03i1JA
~l'I6.4'

'''i:lt'
0ACe

...
...

IH , RE AD A.,5e

"L.

,wFH1

8\113

JEQ

R8,R0
SV3

MOV

R7,R1

MOV

10~F

GO TO 10
CHECK I' UIER MEMORY to
STRING NOT ENT!ItEO OR ALREADV
MATCHED TO to .TRING Of A
PREVIOUS ~!CORD

IF NOT, G!T ADDR OF USER
"'EMORV 10 STRtNG

CALL CHECK
fCHECI< 0'12)

OATA

L.OBUF

JMP

5\13

-

CL.R

R8

'"

J,.,P

SV1

EQlI

S

0.PI' SVi5

12~1

*10

'"

RECORD

ERROR RETURN
IF (PRSS' .111£ • II!!) GO TO '0

BL.

.",

rilA 9(\

REAr) A

1'(COUNT(l).!Q.~)

'"

12id l)l
12!n2

C'

'"

.,

$

LX

JNE

NUM8ER OF eMAAS

10 STRtNG

CALt I"JPEN

CONTINUE

'•"

H91.
Ug2
U93
UY4

•
*

OF CIoiARI

,np~N.2e6

'"

111;4

11901

'"

EQU

.,

OF ROM 10 STRING
AND 8 'OR
LUNOS
RI!'AOING AND WRITING
AOI)R
OPE,.l

•'"

1183

1167
1188
1189

SVl
*1

0011

,u C:ONT.INS
ROM

'"

118t1

1185

*

*

1119
lt81
d82

..-

ADORESI AN"

IN

8L.

.4.1t'l4

111~

SRL

PAGE

.P1 01 .,fU
fU,e

Fn

02~1
0~H'~

1112

MOV

LX

046C
046F

f147C

••

--

SAVE

R10,IH!

~146A

417 '1
1111

'"

MOV

1 USQ
1160
1161
U62
, 1#:;;~

U6~

94!5391 .. 99I1Jl

CHECK IP' STRING MATCHES 10
STRING OF PRESENT R!CO~D

CMEtlC NOT FnUNO
GO TO 1~
CMECI< FOUND
COUNT C1)-0
IIllOIC4TF. MATCH 'OUNO BY
CLfAR!NG CHAR COUNT

GO TO 2'"

IP'CCQUNT(2l.EG.0) GO TO 15
CHECk IF USeR RO,., 10 ST.UNG

S#\VE STAf'.jO/lR() IMAGF

•
•
•

~2t(,~S

12~4
12i/1~

12f(16

(149ft

C"'1d4

.

1201

..

l~1'l8

12Vl9

~49A

12H"
',211
1212
1213
1214

(-,APt

1215

C1Ji4!5
13!11e

..,

'*

PAge

"~AC

l.u1A0

kI.30.t

f\"A~

~4~~'

~14A.tI

U({j~

..

1219
1221.-1
J,221

V1AM

1a4Ct.

1222
1223
1224

'14 AfI

~(I!0f5

',2a5

04At.'

1226

1229
lP.3f1l

1231
1232
1233
,l23A
1230

lUlU A
j:!4AC

(1201

1)IAAf

~6A!ll

il4fH'!

~6ei4'
~4a~'

~'4B2

1653

\148A

"lS00

1 ('jE'3

1238
1239
UlAI"
t241

1245
~2'"

12411

!~4tHI

~!4B'"

'l48A

~128P'
I,H1140

~'i4!H

13"'~

OABC

.l,2!5P1
12:31

,

fi'!1I6f

112ViF
\~ll)\ 1 E '

Cider'

~~209

r1AC~

O~l!Jl

~a48

U4Q

4LREAOV
STRING Of A
PREVIOUS RECORD
MOV

IF NOT, GET AnOR OF USER ROM

10 STRING
~'ov

He,1o(1

J E{J

SVlS
C:MECK IF STRING MATCHES 10
STRING OF PRESENT RECORD

C4L.t CHECK

RI.

'CHF.CI«(R12l

DATA

LnSUF

CHECK NOT FOUND
GO TO le

~l4C4

" V!fi)(

JNP

SV5

tl..R

R4

JMP

SV7

f.QI)

:ti

CHECK FOUND
COUNT(2)·'"
INOICATE MATCH FOUND 8Y
CLEARING CHAR COUNT
Gn TO 2'"
COpy REeOR" IF NOT 10fN11'%£0
ev ROM OR MEMORV 10 STRINGS

Rt,~RITA.2e$

Ell..

'WRiRO

sve

fl~U

$

....
....
..,
..
..

JNE

ERRER

*20
9\11

.

(

I.

R4,RPI

L.t

•

1236
Ul3'

1242
U43
124A

SV~

.

1221
122~

.
•
..

PAG! 1'.11026
~NTER!O OR
~ATCHe:O TO 70

"",..

1211

••

NOT

.

UHf!

121A

94!5391-SHHH

CA\.t

WRITF (SFro

RFTURN TO
JMP

SVl

EQU
C:l

$

RUh

p~Oe!8S

NEXT ReCORO

GO TO 1

IF 10 STRING t.4ATCMES RECORD
10, CHECK TAG ON RECORD II) TO
DETERMINE IF RECORD CONTAINS
MEMORV (lR ROM CONTROL INFO
REPl.ACE RECORD WITM CONTROL
INFO FROM WORKING TABLE
XF(TYPE.EQ.'M')GO TO 30
,~,

JEQ

SVg

l. I

wt

JMf,ra:

94~391·9Q01

...

1297
UHIH

~!\0e,

1i\6AC

j'~fC2

\2519

;1:'1" 4

I'31E
£HSJE'

1310(.)

i·.J~0f1i

~H561.

),3\'11

'g~fc)8

102e

,

f1~"-l/, •

l3lt13

13,,4

CALL CVTWRT
,CVTwRTCA12,

OATA

CVT~HJ(

t30t}
13~7
13~A

(-Ie. 0 ~

(:2164

1311

1'I!50r
;,130r

1314
02015

13U!

':H512

1313

'1~14G

.I.31d9
131~

,;,151 VI

IF(COUNT(2).EQ.~)

SV19

EQU

...

IF uSER ROM 11) STRING NOT

CV4~

~ov

Rfii,Rt

~'2~ 1
k1 RI es 1/\

Al

Rt,80

eL.

'Al,.IIIK (RUn

MUV

R5,R1

k'~lC

C1C!'5
020!r

~~24

0?0f

VI"26

w)01E'

~e28
~52A

0209
td01Ql

:H'i2C
~.H52f

1329

"""
2
l~~34

•...

LI

RlI"RTEMP

Ll

R9,RSl

0fSAC

BL

.CVTlliRT CR

031f
rHi3E'

OATA

CVT!''''!)(

~3;)'

...
...

JMP
fQU

SV25

w~TI(O

,

EHRE~

CALL WRITf:CWEOF)

AL

,WRTRO

JNE

ERfH!R

~!OV

RETURN
.BUFRT 1, R HI'

ru~~
1i)00~

~LWP

'RETeUF

C2Ae

I"OV

4IaUFRT2,Rt0

et!53A

~eA~

,H53C

06t54 '

J53E

\ ell,H'

'1~4VI
0~42
;~:S44

C2A~

t33!S

•

klJ08t'

("548
I~~'.

un

R1., we;OF.2!58

13J3

133~

COUNT-US

LI

1"201
vJOtdlll

;~-';4~

wOTeL..RTE"'P

CALL CVTlliRT

OATA

*60
Ij536

U~7

,-

LX

1332

~33fi

1"....

R0,.R6+

101~
0~36'

··H~3fj

R~,R

I"IOV

...

1330

GET AOOR OF ROM 10 STRING

I

t(lf!ib4'

1334

CALL 8LNI<

CP!UFFI!A' 'TYPE.
8IJFfI'!FhAUFFF.R+l

00tS~
CD8~

~32t

;·H~3~

..

~35t

115H
Jei2C1'
.tl522

1327
1328

•

SV2~

1316
1317
.\ 31l'l
1319

132~
\~U6

R4,R8

~Ov

1(f),LOf4UF

lil"AC

1323
1324

*

JEQ

vIe; 1~
(HllA

1322

8Y END OF FfL!. ADD
10 STRING AND PRESENT RO'"
C(lNTROL INFORMATION TO !I'lL!
CHECI< CfoIAR COUNT FDR ZERO
INDICATING MATCHED tD STRING
MATC~EO

l.l

~315

132v.t

GO TO eQl

$

~4E2'

~t*t 16

1314

C

OAT. WRTRO
JMP EH~ER

•
•

~J1tl5

PAGE "'030

tHo

*!'IIIJ

.1.3"'2

••

C

0C18C'

I

I;
I
I

I
I ..,

--

_.

---~

...

--~.---

..

--~-

.. --- .-

--

~----

---_._------_. -

----

_

._ _

~

___

~_.O..._._""_

.____ . _ _

~

_ _ _ _ _ .•. ____________
---~

..

-~-.-----

---- -_._--_._-

SAVe:
\33 0

C

134 1,1
lJ4t

ST4NO~RO
~54r

~'A20!

1.!~4F

1~~4fj ,

,,!S~V

'J45~
0~~~'

1342

lJ43

1344
1J45
1J4"

.
ERTYPt
*

v'J 4t·~'

Hlf)4

11 H~'
~5t'>e'
1¢.4hli"

ERTYP2

~:~~~~

iH Sf: '
1i)55f.'

ERRIER

l"~!5A

~'46l~

!.,~~c:

019$'

;~~~~

••

61..WP 4H'E nHJF

~!552

!.347

.. 34R

9'e'i39t-9QQI,

IMAGE

J.\

*"'2

FYI.)

$

8

flNM4TCH

E.(J"

s

R

'RArUI':lO

R1Q1.EOFMSG
CAI..I. ERREP

~.

8

gU

$

,fRR

PAGE "0:51

~3.,t

", TIlLEr

LH)~

COMMANV STRING PROCESSOR
", R~VrSlO~J 03/t5/7~
",
ORJ~I~Al
", COMPUTE;, QQ0,AI5FMALV
", A~STRACTI
",
FINO !~AG!S ON CASS!TTE WITH TE~T CHARACTER
",
STRIN~S THAT MATCH COMMAND PARA~ETfRS AND
•
T~ANS~ER IMAGES Tn wOR~JNG TA~L~

.I..' ~:\
tJt>4
l~o~

t.HH;
C'~7
~ .~~~~

~ ~i:)9
136,~

•

Aj 1
i. .~tl ~

•
",

f'

t364
J)~5f'

,

130f!

l367
136H
~!560

C21t.

.

l ~17 i'l

,!Il ti ~

,1 A£11;')

CH2

A!5 6"

UH'IZ

1373

~~6t

04M'l

,1~6~

III 1 ijt1l

*

l~i"

1314
l377,!56f

023A
"988

~37A

~38f1

H56~:

1!;7lil

1 ;~ ",4

t3dn

'HH'P

t3ati

.)51'"

13~ 7

,''-' 7~)
''''7b

$

~'UV

R1.1,R?

~,ov

*R1 i/1+,R9

51!.. A

r.c9,9

P~ESST.LSMFT(CPL(t),9)

pscs 11
'f\
141)()

147'·1
11111
la/~

1473

t:')!'iCf.

0?HF
~1 14 4f)
1 ;~ Vi ~

0!5CC
2!5CE

0;>1tJE':
0'~ 1 E '

t'J5Cfl
it1~CIol

1474

1415
147t.)

1417
141H

(1 ~ () tt,
[(l502'

0t: 1 if'

0504

1 r~14

14tH
l<11e?
14d:~

{I~06

1.41')4
14dtl

',il5()A
~!;OC

0i-"0E
eW0/, '

IiH·AC

14~\

0!50f.
135ft;
0!5E.2
01t4

14~2

~'t:.f:\

11.1 If: \Il~'

0t5EA

(;FBI/;

05EA

0fl~~

0~EC

lFtFB

14~;,\

14Y4

•

0~·b ~

,

r.1HII.

I

II')

BI..

C6LI~
'CHfC~: (~U?)

DATA

LlII'I.IF

(;

FnUN!)

PS;'

FOUNt
CnUNT(2'!l0

CHErI<

Ct....

k4

EQU

$

r~OlCATF MATCIo4 FOIJ~n BY
CLEARINf; CHAR COUNT

IF(TVPf.EQ.'M')GO TO ~0
CHECK TAG ON ~ECORO 10 TO
Vr:rTF.RMXNE IF PIole:SfNT RECORD
CONTAINS MEMORY OR ROM
c.nNTf:(OL INFORMATION AND MI')VI!
INFOkMAnON TO WORKING TA~Le:
M'TER ClJNVERTtNG TO BINARV

(1

f.!U!i ,

"En

PSts

LX

ioI14,RTf MP

,

~1

,

WI< H\L.• rHEMP
,..-

CI"lUNT·16

LX

R9,~SZ

JMP

PS7

fQ[!

1

L1

k14,MTEMP

L1

1oi9, ;"SZ

f

$

"'.

Gf' TO 55
wKTAt,.lfo!TEMP

Cf)u~IT

(,iU

Ot"l 60

.U

.

l(l'D~

'*

1-' ,cnu"'T

CALL r,V1MXf!
RI~

~H:VTMXB

UiI12l

DATA CONPRR
OATA HXS
DATA SVCALT
(WKT6L)-RIlI
~iOV

1010,*17(14+

ClEr:

R9

.1 N F.:

PS7

CONTINUE

*
0~EF

STRING TO RECORD

CHECK

CHECK NOT
JMP

STRING

Gi'l TO 20

*60

14~g

1 e5I1H'

PS7

0~'4~

149~

1446
14\:17
14\i1n

SECf)ND CHAR

."d55

114 ~H'i

14 ~(A

.

11(''''''

1487
1489

*50
PSI!

(i'I~3~

v)V:lllt
:a~DE'

14d6

..
*

\1'-lno'
v.150B

•

0;)0~

1479
14dltl

..
*

l~f.:$

141:)1
lilt'?
!'It)J

PAG~

...

1<1~4

14;')1')

••

G1') TO 2111
.'MP

PS~

RE1URN TO PROCESS NEXT RECORD

C

HWM S'."'IJARO CSt
1l')1{)1

~453Ql"9Q"H

!05FV'

15v)~

('
,-.,--'

1503

nh1f')

~,5Fr,it

r4~4~~

05F2

2 \~ v.dl

05F.4

13H~

..
...
•
..
.•
..

1~~1

1 ~~18
15vl9
HiU~

1511

~5J:6

c:?~e

15)2

05F~

If'iAE

1!)13
151<'1
151 !'Ii
15)fi

1517
1518
1519

05FA

CHI,4

0!'5FC

16AC

•..

152~1

15~?'
15~J

IiI~Fr'

1~Cl4

1~2f)

(>

05fF

8e2~

0 fii v.H'1

';;Jt'I~

~HS ,~?

!Q tA 1f~

k'l6~.1

1 ~Af;

IF fRROP OTHER THAN ENO.Opt.
FTlF, AeORT
IF(ANn(R0,EOF~S~),E~.~)CALL

0~~fi

~:t45~

JE('I

f_R~t::w

IF FIJ.;lST CHAR STRING NOT
H C.-.F.D TO 10 STRING OF ANY

~

•

ABORT
Rt:cn~"
IFCCOUNT(l).NE.~lCALL ERTVP2
MOV
JNf,

RA,R8
~'Rl

(,HtCk.

COUNT-PI

C~AR

¥P?

IF SECOND CHAR STRING NOT

P'lnCHfO TO 10 STRING OF ANV

AanR!
ERTVP2
CHECK CHAR r.OUNT.'"
~Eco~n,

1'(COUNT(2),NF.~)CALL

1'10 V
JNF'

Rd,R4

ERTVP'

IF MEMORV STRING wtOTH IN
wORKING TA~LE DOES NOT MATCH
ROM STRtNG wtaTH IN WORKING
lAaLE, ABCPT

IF(~WT.NE.SWTR)CALL

fLHt

:I.

c

,swr,tI!swTR

JNF

ERTyPt

e

*R2

,

•

ERTVPE

AND! RV1,EOF'PiISK

l, ,

1521
l~:.!R

•
•PSg

PAGE 0035

$

..

15;ct

1'5t!5

EQI!

•.

.

45vl4

15,1)5

PS8

••

~e:TIIRN

F~f(

I-' !'( CrU, F • Bl N Jo\ , P Rkf /" , GET BIJ F

15Jl

• l TTLE I

15M"

."

153:~

f(FvtSTO~I:

'*

uRlrtlft,JAL
CM'PUl'ER J 9f4ll!, ASSEMfH. V

'*
'*

153~

1537

~RC~LF,~LNK,P~NTC,GF1RUF

•

.

l~,H

15Jt>

PF f;t'lCG

V!:3/15/7"

A~SfRACT:

PRINT QIIESnON AND RECEIVE ANSWER FROM

15JH

..

15.}(,I
154,1

.. Cal"LIl\iG SEQIIE:NCF.

1~41

..

KEYrlOARO INPUT

."

ENTRY,
R10 CONT.TNS

..
..

EXIT:
N10 CONTAINS

1!)4~

•
•

GETFLO

HiMI

•

154?
1!')" ~3
1544

1541
l!'i4~

1501
If>52

IlIfil0J1

1!,)53

0"l1t
0er,0E

HHS4

051ft

JII:OV

.R4+,Re

tl,l~AIi'

8L

J!IIPRCRLF

03uf.'
11A1OF'

.IMP

PFEXIT

150~

0612
0614

~1?ltlf)

15~1

V,lti16

C~~Mi

01'118
0151A

0221

~~Cf~

0~' ~ i?l

1~6~

0~AC

0301,

•

C285

1564
HH)!'!

1568

~,,.,

Art

kHl22
0fi21ll

043A'

Ii;lti2f:'

1,~ \ill.

.

1569
157 (1

1511

0628

0filAf~

062/1

V,lCW!'1

It)12

062t

1 (4 III ~

CO~TAIN

BYTES OF CHARACTERS

RETUR~

ADDRESS

RETURN
GffT 6UFFEQ

ERROR

BLANK FILL RUFFER
CALL

1~14

~,~C ~

lrs?!'>

0()~H~

1'51~

01l~~

PFeEX

GET ADDRESS OF QU!STtON
HOV

CAI..L PI(NTC

CAl..t

~EV80ARO

!'H!TF'~O

PF"E;.tR

E Qil

:1\

tNCT

k4

H

PRINT QUESTION

ERROR RE"TURN
GET kESPONSE FROM

JMP

, PH,)(l T fUll

..

eVH~

6ItRl.NI«(R12'

JI"iP

0"'2[1

1518

FRO~

GET ENO OF SUFFER

•

1573

1517

... RI~(~)

SAVE

.'*

,eslSf'I

lt567

OF RETURNED ALOCK

SAVE AD OR OF QVESTXON

..

l~ol

ltl"'lE

PRINTED

S

..

15()!,1

061t

•

~E

,

1558

1562

*Rl~(P)

'*

Cpt

lel5!,)

1~59

'*

1'111,RA

1~4Q

15:5(;1

Aon~ESS

TO

.Rl~ CDNTAl~ NUM8!k OF CHARACTE~S
+Rl~(1) CONTAIN TERMINATING CMA~ACTfR

PFBPCG fQU
..
MOV

0ti~A'

gUESTIO~

::II

*R4

IF TE~MINATtNG CHAR IS ESCAPE
CHAq TAKE ERROR EXIT

c

--~----

9415391-SHUll

PRCRlF,aLN~,PRNTC,G!TIUF
0~32'

U519

C

15801
1581
1582
1583

15e.

PFERR

E'QU

C~!5t

MOV

'*'HtA,Rl

063'

0A81

SLA

IU,8

0f'136

9A01

C8

R1,'ESC

0e38
063A

0A00

JEt)

PFEJ(IT

JMP

PFa!X

lat,.

13Ft

PAG[ (/I0!7

s

0e32

"'153C

**

,

I

I

CONVERT AINARY TO HEX ASCII

usa?

....

1588
1569
i5\}0
15g1

.. REvtSlOl\11

.

1 !H~2
15gb
15Qtlj

UHn
1598
1599
16~i'l

.

1 I') Ii) 1

lCSkl2
:H)3~

042~

,H;4fi1

03Ce:'

1.61(14

Uhl5
11':i~f.S

0604~

06411

020"
0054'

16~1

0tl4f>

C38A.

16\.38

16109

CFAI'l

1610

8L~P

.

..

"

cCP'unp~.r::

LX

R10,CONPRB

..
'"

1611

..

1612
1613

..

usa0

1621
HS22

1623
1524
11525

l&ae

1621

ASCII

"AC!..

064C
064f

0'20
05Et'5'

065~

020~

0652

00~4

..

MOV

DO CONVERSION
CONPRB~MEWASC(R~)

LX

,..

BUFF!R(t)'CONPR8Ct)

ftHHi4' CBM!
06504

OOBt

065f!

0603

0658

1t'SFO

(4tH5A

cejfftl

0t1~c:

0001:

0fi5E

0420

~e60

043['

~662

04'8

.

G!T PRB FOR CONVERSION

OPCOD! FOR BINARY TO HEX
ASCII CONVERSION

005C'

16115
1611
H518
11519

ME~

0~/1511~
O~IGtNAl..

.
..

1594

1614
1615

c:

CVTfiHl(

CONVERT BINARY TO

• COMPUTER' 9Q0,ASSI!MBL.Y
.. ABSTRACTI
CONVe~T BINARY VALue IN R0 TO FOUR HE~
*
CHARA~TfR8 AND MOVE THEM INTO BuFFER
.. CAI,.L,ING SEQUENCf'1
ENTRYI
R/5 CONTAINS CURRENT BUFFER AOOR!SS
."
R~ CONTAINS BINARY wo~o TO Bf CO~V!RT!O
."
~4,Re,H,,~8'NON.VOLATIL! TO THIS ROUTINE
EXITa
'"
k6 CONTAINS'INCREMENT~O BUFFER ADDRESS
063!' CVTRHX EQU

1593

H'Ha3

TtTL.E'

MOVE CHARACTfRS INTO BUFfER
MOVB .FH 4+ ,*R8+

CONTINUE

.
..

L1EC

iil3

IN!

CBM!

6\,.WP

'RR

SAVE BUFFER

RETURN

A~DR

IN PREV Wk.'

Q45;'Ql-9Q01

WIHTl!/foiEAD

('"

16,s0

."

16rlt

."

1632

'•*

1638
1639
1640
164'1
11542
16<43

'*
0"64' WIHRO

le4~

1646
11,.,

16::'11

HH'2
1653

("
J

11559

'*
'*

066A

C820

0666

,,12184'

0f1tl8

0061'

0eseA

C820

'*

066C

006!!'

066E

0~68'

067Q\

10103
~H'7~

0e72
061.
0~1E1

1654
16515
l6Sts
1651
UJ5e

, WRTt

C820

00se'

1662
1663

1664

03/U5/78

067R

C38~

ae7.

0801

067C

0060'

0t11E

020.

0e8~

0(!1!5E'

0682
121684
068E5
0688

042!1l
1i'64!'

1"6'

0eSE

lfHS8

0010~

0fi8C

IF READ REQUESTED SET I..LJNO TO 7
OTHERWISE SET LUNO TO e

MOV

'EIGHT,'P~BLU

MOV

'(MARCT"PRAce

JMP

WRT2

EQU
f'lOV

'SEIIEN,'PR8LU

SET CHARACTER COUNT

ENTRY POINT

$

.

'*

•
*

•

0201.

WRITE OR READ

EQU

S

MOV

R11,R14

Move

Rl,fPRBOP

1.,1

R10,PRB

SAVE RETURN AnDRESS

ALWP 'SVCAL.T
Ll

R10,MXiH

t-10V

'PRI3SF,R0

e

*~14

LOAn OPtOD!
GET eve PRe
00 1/0

GET 1/0 AeRT MSG(JUST IN CASE

0001

le6111

06SA

S

Cv.l2tlJ
~HH'2 '
046E

I

II

!'

*
0678' 'WRT2

1666

E(~U

0061'

H56A

1661

WRITE/RFAO

•

1644

165~

00~9

•
.•

1634
1635
163tS
UI37

H549

REVI8IOtH

WRTRO

PAGE

ORIGINAL
COMPUTER I 9P0,AS8E:MALV
ABSTRACT I
SELECT LUNO AccnRI'H""G TO OPCOnE. THEN PER'OMM
1/0 OPERATION
'*
CALLING SECWENCF. •
''**
ENTRYI
R1 CONTAINS OPCODE
'*
R,h~6 NON-VOL.ATILE TO THIS ROUTINE
EXIT.
'*
Rv1 CONTAINS SYSTEt-I FLAG
'*
R10 CONTAINS ERROR MESSAGE

163;'

1648

TITLEI

*.

*

OORG 0

SYSTEM FLAGS

PROM PiHlGRAMMER tXTENsrON
1611

1612
161;'

0Q10m

1614
It'l15
1616

1611
H;18
161q

0020

160ltl
HS~t

0(:112tA

HH$2
l6d3

'OQ\22

0ttO,~

161$4

/(j'A2i1

0Q124
!lJtJj0k'l

UilHi

002f'

0124
0026

16ij7

0M2~

0Cl1~!Jl

HH3~

0V12A

l~tsf.i

HSd9
HHlf/I

I/!Vl2C

16~1

0Vi2E

16~3

16S14
16915
lf5Yf\
1~w1

017C

0~3~
0~32

ASS

eTR

EQU s
041A WKSPf3,

BeAR

f.(W
OATA

$I

f,li/U

$

....
.

MGET
aRM

1(1000
k11DJ,
~03!il

16li/P

.
.WJ<8P6F
..
..
011l1iH1i

0i1l2C

RGEl

,

00~4

vHI3A

000~

0"315

01A8

....

PAGE 00410
NI!W WORKSPACE BUFFER FDA ALL
SU8ROUTINE • FOLLOWING DORt;

(;::

32

BLWP COMMAND TABLE
OAT~ NEW wO~1<8"AC! 8U"F!R
DATA ADDRESS OF ROUTINE TO 81
E)(ECUTEO
GET NEW WORKSPACe: AND pOtNT
PC TO ROUTINe:

[JATA CTI\T

WKSPBF
DATA SSART
EQU $
DATA wKSPBF
lIATA MGE1FO
e. QIJ :\
OATA WKSPBF
OATA 6ROM

OATA wKSFJ8F
DATA RGETFO

0vl0r.'l
rHH~

94539 1.S'HH~ t

'H'"

Et.llJ

i

nATA WIlQS

."

11167
1108
11169

1122

TITLEI

."

11 taP]

(

94!i3q 1.SHH~'

ENDING
RETURN

ADORESS

1131
1732

•• REVISION;

113J

••

11",4

1135
113(i

CO,,",PUTER I g90,ASS!MBI.V

PARAM~T!RS TO OBTAIN LEVEl." ~UMB!R AND
NON-STANDARD IMAGE MAPPING VALUES. STORE
VALUES IN W('lRI17
20i1i~

21d1l19

201£11
111011

2012
2~13

2014

0104

lilAl~

U1l8

RP.:VISTONI

*
•*

2AU

2~t1

CTRT
COUNT ROUTINE

COMPUTER'
• A8STRACTS

20,i2

2"'1~

TITLEI

0104
0106
01218

010A

C27f
C2Je:
Ct60
0001.

010C
010E
011V-

CtAO
eLI?

864!5

c

R4

rau~

2022

01141

CTRI

20~3

0116

1A01
3030

lett9
211l~~
a~~t

0A0C
0.C~

R~,.R9

IF ~l.MTl 00 OOUBl!
REGISTER OIVID!

2(,lJ~!5

2111B

3070

JL
OIV
EQU
DIV

IIILl~

0114
011C

CE rrH'~

MOV

R6,.RA.

J03Q

lilv

.R!h,FU

CEee

y. ONT 00' I"'T2

0HE

MOV
MOV

R5,*~HI+
R.,*R~+

RTwP

CT2-MOO(Y'
CT3.INTCY)

20~4

2027

ilJU8

20~8
20~9

012~

CE04

It!I·Hl

0122

0380

CTRt

.R~.,R"

$

*Rg.,R15

X.K/MTl
CT1.MODCX'

,

F' AG! ItHH8

SUBROUTINE SIH

2033
2034

SEGINNING BIT ADDRESS ROUTIN!

*'*
'•*
'*

am35

REV!SION' 0311511e
ORIGINAL
COMPUTER I QQftI,AS8EM8L¥
ABSTRACT.
•
COMPUTE BEGINNING BIT, BYTE, WORD ADDRESS!S AND
..
BeGINNING eTT WITHIN BYTE OR wO.D
." CALLING SEQUENCU

203ei

2037
2~38

2039

204(11

2£1)41

*

2042
2044
2045
2046

2047
2048
2049
209~

ENT~Y'

."

EXIT.

•
."
SBART

R~

fQU

ANO Rl CONCATENATIO CONTAIN BEGINNING BIT
AnDRESS

$

R01!1DMT (l)
k0,IMGDIF
(OMT-IMT_ORT_lRT)

20tH
il'124

0200

~I t 26
0128

00015
C27P!

f'HJ\I

kJ12A

A00g

.4

tR1 4 +,R9
R9,R0

2055 '0'2C

04(;1

r:I..R

IH

21ilt51

012F

39C1

MPY

Rl,R7

2058
2059

\U3~

tHE

20!S3
2054

2056

0\3~

i06~
a~HH

fat 32

2111(52

0134

A230
1101

21!163

013t5

0581'

'*

,"ov

88ART2 EQU

0138

241166

A

JNC
INC
BBFl.Ol fQU

•

*

MOV

fU tS 9
201(11

0t3.

3880

*

MPY

2071
iU12

013C
0t3F'

A203

2073

0140

!d5S?

2068

S

.R0+,R8
88'1..01
R1
$
!.1,~

MULTIPLY IT(ll.CT(t)
AOD PRODUCT TO TOTAL

."

A
Jill£;

1101

R3,R8
BBFL02

INC

R1

E(HI

!Ii

A1C2

A

R2, R1.

"'44

05C1

INCT 1<\

0146

0281

0148

0liHH'

0HU

16FJ

0142

20119
20tH'
ShUH
21382

0,4E

iUd,'

0'50

2084

CLR R7,R8
GET ADDRESS OF CT

il'R1 4 +,FHS

(R1,R8).CR7,R8)+(T(!).lT(!)

C0S5

2078

(R1,R8)le

00 :\

013A

2074
101!S
2075
2077

GET ADDRESS OF tM' OR lAT

."

2064
20«55
2061

c

R14 CONTAINS ADOR!!! OF DATA PASSED BY CALLING
ROUTINE
R13-Rle CONTAIN CONTROL VALUES FOR PREVIOUS
wORKSPACE, AND ARE NON_VOLATILE

."
."
."
."

1i043

2092

saART

• TITLE'

0'41:

BBFLO~

CONTINUE
FH,~.2

JNE

88ART2

~ov

tR14+,R0
.R0,R2
.R14+,Rl

."

CCll3E
C090

C01!

1::1

MOV

•

Mt)V

BBAI!IBAtWlnTH+(R1,R8)

GET BeGINNING ADOR
MULTIPLV ADDRESS.WIDTM

c

sUSROUTINE

(e~

MPY

!ltRl,R2

A

H3,R8

0581

JNC
TNC

aaFLD3
R1

,",UH.

88FL03 EQU

2085
2086

011$2

31HI1

2087
208R
i08Q

illU54
0U5(S
0t158

A2~3

2!}19V!
a~SH

A\C~

al1lg4

0teC

C847
ftH!10'"

211l9!5

0U5E
016V.
0162

CB41

IfIIQ7
iASJ8

0164
016f5

3001
C03l!

2099
2100
2101
2102

0168
016A

C41t!1
C03f

0ttlC
0t6E

C41/l8

011Vi
0172
01741

6441

2092
2093

001/)~

209f11

21041

IH05
2106

210,.
2108
2109
2\1A
ill!

(

2112
-_/

C07E
lB0~

Vl5Cr.

01715

0176

038Ql

0178

C39!
10FO

0178

011'

'*

l1Vll

0HH

IH03

94!5391~SHHH

BSA

..
..
'*

PAGe: 0f11e1

ADO PRODUCT Tn TOTAL

A

S

R2,R7

BA'S8A/WIr"TH
MOV

e8T.MOO(8BA/WIOT~)
R1,"R~.2(R13)
SAVe:

MOV

IH~,

OIv

.Rl,R'

MOV

'*

••

eXT AO!,)"!SS IN Rfl AND

,j:H ,*2 (R 13)

"0/1 CONTAIN WIDTH

,*R14+,R~

GET
MQV
MOV

R",.R0
*R14+,RQI

MOV

R8,.R0

~ov

C

*R14+,R\
R1,*R\

INCT

8RERR
R14

JH

flU

B8FtD4I EQU s
RTWP
eBERR EQU :1\
1"'0 V
.Rl-4,A14
JMP eSFLD4

AOOR OF

BRWl OR

8~BV.

GET ADDA OF 8RWD8T OR BMBV8T

1M.,. LOOPING DOES NOT
TNDICAT!D ENDING M!~ORV
OR ROM AODR!aS
SKIP EA~OR EXIT
CHECK

PASS

MOVE ERROR EXIT TO PC

FrH~

RIT

PAGE 0'HS2

* TITLEI
*

211'

211"

*
*
*
*
*
*
*
*
*
*
*
*
*

2111

1.(11$-\
2119
2120
2121

2122
21'23

fltiU
i12~
~126

2127
2128
i129
2130
2131

MGETFD

G~T STRING
~3/15/7"

R!VIsrONI

URIGINAL
COMPUTER' 990,ASSEMBLY
A6STRACTJ
GET STRtNQ FRaM MEMORY AND STORE TEMPORARILY IN
MfMORY lOCATION MSTRG
C.LLI~G SEQUENCEI
ENTRVI
H14 CONTAINS ADDRF!! OF DATA PASIED BV CALLING
ROUTINE
R13-Rte CONTAIN CONTHOL VALues FOR PREVIOUS
WORKSPACE, AND ARE NON.VOLATILE

EXITa

..

NON!

0171::

MGETFO E'QU

$

MSTRG.c8MBVA>*25e+c8M8VA+t-

2132

2133
IU34

017(,

C03f

/"iOV

*Rl~+,R0

~1'£

crHHIJ

~IOV

213'

018~

0211

*R0,Rt
.Rl+,Rg

0182
21184

0980

2\36

2137
2138
2139
2141-1

Mova
SRL
Move

0211

R9,ij

wR1+,Flg
CONTAINS 8!GINNING
eYTE + FOLLOWING 8YTE

..

RO

..
fiB 86

0fHH'

0188
01fH

C01e;

Ruse

1301

2141

2142
214:5

FROM MEMORY

*

C~l1

MOV
MOV

.R14+,Rt
*Rl,NtiI

JEQ

Mr.;f" 1...0 t

M!~nRV

SHIFT.SM8Y!T

2144
2145
21415

*

2147
2t48

0A0"
IIHSHlt

2149
21591
21ti1

06Cg

21fi~
21~3

01~~

2US4

01gd

C07!

2HH,
2156

0196

C'~ 1 t

071tU,

21~7

2158
2159
a16li1

2161

aHn

MGFI..O'

..

...
•
.

SLA

R9,!.IJ

F:QlJ

$

SWPB R9
SETO R10
MOV

*R14+,R1

t10V

.'H , H\i!

SWPB

SRL

1'110,0
R',0

fH0.RO
R9,fA

019C

42411.

019"

0A0~

SIC
SUI

at(j~

~1A/(\

t&"Cg

$II4P8 RQ

2161

01AP

C01E

WITH VALUI IN Lse RI

SHIFT.awT

MASK IS L!FT.JUSTIFt!O STRING
OF ZEROES OF STRING WJDTH

•
*

~ORW

MASk.lRSH'T(MAS~,SHIFT)

2163
aUlA
aUi!"

216M

LEFT JUSTIFV DATA CONTAINING
STRING

..

MOV

tffH14+,R1

WO~K WITH MASK IN LIB Rll
MSTqG*ANorXOR(MASK,-t)MSTRG)
MASW nUT GARBAG! AT RtGHT 0'
STRYNG ANO IN MS8

RtGHT JUSTJFV VALUE IN MIR RO
MSTR~ RIGHT JUSTIFIED IN AO
,STORE STRING IN M!MORY

GET

ST~lNG

ilb9

FROM MEMORY

01A4

C449

01AtI

0~8~

217~

2171

•

RTWP

9453!;;1.gQrat ••
2'74
~175
4l17~

.. TTTlEI

RTOM

'"

~nM TO MEMO~Y
~3/1~/76

.. REVISION.

*

atl7
cl1A

.. COMPUTER I
.. ABSTRACT.

217Q

.

alai/!

*

~UH

•

l2 11:12
~11:S~
~lb4

21d!'l
ald6

<1dJ'
~1':1F;

218Q

01A!

..*
*..
.*

ORIGINAL
gQ~,ASS~MaLV

STORE

CALLING

RTOM

STRI~R

a19;~

MEMO~V

R14 cnNTAtNS ADDRFSS OF DATA PASSED ev CALLING

Io(OUTINI!

R13-Rle CONTAIN CONTROL VALUES FOR PREVIOUS
WPRKSPAr:e. AND ARE NON""VOLATIL.E
EXIT:

NONE

EQU

$

1IrH14+,Rt:I!

219 111
~\91
21~P

FROM ROM INTO LOCATION IN

SEUUE,'lCF.
E~jTfn t

STEMP.~eMVA.·2S~+CBMBVA+2.
~lA8

C~3E

MOV

HAA
AC

C(lItH'l
I) 1F 1

~IOV
.R0,Rt
MOVB .Rl+,R7

SRl,

~H

;;Jl'14

~UF

\1~ti7

~19~

Hl:ltIi

ill () 1

Muve

R7,~

1rRl,Ri'

..

~1:1~
~l\n

R' CONTAINS 8!&tNNING

*

at\!l6

~EMORY

eVTE + FOLLOWING BYTE
Slit

R7,tl

4199
~2~'H1

*

il2tU

l20P

~1t:$fl

2203

0'bF-!

~2134

''!205
2206
2207

HeA

2~1t'l~

2209
1!21V1

;Jj6C

cue:

HSf

C01'.5

*
'*
'*
*

2211

..

2212
2213

*

~216

111801.
;~j5

4A

MOV

1rR6,R.

~H~2!,1

0tC4

2.22 t.

fH

c~

222:>

41(;A
Ci7E'

*

•

~223

2224
l':!22!'S

..

STRING WIDTH

IS LEFT.JUSTIFIED STRING
OF ZEROES OF BIT STRING WIDTH

MASk

MOV
I'IIOV

SHIFT,eMBveT
"R14+,R~
,*R~,R0

MA'K.CRS~FTCMASK,SMIFT)

SHIFT MASK SO .TRING OF
ZEROES CORRESPONDS TO DATA
STRING IN M!MORY AVTf

SRC

R'.0,0

TNV

IHII'
STEMP'AND(~OR(MA8K,·1"STEMP)
MASk OUT etT ST~ING

..

'*

SHIFT-awT
MASK'lRS~FT(MASK,$MIFT)

..

"219

2227

,*R14+,Rfi

..
·11 C\'i'!
\11C2

(elC11
221R

222~

t-,QV

..

~214

1!l21!'5

SETO W11t:'!

szr:
MOV

IN MEMORY

WORn
RU,R?
.Rl.4+,f(5

RSTRG RIGHT.JUSTIFIeD, LEFT
FILLED WIT~ ZEROES
SHIFT.SM8VBT+SHT

U1CA

()

ROM TO t1EM()RV

9A":S!H .. 'H~01

•

2228
1(229

C

."

~231

2232
P.233

~11 CC

"'80S)

*

,.

R2~A

."

W2J5
2236

."

Cltt£-'
11110""

~2.1

P.242
~24~

22.4

RSTRG.OR(RSTRr.,STfMP)
R7 CONTAINS ROjill 8!T
Mi!:MnRv WORD
R~,R7

rH

."

tH02
llf 011
{11 015
IHOR

PCA,
0f4C1
f),441
~38~

ST"l~G

caM8YA~.RS'PG/256

DEC

CHild 1

~240

"'05~

H9,R0

*."

223ft

2239

SRC

SOc:

E1C~

Sr!231

PAGE

SHIFT SO ROM eIT STRING
CORRESPONOS TO MASKED OUT
OA'TA LOCATION IN M!f040RY ~O"D
RSTRG.CRSHFT(RSTRG,SHJFT)

."

~2~~

••

MOVe R7,.R1.
SWPB R7

MoVe

RTWP

R7,ofrR1

cBMaYA.2 •• ~OO(HSTRG/25e,
CA1.·BMBVA
STORE AAtl( !NTO M!MORV

IN

I

i

!

GtiT NOM

MU~N

STRING

f(~'"

'" TTn.! I
'"
'" ~fVlSTON'
'"
'" COMPUTEPI
'" AeSTIHCT.

~lc!4B

~?49
~?~H1
~?~1

;W02
~~~3

'"
''""
''"*
''""
''*"

~~~'4

~~o5
R~tH;

~~~1
~;t'~ij
~!~~~9
~2fH~
~::H;

,

}: :)6,
$.!~63
W~64

fllHl",
~ilDA

t""t!

nl0e

[:0D1

"~ti5

GFT ROM

PASS

~EMa~y

'AURN 1II0RO'

'"

B~OM

ROU Tl NE

R13-Rle caNTA!N CONTROL VALUES 'OR PREVIOUS
WORKSPACE, ANP ARE MON-VOLATILE

EXITe
NONE'
fQH
!-iOV

1)

*R14+,fH
8fGINNI~G

"

SETO

IHI

1r!269

'"
*f04+,tH
*R 1, FH1

~'1E(i\

C07E

MOV

~271
~212
~1?73

VI'E2

C'H1

~IOV

~27'

5!fi18
1t21Q
S:l2~H1

091/)R

r.f'7!
(;291
0801.

i28t
2282

~I1Er

C"',£

'J1Ef

Cl01

$!2fJ5

2286
2281
~28H

lrl28Q

MOV

,*p 1, IH 0

SRC

R10,0

'"

~283
~aa4

'"
'*

C11"~

0200

I11F2

01'H~

'*

MOV

'*
'BRFL01
*

eQU

'"

LI

.1"1 .... ,''1

rHPA

till'!

.R14+,Rl

~j1FI5

6011

,*Rl,H!?!

~292

V;lF~

A00~

5HHi6
Rag7
2~91lt

~a!N

.
'*
.

."

"'*

LEFT JUSTIFV STRING
DO 200

.DOR.8RWA,ER~A

BEGINNING

RO~

WORD ADDRESS

S

~29t-)

i2~!S

MEMORV STRING R!G~T.JU8T!'t!D
LEFT ZERO FILLED

BEGIN LOOP TO S!LICT sue.
STRING TO BURN INTD PROM

2291
22g3
229.4

ROM WORD

MASK fS LEFT-JUSTIFIED STRING
OF ZERO!SO' STRING WIDTM

"
911E8
fllEA

wtT~IN

MAS~.LRS~'T(MASK,SHtFT)

.'*
fit E4

BYl

S~IFT·8WT

~:27Vl

"1 E6

STAING AND ROM WORD ADDRESS TO
8ll BROllTINE ON! WORD AT A TIME

CALLING SEt/IIENeEI
ENTRYI
R14 CONTAINS ADDRESS OF DATA PASSED BV CALLING

~=?t)A

~rl1(,)
~27t5

STRING

ORIGINAL
g90,ASSfM8LV

MOV

":i74

~OR~

~3/1!/76

'"

$:!;.H:lb
kJ.6'

.

aROM

R~,R0

~.SW.CR8~Fl(MASK,8HtFT)

RJGMT JUSTIFV A SUBSTRING OF
ROM WORD WIDTH OF BOTH M.SK
AND MEMORV STRING
MSTPG.CR8HFT(MSTRG,~Ht'T)

FIRST SUBSTRl:NG IS SHIFTED TO

0

Gf.T RO'" HURN STRING

C

"'1Ft

Iile~t

~3~~

~3ft11
~30A

M1 FF

"'4C~
c.;~4A

1 ~~

~j21ii2

C113E

~311

"'2~4

Ct15~~

~31?

f1~0~

lti01

23~Q

~~,

•
•

CL.P

R3

MOV

R'~"'~C)

""0"
"OV

.R14+,RIi'!
.R0, FH

.JNF

BRFL02

SAVF

ONES

SOl"':

R8,RQ

8RFL.D2 EQU

eV'3E

~'OV

"'R14 ... ,R~

a3~r'\

ro2ft1C

0t- 9'lI

5t..

.R(t,I

~321

Ql2",F

U'IiH}

.IMP

RF'TEfH~

J2A

33C1

;'22(;

lOiOD

i(l22F

lE0('l

02JI?

04tsPJ

a~!S!5

1i3b7
2~()q

•
...

T~IS

ROUTINE

:6
~OV!

~OVB

*I\IU+,R1

tNt::

R 11

ROM

REGIST~R

SELECT TO

U'An CFHI WITH cRt,.
I."DCR

*

NON8YOLATIL! TO

EXITI
NnNE
P'lSI3 111

*...

i3fi~

231~'

ROUTINE

LEART SIGNIFICANT eVTE OF RI CONTAINS DATA FOR

...*

23~f'\

a~68

ENTRY.
Rl1 CONTAINS ADDRESS OF DATA PAsseD BV CALLING

*

~3:p

2366

yg~,ASS~MRLY

... A8STR II.CTJ
...
LelA'! Ciolfi ReGISTER
... CAL.LING SE:QUENCFI

ia341:;
tol;"\47

2:5,,4

COMPUTE~I

c

REGISTER SELECT AND OATA

Jon, ns

MOVe:

sao LD

RESET

saz

L.D

B

.Rl1

OA'A TO SfLI!CTEO RfG.

LO.O eXT

RETURN

c

eljRi~

94~3~,

C'fCLE

....
..
...
.

2313
IlJ14

(

<:'U5
23711
<377
2378
2319
:a38101

231$1

~36!)
02~)~

239\
23W?,
2~Hn
2~94

;i395

23~q

581

IF

1323"

1F "IF'

saz

c,oIHT

~23C

1 O~~F'

..

580

GOfHT

.

F::QU

$

241d~

023f

1F~IF'

24f.i!1
2.4i!l!;

024C1

1M!:
02A~

2410'10
2.41~

0?4?

0!5HF.'

2412

2413
2414
2415
241ti

0244

Vl2t.[

0?46

FI'H a
11%'

0~M~

2417
241B

024A

2419

!7!::?4C
0I24F

242;/1

2421.

2,422

IF'\'F·
1 fH; t

1 ~'f"
!!,I25C'J

2i.1tl-'
2424

2425

eu..

1 F. .. ' E

~41l1!fS

025'"

lE~F

Ri4

orSASLE I NTFHRI)P T

..

.

RESET G(! 81T
Se'T

GO BIT

IF(~USY.~E.1)GO

BNCl

'*
eNC~

TO

5 PI 01

LOOP UNTIL MUS\' BIT GOES Io4tG~
BEFORe' BEGINNING OC COUNT
JNF

BUSY
RNCi

F.: c'lI!

$

T8

..

IFtOUCYCT.GT.MAWCT)CALL ERR
COMPUTE OUTY CYCl.E COUNT

'*

tNC

..
..

~t4

IF PROGRAMMING DOES NOT
IN REASONABLE
CALL !=:RRO~
TF-kMINATE

.

1':1

R14,M4XCT

,JH

H \-1 f. f.flo/

Tij

JNF

BUSV
CONTIN

.J MP

BNC?

Hill

$

'*
CONTIN
'*

S8l

GI1IH T

LOOP WHILe PROGIUMMING

waITCTa((100.nC)/OC1.nUeYCT

50{11j

.

~flUTINE

ctF(ONLNOT.EQ.J)CALL ERR
CLEAR DUTY CYCLE COUNTER

023fi

2404

THJS

$

Ol~

Vl2 ;,E

TO

NONE:
EQII

ONL,ERR

24~3

E)( l'T

~O"I .. VOLATILE

EXITJ

JECl

24VJ2

2411

CONTAI!>,!! ERRnR

R4,~5,PFi

l!t'A

24iiH1

24vH

R~

18

.

ON CRU INTFRFACE, TIME PROG'UM~ I NG
USE nUT\, CVCl.E TO CAUSe: PAUSE BEFORE

IHIUTINE

04CF.:
1FI" e:

23gR

~IT

t-lExr CYCLE
SEQUt:NCFI
ENTRY:
RH CONTAINS AOOIH!SS OF DATA PASSED BY CAL.l..tNG

a:>3?
0?34
0236

239';

2397

9QUI,A~Sr::M~L.V

CvctE, ANI)

!II

2~9'1

rvcu::

Pl3/15n~

SET GP

.
..
..
..
BNCVL.
..

238~

PAGE 0!91!,9

A6STRACTI

~38,~

2M31

••

a rn roHI Al.
cnMPIjTE~:

'* CAL.l. PJG

23d~

C

R~VlSIO"'1

!II

236'

BI'IC'I'L
EWI-< I~

~382

2384

(

TITLE:

.. gQO!'

RFSl!l GO

~IT

If(vtC.EQ.l.0P.VC.E~.1)CALL

ERR

TIME

aUN~

2426

C~CLf
lO2~2

02:S.4
2427
2412H
2 A 29
24 3t~

0256
ilI258

02e!A

945391 .. QQljllf

02!"'''!
0064

LI

...
INCT 1(11
S

.rH~,P0
R(~,Rl

o 4C~1

~Ov

r.U~

~0

1(!2611!

3C3r

e!v

.Rl!5+,R0

~434

0262

243Ti
241')",

0?t>4

CrJI4t
l;3£:;ll

MOV
J E rJ

02b6

0!lSI'Il

4t437

l1~o~

243A
2439
20440
2441

0?h8

3A14E

2442

~::>"A

C"'41

24tU

02hC

13"'~

2444
244~

026F:

244~

lC448

2449

0215F

245 1,1

1l!27v0272
0'7<4

24!;j2
245;3

..*
.
..
NEXTI,.P
..

PREP~RE

INC
F (~IJ

$
Fi~,Rl

R14,R~

"10V

R1 ,

.JE rJ

OUTLP

EIJIJ

$

~

00 510 L·l,wAITCT
lXMIt-iG IN COUNT DOWN '~OOP

APPRQ)(II'A.ATHY EQUAL COUNT UP
IN PROGRAMM!NG LOOP

t"oP
NOli'

1 VI 1.1",1

f~OP

"lOP

2454

0~78

l(Af(lli'!

~4!)5

0~7A

0tHH

OfC

Rl

24tifl
24b7

'IJ~7C

lBF8

_f H
€(W

$

MOV

R0,R~

~?7F.:

245~

2459

027t

240("

02BVi

130~

0282

;(402

~?84

vlll)yl'"
10F4

fd2tHi

IdPA5
04!SA

0288

,,4{)3

2404
241S!:l
246';

2407
ill!4ti8

0288
028A
028C

2469

2""'"
2471
i472

2473
2,d14

NE)(Tt".P

CHECK FOR END OF tOUNT DOWN

nEe

JECl

OUT

JMP

Rill
NF)(TLP

OUT

F'QU

$

DNl.FRR

R
FQtl
l J

*R11

.

RETURN
!i

R10,PPOl

3U1~

10ltll~

HwERR

f{12iOl.

JMP

fiRJMP2

FQIJ

$

Ll

Rl~,PP"'W

EQU

S

I"OV

R10"'H"' .. 2(fH3)

B

*Rl1

~105
Il'?g~

0?g2

C~4t

0294

'IH" 14
045e

0~9tl

..

02V1A

028E

0?8F
029f1

oUTI"P

C000

24tH

CONCATENATEO CONT UN

CHEC!< FOR lFRO COUNT

1

NOP
NOP

~271'\

FOR orVrSION

WAlT' COUNT

MPV

1 '" VI ~;'j
1 fi'l9J "

1 P [(')(:1
1 "'0~1)

C

R"Rl
(;00"1
RPl

...

2441'

2,(\!j ,

GOON

°

.Rl1+,FH!5

Cf;14,1

24J2
243:'

111 CU5

GET DUTY CVCLE
SKIP ERROR R!TURN

05CP,
CJF'!3
6V11F'

MOV

PAGE

'.(til,HHIl

0?5C
025f

2431

••

ERJ~P~

•

ERROR RETURN
SAVE ERROR MESSAGE

0

GET STRING FAOM

PAGE 0061

~OM

*

2471
2419

*'*
'*
'*
'*
''**
*
'*
*
."

2410
:11480
2481
a48~

W4S!
2484

248'5
2486

2481
2488
2489

24SH
2492
2493
2494

0298

C0FE

24SUS
24g7

02gA

C293

~498

029C

C~7E

24!t19

02ge

6291

02A~

0109

2!h12

02 A2

C'" 1:5

99""AS8~M"LV

ARSTIUCT I

F~OM

~OM

ORIGINAL
GET STRING FROM
RO~

CALLING

STRING

LOCATION

RO~

ANO STORE TfMPO-ARILV IN

R8T~G

SEQUENCE' •

ENTRV,
RtA CONTAINS

AOO~ESS

OF DATA PASSED BY CALLING

ROUTINE

."

'*

R13-R1e CONTAIN CONTROL VALU!! FOR PREVIOUS
WORKSPACE, AND ARE NON-VOL.TYLE
EXITI
NONE

RGETFO EQIJ

S

MOV
MOV

*R3, R10

MOV

tR14+,Rt

S

*Rl,~UJ

SHIFT-Wllt/IO

.R14+,R~

COUNT-SHIFT-BRW08T

SETO R8
MOV ,*R~,R0

250~

t

2504

•
•

i50~

25~6

02Ail
02Ati

0A08
CiltH:

250~

*

WOMASK.lLSH'T(W~MASK,SHrpT'
~ASK IS ~IGHT.JUSTI't!D

STRING OF ZEROES OF RO" WORD
WIDTH
SLA
MOV

R8,R0

MOV

*R14+,R1
*Ri',RClI

*R14+,Rl

•
02AfI

C311

02AA
02AC:

CiFt:
CVll1

2!H 1

•

MOV

SMIFTIiISIIIT

t

02AF

SETO R9

0,.~9

•
•
•

251~
2~11

251R
2519
252 A
2521

COMPUTER.

G~T

•

25~1

251 4
2515

03/1!5/76

•

250~

2512
2513

REVISION'

•

24g5

25H1

RGETFI'l

•

24g0

25141
2!50f1

TITLE'

•

0281

091P

SRL

R9,R0

~lOV

*R14+,R1

00 ?10 AOOR.SRWA,ERWA,l

•

252~
25a~

02B2

C01E

2524
2525
aS26
2527
252M
2529
2530

0284

C151

028~

0?BR

lF0e
1322

028A

05C~

STMASK.LRSHFT(STMASK,SHIFT)
STMASK IS LfFTaJUSTtFIEO
STRING OF lEROES OF BYT
STRING WIDTH

•

GET BRWA

*
*

PROr,RAM~ER

T8
JEQ

OL
OFFLN

PROCESS ERROR IF P~O~
OFF LINE

SKIP ERROR RETURN

•

INCT Rt4

G~T

ST~XNG

FROM

~OM

RGFI,.D1 F.QU

2531

2532
2'J;'

028C

2~.s4

•

2!535

SRL

253"

2~.j9

GET MS8 OF AOM WOAD ADDReSS

fH,~

•

2~;'1

a53A

$

02C{t1

0tsA'n

k1~C2

022('5

02CA

0~~''j

2!541~

*

STORE IN ROM lNT!R'ACf
BL

DATA A()OR0
cCRURG1··MOO('DOR/2~e,

•

*

2~41

2542
254J

REGISTER 0

'LOADeR

GET LSB OF

REGISTER t

t

2545

0:?C~

06A!il

02CA
02Cr

022'5

2546

BL

flLOl\OCf,1

DATA A()ORl

01 W;\'fi

~54'

•

25411
2549

RSTPGacADOR.
MOV

*R14+,IH

SELECT ROM INTERFACE REGISTER
7 FOR READOUT

t

2~'JiA
23~1

321)1

2!'H)~

2553
25011
25tPi
255fi
2501

*
*
*

L£)CR *R1dl
Rl,~

RST~G.CRSHFT(RSTRG,8)

SWPB Rl

MOVE TO LIB Al

t

MASK ALL BUT RIGHT JUSTIFIEO SUBSTRING
OF ROM WORD WIOTH TO ZEROS

•

RSTRG.CRSHFT(RSTRG,SHtFT)
SHIFT DATA so BEGINNING
STRING eIT WITHIN SUBSTRING
OF ROM WORD WYOTH IS LEFT

*

2":)9

GP.T 04TA OF RnM WORD RIGMT.

JUSTIFIED IN toile Rt

STCR

*t

2!'i5A

WORD ADDRESS

8TORE IN ROM INTERFAce

•

2544

RO~

25tH'!
it!! 515 1.

2562
25ti;'i

*

ielti4

*
*

W~Hj5

2566

2567
0801

2571?!
2!')?1
2572
2513

2574

JUSTIFIED,

t

2568
21509

*
*

MASK ALL ~ITS OTHER THAN THOl! IN 80TH
SUBSTRING AND STRING

SAVE PRESENT MASKED DATA IN

•
2120E

E241

*

SOC

R9

R1,R9

21515
2576

2517
2518
2519

cnNTINue:

*
*

GET NEXT ADORFSS AND CH!CK IF
GREATER THAN ERWA

258ti'l

02E2

0585

INC

R15

2~UH

0PEA

C~7F'

I"OV

02ft'

$151

r:

tR14 ... ,fH

2582
l583

i,I!~EA

lAi1q

JI..

I
MOVF. NAME TO li\UI'FER
_R7+,.R8+
CONTINUE
RR
CVTWl
MOVe; RLANI< TO BUFFE,.
R"
$
r:t-1TPV POINT
SAVE RETURN ADDRESS
Rt1,R3

:s

00 :2 to! I."rOUNT
Rtllllc ... I4

C

••

.. TITLE: CVT""H
C(lNIJEIoiT AND
REVISIONI 03/H5/7"
-.. COMPUTER; ORIGINAL
.. ABSTRACT • Q90,ASSEMRLV
Wt:'lRKING TABLE TO BUFFER AND WRIT!
I:HIFFEP
'*
I
...'* CAl-LING SEGHJENCF
ENTRy:
OF DATA PASSED ev CALLING
Hit cnNTAINS
.
ROUTINE
R7 CONTAINS ADDRESS OF FIRST 8YTE OF NAME
....
Rts CONTAINS PRESENT 81lFFER AODRESS
CONTAINS TABLE SIZE
,..
Rt4
OF
WORO

2653

C

9453Q t .9901.

CALL WRITe'

(BFR)

R0

WRIT! 811FFER
ERTYP

MEl(

ANO MOVE

COt~VERT

ANlJ

wRIT!I:

e7Vl1
c71(!8

)J33f

0!5C:5

a'~Q

;"H~

034(1
045;'

27~t)

945~91·9g01

•
EPTYP

INCT R;'
EQU

5

8

*R3

**

PAGE 0088
NO ERROR RETU" ...

(~

()

CON~ERT

HEX ASCII TO BINARY

.. TtTLEI

271?
a713
Q114

..
..
.

211~

Ci8P..

CG'16

12737

ceot

..
..

03.(:

.

CHIt
..
•

274;'\

cr.PRe0P~-D

.Rlt+,RtC!

MOV

Rll11,R:5
.Rtl+,Rl

OCFfI!

MOV

"Rl,.R~+

LI

R4'l,4

Er~u

S

DO

..

.
.

20~

1-t,4

CH.RACTERS FROM 1/0
BUFFER TO CONVERSION "UFFER

~OV!

Mova *R6+,.R3+

*200

274R

GET PRe FOR CONVERSION

OPcnOE FOR HEW TO etNARV
CONVERSION

..

034A

214'
2142

R6 CONTAINS INCREMENTED BUFFER ADDRESS
RA CONTAINS BINARV OATA
S

"IOV

MOV

C0tA

27l!'J
273t\

27~3

E~IT'

..
CVTHXB EQli
•
•

2732
27"3
213.4

S~QUENCEI

HI1 CONTAINS ADDRESS OF DATA PASSED IV CALLING
ROUTINE
R6 CONTAINS PRESENT 8UFFER ADnR!SS
RA,R5,R1,R8 NON.VOLATtLE TO THIS ROUTINE

*
*

2731

MOVE FOUR BYTES OF ~UFFER TO CONVERSION BLOCK
AND USE SUPFRVISOR CALL TO DO CONVERSION.
R~ CO~TAINS R!8ULT OF CONVERSION,
ENTRYI

..
..
..
..

2721

2154

ORIGI~·JAI_

..

2728
2729
27;51'"

27b2

Rf!:VrSIONI 03/15116

..
..
..
.. CALLING

272~

2749
21th'
27tH

CONVERT HEX ASCII TO IHNAfily

.. ABSTRACT.

272fIJ

2144
214'5
2140
2741

CVTH)(~

.. COMPUTEFl, g90,ASSEMALV

il1R
2117
271"
211Q
272111
2121
2122
2123
2724

273H
2139
274n

PAG! rlllIl!7

CONTINUE
DEC

RQI

JNF.

tHS1

MOV

.Rll+,Rt

R0,elNARYtcoNPRe,
00 CONVERSION

RETURN
8

.. TITLE

2151

c

ralNK

..
~LANK FILL RUFFER
.. REVISION. 03/1e/,R

ii15e
a7'~~
a1tj~

..
ORIGINAL
.. COMPUTER; gQ0,ASSEM8LV
.. ABST'UC:T =

21tH
2762

..
FILL THE BUFFER
.. CALLING SFQUENce •

21'd3

2164$

~ITH

8LANKS

. 2765

..

ENTRVI

276ft

..
..
..

CONTAINS 8!GJNNING BUFFER ADDR!SS
Rl CONTAINS AOO~ESS OF LAST 8UFFER 8YTE TO 8E
FILLED
R4,R5,R1,R8 NON-YOLATILE TO THIS ROUTINE
EXIT.
R6 CONTAtNS BEGINNING BUFFER ADDRESS
~UF'ER IS ~LA~K FILLEO

~1()'

2761i

276Q
2171'1
2771

..

..
..
•

2772
.271 :!

2714

0351.

2715

2176

036A

0~0!~

'135C

202'~

035E"

C386

2171
27711
2719
21'81;11
a,~U

2182
2183
2184

~6

0360

•BLNK

.

..
SLNKl

EQU

$

LI

R0, ,

MOY

Re,R14

EQU

~'360

C08~

MOV

~362

C

0364

8045
UFO

0366
0368

13FC
CUE

21a!5 036A
21aR
,O"0 E~S

oAS t5l!!!

s

RA,*R6+
R6,Rl

JLT
JEQ

al.NKl
BLNKl

~OV

R14,R6
"Rll

a

ENO

INITIALI%ATION VALUE
SAVE

BEGINNING 8UFFER ADDRESS

STORE IN!T VALUf IN 8'"
CHECK FO~ END OF SUFFER AND
REPEAT IF NOT

;r

~J

.,
i

c

PAGE 0069

945391-9901**
g~1Il

" Of'0

CONCORDANCE

$

("

01:'172
0126

0('.\g8

013'

""60

01(52

01.88

0!92

0225

0~3'

0272

0274
0372
0398

0~96

Qlpge

0~74

0;'79
01103
0!529

0331

0395
(.1)488

At:L.

(,

0"'3~

092~

0923

110~

1122
1303

8BFLOd
8eA
8H)(
8LANKS
8L,NK

8LNKl
8MA
!SMBTt'

8M6YA

SMSV"T
aNti

C'

19Hi

2106
2336
2'64

211""

2'31

246fi

246Q

1Q28
2tA2<4
2149
2.103
2.,1

2t528

2631
2774
1035

2~'9

2~73

206~

2V'172
2~88

2112

03151

1315
278:5

0lei?
0381
21382

0:341

066~

CII--tI'7
0est'!
0"66
:24"7

2~r"e

2A2~

2~9~

0P67

1719

(!l34~

BFUH2

0395

0825

8RFLOl
arH'I.02

2'87
2311

8RFL03
8HM

2333
HH:HiI

2332
2312
2331i1

0707
0108

1562

0754
075fi

017'
0173

035111

2338

0713

BROM

2?63

1@SH

BFlIU
8",W081

0390

0682

03Q3
0296
0"ge

~@e3

eUFRT1

0fi8P1

128e
2182

BNC2
8NCVL.
80UNI.)S

8IJFRT2

1~0~

1685

2174
2119

2403

2170

1346
0611

026~

0~86

239~

2!546

1~10
1~Q6

023e

1~89

2~1"

2106

2Q!9r;1
2t0P
0169

077t;

UHj~

21 H'
2tliti4

8sFL03

0167
011}40
0Q6t5
120'"
1342
1449
U57Q

U~8~

2P19

2~7A

0161

1991

090tS
2!53Q

1t37
1153

18117
0714
1336

1338

0142
0739

0401
0e39

1 A3 !'II

214~

0385

02151
0316
0381
043"

"'0314
2.'"
0530

11SH~

2357

Ql176

0~31

0B38
00153
1168
133'"
1442
11575
1686

flIP24

080f5

PItt;

0t51
0119

0t'2~

1988
2t'19121
2333
2451
2603
2130

2l'lf>9

e8fRR

1419
US?3

011~
0U~

0,405
0!53!!

U583

seART
8BART2
89 FLIl1
8sFL02

121""
1404
1!548

0312
0382

168~

C/lfli60

2"'5~

0401
0524
01578
0146

0829

1683

8AOAOO

0112
0?35

0'U8

0!5~4

02&e
1991

0169

013~

SeAR

Ant)Rl

0U2

~16!5

0125

e~e2

8ADAU

01315

014~

0501
0550

093\
0931
172?
0.470

21281

0108

0551

0902
10'153
1262
1399
1!5204
1655

AOOR~

01.03

0UfJI

0845
00g6

122!5
13"5
1465
lli02
1fI'If~ 2
1«H55
2C11lHil

21S9
2.01'
2<493
261.

0548
06042
01'U5
08!51

Uta;
1231
1304'
10482

0t21
01154
0182
1'1.1263
0324
039CJJ
0'60
015!H
06Ae
0'99

rU7e

10112
1243
13615
1.8e

0123
0t157
0185
02ee
0:U5
0393
0471
05!A

(HIt 1
01Hl
0894
1031
1252
131'
1 SIU

UH1

1I!1.~

te!!!t

US95
1957
2(1159
2263
2<422

1'19
1961
2P16 ..
2281
2.37
2589

11e13

2531

2883

2eee

U~72

20'"

2311
2445
2S99
2108

945391-9901**

8USY
awFLdA

0310

2A~!e

09l5~

I5wFl"iH

0'H.4

0()5'
0AQ2

!ilfilf'l'LtI3

awl"Loes

09'12

l,,~e

0920

flH;t5

I3wFt,.06

0923

09U~

!9wfi'L01

0965

0t~94S

SWf'L08

'-1996

awflOQ
awORD

100;
0875

009\
1fli 1 5
0120

CBHl

1611
2637

2644

C~H

CM3

2"49
0257

2"41

CHi:31

274~

2148

2El2f:4
0331

U69
046!5

0~72
0~25

0331

CMt-IOl

",';"

lf1i50

1214

~t7t'1

0~71

'~:"24

0459

CO~P~8

0?2f\

1.(190

CONTIN

24it2

2419

1t'1227
\"86

0329
0~"Se

oI'HS 2

crRl

"~54

2\124

CTfH
CvTal'lX

2'-'114
11502

2[1122
1682

~tIi'?

cvhll
cvTW1!
2471
05f59

2708

1327

0~~A
0~6Q

21108

OAT

0"79

1321'1

OMT

oaEletT
EeA

0e74

1~0~

telae:

2'3~

14ts6

""07

0379

CVTH'(R

1431

0.466

CMPR
CNAI"IE
CPWi:HlP
C$
C1
CTI'(

('

1~2~

CHAReT
CHEel(
CMOLEN
CMN2

PAGE 0070

2418

24""

10!54

l!i110

UI1fi

lC1183

108'"

0!5!H~

0!HS3

0ee",

0121

0143

1~48

U32

1266

1276

l~'HH

1329

t;'~4

1413

~ge8

2""~

1098

150~
1~8!'>

0e4l1
HHIQl
1.108 t

1094

056ii~

11508

C

I

t
:,"',l

PAGE 0071

945391-9901**
e:~TVP'

1342
1:54~

1~12

151 8

ERWA

0;,gR

0~99

1t172~

(1lrllgl

1582

ERTYP2

("

",y

esc
G~l

0631

G~fLOt

0tHi7

~f'9!5

0!578

"1'1'93
0335

Gf)~IT

0~k1t'

2~9Q

GDtlK.1

01539

0~9Q1

1

(Ili54b

0t'!;315

Gnf'L"

062V'

GOFtft1.

0~4V1

0 11i 13
0P31

Ge"lFl.,o

GO
GOi:.H~

{II~33

0~31

0R3R

"~35

Gr)FL 1'~

~'-"ell

("'~ 121 q

GOjoLl~

0~4!S

Vl151Q

GOFL8A

079Q

W79~

Gr:lfLQA

01:118

0~14

G('IF Lt)."

0~2C)

0Al115

GOFLUl

1d~42

l'lft39

GOFtlJ?
GOFLi.)3
GOFLI)4

0721i§

GOFLO~
GOfLO~

0761
0767
011f.

07913
0127
073'U751
13764

GCFl.l)R
GOFLOQ
GOON
GP~(J\j/)

GP0hl
GP015

0"4~

1571
01185
2'«1211

24~A

k)(31'5

0618

0827

0~44

012 Q

076~

0'9~

(",,79

0811
2437
05V11

(~79"

0~2A

0785

2435

I

0!'i38

al1i11
011i21

GPIt'l2t~

011'i29
0!535

GP 11h~

(.j53~

0~05

HI'lt.ww
HXb

2.4tHl
0?32

241f5

IE

0~vl~

2397

IMAGE

115~

(~3A!5

IMt.I)IP

0UA
01((l3

l1S4
tH 18

~126

0~6t

0~07

236~

2368

l1"'8~

0251

093'"
1291
1"89
2"'15

((l93b

IMT
1111
I..n
I..flblJF
I..fli\nCR

23!57

/II

~?5Q

MIII'Cl(IJ

(J?~5

"'Axer

0'79
0277

MAX(\C
MAXPw1
MU ... U

0281.

0283
0263
12130'

MEMIMG
MEMROM
MGET

"'C;ETFI'l

1';""

"'~22

il

i

lAg!

~J

0360'
2~"5?

03411'
Vlt'i7H

066t

,1 UPA
0942

lP15

1~7'

0Q!5R

2!531!1

0784

11140
IRAti!

1194
U34
0702
070e
tti6e

183'"
0771

"'~T

2131
2149
0113

0293

058'"
0605

"!'iSS

114PiH

0136

059~

01S73

0401
0403
0119

071'"

071~

0175

12t5e

12ge;

l4Sts

MGf'L.tH

C

073~

0145

0152Q

Gr.H;LI(Jr.
GOFLJO

Gf)fiL07

(~

1!52f!;

MR'l
M$TRG
MSTRG2

Ms1

--

'.~-=O-'-",,'~

2i"'!5

"scn

-----

132.1
2545

1432

1451

t!'HH;

~"A1

1t'I~8(1i

Vl581

~lII)a'

PAGE 0073
"583 0!5e!5

0~95

~1ij9~

0~9~

IiHli~

'1

Qlt'l08

,~e09

06H'!

~ti17

I"IhgR

0~9~

~\~gQ

0R82

1!I~89

I,H~4f11

VlQ52

~97fi

~08.s

(11(;18';

0987

1~06

1~74

l~H~~

J319

132~

't'!0Q1
1425

,0101

11 81
141Ati

149"

l~lI'b

i/'IQ77
P9t
1 ~;6~

205'

r.?~54

2061

2~el

2(l18~

2iil9t1

~

~!il

2U~

2133

2134

2t.43

:2 U5!5

2~~:3

22W7

221~

:?211

2?9?

2~

1 (~

2431

24132

,.d;'R

231.A
2t1e5Q

241~O

2426
2461

2.431'1
2fH'J2

2!'10'
271(l2
(1493

2!593

?fII43

2'H10!

270.11

24133
2521A
274V1

2311
2.c141il

2226
2320

:??3?

2'89

2191
22fH

2 C19 fI
2192

lQ9A
211111

f,149tl

~~14

UP12

'lie) 1 ~

00t!;

,1973
1t'! 7 8

0914

0Q85

1!?189

1~9~

945391-9901**
IH'J

02ft18

("

,0

R1

02l!9

0.49C,1
0!H13
Ib~ 11

0517

"'527

1d~94
061~

~g5~

2!51~

1~79

1;'12

131:5

1559
1926
2('!78

1580

1581

1921

193~

21"83

2vH'!i'I

2131

2142

21,

219'5

2239

2279

2282
2"31
251 ~1

2241
2284
2434

1.

2"ifj?,

2!1'16R

25g,

2747

2776

2'8r~

1II"i3'\
0Q2111

~!'!3'

MH~4

'{I?7?

V'1Sf5

IlItH 2

09214

0034

\tI94Q1

VlQ049

0!H12

lV'.4!"

1~.4'5

tPl6!5

HHHI

1171
1.4 11

He!!
1421

1209

1228

1071
1278
1~!57

1754

lA27
1766

145",

1~5q

1769
2051
2134
2 ,,~:;>

1924

2135
21;3

2211

2'21e

2329
2498

236'"
2499
2551
259!5
21!52

,",087
1163

P3'
1-'82
193'i
2,·Ag5

1959

1~f3

21)197

2104

2161

2'5H~

2HS5
2264
2:>SH

2434

2~2?

264~

2!H.i1f'l
2",92

0434

0.139

0~!.I1.

e61 (~

2:5"4
2~Vl8

2!'i5A
2!'97

2!551

4~

tA411

2HS4
2?43

226~

21}\55
2UH5
2169
2:> 1 l'I
~32t'

'2~"

21142

2311.
2442

2~55

2"24

2533

2~3!'i

2~4?

2~4~

2r;t5H

2~7

,.

2574

2";81

2!58?

?t;$I*S

2~g9

~'3!5

27;"~

2'!5~

V14!.\2

0C1f)n

0552

0555

~5!5e

~63'5

1IJ!'!33
ot'!

Q\~49

\11611

(;)f;89

0R89

t'172~

l11i66
1 U53

If')17~

"5~

1P17R
1 1 !5 Q

0815
1085

156"

158(~

UHi!fi

1~Q!1

:.'H;(.l!

220P1

2781
Rl~

a~ 1t~

(

1~14

1(1147

1('A9C'1

1f?1Q';

1137

U~g

114~

1338

136()

137~

1 !lib .1

166A

1989

1381
lQQ?

1~8~
21f5~

2159

2:?v,7
247P1
2151115
(-14 3:?

221ei
2473

2~t6

222C'\

2~7()

2'8'1

2~'02

24173

249'"

24!iH)

2!'162

2"576

2164
230,...
2t504

213~

2734

Q;'Il179

048~

~4e1

011)47

1 I'll 07

1I1!1Q\

10133

1~99

1 h12

1!550

1(\21

1~57

1034
19",

236('\

237~

2685

213'

21eVl

2474
2785

2e3'"

265\11

242A
2735

l q 36
21165

,Q39

1Q52
2';47

1367
2361

(,1473

0491

0!5illA

Vt'50

0"154

"'f\6~

0113

0753

U2~

131!'l

V\771
1326

~q25

12He
1 q;~3

0737
1298
251ill

1~11

1.431

~HH~6

0QS4

1~14

1 f~57

lrl'91,1

2117:3

2f;\iJe;

~4i'!'l

050~

0~0fl

,",!'51~

("76
1f1lli'!

12.47
1619

1'54
1657

1~9A

""1!5

Rll

~

t. 2

~tJ

Q14

A219

,}~211

H!21
Ul222

C

1'12

'1~23

112 H'

lP14

1 ('J\~H~

2429

27541
Ql67tt

133.,

2.l1e,

26"'5

",,,,7,
1214

"7QJ6

1456

1480

15e2

20118

2P!lQ

2"'9.4

2~9!5

11:!128
1322

(A12A

Q!7lS~

148:5

Pl765
t.494

0'78

14715

1~67

2~1!'1

2C) t ,.

2~~3

2058
~'33

"tal)

12153

USIIJ7
29181
21042

2~fi~

2(1!Qfii

2hH

21V4

21ft11

2 t 11

2111

2tS4

2HH
2310
24]5

220'

2~09

226'

231~

24g~

2~'H?Je

:'33'
2512

25~i*,

25413

2581

~~e7

2324
2495
2 [119 !5

2?~t
2~2~

~393

2Hi1
229:;;·
2411

26~e;

26",6

2"901

2'78

051.4
1929

0611

0,.9"

pj79~

1244

1083

1 Q~U

2420

1473
243t11

11. 3~
18"4

, , 51

134Q1

1361

'981

?"'61

2"'60

2:>82

~t:5

4"

2'84

0A11
1923
2433

1Q4..1

~4I"~'

V,7f53
107(1'1

0i'6~

lQ10!

2633

2534

0432
1528

0561

0~53

Yl
2102

2101

2'09

21;'54

2'3"

0594
0907

0~9~

0591

0!599

093~

0942

0961

te!~7

l!Ae7

3. ~0f5

1P.21

!.~gd

1140
1402

1f'; 11

1550

13(1A
1!552

1574

1139
1395
1!51fJ

0621
0956
1141

0'88

rfl9J(;lI

1043

0114,/1
0AQl
111\ f5;'1

1A31

lk6'

lQe2

2~2(1!

0A5~

0462

192(11
04""

£Uf;Hi

0A13

119"
2"'23
041e

0596

059Q

0t,i0~

0~3~

0f1iA0

0~32

~HJ36

11

092'

0985

1il98~

1~02

1~8'

138111

lt~9
14~~

1209
UHH?

19tH"

2Vll~

13941
2Ci118

2"'25

1851
1966
257'5

2745

RA

[I~12

(1A 42

(H191

Re

f121;'

(H~

H 16!5
2fJt'!7

pet!
1927
2209

221

r~

2221

2224

20121
215,4

2~82
l~H~3

IMi2~

(!It\2~

~~3~.

"15411

1277
1624

1278
1624

1?9?

1311

1166

lA6~

2~Vl3

222~

~'45

27'l~

2780

263171
2781.

(~~84

"'''85
1 ~~61

~!H)ft!

V'fjv.~

1427

1771

2fS33
2784
0A36
lA44

2J1i73

207!'\

2\'.89

2193

219 4

2195

2,9A

2~84

2325

044(11
0591

~447

2329
0448

2i'H~
~4 .. q

0603

0e34

1141

1317
116b

1382
1 A4i4

,425
UH5Q

2r'7 t

21~87

256(/1

2ff\Q!5
268(11

2103

2!'!""

0495
0150
1:524

~oi99
(i'lF!4~

0!563

1~f)9

1166

1159

1385

~:<~

R6

14

0993
1"19
2('02

R1

~< 21

r;

1316
2P6:5

tP1f1

Rtf

1;'76
1726

~'~

R9

l'

043.1

"'43~

((770'
1 ~ fSt3

""31

17~1

172A
1771

129~

18"2

1444
1 "H~

1463

08el
1038
it ee
UH1

11302

UUJ3

2~21

2029

04"

0479
llHHHI
13115
1564

lU55

1382
l8,n

2fAee

2~33

2028
2!542

0"31"

0834

"91501

1312
19215

1:!2t'1

1!5~e

0053
UH5'

2~19

2ti A171

26145

2t1119
2e78

171926

0Q34

leAfS

1\43

,,.44

2tl191

21?!Q4

2"'97

222'"

2~3f5

2241

2~U3

2593

2~78

0Ae~

0!'HH

118 t
1A38
2"'11
225"

1 HH5

UHH

2580

202e
2682
11815

211l!51
21015
2243

0581

05841

01588

1285

U8~

1308

14,.f'i

UH1

HI1 t

2@26

2Q.12~

20129

20tH

22'~

2297

23U5

2501

0!590

0tHd9

0814

(Il9A(.l!

1:57fil

0586
"SHH
1391

1418

0Q84
\485

11tH
1711)4

t'~3

118!5

1158

179~

1799

lA0~

1832

18~2

1~8A

1888

1RS9

1892

~H~!5 ~

2 £111'.4
2 ttH'I
2520

21?169
216ts

2021
2131

2169

2571

2~14

2016
2238
2224
2!594

1~:3A

1A37

2~123

21AVl

2(1)25
2148

21'127
21017)

2Hi4

22~~6

230A

2~1f'

2tH~

092!5

0917

2135

,(,

0490
e9fl1111

21001
22'2

1792
1857

176P

015'2
10tH'

t'21

1249

1496
1188

2232
2tH~1

2"97
RC

~ ~~H\

(i\~~~

Ref< UIA

f:'flt'

"'~3(/!

0740

RE~OA

"243

REO""'!!;

f ei4fi

1"1
01137

1421
0~2S

0c~9

1337

RE'SUF
RE1Ef(R

1

~33f'
, (':f,lP

2:'.21
["37

RG'Ul1

"'4Q~
~l531

2~e8

RG"LD~

~1Pj8P

2~83

RGrlO;'

~599

RO~"lMr;

'26";

2f)Pl1
115t1!

"3!t13

[1731

t~94

t.1~2:5
tH'~3

f!;'HH~

0146

RGE:T
RGfTFP

RM

~e:'"

RP"'T
RR
RS'rRG

1373
1339

It\94

01!5~

19417

099H
0757

107t14

lP113

C :,
I:

110'

1~2!"i

('

,iV'

RslRG2
RSZ
RTf.MP

t41(l7
, 16r~
1"21

(~

RT~

H;"~

~17!,)3

RTCM
SAVIMG
SeVEN

~

H!9

lt19'
0~ld

~274

1(0;53

ST~!H

~~\72

~

Hlf'

12:"5

l~M'

12e51

SV1~

'2711'

lP~

SV1P
8'125

l~lil:3

1?87

'~3~

1~1~

SV~

12 r\l71
1225

svo
ave,
SV7
8V9

SVCAI.T
SVSTtM
SIN

sweLK

S\II1

8wTl~

T8

1~3t

J?5~

1l'6i~

0~75

0t">9:?

0"')9

itl7HS

1'11141

0371'1

1~2~

0'~~

1993

1~9~

S 7 9 (~
Q'374
2' UHI!
k'd,23

[~:5

6-;

03615

2961

194~

1ge~

1945

0241

133'-

wRT2

WRTRI,)

NwlO
YES

ti?6/ol

161;"

1A~!5fJt

1971>
295!)

WRlt

19M>

tr)71

1934
t94@

1953

Hit:! 7

169~

ld2?

1 57:3

1~B1

1684

f'24P

1228

26g9

116'5

1172

141?
1265

1 ;t.Vl~

1~21l

13J3

0fi9F1

0118

073A

0APt

,eO?
HHi~

1~!51

'1S4~

1'64

H42

0:5156

1 ~31t
0681

~!

U\.d(JI

1939

THe.iH! ARE

PAGE 0075 of 0075

1117~

1492

0~g~

1122

T!IIFL03
TSle:~R

~fl4~

1?1f;
U67
122d

TSFI.04
WEOP'
wl1

0011

"012

0013
IIHH4

.

"lJIt~

OEF

frHlJ1 A

REF
REF

IA1?

DMBNPF

ERROR
RR
ACL

0Ci!lQ

R!FI'
REF

iI~2~

REF

0021
0022

IiIE'

REP'

!aSIGN

il"'2~

REF

PRNTIoilt

011'124

REF

8VCAI..T

ilClllM

PRC~LF

PRNT'C
PRNTHN

1tlCi!2!5
IiH~2tl

fIH"a,

i'JCi!2A

0V10(1:
fiHI!02
000,4

TEXT 'OB'

DATA OMeNPF
DATA"

0033
0034

alee

.. EAROR MESSAGE
•••
..
fQl!
2 5
",805

0t01l!

MPIIJ0

003~

1103

OP03

EQU
EQU

1113

0"'13

EQU

"1113

0001

M)(fU

EQU

1110001

0029

""'311'1
0031

''''32

fC03t:J

003'
0039
0134£'1

0f0e

0041

0042

000"
0$1\0?!

0A43

0e0D

ItH~44
0;1l4~

004S
0041

000f
0010

000ei'
0000
001
07
091
001
00;)1.'
0056
00115111

0012

0AI/J!/l

004A

0006

0049

0008
0009

00~1
00~2

0010A

1"53

000C

iHHSA
0055
fHH5f5

",QIl III
>01~0

>1103

REQUIRED PARM MtSSING
IL~!GAL TOGGLE
DUMP GT 8192 BVTES
INVALID lUNGE
UNRECOVERABLE 110 ERROR

••• SVe/PRe EQUATES

fH'3R

1t10!)1!1

.
.

EQUAT!S

000~

WRITA
REAOA

e:(w

WEOF

OPEN

•....

.
PRe

EQU

11

fIlCW

g
00

EQlJ

13

WlnT! A8tH
READ ASCIf
OPEN FILE
WRIT! ENC-OF-FIL!

PRS.DEFINITIONS

pRBse
PRBOP
PReL.U
PRSSF
PR8UF
PRS!'
PReL.N

PRece

EQU I
OATA 0

IIRVle! TYPE

eYTe: "

SVSTEM COMPLETION FL.AGS
USER FLAGS

BYTE III
8YTI 7
BYTE 0

DATA SFR
DATA 815

OAT A 8"
DATA 0,0

110 COMMAND

OUTPUT BU'F!R ADDR!SS
OUTPUT BUFFER L!NGTH
CHAIUCT!'R COUNT
uNUS!D

e~PF

0~lA

0000
0Pltit CONPRe EQU

012116

0rA0Ql

11""18

0~

0'-'119

00
00
001
0(11
00

0"'~1

C

00~S

0009
00lS~

011HH

0P.'1A
01111(;
0tl11C

0062
0063
0064
0Ad5
0l"tSA

21010

001'"

0~eA
0t.111~

0011

(:

"(litE
0011'
012129

0A1!5

0C11~2

0!l!2t*

003A

OATA

.f{lB00
$

MPRT

EQU
EQIJ

0l'11e5ti.1

0~4"

000'21

0"44
""'4ft

01'110~

4!&0

0((10~

00e0

0~'C

0"'00
0000
0000

0!.11f1j~

008C

AeF
ANP
BFR

CMAIUCT!R COUNT FOR WRITE
MEMORY ~DRO TVPE
"UHh'M'
WORD TVP!
TAPE
"1B0+'T'
EQU
BLANK"
OATA 'fI'F'
eNP' DATA BE:GtN/FrNXS~ MARK!R
DATA 'NP'
BNP' NEG/POS DATA etT INOCATR
DATA 0,0,0,1,1,0,0,0,0,0
fIG"'TV ..

DATA .. 00~0

,,

,

00100

0t114.

00'U

TPRT
Bl.ANK

AOI'H~.'

01'!10~

004f1

0(/1 tS "

TEXT 'ENO

EQII

""'0~

00184

s

eyr! g

CMARCT

1100~

005E
00eQl
0062

El'W

0"'~A'

0013E
00401

01;H5C

$

BYTE g
TEXT '8EG "OOR-'

$

0000

011!!58
0C'15A

"40~0

eQU

00~C

001.E

~QlJ

EQU

DCB

0~~fl
0~~A

oflitS"

"'··.'i':

MISCELLANEOUS DATA

4!5

0"'~6

0f!1!H'!
0f!1!52
0(1154

C'

••••
...

00~2'

0082
0063

00815

BYTE III
ENDIIRB Eel!' $

0~

0140
0UU
00291
424e

PAGE 0.,,03

eYTE 0,0

42

0800

••

CONV!RT COMMAND
SIGN
VALUE TO Sf CONV!RT!D

"

1110

"'A7R
"H79
0080
008t

0084

S

/jATA (/I

BYTe;
BYTE 0,0

00128' I..A8T

101.1172
011173
0074

007"
0011

CPR80P

4(;1100
10M'K
001£' INIT

00e7

0069

g4e~g7"'9901

OUMP

DATA 0,0,0,1,1,0,0,0,0,0

SI)(

0000
012100

01'1100
0000
0(1100

01'1100
01'11091
0f'l100
0001]1
eta00
0t'1091

0t1100
01'1100
0f11I/H:'

DATA 0,0,0,0,0,0,0,1,0,0

eYTf!S

e~"F

01)1-1"
(lJ015f

000':'1

0~'VI

000"
000'71
0007.1

0""!?
01(174
00e~

0f1l"~

01111Q"?J

011176

0011""

007.
0(117(:

0f)!87
'H~8e

945~9'.9901

••

PAGE erUl;

.c'
~,
OATA 0,0,0,e,(/J,0,0,0,0,0

0'

0(1l0'll
000'i'l

001E

0UJ0'~

0Vl8'"
01(182
0(.18t.1
0f(1S6
0"'efl!
01718.6
008(;
008F

0Q10'i'J
0(01)
0910{~

00Itlt''l

0Q"H1
000~

00(7)

ZERO!8

OATA 0,0,0

000l!!

.'*.

AEG1STER DEFINITIONS

.*.

BNPF DUMP

(~

04e;S97.g0et **

00g r,ll
8109t
81092
0f119;'

•

•
...'*

8121518

11397
1098
efllSH:1

0000

010(;!

0f11e1

0hH
(11102
0103
01134

0105
rUras
0101
laU",'
0109
011~

IEIl11

IU12
011:5

0114
0'15

(

REG. ~EFERENCES IN IIINPF DUMP ARt! VIA SYMBOLIC
ACRONYMS r~orCATIV! OF TM£ CURR(NT un: OF THE RE.GIS.
fER. THE Sf ACRONYMS ARE OEFINfO BEL.OW. ANY Tr~e:
It REGISTER F~!f!8 uP, OR IS R[.A8SIGN!O, ONE OF TME
FOLL.OWING COMM!NT CARDS WILL. APPEAR IN TM! LUTING
AL.L

*
*

fUIU
el"SlS

0f11(6~

0f1\03

000A
02105
0('105

21210(5
0007
0Q108
0m0g
8001.

000A
0f110e
1000
aBe!
008,.

•••
•••
•
R0

REGISTER REASSIGNMENT. OL.O wP~a'PTRt', NEW WP •• ' 'Rn:'
RI!GISTER REASS J GNMENTI OLO IIIP)(a'PTRt', NEW WP)CI! 'PTfH!'

Rl
CPRM
HOR
ACT
STRT
MEM

END

R1
BFRA
BFR!:

PRe A
RU
Rll
R13
Rt'
R15

PAla 0Q!0e

EQU

EQU
EQU
EQU

few
Er.W

EQU

EQU
EQU
e:QU

EQU
EQU
EQU

EQU
EQU
EQu
EQU

0
1
2
3
4

5
!5

,
e
e
g

1""
10
11
1~

14
lei

SCRATCH
StRATC,",
PTR TO COMMAND PARM LIST
~EAOER FROM CHO. PARM. LIST
DUMP OR COMPARE TOGGLE
OUMP OR CMPR START ADDRESS
DUMP OR CMPR STRT+CURRENT INO
DUMP OR CMPR !NO ADOR!SS
SCRATCH
OUT 8'R BASE + CURR INDEX
PTR TO M)C DATA AOOR IN BUfl'F!R
AOO~ESS OF PRe
SCRATCH
RETURN ADDRESS
PTJ( TO PR!VIOUS WORKSPACE
seR AT CH
SCRATCH

SI'-lPF 1)1.1""''''

9~53g7-SHHH

*1- BEGIN OMeNPF
00;0' OMeNPF E:(~ll $

0117
"Uri

eug

"EF

0t2~

0li-1I~ If

C08A

itU!1

0",92

BLlliP

009.
0C1'Slti
0C1'SlR

"420
04C!1!
CQlF2

CLR

0l!1tilA

0032

0122
0123
il124
iH2!S
012fi

0'21
012M
0t2Q
013(·'
fUJ1
0132
0133
0134

11)135

MOV

0@Q10

0P19C

0132

009f

098,4

0~AV

0990

0li1A2
00A4
"OlAf'

A(II 8 tit
C172
Cte:!

0{1lA~

0P1Aft

lIlA SI:!!
1101'

MOV

Move
Mova

SRL.
SRL

OMaNPF

R10,C:PRM
'ACl.
R"
*CPRM+,I<:/OR
*CPRM+,r.l0

.CPRM+,ACT
ACT,e

•••
*1

0044

1614

JN€

OMfH'I18

0062
0peA

0AU

SL.A

JNC
SL.A
JOC

HOR,t
PMB01
MOR,1
OM8t11lA

01;'~

00fH'~

21140
fU4!
0142

0BtU

11¥.!~
0Al~
IIH:'t~

E'QlJ

$

0(l1BA
0f1lSC

00tU' DM8t11
020A
02kH'

LI

R10,M!0!

EQU

$

00SE

06AV,I

00CV,

BL

'ERROI(

000'"

JMP

OM803~

I/lClC2

AeORT

lQ1eA

(6149
0151'1

0"'Ctl

fUlH

01l1C8
0""C"

2191C4' DM80U URI $
*1 )(.e:NO""START
MOV
END,R0
C00tS
0201.
LI
Rt0,O'13
1113
STRT,R.,
tl00e1
S

0f11tr

UF8

01:53

01l1CA

IrH04
0t~5

IQ US"

0C'!Cf

020A

£1000

1103

0fi!D~

028?l

0004

-1

PAfUM!Tf!RS
TOGGL.E OK, CHECK 1'0" START
JUMP IF OK
START 01< , CHECK 'OR END
JUMP IF 01<
AeORT.RftWtREO PARM M!SSING

\~.---

.,.1

TMAN END ADDR!SS
JL.E' ABORT
IF(X.GT.8tg2)CALL ABORT (Mfle!!S)
JUMP IF L.I!NGTM GAlATIA TMAN
R10,OP03
LX
1:1

0Q!Ott

IBF3

0010~

1~08

0910A

00DA' OMB01A EQU
2120A
LI

0P1EIi'

R0,8U~2

81~2

eVT!S

2Ql0l1'l

01~1

gJOIOC
01(1DF

JUMP IF START IS GREATER

I F CX.lf,0)CAL.l ABORTCM,.oe)

01t)'l
ItI159
ilHH1

0UB

HEADER WORD
GET CHA/UtTER COUNT
DUMP/COMPARE TOGGL.!

*

01<4--

0152

AOOR ...... ;ET AND
NEW WORKSPACE

RPI,CPRM
81<11' OTHER e"'ARACT£RS
*CPRM+,5TRT
OI.l"'P STARTING AODR
DUMP END ADDRESS
*CPRH+,ENO
p,uUM~TER VALIDATION
IF(STRT8.ANO.ENoa.EQ."')CALL ABORT CMSIlH5)
IL.A HOR,,,
SHIFT TOGGLF. PRESENT BIT tNTO
CAHRY
JNC OMS01
CX
IF NO DUMP TGNOR! ADDRESS
ACT,'O'

0284

0146
0141

..

MOV
MOV

ofilS V!

0145

LINt(

R"',9

00AC

0(11B~'

$AV£ PAR",

A

0!UE

01~3

PAGE 0006

:(

(!l13e
itt31
0138

0144

.-

J'"

JMP

AeORT

DMB02
S
Rl'!I,HP0l11

0100
0284\

00'-3

C1

ACT,

'e'

IF TOGGL.E NOT

'e'

(f

PAGE 0007'

8NP' DUp.1P

ItH62

01(1E2

rH6~

0Q1E4

8U,.

00£6
0(l1E8

13163
0284
004C
16£1.

81tU'

oUS Ii

•
*
*
At

IUS'

01eB

(ueQ
0t7~

0111
017'
0173
011oi1

•
.1•

0t7!5

1178

ali'IA

e0EC

001£
00F0

0C11F2

1"9
0180
0181

00'"

00F6
eO!F'-

00F.
10Ft

0182

c

""EA'
12''1

10ee
Cf'2!l!

•

OM8;}12

AC:T,'l'

AND

JNE

ABORT

U~ORT

eQU

2

EQU

~

oMBI2

eQU

$

II

Rt,oPEN.aS8+WRITA OPEN LUNO 1

MOV

'CMARCT,fPRBce

el

ACT,tOt

fUJiU'

00UP
0284

JEQ DMB~2A
PREPARE TO READ
1302
LI
Rt,OP!N.2S8+READA OPEN LUNO 7
0201
000s)
00F[' DM8024 p:gU $
0801
"'ova Rl"PRSOP
0f108'

0184

010P
"UlA

0'011

II

0106

000e'
0'2'11

8lWP ,sveAlT

0108

RHUJ0

010C

DfHH
0f108'

rU8 "

eleA

8188

0UP'
III 112
0111
0116

0181

010E

0189

119A
raUB

011A

ellA

0Ut
0192
IU93

0194

020$1
0070'
020F

001£'

sue,
0284
004C
t~27

0t2Vl
0122
0124

0284

0U~1S

liIl9'
IUg8
1iI199
020~

leet

011E

ID HIl5

012f.1

IF TOGGLE NoT 1fT TO DUMP

00'4

001FE

018S

NOT 'L'

CALL OPEN(PRBA'
(IN LIN! I~PAN8XON)

IU83

o1I1l~

T~GGL!

PARAMETER VALIOATION COMPlET!
**
OLD R2-CPRM, NEW R2-FRfE
**
OLD R31HDR
NEW R3.FR!!

IU

011ft

0117

•••

JEt;!

CX

00'3
13'£

PRBA,Prc'9

SWPS Rt
Mova Rt,'PRBOP

SET 1M! PRe TO 'u~eTtDN
COO! To WRITE/READ Aeett

Ll

BFRE,8FR+80.13

8ET UP END OF 110 BUFFER

LI

RUS,Jt.!IT

ClR

R1

ex

JEQ
el

ACT,IL'

IF TOGGLE lET TO LOAD

oM80,f
ACT,tC'

JUMP TO LOAD SEQUENCE
IF TOGGLE lET TO COMPARE

JEQ DMB01
BRANCM TO COMPARE 8!QUlNCE
•• - MEMIJISTRT
* •• REGISTER REASStGNMENTIOLo RS,STRT, NW Re,MEM
.1- 00 WHILE(MEM.LT.ENO,
.2 CALL 8L~~(eFRA,eFR!l
012t" CHBm3 EQU S
LI
BFRA,SFR
SET UP START OF OUTPUT 8UFFER
020'

0128

0{/13A'

012A

020S!

9453g7.P91l'Jt

8NPF DUMP

012C
0202

012E

01!l8/, ,
06AIJi

013~

03(;t~

,

0203
020.4
0211lH

0200
1ll21d~

0200
0'-1f.il
021\

013~

090~

007rJ'
06A11

013fl
(1113S

02 .. e'

013A

0tiM~

013C

03191'
166F

013f

.BLNI

240~~

0212

0213

.1

kl214

0217
021 R

fC219
0221:"
ftl221

0222
0223
~224

*1

OtlHH'
"~~f,

015~

015 AI,)

tl t 5A
016C

03,.r~

01~~

020~'

01150

000l"

,

0221

022M

080~J

((116141

0008'

'" U56
oU5"

06.'1

0229
023~

016C

0231

0234

023e
02~e

02~'

023A

1110\18

R0,'8FR

6L

'''''RfRO

IN!
LI

R9I,WEOF.2!50

~OV8

lUI, 'PReop

ABO~T

.WRTRO

EQLJ
.rNE

S

016C' OMBI?!!8 EGU

$

oHSt, '

DMB~3A

115A£I

191CSP<

ABORT

JMP OMalRM
OM804 EQU S
* •• REGISTER REASSIGNMENT. OLD
R4

e:QU

<4

016E

0201

1.1

8FIU,8FR

011111

0~3t'
0R0~

II

R2,CONPR8

LX

R3,ENI)PRI!I

8L.

'BL.NK

0112
017<4
0176
017f

01,.
01n:

~

IdITE EOF R!COROCBNPF)

AeORT %" WRtT! 'AIlED
wRITE AN INO.Of.FIlE
SET OPCOD!

.1 CALL WRTRO (WEan

aL

0004

0233

R91, qp .2~U!

037~'

016£ '

0232

Ll

CAL.L WRTRD (PFHU'

l~fH'

~162

016A

eFRC~'.'"

,

0225

02215

.1·

CALL BL.NKCBFRA,!FR£'

00UP
020:5

001£'
Qjt'iAtII
03e~'

"'\"'CAI.L. WFI'TRO(Pfle,

A80RT I ' WEO' FAIL.ED

'U.Acr,
SET

NEW

IUIJFR!!

UP STAT 0' OUTPUT BUFFER

BlANI<.'lLL 8UFFER

(y
I ~,

I,'~

eNPF DUMP

C

J.I!At'l A RECORD

et8A' DMfUltS

JNF.
ECalU

!RTYPF.'

IF ERROR

018'
et8Ei

tRFRA,Flut

CI

IF FIRST CHARACTIR OF BUFFER

02891

0188

rU2!1l

!if PI, '.

18

JEa
@L

'C"TOCB

0f1A~

rnAt'!

018P1

~:51~'

0182

Crltu.

~OV

liU8A

13F1

018C
et8E

06A0

0246

019~

il241

0192

0248

019ti

0aAS)

161114

IN!

0198

0t;A~

0t9A

8L.

02FA'
10153

0251

02152
02153

019C
019f

0tAP.
0tA2

IiHH54

01A4

0255
02156

01A6

0257
02158

Ii" AA

01A8

e2A8'

01 A('.I , DM808

eeA0
020C'

02151

~60!5

11'262

0tBl'

0~0F'

0188

0028'

01BA

0f1iUI

elBC

02FA'

01SE

1014~

0tCPl

100t)

0266

flC~'

0261

liHC2

0208
0tl!3A'

02es

01CA
01Cf>

0269
027(11
0211

0lce

01CA

0tcr

DMBTR~

ESC RETURN

$
G~T

R4,.MI!~+

STORE 8VT! TN MEMORY
CHECK END OF BFR
_NO REA~ N!W AltORO IF SO
SKIP 81.ANK ANO , B,
R~ CONTAINS BLANKS

BFRA,5FR(

INCT 8FRA

ce

OMS0'

eYTE FROM eU"ER

'GETBTE

RCi1, ,

16FlS

'e'

Rt!5

LI

Sil018

SKIP FIRST BLANK AND
IS RECOHD FtRPlT

JMP

OMB~41

0182
01BA

fOR END OF FILE
CONVERT ASCII D!C ADOR TO lUN

CL.R
E:QU
SL.

JHf

01B~

READ NEXT RECORD

OISPLAY AODA!SS til' SO
DISPLAY B!GTNNING FXL! ADOR

141E~

2@20

TO ABORT DA END

'PRNRTN

c:

0~C8

' $,

JU~P

OMare

1'10'18

21260

!a2e14

OM8V14

O"".t1

8248

0259

,

ex

'UCI"

21200

0265

$

INCT eFru
fHe,INtT

flee8
0281'"
001E'

0tAC
01AE

02e13

C

U~5C

0244
0246

02SCi1

PAGE 00qtO

'WRT~I'I

017~

02 .. '
0242
1112 .. 3

••

f'L.

0239

0U~A

(/

04e3Q7.~001

tSFRA,R0

IF NOT LAST 8VT! IN FILE
JUMP BAe~ TO GET ANOTHER eYTe
GET LAST eVTE ADORESS

JNE
DEC
Ll

0,..806

BL.

'PRNRTN

DISPLAY LAST FII.E AODR

JMP
JMP
EQU
Ll

DMeTFH~

OMB04

ESC RETURN
CONYINUF _lAD!NG TO

HEM
R1S,I.AST

$

BFIU,8FR

f-e.,

8fT UP START OF 1/0 BUFFER

€,20~

Ll

R2,CONP~B

00HiI
e203

Ll

R3,!NOPR8

el.

'BI.NI(

BLANK-FILL BUFFER

BL.

'WRTIH'I

~E'O

JNE

ERTYPF

MOV

*5FRA,IUI

IF FRROR JUMP TO CHECK TYPE
IF FIRST CHARACTER OF BUFFER
IS " ' READ NEXT RECORD

0~1!'

0tCE
010P'

06U!
0:5Se'

0102
0104

037!i1'

ilf5A0

0272
0213

0101'
0108

lA~r
c~u

(l'I~7A

01D~

0280

(&275
0216

iSlDt:
01DF
01E0

242m

01e:~

0217

0UA

,

el

RQI,'S

0~A0

JEQ
BL

Dto1B07
'CVTOCB

02A!P
11HSCft

INCT BFRA

13F1

A PECORO

ENO OF FILE
CONVERT ASCII DEC AODR TO BIN

FOR

SKIP FtRST BI.ANK AND ' B,

eNPF

OUMP

94!5~ln .. 90.t

0278

01E6

.,281'

01[8

001E'

il279

fIlU.
fIllEC

1604
0eAf!!

0260
02~H

1lJ282
1Il2e3
0284

01EE

.,2FA'
Ui2$)
04CF'

01fi14

01F4' OMa",!
028'1

11Ft'
01F8

0(1104

028~

01F.

0AC'1

0281

tUFt

029k'
02SH

"'Fe'
WltsUI

IS RECORD FfFfIi'T

OMS/.li8

DISPLAY AOORISI %1" SO
DISPLAY 8EGINNING FILE ADDR

JMP
CLR
eGU
Ct

OMBTR""

ESC RETURN

DMfUt8A EQU
aL

RU5
$

R7,4

0,,1808A
R'
$

flGETS'I'E

GET BYTe: FROM BUFFER

COMPARE BUf!\'FER AND MEMORY
If!\' NOT EQUAL
Ol8PLAV BVTP: FROM TAP!

ce

R4, *Mf,M

J!Cl
At.

OMB00

0204

130S.l
06A0
0~lA'

'OISPLY

0206
1320"

0U54

0293

020A

IVl1C

fll~H~4

020t

011!5

029~

1320t'

06A0

0210

0311. ,
0140
Ul1
02UP OHB09

JMP

MPRT
OM8TRM

EQlI

$

0292

02SH)

kJ2Q7
e29R

0212
02U

()ATA TPRT
J"P O~BTRM
M(lVe *MEM,FiI.
flOISPLY
aL
DATA

02!H>

021~

«lese

tNC

f30~

0218

8248

C

£)301

0?lA

HEM
BFRA,BFR!
OMB01

el

In',,,

JNE
CLR

OM80SU

03~2

0~lC

0303

021E
111220

1403
0!5C8
0200
202al

0304

022~

0281
00104

k'J~HH5

022"
0226

03014

0~2f1

0At?

0301
0308
0309

022A
022C

11131(.'1

0311

022E

0~12

023~

0313
0:314
031!S
0316
0311

0318
0319
032~

0321

0232
0234
023F
0238
02;).

JHE
tNCT BFFU
R0, ,
LX

1601

$

022E:' OMS" 10 IWU
060f5
DEC:

S

IN!

020'
0028'
06Ak'"
02FII'
1~fIl5

10C;'

02~C

02140

4000

024(11

1301
1093

0242

*BF'U, R0
DMB~8

RETURN

GET NEXT MEMORY 8YTE ADDRESS
CHEeK END OF BFR
ANO ~EAD NEW RECORD IF SO
SKIP SLANt< AND , e I
R0 CONTAINS 8L.ANKS

MEM

GET LAST BYTE ADDRESS

aL

'PRNRTN

DISPLAY LAST f'lL! ADOR

JMP
JMP

OMBTRM
OMB~1

ESC RETURN
CONVINUE READING TO

e.O.F

$

JEP OMBTRM
JMP OMS"3.
END OMBNPF

024.4' DMIURM !QLJ

"-

IF NOT LAST eVTE IN FIL!
JUMP BAtie TO G!T ANOTfoiER 8YTE

Rl~,LA8T

ANot R0,lOM81<

*1

fse

LI

023C' ERTVP! e:QU
023£i

ESC RETURN
GET Me-MORV BYTE
DISPLAY BVT! FROM MEMORY

R1

0221.' DHelllgA PQI)
CB
"018

HSE3

r(-~.

flPRNRTN

020'

Iurn

0010

at.

JNE
CLP

HHH

PAG!

R15,INIT

020C'
9544

01F£

0269

JNe:

0IFf!'
011"2

02815

0288

eI

••

S

IF !NO.O".P'XLF: ENCOUNTEReD
LOAD eO""LETE
OTHERWISE ABORT

ty

8hPF OUMP
fil322

C

c

0~a3

83241

g4e39'.SUl, t

0244
0?46

00~0

02.111

1'124_

BLwP

'FlR

C28~

MOV

0458

CPAM,Rt0

FiT

0A2m

••

fJ AG(

0,

It

0321
0328

.1- SUBROUTINE FIlLr9FRA,8FRE,M!M,ENO)
• TtTLE
IFILL
FILL (\lJTPtJT BUFFER
•

iI~2Q

•

~331i'!
~331

03"2

• REVISIONS 03/15116
..
ORIGI~AL

i'333

• AAS'TIUCT I

..
•
•'"

03341
03315
e~36

0331
\l\33f1

•
."
."
•
'"
•
•
•

0!3q
0340
0:\41
034~

0343
0344
034!5
034fi1

'*
'*

0:'47
0348
0340

•

03't1

•
•

'*

0~~t
03::H~
03~3

'*

•
•'*

03!,;4

03t5!"

"3!56
0351

03(5Q

•.1

03&~

1iJ3e4
03er;

21366

024C

fti31~

0373
0374

031e
0316
0311

•

02!5'1

"ACt'!
C04!5
0204

liHH52
02e41

020~

024E

0256
flI:,Hj7
1036A
0369
031f.1
0311

EXIT.
j:,l0l • • R4

'*
'*
'*
024C' FILL

03~$

03tH
16362
03tJ3

GEN!R.TE "BNPF FORMATTED DATA "~CORO
CC1-~
I O!CIMAL ASCII DATA AOOR!SS •• l To e
CHARACTERS WINO LEAnING BLANKS OR '0'
teN"'1 • ' , FtELD SEPARATOR
8EGINNING OF DATA BITS
CCN+2 I ~
CCN+3TO N+101 'P' OR 'N', REPRES!NTING A HIGH OR
LOW STATE OF A BYT OF MEMORY DATA.
CCN+'1 I 'F' FINISH OF DATA BtTS
CCN+'2
'0 N+~61 ~EPITITI0N OF CeNt' TO teN.,! UP TO
SIX T!MFS
COMPUTER' 9g0,ASSEMBLV
CALLING SEQUENC!'
ENTRY,
R~.MEM -ADDRESS OF MEMORV DATA
R8.BF~'-ADDRE8S OF OUTPUT BUFFER
R9-~F~e-ADOR. OF !Na OF OUTPUT SUFFER
Re.ENO -ENDING AO~R. OF MEMORV OAT~

0aeS

EQU

!

HEM .AODRESS OF NEXT BYTE TO BE CONVERTED
BFRA'AOOR+l OF LAST BVTE IN OUTPUT BUFFER
THE BNPF RECORD IS FORMATTED IN 'BFR'.
•••• ENTRy porNT ••••

CALL BINDECCM!M,BFRA)
IN LINE EXPANSION
CLR RQI
MOV MEM,R1
LI

fU,10

000.1.
MA~

2110
0251' FLL 1

EQU

$

~t03

DIY

025A

04C2

CI,.R

R3,~0
R~

02f5C
02!5E
026(11

8080
1t)03

C

R0,R2

JNE

FLL2

3C84
A0C2
115PO

(>IV
A

R4,1;2

JNE

FL.Ll

fQU
AI

RIlI,"30

0262
0264

tNtT' VALUE TO Be CONVERTED
CONYERS ION IUSE

026~'

0206

0220

02151;\

003Q!

FLL2

R2,R~

:5

• OF DGTS IN CNVTO

~!R! TO NXT LeL ELIMINATES
LEAorNG IERaES
FINO
FIRST
NON.ZERO
OJGITeJUMP WH!N FOUND)
NOT FOUND, REDUtE HA • • OF
DIGITS BY t AND TIitY AGAIN
IF ORtG, • WAS NOT ZERO

CONVIRT TH! DIG!T TO DECIMAL

'ILL. OUTPUT BFA

02151

'fiCA
OE00

f1138t

028C
026f'
e27P

0382

21272

A0C2

0383

0274

t082

e~84

0276

1~03

038!
038"
8387

0218
021'
027C

0'C~

"31M
rU19

038(11

C'

8388

(113SQ
03QA

0391

027f
028(11
0282
028'

Ll

R0,8

BIT COUNT!R IN RO

020~

1701

0'015
0406

f(W

,

RR,ANP

ADOR, 0' 'NP' IN Ai

SL.A

R~,t

elT TO BE STORED IN ARRV aTAT
JUMP FOR NEGATIve: BrT
INC TO 'P' FOR POS. 8tT
STORE IN' OR 'p,
DECREMENT BIT COUNT, AND
LOOP RACK IF eVTE ~OT nON!
FOR FINISH 'lE~O
BVT! OONE, CHICK END OF BFR,
AND GET OUT IF SO
CHECk FOR !NO.OF.DUMP AND
LOOP BACK IF NOT FOR NXT BV

1'2

0600

DEC

161"8

JNE

Ii'"

"582
(jEl~

OE11

029F
0iA&!!
02A2

8248

FLLS

lA0~

'e' 'OR LUBIN 't!LO
MEMORV eVTE IN R3

L1
JNC
INC

029C

Mova

Move

C

JHE

8tlS
12EC
02Ae' FLLe

C

02A4
02A6.

0'55

RT

1lI40'
04~~

MOve .Fu+,.eF'U+
Move *H!M+,R3

00~8'

0113

fU"A

.

v>28C' FLL'

029~

0'{II3

C'

020U1

003f5'

0292
029A

02"A

s

PUTS A BLANK TN tST CHi
ADOR. OF 'BF' IN Rl

b3i1

04~2

R3,R0
FLL2

ZERO, JUMP OUT OF LOOP
ELSE, COMIitUTE
NEXT DtGIT,
GO eONV!RTTO ASCII.

Rl,AB'

0~91S

14401

FUll

L.I

0-£31
CelIF!!!

02ge

R2,R2
FLL~

ASCU AND
STORE IN TH! OUTPUT 8'".
REDUCE NUM8ER OF
DIGITS REMAINING IV 1, AND
WHEN. OF Ot61T8 R!MAtN!NG !I

81"IH

028A

0296

JEQ
CLR
DIV
JMP

PAGe: 111813

EQU
INC

028B

0398
0;";9
04"01

MOV

H',R2
R2,R3

••

0588
02211

031i13

028e:

A

10F4
021£' FL.!..3

1392

028e

OIv

3C03

0~08

03SH5

OA5391.8901

'IMPB RPI
MOVa ~~, -SFR 6+
CLR R2

04C2
:5C84

02tUI

03~)4

INPF DATA

~II

JL.E

EQU

FI..L'
*R2,."FRA+
FLI..04
*Hl,*PFRA+
BFRA,~'RE

'LL6
MEM,ENO
FLL3

s

,, ,

CONVERT 4SCII DEC TO BINARY

• TITLEI
CYTDC~
•
CONVERT JSerx DECIMAL TO erNARV
* REVISION. 03/15/75
*
ORIGINAL
* ABSTRACT.
*
CONVERT ASCII DECIMAL ADORESS TO BINARV AOOR!SS
* COMPUTER' 990,ASSEMBLV
• CALLING SEQUENtF,
*
ENTRY,
*
Re-BFRA.AEGINN!NG eUFF!R ADD~ESa

10411
i'/412

0413
(11414
~41~

04US
Y.1411
0418
0419

0420
"42 ,.

•
•

0422
~423

t

~424

0425

02At" CVTDCB !QU

0421

02A8
02A4
02AC
02AE

CQl4t

0.4~~

0~8ei

0200

0262
0284
0286
0288
02BA

2~2~

~426

0429
043(.1

e431
0432
043~

1b";'4
14;'5

0.36
(11431
e4~e

rUBe
02fU!
02C91

02C2
02C~

la2Cti
02t~

0A4t~

02CA
02CC
02CE
020¥'
0202
020A

'442
21443

0444
0445
"4Mi

C386
02fU

00UP

cee&"
0032'
0221

MOV

LX

MOY

Re.~~M .ME~ORY ADDPESS
EXIT,
R0,R1,R10,R14 CLOBBERED
S
•••• ENTRY PDIHT ••••
Rlt,R14
SAVE RETURN AOORISS
RI0,CDNPR8
P~EPARE TO 00 CONV!~StON

LX

RUI,R1
RA, ,

f-IOV

'OCR, *rH +

SET 'NCT CODE To DEC TO BtN

Al

R',~

GeT END OF COHPAB

I

R~

CDNTAINS BLANK

000e1

0:;:tec' tVT!

e439
0441

PAGE 0014

0e88

9P18
If.5FO

crus.

0608

02Ce' CVT2
DAee

0508
0501
0288

003A'
14FA

f'rW

$

INC

BFIU

IN!
MOV
DEC
EQU

CVTl

DEC

BFRA

IJEt

fU

Cl

BFRA,AF'R

ce

Move

*BFFU, R~

BFRA,R2
BFRA

CHeCk FDA END OF ADDRESS
IF NOT JUMP BACK FOR NXT BYT!
SAVE END OF ADDRESS
GET LAST eVTE

5

*aFRA,tRl

MOV! AODR BVTE TO CDNPRB eFR
IF eeGINNING BYTE NOT

0420

JHE CVT2
BLWP 'SVCALT

TRANSFERRED, JUMP
DO CONV!RStON

I1~06

0UHP
Ct4f!1

1I10V

Rtl!,MEM

C20~

MOV

IUDA

0415f

R2,BFRA
.RlAl

SAVE

0208

e

ME~ORY

BAC~

ADDRESS

l·..·
,-

GET BVTE

c

0449
04f:h1
0.151
0.152

• TtTL!1
GFTB"
•
GET eYTE
• R!VISIONI 03/1e/7~
*
ORIGINAL

*

IlIAS3

*
*
*

BASA

IAle
(1141·'6
iii .15'

eAse

0459
fllA61!11
(64161

0482
0463

2120(';

020f
IIJMJ4

°,use
0'6"

0468

0'eg
flj47~

0471
rU1~

0413
1.174
IlIA 75
0416
"77
0478

0.119

462'"

1112£""
1lI'0A

0212

020~

02EA

ABIT~ACTI

GET eYTE FROM SUFFER AND CONV!RT TO B!NARV
COMPUTERt 990,ASSEMBLY
CALLING SEQUENCE.
*
ENTRVI
*
kA.8F~A.PRESENT BUFFER ACDR!IS
*
EXITI
*
RA,el~ARY eYTE VALUE
*
Rl,R2,R4 CL~8eEREn
02DC' GETeTE EQU S
***.ENT~Y POINT ••••
0201
LX
Rt,'F t
Rt CONTAINS 'F '

0aEP

GTBT 1

0PEE' GTBT3

EQIJ
CB
JNE
SLA
JMP
e;QU

0B.F.4

SfilC

02F0' GT8T4
gAl,.
115'$1

e:QU

02£6
02£8

94Jf:'8

0aEA

0A14

02EC
02Ef
02F~

02F2
02FA

02F6
02'8

e:QU

I

SETO RA
\,,1
R2,ANP

BUFFER BYTE VALUE TO 8E IN R4
A2 CONTAINS AOORESS OF 'NP'

0fA38'

02Ee' GTeT2

0461

c

PAG! IUl15

lfi0:!
tPl01

0588
0A84

04ee

ce

JNE
INC
SLA
RT

S
.8FH~+,*R2

GTBT;S

RA,t
Gr9TA

s

IF ~U'F!R CONTAINS 'P'.
JUMP TO STORE A t
8MIFT 0 INTO RIGHTMrlT elT Fl.

Rt1,t!5

SHXFT t INTO RIGHTMOST 8tT R4

*aFRA,R1

l' NOT !NO OF IVT!.
CONTINUE CONVERSION

s

GTan!

eFRA
IU,S

SkIP 'Ft

GET 9YT! VALUE

PFeINT ROllTJN!

9453Q),.SHH~

..

04e~
0Aa~

• R!VlSlON,
•
.• AR$TRACTI

0Add
04185

0.48"
0.487

0469
IllAYtll

0~/Hi/1e

OFi'IGI"IAL
RfTI;J~N,L.tN!

R",r;q~

02Ft.' PRNRTN

$

~OV

CQ!8~

049~

02FC

C38D

1d49~

06Atn
00~~

rHHHII

I!H?f~
0~0'~
!IJ~02

"'~0t

0304

030!

0!U'l

BL.

0~08

0q1~("I!

IlHHJ1
0ts08
0'509
0!51!';!1

r~·

'L

OEseR,

ON

ME !-I.dolE

0f?FA

~HHH"

ClIQlUI

PRNR1N
PRINT ROUTINE

Rt.ADORES~

0492
0493

IZI~H13
~!5~4
tO~lr'5

PAG!

A

tDA\ii1

iHHH?

••

..
PRINT CARIUAG!
FE!'b, ADDRESS
AND VALUE
$Il90,ASSfMtiLV
.• CCOMPUTER.
I.. I. PiG SEQUENCF'I
ENTRy
*..
nF D!SC;f'H PT 1
MESSAGE
..
F

0!U53
0tU54
05«55
0!HSti

• TITL!
leL.Nt(
•
BLANK FILL eUFF!R
* REVISION I 03/15/76
•
ORIGINAL

*

0581
056(4
05ay

SIMPL.E ROUTN! TO BLANK 'ILL TH! BU"!R
COMPUTERI 9P0,ASSEHRLV
• CALLING SEQUENCFI
•
ENTRYI
•
Re~BFRA'ADOR!SS OF BFR
•
R9.eFR!.AOORE8S OF ENO 0' 8up,eR

0572
tHS13
0514
0575

*

031!U' ,

1~8~

1585

.e8e

1581

0~06

0200

03511

2~2"

"35'

CC:80

03!5~'
0~!5r.

035!

(/

0eg0
0egl
l!5g2

15g3

EQU

I

INITIALIZATION VALUE

LI

BLNl

JLE

036'\
03et
038E

0208

LX

003,A'
041ee

RT

STORE IN!T VALUE IN CONeFR
CHECK FOR END 0' BU"ER AND
RP'Pf.AT IF NOT

S

BLNI(3
8FRA,BFR

INITIALIZATION VALUE
STOAl INtT VALUE IN 8FR
CHECk FOR END 0' BUFFER AND
REPEAT IF NOT
RESET BFRA TO START OF 8U"ER
~ETURN

TO CALLER

WIU TE/RE.O

.. TITL!
.WRTHD
..
WRITEIREAD
.. REVISION. 03/1e/'~
..
ORIGINAL

rUHHl
01591
£leg"
0!599

0«500

.. A8STIUCT I

0601

061U

..
..

0603

..

165041

..
..

FLUSH THE eU"~R AS DESCRt8ED 'V TH! PRe
SET AU SATAUS .EQ~ FOR GODO COMPLETION
.NE. FOR 1/0 ABOAT

R10 ~ILL CONTAIN TH!APPROPAIAT! ERROR MESSAGE
10 TN CASF nF AN ABOHT.
* COMPUT!R' 9P0,ASS!MSLV
.CALLING SEQUENCE.
..
ENTRY,
•
R10,PABA_AOO_ESS OF PRe

0e0~

0606
1171507
0608
0609
061P1
liltS 11
0612

*

kH513

..
..
0310' WAT""O

EXIT.

EQII
Ll

P0,R10 CLOBBEREO
ALL nTHEA REGS INTACT
:I
****f.NTAY POINT ••••
PABA,PRB

0614

0370
031~

0201.
000tJ'

06H5

03'4
0376
0318

0420

BLWP 'SVCALT

0204'
020t.

Ll

0tH6
f1HH1

031A
031C
037!

0618 038'"
iH!19
IUHh' iRS

16001

0"20

Move

0001.'
04fSJ!I

RT
!NO

GET 110 AeAT MSG(JUST IN CAS!
fPR8SF,RS

SET AU STATUI WITH
~ETURN

TO CALLER

SVST!~

FLG

,

9150

•

980

CONCOFH'ANCE
""'47

('

,_c-

A8F

AaORT
ACL
Ael
ANP
BFA
BFfiiA

BFRE
8L.NI(
alNt<
BlNKl
BLNK2
BlNI<3
CHARCT
C(lNPRB
CpRI!!OP
CPF(M

(

CvTt
cvT2
cvTOCB

aee

OISPl
otSPLV
OMB~l

OM81>110

0f1181
0143
0103

rtHl!82

01A~

00"
0147

0241

02tS2

1/.1321
ClA37

03~H~
046~

0f536

0551

CIIttS3
0'1118
0'2t!i
039!5

0083

00'1153

0108

0267
0'00

0bU
0231

0?81
0388

029A
0394

031111

0311'1

0:'H8

~40"

0424

0A9f11

01509

0431
0527

0.'.

0U51

0164

0200

022~

~22~

0121
0126

013~

016t

laU53

0179

0191

0193

0'66
018A

02011'

0201

0205

0213

021!5

Pl210

023'

~U41

0~92

0213

0234
030A

0242

0248
0308
".3!

02fH5
0319

0251
0380
0438
05gp
"'4I0!

02!BJ

0392
0.:59

0267
0395)
0441

0.d98

05o,

02~1
0!le~

027111

0'586

0202

021fi

0~8B

0!l91

0t.'11~

0178

0V1!7

02:515

02(H'i

0'26

0101

0!"U~

0~H~

0432
04715

P302
0433
0.,7

02~!s

ftl2t!5

01201

0123

0124

0431

04~'

""31
042.
001A

0"2

0!5e9

043e
0!HH!!

02e5

0:!0fJl

'" !5liHlI

,

I

0Q15~

0~36

0"27
0141
03U\

024!!

0.d29
0!5!2
029S
t1H 3"

vU8~

01801

01s)"

0212

0319

0120

0130

0~23

027f1S
0295
0136

0182

0f.e

0231

OMB0l5
OMtH'l6

0241

0,ts2

OMBVl1

0~t56

OMB08

0283

OMI:HHU
DMlh'lQ

0287

027P
02815

029~

OMe~gA

02P0

OM611JPF

0307
011A

0!0!5
QJ0HI

Ol¥!aTRM

01212'

032'

0~30

02!~

0U~2

0248

"'94

0'03
01'13

00134

0use

0~3!5

OSE)(IT

0~5'

0'591
05315

0Uti
21015;'

0128

01~e

0227
02251

012/5

0130

0238
0022
0~H'i

i1

1

OMI:H~4

!RROF~

022Q

0472

0!'i82

CH!58

ENOPH8

QlUA

0227

0e86

05e9

0~,.g

Cl!07R

0199

05"

0530

o(IISIi',

0~'4

0182

0'64
0"9

046A
0201

0109

0~16

0011

0467

04213

0140

!QSIGN

0266
0361

0217

0147

ENO

0176
0283

0402
0445
0188

0159
017fl'

OMS03R

"'f-IeA

0273

OMS01~
OMB~2

OMB~3A

0P6~

0159

0390

OMe014

OM!:HI2A
OM803

C

PAGE 0021

945397-9901**

0244

0256

0265

0301

031!5

011P
02154

0~e1

0293

0546
0211

ftl~!5(/r

0!!!e

,,111 I2!!S

0260

02115
0:509

01542
0149
0269
0541
01.4

029'

03141

0:.518

(f

'--

,,'

945397-9901**
READA

C:

R"
STRT
SVCAL.f
TPHT

0181

0041

0(1111
0129

032~

010'

0P2'

0iS!

0'43

061!5

0221

022'"

0~;'~

0079

029~

WEO'

0Q143

0'2~

wRITA

0t-'1Ao\

IIl"TRO

0e13

THERE

A~f:

0'"
fume

0108

0151

SVMSOL.8

0~71

PAGE 0023 of 0023

,

\

t
\

I

•

A[
APPLICATION
NEXT ASSY

c

USED ON

L~

REVISIONS
DATE

DE8C~1ON

APPROVED

7506

-

c

(

.

.
REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE_ISE S"ECI"IEO
DIMENSIONS Aftl: IN INCHE.
TOLEltANCES
ANGLES ~l·
31 ~CI: OECIMAL:!:.OIO
2 PLACE OI:CIMAL:!:.02
10ENTII'YING NU. . . . . .
SHOWN IN PAltENTHI:SES
ftE"EftENCI: ONLY

OWN

~~

DATE

C""
ENGR

"0"

QA

INTl:ftPftl:T DWQ IN
ACCOftOANCE WITH
"'IL·STO·1OO

APVO

INCORPORA'ED

OM...

Equipment G",..

r __

>lIL, PROMLD, LOAD PROM PROGRAMMER-PX990

C()OoITR NO

SIZE

CODE IOENT NO

DESIGN ACTIVITY RELEASE

A

96214
J REV.

SCALE
TO-•••• ·c

TEXAS INSTRUMENTS

•

OfItAWING NO

945398-9901
SMEET

1 of 4

PAGE 0002

LOAD PkfjM PROGGRAMMER

130143

lOT

'PRUMLO'

~005

!a006

..
ORIGINAL
.. CDMPUTER; 9g0,ASM
• ABSTRACT. THIS PROGRAM WILL LOAD TM! PROM PROGRAMMER INTO
..
MEMORY, ONE PART IS LOADED IN THE OVERLAY AREA
..
BY A CALL Tn TME OVERLAY ORIVER, THE SECOND PAR
..
18 I.,OAUEO INTO THE US!R AREA BY CALLING THE LOA
..
URIVER AND SI"ULATl~G AN OVERLAY CALL,
.. CALLING &!QUENCEI
•
CALLEO FROM COMMAND STRING PROCESSOR
'*
ENTRV • R10 POIN'S TO COMMAND PARM LIST
•
WESTROVS Rl,Ra,Rg,~15,Rl~

00~7

KJ"'ld8
0~09

001 (1
iil011
~012

0013
0""14
0015
lde16
~1n17

..

0018

Dt::f

011119
~~la0

REF

~021

'~t:F

0V1W2

..

PI..

INIT,OVLy,l"t'lADOV,PG81AS
PROGSl

1IJ023

160~1

Rt

00a4

141" 10 S

R8

0~'25

tH11iJ£I
\1!10\1l,t,

R9

EQU

~

R10

1!(l

00(08

RU

f.:i.i!U
I!QU

11

F,YU

15

l!JiOli:!ti
0!1l27
0V1i1!~

01t1~F

Rlt)

~1.\'I0(lJ'

PI..

0k.liiHl
\!H:'1.)0

00"1
"0.)2

00itlVi

C;3(;'-'

It.HH~2

0~A~

00~4

00Ylill

00li!b

02~1

0008

III f;10e1

00~A

C22f!1

(1P1It.JC

kH'liH~

~'H.,ItAE

6046
C2~H

1411)41

"'00 12
H'I

C21!

!!'I~42

0014

~A9~

ifJ!133
ldlilJ4

0035
liHhH'

0038
"~~9
li)04~'

it1

ICVl43

.

'*

Er~u

t£wu

1
8

-i-PROCEDURE PROM LOADtCPL POINTER)
F.QU
!"lOV

"

kl1,Rl0
SAVE RETURN AnDRESS
-2-CALL OYLV(CPL POINTER)

'*

BL

fHlV\... Y

'*

Ll

Rl,a.IT

-2-0FAIA$ • LoteIN!T) • PROG SXZ!
M()V

'*

5

R8,Rl
-2-POINTER • cPt.. POINTER

MOV

Rll1l,R8
1rR8+,RSI
R9,9

M(.IV

.

$LA

-a-IF PARM(t) ,NE, NULL THEN
JNC

i044
. 14045

17101

~04t5

05C6

'*

INCT

R~

~1t'I47

0C!1U'

PL1

t: (,HI

:I

iD048
01il49

~jA1S)

..
..

SI.,A

1<9 r1

JNC

PL,2

HOY

*R8,Rl

t.l.IU

$

in(1th~

01111(;

171(,11

0f.'llE

C05!
0020' Pt..2

0Wbl
00~2
IIH:1b.~

C-.

.. TI TI.,E I
PROML£)
•
PROM LO_O
.. REVISION'

1/J01d4

Pll

-3.POINTER • POINTER • 2

-a-IF PARM(2) ,NE, NULL THEN

-3- BtAS •

LOC(POI~TE~)

flAGE
"(1104
(~
.;ti1/'

01,12fil

CoiOl

~022

.{Fh'i rn

01t124

~tiAf~

01i!2"

~£AVI;~

13~2e

04~F'

01tj~5

IQI,1b6

11.10ti7
000t4
00~C#

01t101d Ek$

~003

STORE PROG BIAS IN OVERLAV

*
*

~2~CAl~

LOAOQV(CPL POINTER,eIAS'

~L

'LOAOOV

H

-t-eNO PROM LOAD
*Rl!5

€.Nl)

ge~

.

945398-9901**
ge0

CONCORO.\NCE

0212171

011141
0f'136

L,OAOUV

0020

0""56

OVI..V
PGIHAS
PI..
PL,l

0020
0020
00119

~H~34

0047

PL~

0~!)3

I

la031

IN1T

0031

ill I'l 37

0036

I6k'131.i

Hi"

0Pl23
0026
00~7

00~2

Riel

0k121'1

0~32

;30c4

0!t137

101050
16"'38

0t:1!2et

017141

\(lft142

PfitQr,~Z,

NU

He

R9

THt!RE ARt

0"'53

I

'"

l6{i;~4

017144
1S0!501
0ft121

,u

PAGE 0004 of 0004

0~52

~H~e4

0fi1!4V1
01/\48

0014 t,

0({)40

~H11f5

~~"6

0052

SYMBOLS

\

"

(,

•

Al
APPLICA TION

c

NEXT ASSv

USED ON

REVISIONS
APPROVED

OAT£

OESC....-noN

LTfII

7506

.

I
I

I

~

REV
SHEET
REV STATUS
OF SHEETS

REV
SHEET

UNLESS OTHE_ISE S"ECI~IEO
DIMENSIONS AItE IN INCHIlS
TOLEItANCES
ANGLES ~l·
I "LACE OECIMAl+.01O
2 "LACE DECIMAl+02
IDENTI ..... IHG HUM. .1tS
SHOWN IN "AItENTHE.ES
~Olt JltE~EJltENCE ONLY

,

IN~JIt"JltET DWQ IN
AC OJitOANCE WITH
MIL STD· 100

I~N

;7

e ......' "
ENGR

"""-,,,./'
"/

QA

eONTR~/'

0($7

I NCO" PO" AT £ D

EquiptMrtt

Dill,.., T__

G,....,

AL, UPFLD, UP FRONT LAODER-PX990

'"

ACTIVITY RELEASE " " -

,..-••••. c

TEXAS INSTRUMENTS

/'/~

APVD

,I'

~~

DATE/I'

',,-

SIZE

CODE IOENT NO

A

96214
I REV.

SCALE

+

ORAWINGNO

945392-9901
SHEET

1 of 16

/
PAGE 01UI
0003
01804

1lI005
0~flI6

10e,
1008
.009
(601 PI
0011
0012
0013
00104

llI/ue

1Il1/H6

1lI011
1018
1/)01 9

0020
0021
0022

0023
0024
0025
0026
0021
1028

1029
10;'0

"n
t
le:52

0033

00:54
fU3e
0036

UJ;',

0038

0039
0040

1041
0042
IUlJa13

0044
1045
IUU8

8047
11148
1040
fUU50
rUI51
00S2
815:5

ellis ..

10tH'

0eee

•
''*"

'*

''**
'*

'*
'*

PROCEDURE LOADER.
TH!S LOADER MAY 8£ USED TO PERFORM BOOT
STRAP L.OAD.
CALLING PROGRAMS MUIT SPIC!FY THE ADOR!SS
OF A 4GET81T. ROUTINE TO PERFORM INPUT FOR
TH! LOAD PROCESI.

••• STANO-AL.ONE

OPERATING PROCEDURE

'"
'"
''*"

MOUNT AND POSITION TH! CASSETTE TO TH! FILE
TO BE LOADED, AND PLACE TM! DRtV! IN PLAYBACK MOD!. PRES! TM! LOAD BUTTON ON TH!
FRONT PANEL~ IF NO ENTRY POtNT IS ENCOUNT!RD
DURING TH! LOAD, CONTROL WILL BE RETURNED TO
TH! FRONT PANEL. ELS!, CONTROL IS PASSED TO
THE LOADED PROGRAM AT THE SPECIFIED EP.

''*"

GETBIT

'*
..'*
'*
'*
'*

•'*

.,
•
'*
•
•
••

•
*

*
'*
'*

'"
''*"
'*
'*
''**

..

'*
'..*

•.
*
*.
'*

.,

..

!QU

S

PRQCEDUREtROMBUT
CALL. ASSL.OR(lIo.0)
I'(!R~OR)eALL SPINel)

GETelT !NTRY POINT
CSEE cGETeIT. 'OR PROG.
OE8C'UPTrON)

IF(PROG EP.NE,')
THEN
GO TO etEP)
ELSe:
GO TQ ,RONT PANEL
ENOIF
END ROMSOOT
SUBROUTINE ABaLDR
GETBIT • ACGETS!T)
DO UNTIL END OF MODULE
REPEAT CNTwlo,1
CKSMIOLO CKSM

CALL GETBIT(YALU!,3,CLR)
00 CASE
CtlOO VALUE.IO.~TNOEO TAG
CALL GETBIT(YALUE,4,CLR)

DO CAS!

Cl100 VALUE.!Q~PGM

NAM!
CALL GET8ITCVALU!,1,CL.R)
NM8R CMARIANO(VAL.U!,.3F)
END 00,
DO WHIL.E NM8R CMAR~G!,I
CALL GET8IT(VALU!,',CLR)
N~8R tMARINMSA CHAR-S

!ND DO,

END ell

,

CIIOO VALUE,EO.!TRY POINT
CALLG!T19CYALU!)
EP.VAI..UI

(

•• UP,RONT L.OAO!1Il
IIlIlS1
IUH58

C

flIIao

.lUUI

0061

lu.a
•• 13

e....

0.05

ilees
~0e1

IIIIe8
10eo
11870
0011
8012
1173
1874
18715
1878
8071
0078

1"4070
0080
ee81

8082

C·

e083
1084
1085

rU18!
1081
1088
8080
8.08

eeOI

1102
le03
0084
~ra05

0106
0001
0e08
01UQ
lUll!!
\1UJ1

0H12
011113

IHe4
0U'!
0108

taU!'

(111)8

0110

e

0110
0111

...
•

•..
•
••

••
..
••
..•
••
•..

•.
•
'..*
.
•
•..
•••
•••
•
•..
.

.

•
•'*
•'..*
•
••'*
'*
'*
''**

.
•.
..

0"5302-00tlll ••

PAG! 0tU3

r'CPARM AODR,NE,I)
C(PARM ADOR).!P
!NQ CI
;
C3100 VALUE.EQ,CHECKSUM
TEMP.CKSM
CALL GEltO,VALUE

;

r'(NDT(TEMP,EQ,V'LU!)~'ND,

NOTCIMt(TEMP,ll.!I.VALU!)
ERROR RI!TURN
END IF
END C:S
CAIDO VALUE,EO,END OF MODUL!
RETURN
END CA
celno VALUE.EQ,R!PEAT TAtPL!T
CALL. GETSITCVALUE.1.CLA)
REPEAT COUNT.AND(VALUE.~3F)
CALL. G!T18eVALU!)
DC WHILE REP!AT COUNT~N!~.
C(CURR ADOR),VALUE,
CURR ADDR_CURR AOO+I
RePEAT COUNT,R!'!AT COUNT-t
END 00

END

ce

••• NOTEI IN THE tNT!R!ST 0' SPACI •
TH! CODF. 'OR TM! ASOVE
IS INCLUDED tN TH!
PROCEIS!NG 'OR AsaOLUTE
IHTA TRIPLETS,

•••
•••
•••
•••

END CAS!
CIIDO VALur,!Q,ASS WORD
CALLGITt5eVALUE)
DO WHILE RI!PEAT COUNT,aT.A
CCCUR" ADOA).VALU!
CU~R ADDA.CU~ ADDR+t
REPEAT COUNf.REPEAT COUNT-t
END 00
END Cli
C3100 VALUE,Ea,ASS ~VTE
CALL GET8ITCV'~UE,e,CLR)
VA~U!,SRL(VALUE,t)

CALLG!T8XT'VALUE.e,OR)
eCCURR ADDR).'HL(VALur.Q)
CUR AOOR.CURR ADOR+'
END C3
CAIDO VALU!.!Q,LOAD AODR
CALL G!Tt8(VALUE)
t'CPARM ADDR.NE,I)
CUR,ADDR,VALUE
C(PARM AOOR+LDPT).VALUE
END Colt
celoo VALUE,LT,- •
E~ROR RETURN
IND ABSLDR
SU8ROUTINE GETte

PAG!
·"1,

IUR
111~

Itt4
lUI5

:~

'I

J-,
I
r

1

lue

1111
1118
!JU9

112"

Ilal
ItaR

IUI3
8t24
It25
8U18

Ita,

ruae
eta9

1130
It~t

IH32
11~3

11:U

1135
IH~e

111131
IIIt38
IiJl;S9

114"

It41

iU~2
81~3

0t ....
1I1 .. e

8t .. e
It .. ,
8148
It .. O
11150
IU51

luea

11153
tUS ..

ItS!
Itee

aUH'
015e

euua
fuoe
IUH
ausa
.tea
IUS.
rues
IU,S

•••
."

ee0.

END GETtS
SUBROUTINE GETatT
••• START INPUT ST"AM •••
CRUBAS!I!IIIJ
BIT.COUNT.ra
CI(SM,0
tNISITS'"

••*
INS""
ENTRVwACG!TBRl
••• RE •••
N!WRECORO •••
DO WHILE CHAR.!Q.L'
CHAFhIN'33
••*
END DO
•• ••I'CCHAR.EQ.OEL1CHAR.XN733
**.GETCHAR** •••
CHAR
• fN'33
•• I ' CHAR.IQ~'C"
NlwRECORO
CKSM,CKSM.XOR.CHAR
•• caS.CNC(CBI,CHAR,Cac)
cec-cac.,
• .*
•• GET8T2 •••••••
IFCMOOE.EQ,CLR)RBS
• I,(RBC.GT.teC1GETCHAR.a
00 WHILE RBC,GT.e
CALL 8LA(RaS,t)
•
CALL SLA(CBS,1)
I'(CARRY)R8SIRel.l
•
CSt,CSC-'
•
RSCtRBC-l
."

."

."

."

."
."
."

END 00
RETURN
lOT

."

•

."
."
."

••

'UP'LO'

e-PROCEDURE LOADER'
a.THI. LOAD!R MAY !fUSED TO P
a.STRAP L.OAD •
a.CALLING PRoGRAMS MUIT SPICI'
a-a' A cG!TatT~ ROUTtN!TC prA
a.TH! LOAD PROCISS.
1-•••

•

a-STANO-ALON! OPERATING PROCID
1e_MOUNT AND POSITION THE CASS!
2-TO 81 LOADED, AND PLACE THI
a-BACK MOD!~ PRI!S.TH! LCIAD a
a-FRONT PANEL. !F NO !NTRY PO
a-DURING TM! LOAD,CONTROL WXL
a-TM! FRONT PANIL~ ELS!, CONT
2-TH! LOADED PROGRAM AT TM! SP
2-

."

••
•
."

*
*
*•

••

1~ •••

2a.GIT8tT

*."

ae-

."

•

!OU

•

.-~--.---."---------'~-------------

-

- - - - - - .._----

cael ,.. Q!
D!' CR!

••• GITS!T PARA"!T!"S •••

---

GITlrT I

- - -

't."

---- - - _ . _ - - - - - -

'II.

U,.,AONT LOADII'

0161
IU68

C'

0160
et10
1111
1112
1113
011111
1iI11!!
1118
1117
1118
0119

0180
0181
IU82
IU83
018A

e0f10

F",

21010
001U

III ra lie

01ee

Ille
1 trIJ0

"00

eA00

0080

'II.
Cl.R
OR

••
.

OTR
RT.
CLRWRC
CLRRRO
ARG
OCl
DEL
L'
CR

.,•
•
•

9.S~92.00"'1 ••

EQLl

EQU

e
-1

*•• '33
EQU

sa

e:QU

)04

IQU

_e
-c
_c

!QU

-11021
-"1210

IOU
!OU
!QU
fQU
EQU

PAGI "HUS

_0A00

.0000

AlA CONTROL & OAT. IOUATf ••••

tAU OUT READ RIQUrST
tRU IN REAl') REQUEST
READER "ON" COMMAND
cDEl.ET!.
cLINE FrED ...
cCARRIAG! RETUAN.

**.REGISTER ALLOCATION

•• UP,RONT
0188

f/lt

a,

1188

LOAD!~

••
WI'
'*

0100

019 ..

1080 . R0
IUH/tt IU
0002 RI
a01~
R3
1011'- R4
00015 RI5
21006 Rt!

01fHJ

000'

1189
8190
IIUH

0192

(US!

0196
01511
0198
01f~Q

0200
0201
1202
0a03
021114

00e.
e009

000A
000e
00ec
8e0D
000!
0B0P

fUwH5

0206
0216'
earn
0209
1i1210
fD211
fl212
0213
i214
021e
1216
fDa17
0218
fl219
e220

100a

10elS
elfU

000e
10ee

0007

R'

94415~9a.9901

31

WORKSPACE f'OR 800TLOAD!Ft

EQU
EQU
EQU
ttQU
!QU
!QU
EQU
!QU

0

TEMPeSHI" COUNT & !ND!)(ING)
ADDRISS 0'.0IT8IT.
GETBIT.aIT .TRINGON HAND
GET8XT •• Of' 81T' IN RI
GETte T!MP(RTRN ADDR SAVE)
CURRENT L.OAD ADOR!SS
REPEAT COUNT1NM8R CHAR
eLIMIT.
TEMP
ENTRY POINT 0' LOADED PROGRAM
«VALUE ..
AUTO SU8R, RETURN LINKACa!
CRUIAS!
TEMP
cCKSMII!
A'ULDR RETURN ADDR!SS

fQll

R9
RU
RU
Rta
R1J
Rt4
Rtl5

EQU
EQU
EQU
EQll
!QU
EQU

•

"LA
ROW
AeWD
AIYT
AL.D.
XTt'

PAG! 'Hues

8S8

R!

••

••

Eau

1
2

3
ill

15
6
'1
8
9
UI

11

12

13
14
Hi

r

+'l

••• ARSOL.un: DATA 'ORMAT OEf'INITIONS
EGU
EQU
EGU
I:GlU
EQU
EQU

2
3

..15
.,e

~!L.OC,AODRtUN8UPPORTIO)
R!LOC.~ORO(UNSUPPOAT!D)

ABSOLUTE
ABSOLUT!
A80LIUT!
EXTENDED

DATA WORDetS!!T')
DATA eYTEes 8%TS)
LOAD AODR!SS
TAG

."

0010

0011
0012

0003

0084

00015
e01e

eOM
PION
PlGL.
A!P
R!A
CK8M
RPll

EQU
!QU

EGU
EQU
EtilU
EQU
ftilU

0
1
2
3

4

e
e

END OF MODULI
PROGRAM NAM!
PROGRAM L.!NGTHCUNSUPPORTEO)
ABSOLUT! ENTRV POINT
RELDe, ENTRY ACDRCUN8UPPIORTIO
CMECKSUM
~!P£AT eOUNT

<-

•• UPFMONT LOADER

(~d

B222
0223
0224
02215
0226
0211
1228
122D
0230
0231
0232
0233
ea;!4
02;!!5
IU;!6
fn:51

00211
IUJ26
0028
el2A

06Am
01131'

IUl2C

UHf,

16112E
00;!1t1

C2.9
1301

0021iJ
0022

00:52

•• 50

laIII3.

0420
0001

(UJile

(~

1211"
0242
rU43
024.
02.15
12.6
12.7
1248
ea4g
ea50
1251
0252
1253
1254

0aee

8258
rU57
e258
0259
12150
12tH
0262
0283

•
•

•

*

•

'*
BOOTI

BL
JMP

A8801
A88L.OR
S

WSP

e

01/138

003A
II:5C
003E

,"U0

l'U2

•

16118 ,

04CO
04C~

e4C!
00.4'

19.4

04ce

fu.e

CIIE

•A801
•

•

•
.Rg

0tUA
00.C
le4!
IU.l50

leOI
.

•

00

MONITOR CONTROL !NTRV POtNT
WORK8PACE

~OR

800TLOAD!.

AeSLDR(~A0)

"-IFC!RROR)CALL SPINCI)
R!TURNS MER! ON ABORT
t-tFCPROG EP~NE.0)
2.nt!N
3-GO TO C(EP)
E)(ECUTE PROGRAM
2-EL8£
3-&0 TO FRONT PANEL
NO IP FOUND~"TRAP TO PANEL
i-ENOIF

""END ROMBOOT

s

Rtl,IUe

Ll

FU,G!TBIT

CLR
CLR
CLR

R9
R3
R1.

EQU

•

CI.R

R6

MOV

FH 4, RS

'*
'•*
'*
0048

0-PROCEOUR!.ROM8UT

i-CALL

81.\11 P '8

0031' A88LOR e:QU
MOV
C:5ce
lUll

PAIiE Gle01

'ABSLDR

MOV R9,R,
JEQ . 800T"

••

0285
0286
0267 . 00D2
1128a 00D4
0055

e

•

s

'*

00.8

ea8A

8453.2.081111.*

*
0020' ABlaUT EGU
JMP
1001
JMP
100A
0024' AB801 EGU
LIIlPI
02Ul
0000'

tHUe

02;!Q
02.0

**

BI.
*R1
BYTE Cl.R,3

1-SU8ROUTINE A81LOR
••• ENTRY POINT
SAVE RETURN AOOR
A(G!TlUT)
1-GETBIT
ADDR, OF GETBIT

•

CLEAR ENTRV POINT
CLEAR BIT COUNT
CLEAR CH!CI<8UM
1.00 UNTIL ENO OF MODULE
,_REPEAT CNT.0
l-eKSM-OLD CK8M
~tLL GET CLOBBER!D IF TAG
IS NOT OKSM, BUT OOESNT
MATTER IN THIS CASE
2.CALL. G!TBtTeVALU!.3.CLR)
a-Do CAS!
!"Cl~DO VALUE.!Q.XTNO!O TUJ
GET A TAG IN R10

0~

la8A
1007
16:52
08'111
00
04

•

el

IH0,le'"

JNE

AB13

.Rl
BI.
BYT! CLR,4

CHECK 'OR I!)lT!NO!O TAG
JUMP FNOT
.-CALI. G!T8tTCVALU!,4.CLR)

**

UPFRONT LOADER

fIl289
1821m·

0211

0056
0see

0281.
00el

1212

00:SA

160A

00DC

0e81

0213
111214
02115

00f5E

QHH5F

0216
111217
0218

0219
028111

RImeL')
0062
0064

0281
0282
11'283

028 ..

!limBe
0068

0069

0285
02815

16281

1Il28e

0289
02921
e291
0292
0293

00

0~"A

00

01

131.
0313
1314
0318

'-END DO'

'*
'*
A8e,

S

eL
*FH
BYTE CLR.7
!QU

a!c

s

.OET10

.
..
•

MOY

FHI,R;

10EZ
001!' ARIU

$

0C1!1~

028A

.

EQU

R10,CK8 M

012180

0005

CI

0082

1t50A

A8113

GUllA

carll!

•

IN!
MOV

R14,R8

0!l1St!

06A0

*

8L

.OET19

011188

fUJ,,'e'

1604

C2-U

.
..

•..
'."

CMAA.GE~0

e-CALL GET81TCVALUe:,',CLR)
e.NM8R CMAlhNMBR CHAR-!

'.END DO'

8L

0[.1103

N~8"

A804

A1308

..

'-DO WHILE

Rts

IN!

13ru

CMAR,AND(VALU!,-3')

IU0,FU5

FUe,A!p

06AI'D
0Q!FI5'

e3U

e.tIlMeR

eI

0Q11t

thlCALL GI!TBIT(VALUE,7,CLR)

AN01 fH0,)!3F

A801

001A

NAttiE

BL
*Rl
BYTE CLR,7

JH

18FC

0018

1309
0:SUI

•

0608

1296
0281

0301

A807

EQU

IISH5

0303

IN!

'*
*
leetl' 'A804
ItUH '*

028A

1;04
130!
IU08

IHe,PGN

JMP

0018

"efle

... DO CAS!
t'h i' ClI00 VALU!.I!Q.PG~

Cl

MOV

006A' ABrU5
RHH.U
0liHSC

PAGE

IiH?!3'

0010
0012
0e14

03091
0301
0302

'*

9453SH!.rHU! 1 *.

CUA

10EA

0298
0299

•

07

IUIB!

0294

'**
'*
'*

e.. !NO etl
ellCe'DO VALUE.!Q~!'AV POUlT

a.CALL GET.! fa( VAL.ULO
e-!p.VALUI
e-XF(PARM AODR.N!~0)
C(PARM ADDR),,!P
"-END ca

8-

JMP

ARIIH

!-e:ScDO

YALU!.!Q~CM!eK8UM

a~T!MP.eI(IM

a-CALL G!Tl0,VALUI
.tNOTE.IINC! NO; IVT!S atNC!
LAST eK8M MAV II !lTH!R!VEN .,(
DR ODD, (AND WI DON'T KNOW
WMICtO·•• WI'LL 8ETTLE'OR A 'ct

•• UPFRONT L.OAO!R
03115
:',,:,

0318
11310

1320
1321
1311
11323
1324
032e
1328
1321
11328

fllJ0eA
Ilec

008E
00t0
00t2
00t'
11815

IUCE

82.'
130A
0eca
8281
1307

U.l14

luag

833121
14331
8332

0010

0335
0338
833'
!J338
8339
0340

10ge

eBCI'

80A0

10AtI'
IA51'

83.01

00A2

033.0

C'

1118"
8018
00tA
8121tt

033:5

1342
1343
1341.
IUAe

'3AS
834'
0348
03A9
113150
0351
83152
03153
8315.4
13ee

00A'
00Ae

02814
le0~

e:

1363
03e.4
fUe15

••
AlHOI
•

•
ASU

•
•

e.

CL.A
C

Rt4
R8,Rt0

JECI

AfHH

SWPB RS
RS,R10
C
JECI A801
JMP A811
S

eI

R10,!Otol

IN!

AB12

INeT 'FHS
EQU I
.R15
B

028A
IUJlle

R11,RPT

JNE

A811

0rU8

07

ImAC
00AI

CUSA
1J24ti
003"

•

IU)

•

.Rl
BL.
BV,.! CL.R,1

0IJlt
021
03

N!~T

0".

CKIM OK.PRe!SS NEW,. CATA
BAD CHECKSUM.~IRROR 1)(IT
e.!NO t,
e.C4100 VALU!.!Q.IND 01' MCDULE

e.RE,.URN
SUCCESSFUL. L.OAD
HER! 'OR ERROR

l5.el5.0o VAL.U!.!Q.R!PEAT TFUPL.!
UNaUPPORT!O !~T!NO!D TAG
e.eAlL. G!T.tT(VAL.U!,',CL~)

e.R!P!AT COUNT.AND(VALUE,1iI3"
MOV

RU,Re

ANOI IHI,"3'

•••
••
••*
••
'*

•

8116' AfH3

•

a.CAL.L. GETlstVAL.UEl
e.DO WMILE REP!AT COUNT~N!.0
,.e(CURR AODR).VALUE
'-CURR AOD~,eU~R ADO+2
7.REP!AT COUNT.R!p!AT COUNT-t
e.!NO 00
e.END C5 .
' •••• NOT!. IN TM! INTER!ST 01'
THE CODE FOR "H! AI
tS !NeL.UD!D IN TM!
PROC!88rNG I'OR AlSO
DATA TIUPL.ET ••

....
....
.,....
....

,,
.,

.

0082
008.
80se

CKSM OK-PROCESS

15-!NO C4

CI

BasH

NOTC8HC(TEMP,8).EQ.VAL.UE)
!IItROR ReTuRN
e.
CLEAR CHECKSUM I'OR NEWT· TIM!

5-£1110 C3

EQU

I

leFC

~AICEC·1

fWN.,.e: XU!-!

PROCESS IU:
PROCESS RUN
RESET
PERFORM LOAD

--.-~~

---~--

..

CCLOAD·~ARD/C."ITTE

1121
a12e
Ilag

C

'ElSe
FEISE

CISD
C08!

Fl80
Fr8a

C081'

111t

11111

FE84

C342
C382
C3C2

11~0

IU3a

1134
f/l1 ~IS

111118
al~1

'Eee

FI08
FE6C

1130

FEeE

a140
rU42

'/H.I

II ••

11.15

ru.s

1147
1148
1148

1115(11
ItlSt
1151

•

•

FEe,. ctce

1138
114'1

C087

LOADER 043344-POII

F£10
FE72

CCI)g1
esc?
C'C!
il4ce

F!1.
'£115
FE78
FE7.

101.
1380

fiE1C
FE1!

1000

FEel!

FEal

Fe84

11l0E

111380
FE7C
!FfU

ISF!
j)t)5!11

IAIS!

*

•RUN
IU;
WAIT

WAlTa

DATA
DATA
DATA
DATA

R2,AII
R2,RI411
R2,RU'
R2,R1

OATA

WP
PC
ST

*R7,R2
R1
R2,*R7

(MA) •• )11 DATA
INCREMENT MA
DATA .... (MA)
ZERO .... DATA

Rtl,R2
R14,R2
Fl15,R2
R7,R2

MOY
MOY
MOY
MOY
MOY
tNCT
MOY
CLR

R2

aeo

RUNL.QT
RTWP
SBO StEFLG
RTWP

lliP

PC
ST
MA

DATA
DATA

OAT.

• • )11

MA

ENABLE MUN CRESTART)
RETURN TO USIR
ENABL.E II!

I

STtME
T8
TtMER
JNE WAIT2
STCR IH.e
AT

....•••...
....
........
....
"'

MOY
MDY
MOY
MOV

EQU
S80

PAGE IUlfIIlS

RiV.~

WAIT 'OR 10 MIIC
CHECK SWITCHES

CCLOAO-CAftO/CAaS!TTE LOADER
Ila4

1118
'1'~

0.e.

*..

TITLE , CARO/CASa!TT!! LOADR
AUTHOR, JAY ALLEN
* COMPUTER.uue,MIRA
* A8STRACT.
* • ACC!PT' 990 RILOCATABLE AND ABSOLUTE COOl
• • ACCEPTS ON! OR MODULES
• • WILL NOT PRocrlS eXTERNAL REFS AND 01"
* • EXECUTION 8EGINS AT LAST !NTRY VECTOR

1

8155
e158
815'

1108
8189
Ill.
etot
8162
0103
Ill.
It08
(lld6
1117
8168
11dl
1110
0t11
8t12
'113
011.
It15
It18
It11
It18
8178
8180
8'81
Ill.
.8'13
8114
Itln
118e
1"7
1188
1181
8180
8181
1181
1183
1184
11ge
1188
1111

'AGE

94~3'4.9913 RIV.~

•

•

,TATISTXCS-

OBJECT ,ORMAT
• * TAG
MEANING
.. •
I
MODUL! to
.. .,
S
ABS !NTRV
.. •
2
MEL ENTRY
• *
3
R!LR!'
.. .. . 4
ABSREF
• .,
5
RELOE'
.. •
e
ABSOf'
• *
1
CHECkSUM
.. *
8
NO CHECKSUM
• •
9
AB8 LOAD
.. ..
A
REL LOAD
.. * B
AIS OAT.
.. * C
RIL DATA
• ..
0
SIT BIAS
• •
E
UNUSED
• .,
TIRMINATOR
* • G REL aVISOL
• *
M
A88 SYM80L
• •
1
OLD lOT NAM!
• *
J
RSL TYPE
• ••
EO'
DTR
eQU 9
RTI
EQU 10
w •

1.1'
8e0A
00~e

leet
0010
0007

0111
000'
000F

'18'
'Eae
'EeA
FEet
'EeE

'£8e
0360
Ilia
'FCA
0Rle
F,e.

1.,0 '£80 02e,
FI9t '7'!
'Eru
ceo,
ee .. e
18FO

ACTION
UPDATE LOAD 81A,
'AVE ENTRY POINT
SA'I! ENTRV POINT
NO~f

NONE
NON!
NONE
TEST CHECKSUM
GET NEW RECORD
UPDATe LOAD ADORISI
U'DAT! LOAD AOORISS
LOAD DATA
LOAD DATA
UPDATE LOAD 81A8 'OR NIXT MODULI
ERROR
GET NIW R!CORO
8KIP
IIUP
81<1P
SKIP

START PROGRAM EXECUTION

WAQ
RRQ
NS'
pReNC!

EQU 11
EQU II
EQU 13
EQU 7
NRiAOV EQU 1
COLIND EQU tl
READ
EQU IS
•
REGIITeR INITAL%ZATION

LOADER EQU
RifT

I

LJ

Ra,ITART,

Ll

RU ,GETENT

DEFAULT INa VECTOR
ENTRY POINT TO G!T CHAR

LX
MIMCLR EQU
MOV
OECT
JOC

•
.Re,.AB
RS
MEMCLR

(

',-.

--

----------~

CCLQAD·CARD/CASafTTI~OADER

fOilS
1218

Ci
,c,.'

lae,

IralU

1218

lall1

aau
.a12

1113
lal"
1115
laus
11117
1118
la18
·1220
ea21
1212

122:5
122i1
la2e
111228
1217
1228

l.a8

12~0

FteA
Flec
FEI!
'EA0
FEAI
FlAil
FEAt)
FfA8
FEAA
FIAC
FEAE
FEI0

FeS2
FE8'
FE86
FEBe
FES.
FESC
FEIE

FEce

FEC'
FIC4
FEC6

12~.

1213
".~4

.rus
1238

1231

1138
fl23Q

.1410
12411

FEeA

FEec

FEeE
FEOII
FEOI
FED4
FEDe

lOll$)

1001.
32a0
"e0

FE82

FEB!
CQl00
1308

lF01
I:5F!
lF01
13F!
110'
lF01

FHJNLGT
MANTPL
I.DRl

lua, •.40

MOV
IN!

CRINIT

tl,.R

R12

S80
8BO

R0,Re

OrR

PAGE e0t17
ENA!L! RESTART
~'INTANC! PAN!L PRIIENT'
YES USE PANELS LOADER
CR CRU BAlE
LOADER SEL.ECT
ASR tAU fUSE

Ins

LOCR .PBON,e
CIUNIT !IiIU

I

GET NEW RECORD
NEWRIC !QU I
MOV Re,RI
JIQ NEWRCS
T8
PASNC!

8.41

FEE2

FEce

e4C7

88l
18

LOIH
N[WRCI

191045
FEDI

REP

"6~e

A1tiA
0601
18f'8

FEES
FEE6
FE!e
FEEe
0201

.-a

REAO

eLM

R7

*Rll
.OPCRUI),R2

JEQ
8RA
~ov

FTAG
R2,e
R7,R4

L.X

Rl,.'!

EQU

•R6,4!I
*R11

JMP

IN!

EQU

8

REI,.SYM
ASSay,..
RL.OE'
ABO!F
RLHEF
A8REF

R10,R6

JUMP OtLPL.ACHENT

IAVI! CH!CI(SUM
GET NEXT .. CHARS

ACCUMULATOR

IH

RE"

•.JM"(R2)

!£IiIU

S

EtilU

I

EQU
I!QU
EQU

•

LX

f" ,e

EQU

CHECKSUM

S
I

Move

BL

READER ON

•

BL

5LA
A
Ole

.U4S

8.50
11125 t

NREADV
1-2
AEAD
PRSNC!

JNE
SID
EQU

G!TFEL EQU
EQU
RSI..

LOADER SEL.!CT

1.2

* GET NEw '1£1.0

el07
0201

FEE'8

FfE6

JEQ

0882

IUr4Q

0253

T8

OlUA
"145
1:521

IIIU8

FII.

JEtiI

lfiF!

100'

FEE:!
flJ462
FEE2
FElS

la52

e

0'U0

cee!
1ercH5
14ce

FEee "spe

rUU8

eaa.

JNE
L.X

1613

fiECI

12 ....
124"

IIU2

Ta

eaec

FECI

FE OS
FEDA
FEOC
FED!
FEEl'!

ea43

880

REV.~

f!

e211

C"

lDIU
lFflJl

g4:5344-ggrn

S

$
I

GO TO TAG PROCESSOR

·,

CCLOAD-CAND/CA8SfTTe: LOAOER

FEI!

000e

(tHHH'
1t/2"

FlH!!

A189 ' RELOAD
CtAe ASl.OAD

02~8

fiEFS

10Ee

02a9

FEF2

A189

0280
02tH

FE'"

0205

0282
0203
0264

FEE.
FElt

"1"6
FE'8
'fFA

131"
'F00

ERE)(IT EGILl

FF0~

041!H!l

""02

0002

He,RS

SWP8 R6
MOVe H~,*RI5.
JMP GETFEL

CHECK

02d7

"ade

A
MOV

Aue

026'

SKIP
R9,R6

JMP

JMP GETFIL
RP,R«S
REPATA A
ABOAT A MOVS Re,-Fle.

1.)046
1 filEt!

FEFC
FEFf

Rll, ru

A

JIG
a

GETFIL

FF0C

AUHI

Rl,.~NT

0212

FFIU

c~ce

AefNT

It
MOV

0273
0214
0215

ffl'U

FF12

l..ENG

C246

1210
t'J271

'F08
"04

FFFE
lADE

IU,.,

e27tS

uoe

11"12

0~01

FFl14

000'

,FHi

!"Fle

FF18

.HHU

0219
0280
12tH

'FU

UIFO
1005

0282
0283

1"284

128ts

"'IC

FF1E
"20

"a,

JMP

FF1!

JMP

R6,R3

SKIP

I

E(;HJ

GIT NEW LOAD ADDRISS

RILOAAT!
DAD DATA

CHECKSUM

NEW RILoe LOAD 81A8.

FlELOACTE
ENTRY VECTOR

$

81..

*FTAG

REF/D!F
RELOCAT!

SKIP

GETI"EL
Rl,e

*FlU
DEC FIt
JNf SKIP
JMP GETFEL
STATUS WIL BE EQUAL ON END OF RECORD
EQU I

0ees

61..

16"!

JNE
JMP

ue?

GETFEt
R9,R6

EQU
01..010T 1.1

0698

0278

erule

'2(RU)

MOV R6,R9
ANOl R9,lItFFFE

'F0~

rueH'1 I"'F 10 6 02""

PAG!

$

salAs

0268

I;!V*~

to

101~

OD4e
1d6es

g433~4.99S~

..

.. Fll1

FTAG
N!wREC

""

CCLOAO-CARD/CASSETTE I..OAOER 943344-9903
0287
0288

C'
""_.J,;'"

'*

•'*

0289
0290

'*

02!iH
lUlU

'*
'*
'*

~295

'*

10292

02113

•

02516

''**

02!1l1
02SJ8

'*

0299
03~~
0:\~1

031d2

F'P'2~

CAL.1.. TO
B

GETRT

ENTRY

R~,R0

GTASR

OECODE AND TRANSLATE

'*

'fB

FF"2A

1634

JNE

0308

Ff2C

IF'0F'

T8

V):51d9

Ff2E

031"

fF3V

16Ft
3""4

STCR

It) 311S

03115

Ff' 38

04C!

oAt.ll.

1D31/i

H'3A

031~

FF3C
FF3E

fl."
15
16JiO

fF4V'

kl6ft1~

ffi42
H44
FF'46
H4b

c.;'~l.

11H581,

0J23
"'~S2!5

kl326
kl327

itiJ3~

fF 4A
HAC

~333

C20A

~241.

•

COLINI"l
$.6
R10,0

CLoR

•

R10,FHI

SRI..

R10,2

SI,.A

R10,11

INC
SLA

JNE

1(10
Red
$",4

Dt::C

IH0

MOV

RU,Fle

sur.

RA, R HI

MQV

R Ui, R8

Al

FF52
FF54

0A18

SI,.A

R~,

1702

JNC

$+6

FF54

0A18

0337

FI'I5C

17"2

CARD

GET CARD PI)NCHES
12314!5t511 PMZ1ge
123145671

lPMZ918

lPMlS)£e

AI

•

1 O,,71

1 r}7.,.lPMZ918

lPMli10-.61PMZ910--el

1110,"81

...

02~U.

PUNCHES

GO 9FT END OF RECORD

R10,>:.'!rI!

~221.

003!l'

0336

LOADER SLELECT

ANOI R10,>F'

f'F!H'

IDJ35

FND OF ROUTINE

RA

ff4E

0010

AT

R8

MOVe

swpe

01310"

f'fe.;6
H08

0334

*

Eass

IOJ31
~331?

'*

0f5C6

~32ij

~329

'*

02wU!
1IJ92A

~311

0324

JNE

PRSNCE
EORSET

'*
foF3:>'
"f34
FF3/S

IS

'*
'*

0Jld1

klJ2?

GF. T

1338

1F01

1D32Vl
fd321

.~11

J~P

FF2~

1d312

VALU~

9L

~i;OV

0311

EXIT

f(;IU $:

f'P28

0314

ER~OR

'2(R1t)

R11 INITIAL
E. G.

16306

L1313

.,.q t

JEQ

030!5

e,

t:iL.

CfIHH}\

03~3

11'009

GET CHAR CO"ROLJ T T NF.:
CALL f'OIoi GFl CHAI-'

FF24

0:5tt4

("

'*
GEl

PAGE

REV.~

SLA
JNC

1

P1

RUI,>10
R8,1
S+fi

M7

ctlUAOnCAHD/CASS!TTE L.OAnER
\(1338

'" f5f
flF6(f

AI

~~2~

0Q11'i'

k13~$1

943344""S.HHl3
Rlfd,»U~

"

034rJ!

FF62

0AU

Sl"A

R8d

rf64

1702

'+6

0;"42

FF6fl
fff)6

JNC
Al

01<'23

&LA
JNC
AI

~8,1

R U, >9

C1

IH~,>30

1~11'I:?

JNF-

$+6

Ll

R'~,»2"

eI

RtPi,>53

IN!::

LX

$+6
Rl",>30

028A
0"'55
1 tvH

CI

1ool10,,,~e

J\..T

$+4

0641..

DECr

R10

JEtl

$-2
GET!

0221.

Ff'6A

IU18

0~S4e1

PF6(;

k:l34B

Fr6E

1702
022/,

FF7~·

~HHH'I

0346

f'F 72

Iii~HH.

~"'321

0349

FF 74
F r 7t>

0347

~31S1
~3:52

~"53
k!3~4

~r78

~20'i

H7.

0ti120

rlf7e

0281.

FF1f2

00!>:3

FF8~

1~02

FftH?

,02WJ',

FF84

0!f'!3~

1035!5
\!:l~5t'i

~3!)8

FF8r:

FF8A
f'FIH;

0;'59
036111
0361
0362

FF8E
1""90

0363

FF9.t
Frlllt'i

~~t54

FF92

0368
0369
1037~~

'FA~

.,371

FFA~

kl312

FFA4
FFAti
FF A~ ,

10313

0314
0375

0316
0311

..

.

91

:1.1+6

FFAPo

Ta

fH,ANK?

1.1

JMP
EORSEi EQU

5

C

R10,FH0

1':'11

JMIi>

GETRT

GTASR

EQU

TB

RRQ

JNE

lE0C
;seCI.

STeR RU,7

00(U
02tU.
1a1!l0D
130'

SRI...

1d0tH.

FF'AC

lt~fO

F F Af:
fiFBV,
f'F62

102.U
0020
11 F2!
FFB4

AltA

03714
0379

"6-4
f FI:H5
!"fe8

022.t,

03811

FFS,\

~28'.

Gf!T1

$-2
RRQ'
~1~,8

eI

R,~,>D

JEQ

GETI«T

el

~281.

SP:T eQUAL STATUS

$

H0C
lf11F!

sal

Z,2-g

COI..INCl

8281.
FF'ge

HSl8
FFIU
F'F9C
FrlllE

k'3(;7

lFI;)F
1,3Ft::
l'H!1I

FFI'U

Io~D!S

103tHj

RHj,>~3

'III

FF'ij8
kl~\b1

21

'j\o

IlI344

03~r}\

;/

..

"341

0343

PAGE 00111'1

REV*A

ENf)

OF RECORO'?

Rtll!,;.5A

JGT
el

GTASR

JI..T
EQU

GTASR

A

R10,R7

kHl,;'~0

91

Al

RU:I, .. >3~

Cl

RU,.A

l)POA'TE: CHECI(SUM

CONvERT

FFD~

\.

.

CCI,.OAO-CAWVICAS8ETTE I..OAOEF? 943344-SHH13

C\

"381

fiFBt
fiFSf

"382
0383
0384

Ff'C2

fife,,)

000.
130e

FFt0

FFf'g
FFCI!I

0386

Ff Cti

\Q6JjB

0387
0388

"Fce

038;
03'HJ

0391
0394
k:i39!5

"396
031.17
031il8

FFC/.
~3491
~FCC

,,'FCC
FFCE"

CI3~!'1

FFDItl
"1"02

FFD'
FF06

0399

FFoe

IUlilJ0

""FDA

0A~t

"'402
0403

0AVl4
"A'S

lP1AO

FFCA

1i'392
03~3

FFct

EXIT

I6Ae3

GET~T

Si
!lIfH 1,

S

IDLE
EQu

I

MOV
JNF'

RESET

RC!!,R0

56l

WRQ
RRGl

INC
JNE

At

T8

RRQ

JEC'J

tXI"

L.OAD ERROR OR NO VECTOR
INDICATf ERROR WITM IDI,.E L.IGH
L.OADER SEL.ECT

1.2

sat nTH

RESET

MODUL.!

R10,.7

ElL.

sez

L.CA 0

$

EQU

STAIOHl EQU

16F!
lFIdC

FFE'~

ENO OF

EXIT

GETENT EQU $
JMP GET
,.,
MERE ON ERROR EXIT

0!581

,.FE0
"'36'"

FFE12

GETRT

U:\I,IC

,"Foe
FFOE

EQU

AI

ttHU
IF.:kl8

13,..8
l!flIO
lE00

JEtJ

JL.T

11~~
kl2~U

.. ~c~

1tl38!S

peON

PAGE 0011

Re:V.~

sez NSF
EQU I
RSfT
.R3
a

ENTRY VECTOR

CCLOAO-CARD/CASS!TTE LOAOER
0401

"408
10409
04HI
ilJ411

0412
~413

0414

0415
0416

1417

FFf4

FFEe

04

BYTe:

FFEQ
FFEA

0.4
04
04

fJiF3
rFF4

12
10
22
If

BYTE
BYTE
eYTE
BYTE
BYTE
eYTE
BYTE
BYTE
BYTe:
BYTE
BYTE

021

BYTE

FFF5

fU
;'0

fFE6

FFIEn

[0421

FrotH"
FFF0
FFl'q
FFF2

0428
kl429
0430

"431
0432
0433
0434
04\55
"'01136
0431
"4,HI

LENG~JMP

AIU!:NT.JMP

2A

1'419
0420

lUiS
1/1426
0427

at

eYTE

FP'E1

FFEC

0423
0424

01"

""'E6

"FEe

FffE

ffF6
FFP?

FFFS
fFFA
F'FC
FfFt::

04;)9

0440
0000 ERS

lA

Ee

0C
elA

Ei5

,"'E00

FDFC
f8i10

0~H2

1

\.

RL.!NT.JMP
FH.. REF.JMP
ABREF",JMP
RL.OEF.JMP
ASOfF",JMP
CHECI(.JMP

GETFEI.. .. JMP
Afll,.OAl'hlllJMP

RELOAt"hdMP

ABOA'fA.Jf!\fI1/
REOATA.JMilI'
SBIAS.JMP

EfUX I r.JMP
t1

aVTf Rf\,..SYM.JJI1P
eYrE: ABSSYMp.1MP
BYTe: 01..0 !OTp,JMP
iolSI.,.JMP
BYTE

04

FE8!5
f"ECe
"800

PA

REVfl'~

••••••• *•••••••• **** •••••
TABLE
'**"'
" JUMP
•• **** •••••• *.* ••• *.+.
flYT!
BYTE

rU1S

kl422

30

943;'~4"{H~El3

DATA

LOAfH~R

OATA LORi
OATA FPWP
OATA START
LOAOFN EQU L.OAOER
L.OAOFN EQU ltIFOFC
t,.OADFN !!Qu >FDfC
,'pwp
.FIH!lO!
E~U
11
11
FPWP
EQU )!8/f1
£:.QU >F800
FPWP
END

.•

W/O

~

FIIITEST
F~rf.ST

F'

f

OTHf!

oTOTVPING

SVSTEM

W

'\,

943344-9903
SHU) •

•

'H~0

CONCORDANCE

8251

0071
0198
0233
0266
0341
0311
0A21
0A16

0272
0257

(U19

0'
"

4S0ATA
4eO£F
A8ENT
ABL.OAO
ABH!F
ABSSYM
CHeCK
CHE"

iue0

COL.tHD
CRINIT
CRUO"
OTH
IOHSEf
!REXIT
eXEC

0193
02115
00159
0186
0382

CLE~R

ExIT
F"
'PBIT

C
"

FPiTHT
FP ... P
FTAG
FUNC
GET
GETI

G!T!NT
GETIriL
GETRT

GT.SIit

JMP

L.Ok1

L.!~G

02153

tU1A

0.42'

02611

111.417

lIIa6f.i
ot 12(;1

0f1HH5

eHH

fU22

0123

012A

etlS

01A7

02HI

0211

022t
024g

0212~

0218

0232

02&QI

0251

0228
02152

1621.
1834(5
0382

0276
0349
0385

fIl3fiH~

0309

121320

0:s:n
0'03

02116

0248
0282

0353
0387

0351

0360\

035)0

0392

0382
(.11:598

027(,1

iH!73

0280

0418

0385

rue:s

IU37

0381

0308

0359

0210

liHll15
0212
0307
0'2'
0123
0381

0086

0086

0080

(U01

0124

012e

0"0V!

011171
214139

0282
011e
1lJ~00

01\1193
1a236

0432
11'128'

[it 11
0388

0317
0381
111232

IHliHi

0385

0364

0365
0246

0302

0372
031.

(~247

0A1Pl

0411

IU12

0413

0418
0428

0419

0420

0421

0422

041'
0'23

0415
0424

0'18
lUI"

0411
1421

0429

l~201

04~H

efUIQ

0218

0218

031111

1Il!0l

03513

0113

0111

lUlU

0239

02'4

rUlS4

0228
02741

oUHf

0"

009!)

0436
0101
0002
111068
02ill
0229

0217
0192
019~

OLDIDT

1ll21~

OyE.R

0'U!
21110
0382

peON
PRSNC!

0083
0201
024l'1

0118

0392
0fl183

L.OAOER
LOADFN
LOOI<
1,.0tlP
", A'" 1 PI.,
M!fl'ICL.R
N!IIIRCl
NEWREC
NREADIf
NsF
OP

PAGE 0013

0.t 11

0eAg

011[\
00153

*ft .

0361
0~U'8

0283

0265
0383
037~

041\')
(~1l30

0087
0104
tH 14

0126
0106
0121

0206
02041

0210
0285
IU22
fU02
0091
04128

000$1

0235
01".18

_ROt

0t91

0214
0220

0225

00;)H

13082

0085

0306
0209

litl

0039

0393
09119
0215

010f!
0218

1109
1391

943344-9903
R10

IHi

Rii
R13
IH4

RSCi

RI

0P148

03UI

0314

0~HS

11329

0~~!1\

A

03f511l
0311

fII~52

0384

03tHI

0~~H~

03t):5

il313
0234
0208
0133

03115

0318

'"
0379

0~le
033~

038~

0241
1211

0~6'

021.,

0380
0283

0134

0113
0138
0'06

0128

0129

~130

01411

02315

0131
0231

0133

0140

0098
0203
0256
0212
0138
21319

0103

I Hila

0115

0\16

112(11

i!200

91

I2l

fl2el2

0!l!51

~?5g

@261!l

0261

0~t:i2

0~Hi4

0139

014~

02:!'~

m:U8

031e

032'-

0:525

03rl~

0

0~32

02tH~

0268

0~HHi

0211

038S

0396

e:.HH~

0143

0205

"",a~

00115

IGlee

0129

Iin;S0

01 ;S5
0Pl92
0136

0041

0"'42

RS

0243
1321

00151
""'52

~3

RI!

023f5

fU9;

IU

&'128

011'88
0135
01ga
0238

0043

0(.,'g4

0202
0242

0044

rU68

117
R8

IH3t
0;513

2104ei
0046

0212
0254
0096

0202
0243
0211
0136

0340

0314
034'

R9

0047

00114

0256

R!tlATA

"lSIA
liHlfS9

0224
0422

0221

0256
0248

0AIU

R!L.8YM

024~

0245

21'03

03fU
IU1e
0412

R£.O

REI..OAD
REP
Re81T

MI,.PE'

RI..!IIIT

e271
0252

RII.
RT'
RUN
RUhLIIT

8a1A8

ICAN
Su:
IU,'I..'

81(1P
START

START!
ST1M!
IWPS
TABL!
Tlf'lll!R

TvPe:
WAIT

WAIT2
WRQ

THiRE

0189

IUU
0368

0233

~U29

0181
0143

0213
0124

0064
0268

QHHU
04123
tH0a
21123

006~

fU4t5
21061;1
0216

0

I:!4~

0348

~3

0~'flI

,"
", j

8

0134

0241

~33e

0t45

rnfSe
21433
0lgS
1!H4S

21015
0;5g0
0061
00152
21122
210$5

0219

late?

0U0
0140

8061

0110
0094

2114,.
0149
01618
AF.E

0
0363

041e

0250

RI..I(!'
RR"

PAGE 0014 of 14
0318 0322 0:524

0!1l'1
0049

"I:HS3
004V:

*ft

rU50

03915
~m94

SVM80LS

(-
Source Exif Data:
File Type : PDF File Type Extension : pdf MIME Type : application/pdf PDF Version : 1.6 Linearized : No Create Date : 2016:06:25 10:27:37-08:00 Modify Date : 2016:06:25 11:30:57-07:00 XMP Toolkit : Adobe XMP Core 4.2.1-c041 52.342996, 2008/05/07-21:37:19 Metadata Date : 2016:06:25 11:30:57-07:00 Producer : Adobe Acrobat 9.0 Paper Capture Plug-in Format : application/pdf Document ID : uuid:a2b81689-3aec-af4f-8e12-15eee6576d68 Instance ID : uuid:6fbcb4df-35cc-5a4c-b531-92f29c6fa131 Page Layout : SinglePage Page Mode : UseNone Page Count : 693
EXIF Metadata provided by EXIF.tools
0943380 0019_Prototyping_System_ation_May76 0019 Prototyping System Ation May76

Navigation menu

Versions of this User Manual:

Views

Navigation
