11 /COPYRIGHT (C) 1974,1975,1977 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 /FIXES MADE FOR MAINTENANCE RELEASE:
49 /1. ADDED RX01 (FLOPPY BOOTSTRAP)
50 /2. LEFT PATCH SPACE IN NAME TABLE
69 START, CLA /ALLOW BEING CHAINED TO
281 ZBLOCK 4^5 /PATCH SPACE
287 /SIXBIT OF 2-CHARACTER NAME
288 /ADDRESS OF BOOTSTRAP CODE IN BOOT
289 /ADDRESS WHERE BOOTSTRAP CODE IS TO BE MOVED TO
290 /LENGTH OF BOOTSTRAP IN WORDS
291 /STARTING ADDRESS OF BOOTSTRAP
373 \f/ 1000 IS OS/8 LINE BUUFFER
374 / 1600 IS PS/8 LINE BUFFERE
615 TAD UNIT /GET A READ COMMAND ON THE PROPER
616 LCD /UNIT AND LOAD IT INTO THE COMMAND REGISTER
618 JMS LOAD /READ SECTOR ONE
619 JMS LOAD /OF TRACK ONE.
620 CLL RAL /SET AC = 2 AS FLAG SAYING WE READ TRACK 1
622 RXSTRT, /** BOOTSTRAP START ADDR **
623 HANGGG, SDN /DO A FIGURE-8 SKIP -
624 JMP LOAD+1 /ONLY THE DONE FLAG WILL COME UP
626 SNA /OR IS THIS THE INITIAL DUMMY WAIT?
627 SKP CLA /IF EITHER ONE, TRY OTHER DRIVE
628 JMP GOODRD /IF ALL IS WELL, GO READ THE SECTOR BUFFER
629 TAD UNIT /COME HERE ON READ ERRORS -
630 CIA /FLIP THE UNIT NUMBER
634 GOODRD, LCD /LOAD THE EMPTY SECTOR BUFFER COMMAND ( A CONVENIENT 2)
635 LP, JMS LOAD /GET A WORD FROM THE SECTOR BUFFER
636 DCA 2 /SECONDARY BOOT LOADS INTO LOCATIONS 2-51
637 ISZ .-1 /BUMP STORE ADDRESS
641 STR /DO A FIGURE-8 LOOP WAITING FOR THE TRANSFER
642 JMP HANGGG /OR DONE FLAGS TO COME UP.
643 XDR /TRANSFER FLAG CAME UP - TRANSFER A WORD
646 UNIT, 7024 /7004 = DRIVE 0, 7024 = DRIVE 1
647 X6030, 6030 /CONSTANT NEEDED TO FLIP UNIT - 7004+7024.
669 GOTRK8, TAD L2213 /RK
695 GOTLTA, TAD L1424 /LT