Digital PDFs
Documents
Guest
Register
Log In
XX-4EEC7-38
April 2000
36 pages
Original
8.0MB
view
download
Document:
DTTCA-B
Order Number:
XX-4EEC7-38
Revision:
0
Pages:
36
Original Filename:
http://bitsavers.org/pdf/dec/pdp11/xxdp/diag_listings/TC11/DTTCA-B.pdf
OCR Text
801 r-tA(y 11 21 (732 ) 2'f ... S£P·7& 1'f : 00 PAGE: 1 IO£~TlfICHTION • . ,. . . . _ q. .... "'I< ..- • • • . _ _. . . . . . . . _ ~oc~ 1:00£ : "" nac "'11-01 TCA--B pqoox r ~: 1'C II t£~ :;F. ~OUT I N£ F'lR ~c. 1.WM£ . · ... · . . 1 IS . "I9£.· ... !) D .iHX. \ .. A.· lIC£:& ...;c.lJ".l£ ..y. L£ ~~ysTD' ~ ~y E "a:JilEO ~'fWITH (I't .(1 tl€ ~ ·CCPYRn· 1 ·NOTIC£. THIS .~ .'4 . CtC..... r..; I .~ ........·. ,~ ...... _crt.si. '. . .n.&: . .•. . . r:.:t'JIl .. ·.~.. ttr. .·.. ...1 ... ··.·ff«t . . ~6ll€R .. ·HO.T. BE. ~x l F~· SlXHS'YS~ TO tK ...0 ~O .~ ~ ,.. T[.~. 111...£ 'Yo ·ClKRSHIP f6 T~ . ... ,.... #lJ.. TIrts ~l" 1M ~C. 114: 1tf'~1'I(»l~r4 TH S ..' . T IS SL6JECT TO C~ W. p'hUf-MOTl~~·. " ...... TIEC0r6TUO AS A CO,'UTf!£N1' Ft, 01Jl11-.. £~l .... Cr~lI:tt. ~C Of::' DJI'I[S ~ A£SPOHSlSII.JiY FOf( US( 0f1 RELIHSI; !i'Y sorT..n·cr. £QUIM!'iT .... ICH IS NO:SUP?LI£~ BY ~INOEC- l"'OTTCA-B lClllTU56 DEvICE ROUTINE FOR MPG O!TCHS.P 1 REVISION HISTORY ..... ~5 % ....... J "9 ....q -~ ... .... I !:iii. t::;) """l !::l ... ...... S~ ·• · ··•• ·•• •· · ,·• ·, ~Vll COl 27(732i 2'f-S£P-7b l'i!OO PAGE: 2 • SBTTL REVISION H~STOR' APR 7b DTTCA-B RELEASE DEC 7S IN OCTAL FOR W~7r LIfi§i' • ~YTE I·' I UN0JfiAY~ IE f1ESAGE • DEC 7S MOE CHANGES REQUIRED FOR THE MEMORY MANAG£M£NT VERSION OF f1PG. AUG 75 DTTCA-A INITIAIL RELEASE SEQ 0355 001 2~-SEP-7b l~:Oa PACE 3 MACYll 27(732) ~!riD£C"'ll-CiTC~-B Tel: rUSb DEVICE ROUTINE FOR !'fPC t:rn;:~. p 11 srAtiO~Ru JEvICE ROUTIr£ THBlE • S8TT.. ST~ DEVICE ROL!TI~E • TITLE MHINOEC-ll-OTrCIi-8 TABLE Tell/lUSt. DEvICE ROUT!NE FOR r1PG ;REVISION 'c]. ;FILENAME OF "TTC~.I1PG'" ON t1PQ/XXDP MEDIA ; MACYll: :"IiTCA' OTTCi1? ICRf: 5Yf'IIlPOC;o:CTTCA7. p 11 : LNJ(Xll: D!TCA MPG/B~O"~TTCA~G~; . C'. • PAPER TAPE. PUNCH OT CA .!'PC. . h.E. ......... f ( "i' • I • CSECT !'\·s''''~ • ,,1..,g1.. . ~ORD .wORO , 1(\:1'\ • ~""l, ,v . WORD . wORD . wORn , 0 ·.~RD SIZE: •WORD ERR: OREGHO: •wORD IVCT~: . wORD pswo: • WORD • wORD • WORD aI/REND" . a t"! u o o o a o 1 o 1773'-+0 21i1 300 o HSKEEP- . . WORD REPQRT- . .WO.RO rou~~:: a . WORD .WORO •WORD iUPc.£R· .WO~ llLIST: • •WORD ~IOOSY~ iC 11 ro, I,IgI.. eLlST: • WORD 8INASC: •~O+<o 8TASLZ: •WORD O£CASC: • WOQl) CSYSf"w: .w~ SErVEC: . wORD CLRVEC: . wORD TSTVEC; . WORD KI,L-. 8o o o o o o Cl o I ~H!NDEC- JTTCAa.P u, '2 '.13 11" '1- .... ~ ., ~ ! ," ,,~ -j7TCA-9 ST;{~"OHRD C1(JOO .... 11 ' 000000 DOnOrS' 000000 000100' 000000 . wORD ~TIYT' .wgR8 ut YT; .W R . wORD ,WORg .WO'R ,wORD ,WORD . WORD ,~TNI""T: 000102" I00001"+ l~' :.to 1 • ! :3 v'iO;"u .....1 a~ 00027b :: g r:"'01'2' r....<w,.. 00035'1 1 'j., JJJ.l:i~ OOOSDb 121 122 :23 DDDllS' 0*"*152'1 052123 12'1 000122' 000000 125 CiJ01~' !JL+15?l1 (MeS03 D'/REGS: · ASCII . wORD · ASCII ~1527 . ASCII • WORD - 12'5 ...... ..\ C;( 128 ,,., 000130' 000002 000132' ~152't :,00136 ' !llOOO'1 '4Q 0001'+0' CNl~ 0'+0502 ...... 130 00011.f'i' 0000Cl6 131 0001%' CNlS?f 0521O'i 132 000152 000010 0001511' 133 13'1 135 ...... 13b 13~ 138 13<3 1>41) li..l J .,,':) ,j.'1.... .ll13 l~'; t"+5 1% 1"+7' lli8 l+j lSJ 151, ..,.?52 lSJ ' is''' 155 !5b 157 120 00015&' 0013"+0 OOOiS'+' 201 0001&0" 130 OOClb2' OO13t-. ... 000lb'1' 37h OCOlbb' 001300 I.AJ , ~.o""",'"0' 375 '-'nO''''2' ..11.,,' .l i 00125"+ 000:7';' 371-+ OOeJ! 7h' ()((f,(l? '1::0200' ....' ... 37'3 000202' 00057& ClOQ2O-t. -1"'2 .. II .'I....~. 00127:.1 0002";.]' 37 1 ... · ,j.. ".~ ..\ 2'. 00'2' 3.,.n ';.i 1... • 300216" 0013bO .::> •, 3&7' 2!Jl 000 000 . .' ,;\.~ ~ 001:;60 3&0 00022b' 00137'1 365 OOl4t02 000230' .... 'sa 0002 ! JE)'1 lSQ 0002~ir 160 0002:1:> • OOl~lJ lb .. OtlO2'+O· 3bJ lE>2 OO~2' 001-.2& 17"'......... 1&3 lbi1 1&5 ibb Ib7 0OO2*il.f' """"' f . wORD 0 g DVREGS-, 8~~~:: DI/MVTE ... DVCPTE-. DV1W51-, /ieST/ 0 /TCCMI ...;J Sf:' 0357 ;RETURN FROM INT ROUT BR HOR ;~~T O~7A BYTE ROJT BR AOR '~T ~TA BYTE ROUT 9R ~p ;AOR Of DEVICE REGISTER NAMES . AOR Of DEVICE FUNCTIONS ; AOR Of PACK TBl. EXT£NS I ON .~ OF MODEL VECTOR TSL EXTE~. ;AOR OF COMPILER TSl EXTEN. ; ~R Of DEV INTERFACE we SYM T8'-. ;VAlID DEVICE REGISTER NAMES ~ : 1'HEIR POSITIONS RELATIVE TC ; THE DEVICE R£GISTERS BASE ADDRESS. /TCWC / 1.1 . ASCII reBA! . WORD b · ASCII 'TeOT I . WORD 10 oVR£ G£:: · OVCMOS: .BYTe: . wORD .ByrE • WORD Dec .8YTE • lJORO .BYTE . WORD .BYTE 000 .8YTE ,..tORD . WORD • S)~TE ,WORD aoo ~8YT£ DOC • WORD • BY"'£: ace coe . WORD . BYTE .WOR~ · evrE .wvRO .BYTE . WORD .BYTE •wORD . BYTE 000 000 000 oeD . WORD • WORD ' t, I .. 1"' ' • 1' 000211f;' QY75lt; .... 15 r::..... ... ....... 0'10527 \"\rH''l2C:~ .;lit;) 000 ..... 0521!1 \.) , .,r;:l OO;,125b • 0200110 I"\liOc ..,i",Jy MACY 11 27 (732) DEvICE ROUTINE TABLE .... I ...".-..f EOl 2Lf-SEP-7fJ 1Lf; 00 PAGE 3-1 Tell/rUSE! DEVICE ROUTINE FOR MPG f'\V~'TE •• iJ ,. 1", .ASCI! .eYTE · ASCII l~O 201 ~ ,\oiO- • l30 201 WRltE- • 376 0 "I0WAIT- . :)"'5 t 0 .... 1, ~A.! ; VALID DEV 1 CE FUNCTIONS ; FLAG BYTE: BIT 7 = NPR oe:v BrT 3 :: MASSBUS DEV elr 0 = 2' WORDS FOR HOR (18 elr AeRS: -. 37Y 0 REP6RT-. 373 0 REP6RT- . 1"';:) a __ I .... qo£O- . 371.0 370,0 REv-. RDNUf1-. 3&7,0 .... RDMLi . - ~e-. 3bS,D WATM-. 3b"~O 510 -. 303 0 STP~l- . 177777 iNOWAIT 37b,O ;' wAIr' ;TABLE TER~INATJR :PACK T~8LE [XTENS:J"" FOl NACYll 27(732) 211-SEP-7c 111:00 PAGE 3-2 J:~(l,:!:r'1 • '~~O~:~J) , 01""' +·. . ),·''·i~.y' )7'5 052;.23 "~4 ]00 052 l r,! OO~ 011712 .j.YA ~gl§;,.b • DI.i7~Oj ..... J "':. ( ii rOil3 373 000 ""J .... w 4i' DOO306- 020(:'1.+0 CN30l.tQ 000 OOO:JIY' 372 i(ln3 t ' , O200YO 051n'"40 .;. '''' ,. b 37.1 If'oJO GDG32Y' rV·',!"'J3 a, • 0510YO 04i7104 ~HJ· *"" 00:) 370 CJ(103J'i ' 000336 ' 0510110 04.t05O'1 DOll Jb7 00034... ' au03'1~ . .'0 , OS::M~O CN0522 000 ~ .' ~,h ~, 0003bi.ff 02004ID 3bS QOO'+~' 19'+ 1~' .. -;r;;J 1% 197 I1j8 lc:J<3 200 201 202 203 2...'lJ.; 20S 20& 207 20B 2t)q 210 211 212 213 21~ 215 21& 217 218 21q 000 051525 051524.t (N2I27 053105 CNb525 0'+01111 0'i&1l11 ~21 050117 o·,w~2b 011&1111 aOD 3hJ ooo3Ob' 0200lofO 3fJii cfJ037&' 052123 00'137'+' 051127 • 8v"~ ,1 __ 052123 QQO 000'42b' OOC372 OOCHbS' 1"):00'17(1 , OOO~7"1· D03 OJLf537 003 0Q0b3.2 000&32 00C1b33 000&33 000b1.f2 000b1.f2 000b32 000b32 l " { ~ 1 i ' STOP E .~YI~ • HSt. ..r /~T~ LL / .BYTE 3b3.0 .ASCII . wORD • WORD . WORD /' 3#~ 37b,lNWAIT-LOCZ 375,L.WAIT-LOCZ 37'+. LSTATS-LOCZ 373, LCOUNT-LOCZ 372,LFWO-LOCZ 371, lREV-l.OCZ 370,lROHl.lf-LOCZ 3&7, LROAi.L -LOCZ 3&&,LWRALL-LOCZ 3bS,LWRTr1-LCCZ 3E)I1.lSTOP-lOCZ 3&3, LSTAlL-LOCZ COMPILER TABLE EXTENSION OVCPTE: .8'(TE 3 37& ':1'''S 000512 ...,..,.. .iJORO ' .Jf::> COO'-1lfl' 00"+537 000012 37'-t 000502' 00'1 f'l!...i. , t'W"\u'" ':)... Orll'Y:: \..IV;;;IU' UV'"!"":).;:! I 000012 001002 373 000512' 001 00051'1 ' OCN537 000012 001001 372 000S22' 003 00052'-+ CiO'f537 000012 371 000530' 003 OOJS32' 00+SJ7 000012 3iO 00053b' ODS 0005'+0' 00+537 000012 000000 OOOSLf&' 000002 005 220 000550' 221 000552' 001.f537 0005bO' 0000C2 375 0 /~TATUS/ 3 ~ 0 lCOUtHS/ 373.0 / FWD; 372,0 REVI 371 0 · ASCII / R6NUMI .BYTE 370 0 • ASCII /RDALLl . clYTE J&t 0 iJr" • J·tt..:..,' . ·:,QS"'Tr (,..... .BYTE 30& C ' WRpL • r:1<:1'''1 ........ .J. .BYTE 3b5.0 OVMVTE: ,WORD . WORD .WORO . WORD • WORD . WORD . WORD • WORD ,WORD OOtNOb' 00037& 000b32 000!o112, 000375 DOOb32 OOO'il&' 00037'i OOOb32 oot"'i22' 000373 OOOb32 00Cl'f32' 000371 O£'lDi1Jb • 00037'0 00Q&.tl.f2· 0003&7 QOOi+'ib' ()(l')3&O JOO'+S2' 0CJ03l)5 OO0'15b' 0003&1.f ODO'+h2' 0003&3 .AS l 1 .BY Y .. .ASC11 .BYTE • ASCII .BYTE • ASCII .BYTE 000000 SEQ J3'58 8'{rl:' ·.!JORD ''- .8YTE • wORD .BYTE . wORD . BYTE • WORD . BYTE . WORD . BYTE ,WORD .BYTE . WORD Y~3~lO. 3 3, yS3741O. lot .... 7 1"\0·t.... '....i . ,"IV • I .... '~EN :. :, . VECTOR '1,/"I'1"81 E ,"' ; NO WAIT ;~An ~537 31.0. ,10D2 Y 37 ,+53:"2 10 .,1001 ;STATUS : COUNTS : FORt~ARG ; REVERSE ;REGO NUMBER 5 3b7 :REAO ALL 3 37 "+~37110. 3 37 '+537 10. 5 37 0 Y~37 , 10 .. 0 . 2 Y~3'"I ••I~~.w.': f'\"'" i.. )., , !".AI1'iDEC- 1-0 ~ rCA .. 8 "'Cll ,'TUS& DEVICE ROUTINE: FOR MPG . DTTCA8. P :. STA~DARO DEVICE ROUTIt£ TABLE 222 OQ(jSb2 i 005 l&b 223 0005&4' 00'"+537 000U12 000000 000572? 000002 ~~ : OO'"+~ ooo~y~ 22S OOObCJ1 ' 0ClCl002 000b~' 003 000000 3Ed 000&10' ~~i 000012 229 000&1 ~. 003 3&3 22g 000&1&' OO~537 000012 22~ . OC8c22' 0'1bl02 020113 000&3C' 177777 DCOS2S' 0000D'1 0001)32' 000£,32' OO::tb32~ 251 . WORD q~~~;lO.tO.2 ;WRITE TIMING ~ MARK .BYTE •WORD . BYTE 3 30Lt 1.f$37,,10. 3 364 '1$37,10. ;STOP ;STOP ALL ... iH l...t. DEVICE INTERFACE WO~O SYMBOL "'''8" . WORD . WORD f 177777 MODEL STATEMENT TABLE L~WHIT: LWRAll: OOOQY2' Q'L+3377 0'17522 177515 LWRTM: .ASCIZ 000 OOObSO' .EVEN DOOSS2' 253 ;)!"'";.J .... ::l ' '''''",r; ... r::2 ' HSKPST: . 255 ~""~"..~ ISTAT: OOOt.52' 25b . WORD OOObS2' 000000 257 :>t:o XObS~", 000000 . WORD ......... ?Sg OOObSb' 000000 . WORD . WORD 2bO OO~O' 00000o . WORD 2bl 000&&2' 000000 2S2 CSTAT: .8LKW ... :'3 OOOOhY t 000005 2&'1 BYRD: . WORD 2&5 DefOC 7f.,' 000000 . WORD 2&t: 000700'000000 8YWR: . WORD 000702' 00000o 2&7 . wORD 2bB 00070*'+ ' 000000 ROCNT: . WORD 2f)'3 00070&' 000000 WRCNT; . WORD 270 000710' 000000 MISCNT: . WORD 271 G00712' 000000 ERRCNT: . WORD 272 C0071Y' 000000 DATAER: .WORD 273 00071f.,' 000000 .252 faLK / DEVHrH LWArT : LSTATS: LCOUNT: LFWO: LREV: LSTOP: LSTAlL: .BYTE o 000 LRONUM: 377 0'+7111 0'1752'1 lRDALL: .ASCIZ ,377>/INTO/<377i 000&32' OOOb32' 000b32' OOOS33' !JOOb33' OOObI.fO' 000377 OO~1.f2· ;WRIiE ALL ';$37, 10. , 0, 2 OVIWST: • ASCII . 000&32' COOS32 , 5 3&0 .BYTE . WORD .BYTE . WORD 23CJ GOl 2Lt-SEP-7f., 11.f:OO PAGE 3-3 MACYll 27(732) <377>IFROMl(377) o o o o ; STORAGE FOR DEV REG' S AT PH r, I.i 5 o o o o o o o o o ;OEV REG CURRENT VALUES STORAGE ; SYTES READ COUNT (READ. RDALL. S RDNU~~ '; ;8YTES WRITTEN COUNT (WRITE. WRALL. & : WRTM) ;READ CNNO COUNT (REAO RDALL. &RDNUM; : WRITE CMNO COUNT n~RI t E1 WRALL. S ~~R7'~ ;MISC. CMND COUNT (STOP ~ STPALU ;DEVICE ERRORS COuNT ;DATA ERRORS COUNT MAlt'lDEC-ll-OTTCA-8 Tell /TUSb DEvICE ROUTINE FOR f1PG DTTCAB. P11 STHtiDriRD DEVICE ROUTINE TABLE 27~ 000720' 000000 INTCNT: .WORD 27~ 2i~ 000722' 000000 TOECNT: . WORD 277 0007~' 000000 ERRAOR: . WORD 278 00072b' 000000 CNTADR: . WORD 27q 000730' 000000 CURF'LG: . WORD .?SO 000732 ~ 000000 CURCNT: . WORD 281 oa07~· 000000 CURCMO: • WORD 282 00073b' 00000o INBlKN: . WORD FINCNT: . WORD 283 0007'+0' 00000o REVCNT: . WORD 28~ 0007~2' 000000 285 Q007Lf~ • HSKPEN: 2Sb ;::::lI xx::x= 0 000080 ....,f"". ..... HOI MACY 11 27' 732) o o o o o o o o o o 2~-SC:P-7b Pt: 00 PAGE 3-'1 ;INTERRUPTS COUNT ;' OF ENTRIES INTO TIO ERROR POGr 'CURR ADR IN USER PROG ;ADR OF' BYTE COUNT TOTALS ; FLAG WORD OF CURR CMNO -WORD CNT FOR CURR CMNO ; CURRENT 8LK ORIENTED CMNO ; INITIAL BLK • FOR SEARCH -FINAL WORD COUNT (TeWC) ;TAPE DIRECTION REVERSAL CNT ;VALUE TC BE TAILORED BY DEV RO~T SEQ 0360 : ~HINDEC- I-DTTCA-S iCll/TUSElDEVICE ROUTINE FOR MPG , OTTCAB. P 1 TC 11 SUPPORT ROUTINES ENTERED FROM MPG I01 21.f-SEP-7E> IY: 00 PAGE Y ~ACY 11 27( 732> .SSTTl Tell SUPPORT ROUTINES ENTERED FROM MPG ;DEYICE ROUTINE HOUSEKEEPING ;JS~ , ; ;R2 0007~b' 005725 001003 000750' 032702 DOOaDY 0007511' 001010 00075b' 010700 DOO7bO' Ob2700 OOO~I.f' 012701 000770' 005020 177072 000035 000772 '005301 0OO77~' 311 31,2 001375 0OO77fl' 000205 HSKEEP: rST SHE crr IDS: 20$: 30$: eNE MOV ADO MOV CLR DEC SNE RTS RO,Rl ;N Y-IOS 'H~KPST-. RO 'HSKPEN-H~KPST/2.Rl (ROH Rl 20$ RS ;£XIT IN-LI.NE ;JSR ; ,!~ORD ...' J,:::l ~:Lb R5 AREPORT FL~D 317 3:8 31'3 320 32! 322 DOl ODD' D040b7 003120 323 OaH)O~' 0327'15 177770 3c:b jUNCOHDITI0NAlLY DO HSKP" ; OPS1~ SPEC I~Y EACH PASS HSj(,P7 ;Y N-3D$ ;SET UP FIRST WO AOR ;S£T UP I OF WORDS ;HSKP ALL NECESSARY AREAS RSH 10$ IHSKPEP,R2 30$ PC RO ;TCll REPORT RuUTINE 313 31"+ ":),1""" 32'+ 325 1 :: UNCONO. 00 HSt(P = PROG'S OPSW ~D£STROYS OD07~." oSIR:: CALL DO HSkP PER OPSW R5...~SKEEP 0 10m 1 ; . wuRD REPORT: JSR SIT 8ME no:r-~o' "''''' I•.! J. 001012 OCU012' 010700 OCl1 n...,l.·I.P Ob270(J 177&&2 ('lrl ; Oc'"'O • 012701 000012 OO]Q2lo+' 005720 OOlO2bt 001003 0010..1'1' UOSJOl C(ll032 , OO137'-f 00103'+' 000513 00311"1 8810~' '. 10'12' ~ 00l(Nl1' 0327(141 000002 OOlO5(P 001~3 ~~i MOV ADD .": 001052' .()()&+567 00312"+ OOIOSO' 177&06 0010&0' O!O700 177570 OOlObC t 27OO 000005 OOl0b6' 8Y127r: 001072' 005720 00107... , 001003 00107&' 005301 55: lOS: MOV lST I PC.RO ISYRD- •• RO .lO .... R1 (RO) lOS 8HE DEC SHE: Rl 5$ JSR MOV PCtSUPTAD SEQ OISCNT BR RIT 15R . WORD MOV AOD 20$: RJ SAYREG itl 7777b (f:(S ~ lOS MOV TST BNE DEC DVRE,: (R_)+ t R\of 12 R\of RStSTSTAT CS AT .... PC RO IISTAT-.,RO R1 .S6 (R )+ 30$ Rl S ./~ ,. r-t'l! ~ "'H..... F1AGWORD 8IT 15 = CMND MODE CALL BIT q = PROG STMNT CALL SIT 1:: 00 SiATUS REPORT SIT 0:: DO COUNTS REFOR1 ;SAVE REG'S RO - R5 ;DISPtAYING CNTS AT END OF ;PROG PASS' (Y.N-10Sl ;S£T UP AOR OFCNTS ;GET I or CNT WORDS ;THIS eMf WORD = C., ;Y (i-lOS j otCR WORD ern ;CK'EO ALL WOROSt (Y N-S$ .~o TO EXIT -- ALL CNTS AR£J'S ;~ET LIP PROG TBL ADR IN R3 : ...ET FLAGWORO ;GOING TO DO STATUS OISPlAv:> ~~ONS~~~N~TATUS REG'S ;5£T UP ADR OF REG'S AT ;LAST !NT :5£T UP • OF REG'S ;All REG'S = 0' :N,'r'-YO$ ""rc~ 3YS 3ib 347 3"18 3liq 350 .. 8 TCll/TUS& DEVICE ROUTINE FOR MPG r~:l SUPPORT ROUTINES ENTERED FROM MPG JOllOO' 001]7"+ CO II 02 ' 00 '112 OOllOY' - 7&7 001113' OOi.fSSl 00111 y t GOlUb' GD3Y37 00311b 003310 3Sb "..,," ., ",:::l ( 358 JSq ~I' 0 .;)0 :fbI CO,~ l!.fO' [,fa.1 -, 1 1~ L1:J' ,c:; :)03ttY,,+ ?"lOOO "'i t:::j 00 11 y~+ ' OQ"+5b7 0031'i& CO 11 SO , 17751 Y fl· i ,:'"2' .... ~7b7 003230 ~ 01 4"~ 001156' C1JCN02 ~~~ .,:. b5 :ibb 3b7 3bB 3bq 370 371 372 37'3 37'-+ 375 3~ 311 378 0011&... • C~27~ 0011 ~o: QQ I "+31 00 .. ,2 i.Ji2?OO t 00117i) , 01£1701 881200' rb?7~ . 120l.J' ~ln~. 383 001230' ~ DC 1JO'+ ' C03545 00 1JOb ' OC35bD 3% 001310' 003575 3"11 001312' 00362L.1 398 001314' 003b~1 3qq 00131b' 003bb' ui'"tC "-,.. ' 003152 002050 081 ;)~o: 005725 0 1~(2 ~20S ~~ 001300' OOJS12 393 00 1302' 003520 3qs 0031&2 OO12bO' 0033Jb 00127.. • 003Y70 001 27f;. , OOi.'17e i.l5S: 8R JSR J5" • WORD iJORD ... JSR WORD JSR 8R \,J¥ ADD ADD RP~lP: MGoI JSR MOV JSR RPTBA5: .WORD JSR ~I OLIv n T~'" OtC OOl~O' ~ 88f~: b646b~ 3ab ~ 388 38<:1 390 ~c:,~ ,,+0$: CISCNT: JSR DISCT1: eiT ~~;1 000012~ , 0030~2 177&;7& 001206' 062702 OOOOb6 000012 ["l01::>12' 002702 &11216' 001222' 17bfl2b 00122'-+' 0012~ • 002702 001232' oa12~2' . WORD 000001 V.4,~. 3?q D01?i~' oo-t5b7 390 00 1250' 0Cl3"+ 3'i 381 3012S2 , 000221 382 OOl2SIot' 00'-+5b7 jg~RO • i.'~,; 3S2 001 lbO' OOY707 J&3 . WORD 001120' 88~~~, 003172 :77520 352 00112"+' JS] COl.2b' 000"+02 35'1 081130' ODY7&7 003072 ~SS G0113Y· 00'15b7 003272 35! 30$: BNE SR JSR JSR J01 MACY 11 27( 73;:1) 2Lf-SEP-7& 111: 00 PAGE 'i-I 20$ YO$ PC.DI5UNM RS PRINT ATtMSG-. ~~t' DISPST IS AT-. 'iSS PC,DISUNM ~aA~~a~~ IJ. RStl'lSPST CS AT-. PC PRTIWD OISCn PC,OISUNM /itl R'i RPtENO .10, ,RD P , ,- o· , \,..,1"';' IBYR, D-. FIt PC R2 ' .R£PTBl-. J.. R2 (R2 ~ +I,RPTI:jAS R01SAvREG (R J RO ~~x~eINASC RD~RESREG ~Rl J+ RG RPTLP RStPRINT eN SMG- . CNTSEN-CNTSMG RS.PRINT RENDMG- . -13 ROJ.,R£5REG 8M£ JSR . WORS .WOR RPTENO: JSR . WORD . WORD DVREX: JSR TST RiS RS REPT8L: . WORD . WORD . WORD . WORD . WORD . WORD . WORD . WORD . WORD . WORD SCMRD-RPTSAS BCMRD+&-RPT,BAS BCMWR-RPTSHS BCMWR+b-RPTBAS CMOCRO-RPTBAS CMOCWR-RPT9AS CMOCr1S-RPT~S crfTERRM ~PTSAS CNTDER-RPT8f:iS CNTINT-RPT8AS (R::,)+ -DISPLAY CURR UNIT. ;ISSUE 'AT LAST INT' MSG ;GO DISPLAY STATUS AT LAST INT ;CONTINUE DISPLAY ·QISPLAY CURR UNIT. ;ISSUE 'CURRENTLY~ MSG ;GO DISPLAY CURRENT STATUS :GO DISPLAY INFO WORDS ;CH£CK FOR COUNTS DISPLAY ;OISPLAY CURR UNIT • .DISPLAY COUNTS" ;Y N-RPTEND ;stT UP • OF WORDS ;5ET UP ADR OF CHTS ;5ET UP TBL ADR :MOV MSG AOR TO SIR INKH(;E 'SAVE ALL REG'S ;GET CURRENT COUNT ;CONVERT IT TO ASCII ;RESTORE REG'S ;P8INT AT NXT CHT ;0 HE ALL WORDS? iY N-RPTLP ;G6 ISSUE COUNTS MSG jISSUE "END OF REPORT"' MSG ;RESTORE REGISTERS ;SET UP RETURN POINT ;EXIT IN-LINE SEQ C3E:.2 ! KOI TTCA-S TG .. liTUSb DEVICE ROUTINE FOR MPG I1ACYll 27(732) 2'1-SEP-7& lL+:OO PAGE '1-2 Tell SUPPORT ROUTINES ENTERED FROM MPG M~INO£C-: DTTC~B.Fi; 4 i"'lt ,-...,1'40- : TIMEOUT ERROR ROUTINE YOy ;JSR RS,TOUTER '..\85 liDo 001320' 0052b7 177'37& TOUTER: INC rOECNT liD!' r'013~\1 ' 02£,727 177372 000007 CMP TOE~NT.17 TOUTEX BriE "+08 OQ13,?2' 001031 liOq OO133l.1' t(I~ab7 0025&'1 JSR RO.SAVRfG JSR PC~SUPTAO 'HO 001 3i.iO , O{J-f7&7 002012 y . "i 00131..?1i' OOI.fS&7 002&32 JSR R5 t STSTAT . WORD CS AT-. "H2. OQ135O' li"731i.f JSR Y13 001352' OO"t5b7 ~!j251b ~8iTVECT "+1'4 00135&' O()(P-t{); SR 415 D013&O~ 11271~ 000011 Move Illt/RY) L .. t.. PC INTV JSR OOl3b~' ClO'i7&7 ~bO .. '" I'·,l IDS: eIC IWt'1IOT 'R3) OOl370' ~2713 000010 JSR RS ERRCS1 '''dB OOlJN' 00'+5&7 001&71+ 111<3 OOl'iOCP 00'553 ,wORO roto--ERM8AS . WORD 1'1. 'i20 88P)~' JSR '121 1'i P ~~ 002530 f~~RESREG ( .) + RS MOV '122 881'+10' OJ2bOS ;CUPGtR 'i23 JMP 1'412' 000ln 17b'i32 TourEx: RTS l.f2l.t 001Y11)' 000205 RS 4"1:) ,'-''''' ~O3 ~e' ~ ~ rl..t .... I.J::>S ..... 112b l.f27 1.f2B "+2<3 'i30 L.t31 1.f32 'i33 '+3'1 1.t3S '136 "'137 l.T38 , ,. SiR CALL ;IHCR I OF TIMEOUTS THAT OCCURRED ;THIS SEVENTH TIMEOUT IN A ROW? ;Y N-TOUTEX ;sAvr: ALL REGISTERS ;SET UP TeCM : PROG TBl ADR'S ;STORE CURRENT STATUS jCK IF' I HAVE VECTOR CONTRJL ~8R IF I DON'T :RESET INT ENABLE &STOP THE TAPE ;RESE7 THE INTERRiJPT VECTOR ;RESET WAITING FOR I/O flAG jISSUE TIMEOUT ERROR MSG -RESTORE REGISTERS ;REMOVE RETURN ADR JCO TO ERROR EXIT ;EXIT IN-LINE ;I<ILL USER PROGRAM ROUTINE ;JSR R5 KILL SIR CALL :R3 MUST CONTAIN PROG TBl AOR j DESTROYS RO, Rl ·"K IF I HAVE VECTOR CONTROL KILL: JSR 001'+20' 00"+567 0021.f50 R5c.TVECT BR OOll.t2'+' 000'+07 Kl LEX ~BR IF I DON'T MOV ;GET DEV REG AOR 00.'''12&' 01b701 17&372 DR£GAD~Rl oo1'i32 , 1127&1 000011 COOO02 Move ;RESET INT ENABLE &STOP THE TAPE 1l1~2( 1) JSR 001&,+'10' OOLf7&7 002'1011 PC, 1NTV ;RESET INT VECTOR INFO 001'i'1'i' 000205 KILLEX: RTS RS ,;EXIT IN-LINE 5E:~ 03&3 LOl ,MAINDEC-ll-DTTCA-B Tell/TUSE> DEVICE ROUTINE FOR MPG MACYll 27(732) 21i ... SEP-7& 1L.t:OO PAGE 5 : DTTCAB.Pll Tell FUNCTIOt-l ROUTINES oS8TTL TCII FUNCTION ROUTIriES ; "WAIT" FUNCTION ROUTINE : JSR OOlY"tb' 0"+27&7 100000 17&32& WAIT: OOL.t7&7 00150& 88f~ga: 88d~B~ 0023bL.t 001 L.t5L.t ~ 812 JSR ~~~ RS, WS.UT 1100000J,.DFLGWD PC,CKOa~Y k~·RINTV ; "NOWAlr FUi~CTION ROUTINE ;JSR Rs,NOWAIT FUNCTION CALL ;RESET THE "NOWAlT" FLAG ;WAIT IF BUSY &DO TERMINATION jRESET THE INTERRUPT VECTOR ;EXIT IN-LINE t OOlL.tC&' 0527b7 100000 17&300 NOWA!T: 8IS OOlL.t7'i' 000205 FUNCEX: F,'7'S #lOOOOO,DFL~WD Rs OOl'17&~ 01.f27&7 OOL.tOOO 17&27& FWD: 00150"+' 000205 ; "FWO" FUNCTION ROUTINE ;J5R RS,FWu BIC IL.tOOO.OFLGWO RTS R5 0015Ob' 0527&7 00"+000 001 51 L.t, 000205 ; "REV" FUNCTION ROUTINE ;JSR R5,REV aIS .L.tOOO,OFLGWO RTS RS 00151S' 012701 001522' 012702 00152&' OOi.f7&f 0015.12' 0052&7 00153&' 010700 0015'10' 0&2700 OOlsi1L.t' OOOL.tSb 000105 000011 001"+3Y 177150 1771L.tO 17£,2&0 REV: READ! RDCOM: j"REAO" FUNCTION ROUTINE ;JSR R5 AREAD : . WORD AOt'( ; . WORD AOR ',.WORD CNT ;. WORD DEV MOV II05,Rl MOV lOll R2 JSR PCcCKOaSY RO NT INC MOv PC RO ADD '8YRD+2-.,RO CMDCOM 8R FUNCTION CALL ;5ET THE "NOWAIT" FLAG ;EXIT IN-LINE FUNCTIOH CALL ;RESET THE REVERSE FLAG ; EXIT IN-LINE FliNCTION CALL :SET THE REVERSE FLAG : EXIT IN-LIHE FUNCTION CALL DATA ADDRESS (BITS IS 5 I7J OATA ADDRESS (SITS 0 - 15) 8YTE COUNT (NOT USED) ;SET UP rtEAD CI'1ND CODE ;SET UP READ FLAG WORD ;GO CK IF DEV IS BUSY :AOD 1 TO READ CMND eN: ;SET UP ADR OF BYTES READ CNT :GO TO CMND COMMON PROCESSING SEQ 03b"f MAINOEC-ll-OTTCA-8 Tell /TUSe DEVICE ROUTINE: FOR MPG OTTCH8.Pll Tell FUNCTION ROUTINES ~':'J'1 : J~R i.i':lS Y'jb 4SL1 500 5Ql 00154&' 012701 502 001 S52 ~ 012102 -f"l3 OOlS5&t 00;7&7 ::,:... 504 001562' 0052b7 S05 0015&b' 010700 SOb 001570' ~700 0015?tf' 000*1'i2 000115 000011 00l~0'1 177122 WRITE: WRCOM: 17711"+ .$.. 512 :11.3 '4, ~.i. 515 SIb 00157£" 012701 000103 001&02' 012702 000102 518 001&0&' 0007117 51'3 520 RDNUM: '-1'" :::l .. i 521 522 523 S?1 "'"521: .:;1 52b 527 001&10' 012701 000007 528 001&1'"+' 012702 000232 52q 001&20' 0007~2 530 l~:OO PAGE 5-1 IUS.Rl IOIIR2 PCtCKDBSY WR NT PC RO .ahUH2-. , RO eMDCOM MOY MOV BR II03,Rl U02.R2 RDCOM rUNC1ION CALL DATA ADDRESS (BITS 1& & 17) DATA ADDRESS (8ITS 0 - 15) BYTE COUNT (NOT USED) ;SET UP WRITE eMMO CODE ; SET UP CHNO FLAG WORD ~GO CK IF O£V IS BUSY ! ADO 1 TO WRITE CMNO OH ; SET UP ADR OF BYTES WRITTEN eNT ;GO TO eMND COMMON PROCESSING FUNC Tl ON CALL DATA ADDRESS BYTE COUNT ;5£T UP RONUM CMND CODE . SET UP CMND FLAG ~~ORO ;GO TO COMMON READ PROCESSIN~ ;"RDALL" FUNCTION ROUTINE ; JSR . . RS ... RDALL ; . WORD AOI'< ; . WORD CNT ROALL: ..,' 5,.;. 532 533 53"i 535 536 537 S38 001622' 012701 000017 53QOOl&2&' 012702 000032 5~O DOlb32' 000751 MOV MOV JSR INC MOV ADD BR : "RDNUM" FliNCTION ROUTINE ;J:;R RS RDNUM ; . WORD ADR ; . WORD CNT 510 S i .r..1 ~. RS",WRITE wJRD ADI'< : • WORD ADR i . WORD CNT i . WORD DEV j • 4C37 "+'38 508 50q 2~-SEP-7b j"WRITE" FUNCTION ROUTINE ''ig3 507 MOl NACYI1 27(732) WRAlL: MOV MOV BR ::007, Rl .232L R2 RDCOf'l ;"WRnl'» FUNCTION ROUTINE ;JSR RS",WRALl ; •WORD AOI'< ; . WORD eriT MOV ,C1i,Rl MO"; .032. R2 BR WRCOM FUiiCTION CALL. DATA ADDRESS BYTE COUNT ;5£T UP ROALL eMND CODE :SET UP eMNO FLAG WORD ~GO TO COMMON READ PROCESSI~G FUNCTION CA:"'L BYTE' COUNT SET UP WAALL. CMND CODE SET UP CMN(; FLAG WORD GO TO COMMO~ WRITE PRGC~SSING DATA ADDRESS SEQ 03&5 Tell/rUSe DEVICE ROUTINE FOR MPG Tell FUNCTION ROUTiNES ~AI~OEC-II-DTTCA-8 DTTCAB.Pll NOl MACYll 27(732) 2~-5EP-7& l~:OO PAGE 5-2 ; "WRT"," FUr.;CT ION ROUTINE .: JSP .WOR8 ; .WOR I OOlb3~' 012701 0010'10' 0127C2 OOlf:LfY' 0007'1'i 000013 000022 DOlbY£:' 0127:)1 001&52' 012702 aOOll1 0000411 001&5&' OO~7b7 001304 DOlbb2' 0052&7 17702"1 p 00l&bb' DOOltOS WRTM.: MOV NOV BR STjP: '1rSCOM: MOV Mev JSR INC BR RS J.. WRTM AO~ eNT .013.Rl 'O~21.R2 WRCOr. FUNcno~ ROuTINE ;JSR R5,STOP FUNCTION CALL DAT. A ADDRESS 9YTE COUNT ;5E1 UP WRTM eMNO COOt 'SET UP CMHO FLAG WORD ;GO TO COMMOI'1 WRITE PROCESSING 111 L PI .D"IL.f'R2 PC:KDBSY MISCH! CMOCOM ;"STPAll" tUNCTION ROU~INE FUNCTION CAL .. 001&70' 012701 OaDlr! 001&7"1' 012702 OOOO~4 Da1700~ a007ot) STPALl: "'!OV MOV 8R ilO1. HI flD4~",R2 MISCv~ ~:Ni.,I"\((D;~':H9. P -D~;CA-8 TCll.'TUSc OEvICE ROUTINE FOR MPG REVISION HISTOR~' COl 211-SEP-7£, 111:00 PAGE 2 P1ACYll 27(732) •sarTL RE~ISION DEC 7S ¥~~~~u2iriAtJ~ ~~~A~~:rE IN O~TAL FOR HISTORY ~PR 7& OTTCA-t1 RELEASE DEC is HADE CHANGES REQUIRED FOR IHE MEMORY MANHGE~ENT ~ERS I ON OF MPG. PUG 7S OTTCA-A INITIAIL RELEASE C02 21i-SEP-7e l'i:OO PAGE MACYll 27{732} eIT 17&&00 SEQ 17bbSO MOV 3LK"IN8LKN 001101 eM? alO5 JSR BLK,i577. MOV 30$: 000001 17Sb7b 1757P+ 000011 175bIiO 50S: 17&SbIof 17o~ 1l0,R2 50S •W'JRO •WORD INC ~ov DEC JMP ele CLR aIr 000020 BNE CLR CLR 175610 SIS 815 MOve TST 8tU JSR IIO.:s,Rl 50S s-~ : "HIS '+ BlK SEARCH TYPE OF C~? ;Y N-SOI ; INITIALIZE BLI( I FOR SEARCH 5/Ff ; SET UP "RONiM" CP1NO COO£ ; ! S BLOCk • vAl IO? 'N 1-50S RS.ERRCS rNVeKN-ERttBAS ; RtpORT I NV BLK • ERFOR EAAoH ; SET HE ERROR INOICATQP ; REMOVE THf LAOOED TO Q€V ERR C~7 REi/biT ; RESET Ttl: ERROR F'i..ACS : RESET TAPE REVERSAL CNT '3. DATHER III ERR 6lCUPClER IU DFLGWO 120,RZ PTOCNT(R3) Toe:CNT 12 DFLGWD IwtlofIOT, (R3) NOthNT Rl, (R'i) OFL.QI,() WTHOT R5,~IOBSV PC,PROCT11 ~ADO .. TO OATA ERR eNT 1 ;GO TO r9G ERJo( RETN POINI ;NON-INTERRUPT SERVICING? ; NJ,Y-NONINT ; 1I1ITI~IZE TIMEOUT CWirER ; RES£T • Of TIJlllEOUTS ; SET TI£ "PROCESS TERPHNATIOtf" F;..;'C. ;5£T ~ITING FOR I/O TERf1 c'L. A~ : ! SSl£ Tr£ elM) '-MOWAIT- SIr SET' !N Y-wTNOi ;WA!T FOR 1/0 ro COMPLETE CMOEND: JSi< CI1)£X: Rrs RS ;~ PROCESS ~ iRf1INATIOH :EXIT IN-LINE TO USER PROc~ wTNOT: 'WTI1IOT. (f~3) CMOEX ; GO TO EXIT BIC SR ;R~SET WAITING FOR 1/0 TERM . M.,,\ l~ I •N~'Yr: ,'" .., ... " :-:'';''''C~-8 : OTT:~.P " 002 2"i ..S£P-7Ei lY:CO PAGE & T~l.i,'TUSc DEVICE ROUTINE FOR t1PG HACYll 27(732} "ell NON-INTERRUPT COMMANO " OATA SERVICING .S8TTL '." . ()~,l b.b2 bSJ b.S~ NOHINT: B...,·,,,,,'" MOve BIT aFQ rST ~ lOS: 000100 on0010 8Fl '70~ (R'i) .:05 a3.Rl BR 2S~ 8N : lOS PC}..NINTSU SIT 17&'+'+2 .LOO FU Ilu,R2 RJJ,(~"+) MOV JSR 000010 rell NON-INTER~JPT COMMAND &DATA SERVICING J~~ .j.:" S""' 8EQ PC",S£ARCH 110. CIJRFLG 12uO,R2 50$ ;R~SET INT EHABLE IN CMHO ; I :.5UE RONU'lIWRTM CMNO ; 8LK SEARCH TYPE OF' CMNO" :Y.N-7OS ;R£AOY SET? ;Y N-IQlS ;str UP RONUM CMND CODE ; GO SEARCH FOR BLK • ERROR ., (N Y-2SS) ; FOUND THE ~Lj(? .y f'i-1OS ;GO SET-UP REGISTERS i "RDALL" C~D? : 1'. ti-SOS ; .oRDALL" SERVIC!NG 205: ~-TB .:" , BPL TST 8MI MOV SIC ~OV INC B£Q MOV :NC aNt: SR 175'130 255: 30$: ;;os: JSR SIS ~ov MOV 201 PC.NINTSU *1.DFlGWO Rl.FINCNT RL2(~j ~~ ~fJ~~~ iSlB BPL 50$ TST BMI MOV BIC 'R;:-noy ~r.""? • • """"n ~J1I,.., i ;Y N-COS ;ERROR BIT SET? ;H y-JOS '~2(R'1) R2 ;G£r TeST REG WITY erTS IS ! 17 1177774 f R2 ;RESET OTHER BITS Re, (Ra)+ jSTORE WORD WITH BITS 1& & 17 Rl : DECR NEG WORD ern YOS ; OfT :: 0" (N Y-'+OS) :R3), (RO)+ -STORE SITS 0-15 FROM TeDT ; DEeR NEG WORD CNT Ri ;CNT :: 0' (Y,N-2O$) 2DS "fOS ;GO TO TERMlNA!ION ; riO~- p,T CI'!iO TERMINATION tRY) 305 MOv JSR • WORO TST Move JSR Bf< SuS: '. R'1) RO,'1(R'1) R5+STSTAT ISdn- . (R3) Cn.uEND ;"WRALL" SERVICING ~R"') (R'1) 305 (RD)+ R2 ........... 4 u R2 • ~I'I(('. ;5£1 UP CORRECT REG VALUES :STORE FINAl WORD CNT ;MOVE FI~ CNT TO TCWC ;MOVE FINAl sus AOR TO TeBA ;STORE AlL ST~TUS REGISTERS i KNOCK DOWN READY IF STILL UP :S£T THE -ERROR- FLAG ~ A~~%~S~2b~ ¥~ HOR ; GO PROCESS TERMINATION ~ EXI:;R£ADY SET? ;Y N-50$ : E~ROR 8 IT SE T" ;N Y-305 ;GET WORD WITH SITS lS ~ 17 ;RESET OTHER arrs E02 2~""SEP-7e, 11.f:OO PAGE: e,-1 l'1AINDEC- 1-[:r7CA-8 Tell/TUSb DEVICE ROUTINE FOR. MPG MHCYll 27(732) DTTCAB.P ~ 7C11 tiON-INTERi:WPT cOt~'1AHO & ~TA SERVICING 715 7' 1b OQ,>+2b' Gl02E;;>; OG.:""'4..j 32 • 005201 177770 ~!~~: B?~?~ flg 720 :'21 722 7'~:3 7~ ~~qQ' ~1.f2' 002\.f~I.f' 0327:'11 0021152' DOlitY 0021.f5Y· 00073[, R2, -2(R~) R1 INC 8IT Rl SOS 11000. -2{R~) ~~e 005201 OOl3b2 MOV I HC 001000 17777& bOS: BriE BEQ SR 725 .,.:,~ 00003"+ , ...... l 729 72<3 730 70$: 80$: 73,; 732 733 7J1i 735 000310 738 739 7&.fO 7'+1 71.f2 7118 ~1$ BEQ 'IDS INC Rl qOS: 100S: 00251£,' OlbL.iOO 002S22' OH;uOl ~' OlCN03 002530 1 Ob2703 002S~' 000207 0000011 000002 GOODOe, (RO H. (R3) BR 80$ DEC R2 1DOS YOS MOV SHE BR N3 7..,g 80$ ( RI.f I MOV 7~ 7'+5 1 I .• "'5 (R4) I=IMT -eNT = 0' (M Y-DOS) ;MOVE SITS O!lS WORD TO TCDT JDEeR NEG WORD eNT -eNT = O? (Y N-SOS) ;DATA MISSED' SET YET? ;Y N-bOS SERVICING Pi'" w"N""'SU ,,,,I1.!. I TSTB BFL ; DEeR NEG WORD CNT iG6 TO TERMINATION JSR 1ST 737 7% 7'+7 e,OS \.fOS :"WRT~ ""'2S..,. N"4 ?~~)+, (R3) ;5£T BITS 1& & 17 INTO TeST .200. I R2 ;SET UP REGISTERS ;READY SET YET? :Y N-SO$ ;EAAOR arr SET? 'M Y-30! ;WMO CHT = 0' ;N Y-90S ;M6Vi DATA WORD TO TCDT ;OECI'< NEG WORD CNT ; GO w.-:l I T FOR NEXT WORD ; SET UP O€lAY CNT ; DELAY FEW HUNORED MICRC'SEC 5 ;GO TO TERMINATION ; NON'~ INT REGISTER SETUP SiR 'HR~) ,RO NI~7SU: MDV 2 i R'1} R1 MOV MOV PI.f.R3 ADD lo.R3 RTS PC I ;MOVE BUS ADR TO RO ; "OVE NEG WORD CN; TO Rl ;5ET UP TeDT AD~ IN R3 ;EXIT IN-L !N£ SE":I 0370 F02 MHC Y11 27 ( 732) 2,{-SEr .. 7& 1l.f: 00 PAGE 7 .S8TTL OOLf067 17b1 52S7 001 l.tfb7 LiO'i ..,. 88 ~ { l{ Ii 01&702 , TCINT: Q013~ ~~Pl 72' 01270, 7'b' 00i7& 002b02' 000l.f03 001 Li2Li 17011.f~ 000010 8fT 103 888130 MOV atQ Q02bO"i' tlOO"1% 55: 002bl.lb' 00571t.t OO2blO' 1(){)()Ob 002&12' 0527b7 OOOOO! J02b20' :127Pi 000011 002£.2"+ • 0001131 Cl02b2&' 032702 002&.32' OOlli21 OQ2b3'1' 01&"+01 1751&2 OOOlJO '1"5 •• .l.W 205: 305: OOOOOb 002&'+0' D1b'tOO OOOOtM 0026'fi' 00;777 175230 002b50' 000301 002&52' 001777 175222 002&5b' 0100&"+ OOOOQt4 f.Xl2bb2' 0052b"+ 000002 00270'+ • (N27l Li 002710' 01&%7 00271&' QLf2713 002722' OO~O&7 0027?b' 000177 001212 1751"+2 PC.SUPTAQ RSt5TSTAT IS RT-. CURFLG,R2 'lO,RE 55 1103 Rl i8~stARCH bOS 0(11) 30$ I1,DFLGWO .0..1, (FN) 50$ BR ;"RONUNr USER CMND INi BIT SEQ MO~ MOV JSR SWAB JSR MOV INC SEQ "0$: ooooLiO 000100 000002 000010 J5R 8R 8R iST BPL 8IS MOVe R.OtSAVREG IN CNT 17&022 50$: ~O$: 8IT SEQ BIC MOV SIC JSR JM? \'t.lvE A~L REGISTERS .; ~oo 1 10 INTERRUPT CNT ;5ET UP ?ROG TSL &TceM ADR'S ;sTORE ALL DEV REG'S JGET THIS CMNQ'S FLGWO i IN BlOCK SEARCH MODE" ;Y H-SS ;str UP RONUM WITH INT ENABLE iCO SEARCH FOR SPECIFIED au;:; ;ERROR ON SEAPCH? ("',Y-IO$) ;GO TO INT EXIT ; IS THERE AN ERr: CONDITION? .y N-3O$ ;Sti THE ERROR FLAG ;STOP TAPE &RESET INT ENA8LE ;GO T~ CMND TERMINATION 1l00,R2 ;OOING A USER "RONUM- CMND' SCRI.f) ,Rl ~H RI.f) RD ;GET au( • READ ,0$ PC,GlPUTBYT Rl PC,;JPUT8YT RO,&. ,of( R'i) 2(K"') 205 MOva 1103, (RI.f) bOS 8R ;f"rNAL IHTERRUPT PROCESSING 00175"+ 002&70' 11271"+ 000103 0CJ2EI7'-f ' eWU2 1)Q2bbb' :J02b7&' 03.2702 002702' 00 1711& JSR INC J5R JSR • WORD MOV 11 INTERRUPT SERVICE ROUTINE .1f0 , R2 205 .100 (RI.f) 2(RI.f~6FINCNT .WTYI T~(R3) ~R NINT ROtRESR~G ;Y !"i-IfOi ; GET CURRENT OATH AOR ;HAVE MPG STORE 1 BYTE ; SET UP FOR 2NO BYTE -STORE IT TOO ; STORE fiEW DATA AOR ; DEeR NEG WORD CNT ; CNT = OlJ..N.J1-205) ; ISSUE "I'(unun-- CMND AGA!N ;GO TO INTERRUPT EXIT ; ISSUE "STOP'· CMNO AT FINAL INT" 'N Y-205 ;R£SET INT ENABLE ;STORE FINAL WORD COUNT ; RESET wAITING FOR I/O TERM ; RESTORE ALL REGISTERS ;EXIT FROM INTERRUPT SE~ 0371 : MAP1DEC- I-DTTCA-8 TeU ,'TUSS DEVICE ROUTINE FOR MPG . DTTC:A3. P 1 TC 11 SEARCH FOR OECTAPE BLOCK SIR G02 :1ACYll 27(732) 2~-SEP-7o l~:OO PAGE 8 .SBTTL Tell SEARCH FOR DECTAPE BLOCK SIR ;SEARCH FOR SPECIFIED BLOCK ;jSR PC~EARCH ;BR LAt2t.L SIR CALL EXECUTEC IF AN ERROR ; Rl = RONUt1 CMNO WITH OR W/O HH ENABLE ;R3 = PROG TBL ADR jFN = TceM AOR ;DESTROVS RO,Rl 732' (", .;"..,{ .. ~~no 000035 60LOO SEARCH: MOVH 5WA SIS MOV 7lb002"'40' 050001 "" ~ f 0027112' 01b700 17 503& TST O~r-+b' 00571'+ 002750' 100"+75 002752' 0327&7 ..II, • ( """12"'00' 0010"+& OOLiOOO 8MI BIT 175022 8NE OCk~7b2' 02&1&7 00000& 1757'1& 002770' OOl~3n 002772' OO2'i21 bO$~ 002rn' 1&2700 000002 003000' f"l52701 ()(NOOO 0030(}l1' 8327ti.f OO~OOO 003010' 001012 OC'3012 , 00S2b7 17572'+ 70S: (((::01&' 02&727 175720 0000U6 003Q2it' 103'1:JL+ OQ302b' 0527b7 0030311' OOO'-lOS 000010 17'171.f& 80S: 'liJ3U3b' Ol00b7 175b7'1 gt:s· 0()3(M2' 0101111 .... . ~' Ob271& 000002 88S: 0Cl3050' 000Z01 '30S: 003052' 032711.1 Wtooo 0Cl.305b1 00lJ11f> 955: 0030&0' 10S0Dl 003lb2' 15&701 175&4& 003CIbb' ~2707 oonOl0 175&34 00307"4 • 0007&2 00307S' 052701 02&l.fb7 OO~l .........to' 001411 OO~112' 003351 DO 114' 0"12701 Ofi112O' 0&2700 v-.. OO-:'~4' ..... 03271Y 003102' ~ ' 004000 000006 0011000 000002 OOliOOO 175£:.2& 100$: 102$: eMP SEQ BLT SUB 815 BIT 8"fE INC CMP BlO 8R MOV 815 MOV ADO RTS BIT 8N£ ClRS 8158 SIC BR SIS CNP SEQ 8GT BIC ;100 Bli PCURDV(R3),RO RO ;G£T CURR DEli ,. ;ALIG!~ DEli # 8ITS RO Rl ;5ET DEV # INTO CMNO 8lK.RO ;GET DESIRED 8LOCK • i RI.f) ; RR. OR IT SET? 110S ; H Y- 11 OS IYOOO,DFlGWD ;OOING IrO'S IN REVERSE' 100S ;N,Y-I005 ;SEARCH FOR BlK FOR FWD I/O S(R"I ) , I NBlKN ;AT THE BLK WE'RE LOOKING FOR? 90$ ;N '1'-90$ 80$ :pAST THE BLOCK? {Y,N-80S1 12 RO ;SU8 2 FROM ORG BLK • Ii.fOOO,Rl ; 3ET REV BIT IN eMMD .~ooo, (RLi) ;AlR£AOY GOING REV? 80$ 'N Y-80S REVCNT ; r(tCR REVERSAL CHT REVCHT, IE> ;OO!'iE b DIRECTION REVERS~LS' 80$ ;Y !'i-80S 110 DFlGWD ;SET glK SRCH ERR FlG 98S' JGO T ERROR EXIT RO,INBlKH ;SAVE BLK • (ORG OR ADJUSTED] RI. (RI.f) ; ISSUE DEC TAPE CMNO .2. (SP) ~ SET UP NORMAL RET ADR PC ; EXIT IN-lINE 14000, (RL.f) ;ARE WE GOING FWO? &0$ ;Y,N-bOS RI ;ClEAR CMMO CODE FIELD ;S£T IN REQUESTED eNND CODE CURCMBkRl 110,C FLG ;RESET BlK SEARCH MODE FLAG 85$ ;GO ISSUE eNND ;S£ARCH FOR BlK FOR REV I/O £. , .. ItliOOO.Rl b(RY),IN8lKN 105$ 80$ II.fOOO.Rl 12 RO .IiDOO. (RY) .8, ; HiITIALIZE TO REV DIRECTION ;THIS THE BLOCK WE WANP :N V-lOSS ;IN FRONT OF THE BlK? (Y,N-SO)} ;5ET DIR TO FWD ;AllOW FOR TURN AROUND :ALREAOY GOING FWD? TCll/l'US& DEVICE ROUiINE FOR MPG Tell SEARCH FOR DECTAPE BLOCK SIR MAHiDEC-ll-DTTCA-8 OTTCAB.Pll 853 003130' 0017...2 85-+ 003132' 000727 855 0031~' 03271"+ SSe 0031"10' 0013';7 eS7 0031'12' oo07£:,'1 958 esC] 0031Lf'1' 0057Sl.,i 9&0 003150· 100337 8S1 003152' 03271"+ 8£:,2 oo31Sb' 001315 8£:'3 0031&0' 052701 BS'" 003 :S,"+' 000712 00'1000 17777£:, 004000 00'1000 105!: 110$: H02 MACYl1 27(732) SEQ 8R 30$ 70$ BR 95$ 102$ -2(R'1) SIT BHE TST 8IT SriE SIS SR 8PL '!ioao, (R"i ) 88$ ''1000. (R4) 70$ '!iOOO,Rl 70$ 2'1-SEP"'7& 1'1:00 PAGE 8-1 ; N '(-80$ ;G6 CK REVERSAL eNT ;ARE WE GOING REV? ;N y-gS$ ; G6 STORE ADJUSTED BU( • jENO ZONE? :Y N-98$ ;GOINGREV? ~N Y-70S ;stT DIRECTION TO REV ;GO CK REVERSAL C~T S£(j 0373 : MAINDEC-Il-DTrCA-B . DTTCA8. P11 8SS TCllTUSo DEVICE ROUTINE FOR MPG SUBROUTINES FOR Tell FUNCTION ROUTINES . S8TT'. SU8ROUTINES F'OR TCll FUNCTION ROUTINES 8b/ 868 as" 87.J . C,'''' ~ 'a~2 .a~3 3-'~ .~i"'''- :l ~ I02 MACYll 27(732) 2'1-SEP-7c 1'1:00 PAGE (j ::;; ....... ,.. :::L b ~r"" 000704 S'~"9 -' 000100 17"+0'12 000002 171.fSoo 0CI02'i& 17'1570 000012 1NS72 000000 17'+£>22 1754"+0 DOOO()L+ ;CHECK IF DEVICE IS aUSY AHD WAIT IF' IT IS SIR CALL ;JSR PC.CKDBSY ;DESTROYS RO,R3.R4 ; ON EXIT: ;R3 = PROG TBl ADR ;Ri1 = TCCM ADR CI<DBSY: JSR PC SUPTAD ;5£T UP PROG TaL & TCC~ ADR'S 81'T I n~. u60 {R4) ;INT ~NABLE ON? ,.",... 20$ , BEQ ;Y N-c.OS J5R RS,3.~CIOBSY ;R£LEASE CONTROL 8R 10~ ;GO CK AGAIN arr 20$: ;HAYE TO PROCESS PREY TERMINATION'? '2,.,DF'lGWD .y N-305 BEQ 30~ JSR PC,.,PROCiM ;G6 PROCESS TERMINATION 10") SR ;GO RECHECK IHT ENABLE MOV 30$: !VCTAO~I.fOS 'STORE INT VECTOR AOR MOV PSWD 'b$ :STORE PROC STATUS WORD JSR RS.QI~ETVEC ;GO SET UP THE VECTOR "+OS: . WORD XXXX : INT VECTOR AOR XXXX 1.f55: • WORD ; P~ . WORD TCnn- . j REL INT ROUT AOR MOV RS,ERRADR :SAVE CURR USER STMNT ADR 1'1,ERRADR SUB PC RTS ; EXIT IN-LINE 175""+0 J, :ERROR INFORMATION DISPLAY SIR ;JSR R5,Lt'<RCS ;JSR R5 ERRIS ; . WORD MSGAOR-ERMBAS ; . WORD MSGCNT jDESTROVS RD,Rl,R2 r''"'32.L -=-. !'V'O''''C.~··'''f· f...,,;:,. 000710 ERRCS: JSR 003272' 175372 . wORD §~t~+~~AT ICSTAT-ERSTAO,ERSTAO 1752&2 000100 ERRCSl: MOV 0G327~' 0127&7 ERRCON SR 003...102 ' 00Cl'103 IISTAT-ERSTAO,ERSTAO 00330-+' 0127&7 175250 000070 ERRIS: MOV (RS)+,ERft3AS ERRCOM: MOV 003312' 0l2S.&7 00003"+ MOV :>:'",(331 b 0125&7 000032 ( RS H t ERMBAS+2 INC ERRCN 003322' 0Q52t;7 1753bc I?RONER,POPSW(R3l BIT 00332&'lJ327e3 020000 000002 BNE t:RREX ~:8?~~~ Roi,-(SP) MOV RY CLR 0033'+u' OOSOOi PC,DISUNM JSR 0033'+2' ClO'+7&7 aOOf:lf:lO JSR R5.PRINT 0033%' 00'15&7 0010co ERM8AS: .WORD x>:xx 003352' 000000 . WORD xxx x 003354' 000000 ~~fJ "! ~fw 'eX) f 5/K CAll FOR CURR STATUS SIR CALL FO~ INT STATUS REL ADR OF ERROR MSG • OF BYTES IN ERROR MGG ;STOR£ CURR STATUS ;5TOR£ ADR OF CURR STATUS ;00 TO COMMON POINT ;STORE ADR OF LAST INT STHTUS ;STORE MSG ADR ;STORE MSG CNT ;ADO 1 TO ERROR eNT jERROR PRINTING INHIBITED' 'N Y-ERREX !SAVE R'+ ;SET USER MODE PRINT FLAG ;OISPLAY UNIT. ;PR!NT ERROR MSG SPECIFIED J02 TCll/TU5fl DEVICE ROUTINE FOR MPG MACYll 27( 732) 211-SEp··7b 14: 00 PAGE "-1 DTlCA8.P SUBROUTINES FOP TCll FUNCTION ROUTINES OQJ3Sb' 02b71:?l 177770 001701 CMP ; INVALID UNIT It ERROR? ERMBAS,IINVDVN-ERf'l8AS I'1AINDEC- TCH~B (.103:36'"+' 1777&0 OOJ3?'b' DOi.fSb7 003402' D ..00000 'Ii <Ol.f' Q(N7bi' la' 01E>386 003'11 '1' 111001 OOJl-t.i b t 025067 D03'1Cf i 001'102 Q03I.f2b' abOlOD 000711.t 7'"' ~h! 4b3 001713 175300 005720 ~~: ~f8i OW-&f'12' OfJiS77 0034bQ' 003'1&2' 0034&Lt' 003Ltb&' IDS: ;OiSPLAY STATUS REG'S 001511& 17'H 1'of eM? SR TST S86 JSR ~~~ 001534 00 15Iii 1777&2 012&04 000205 MOVB SEQ ADO 20S: ~~: &Wsg~ ~~ R5,DISPST . WORD Rf'SKN: JSR RRSNM: MOV 0031130' 000771 GO~~32' JSR ~EQ ~RSTAO: 000,"70 000022 000004 ERRSNt'! ~~~~R' IINVSKN-ERMBAS ;N Y-ERRSNM I"MP. SEQ jJ01~1l oS ',' :"l::.?f. ":l'" ERREX: _WORD . WORD MOV RTS XXXX PC PRTIWO PS~C::T (R3) ,RC (RO) RI ~(RO~ .ERRADR 20$ . ~AH~~~~r:I~~OCK • ERROR? ~8t~P~~ 8~~R~~T~NTS 'SAvE STMNT LENGTH ;ERROR OCCUR ON THIS STMNT? ;N Y-2OS ;P6INT AT NXT STMNT Rl",RO ID~ (RO)+ pt Rl tStMNUM-. 1.RI R5 ~CAS\.. ~~~9NfTMHJM+~ STMNMG-. -PL (SF)+, R4 -GO CK NXT STMNT ;SET UP ADR Of'STMNT • DATA ;5£T UP DATA OUTPUT AOR ; CONVERT IT TO ASCI I jSET 2 lOW DIGITS TO SPACES ; ISSUE STMNT • MSG jRESTORE R4 RS i EXIT IN-LINE : PROCESS TERMINATION OF PREVIOUS I/O FWiCTION ;JSR PROCTM: JSR DCaY7Q' DOYOb7 000i30 aIC OOOO~ 17Y300 BIT 003502' 0327b7 OOOOU. 175220 00:1'+7'+' a.,27b7 OO::t51 0' 001010 I"'ri"x .. :"1. f'.:>' 0,lb ' r 7"") ~.;;,_ 1.Ii. 00351&' 010701 003522' 100001 8NE MOV 17S21Y 17521& MOV BPL 0032-+' 0051101 25: 00352b' IbOl00 00.:1530' 00b300 Q'13532' :11 (()b 7 00353b' 01b701 0035l.f2' Clb..'lJ 11 liY2&2 1751&4 OCi35!fti' OCSS'11 17"+23& 000010 17Y200 fi: 010102 012700 112722 005300 000023 OOOOLtD , Rl,RO RO RO SIZE CNtADR,R1 ~? ERR MOV ADD 10$: 2$ Rl MOV BIT SEQ 8H£ 003&Ob' Qb2701 OOlLt22 li.I,CURFLG S5 CURCNT RO FI/liCtiT'Rl RO~(Rl) -(r<l) BIT 8HE BIT OOOL.!OO 000002 RO.SAVREG #2, DFLGW[) AOC ADD 000001 003012' 003&14' 803&20' 003&2'"+' SUB ASL MOil 17"+2~b 003b02' 00107C OO3bQLI ' 010701 ..... MOV 003S't&' 0327b7 000001 003551.01 ' 00 1i.t 7& 003556' O!27h7 0035&'1' 0327S3 003572' OOlOb5 00357'" ' 0327&7 '~'~' N \.1 1 PC,PROCTM MOV MOV Mova DEC 11 i DFLGWD IOOERCK,POPSW(R3) 70S IlD,DF'LGWD ~8$Rl .COOFLD- .• R: Rl~R2· 11." RO .~D,~R2)+ RD SIR CALL ;SAVE ALL REGlS ;IHCR BYTE COUNT? ;Y N-5$ ; G~T HHTIAL WORD CNT ;GtT F"INAL WORD CNT jlS IT NEGATIVE? (Y,N-2$) -MAKE IT POSITIVE ; RESET PROCESS TERMINATION FLAG ;SUB REMAINING CNT FROM INITIAL C~T ;MAK£ IT A BYTE CNT ;STORE I OF SYTES ACTUAllY XFERREO ;GET ADR Of BYTE CNT TOTALS ;AOO IN THIS CNT ;UPDATE MOST SIGNF WORD OF CNT ;WAS THERE AN ERROR? ~ ~~~-¥~ ERROR INDICATOR ;SUPP03EO TO DO ERROR CHECKING" ; Y H-70S ; BLOCl< SEARCH ERROR? ; ~£t-~g~ OF CODE AREA IN ERR MSG ;MOVE IT TO WORK REG 'SET UP AREA SIZE ;CLEAR AREA TO SPACES f"Er. O~;75. j \J '.;;J I ~INDEC"'l1 ~{)iTCA-8 Tell lTU5c DEVICE ROUTINE FOR MPG SUBR)UTINES FOR Tell FUNCTION ROUTIt£S i OTTCHB.Pll 1 Cj7~ C':l78 00302b' 00137'+ 003£:.30' 010700 f:l93 Q03E,"+O t ~I.fi ' 98C 003&52 ' 00 Ili2l SHE MOV 8aH: Ob2702 ~~~ OOOl~~ 'J82 1750 13 ~ ~8e ADO ~. ~ 00350' OOSO.lilibb "'&. NJS7CN 112001 20S: ge7 003b51.f' l3OM1~ 30S~ gas 003&5E> • 00 1003 qgq C:"l)bO' Ob2700 StCJO 003bb"+ ' 000770 Cjql ~t OOS71b 9C32 00Jb70' 00 1I+0c? 993 007EJ72' 112721 1'39"+ ~7b' 00S21h m • 112021 ~ , 112021 ~ 003'i'[N t 112021 ~ ~' 112021 m r(OO. OOOOOIi ~OS: 00OO5~ SOS! 1773bO Hi m: fmt ~ f~ 1810 1 11 IN7Lf2 £Xl37Sb • 0JIG7 000156 bOS: 1015 003"2' fXD)lb l~lb !017 1018 lOlCJ 1020 f~ 1023 1~ I~ 1028 OOJr~' 0007SS Mova Move J~~ • WORD &5$: 70S: BOS: ~~~TB'" ,RQ 'I~TAT+l-.,R2 -(SP) (RO)+,R'4 R'i",(R2) LJ'),. .~",RO 20~ ( SP) 505 ~~p\ (RI)+ eRQH, {RI)'t eRQH, HUH ( RO) : ... (R 1 H (. ~cit ::>r") PAGE q-2 ; SET UP AOR OF ERROR CODE TBl ; SET UP AOR OF STOriE~ DEV REG'S :~,Tl~biEs9~~TcOOE ~~Risb~~R BIT SET IN STATUS BYTE' 'N Y-~OS ;P6INT AT NXT COot TSl ENTRY • GO CK FOR NXT COOE ; FIRST ERROR COOE IN MSG? 'N Y-50S ; M6VE COf1M TO MSG ; INC I OF COO£S IN THE r1SG ; MOVE ERROR CODE TO MSG ;PUT ~ CODES IN THE MSG' .y N-2OS !RtSTCRE ST~K (515)+ R5 ERRIS TCtr1SG-E·Rrl3AS t~CNT J5R l~:OO (RQ>+,CRIH ~~~ JSR 2~-SEP-7b ; Et()OF Tfo£ CODE TSL? R~ &CJ5 RO,RESR£G ~~:RINTV RS,~GER PC.RINTV RO,RESREG ; GO ISSUE ST~TUS ERROR MSG ;~O RESET INT VECTOR ; RESTORE REG' 5 ;GO TO f1PG ERR RETN POINT ;EXIT IN-lINE ·ADO 1 TO ERROR eNf ; GO RESET 1NT VECTOR ;RESTORE REG'S ; (XU IN-lINE ~ EARlS ; ISSUE BlK SRCH ERR MSG BR &55 ; GO TO ERROR RETURN •.-:csCII •ASCII <eoo)/Er()ZI <lOO>/PM£l <~)/f1KTEI <. ) IILOPI ;ERROR MSG CODE THaLE RTS '305: 105 PC RO ~r JSR 1012 ~t ~7 iSla ~: ~~I 17731~ INC BN£ 1N 1CJI.t m: B 003752' 00Lf707 000072 MOV8 eMF' 1003 003'72'+' 00 1b'*l 1007 00J1't0' r:t:I6n 8ITB SHE ADD SR TST 8E Q Move Move Xt:!llO' OCZ71b OOOOOI.f 00371 ~' W~~ l~ ~t.8:~, CLR Move TST BE Q K02 MAeYll 27(732) :~iID • WORD :~8U .ASen 8St~R"ERMBAS 1~. <01 )/$£L[I . ASCII (00"t ) I&~I(M/ :~8n ,BYTE .EVEN "I <.002> IOAT. (001) {NEXt'" a :TABL£ TERMINATOR SEQ 037& ~lUNOEC"'ll"O'rTCA-B DTTCAS.Pll TCll/TUSe. DEVICE ROUTINE FOR MPG SUBROUTINES FOR TCll FUNCTION ROUTINES lO~ 1~38 103<3 lQl-tO 000020 1737~ 17"1000 RINTV: oooo~ RINTEx~ lO~2 lO~3 !~ i~ lase RS.t.TYECT ;CO CK IF I HAVE VECTOR CONiROt ;SR IF I DON'T ;G£T CLRRINT VEer AOR RlnTEX JSR R5,,~lr<V£~ ; (&0 HAVE MPG CLEAR 11' RTS PC ; t:xIT IN"LINE . WORD I vc TAD... 105 xx~x SIR CALL EXECUTED IF NOT SAME ; R3 rt.JST C~nHN PRoe Tel ADR ; DESTrfOYS RO 1O't8 lOSS JS,R ;TEST INTERRUPT VECTOR SiR ;JSR AS. TVEeT ;BR lABEL lO~'" 10'+5 lose f~ P~GE ~-3 8R r10Y IDS: 10'*1 lQl+q 1050 1051 1'+:00 ·JSR PC RINTY SIR CAlL ; R3 MUST CtiiTAIN PROC TBl AOR ; DESTROYS AO 1012 :~37 2if-SEP ... 7& ; RESET INTERRI.FT ViCTOR SIR 1030 1031 1033 10.11 1035 L02 r1ACfll 27(732) 17372& 00000"1 1737ac 000010 1VECT: 20S: Mev r10V IVCTtl[) 205 PFWAORtR3),-(SPJ • WORD ,WORD 9R TVE.CTX JSR 1ST TVEeTX: RTS ~*~TSTVEC TC INT.... (RS ) + RS ; GET CURR HiT VEer ADA ;STORE~ ADA TO IDENTIFY E !00rJc WIll~~~~I~~' I CAN'T ; GET AT lM,R rE''' IF ttEl1 MCMNT ; SR IF I OONT' T HAVE CNTRl : 9YPASS BR INST IN SIR CHlL ;EX!T IN-LINE M02 I! DTTCHB.PU MAINDEC-II-QT!CA-B Tell/TUS& OEVICE ROUTINE FOR MPG SUSRourH£S FOR TCll DEVICE ROUTINE II 'O'-'",! f'lACYlJ. 27(732) .SSTTL • QU 10~1 ~-S£P"'7& lli:OO PAGE 10 SUBROUTH£S FOR Tell :JEvtC£ROU1INE lOb2 lQb3 10011 ;SAVE REGISTERS RO THRU RS 10L& 10&7 l' RO,SAVREG lObS ~o .l..oo lO&q MOV MOV MOV 110V 1070 I10V i RESTORE REGISTERS RO 1077 1(8) 1081 ;J5R ,. MOv 108& FITS ltf3<3 lQC() 1091 10tS2 ~ SET lOSS -("'I" "1'1\.1 ... 1"'" I~ • l~ 1()q5 1~8 l~ l09~ 1100 1,10\ Iloa 1103 H~ dC'? It~ .4l' 11 1110 i 1"'" 'If 101(' ~OV ~TS f,,,,\, 1,' ,~1 .~1E. t);RQGRAMt S PROG TASlE AOf( IN R3 & Tect'! AD,A IN R"'f ;Jt:"P'C,5UPTAO 1O'ifi SlR CA:LL ; RESTORE ~s THRu rtO rtOV 1087 10&8 111'" lU5 RO.RESREG 1'10V MOV MOV 108'+ 1112 1113 THR'u R'S 1£G: 1'5T lOOi 1003 1111 ; SAVE flO THR~ R5 SAVREG: 110'11 1071 1072 1073 ~'O""u J. '""'f 1075 107& 1078 l07Q SIR CALL SiR C~l SE~ 0378 OOOOSh 0 15tH!: 'SCR,11", I oooQ2.0 DlSulv: fA ~tR ,,"'< ~"' 101: ; C:OHV,£'RT 1~ OOOO't1.4 ;Pf:(IN1' T~{ :tI~ ..~ ~;~l" "",,,Mr' ;;: 'll"IiV lI;.•, ~ , * '\I .. , "MtNOEC-ll-orTCA-S TCU/Tl,Q O£vICE ROUT;:C: FOR PPG , OTiCHS.Pll SUBROV1It£S FOR Tell DEVh.£ ROUTIP£ • ~T SLK V:ALi" ; COHVERT I T TO ASC I 1 ; ISSl( BLOCK • fIfS' PRINT: _ 1733'fEa CXXlOS& lOS! 201: 17333& 50S: .os: PRTEx: :ISSUE ~G SP£C!~I£O SE;j Ole1 ! a::>c:: ......... , :)2b .S8TTL T(;11 r£SSAGE STORAGE M£~ ."- 1:)2'" ..... ' 1228 12~ ~ :)30 ...... ' 1231 ':,::132 ...... • NlIST SEX . ioU.;;'" ~~: ~l~ PNl'ttSG: 011 PROGl'f1: m . . EV£~• :~gH IP,I IXX/<Oll> 101 02012~ O'-tOSl'i ~nMSG: •ASCII fAT LAST INT INOH-INT TERM:' 025CJ3 051122 01.47105 CURr1SG: .ASe!! ICURAENThl:l PORT I ~.:b' 0'+7105 02010'+ tw31l7 R£K)f1C: • ASCII IEr() OF' .000 1IIIITe11 DECTAPE UNIT: I 1237 ~~: ~ :,::138 ~: oS\t~ ....('I • :~gH IXXXXXXI ~ :)JC! .4 ... .EVEri 1;(,'(;(;(= l ,;.2'40 ~iO· ~l~ 8~' vRCOT; 0CNb1'b1 l.?il ~f~ ~~ :~H IXXX)(XXI RO= I IBYTES~ l?il? fX\"+7'fJ+ ' 09f5Q2 0'f252't 035123 CNT:Sr9G: IXXXXXXXXAXXX WR: ~~ ....... :~ IXXXXXXXXX'XXXI ~ff5 ~f~ 12'+5 OCN'7'5D" CRLF': • ASCII (015)<012) 15 l,?lob ~7&0' O't PUI 0't7115 OSlSCN •ASCII ( 011 ) ICPI()S: RO= / 12'+7 ??'S' 1.)) ~1.lJ ~130 .ASe I IXXXXX)( ~:: I : •ASCII IXXXXX)( 12'48 COSOIO' 05'113) 09tl3l ''130 QI)C?tS: •ASCII 1XXXXX)(~)<06f> l~ cn5D25' IXl 09ft.)) : V: / 1250 Dl5D35' .ASe I <OIL> 011 osuos ~~ 1251 (J)S(JSlf • C9t1:11 OSJot1XJ 05'f130 CNT£RR: •ASCII IX)(XXXX DATA:: I CNTDER: •ASCII IXXXXX)(I(i~O~2i 1252 005D71 ' 1:JJ O9tlXJ 103 005101' <011>/l"T T: 011 ~111 .~II IXXXXX)(1 13) IX) eNTINT: . II 1& OClSlli' IXi 12$ CNTS£N= • txEl2S' •ASCII ' j IP£t\lT ON 1/ 0. 1256 CXJ5125' 12't QlfbSll 0'f7505 IOTO: 102 a-tSSl'4 1251 0051'43· BSCt£R: .~II tal( SEARCH ERR / /a.J(~ I IN='~: 1258 Blbl' 1~ ~1't '11 . IWC8(: :~II 1)()()('X..a..'(1 'H3) 1259 1&6' 05'+1 1233 DO'-tSS3' 123'-+ • :)3S ..,;: ~ "'3& Ot.~. .. 4..,,.., , .... ~ .RST I 18=; ~:E!~ m: "bSC: / F la,o 12&1 lib2 12&3 12&"+ E ==...~I! E:I: ~iM Ft~ r""' 12' ~t Et• t~ 12f.>?' Ifj . 1271 • / I : •• "'II ISTATUS ERROR: CODFLO: •a.t<s If3 • 15T~T IXXXXXXI III NY fr. I(rf IIII ~Ht ~8 !=i :~n 'INV ('v"''''C7b' ...... :1 .LIST D~ENO= . III 12&8 l~' I?O •EVEN I .E'.'£:N B£X i , 'OMt1TTI~~~.":llll-OTTCH"B ~MQ r 003 TClllTUSb DEVICE ROUTINE: FOR P'PC r.ACYll 21(732) 2'+-SEP-7& 1'+:00 PAGE 12 FORMATS FOR PROGRAM &DEVICE ROUTINE TABlES .SSTTL FORMTS FOR PROGRAM &DEVICE ROUTINE T~L£S PROCR~ OC02~2 000000 OOOOU2 00000"+ 000010 000020 0000'+0 000100 ~ 000002 1:::0000 O'+COOO 020c00 010000 W+CXlO - 002{X)Q Cl10200 ~ CXDl20 COOl I 0 CXXXOi mY ~ OOOOOb 000010 00001& 000020 000022 OOOO~ 00002& 000030 TAeLE F~T TASLE LENGTH - NON MEM MGMNT VERSION OF J-1P(, PTLGTH: 1&2. ;~ jCPTlGTH= 212. jPROGRAft T~E LENGTH - MEM MGMNT VERSION Of MPGj PFLGWD: +0. ; PROGRAI1 FLAG WORD - 1 WORD l.RSTOP= 2 ~~Irr~ 10 C'TPRIO:: 20 SETOEO: '+0 OCPRES: 100 USEUBtt= 200 ACTIVE: 100000 POPSU: +2. 1 = USER HAS STOPPED THIS ~ f ~ :I;~F~SI~6~Il.Sf¥ONPROGRAM 1 = COtlSOlE OR PRINTER 1/0 IN PROGRESS , 1 = THIS PROG SET T~ PAT DEV DEDICATED F"LHG ; 1 = 08J Coo[ IS PRESENT ; 1 = THIS PROO USES T~ ~Ieus MAP (r£" P1Gr!NT ONL 'f ; ; 1 = PROGRM IS ACtIVE (SPECIfIED FOR EX£CUTlJ;Ni ;PROQRArI'S OPERATION SWITCI£S - 1 WORO ; 1 : STOP PROG EX£CtJT ION UPON ERROR STONl::R: CYCPRG: : 1 " CYCLE PROOAAl1 CON C~NT DEVICE) PROr£R: ; 1 : 00 HOT PRINT ON ERROR BIT12= 1()(XX) '. 0 ..- ''''' t.lJ'\ '" ; 0 ::: NOT~ .. B1Tll= '+Cal CYCDVL= 2Cm ; 1 : CYCLE TI-£ DEVICE LIST GTNXTO: 1000 ; 1 : CYCLE ON SAME DEVICE UPON ERROR If biB OOERCK= ~ SPOPER: 200 BITE>: 100 OOIOT: '+0 AUTMP= 20 AlIft:P: 10 HSKPEP= ~ PF'&80V: 2 HOCOPF= 1 PFWHOR= +'4. PASCIH: +&. PNAf1E= +8. PROlOA= +1'4. PWRlOA: +1&. PSRCST= +18. POBJST: +20. PLNGTH: +22. prOCHT: +2'+. ; 1 ::: ()()NT T 00 £RROR Mel< INC ; 1 ::: DEVICE SPECIAL OPERATION ; 0 = NOT U5£O ; 1 : 00 NOT-PERF'ORf1 1/0 TIP£OUT ; 1 : 00 NOT AUT()ItATlc.:u Y DISPLAY COUNTS ; 1 : ~TOI£~AY COlIfTS AT EtC) Of FINAl PASS ONlY : 1 = KEEP c~Ott. Y AT Rtri COfttANO ; 1 = PRIN F T BYTE OPt... Y ON VERIFY ; 1 : 00 NOT ~'HT COt-flLETEO f'1SC ; *; PROGRAM FLAGWORO ~SS - 1 WORD ; PROORAf1' S NlItB£R IN ASC I I .. 1 WORO jPROGRAM'S NAME IN ASCII - &BYTES : ADDRESS Of REA[) IIO AREA - 1 WORD ;ADORESS OF WRITE V'O MEA" 1 WORD ;SOURCE STATEf1£NTS ST~T ADDRESS - 1 WORD :OBJECT CODE START ADDRESS" 1 WORD ;PROC AREA LENGTH (08J END MINUS PROG TSL STARTi - 1 wORD ; llO TIMEOUT COUNT - 1 WORD SE~ 0382 E03 ~INDEC-ll-DTTCH-S DTTCAS.Pll lJ213 ':'Cll,. TUSE> DEVICE ROUTINE FOR MPG "Aey 11 27( 732) 2Lt .. SEP-7c 1~: 00 FORMATS rOR PROGRAM & D£VICE ROUTInE TABlES ; O£v ROUT 1'100€!.. I CODE - 1 wORD fOMOLCO= +2&. 000032 1330 1331 oooo~ 1333 000035 l332 •..;:i'">,3'1 .• lJJS lJ3S 133- 1338 :3,~!g ,::~l4a 00003& 00005& OOOObO .,:~~ 1 OOOOb2 1:t"'3 0000&"+ l::.NS 131.+b lSi? :3'18 ~ :3..2 :3~ l:~q 1~50 00007'0 000072 , -~S' 135.2 l3S3 00007& ·~5"" ": ~ 000100 Av'"l 1315\4 ""'\ow; 13Se 00007~ 1~~7 000102 :3'S~ 000101 1361 -""" :.3E;3 OOOlOb 000110 '3&5 000112 :35..'3 .'3bO ':;&2 llbt.t I.. '., . 3£/e 13t7 13&9 ..'3E,,:l 1370 ~'" ~ :371 1372 OOOll~ 00011& 000120 1373 000122 1375 OD012~ 13'7!.f • '")7" .. ..,Ie ,.,..,...,. .. tJ t f ;1,Q • ..,.t I".,; ...'" '-',""'q J( ". 1380 139: '?8'... 4- OOO12b 000222 OOC23b fOOPNTR= +28. PCUROV: +2<3. PONUf1S: +30. PTEMO: +'1&. PTEMl= +"'8. PTEN2: +50. PTEM3= +52. PTE MY: +S"f. PTE!1S= +5&. PTEMt>: +58. PTErot': +&0. PTEM8: +&2. PTEM<3= +b"f. PTEMIO: +&6. PTEMll= +&8. PTEM12= +70. PTEMI3: +72. PTEM1"f: +7"+. PTEMI5:; +70. PNBR= +78. PSRC: +90. c:mS1'+82. • .., 1- PSTKCT= +8~. PSTKSV: +8e. PSVRECa= "'l~o. PUSRPC:: +158. PAGE 12-1 ;CURRENT DEVICE NUMBER POINTER - 1 8YTE ;CURRENT DEVICE' - 1 BYTE j DEVICE NUMBERS - 1& BYlES ;USER PROGRAM TEMPORARY STORAGE- 1 WORD ;USER PROGRAM TEMPORARY STORAGE - 1 WORD ; USER PROGRAM TEMPORARY STORAGE - 1 WORD ;USER PROGRAM TEMPORARY STORAGE - 1 WORD JUSER PROGRAM TEMPORARY STORAGE - 1 WORD ; USER PROGAAM TEMPORARY STORAGE - 1 WORD ;USER PROGRAM TEMPORARY STORAGE - 1 WORD ;USER PROGRAM TEMPORARY STORAGE - 1 WORD ; USER pRQGAAM TEMPORARY STORAGE - 1 WORD JUSER PROGRAM TEMPORARY STORAGE - 1 wORD ;USER PROGRAM TEr1PORAAY STORAGE - 1 wORD ; USER PROGRAM TEMPORARY STORAGE - 1 WORD :USER PROGRAM TEMPORMY STORAGE - 1 WORD ; USER PROGRAM TEi1PORARY STORAGE - 1 WORD ;USER PROGRAt1 TEMPORARY STORAGE - 1 wORD ;USER PROGRAM TEMPORARY STORAGE - 1 wORD ; NU?'l9ER Of BYTES TOTRAHSfER ON MOvE (NSR - 1 w'JRC ;~TA SOURCE ADDRESS ON MOVE (SRCI - 1 WORD ; D.-:tTA DESTINATION ADDRESS ON MOVE (DS"; - 1 ~ORC ;' OF WORDS (X 2) SAVED OFF STACK - 1 WORD ;STACI< WORDS STORAGE AREA - 30 WORDS : USER 5 RO THfW RS REGISTERS STORAGE AREA - S WCRCS ;USEP'S CURPENT PROGRAM COUNTER - i. WORD t F03 MA!NO£C-ll-DTTCA-8 Tell/TUs.e, DEVICE ROUTINE FOR MPC MACYll 27(73C) OT"rCAB. p 11 FORMATS FOR PROGRAM & DEVICE ROUTINE TABLES ~002"'2 2'+-SEP-7& 1'+:00 ~GE 12 .. 2 jF'OLLOWING ENTRIES (PROlOX THRU PUBMAP) ARE ONLY IN MEM MGMNT VERSION ; (PROIOX= +1&0. ;18/22 BIT ABSOLUTE ~DRESS Of READ 1/0 AREA - 2 WORDS) ; (PRDIOV= +1&'+. ;19 BIT VIRTUAL ADDRESS Of READ 1/0 AREA - 2 WORDS) ; (PWRIOX= +1&8. ;19/22 BIT ABSOLUTE ~SS Of WRITE 1/0 AREA - 2 WORDS) ; (PWRIOV= +172. ;19 9IT VIRTUAl ADDRESS Of WRITE 1/0 AREA - 2 WORDS) ; (PUPARS= +17&. ;STORAGE AREA FOR USER'S PAR'S 0 THRU 7 - 8 WORDS) ; (PUPORS= +1C32. ; STORhGE AREA FOR US£R' S PDR' S 0 THRU 7 - 8 WORDS) ; (PUBr1AP= +208. ;151" UNIBUS MAP REG. AND. OF REGS USED - 1 WORD) ;END OF ME" f1GMNT ONLY ENTRIES PTS!ZE= +1&0. ;PROGRAM TABLE SIZE IN BYTES - 1 WORD - NON MEM MGM~T ; (PTSIZE= +210. ;PROGRAM TABLE SIZE IN BYTES - 1 WORD - MEM MGMNT VERSION: PTENO= .1&2. jENO OF PROGRAM TABLE - NON MEM MGMNT VERSION ; ;PTEND= *212. :ENO OF PROGRAM TABLE -, MEN NGMNT VERSIOf'1: SEQ 039'-+ G03 : MA!HOEC-ll-OTTCA-B Tell/TUSE» 8EVleE R8UT1NE FOR I1PG MACYll 27(732) 2&+-SEP-7& 111:00 PAGE 12-3 : OTTCAS. Pll FORMATS FOR PR GRAM & EVICE ROUTINE TABLES 1"+10 DEVICE ROUTINE TABLE Pi 11 1'4i2 1'413 1'41"+ 00011& DRTLTH= 78. ;DEVICE ROUTINE TABLE LENGTH 11115 l1.;lS 000000 10;:3 l ... ~g 000002 1~2!J OOOOOI.f OEVRSZ= +0. DEVFWO= +2. DEVIW1= +'+. DEV!W2= +0. OEVIW3= +8. DEVIW,+= +10. DEVIWS= +12. DEVIW&= +111. DEVIW7= +10. OEVIW8= +l8. OEVORA= +20. DEVIVA= +22. DEVRPS= +211. OEVWPS= +2b. DHKPAO= +28. DERPAO= +30. OKILA£)= +32. DECTAD= +3;';. OTOEAD= +3&. DEVIOB= +38. DEVDER= +'10. DVUPRT= +'+2. DVCPRT= +;.;;.;. DEveTA= +'+&. DveTDA= +48. ;DEVICE ROUTINE SIZE IN BYTES - 1 WORD ;DEVICE ROUTINE F1AGWORO - 1 WORD jDEVICE INTERFACE WORD. 1 - 1 WORD ;DEVICE INTERFACE WORD. 2 - 1 WORD jDEVICE INTERFACE WORD. 3 - 1 WORD ;OEVICE INTERFACE WORD. '+ - 1 WORD ;OEVICE INTERFACE WORD. 5 - 1 WORD jDEVICE INTERFACE WORD. & - 1 WORD jOEVICE INTERFACE WORD. 7 - 1 WORD (SIZE) jDEVICE INTERFACE WORD. 8 - 1 WORD (ERR) ;DEVICE REGISTERS ADDRESS - 1 WORD .DEVICE INTERRUPT VECTOR ADDRESS - 1 WORD ;DEVICE READ PROCESSOR STATUS WORD (BUS REQ) - 1 WORD jDEVICE WRITE PROC STATUS WORD (BUS REQ) - 1 WORD ;DEVICE ROUT HOUSEKEEPING ROUT REL ENTRY ADR - 1 wORD ;OEVICE ROUT REPORT ROUT REL ENTRY AOR - 1 WORD ;OEVICE ROUT KILL ROUTH~E R£L ENTRY AOR - 1 WORD ;OEVICE ROUT ERROR COUNTER REL ADR - 1 wORD jO[VICE ROUT TIMEOUT ERR ROUT REL ENTRY HDR - 1 weRD :DEVICE 110 BUSY BAAHCH ADDRESS (ClOBSY) - 1 weRO jDEVICE ERROR BRANCH ADDRESS (CUPGER) - 1 WORD ; USER MODE PRINT BRANCH ~DRESS WLlST) - 1 WORD ;CMNO MODE PRINT BRANCH ADDRESS (CLIST) - 1 WORD jCONVERT BINARY TO ASCII BR ADR (BINASC) - 1 WORD ;CONVERT BINARY TO DECIMAL .:lSCII 8R ADR (BTASLZ) - 1 ~~CRC 1~17 : ... 21 :"'22 ...'~::l3 .... 00000& ' ll;~ 000010 1112b 000012 11.f28 00001'+ 00001& 1'-125 ~~27 1"+c<3 .;. ...30 1"+31 1'+32 000020 1"'3-1 ll.!JS 1"+3b 000022 1'438 1'43'3 OOOOCb 1"+33 11.f31 P~;';O 000021.f 000030 141.41 1'4'+2 000032 1"':';11 11.;"+£ 00OO3l.f 1~"3 :"'% 14"+7 1~'+8 1"'..,13 1"'50 1'+51 1 . ''''52 l~53 1"+5'+ 1"tS5 1'15& 1"+57 1"+58 11'4513 14&0 1"+&1 14&2 14&3 14b'1 14tS 000030 0000'+0 OOOtr+2 0000...... 0000'"+& 000050 000052 00005'+ 00005& 0000&0 . ; SE~ 0385 ; DEVICE ROUT REL SYMBOL TABLE POHHER - 1 WORe ;OEVICE ROUT REL ENTRY TABLE POINTER - 1 wORD ;PACK TABLE EXTEN. REl POINTER - 1 WORD ;VECTOR TABlE EXTEN. REL POINTER - 1 wORD ;COMPILER TBl EXTEN. REl POINTER - 1 WORD ; DEVICE INTERFACE WORD SYMBOL TBL REL POHHER ; END OF DEvrCE ROUTINE TABLE wORC MIiCY 12 ¥,.,- '".\'J :'1 "We',:> '-, r' - ,,, , "} ',- ,t."I,,."i \i 11_ l,J\, '1...)' ,l': ,," I "",'lo... "'l' .{Io.r'1"",- !"..J!it.. "l"!>;...I'_ fwJ ~q~,··~OO' DEVIw2= 000006 ':)EVrW3: 000010 002 C02 002 002 002 002 OEVIW!i: 000012 DEVI16= 00'001"'1 f'l.r ILL ~!h'10' 1.1 t.. H• r~ 1iIfQ.. 11•.> .... 1b' DEVlla./7= 000020 D. ;:£ VI ..W.a= .22 DEVRPS:30 DEVRSZ= 000000 DEI/STP: 000 102 OCVWPS: 000032 UFLGWn 000002R DHKPAO:: 00003"+ DLSeNi' OOll&OR 002 002 DrSCT 1 OOllb'iR \•R D c:pr T 0r143 u.,.b oo..~ DISUh' 002 OIS~l1L 002 on·' 052 002 002 002 002 002 002 ~ 002 002 002 002 002 , lJ..,,,J,;' ' nOl.i2b"fR OO~312R DISUHM OOl.l22bR :0 I SUPR CtKH.. AD= 3Q'iR a OO£RCK= 0001100 OOlor = 000010 OREGAD 00002"iR (lI1TENO= 00011& DVCMOS OOOlSliR crVCPRT:: I.i DVCPTE bbR DVCTEP: UOOi12 DVCVEC: O'D0070 002 58~ ~ ~ 002 002 OVMVT£OOO1ObR VPD. '. TA:: ,vPI(lE ~ 8 CO() . (L2 .' . O~ vp rEP:: OOCI. '. lOb OVPUTB::OOO 100 002 002 002 002 002 D.{· 002 002 DVREGE:: OOC1S'iR OVREGS coo 11 bR DVRE1f)= OL1527bR OVREX 00 12b'iR DVRQO T 00'i67bR OVRGI'lG OO~E>7OR OVRINT= 00007"+ DVSFWO= 0000&"1 DV$VEC= OOOObb DVTV( ':= 000072 F' I Non 002 002 002 002 002 002 2Y-SEP- 002 002 002 002 002 002 88~ 002 002 002 002 002 FWD DD.11.:f7oR G(-TBYT 7bR 002 002 002 002 '7Y"!R 002 ' j,L: F"Ui>.I"'EX 7!.fOR \'J"'I' . _L~ ,.i ,4'-'uR , l -l 1. Gl'NX TO:: HSKEEP 000 H$KP£H= 7!i"lR HSKPEP: 00000'1 HSKPST= OOObS2R INBLKN 0OO73bR IMF"OBK OOSl&oR lblR INTeNT 720R INVSKN 0052E>SR HNDVti 005253R I~+gT :: 88B~~~~ IVCTAO KILL KILLEX LCOUNT ""tW4.J Jr. LNlr4AIT LOC! LRDALL 00002bR 00 1"+20R OOllof114R ODOb32R E ...... ,.1 LRDNUr1 LR'£V gOO9QOR .' OO&33R 000.b33RR 000b32 LSTAlL OOOb32R LSTATS 000032R LSTOP ClOOC32R LWA IT 000b32R LWRAlL 000b'+2R LWRTM OOO&Lf2R MISCNT 000712R MISCOM OOlb5bR NINTSU 002S1bR NOCOMP= 000001 lL1: 002 Oun:.J.. 002 002 002 002 002 002 002 002 002 002 002 002 002 002 002 002 88~ 002 002 002 002 g8~ 002 002 002 SE'~ PAGE 13 N""'~lN'" i'lj".l~·~ii',· i il !O",)UAl,.:\.. .. I\lf' ~ ,U1'uri IU"1 ,i,". , '"",~,,.. 0 R t1 ;12::1b'" r' nc· 1 '11.':. "bR ~.,.H.,l:itJ;'.{.. ';".J INFOMG OVGf..· lB.:.-.ooao . . 7S OV I WSP= 000 11 't DV I WST ClOCIb22R .. t; " oon . TH= 0001 HI DTOEAD: OO:')Qt;11 ova fOA: OClOObO DVUPRT= 000D52 ''tE·P- i"'t{,,\I"'.,i! 1 '.n ERCDTS D0377bR ERHBAS 003352R ERPBKN 003~0'1R ERR 000022R ,-c·}"'t\""R v "00 t.!'\~"lJ til"'Il:>"tR ERRCNT 0OO71"+R ERRCOM ·12R ERRCS bbR ERRCSl 00327lfR ERREX 003"+~bR ERRIS 003304.lR £RRSNM 003i.flDR ERSTAD O(Ol.!02R ERSTOP= OO"i ;,,\,\.I\ .. 1 v~' ' ...• r03 l732) OCPRES: 000100 002 002 PASC I N= OOf)OO& pi" -·"0':r)O··Q tiU 7 ~ \,.., "''fI", PCURDV= 000035 PDHUf1S= 00OO3b POPHTR= 00003"+ PocT - oon12~ PFBBOV; ro0002 PFLGWO= 000000 PFWAOR= OOOOOl.f PLNGTH= 00002b PMDLCO= 000032 PNHME = 000010 PrieR = aOOilo PNMMSG OO"tS'fbR POBJST= 'Ii POPSW = 2 PRO I OH:· lS PRINT ,32R PROGTt1 003'170R PROG.NM OOYSSOR PRONER= 020000 PRTEX OOl.fSI1QR PRTIWO OOY~ObR PSRC : 000120 PSRCST= 22 PSTKCT= 002Y PSTKSV= 00012b PSVREG: 000222 P<;WO 00003JR pfEMO = 00OO5S PTEMI :: OOOObO prEMiO= 000102 PTEMll= DOOlOY PTEM12: OOOlOS T. ;:'Ml.3= 0.0'0110 ;')TEMI "+= 000112 p. PIEMlS:: 00011"1 PTENE = 0000&2 PT~M3 :: oaOOElI1 PTtMY = DOODDb PTEM5 = 000070 PTEMo = 000072 PTEM7 = 00007Y PTEMa = 00007S PTEMQ = 000100 PTENO :: 0002"+2 PTLGTH,= 0002Y2 PTOCNT= 000030 PTSIZE= 0002YO PUSRPC= 00023b ?UTBYT CiOO WOR CIU,Q i ·u,~ n-.;"" 1"._. "":'100: 2(i • jOif",.. ,.; RDALL DOiSlOR ROCHT OOQ?06R RDCOM OOlS2bR ROHUM 00157&1'1 ~EAO OOlS16K RENOMG QOYb16R R~PORT 00lg00R Rt.PTBL CO L.. 7 I.fR RESREG 0011 1-40R REV jG1506R rn07" ~R 1'"'(''''('M'T 1,. .,.... 1 ",l..", '1 t: RI IHEX OOl.f072R R~ rnv OOl.iOSQR RPTBAS 001230R RPTEND OD12SYR RPTLP D01212R RTNINT Cl007'tR -'Y.nr'Oliu:"'l(1 .R i1 Rl =%QOGOCi R2 =%(}OOOO;:\ R3 =/';.000003 RY =%00000'1 RS =:%000005 SAVREG OQI.112YR SEARCH 002732R SETDED: a6R SETVEC SIZE 00002 OR Sf' :::%DOOOOb SPOPER= 000200 STMNMG OOS17"fR STMHUM G0520"+R STONeR= 100000 STOP OOlSYbR STPAlL DOIblOR ST5TAT OOY202R SUPTAO OOY15bR TCEMSG 005212R TCINT 002S3bR TOECNT 00(1722R TOUTER 001320R TOUTEX DOIYlbR TSTVEC 00OO72R TVEeT OOYD7Y:R TVECTX 00'1~22R ULIST ooor:;S2R UNASC I OCYt,' ?q UNITMG OC~S •.",~ URSTOP: 000002 USEU9M= 000200 WUT 0014YSR 038 7 002 i 002 , ....., 002 88~ 002 002 002 -.+¥I..J ~ ........ 002 002 C02 · n:;) O ....... O-C2 002 002 002 002 002 002 002 002 002 002 002 002 002 002 002 002 ~t;~ ..J'"",,~. DTTCAB.Pll SYMBOL TABLE WRAU.. OOl&22R 002 WRCO~ . ASS. 000000 000 Tell 800000 005270 001 002 a ERRORS DETECTED: DEFAUl T GlOBALS GENERATED: 0 f.DTTCAB/Nl.:TOClOOC::DTTCAB.Pl1 RUN-Ti.M£: I.f q .'3 SECONDS RUN-TIl1E ~Tr0: 171/1"'=11.5 :ORE USED: 5;( (g PA,G£S} COCUMENT PAGES: J03 MACYll 27(732) TCll,TUS& DE''i'ICE ROuliNE FOR MFG ~ArNOEC-II-DTTCA-9 3S OO15SeR 002 WRTM OOlb3'1R 2Y-5EP-7b lY:DO PAGE 13-1 SEJ 0388 WTYIOT= 000010 002 002 K03 1111111111111111111a 111 1122222222223321 _$&7~12Jf15&7:~"'12 11111111111: +*a 1111~ ilgRm&mm8~;;t~~~mmr66i~Wl~'77mm78ii8;eS;~m~~mmOOOOl1111111112222222,-~21331 ~
Home
Privacy and Data
Site structure and layout ©2025 Majenko Technologies
