11 /COPYRIGHT (C) 1974,1975 BY DIGITAL EQUIPMENT CORPORATION
22 /THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT NOTICE
23 /AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT
24 /CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY
25 /FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT.
27 /THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO THE PURCHASER
28 /UNDER A LICENSE FOR USE ON A SINGLE COMPUTER SYSTEM AND CAN BE COPIED
29 /(WITH INCLUSION OF DIGITAL'S COPYRIGHT NOTICE) ONLY FOR USE IN SUCH
30 /SYSTEM, EXCEPT AS MAY OTHERWISE BE PROVIDED IN WRITING BY DIGITAL.
32 /DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR THE USE
33 /OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY
47 /THESE ARE ASSEMBLY REFERENCES TO LOCATIONS IN THE ROM:
62 DEVICE ROM;DEVICE SYS;4211;2007;0;1341
63 DEVICE ROM;DEVICE DTA0;4211;1007;0;1341
64 DEVICE ROM;DEVICE DTA1;4211;SDTA1&177+1000;0;1341
68 *7360 /ROOM FOR DECTAPE HEADER WORDS
72 CDF 0 /BOOTSTRAP TO MOVE FIELD 1
73 TAD I ROM1 /CODE UP TO FIELD 1
86 ROM1, 7427 /FIELD 1 CODE GETS LOADED HERE
87 ROM2, 7647 /AND GOES UP HERE
96 SHNDLR, VERSION /UNIT 0 ENTRY
101 SDTA1, VERSION /UNIT 1 ENTRY POINT
103 TAD SDTA1 /GET ARGS AT SHNDLR
105 SHND2, RAR /UNIT BIT IS IN LINC
108 TAD S6203 /SETUP RETURN FIELD
111 SDLD /STORE FUNCTION WORD IN DATA REG.
112 AND S70 /SDLD DOESN'T CLEAR AC
113 TAD S6201 /ISOLATE FIELD OF XFER
118 TAD I SHNDLR /BUFFER ADDRESS
121 TAD I SHNDLR /PS/8 RECORD #
122 CLL RAL /TIMES 2 FOR ABSOLUTE BLOCK
126 CIF ROMFLD /ROM IS IN FIELD 7
127 JMP I XF2SET /INITIALIZE.
129 TFLD, HLT /ROUTINE TO LOAD DATA FROM BUFFER
134 PUT, 0 /PUT DATA INTO BUFFER
140 ERROR, CLA CLL /FORCE TURNAROUND AT RGO
142 ISZ TRYCNT /TRIED 3 TIMES?
145 JMP SEREX /YES..FATAL EXIT
149 \f/EQUIVALENCES FOR HANDLER
157 WRQUAD, 0 /WRITE A 12 BIT TAPE WORD
163 RDQUAD, 0 /READ A 12 BIT DATA WORD
170 EQUFUN, 0 /EQUIVALENCE CHECKSUM
185 SEXIT, ISZ SHNDLR /NORMAL EXIT
186 SEREX, TAD SUNIT /STOP THE DRIVE
188 CLA CML RAR /EXIT CONDITION IN BIT 0