Digital PDFs

AH-E058A-MC

April 1978

44 pages

Original

22MB

view download

OCR Version

30MB

view download

Document:	CZM9BA0 M9312 BOOTSTRAP TERMINATOR 8K APR 1978 bw
Order Number:	AH-E058A-MC
Revision:	000
Pages:	44
Original Filename:	CZM9BA0__M9312__BOOTSTRAP_TERMINATOR_8K__AH-E058A-MC__APR_1978_gray.pdf

OCR Text

BOOTSTRAP TERMINATORS8K

CZM9BAO

AH-EO6BA-MCAPR1978

FICHE1 OF1

LoEOnAN

MADEIN USA

BO1
PAGE |

MOR{CEMIBBSEQ®
CZMIBA.Fl1

.REM

POP10 411

780330

00010060

13-MAR-78 0B8:58
!

IDENTIFICARTION
PRODUCT CODE:

RC-EOS7R-MC

PRODUCT NAME:

CZMSBAO M3312.B007.TERMR.BK

DATE:

MARCH,

MAINTARINER:

DIAGNOSTIC GROUP

1978

THE INFORHGTION IN THIS
DOCUMENT
IS
SUBJECT
TO
HANGE
WITHOUT NOT IC$ AND
SHOULD NOT BE CONSTRUED
COMMITMENT BY DI ITAL
OUIPHENT
CORPORRAT
EQUI
C
ION
RSSUHES
THIS

DO
BE

DOCUMENT.

THE

SOFT HRRE

APPERAR_
IN
DES IBED IN THIS

T 1S FURNISHED UNDER
A LICENSE AND MAY ONLY
SUEg OR COPIED IN RCCORDRNCE WITH THE TERMS OF

DIGITAL
EOUIPHENT
CORPORQTION
ASSUMES
NO
RESPONSIBILITY
FOR
THE USE OR RELIABILITY OF ITS
g?g}¥
RE ON EQUIPMENT
THAT
IS
NOT
SUPPLIED
BY
COPYRIGHT
CORPORATION

(c)

1978

DIGITAL

EQUIPEMNT

CZM3BRO M3212 BOOT TERMF 8k

MRC 711

30Ar10S2)
134
SE% CCO i

MACY1l 30A(1052)

CZIMIBAC M3312 BOOT TERMR Bk

13-MRR-78 08:58

CZMIBR.PILI

1.0

13-MAR-78

COl

09:53

PRGE 2

RBSTRACT

THIS PROGRAM VERIFIES THE ROM INFORMATION FOR THE M93312 BOOTSTRAP
TERMINATOR.
IT
HARS
TWO
MODES OF OPERATION;
STAND-ALONE MODE
WHICH REQUIRES OPERATOR INTERVENTION AND APT-MUDE.

2.0

REQUIREMENTS

2.1

HARDWARE

ANY PDP-11 UNIBUS PROCESSOR WITH CONSOLE TERMINAL AND/OR HARDWARE
SWITCH REGISTER

M3312 BCOT
4K MEMORY

STRAP

TERMINATOR

SOF TWARE
THIS
PROGRAM
REQUIRES
THAT
THE
CORRECT
OPERATION
OF
THE
PROCESSOR,
MEMORY AND CONSOLE TERMINAL HAVE BEEN VERIFIED BY THE

APPROPRIAYE DIAGNOSTICS.

2.C

LOADING AND STARTING PROCEDURES

3.1

LORD THE PROGRAM BY ANY OF THE STANDARD PROCEDURES FOR ABSOLUTE PROGRAM FORMATS.

3.2

STARTING ADDRESS

200- DO CRC VERIFICATION AND SIZING

3.3

RESTART RADDRESS

204- RESTART WITHOUT SIZING

SPECIAL ENVIRONMENTS
THIS PROGRAM IS APT COMPATIBLE SEE
SECTION
FOR_ETABLE
FOLLOW STANDRRD APT PROCEDURES FOR LOACING AND STARTING.

4.0

OPERATING PROCEDURES

4.1

OPERATIONAL

SWITCH

SETTINGS

SET-UP.

‘

E f

ZE6 0002

CZMIBAO M9312 BOOT TERMR BK

13-MAR-78 08:58

CZMSBAR.FLI

THE

MRCY11 30A(1052)

USE

DOl

PAGE 3

13-MAR-78

09:59

MHARDWARE

SiKITCH

THE

g% CCO3

BGEVER TF THIE AEGT ER IS NOT AVAILABLE THE PFOGRAM WILL USE
NED

HOWEVER
IF
HI? REGX?
LOCATION 176 RS
THE SWITC H REGISTER.

S 15=1 OR UP-- HALT ON E RROR
SW 13=1 OR UP-- INHIBIT ERROR TYPEOUTS
SW 10=1 OR UP-- BELL ON E RROR

EXECUTION TIMES

EXECUTION TIME IS DEPENDENT ON THE CONSOLE
FIRST PRSS.

TERMINAL

ALL OTHER PASSES TAKE LESS THEN 1

SECOND.

DURING

THE

APT PROCEDURES

THERE ARE TWO CHOICES WHEN RUNNING UNDER APT.
IF
THE
SIZE
BIT
(BIT
7-SENVM)
IS
CLERR
HékL
OzERQTS
IN NORMAL
PROGRAM
THE
PROGRAM _ WILL
BIT
STAND-ALONE MODE.
IF THE
1S
SIZE
COMPARE _ PARAMETERS F
TO THE CONTENTS OF THE ETRBL%N
70 USE_THE RAPT COHPQRSION

THIS ORDER;

FER?URE THE ETABLE MUST BE

SET

DON’

NOT USED

PgEUBgEBOHER-FRIL VECTOR ADDRESS

CONTENTS OF ADDRESS IN SBARSE
NOT USED
DEVICE CODES EXPECTED
FIRST LETTER/SECOND LETTER

CZMIBAO MS312 BOOT TERMR BK

13-MAR-78 08:58

5.0

SUBROUTINE ABSTRACTS

()]

CZMSBR.F11

MACY1l 30R(10S2)

NOROMS

13-MAR-78

EOL

089:59

PAGE 4

THIS ROUTINE IS CALLED ONLY IF NO ROMS WERE FOUND DURING SIZING
17 DOES
RERD OF ALL BOOTSTRAP ROM ADDRESSES AND COMPARES THE

CONTENTS TO A KNOWN EXPECTED VALUE.

5.2

CHECKS

THIS ROUTINE SETS UP THE FIRST,

THE

"CALSUMTM SUBRCUTINE.

LAST AND EXCEPTION

“CALSUM” AND COMPARES IT AGRINST THE GOOD CHECKSUM

DETERMINE

THIS ROUTINE CRLCULRTES THE
CRC16
CHECKSUM
OF
EACH
RECEIVES
THE
FIRST
ADDRESS
TO
BE
CHECKED(FIRSTR)

ROM.
IT
THE LAST

FROM THE “CHECKSTM MODULE AND RETURNS TO

IN RM.

CALSUM

ADDRESS TO BE CHECKED(LASTAD) AND THE EXCEPTION ADDRESS
S.4

FOR

CRC ERRORS.

5.2

ADDRESSES

IT RECIEVES THE CALCULATED CHECKSUM FROM

IT THE CHECKSUM

_(EXCADD)

PROMP
THIS ROUTINE PRQCESSES THE _ROM PARAMETERS.

IT CHECKS

THE

SIZE/

DON'T
SIZE
BIT
IN THE APT ETABLE AND EITHER FORMATS THE SIZING
gESSQGES OR COMPARES THE SIZING INFORMATION
TO
THE
APT
ETARBLE

€.

DEVIOD
THIS ROUTINE LOCATES ERCH DEVICE
CODE_
AND
PASSES
IT_
AND
ADDRESS IN WHICH IT WAS FOUND BACK TO THE *“PROMPTM MODULE.

S.&

PPFVAR
THIS ROUTINE DETERMINES THE PSEUDO POWER-FRIL VECTOR
PASSES IT AND ITS CONTENTS TO THE *“PROMP* MODULE

THE

PUTMES

ADDRESS

AND

SEL CCO4

MACY1l 30A(1052)

CZMIBAC _MS312 BOOT TERMR gksa

CZMSBA.Fil

13-MAR-78 O

THIS

ROUTINE

FORMARTS

MESSRGES.

THE

FO1

PARAMETER

AND

PAGE S

09:59

13-MAR-78

POWER-FRIL

RDDRESS

ERRHAN

THIS ROUTINE FORMARTS

THE

TYPE

THIS ROUTINE FILLS THE MESSAGE BUFFER WITH RSCII CHARACTERS.

ROUTINE

ALL

OUTPUT THEM.

ERROR

MESSAGES

AND_

CALLS

ITALSO USES THE OPERRTIONRL SWITCHES TO

DETERMINE WHETHER TO OUTPUT THE MESSAGE,

OR HALT

ILBUF

RECIEVES THE ADDRESS OF

THE ARSCII

IN RS.

0CARSC
THIS ROUTINE TAKES A SIXTEEN BIT BINARY NUMBER AND CONVERTS
& ASCII CHARACTERS.

« 11

0CADD
THIS ROUTINE

HOVES

IS USED BY THE "PUTMESTM MODULE WHEN THE DATA

NOT_IN THE RIGHT
MODE TO BE HANDLED BY THE "OCASC" HODULE

THE ADDRESSING MODE OF R3 UP

ONE LEVEL OF DEFERMENT

RELIRBILITY//AVAILABILITY/SERVICERBILITY
WHEN RUNNING IN ANY ENVIRONMENT BUT APT
DETECTED
BY
THE
PROGRAM.
THIS ERROR
MESSAGE WILL BE:
CRC ERROR
WHEN RUNNING

THERE IS ONLY
ONE
ERROR
IS A CHECKSUM ERROR.
THE

IN ROM EXX
IN THE APT ENVIRONMENT

THREE

OTHER ERRORS MAY OCCUR.

RN ERROR WILL OCCUR WHEN THE DEVICE CODES
MATCH

THE

DEVICE

HESSRGE WILL BE EITHER

CODES

FOUND

COULD NOT FIND DEVICE CODE

XX.

FOUND UNEXPECTED DEVICE CODE XxX.

THE

ROMS.

ETARBLE
THE

ERROR

13-MAR

MACY11

08:58

30A(10S2)

13-MAR-78

09:59

PAGE &

CZMSBRAR.P

CZHQBRO H9312 BOOT TERMR 8K

GOl

CODE
A DEVICE
IF
THE FIRST MESSAGE WILL BE PARSSED TO
APT
T
IN
ETABLE CRNNOT BE FOUND IN THE EXISTING ROMS.
LIST D
S SAGE HILL SENT IF A
M.
I
IS FOUND

E TRBHE
IN THE

DEVICE COCE NOT LISTED

THE SECTMND ERROR WILL BE
IF THE PSEUDO POWER-FRIL VECTOR
NOT MATCH THE ADDRESS DETERMINED
RADDRESS
DOES
ETARBLE
THE
IN
THE
MESSAGE
TO BE IN THE BORRDS® SWITCHES.
BY THE
PROGRAM.

HILLHSE:

POWER-FRIL VECTOR
RECEIVED
EXPECTED

WHERE EXPECTED IS THE CONTENTS OF THE ETABLE ANDC RECEIVED
THE VALUE FOUND BY THE PROGRA

THE THIRD ERROR WILL BE IF THE
CONTENTS
OF
BOARD'S
PSEUDO
POWER-FAIL
VECTOR_ADDRESS DOES NOT MATCH THE VALUE EXPECTED

FROM THE ETRBLE.
POWER-FRIL

EXPECTED

THE MESSAGE WILL BE:

DATA ERROR

RECEIVED

CZMSBA.FP11

13-MAR-78 (08:58

298

MACY11l

30A(1052)

13-MAR-78

HO
1

09: S9

NLIST

301
302

MC,MD,CND

CZMIBAO M3312 BOOT TERMR 8K

W
000
nLw

TITLE

éxpxgég"lggzfiné3¥egonp
lPROGRRH BY BARRY G.

IRRGANG

’THIS PROGRAM WRS ASSEMBLED USING THE PDP-11 MARINDEC SYSMAC

lPflCKflGE (MARINDEC-11-DZQRC-C3), JAN 19, 1977.

iSHR-lSOOOO
"SBTTL OPERATIONAL SWITCH SETTINGS
:HALT ON ERROR,

LOOP ON TEST,

INHIBIT EF.<OR TYPOUT

SWITCH
HALT ON ERROR
%OOP ON TEST
NHIBIT ERROR TYPEOUTS

[

726888

*‘...'

W W
W WKW W W W W Www
UMY
b= e he bt bt peape e b= (0
OWm NN L Wi~ O oo~

Nfl

533

PRGE 7

'SBTTL BASIC DEFINITIONS
0C110C

iINITIR% 880RESS OF THE STACK POINTER ##» 1100 ##»

&TAC

LEQUIV

EHT ERROR

IOT.SCOPE

;sBASIC DEFINITION OF ERROR CALL
; sBRSIC DEFINITION OF SCOPE CALL

HT=

300: FOR HORIZONTAL TAB

CRiF=
PS=

5B0
177276

EPROCESSOR
FOR CARRI
"ETURN-L1~E FEED
STATUS WOR

.EQUIV
000011
gcooie

177776

177774
177772
177570
177570
000000

000006
000007
00Ccoo

; BMISCELLANEOUS DEF INITIC

t;-

.EQUIV

PS,PSW

PIRQ=

177772

STKLMT= 17?2774

DSWR=

DDISP=

177570

§§§ FOR LI
2§§

..srncx LIHIT atcxsvsn
Paocann

177570

Sug

Tl
R2=
za

SN
ReEISTER
;;EifiiaaL gfc STER

RY=
RS=
Rb=
R7=

33
H
i:
§ 8

PC=

#PRIORITY

BRO=

; ; GENERAL

%4
%€
%6
%7

RAL
RAL
RAL

g STER
STER
REGISTER
REGISTER

,.Pnocnnn COUNTER
LEVEL

GISTER

ISPLAY REGISTER

*GENERAL PURPOSE REGISTER DEF INITIONS

R3=

nsoussr REGISTER

DEFINITIONS

: :PRIORITY LEVEL O

CZMIBAC M3312 BOOT TERMR Bk

s[oiapy

13-MAR-78 08:58

000040
000100

101

09:59

PAGE 8

PR1=
PR2=

40
100

;;PR}ORITY LEVEL
::PRIORITY LEVEL

PRY=
PRS=

200
240

: PRIORITY LEVEL
P'PRIORITY LEVEL

PR7=

340

1 iPRIORITY LEVEL

PR3=

PRE=

1490

300

: iORICRITY LEVEL

PIPRIORITY LEVE-

. #"SWITCH REGISTERTM SWITCH DEFINITIONS

SwiS=

SWiY=
SWi3=
SWi2=
SWil=
SWi0=

SW09=

0Co001

100000

40000
20000
10000
4000
2000

1000

SW0B=
SW07=
SWob=
SWOS=
SWo4=
SW03=
SWh2=

400
200
100
40
20
10
4

SWo0=
CEQUIV
.EQUIV
.EQUIV
EQUIV
EQUIV
-EQUIV

|
SW09,SW9
SWO08.Su8
SW07,SW?
SWO06.SWe
SWOS.SWS
SWOY.SW4

SWOl1=

Egfl 3

SW03. SW3

EQUIV Efigf.gufi
EQUIV

100000

000001

SWOO0,SWO

*DATA BIT DEFINITIONS

8IT15=

BIT14=
BIT13=
BITi2=
BITiI=
BIT10=
BITO9=
BITO8=
BIT07=
BITOb=
BITOS=
BITON=
BITO3=
BITO2=
BITOI=
BITOD=
.EQUIV

EQUIV
EQUIV

100000

40000
20000
10000
4000
2000
1000
400
200
100
40
20
10
M4
2
1

BIT09,BITY

BITO8.BITS
BITO7.BIT?

(BITOO

TO BITIS)

CZMSBRA.PL1

MACY1l 30A(10S2)
13-MAR-78
BASIC DEFINITIONS

NN LW

CZMIBA0 M9312 BOOT TERMR Bk

ocgse

CZMIBARO MS312 BOOT TERMR 8K

CZMSBR.FP11

13-MAR-78 08:58

MACY1l 30A(1052)
13-MAR-78
BRSIC DEFINITIONS

L£
TUs= e pepe ps ps s pe ——
OV
LWh-- o

.EQUIV
.EQUIV
.EQUIV
.EQUIV
.EQuiv
.EQuUIv
.EQuIv

JO1

09:59

PAGE 9

axrgg,axrs
BIT0S.BITS
BITOY4,BITH
BIT03.BIT3
BIT02.BIT2
BITOI.BITI
BIT0O0.BITO

-.aegxc “CPU" TRAP VECTOR noonsssss

000004

ERRVEC= 4
RESVEC= 10

TIME OUT AND OTHER ERRORS
..nssznvzo AND ILLEGAL INSTRUCTIONS

TRTVEC= 14

,,TRRCE

I10TVEC= 20

..xnrurfourpur TRAP (IOT) #%SCOPE#*#

EMTVEC= 30

i ;

TBITVEC=14

421

wye ax

aneaxroxm TRAP (BPT)

BPTVEC= 14
PWRVEC= 24

: :POMER FAIL

TRAPVEC=34
TKVEC=
60

i
T

EMULATOR YRRP (EMT) »%ERROR#»

TRAP
55

TPVEC= BM
TTY
INTER VECTOR
*PROGRAM INTERRUPT REQUEST VECTOR
Pxnovtc-auo
|uuuuuuuununihuluuunu"uuuun"nuquu -~

000240

PROGRAM EQUATES
ERRRR
P RRERRRRRRRERRRIRRRRIRS
RSN RN RRRRRERR
(EEERRERERRRREPRREERR
RPTER]1 =
|
APTER2 =
2
M4
APTER3 =
APTERM = 10

000001
000002

CRCERR = 20
PFERR

= 40

OME =100
SEQERR =200

000200
000C0o
00000C

?CATIONS FROM 4 - 776 CONTRIN A “.+2, HALT"

SEOUENCE

000174
000176
000200
000204

000174
000000
000000
000137
000204
000167

0 CRTCH ILLEGAL TRAPS AND INTERRUPTS

LOCRTION17qCONTQINS O TO CATCH IMPROPERLY LOARDED VECTORS
DISPREG:
SWREG:
001400

.SBTTL

0C1634

.SBTTL

.WORD
.WORD

O
O

STARTING_RDDRESS(ES)

JHS

J8START

JMP

RSTART

..SOFTHRRE DISPLAY REGISTER
; SOFTWARE SWITCH REGISTER

;;JUMP TO STARTING ADDRESS OF PROGRAM

ACT11 HOOKS

Ry 2222222222222 2222X22222222X222X2222X2XFT2TI2IIILSLSLLL
L

00210
00004e

0000se

hooxs Rsouxnso BY ACT1!
$SVPC=
46

SEggRD

:SAVE PC

;3 1)SET LOC.46 TO RADDRESS OF SENDRC IN -SEOP

SEG 0009

MIBAO M9312 BOOT TERMR 8K

g%nqen.mx
4

00S.

13-MAR-78 08:58

469

470 001100

001100

473

177570

000

471
472

001101
001102

000
000000

474

001106

177570

475

476

477
478

:;3

001104

001110

001112

001114
001116

001120

173000
00GOOO

ACTI1 HOOKS

.WORD

. =$SVPC
SINTAG:

SWR:

DISPLAY:

SEG 0010

::2)SET LOC.S2 TO ZERG

:: RESTORE PC

O
O

.WORC

.WORD

FIRSTB:
ROMFIN:

173000
O

MESSAG:

DSWR

DDISP

ERRCNT: O

483

¥Y Y Y Y

APT PARAMETER BLOCK

I rrIIIIITRIYIYIIYIZIITIRRYITIRIZITIZZISSZS22 222 2 2. 2.2 2 4

:SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT
E PRI IRERIRES
RRBE
ERERERRERER
ERER
R R ERERRERRERR
R RREE
33 FERERRER

493

.SX=.
;3
CURRENT LOCATION
=24
::SET POMER FAIL TO POINT TO START OF PROGRAM
200
;;;ga APT START UP
L =4y
H {m T0 APT INDIRECT ADDRESS PNTR.
S$APTHOR ; ;POINT TO APT HERDER BLOCK
.=,
: RESET LOCATION COUNTER
32 illllll’illlll“ll!l.l.l!l!!!llllllllllllllllllll!l!&llllllil!l
:8ETUP APT PARAMETER BLOCK RS DEFINED IN THE APT-PDP11 DIAGNOSTIC

9 901158
498
001124 001136
4399 001126
000

sHiBTe
: fi
STSTM: .

501

SUNITM:

000024
000044

492

001122
000024
000200
000044
001122
001122

.BYTE
.WORD

ROMERR:

.SBTTL

486
487
488
489
490
49]

PAGE 10

$AUTOB: .=1100
.av%s 0

3Sé

484
485

13-MAR-78

MACY1l 30A(1052)

"§§ — 3882?

KO1

09:53

:gg

: INTERFRCE SPEC.

500

00113C

000002

€02

001134

0000S2

383

Egsfi
507

001132

001136

0000CO

508
509
510

001136
001140
001142

000000
000000
0000CO

§12

001i146

000000

S14
§1S

001152
00i154

000000
(00000

511

513
S16
S17

518
519
20
S21

001144

001150
001156
001156

001157
001160
001162
O0D011e4

000

000
000000
000000
000000

SPASTM: .WORD

.WORD

"WORD

0
SMAIL
2.

TWO WIGH BITS OF 18 BIT MAILBOX ADDR
;;
isTIM 02
APT MAILBOX (BITS 0-15)
::RUN
OF LONGEST TEST

*'RDDITIONAL RUN TIME (SECS) OF A PASS FOR EACH RDDITIONAL UNIT

SETEND-SMAIL/2 ;;LENGTH MAILBOX-ETABLE (WORDS)

.SBTTL APT MRILBOX-ETABLE

;é:’g;llllllllllillllllllll!ll!llllllll'lllllilli!lilllllilil'lf!l
$MAIL :
; ;APT MAILBOX
sns*r :
SFATAL:
STESTN:

.MORD
.WORD
.WORD

AMSGTY
AFATAL
ATESTN

”'%?
;;F
;;TEST

socvgt:

noevgr

SPASS:

SUNIT:

SMSGAD:
SMSGLG:

SETABLE :
SENV:

SENVM:
SSWREG:
SUSWR:
SCPUOP:

.WORD
.

.WORD
.WORD

.BYTE

.BYTE
.WMORD
.WORD
.WORD

APASS

AUNI

AMSGRD
AMSGLG

RENV

RENVM
ASWREG
AUSWR
ACPUOP

: : RUN t}r: IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY)

;;PAS

:DEVICE

::1/0 UNIT
;;:ME
;;:MES

TYPE CODE
RROR NUMBER
R
COUNT

NUMBER

:IRPT Efl'}‘
;;gx%

NT TABLE

;:
RONMENT MODE BITS
;:APT SWITCH REGISTER
;:USER SWITCHES
;:CPU TYPE,OPTIONS

CZH‘DBQOH?312 BOOT TERMR BK

13-MAR-78 08:58

13-MAR-78

AP T MAILBOX-ETABLE

LO1

11/04=01,11/05=02, 11/20=03, 11/40=04, 1! /48=0¢S

;l
;0

§MAMS1:

$SMTYP1:

s %

~N
o

$MADR1

AMTYPL

AMADR|

SR
R
R
T

BIT
1
BIT
BIT

OATING POINT PROCESSOR

;.u

inxrm%‘é
;

BVIE

BYTE)
s%gfl

mmiYTES THIS WORD AND LOW OF “TYPETM ABOVE
R fir

i |

001400

STAR

012706

001100

012737
012737

006430
000340

000034
000036

-+t

mm DOOOOOOOOOC ,

<< <<<<<<

%fi;fiéfifififi%fi@éfifi%

R
R
I
D
I
I
I
I
I
I
I
I

" S OF ENIHENT UOER TEST

:j:}j:' "é sl

DESCRIPTOR

WORDS2

REZERIPTOR HoRDeS
DESCRIPTOR WORDSS

Haig o

::ti:f PTOR LORDSI0

PTOR di
HORDS13
BEiEE

BEERIPTOR LORDs1s

.=1400

“GSSETUP THE STACK POINTER
nfi 83
%g‘x,nnuzi
SBTTL
..mmm.xzs
A FEWv:c?on
8STRAP, 98 TRAPVEC l'.EI'R“P VECTOR FOR TRAP CALLS
O

001262

s s Be e Bt B

e s e

e o

NEWNr=)re v o0 50 o0 o0 50 20 50 20 00 0 00 o0

e e o

$VECHs

s Be B

s s Bm

L SR RSN SRPERER
§

AMANSI

.BYTE

fogt o

NNN
PSALY)

Do
o eb

Pt s e

H
s 8
: &

.BYTE

R
R
e

L
HE
- %

-l-

SEG 001!

BITS 1S-11=CPU T YPE

88888888888888888 DC 888888888888 8

PAGE 11

09:59

ool wlelele olele.- OO0 "-

CZMIBA

MACY11l 30AR(10S2)

n v

8340, 9B TRAPVEC
+2;

CZMIBAD M9312 BOOT TERMR BK

13-MAR-78 08:58
CZMSBA.P11
S78 001420 00S067 177520

£a7

S79

001424

016767

000466

gl BT QO

oo,

585 B01ues
82.'33 Si 2 ?9;576
?22332
155458
139379
28
687
001466 001012

gw;‘g

012716

001500

6YS:

?‘3"5

001514

012637

000004

668:

6§92
001500 g?ooo;m 000176 177376 6SS:
693 001506 012767 000174 177372

233 g}wsao
3275; m‘”"fig 177425
698
001532 001403
)

601
602

603 oois:a
HH

00S227

606

001556

001442

104401

001626

oo'.i:?a?

000042

60S -‘207

08
51133

001560
Y

177342 73

177777

611
1? 1 95 177360 000001
612 001600 001406
*

gia 8812?8 %?727 177276 000176
2%2 %%gig Mn%ns
gi;

88}"“'

112767

619 ooxsaui'a 000417

smaEresums

000001

622

00166M

012700

007420

624

001672

020027

007504

623

001670

005020

b
3
Risce
D01
Soers
37 001116
%170-' 8050.:7 38333:
628
001710 01374
629 001714 016737 000036
001732

001736

012700
005720

165000

1 ISPLAY Pi0R9
5 ; §mm
suxcg ogsg'x‘srsn
soorstp
668
,.gigncu'éMog*rm
occunnso

g%r

#65S, (SP)

65$

: ;BRANCH IF NO mtour

::SET UP FOR TRAP RETURN

MOV
MOV

#SWREG,
SWR
; ;POINT TO SOFTWARE SWR
#DISPREG, DISPLAY

8%'7‘3
BEQ

%2.‘-’?3::: ' SENVM I:YE
"CL??R
mgssxzc
67$
ug?:
NON-APT unosn
SWITCHAPT

MOV

(SP)+,98ERRVEC

; ;RESTORE ERROR VECTOR

8SSWREG, SWR

177254

oawao 2

BEQ

663

853
BEQ

NV, 81
708

TYPE

.SBTTL GET
VALUE
TST

;?g:

USE APT suncu REGISTER

)

3&'

$IACT-117
.

;;gmncn 1F

;fi.osunsc
.

£8%

MOV

#BUF1,

81, SAUTOB

afig

;

RING
SOF TWARE sflhcu
RE
i:
ng UNDER XXDP/ACT?

CMP
gfla'risua

MOVB

; ;FIRST 1}9:;0

::g:
&mncuuosn APT?
y«cfi
-

1
uwé
suncu REG SELECTED?
::csr
sor*-sun SETTINGS
: ;SET AUTO-MODE INDICATOR

OVER THE ASCIZ

gég%: .ASCIZ <CRLF>#*CZM3IBARO né.‘ua BOOT TERMR BK*<(CRLF>
8%:

000004

23? ggggg 65?5‘1'3 177777 165000
633

:§v
Moy
BNE

SFS

627

;CLEAR THE PASS COUNT

SBTTL
PR
sTYPE
TnTYPE
smcgg
rcmp'fiom IF FIRST PASS

% 002152 000042
"

SEG 0012

::asa&f?s m*&ffiu*zsa*Easfixawém?'msw i

gg?

E% gg{ggg 012767 001160

PRGE 12
OGRAM COUNTER

msaa 001470 000403

08:59

INITIRLIZE THE COHHON TRGS

000476

13-MAR-78

MACY!1l 30AR(1052)

;

CLR

CMP

£
CLR
CLR
MOV
MOV

&
SROMF IN
sTIMES
SSERRVEC,

MOV

ggza

18:

(nou

TST

;:CLR SIZING BUFFERS

8OCTBUF

v;
WE CLEARED THE WHOLE

o;l

28ERRVEC

-(RB)

TR
NIT
9 Rom
ROM
ES
FOUND INDICATORS
rm&‘ ;mm coum:n ron PUTMES SUB
éavz
LOCATION
:SET UP
a.: TRAP

¥165000,

:GET FIRST RDDRESS OF ROM SPACE

(RO)+

38165000

.;FHE corc«;SNT m;.”gfl T

:IF THIS INSTRUCTION TRAPS CPU ROM

CZMIBAO M9312 BOOT TERMR BK

13-MAR-78 08:58

CZM3IBA.P11
B3

635
636
237

001740
001794
001746

7
1374
012737

MACY11

30A(1052)

CMP
BNE

166000
000001

sgg 001756
001754 000402
o?ans 000004

MOV

001116

2:9

644
%@
M

000200

001114

003250
00le4e

S
osoie ooigte T
= Ee o

001232

643

13737
1404

0032S0

ggo
a%a 174000 003250
B2 DOSONS 00)256
223 002044 §7

001116

656
657

002056

000160

659
660
661
662
663
bb4
665

002070
002072
002076

655 %gg
658

00041l
004767

001004
767
004767

000126

000462
001544

PAGE 13

us:

RO,

18
8,
3s

32#19579
:

3’1‘5

33
s200,
oi'mooo.

géo'
CHP

ADD
ROL
CMP

RSTART: Tof
35
'?na

187

BNE
JSR

7"300
.-2,

SROMF IN
gg
-

gntmss
oP
"

SEG 0013

#166000

~or PL

gorssmo

J8ROMF IN

SBTTL iro OF pSgs ROUTINE

]
STESTAD

JTESTAD

cog

nooasss:s

S——

§r
NO THEN cgnu gov
OF
m§ O BYTErs
i: RgoRES 0
ERREL O PRESENT
3

3"‘27 I

;
;g
L
; ng'r‘

HASB x%xcmoa
rouo

JSROMF IN

SS comms

I8TESTARD

TE 3.

J8TESTAD

I HAVE asm

'orm;zné7o NEXT
- nom
ROM

: UPDATE ROM F

xcmoa

NOROMS

e
TR | AT
cmxmeu:
:{r
;ss
70
ROM
;
ST
; cs "
ttgt NO n%ns

PROMP
SEQTST

:GO PROCESS ROM PRRAMETERS
:GO CHECK SEQUENCE OF DEVICE CODES

DS ot 88
xst”" ePROCESS
Cielcsums
OF PARAMETERS
:IF NO SKIP

33 lIIIllIIl.lll!l!il!ll!llilllllllll!lll!llll!llllllllllillllli!l

;61

H1r

MENT
THE PRSS NUMBER (SPASS)

ro n
TOR
go

iIF THE

ro mve n BELL INDICATE THE "END OF PRSSTM LOCATION
o:
aém-:n
é 1S
-xr

669
670

277% 002102
002102

seop

€78
005110 043767
160000
676 005116
005387

677

002120

681

002130

e Rl
680 %SS

ggxg
1
002142
ooa%g

man
1

002120

183'401
104401
013700
001405

£87 002123 804210
688
002154
000240
689

09:59

MOVT
!

667

682
683
684
ggg

—r

001144

667

673

13-MAR-78

GET VALUE FOR SOFTWARE SWITCH REGISTER

002156

000240

INC
I1C

$PASS
o;ooooo,SPRSS

: ; INCREMENT THE PARSS NUMBER
;;DON'T ALLOW A NEG. NUMBER

BGT
MOV

$DOAGN
(PC)+,d(PC)+

:: YES
: iRESTORE COUNTER

rgg

.ssnonc

$GETH2: MOV

awa RO

177026

SEOPCT:
SENDCT:

002171
002166

000042

NOP

¢
.WORD

.WORD
SEOPCT

BEQ

SENDAD:

RESET
JSR

NOP

: :LOOP?

;: TYPE “END PRSS"

SENULL

::TYPE A u% CHARACTER

DOAGN

: ;BRANCH IF NO MONITOR

PC, (RO)

::GET MONI

ADDRESS

:iCLEAR THE WORLD
1360 TO MONITOR

: :SAVE ROOM
; ;FOR

C ZMIBRO_M9312 BOOT TERMR BK
13-MAR-78 08:58
c ZM33A.P11

890
691
692
633
694
695
696

697
698
699

700
701
702
763
704
705
706
707
708
709
710
711
712
713
714
715
716

717
718
719
720
72l

002160
002162
002162
QO21ed
166
002171
002176

MACY1l 30R(10S2)

000240

$DOAGN:
377
o4a4le
0S1s801

000
o42lle
000123

;3RCTLL

Jd(PC)+

; s RETURN

-1,-1.0

. sNULL CHARACTER STRING

RSTART

<«18><12>/END PRSS”

ROMS TE

2s:
NODATA:

002242

#173000

;GET FIRST ADDRESS TO BE READ

CMP
BEQ

(R3)+,
2%

:DOES RECIEVED VALUE EQUAL EXPECTED
:IF YES CONTINUE TESTINS

JSR

BGT

MOV

BIS

001110

CMP

J8NODATA,

iGET _ADDRESS OF EXPECTED VALUE

SNOROME ,

J8ROMERR

:IF NO SET ERROR INDICATER

#174000,

:HAVE ALL ADDRESSES BEEN TESTEL

RTS

.WORD

161777

ERRHAN

:REPORT ERROR

:IF NO GO TEST THIS ADDR

; CHECKSUM ROMS MODULE
:THIS ROUTINE DOES A CHECKSUM OF ALL ROMS PRESENT

729

002276

0023

738 002354
Bosue
739

360

002364

002372
374
002400

002402

002326

002320

735

ng_ AR

0023
002310
002314
002316

NNNUN

730
731
732
733

ccooapeRes

758 B0s53p

745

.BYTE

SENDMG: .ASCIZ

18:

002556
002554
002sse

742
743
744

.WORD

NOROMS: MOV

002204
002210
002214
002216
002220
002226
002232
0022
002240

002460
001116

741

JMP

SE%S OC1H4

:EXPECTED VALUE.

002244
002

740

SENULL:

NOP

PAGE 14

ROUTINE IS CALLED ONLY IF NO ROMS WERE FOUND
:
:DURING SIZING. IT DOES A READ OF ALL BOOTSTRAP ROM
:ADDRESSES AND COMPARES THE CONTENTS TO A KNOWN

783
724
725
726

736

SRTNAD:

;NO

782

734

13-MAR-78

END OF PARSS ROUTINE

BO2

08:59

CHECKS: MOV

BIT

BEQ
MOV
MOV

MOV

18:
002sse

00116

2%:

1S
8165775,
%0

JSROMCNT

: 1S DIAGNOSTIC ROM PRESENT

J8LASTAD
J8EXCADD

iSET UP LAST ADDRESS TO BE SUMMED
:SET UP EXCEPTION RDDRESS

CALSUM

:GO CALCULATE CHECKSUM

: COMPARE CHECKSUMS
1 IF cuecxsgg; COMPARE CONTINUE
: IF ERROR
INDICATER
:REPORT ERROR

2165000,

JSFIRSTA

asles77s,

CMP
BEQ
BIS
JSR

R3,
18
#CRCERR,
PC

JSROMERR
ERRHAN

8173024,
8173175,
8173176

98EXCADD
J8LASTAD
R2

MOV

MOV
MOV
MOV

#173000,

ROL

JsROMCNT

BEQ

BIT

JSR

MOV
CMP

JsF IRSTA

d8ROMCNT,

J8ROMF IN

CALSUM

(R2),

R3,

s INITIALIZE RON COUNTER

JSROMF IN

JSR

MOV
001110

J8ROMCNT,

R3
RY

:IF NO GO CHECKSUM BOOT ROMS

:SET UP FIRST ADDRESS TO BE SUMMED

iGET Expec;Eo CHECKSUM

:2ET UP FIRST ADDRESS TO BE SUMMED
:SET UP EXCEPTION ADDRESS
:SET UP LAST ADDRESS TO BE SUMMED
iGET
SS OF GOOD DATA

:UPDATE ROM COUNTER

:1S ROM PRESENT
:IF NO,

GO UPDATE TO NEXT ROM

:IF YES GO CALCULATE CHECKSUM

:GET EXPECTED CHECKSUM
: COMPARE CHECKSUMS

CZMIBAO M9312 BOOT TERMR BK

CZM9IBA. P11
746
747
748
749

002404
002406

13-MAR-78 08:58

00140S
37

000020
DOIHHE

MACY11l

13-MAR-78
END OF PASS ROUTINE

30A(10S2)

BEG

001110

002SSe

B8seE:
°9-4888 002sse

SEG 001S

BIS
JSR

#CRCERR,
PC

gonontnn
RRHAN

2§B
C

lgBS:
220U
ox9u000.

o sLngTRB
JSFIRSTA

:abo.

BNE
RTS
ROMCNT:

PAGE

goo

3%:

coe

09:59

F
PC

a:E§ngrn

IF CHECKSUHS EQUAL CONTINUE
T INDICATER
RROR

s:gs;g mgn
SO

GRS,
PORSRE® %, B0

:IF NO GO CHECKSUM NEXT ONE
;IF YES RETURN

; CALCULRTE CHECKSUMS HODULE
: THIS ROUTINE CALC ULARTES THE CRCI 5 CHECKSUM OF THE CONTE!

8; Exgnv kocnr:ou EXCEPT THE EXCEPTION ADDRESS RND LAS RBDRESS

ooesse

000020

CALSUM: MOV

JSFIRSTA,

Ré

MOV

(RO)O

CLR

LOOP:

CRCLOP nog
B8

ROR

120001

18:

002sSe

2%:

1%
8120001,
RY

BIS

R1,

8120001,

:DO THE

MOV
RTS

MATH CQLCULQTIONS

R1
R1

RY
RY

2
CRCLOP
RO,
°3
(RO)+
)

JsLASTAD

(SP)+,

JMEXCADD

LodP

LOS

FIRSTA:
EXCADD:
LASTAD:

BVC
MOV
BIC
DEC
BGT
CMP
BNE
TST
Snp

002554

IN¥TIRLXZE CRC WORD
iSET BYTE COUNT
: THE NE NINE LINES

BIC

120001

22¥ S?SRTING ADDRESS

-(SP)

ngv

RE RE

YES RETURN

O
O
O

; PROCESS ROM PARAMETERS MODULE

;i THIS ROUTINE DETERHINES IF SIZING IS TO BE DONE. IF IT IS THE
vCOD_AND
P! FVAR
ARAMET
; MODULE
S F M THE D EV

HODU ES RNS NES;H?%H SSQGE TO BE OUTPUT,
0 BE

ODULE WILL TAKE

F SIZI IS

THE PARAMETERS RECEIVED

RND COMPARE THEM TO THE VALUES SUPPLIED IN THE ETABLE.

INC
gn
SR

JWMESSAG
9s

MOV

#SODW0,

MOV
ADD

MOV
SWAB

CMP
BEQ
TST

£
23
(=]

8(.:
W u¥$§5 E}
cwgu13uu—~
NNWhhEOL

(=]

5 5RgEgER

WWNEW

000001
001156
000002

003034

001110

00i222
007416

5§:

000004

6%:

BNE
BIS

irus)R
TS
BNE
MOV

MOV

WAB
D

CMP

0oooo2

7%:

000262
00i2ie
007500

000010

oo1110

8%:

R2,
4s
(RY)
33
SAPTERI,

:C .
( Ea )

;D
#SDDWO

#BUF 1-2,
(R3

(Ré),

BIS

SAPTER2,

DEVCOD

R3
RY
R3
Re

(R3)

d#ROMERR
ERRHAN

R3
RY
RY
(RY4)

d#ROMERR

PC,

ERRHAN

ADD

BNE
JSR

TST

(R3)

actenss
aoau 2,

cHP
BEQ
BIS
JSR

RY,
8s
onprena

MOV

aoeura+é.

MOV

CMP
BEQ
BIS

a:tcoux

RY,

9%
SAPTERY,

POWER-FAIL VECTOR
ugo

FORHRT

.RDDRE

flLLGETDEVICE CODE MODULE

gosgognnnnsrsns
EET E?nt“ ffs
girosnggussgfvxcs CODE
T

DEV%CE CODEgECOHPSDE
VICE C
CHECKED THE WHOLE ETARBLE
NEXT ETABLE ENTRY
EXHET ?fiVéCE
CODE ON BORRD

SO WE'’RE DONE

gERO CONTINUE

VIC
T E;GGLE DEVICE CODES

NO
WE CHECKED ALL THE BOA
CE CODES, IF NO CONTINUE

(RY)

(R3)

Rl messass,
1E 100,
;SE FESS“GE INDICATOR

JSR

MOV

001110

(RH)#,
R2

BNE

MOV

000004
001042
001216
02

.2,

SWAB

001110

.BUFl

BEQ
TST

000002
001104

PUTMES

ERRHAN

iWAS THERE AN

3%:

PC,

;GO _GET PSEUDO POHER-FQIL VECTOR ARDDRESS

2s:

PPFVAR
J8ROMERR

g 2%%&5

18:

.P#gnn.
A28
C,

$Okflfl? P&gsflEgos MESSAGE

z'i'

oo1112

JSR

MES2

EVCO
UTME

PPFVAR
RY

R3
R3

JSROMERR
ERRHAN

RY
R3
R3

J#ROMERR

ASCII IN'RIGHT ORDER FOR_OUTPUT
S SESSLE DEVICE CODE NOT

THE TWO

NTS EQUAL ZERO-DONE
NTS NO_EQUAL ZERO-CONTINUE
PgHER-FflIL VECTOR ARDDRESS

§s‘ 2
§§

108:

ooos1i2

B8R

PC,

; IF BIT XS CLERR SIZE
A ITEIS SEE OON"OOEE%E.

oogg::::s
3:33==8§§aa==%
22ARA

PC.

SEG 0Cl6

DO LW

[ S

"snl

TeR
BIT
98

001110

001242

BENGHIER 5%

(000D 00 G0 D D €D (D

Q:SENVM

860833
0004S0
000040

TSTB
BMI

PFVA
_PARAMETERS COMPARE

INUE

YfiP T_ERROR INOICRTOR
TO ERROR ROUTINE

T ETABLE DATA

GET BORD DATA
;D0THE TWO PARAMETER COMPARE
:IF_YES THEN DONE
iSET APT ERROR INDICATOR

80g

PROMP:

001157

PAGE

105737
00424

802
803

D02

09:59

13-MAR-78 08:58

13-MAR-78
END OF PRSS ROUTINE

30A(10S2)

——

CZMSBA. P11

MACY11l

S RRSRERRE

CZM9BAD M3312 BOOT TERMR BK

CZMSBAO M3312 BOOT TERMR BK

13-MAR-78 08:58
CZM3BA. P11
858 003042 004767 001014

MACY1l 30A(1052)

13-MAR-78

END OF PASS ROUTINE
PC,
JSR

ggg 003046 000207

9§:

861

RTS

EQ2

09:59

PAGE 17

ERRHAN

SEG 0017
;G0 TO ERROR ROUTINE

:GET DEVICE CODES MODULE

'THIS SUBROUTINE LOCATES EACH DEVICE CODE AND PASSES IT AND THE
'ADDRESS IN WHICH IT WAS FOUND BACK TO THE CALLING ROUTINE.
‘DATA 15 STORED IN BUFFER "BUF1TM IN THIS FORMAT:

862
863
ggg

866

BE7
868
863

:
:
:

8?0
871
gze

BUFl:

ARDDRESS OF FIRST DEVICE CODE

DEVICE CODE
ADDRESS OF SECOND DEVICE CODE
DEVICE CODE

.
;
:

g
<

874
S;E

:
:

877

'IF DIAGNOSTIC ROM PRESENT IT WILL BE THE FIRST DEVICE CODE.

878

879

012700

007420

880

003054

012701

883
884

00
003074

012737
013720

165774
003250

886

003104

005037

003252

885

gga

003100

017720

883{{2 oxaigz

001114

003124

00100S

062737

000200

896
897

003146
083152

013720
017720

003250
000072

ggg

383{23

052735

003172
003200
0C3204

067737
013703
042702

907

003220

001404

303

904

ggg
311

3§§

003210

334522

042703

003250

MOV
MOV

1%:

38:

5$:

177177

oofiagg

883%95

003232

005137

003252

002725

003250

000052
003250
177177

000200

023727

003250

162703

ggggg&

003250

000002

300 003166 555702 003250
0]
902
903

MOV

000144

890

003126

'THERE IS ROOM FOR UP TO 12 DEVICE CODES IN TEMP

BHEVCOD: MOV

00000

889 003120 535137 001116
891

ADDRESS OF NTH DEVICE CODE
DEVICE CODE .

003250

’

174000

8%:

9%:

sBUF 1,

RO
R1

s INITIALIZE ROM POINTER

8165774
J8TESTARD,

JTESTAD
(RO)+

'GET ADDRESS OF DIRG. ROM DEVICE CODE.
:STORE
SS OF DEVICE CODE

MOV

JTESTAD

ggt

g:rrnsra.

BNE

CLR

BIT

ADD

J8DAFLAS

RI,

8200,

(RO)+

JSTESTARD

JROMF IN
JTESTARD

MOV
MOV

STESTAD,
JTESTAD,

MOV

IRTESTAD,

BIC

8177177,

ggo

ADD
MOV
BIC

3;.

SJTESTAD
JRTESTARD,
8177177,

BEQ

ggL

Eé

CoM

JDAFLAG

BLT

SUB
CHP

$200,

NTESTRD,

(RO)+
(RO)+

J8TESTAD

J8TESTAD
R3
R2

R3
#174000

:STORE

DEVICE CODE

:CLR DATA TYPE FLAG

;figgnggcgs§5725 55“§Ex?°25"“°"

:1S ROM PRESENT

:IF YES GO GET PARAMETERS

*IF NO UPDATE TEST RDDR

'STORE ADDRESS OF DEVICE CODE
:STORE DEVICE CODE
‘EE?“TE ;sgr noggggs

Esnvs oLD 7£s$ ADDRESS

{UPDATE TO MEW TEST ADDRESS
:GET THE NEW ADDRESS
:SAVE ONLY BITS 7,8
:IN R3 ALSO

:IF YES THEN DONE

*IF NO THEN MOVE POINTER
‘ONE BIT FOR EVERY 200
:CHANGE DATA FLAG

TO RIGHT DATA TYPE

‘HAVE WE CHECKED ALL THE ROM
*IF NO CONTINUE

LZHQBRO M9312 BOOT TERMR 8K

CZM3BA.P 11

13-MAR-78 08:58

0C3246

000207

003250
0032se2

000000
00000C

MACY1l

13-MAR-78

30A{1052)

END OF PARSS RNUTINE
RTS
TESTAD:

DARFLARG:

FOe

(09:59

PAGE 18

SEG Oole
; IF YES RETURN

GET PSEUDO POWER-FARIL VECTOR ADDRESS ROUTINE
;B0

SHITCH HUST BE_"ON" OR AN
THE DATA WILL BE RETURNED

:
032737

000207

000777

173024

173024
173024

007500
007502

000777

173224

173224
173224

007500
007502

000040

001110

BUF2:

PPFVAR: BIT
BEQ
MOV

18:

2s:
38:

TIONS 173024 AND_ 173224 TO DETERMINE
POHER-FRIL OPTION ENRBLED ON THE
SNRBL D AND AT LEQST ONE RDDRESS
ROR WILL BE _DETECTED.

IN "BUF2TM IN THE

PSEUDO POWER-FAIL VECTOR RDDRESS

CONTENTS OF VECTOR ADDRESS

8777,
15

8173024,

J8173024
J8BUF2

MOV

a8173024,

d8BUF2+2

BIT
BEQ
MOV
MOV

8777,
s
8173224
8173224,

an173224

RTS

BR
BIS

ORMAT.

33
SPFERR,

JsBUF2
J8BUF2+2
J#ROMERR

;TEST IF _OCATION 173024 SELECTED
; IF NOT THEN GO TEST LOCATION 173224
;IF IT IS THEN STORE ADDRESS

; STORE CONTENTS OF LOCATION 173024

;GO _TO_RETURN

; TEST IF _LOCATION 173224 SELECTED
:IF NOT THEN SET _ERROR INDICATOR
;IF IT 1S THEN STORE RDDRESS
; STORE CONTENTS OF VECTOR
;GET OVER ERROR
:SET ERROR INDICATOR

;PUT_MESSAGE IN BUFFER_ROUTINE

:THIS SUBROUTINE FORMATS THE PARAMETER AND POWER-FAIL MESSAGES.
000o0o0C
003644

PUTMES: MOV

003644
007420
165774

INC

MOV
CMP

006530
001000

TST

BNE

003440

18:

000015
000012

2%:

1S THIS FIRST TIME THROUGH

;xr NOT FIRST TIME THEN FORMAT POWER-

J8TIMES

csr nsssncs BUFFER ADDRESS
:FAIL MESSAGE

: TOGGLE WATCHDOG

R3
(R3)

:GET DATA agrrsn ADDRESS
:1S DIAGNOSTIC ROM PRESENT

MOV
ggn

#DRHERD,
PC,

RS
FILBUF

:1F IT IS GET DIARG. ROM MESSAGE HERDER
:GO PUT HERDER IN MESSAGE BUFFER

ADD

MOVB

(R3)+

(RY)+

SWAB
MOVB

006543
000754

AsTIMES

#BUF |
#165774,

BNE

000002

3(RB)

MOV

(R3)
(R3)+,

(RY)+

:IF NOT DON’T FORMAT DIAG. ROM MESSAGE
;SKIP OVER ADDRESS OF ASCII

:FORMAT ASCII FOR MESSAGE
:PUT ASCII IN MESSAGE BUFFER

ggn

PC,

#BRHEAD,

FILBUF

:GO PUT BOOT ROM HEARDER IN MESS.

MOVB

aCR,

(RY4)+

:PUT A CR/LF HERE

MOVB

1ST

BEG

sLF

(R3}

R4+

;IS DATA EQUAL TO ZERO

BLUF.

CZM3SBRO H9312 BOOT TERMR BK

13-MAR-78 08:58

CZMSBA.P

003442

062713
004767
767
11
112724

MACY11l

13-MAR-78
END OF PASS ROUTINE

30AR(10S2)

RADD

000004
001074
000722

803470 115784

MOVB
MOVB
MOVB

w40,
40,
840,
8,

(RY)+
(RY)+
(RY)+
(R3)

;GET SECOND ENTRY PCINT

840,
#40,

(RY)+
(RY)+

SBQ¥EBLQTRH5UFFER RADDRESS

(R3)+,

(R4)+

HOV QSCI

:GET DATA BUFFER ADDRESS
:GET_POWER-FAIL HERDER ADDRESS
iGO PUT POWER-FAIL HERDER IN MESSAGE BuUF

000002

=NNO

o
SNgsvaonns
o
Snl o
@
oo

S
F AT L

ggR

PC,

FILBUF

MOV
CMP

BEQ

#PFHEAD,
SBUF2+4,

FILBUF

QCRDD

DQTR ?UFFERF008RESS
UPDRTE

(RY)+

iPUT A CR/LF AT END OF MESSAGE

MOVB

SLF

(RY)+

MOV

J(R6),

. WORD

RTS
O

TYPE

RADD

;ARE WE DONE

PC
Y

MOVB

;GO BACK TO START OF LOOP

:1F YES THEN GO RETU
:GO CONVERT OCTAL TO QSCII

CLRB

(RY)+

FOR MESSAGE
?C;I

#CR,

(R4)+

82,

(RB)

;PUT ZERO TERMINATOR AT END OF MESSASGE

;GET MESSAGE BUFFER ARDDRESS

;GET OVER MESSAGE BUFFER RLCDRESS

; SEQUENCE TEST

: THI S TEST VERIFIES Tgs ORDER OF THE ROMS ADHERES TO THAT SPECIFIED
:
INSTALLATION
PROCEDURE. THAT IS THE THEY HAVE BEEN INSTALLE
:
ALPHABETICAL ORDER ACCORDING TO THE FIRST DEVICE CODE OF
M

THE TYPEOUT FROM THIS SECTION DOES NOT INDICATE AN ERROR BUT IS JUST

A WARNING TO THE OPERATOR THAT

THE SPECIFICATION HAS NOT BEEN FULLY

SEQTST:

RDHERED T0.

O
L

020002

(R3)0

ADD

TIMES:

0000000000000 0000000000000
U MU MU MU U
0= 5 s bt bt bs s be e = D O O
NLZWN=-DOWVONCNLWNN-=0ODON

003632
003634
003636
003642
00344

00000C

(RY)

(RY)+
(RY)+

4
#BUF2

JSR

Ss:

840,
sHT,

BR
MOV

5$R

000C1S
000012

1GO CONVERT OCTAL TO ASCII
:GO PUT ENTRY POINT IN MESSAGE BUF.

MOVB
MOVB
MOVB
MOVB

MOVB

000002

OCADD

FILBUF

MOVB

000750
000S7e

PC,

OCARDD

PC,

4s:

PC,

J?R

SWAB

007504

;GET FIRST ENTRY POINT

:GO CONVERT OCTAL TO ASCII
:GO PUT ENTRY PCINT IN MESSAGE BUF

3%:

(R3)

SEG OC13

FILBUF

JSR

007500
006660
000&186

PC,

ADD

000002

PAGE

g?fl

JSR

003474

GO2

089:53

003e46
003652
003e54
003ece

001i1e
003es2

MOV

ROR
CLC
CLR

J#ROMFIN,

J#DAFLAG

;GET ROM LIST

iGET RID OF DIARG ROH INDICATOR
;0K STARY, WE MUST FIND MORE THAN
:ONE BOOT'ROM TO DO THIS TEST

CZMSBAD M3312 BOOT TERMR BK

13-MAR-78 08:58

CZMIBA.P11
1027

003664

MACY11l 30R(1052)

END OF PA5S ROUTINE
cS

1034

7 003252
1
883293 825;37 8ooooq 0032%2
1858

i8%0
1 GR7E HRA9sS
}035 003704 ooxwa;

13-MAR-78

INC

cn:

cs:

HO2

09:539

JRDARFLAC

'qbex

S
T
3585;an

gEg

PRAGE 20

SEG 0020

J8DAFLAG

nsne

xxr r

o THIS

oor non pnscsnr AT AL

o
U

zeno THERE ONLY THE ONE SO EXIT

.
R
S
BE
1036 83575% 001402

B
BEG

BT
33

e
Em
Ee
:IF NO DON’T UPDARTE DATA TABLE ADDRESS

1038

JSR

PC,

GETCOD

:GO GET A

BNE
JSR

SEQEX
PC

TST

1037

003726

1039

8357

104G
1041

003732

062700

004767

704

?
003742

1013
004767

1045
1046

003760
003762

00:003
000763

1048

003766

007317

00CO0Y4

000040

38:

000030
1042
003746
026767
000020 000020
1043
4
3
1044

1047

iowe

003764
003770

{ggg

003774

TST

CMP
BGT

104401

4s:

000207

SEQEX:

000000

LASCOD:

1655 003772 000000

ADD

BNE
sn

TYPE

SEQMSG

FR&COD,
4§

GETCOD

LASCOD

.WORD

:1F YES Tuau UPDATE TABLE ADDRESS
:UPON

RET

coo RY INDICATES

:IF VALID EE sogs FOUND
:CODES SC
1
T THEN GET NEXT COD

;1S
1ST CODE
n(runecrxanLv LESS THE 2ND
;}r NO SEQUENCE ERROR
F R4 NO

SEGEX
33

RTS

FRSCOD: .WORD

1054
1055

8l,

TO ZERO GET CON

:COULD NOT rxno VALID o:vxc: CODE, SO EXIT
i IF_NOT THEN GO GET NEXT DEVICE C0D
:TYPE OUT WARNING MESSAGE
:RETURN

1056
1057
1058

;:GET DEVICE CODES SUBROUTI

igg?

:IT CAN NOT FIND A VALID DEVICE CODE IT MAKES R4 NONZERO aerons RETURNING.

:THIS SUBROUTINE 1S CALLED BY THE SEQUENCE TEST ROUTINE TO GET THE
;DEVICE CODES FROM THE SIZING BUFFER. THE ROUTINE anIonTEs Encu DEVICE
:CODE, THAT IS IT MAKES SURE THE CODE IS THE FIRST CODE IN
A
IF

1059
1062

1823

003776

004000

1065

00S004

83?33;

003252

12703

003774

GETCOD:

1066 oquES 30503; 003252
1067
1068

1069

004024

1071

D040

1070

012703

004030

00S710

1072
1073

0040
036

005104
000410

1075
1076

004042
004046

1074

1077

004050

003772

0032s2

001002

012001

032701
001403

062700

igg? 004060 000207

000170

000002

CLR

?goannc

MOV

JSDARFLAG

#FRSCOD

CLR

18:
2%:

3s:

EE;

8LASCOD

B8R

INC

J8DAFLAL

BNE

MOV
TST

GETEND

BIT
BEQ

%170,
4§

ADD

2
GETEND:
RTSv

;fn LASCOD

:IF DARFLAG

IS ONE PUT ozvxcs CODE

;:GET OVER

;PUT DEVICE

anzzsno ssrup

CLEAR DAFLAG
IN

i MAKE DRFLAG NOT 2

(RO)

COM
BR

MOV

'%fi Eggtgg 1S ZERO PUT DEVICE COCE

coo

:DOES DEVICE CODE EXIST

:IF YES CHECK IF VALID

(RO)+,

82,

PC &,

(

:IF NO MAKE R4 NON-ZERO
;nng sg T

; GE

SS OF DEVICE CODE

:IF BIT 3-6 CLEAR THIS
:0OF A ROM SO GET IT

1ST CODE

:IF BITS SET uponrs TO NEXT CODE
I

2
;RETURE
.

°°E D $TORN. &

HQBQO M3312 BOOT TERMR Bk
¢ 4M3BA.
Pll
13-MAR-78 08:58
<

102

(09:59

3?&(1052)
13-MAR-78
ND OF PRSS RNOUTINE

PAGE 21

SEC co21

; ERROR_HANDLER ROUTINE

TH%S SUBROUTINE FORMATS THE ERROR MESSAGES THE

NARE LG ER SRR EBFoRER PR
e o B

e P Bt e Bme o e ()

06
0

tnnunn savnsc

010214
001120
002000

175002

020000

174766

001110
001110
004362

000174

e B
eP

004312

rgxrxo

JSWR

:BELL ON'ERROR
:BRANCH IF NO

#BIT13,

JSWR

: INHIBIT ERROR TYPEOUT

108
J8ROMERR,
J8ROMERR,
SEHERDT,

0oooce

: INCREMENT ERROR COUNTER

:GET_ERROR CODE

:SAVE ERROR CODE ron APT
:GET ERROR HERDER TABLE
:C- BIT USED TO STOP STEPPING THROUGH TAE

3§
R1

:ROTA
RROR CODES
SET STOP STEPFING
:IF C- ax

002460
ooesi2

JSROMCNT
IROHNUH.

W= NNWO L L

E nn
R

= O

e e

OO+

6%:
7%:

000122
000010

000015
000012
0000C0
174640

HERDER ADDRESS IN REGISTER

GO Pfl§ HERDER IN ERROR MESSAGE BUF.
;1S
A CRC,
APTER1 OR APTER2
APTER3, APTERY
GO FORMAY
;%F 50ERROR

:1S ERROR CRC
:IF NO FORMAT APTER1, APTER2
:GET ROM COUNTER
:GET ROM NUMBER T
:C-BIT USED TO STOP STEPPING THROUGH TAB
:ROTATE ROM

:IF C-BIT SET STOP STEPPING

R1
0 0

Ss:

: :

000002

0 +

4§:

000773

:PUT

JSROMERR

(S:;o

:IF C-BIT CLEAR STEP TO NEXT HERDER
:CONTINUE STEPPING
:PUT ROM NUMBER IN ERROR MESSAGE BUF

Eg:;o

:PUT BAD DEVICE CODE IN ERROR MESS. BUF.

(

;GOTO END OF ROUTINE

:GO TO END OF ROUTINE

R3
0CRS
FILBUF

:GET snvso EXPECTED VALUE
:GO COVERT OCTAL TO RSCII
:GO PUT DATA IN ERROR MESSAGE BUF.

10(Rs),

:GET SAVED nsczxveo anus

sCR,

5533’

80,
SERYV

(R4)+

PC
PC,

aLF,

ocililo

SROMERR

000020

;és g;ggr CLEAR STEP TO NEXT HEADER

p—

W
o~

001110

D
O

000023

F?Laur

3%:

000220

THEM

c23:

Pt s Bt o B

004242

198:

TYFES

SERRMSG

JSERRCNY

VOO~~~ O~~LuwlND
0""\’”3“33“’0“0

SR8
322 eae .
888085099858§8889555555999383
ERoRERYRETEORS
&R

000
ot Pt s Pt Bt Pt et Pt et Pt

e et gtettt
TM |
VTV
LV Vi

Bt Bt s Bt Bt et s Pt Bt et et Bt Pt Pt Bt et Bt ot Bt Pt Pt Bt s Pt et B

1
1
1
1
i
i

[NTATATATATATATA L

1
1
1
1
1
1
1
1
1
1
1
i
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1

\lc‘lfllukzhfl\flg\lfl‘mJUNO-g@QVU‘WIUNHO\Dg FRZOR28S9S 393908089808

i 082
i 083
i 084
1 08s
10
1 087
1
1
1
1
i
1
1
1
1

MARCYL1

OCRSC
FILBUF

:G0 COVERT OCTAL TO ASCII
:GO PUT DATA IN ERROR MESSAGE BUFFER.
;PUT CR/LF

AT END OF

MESSAGE

s PUT rsnnxnnvon AT END OF MESSAGE

:TST IF ON APT

SUNSIZRREHIES
8

3339888
93388888
59338
oL

33»—808&*3.:(0!\»— Owm \JU‘G‘IUNFO\flg ngcumo—oamwwm :fl’cwoaowfmxumuégg gg
w

00140S

9%:

000S30

13-MAR-78

D OF PRSS ROUTINE

000S34

118:

09:59

SEGQ OCee

$ATY1

; IF NO_BRANCH

.WORD

PC,

$ATY3

:1F NOT ON APT JUST REPORT ERROR

JSWR

; IS HALT
NO SKIP OVER MALT
:IF

éé.

HALT

rie

géo

#BITIS,

00111

128:

CLR

J#ROMERR

EHERDT:

PAGE 22

950

100000

NS IR

004316

MACY11 3?2(1052)

RESREG
RTS

lgi -

:GO REPORT ERROR

H
; THEN

ON ERROR SET

;CLEAR ERROR FLAGS

ERIHSG

WWWW

DD
o 00 00 00 €0 00 0 00 0 00 0 ~d 3 ~d ~J < ~d 4 I I OO 0V 0 0 0~ 00 O O VNNV £ £ £ £ £ £ £ £ £ & e
0

Bt Bt et P

Bt et

s Bt Pt Bt ot

s Bt ot Bt Bt Bt s Bt Bt e

et s Bt Bt ot et Bt Bt Pt B

Bt Bt Bt Bt ot et Pt Pt Pt

s Bt P

Bt ot Bt Pt P

Bt P

Bt Bt B

=
0

OO0
N

MS312 BOOT TERMR 8K
13-MAR-78 O8:58
P11

JO&

;FILL BUFFER_ROUTINE

i THIS SUBROUTINE FILLS THE MESSARGE BUFFER WILL ASCII

; CHARACTERS.
000011

FILBUF: CMP

18:

18
SHT,
cs
sCR,

2s:

MovB

(RS}+,

000011

000015
0Joo1e

MOVB

TST8B

BNE
ADD

000002

004440

8HT,

BNE
MOVB
BR
MOVB

RTS

sLF

(RS)

s
e,

d(R6)

(R4)+

; IS FIRST CHARACTER A TAB OR CR
; IF CR_THEN GO PUT CR/LF_IN BUFFER
;IF_TAB_THEN PUT TAB IN BUFFER
;GET OVER_NEXT LINE
;MOV CR/LF TO BUFFER

(R4)+

;PUTA CHARACTER IN HESSQGE BUFFER

(R&)

;IF_NOT PUT IT IN MESSAGE BUFFER AND GET
;UPDATE RETURN POINTER TO GET OVER CHARA

(R4)+
(R4)+

; IS NEXT_CHARACTER ZERO

; THEN RETURN

;OCTAL _TO RASCII CONVERSION ROUTINE

; THIS SUBROUTINE TAKES
A SIXTEEN BIT OCTAL NUMBER AND
;CONVERTS IT TO & ASCII CHARACTERS
007504

bt
004470

007504
004544
006137

004544

OCRSC:

MOV

80CTBUF,

CLR
CLR
CLR

(RO)+
(RO)+
(RO)+

CLR

MOV

MOV
CcLC
ROL

(RO)+

$0CTBUF,

R3,

IUTEMP

;GET BUFFER RDDRESS

;GET BUFFER RADDRESS

JsTEMP

:CLERR BUFFER

GE OCTQL NUMBER
:CLEAR CAR
{ROTATE BIT INTO CARRY BIT

CZMIBAO nsaxa BOOT TERMR BK

CZM3BA.P1

13-MAR-78 08:58

13-MAR-78

MACY1l 30A(1052)

END OF PASS ROUTINE

ooooso
R 2R
3
00
fiss

T
INC

1201

2s:

iig;

gg:gga

007512

{533 004512 §xe§3§ 007504
882f37 DO4SHY

xeog 004524 682110
120

1204
1205
1206

1207

1208
1209

gg:ggg

137

004534
004S40

106110
006137
106110

004544

000000

004542

gzz

004S44

ROL

ROLB

TEMP:

09:59

)

52.

;gcraur.
JRTEMP
(RO)

JSTEMP

B8R

PAGE 23

8
.
RO

ROL

ROLB
ROL
ROLB

004544

000755

2$§

KO2

#0CTBUF +6

SEw 0023

1T INTO BuFFeER
RELSTS CAgR

:UPDATE BUFFER RDDRESS

?QVEOHEOgg?VERTED ALL THE NUMBER

527555 PUT sflgrzn ADDRESS IN REGISTER
:ROTATE CARRY
BIT INTO
BIT
INTO BUFFER
BIT CARRY
:ROTATE
:

(R
JSTEMP
(RO)

;
;
;

:GO TO START OF LOOP

:VALUE IN R3 SO THE OCTAL TO ASCII ROUTINE GETS THE RIGHT NUMBER.

1212

s THIS ROUTINE IS CALLED BY THE PUT MESSAGE ROUTINE TO GET THE RIGHT

1216
004550 011303
1217 004552 004767
1218 004556 012603

OCADD:

i%i&
1215 004S4e 010346
1219

1220
1221
1222
1223
1224

004560

177664

0006207

MOV

MOV
JSR
MOV
RTS

iggg

.SBTTL

lee7

(Ré)
PC
(Ré)o

-(RB)

R3
OCRSC
R3

snvs THE VALUE OF

T THE DRTA TO BE conv:nreo IN R2
nzsrone R3

co CONVERT OCTAL TO ASCII
:RETURN

TYPE ROUTINE

1228
1229
1230

iaourxuc T0 TYPE a§cxz MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE.
:%¥THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED.
: #NOTE] :
SNULL CONTAINS THE CHARACTER TO BE USED RS THE FILLER CHARACTER.

iggg

;:norea:

1231

: *NOTE2:

1234

:%C

1539

‘:on

1235

ig:?

1242
1545

004562
Doucee

105767
108767

1244

004570

000000

004572

000265

000430

1539 854532 3%9233 000002

1248 004602 122767 000001 174346
1249

SFILLC CONTRINS THE CHARACTER TO FILL ARFTER

:#1) USING A TRAP INSTRUCTION

isgg

1245

SFILLS CONTRINS THE NUMBER OF FILLER cunnncrsns REQUIRED.

004610

001011

: :MESADR 1S FIRST ADDRESS OF AN ASCIZ STRING

TP FLG
fs

3318 THERE
?E Es A T ERMINAL ?

TYPE

MESADR

TYPE:
STYPE

TST
agLa

HALT

—

983

§Sz'é§’&

BNE

623

CMPB

onprsuv SENV

..unLr HERE IF NO TERMINAL
..LsnE

Egrsaogness or ASCIZ STRING

::nuuuxnc IN APT MODE

; sNO,GO CHECK FOR APT CONSOLE

174318

6
RO, 61

6es:

61S:

WORD

8?98

PC,SATY3
0

SAPTCSUP, SENVM

(RO)+,-(SP)

g (SP)

000002

BERER FRRRE L S

000200

000130

0000S6
000130

Ss:
6S:

8
JSR
CMPB

7S:

DECB

K FOR

S, SK

SH C sn T0 BE TYPED ONTO STACK

gn THE TERMINATOR
;
Ennxna OR POP IT OFF THE STACK

?u Tne?unn PC

;:BRRNCH IF <HT»

: ;BRANCH IF NOT <CRLF:
::?8;: ‘CR)(kND Eguxv

ggHflRCNT

-'afi“&&%‘“’é "128”"’
OR FIL ER CHARS. ?
Gk

PC, STYPEC

tLic, (spr+

1(SP)

schAlRCN

800672

: NO

(SP)+

NULL,-(SP?

000120

R L

C,STYPEC

LLE

CHARS.

NEEDED

Y0 BE TYPED”?
NEED
POP THE NULL OFF OF STACK
HAR

COU“*LRS A COUNT

;HORIZONTAL TAB PROCESSOR
000040
000014
000007

B8%:
0ooosz2

BOBN—0

000044

000002
000015

000036
000002

o8N

000014

“g

000012

[

RR
et R

#HT, (SP)
8%
ogRLF,(SP)
S

000011

CONSOLE
§QFOR APT
OSDDRE
R
Bs
cgfigo%g gusrnsssso
ouT

iisEt P RESS

:n"

886234
000040

TO APT
lg:TSPOOL, SENVM ,.SPOOL MESSAGE

174337

K82

000100

SEG 0024

«33

132767
00140S

PAGE 24

oguele

13-MAR-78 08:58

LO2

08:59

gsameag

——

CZMSBA. P11

13-MAR-78
MACY11 30A(10S2)
TYPE ROUTINE

288DyT

CZMIBAOD M9312 BOOT TERMR BK

177566

000002

9s:

MOVB
JSR

BITB

fet
STYPEC: ggTB

BPL
MOvVB
CMPB
BNE
CLRB
BR
18:
CMPB
BEQ
INCB
SCHARCNT
: . WORD
STYPEX: RTS
$TPS:
$TPB:

. WORD
. WORD

QTYPEC
c
o;' SCHARCNT
(SP)+

$
STPS

YPEC

2(SP),a$TPB

R,2tSP)

sc¢nncnr

; ;REPLACE _TRAB WITH SPACE
;;TYPE A SPACE

; sBRANCH IF NOT AT

;;ng STOP
; ; POP SPACE OFF STACK

;;GET NEXT CHARACTER
s ;WRIT UNTIL PRINTER IS REARDY

; sLORD CHAR _TO BE TYPED INTO DQTQ REG.
A CARRIAGE RETURN?
,.IS CHARACTER
;BRANCH IF NO

EES--CLERR CHARACTER COUNT

..IS CHARACTER A LINE FEED”?
;BRANCH_IF YES

..COUNT THE CHRARACTER

; CHARACTER COUNT STORRGE

:;TTY PRINTER STATUS REG.
:1TTY PRINTER BUFFER REG.

ADDRESS
ADDRESS

CZM9BAD M9312 BCOT TERMR BK
Pt Pt P P

13-MAR-78 08:58
CZM9BA.P11
000
306 00S0S0
307 00S0S1
002
s e P
Pt Bt Pt Bt Bt P

3{3
316

00S060

s
e B Pt
e Bt B Bt B Bt o

s ot s Pt Pt o

B RS L3 S £

ot Pt Bt Pt B

361

sw:
LG: .BYTE

112767

.
00000!I

112767 000001

600-4

032

00S

NFERRIE5R
Y ¥

s Pt
P Bt Pt ot Pt

D021
B021 14

002
005

000236

TYL:

000226
TY3:
000220 gg;;g:

novg

174023

173760

2s:

173754

005200

; ;CONTRINS NULL CHARACTER FOR FILLS
..gonm;ng 8 OF
gLER gmnncrens nsgusneo

Cuna
i TERMINALILLAVAILABLE"
FLAG (BIT<07>=0=YES)

i: : QURRTION
HOGK,
LINEFEED

00000 173730

8825%8 25413
00000M 000016 38:
062766

u.srru;

,.TO REPORT FATAL ERROR

MOV
BR
MOVB

SMFLG
ntv
#1,SFFLG

T0 TYPER MESSAGE
;;TO ONLY REPORT FATAL ERROR

e
-

S E(SP’

SENV
APTENV,
33
E

"%331:!6"
P A e ssace
9. 1"VER

BITB

SAPTSPOOL , SENVM .,SHOlLD SPOOL MESSRGES~?

283
TST
BNE
B0

8 37&#)
SMSGTYPE
RB.SMSGAD

!
000004 18:
173762
810063 173770
166

O
2

o o B0 30 IR IR 3530 36 96 36 36 06 36 36 38 36 36 3% 36 36 36 3% % 96 96 96 36 3% 36 36 36 36 36 36 36 38 9% 36 36 3% 3% 3% 3% 36 36 3% 9% 3 36 3% 3 3 3% 3% 3 % % % % % B & ¥

767

PAGE 25

.sam. aPT commcmxons ROUTINE

174032

%13

09:59

tSHEfig °§EH (16>
12,

T mov

s Pt

B0 Gt ot Pt Pt ot Pt Pt Pt Pt

et s o o Pt B

BRI TR IR

Pt Bt Pt Bt Bt Bt P B P Pt ot Pt o o P

317 005066
318 00S074
319

13-MAR-78

TYPE ROUTINE
$NULL: .BYTE
srxu.s: .gvr

01
0057

319
B8288d Bt
312 00S0S6 000012

gls

MACY1l 30A(10S2)

1STB

BNE
SUB

ROV
Hov

RO, -(SP)
$

(RO)+

2s
$MSGAD,RO

RO, SMSGLGT

snscrm:

;;PUSH RO ON STACK

R APT?
3.:?FERG ;INGBh’“

.; ;SEE I _bomurumsr
%m ADDR.
XMISSION?
WAI
_NOT:
;:IF
P B0"R0bR TN MAILBOX
::FIND END OF MESSAGE

;3508

STRRT OF MESSAGE

PBET PERGTA IRHAiLBOXoroS

PITELL APT TO TAKE MSG.

Bn
D055 WS
% Dk
005234
000000
ys:
7 000062
108:
i
R
%;3
13‘:’5 173706

Bov

B9csPy.us

1ST8
e
;g;

SFFLG

%
{5;"

REPORT FATAL ERROR?
;O
REEOR
.,numxnc uuoea APT?

005260 017667 000004 653335

gtspépsrnm.

Ss:

%gs

173660

1: 9&935“

B
197 RO
005310 105067
005320

000207

118:

B
T
. WORD e
c STVAE.

Efi{

INC

Sl
CLRB
RTS

fn:;.crvps

snécrvp:

. sPUT MSG ADDR IN JSR LINKAGE

pe
3
$1@ pPRERST
T

,.r}nNgnco La§t MESSAGE?

ara aat

m.L a#fa!f'|m(c ERROR

SHFLG

SHE
TSAGE FLAG
::

SEG 0025

¢¢

M9312 BOOT TERMR 8K
13-MAR-78 08:58
P11
DOC
00S32
1
oosaas
&’5
000
{332; 005324
1366
200258
1367
000086
1368

MACY11

NO2

:59 PAGE 26

-MAR-78
ROUTINE
85?‘ fgmxcms
3%7(1052)
0
.BYT
LG:
0
TE
gu;:
SFFLG: .aer 0

aprxzzzz&

SEG 0026

; sMESSG. FLRG

FLAG
::L0G
::FATAL FLAG

1369

000

oooé-oo

mrsrooux

{3;%

H ll!lllillI!!Il:!llllllllllllllilll:i:;ailla:llll!llll!Ill!!!!’l

ig;?

fi.’

sar

TY INPUT ROUTINE

igg %’3233 1775:ssa“

1377

33llll!!!"Hll!Q“Illlll!“ll!ll!!!“!llil.!lllllllllll{ <BERERRS

1380

1376
1378
1379
1381

iaea 005332 %nr 000176 173544
1384 %g‘.g 105777 177760
1385
1
1
1383
2716 177000

;
h
gu
.-aoun
-

BPL

Bree

1389
002364 DBides 727 |00007
1390
173506 000001

i”é % 5'1"455
1393

104401

006057

016796
104402
104401
00S046

17256M

1394 %&3 104401 006064

1395
1396
1397
1398

00S
00S4l2
005414
00S420

006075

1900 008454 108973 177676
iuox
430 100375
muaDE 005432 117746 177672
1333

005436

042716

177600

1406

i:’.gg p0OSY42 021627 000025

fwnm!
oosm:g ?8555 15 006052
1411 0O0S4SM 062706 000006
i:ig

005

000757

1414
1415

00S462

021627

00001S

1417

0DOS470

005766

000004

1416 005466 OCl022

::TTY KBD

cr:n
aoumi
HANDLER,
TY
FLAG

AND
WILL
REGISTER TRAP CALL
ga"s“sorrm SWITCH
*

sak

uc'f “t2p)

;-ss THE 0 'T.ssm SELECTED?
HH um ‘l’
”?
1
"l’ WAIT AROUND
"
AsC11

s
S
CMPB
SAUTOB, &

BEQ 158 .

TYPE

,SCNTLG

MOV
TYPOC
TYPE
CLR

SUREG, - (SP)

, SMNEW
Z(SP)

.;sav;
G FOR TYPEOUT
; ;GO
--ocm. ASCII(ALL DIGITS:
: ;PROMPT FOR NEW SWR
;;chg_aa COUNTER

BIC

81C172, (5P)

:IMAKE IT 7-BIT ASCII

SGTSWR: TYPE
198:

17735522

$ce
BPL
MOVB

asTke
78
JSTKB, - (SP)

55nfi"is“
NG nnuro-nooeo

::gncn "¥"' '
THE

CONTROL-G ($G)

NT comsms

i CHARTHERE®
;;xrNor'*f'nvAGAIN
;;PICK UP CHAR

208:

ADD

§'ch

igsg;;:js
k6, SP

“::s":s:»xigogé:::ot
TREL)
: ; IGNORE_PREVIOUS INPUT

Sflg

iE';"“S

::gmflgunxécné

TST

4(SP)

’

.,LET S TRY IT AGARIN

::YES,

’

IS IT THE FIRST CHAR?

CZM9BAO M9312 BOOT TERMR BK

13-MAR-78 08:58

CZM3BA.P11
1418
1419

00SY74
ggggss

1421

sgggxo

1423
1424

005522

1420
1422

1425
1426

1427

1452
14
1430
1431

]
005552

00140
166

ggoooa

00S0SS

8sa7os
1

1003
76

1627

ggewao
1627
003015
726

766

1432

gggggo

1434
1435
1436
1437

005566
00SS5
005572
00SS574

ggggxs
16
006316
66

00Sel2

000720

1433

1438
1439
1440

1441

1442

005600
00Se0%
005606

1403

0S6Bl6
G00707
104401

TTY INPUT ROUTINE

0006

173400

000100

177574

173361 000001
77234

060

148 :

000060

BLY
CHP
BGT
BIC

18%
(SP), 867
18
860, (SP)+

:IRE-ENARBLE TTY KBD INTERRUPTS?

:
:RETURN
: ECHO CHAR

(SP), #60

:iCHAR ¢ 07

TST

2(5P)

::15

ASL
ASL
ASL
INC

(SP)
(SP)
(5P)
2(SP)

::NO, SHIFT PRESENT
i
"CHAR OVER TO MAKE
::
ROOM FOR NEW ONE
: :KEEP COUNT OF CHAR

208

: :SIMULATE CONTROL-U

.DSABL

LSB

178

-2(SP), (SP)
78
$QUES

i :BRANCH IF YES
::CHAR » 77
: :BRANCH IF YES
:iSTRIP-OFF RSCII

THIS THE FIRST CHAR

::BRANCH IF YES

$:SET IN NEW CHAR
::GET THE NEXT ONE
PITYPE ?7<(CR><LF>

Y1222 2222222222222222223322222222TT2X2222TT2L22TTTTLI
LTSS L L

ta
‘x
00S614

011646

1465
1456
1457

00Se24
00S630
00Se32

105777
100375
117766

1461
1462
1463

005656

00Sel6

00SeM0
00SeM6
00SeS4
00SEEM

016666
042766
026627
001013

177472

000004

177476

177600
000004

000004
000023

; ;PUSH DOWN THE PC

TSTB
BPL
MOVB

J$TKS
18
JSTKB,4(SP)

DIWAIT F
;A CHARACTER
:IREAD THE TTY

J$TKS
23
JSTKB, - (5P)

BIC
CMP
BNE

022627

000021

CHP

026627

000004

000140

000004

000175

002407
026627

2%:

177600

BIC

000002

3%:

4§:

: :CHARACTER IS ON THE STACK
:iWITH PARITY BIT STRIPPED OFF

(SP),-(SP)

177440

001366
000750

008732

18:

MOV

TSTB
BPL
MOVB

005700
005702

005712
005714

000002

:; INPUT A SINGLE CHARACTER FROM THE TTY

RETURN HERE

177444

042716

005704

000004

SRDCHR:

RDCHR

105777
100375
117746

005670

0056

1478 008754 0943768 0OOOYD DOOODY
1473

PC,STYPEC

::CLEAR UP STACK

=fi7“lf ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY

1453

1469
1470

RTI
JSR

188:

1468

: ;BRANCH IF NOT
tRE-ENABLE TTY KBD INTERRUPTS
:

$INTAG, #1

00SOSY

JCLT]

1466
1467

158
#100, ISTKS

%6, SP

CMPB

BIS
BR
TYPE

1449
f:é?

1465

;;sg

178:

¥Y

1464

$CRLF

000002
177776

i::?

1458
1459
1460

TYPE

BEQ

1445

1454

: sBRANCH IF YES
::SAVE NEW SWR

CMP

000002

SEG C027

118
2(SP), 3SR

BNE
MOV

158:
168:

PAGE 27

BEQ
MOV

ADD

118:

000067

1452

BO3

09:59

13-MAR-78

MACY1l 30A(1052)

4(SP),2(sP)

$1C<127> M(SP)
4(SP), 823
3s

;:GET RID OF JUNK IF ANY
.;sg IT A CONTROL-5?
: tBRANCH IF NO

81C177, (5P)

::MAKE IT 7-BIT ASCII

(SP)+, k21

BNE
BR

23
13

BLT
CHP

4$
4(SP), 8175

CMP

Bic
RTI

: i SAVE Tgs PS

4(SP), #140

030, 4(SP)
'

::WAIT FOR A CHARACTER
::LOOP UNTIL ITS THERE
::GET CHARACTER

;;{s IT A CONTROL-Q?
::IF NOT DISCARD
::YES,
RESUME

::1S 1T UPPER CRSE?

: :BRANCH IF YES
;;ég IT A gpecan CHAR?

;i
I oPER CASE

::1GO BACK TO USER

CZMIBAC M3312 BOOT TERMR BK
CZMIBA. Pll

13-MAR-78 08:58

MRCY11l 30R(1052)

(RERRRERRRE R

$SROLIN:

MOV

: ;SAVE R3

000177

108:

005054

4s:

000044
006040
000015

38:

177777
00S0Se

RDL IN

MOV

CMP
Eb%fia
MOVB
CMPB

R3,-(SP)

sstTYIN R3

usrrvxule ,R3
q(SP)+, (R3)
8177, R3)

: :GET
RDDRESS
FULL”
;;BUFFER
1180 REABCO HARACTER FROM THE TTY
;;Sgr“gfiflngfifisfi
::1S IT A RUBOUT

:;SKIP IF NOT

:iCLEAR THE aurren AND LOOP

TYPE
CMPB

93
k15, (R3)+

MOVB

$QUES

i:TYPE R '7°

(R3),9%

;;ECHO THE C

; ;CHECK FOR RE

BNE
CLRB

2s
-1(R3)

IF NOT RETURN
::LOOP
::CLEAR RETURN (THE 15)

MOV

tSP)+,R3

;;25§ ORE R3

MOV

4(SP},2(SP)

MOV

9s:

: ; TERMINATOR WILL BE
A BYTE OF ALL 0°'S

TYPE

MOV

000002
000004

: :ADDRESS OF FIRST CHARACTER

BNE

TYPE

St EgiB

18:

N
&

[yt

0000

s Pt ot Pt
et Pt Pt Pt et ot Pt Bt ot
D

INPUT A STRING FROM THE TTY

006042
00e0Se

047040
000040

RARRR AU TSR AR RRRRIRISRRISI ISP S

RS BRI R RN RN

RN E RN

SEG O02e

..INPUTA STRING FROM THE TTY WILL BE ON THE STACK

#CALL:

136

FRGE 28

RETURN HERE

Y .

i
PUNUNY b bt e b s bt b s pe e
nN—-=0WwoONOC"NLEW-0O

;THIS ROUTINE WILL

09:59

TTY INPUT ROUTINE

1474

1523

CcO3

13-MAR-78

RTI

.BYTE

SLF

(SP),=(SP)

sSTTYIN, 4(SP)

'BYIE 8

TTYIN: .ggc 2 /fU/<15>«12>
CNTLU:

A LINE FEED

:ADJUST THE STACK AND PUT noonsss OF THE

RE URN

;ST onncs FOR ASCII CHAR. TO TYPE

RVE TR YTES FOR TTY INPUT
";Eg
i: 85 2E

000
000012
020122

SCNTLG: .nsci§
$SMSWR:

.RSC

/<1

0S3s0S

SMNEW:

.RSCIZ

NEW = 7/

.SBTTL

BINARY TO OCTAL (RSCII) AND TYPE

>¢< )/ HR

FIRST ASCII CHARACTER ON IT

,.CONTROL -c"

lilill!lll!lilll}lllillill!llllllillllllll}lillllllllll!l!l!ll!

iTHIS ROUTIN? IgugSEg T0 CHGNGE 16-BIT BINARY NUMBER TO0 A 6-DIGIT
:#0CTAL (ARSCI

AND TYPE IT

:g;zpos---snrsn HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE
;;
i

MOV
TYPOS

s ®

.BYT

NUM, - (SP)
N

;NUMBER TO BE TYPED
.,anL FOR TYPEO

,,Nsl 10
8
OR NUMBER OF DIGITS TO TYPE
iiM=

1=TYPE LEADING ZEROS

o:suppness LEADING ZEROS

}

; #STYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST

:STEEOS OR STYPOC
i ¥
38

MOV
TYPON

NUM, - (SP)

; sNUMBER TO BE TYPED
;:CALL FOR TYPECUT

MACY11l 30R(1052)

:#CALL:

000002
000001
00000
00000

$TYPC3: MOV

MUM.-(SP)

i § MRBER RO BB OLTEC

J(SF),-(SP)

: sPICKUP THE MODE

RH,:(SP)

: sSAVE RY

)
+1,RY

R
33
;;EEFTHE
NUMBER OF DIGITS TO TYPE
; s SUBTRACT IT FOR MAX. ALLOWED

; sSAVE
THE ZEflougiLL SWITCH
i:égT

_IT FOR

o
~N

s
e e

NOVE 1SR5) #BRAbk.: i iKORBEAEDP ey 240 vpe
ngo
:gQ;s#)
: sADJUST RETURN ADDRESS
;3SET THE ZERO FILL SWITCH
.l,SsgILL
$TYPOC: gOVB
OOOI?é
MOV
.6,
+1
::SET FOR
SIX
16ITS
EdoNT
?4:53418~
§§§§3:THS
Sg:gggg)
868183 STYPON: MOV
000211

nve

2on2
ga2 gaég A82838238

18:
2%:

3%:

000076
177770

4s:

5§:

006326
00003e

7%:

000002

ROL

BR
ROL

ROL
ROL
MOV

000004

$OCNT:

33
RS

RS
RS
RS,R3

;;so$nrz =§B°¥NTO wC*
; ;GO DO nsg
DIGIT
:iFORM THIS

R3
$OMODE
7
#177770,R3
4

;;GET LSB OF THIS DIGIT
::TYPE THIS DIGIT?
;;BR_IF NO
::GET RID OF JUNK
;:;TEST FOR O

BEQ
INC
BIS
BIS

3 1
RY
#'0,R3
_R3
8’

;:;BR IF YES
::DON’T SUPPRESS ANYMORE 0°S
: I MAKE THI? DIGIT ASCII
::MAKE ASCII IF NOT ALREADY

23
63
RY

::BR
IF MORE TO DO
::BR
IF
DONE
,
:; INSURE LAST DIGIT ISN'T A BLANK

(SP)+,RS
(SP)+,RY
(SP)+,R3
2(SP) '4(SP)

;: sRESTORE
”SESTOR
;
;RESTORE
::SET THE

MOVB
TYP
DEC
BGT
BLT
INC

B8R

MOV
MOV
MOV
MOV

MOV

8%:

ROL
DECB
BPL
BIC
NE
TST

63:

888
0801\)

PO¥oc

MOV

8g8es :o Resgey

006234

oalekls ;
UUUUU

S e e S

Y el

nnnn
mmmmmmmmg
0
N
£ s [¥:] EEEREEEeE 0

1542

000000

83
2

1541

23FRERLFE

1539
1340

%
R

1838

{1 #$TYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER

1832

PAGE 29

tedf
1539

09:59

BINARY TO OCTAL (RSCII) AND TYPE

13-MAR-78 08:58

CZMSBA P11

D03

13-MAR-78

RTI

.BYTE

'BYTE
.BYTE

R3,8%
gt
§O0CNT

(SP)+. (SP)

O
O
O

: :SUPPRESS THIS 07

:iSAVE FOR TYPING
i 8 T
THIS DIGIT
:
SCOUNT BY |

0 THE LRST DIGIT

RS
R
R3
STACK FOR RETURNING

: ; RETURN

::STORAGE FOR ASCII DIGIT

::TERMINATOR FOR TYPE ROUTINE
::0CTAL DIGIT COUNTER

[al

CZMSBARO M9312 BOOT TERMR BK

cce3

1586
1687

1593

006331
006332

000
0000G0

SOFILL: .BYTE
SOMODE: .WORD

.SBTTL

O
O

s s 2ERQC FILL SWITCH
: :NUMBER OF DIGITS TO TYPE

SAVE AND RESTORE RO-RS ROUTINES

{ggo

33 .!ll.llli‘ll'll."’!lllllD”!.’!i..!’lDl’l”’.lll!ll’.'.l!’.6’00

1592
1583

: #CALL :
'y

1591

: ¥SAVE RO-RS

1596

P XTOP-=-=(+16)

1597

%4 14---R0

006334

1606
1607
1608
1609

006334
0063
006340
006342

1612

006350

1613
1614
1615

}gi;

006344
006346

010446
010546

006360
006364

016646
016646
016646

006370

$SAVREG:

010046
010146
010246
010346

016646

000002

000022

006372

1624

006402

igga

MOV

22tspP), -(sP)

::SAVE PS OF MAIN FLOW

RTI

00b372
006376

012666
012666

000022
000022

006406
006412
00B414
006416
006420

012666
012605
012604
012603
012602

000022

012666

$RESREG:

000022

RY.-(SP)
RS’ -(5P)

22(5P) . -(5P)
22(5P) . -(SP)
22(SP) . -(5P)

RO
R1
R2
R3

ON
ON
ON
ON

STACK
STACK
STACK
STACK

::PUSH R4 ON STACK
::PUSH RS ON STACK

::SAVE PC OF MAIN FLOW
::SAVE PS OF CALL
::SAVE PC OF CALL

006426

000002

1635

RESREG

MOV
MOV

(SP)+,22(SP)
(SP)+.22(SP)

:
sRESTORE
PC OF CALL
::RESTORE PS OF CALL

MOV
MOV
MOV
MOV
MOV

(5P)+.22(5P)
(SP)+.RS
(SP)+.RY
(5P)+.R3
(5P)+.R2

:IREST
PS OF MAIN FLOW
::POP STACK INTO RS
::POP STACK INTO RY
::POP STACK INTO R3
i
STACK INTO R2

MOV

1631 D0B4Sd 013600
1632

: sPUSH
::PUSH
::PUSH
:IPUSH

MOV
MOV
MOV

; #CALL:

1621

1625
1626
1627
1628
1629

RO, -(SP)
R1.-(SP)
R2.-(5P)
R3. -(SP)

: *RESTORE RO-RS

1613

1622
1623

MO
MOV
MOV
MOV
MOV
MOV

000022
000022
000022

1618

1620

42---(+18)

‘% +4---RS
1% +b---RY
‘% +8---R3
i#410---R2
i #+l2---R1l

1598
1599
1600
1601
1602

1610
1611

:%UPON RETURN FROM $SAVREG THE STACK WILL LOOK LIKE:

iggg

1603
1604
1605

:
SAVREG

Moy
.SBTTL

RTI

(S5P)+.22(SP)

(2P)+'RD
+

TRAP DECODER

::RESTORE

PC OF MAIN FLOW

{iOP STACK INTO RO
.

33 P22 22222232223 2223322322222 222222222222 232322222 3232222224

1€26

:#THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE “TRAP“ INSTRUCTION

1638

:%0F THE DESIRED ROUTINE.

1637

‘%AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS

igag
1641

‘%GO TO THAT ROUTINE.
DO0E420

010046

STRAP:

MOV

RO, -(SP)

THEN USING THE ADDRESS OBTAINED
: ;SAVE RO

IT WILL

PAGE 30

BINARY TO OCTAL (RSCII) AND TYPE

(8}

09:59

13-MAR-78

MACY11 30A(1052)

13-MAR-78 08:58

MSBAO MS312 BOOT TERMR BK

g%nqgn.Pxx

EQ3

CZMIBA0 _MS312 BOOT TERMR BK

CZMSBA.P1I

13-MAR-78 08:58
016600
005740
111000
006300
016000
000200

MACY1l

13-MAR-78

30A(10S2)
TRAP DECODER

O0CCOO02

PAGE 31

SEG CC3l

MOV

2(SP),RO

..GET TRAP ADDRESS

MOVB

(RO),RO

..GET RIGHT BYTE OF TRAP

$TRPAD(RO) ,RO

..INDEX T0 TABLE

TST

-(RO)

ASL

RTS

MOV

006464

FO3

09:59

; BACKUP BY ¢

;POSITION FOR INDEXING

;GO TO ROUTINE

;3 THIS IS USE TO HANDLE THE "GETPRITM MACRO
011646
Clebbb
000002

000004

00COo02

$TRAP2: MOV

g$¥

.SBTTL

(SP), -(SP

4(sPy, a<sp)

:MOVE THE PC DOWN

MOVE THE PSW DOWN
,,RESTORE THE PSW

TRAP TABLE

; #THIS TRABLE CONTRINS THE STARTING ADDRESSES OF THE ROUTINES CALLED

:#BY THE "TRAPTM INSTRUCTION.
:

$§TRPAD:

ROUTINE

.WORD

srn 2

$TYPOC
$TYPOS

;:CALL=TYPOC
..CRLL:TYPOS

$GTSWR

$TYPE

;CALL=TYPE

TRAP+1(104401)

TTY TYPEOUT ROUTI

;;CALL=TYPON

TRAP+2(104402)
TRAP+3(104403)

TRAP+4(104404)

R
TYPE OCTAL
TYPE OCTAL NUMBER

;;CRLL-GTSHR

TRAP+5(104405)

GET SOFT-SWR SETTING

$CKSWR ..CRLL:CKSHR
SRDOCHR ; ; CALL=RDCHR

rnap+stxoquos)
TRAP+7(104407)

TEST FOR CHANGE IN SOF T-SWR
TTY TYPEIN CHARRCTER ROUTINE

STYPON

SROL IN

§SAVREG

.CRLL:RDLIN

ALL=SAVREG

SRESREG ..cALL-nesnec

TYPE OCTAL NUMBER (

rnnp+10(1ouqxo) TTY TYPEIN svnxnc ROUTINE
TRAP+12(104412) RESTORE RO-RS ROUTINE

TRAP+11(104411) SAVE RO-RS ROUTINE

: MESSAGES
ROMNUM:

000377

042503

041440

042117

/207
/35~

RSCIZ

/33~
/34/
/327
<«207>¢377> 377>

DRHEAD:

.RSCIZ

/DIAG.

BRHEAD:

.ASCII

~BOOTSTRAP ROM ENTRY POINTS AND DEVICE CODES.

BELL:
0200Se
0

.RSCII
.ASCII
.RSCII
.ASCII
.ASCI1

ROM ~/

~ZMIBA0 M9312 BOOT TERMR BK

MACY1l 30A(1052)

13-MAR-78

052522
043501
044526

OMIwM0

.
.
CODE
DEVICE

——0)
~NEN

ER2MSG:

.RSCIZ

~/COULD NOT FIND DEVICE CODE -

ERIMSG:

.RSCIZ

~/FOUND UNEXPECTED DEVICE CCDE -

ER3MSG:

.ASCII

/POWER-FAIL VECTOR ERROR/<15><l2»

.RSCIZ

.ARSCII

/POWER-FAIL DATA ERROR/<1S>
12>

.ASCIZ

o
wn

g
e
n
nNNONO

N:O:N
b i :
-0

252

—

[

———

g 2AR
2 R

2
R
&293Ro- B228
X
22Fa22a0s
BReAR §§¥§=GR RER KRR g 32 2

ERYMSG:

EXPECTED

RECIEVED
<15 < l&>

RECIEVED<15 <l12>

CRCMSG:

.RSCIZ

~/CRC ERROR IN ROM E--

PFMSG:

.ARSCIZ

~/COULD NOT DETERMINE POWER-FRIL VECTOR ADDRESS-

NOROMM:

.ARSCII

~NO ROMS TEST ERROR/<1S5:>«cl2

99
o
2

nNe—=n-0Lr

§2
8 8 257
h fo

g
=]
n

RER 22
38h
n
n ¥ 2o
Noo

RUN DIAG.

047503

m.—p-

[ =]=]

2982 2

SEndand:kotAoaRaaEoors£

823
23
R

-2 % 2

NG DIAG.

047504 PFHERD: .ASCIZ ~PSEUDO POWER-FAIL VECTOR ADDRESS

o4
020105

€5 0032

PAGE 32

042l

[y,

e
b e

ol ol

Ladiond
ond

2222222R
~
oo

gg§§i3
8

NNN

888

&
:SERSRRERERS
38
% Naf FEENNZREN 0z

R2?
Al S

007200

g
N
N
&3

W \Oflfl

:RE

=
e
e
R

NLEWhe-

33353

ol
Ll
e e e e
e e e e e e e e e e e e e
e e
O e e
e e
e
el el

NNNNNNN

00Y4S6
04YSOM
042504

QuZSG3

SSBURRECREBBVRREORS DONOCNLW~-0 285

e
e ey

00BESD

043501
020116
004456

70 OOcced 091428

NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNYNY

e e e

703

0066o6
006634
00BG42

—

700
501
202

—

TRAP TABLE
SenaBa Pl ¢ 13°MaR-78 08:58
4
o1
RSCIZ .
38 D0ebly Dar0i 020117 ouysOu

GO3

08:59

CZMSBAC M9312 BOOT TERMR 8k

CZMIBR.PLI

13-MAR-78 08:58

MACY!!l 30AR(1052)

TRAP TABLE

050130

04150S

020123
047111
1
4
1

047516
047440
144
4
0131

044S24
047522
042522

047117
042503
0000Se

13-MAR-78

HO3

09:59

PAGE 33

RECIEVED-

LASCIZ

EXPECTED

LASCIZ

~INSTALLATION PRCCEDURE.

.WORD
.WORD

O
O

1785 007274
007302 8:sgéq 03w50H 8#2522
1756 007310 044503 0S3108 042105
105 SEQGMSG: .RSCII <15>.12>~/DEVICE CODES NCT IN ORCER SPECIFIED B¢
a?g
{32; UO;Jfg
1759 887
owxgll 838?6% 83;503
i7S4

1760
1761
1755
1763
1764

007332
007340
D07
007354
007

042504
020124

1766
1767
1768
1769
1770
1771
1772
1773

007376
007404
007412

O0O40S14
0S0O040
0S2504

1765

007370

047111

0S2123

046101

.EVEN
: BUFFERS

1774
1778
1776

BUF1:

1777
1772
177

.WORD
. WORD
. WORD

O
8

.WORD
.WORD

O
O

1784

.WOR

1780
1781

1785
1786
1787
1788

.WORD
.WORD
.WORD
.WORD

O
O
O
O

1797

. WORD

1789
1790
1791
1792
1793
1794
1795
1796

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

1798

1799

1800
1801
1802

1803
iggg
180&
1807

BUF2:

00
007514

010114
0i0214

OCTBUF:
MES!L:

000100

MES2:
ERRMSG:

000001

.END

.WORD

.WORD
.BLKB
.BLKB
.BLKB
.BLkB

O
O
O
O
O
O
O
O
O
O

O
10
420
100
100

00T TERMR BK

Eggggs?PT?ala ?3-HRR-78 08:58
= 000000

S06

ACPUOP= 000000

S06

ACDW]1 = 000000
ACDWe = 000000
=
ADDW1 =
RDDW10=
ADDW11=
ADDK12=
ADDK13=

000000
000000
000000
000000
000000
000000

ADDUW3 =
ADDWY =
ADDWS =
ADDWEG =
ADDW?7 =
ADDW8 =
ADDWS_=
ADEVCT=

000000
000000
000000
000000
000000
000000
000000

ADDW 1 4=

ADEVM =
ARENV
=
RENVM =
AFATAL=

000000
000000
000000
000000

AMADR1= 000000
AMADR2= 000000

AMADR3=
AMADR4=
AMAMS1=
AMAMSZ2=

000000
000000
000000
000000

AMAMS3= 000000

AMAMSY= 000000
AMSGAD= 000000
AMSGLG= 000000

TY= 00CJ00

S06
S06

13-MAR-78 09:59_ PAGE 35
TARBLE -- USER SYMBOLS
CROSS REFERENCE

MACY1l 30A(1052)
S47

S06
S06
S06
S06
S06
S06

549
550
S2l
SS1
sse
Skl
See
S63
SeY

S0e
S06
S06
S0e
S06
S0e
S06
S06

SS4
Sss
SS6
4
SS8
s59
Se0
siz2

S06
S06
S06
S06

S34
38

S06

S06
S06
S06
S06

Ses

S48
S17
siB
S09

S06
S06

S41
S4y
Se8
S36

S06
S06
S06

S42
Si4
S1S

S0O6

S06

S08

AMTYP1=
AMTYP2=
AMTYP3=
AMTYP4=
APASS =
APRIOR=
APTCSU=
APTENV=
APTER1=

000000
000000
000000
000000
000000
000000
000040
000001
000001

S06
S06
S06
S0e
S0e
S06e
1255
1248
4348

136
1325
8e

APTER3=
APTERY=
APTS1Z=
APTSPO=

000004
000010
000200
000100

4368
4378
597
1250

851
857
13668
1327

ATESTN= 0000
AUNIT = 000CO0

S06
S06

S10
S13

AVECT1=
AVECT2=

S0e
S0e

545
S46

TER2= 000002

SWREG= 000000
SWR = 000300

000000
0000CC

43S

S06

103

5e9
837
sS40
S43
sil
1367

840

S19

S20

13688

g%:gga%#

12 BOOT TERMR BK

13-MAR-738 08:58

006524

BELL

= 880001
BITO
BITOO =
00000!
BITOl

1095

Ylbs
4Ob#

BITO3 = 000010
BITOM =
BITOS =
40

4038
4ocs
YOls

413
4yl2
41l

BITO8 = DOO400
BITOS = 001000

398»
3978

408
407

0OOY000
010000
020000
040000
100000
000004
000010
DOOC20
000040
000100
000200
DOO400

39%s
3958
3948
393
3928
3918
Yi4s
Y13s
Yyles
Yile
410s
409
4088

1092

007420
007500

622
cug

104406

16718

CRCERR= 000020

438s

BITOG =
BITD? =

100
00

BITI

BITIO
BITil
BITi2
BIT13
BITIN
BITIS
BITe
BIT3
BITY
BITS
BITe
BIT?
BIT8

=
=
=
=
=
=
=
=
=
=
=
=
=

BITS
= 001000
BPTVEC= 000014
BRHERD
006543

BUF 1
BUF2

CALSUM
CHECKS
CK

002462
(02244

= 00001S

CRCLOP

CRCMSG

LAG

007146

= 000200

003252

ISP = 177570
DEVCOD
0O

DISPRE
DRHEARD

001106

000174
006530

l»:t-cam= :‘maZS
EMTVEC= 000030
ERRCNT
001120

004062

ERRMSG
010214
ERRVEC= 000004
ERIMSG
006756
R2MSG

ER3MSG
ER4YMSG

006722

007014
007072

4Yo4 e

4008
399
4]1Ss

4078
423s

730
657

3318

7718

1156

3328

EEE

3388
804

4748

4YS1is
9o

x?gg.
EEY]

414

410
409

1096
1145

1691

817
854

832
931

879
932+

953
936+

1034
937%

17748
930

394

1799

958

Soe

993

100!

1108

1134

1170

1294

1304

62l

1265

1304

47N
g1t

585
879s

9178

1025+

1028*

1029

1033

1063

1066*

10&93#

810

827

841

g8s2

acg

10898

Loy

B4l#

743
7248
734

780

1738

EE e

9ll*

Cota
16898

1182

1091#*

1090
4198
1182

1140
582
17168

1183

1154
1185

7668

747

4798

711

09:59

416

415

13-MAR-78

16868

40Ss

BITO2 =

JO3

36
SYMBO.S
CROSS REFERENCE TABLE -- USERPAGE

MACY1l 30A(1052)

735

1711s

1721
17308

533%

el
748

1144
S83#

1804
Sq4s

00T TERMR

EZH‘!BQOe ?B-HQR-78 Og: 58
ADD
002554
728%
FE’,I(EBU" 00'0'430
‘)gg
729%
002552

FIRSTA

1114

FIRS

FRSC

3772

Y778

1042

737

964
736
643

10S1s

750%

972
749

1107

1128

1132

ll6bs

1665

1666

1667

1669

1671

1672

1673

1E74

1675

751
1002

784
1135

7918
1171

1298

1304

996

1215

1190

1197

1199

18018

1099

887

1068

ioee

IOTVEC= 000020
LRSCOD
003774

Yyous
1042

1052

1065

= h‘flll

LASTAD 002556
LF
= 000012
LOOP
002472
MESSAG

001112

MESZ
NODARTR

010114
002242

MES1

007514

3é9l

727%
3308
769
4768

973

738#%
967
78S

1802s

NOROME= 000100
NOROMM
007250
NOROMS
002204

Y408
1158
5SS

71
17S0s
7068

OCARSC

1127

1131

ADD

004546

OCTBUF

007504

004442

PFERR = 000040

HEAD

006660

971

be4

4398

MSG

007172

1157

PROMP
PRO
PR1
PR2
PR3

002560
= 000000
= 000040
= 000100
= 000140

660
3538
3S4s
355s
3568

PRS
PRE
PR7

= 000240
= 000300
=
340

358
3598
3608

PIRQ
= 177772
PIRQVE= 000240
PPFVAR
003254

PRY
PS

PSW

PUTMES

= 000200
=

177776

= 177776

003340

PWRVEC= 000024

3368
4308
807

978

1185#

1185

808

1705s

846

802

1129

1133

1ieb

1168

1263

1304

939

1217

9298

3578
3338

334

80S

Ble

334

4eSs

9484

1485
16738
1149
4208

1672

OMERR

001110

Jfiic

1“8!

ROMFIN

001116

4788

62b#*

SAVREG=

104411

RSTART 002355

998

17428

104407
104410
104412
000010

002460

984

18038
7168

RDCHR =
ROLIN =
RESREG=
RESVEC=
ROMCNT

980

Bl4y=

806

813
70?7

790%

997

1664

781

7898

g,
lggg

fir

09:59

992
767

g
zsg

1044

13-MAR-78

979
753

Sg
"
= 11515; u
SWR =

KO3

37
SYMBO.S
CROSS REFERENCE TRBLE =-- USERPAGE

MACY1l 30R(1052)

724#

l&ég

1089

16758
72S

‘Eg;‘;:
16748

740

734#

747 %

808

7578

1113

B2b*

840#*

8S1#%

857

939

1098

637

E48+

653

7es

741

881

889

1022

103S

693

741

1109

['a)

ZMSBAO

M9312 BOOT TERMR BK

SEQEX

003770

2:::2119Uit.:’l’1131 13-MAR-78 08:58
007317
SEQTST 003646
STRCK = %uoo

SEQMSG

ST,
9
gMKL
001104
=

SWREG
000176
SHO
B
1
SWOD
SHOéSHO
SW03
SWO4
SWOS

o
SW08

=
1
=
2
=
= 000010
= 000020
= 000040

100

= 000400

SlW1
. %&
SW10
= 002000
=

1032

1030

1048

1758%

5
4738

e
S8Y#»

b6l
3248
4ySes
JBBs

788
778
3768
3758
3748
3738

3728

37l
370

%;:
3688

SWil
SWi2
SWi3
SWiY
SW1S

=
=
=
=
=

DOY000
010000
020000
040000
100000

%78
3668
3658
3648
3638

SWS

3838

Sl
SW3
Sk
SWb

SWz

SWB
SKW9

= 000004
= 000010
= 000020
= 000100

=
00
= 001000

S92

1382

S99*

613

1205+

1208%

139S

109¢e

109¢

1145

1382

1919+

883#*

884

88s

BB87*

891»

896

837

g898*

1094

1268

1393

1394

1397

1410

142!

1440

3868
3858
3848
382s

3818
3808
3798

b43*

4eB8s
429y

H4e7s
Heos

b44

1201%

B46

385.

S76#%

S77%

lgg;

1325

1382

TYPOC =
TYPON =
TYPOS =

104402
104404
104403

1396
16678
16668

16658

SATYC

005104

1318

13208

$BARSE

ool12ie

THD
001122
SASTAT= #xxxx® U

S9c*

613

”e

33*13.

= 104401

S86

b27*

TYPE

1049

380

TIMES

TRAPVE= D0O0D0O34
TRTVEC= 000014

1048

1040

382

1193*

003644

SE% 00237

08:59

388
387
386
385
384
383

11518

TKVEC = 000060
TPVEC = 000064

13-MAR-78

10ces
S74

Temp
- B0acay
TESTAD

LO3

38
SYMBOLS
CROSS REFERENCE TABLE =-- USERPAGE

MACY1l 30R(1052)

490
1347

S4y7s

4364
1362

847

1203%

»*

136%0
igg?

6S1

ig:z

CZMIBA0O M9312 BOOT TERMR 8K

SCKSWR

MACY1l

13-MAR-78 08:58

CZMIBA.P11

005332

g saises

i
13628

30A(10S2)

13-MAR-78

09:59

PRAGE 39

CROSS REFERENCE TABLE -- USER SYMBO.S

853

1280%
1671

1287

1296+

1301w

SCNTLU

150S

SDDKW2

SDEVM
SDORGN

44
46
4
62
Se

SENULL
SENV
SENVM
SEOP
SEOPCT

66
Sk
Y4
02
20

veT

;ERTEND
AL
FLG

O01ses0

SFILLC

00S0S52

SINTARG
SLF

001101
00S0S6

1548

1255

1325

1356#%

13648

5386

bll

1327
1349

!Gé#hg ooaxué
SGTSWR
Y
§§8083
=
1BTS
112e
SLFLG
SMADR1

005323
0011792
iil 74
D01

IL
$MAMS1
$MAMS2

001136
001166
001172

s02

S07s

1248

SEG 0038

MACY1l 30A(10S2)

CZMIBAO M9312 BOOT TERMR BK

NO3

09:59_

_PAGE 40

SEG 0039

CROSS REFERENCE TRBLE -- USER SYMBOL.S

13-MAR-78 08:58

CZMIBA.P11

13-MAR-78

S39s
S4es
It

1358#%

1362

1336
1339#

DOE

001144
001133

1351

13SS#

15S0#
658

1S61#%
b74»

15878

675#»

694

1505

1N
=

RERERE
SRERER

578

S80

&60S

608

674

1377

1511

318

319

320

321

S80

667

674

686

632

634

1403
1400

1457
%
1424

1463
1455

1461

T e

1667

16688

1669

16728

16 3

16748

16758

1504

12%e

1426

E=3
=
sSes

el el
P

annnin
O—-WwLL
WO
O NN

£ L0 0TIV

T
Y S

JNDEEE 3-‘0‘("‘3\0-‘
"e LY A

XSS

576

Tt S

000010

1664
12918

16708

—

16768

CZMIBAO M3312 BOOT TERMR BK
13-MRAR-T8 08:58
CZM9BA.P11

SVECT2
$$GET4=
SOFILL
.
=

001206

001210
000000
006331
010314

.SASTA= »xx»»x U
L8X
= 0Cl1a2

BO4

PAGE 41
09:59
13-MAR-78
CROSS REFERENCE TABLE -- USER 5YMBO.S

30R(1052)

S20s

S4Ss

1Y
6868
1537#%
4438

S71s
136Ss
1317
4S6s

1581

4SOs

697

1374

15868
4SS

1304
15048

1305
150S

Y63n
1306
1511

4658
1307
1801#

WL
O—
oo

SVECTl

MACY1l

4878

1311

4298

1312

CZMIBARO MS312 BOOT TERMR BK

COMMEN
ENDCOM

43ls
431ls

ESCARPE

4318

GETSUWR

Y3l

431le

GETPR]
T

4318

gEuTST

431:

REPORT
SCOPE
SETPRI
SETTRA
SETUP
SKIP
SLASH
SOF TSW

3028
3268
43ls
1656
302
4318
4318
3028

SPACE
STARS

SWRSU

TRMTRP
TYPBIN
TYPDEC
TYPNAM
TYPNUM
TYPOC
TYPOC
TYPTXT

SSESCA

SSSE1

SSSETM
$SSKIP
.EQURT
.HEADE
.SETUP

.STARS
. SWRHI

.SWRLO
.SACT]
.SAPTB
.SAPTH
.SAPTY
.SASTA
.SCATC
.SCMTR
. SEOP
. SRERD
. SSAVE

STRAP
STYPE

S$TYPO

$3i%

{358

1888

1665

1667

1669

1671

1672

1673

1674

1675

483

485

492

S0S

664

1ee7

1318

1667

1669

1671

1672

1673

1674

1675

SEG OC4!

3258

ERROR

30R(1052)

13-MRR-78 08:58

CZMIBAR.P11

CO4

PAGE 4 3
09:59
13- pflR-?B
R 0SS REFEREN E TABLE -- MACRO NAME3

MACY1l

3854

4318
4318
1590
4318
16568
4318
4318
3028
Y3ls
4318
4318
4318

608s
Y

4318

431l

433

460

43ls

601

163S
S80s

1395

431s

]
1bc6e
SSes

4318
3028
302s
302s
302
3028
321ls
3028
3028
302
3028
3028
3028
302
3028
3028
3028
302
302

30cs

1666

1372

1377

1445

1474

is13

13-MAR-78 08:58

CZMSBA.FP11
.

ABS.

010314

ERRORS DETECTED:

MACY11l 30A(10S2)

000
O

CZM3BA, CZMIBA “SOL /CRF /NL: TOC=C2ZM~3R. P11

RUN-TIME: 20 S .7 SECONDS
RUN-TIME RATIO:

CORE USED:

20k

97.27=3.5

(35 PARGES)

13-MAR-78

DO4

(08:59

PAGE 44

CROSS REFERENCE TABLE -- MACRC NAMES

CZM9BAO M3312 BOOT TERMR Bk

CCue

EO4