0	0 0 0 0 
1	0 1 0 1 
2	1 0 0 0 
3	0 1 0 1 		;.ASCII	PD				RM03 BOOT
4	0 0 1 0 
5	0 0 1 0 
6	1 1 0 0 
7	0 0 0 1 		;	?
10	0 0 0 0 
11	1 0 1 1 
12	1 1 0 1 
13	0 0 0 1 		;SEC			;DON'T RET TO CONSOLE UCODE
14	0 0 0 1 
15	1 1 0 0 
16	1 0 0 0 
17	0 0 0 0 		;MOV	#0,R0		;SET TO CLEAR ALL RMER1 FLAGS
20	0 0 0 0 
21	0 0 0 0 
22	1 1 0 0 
23	0 0 0 1 		;
24	0 0 0 1 
25	1 1 0 0 
26	1 0 0 1 
27	0 0 0 0 	>------>;MOV	#176614,R1	;ADDRESS OF RMER1->R1
30	1 1 0 1 
31	1 0 0 0 
32	0 0 0 0 
33	1 1 1 0 	^	;
34	0 1 0 1 
35	1 1 0 0 
36	1 1 0 0 
37	0 0 0 0 	^	;MOV	PC,R4		;POINT RETRIES HERE
40	0 0 0 0 
41	0 0 1 1 
42	1 0 1 0 
43	1 0 0 1 	^ <-----;BCC	173362		;BR IF MUST RET TO UCODE
44	0 0 1 1 
45	0 0 0 0 
46	1 1 0 0 
47	0 0 0 1 	^ v  <--;BR	173230		;OTHERWISE...
50	0 0 0 0 
51	0 0 0 0 
52	1 0 1 0 
53	1 1 1 0 	^ v  v  ;.WORD	173000		;POWER-UP VECTOR
54	0 0 0 0 
55	1 1 1 0 
56	1 1 0 0 
57	0 0 0 1 	^ v  v  ;.WORD	000340		;POWER-UP PRIORITY
60	0 0 1 0 
61	0 0 0 0 
62	1 1 0 1 
63	0 0 0 0 	^ v  -->;MOV	R0,R3		;RMER1 FLAGS->R3
64	0 0 1 0 
65	1 1 0 0 
66	1 1 0 1 
67	0 0 0 1 	^ v     ;SWAB	R3		;PUT IN UPPER BYTE
70	1 0 0 0 
71	1 1 0 0 
72	1 1 0 1 
73	0 0 0 0 	^ v     ;MOV	R3,(R1)
74	0 0 1 1 
75	1 1 0 0 
76	1 0 0 0 
77	0 0 0 0 	^ v     ;MOV	#5,R2		;SET SEEK,GO BITS FOR RMCS1
100	0 1 0 0 
101	0 0 0 0 
102	1 1 0 1 
103	0 0 0 1 	^ v     ;
104	0 1 0 1 
105	0 0 0 1 
106	1 1 0 1 
107	0 0 0 1 	^ v  <--;BR	173316		;GO START THE LOAD
110	0 0 1 0 
111	0 1 0 0 
112	1 0 0 0 
113	0 1 0 1 	^ v  v  ;.ASCII	BD
114	1 0 1 0 
115	0 1 0 1 
116	1 1 0 0 
117	0 0 0 1 	^ v  v  ;	???
120	0 0 0 0 
121	1 0 1 1 
122	1 1 0 1 
123	0 0 0 1 	^ v  v  ;SEC			;DON'T RET TO CONSOLE UCODE
124	0 0 0 1 
125	1 1 0 0 
126	1 0 0 0 
127	0 0 0 0 	^ v  v  ;MOV	#0,R0		;START WITH UNIT 0
130	0 0 0 0 
131	0 0 0 0 
132	1 1 0 0 
133	0 0 0 1 	^ v  v  ;
134	0 0 0 1 
135	1 1 0 0 
136	1 0 0 1 
137	0 0 0 0 	^ v  v  ;MOV	#176600,R1	;POINT R1 TO FIRST REGISTER
140	0 0 0 1 
141	1 0 0 0 
142	0 0 0 0 
143	1 1 1 0 	^ v  v  ;
144	0 1 0 1 
145	1 1 0 0 
146	1 1 0 0 
147	0 0 0 0 	^ v  v  ;MOV	PC,R4		;POINT RETRIES HERE
150	1 1 1 0 
151	0 0 0 1 
152	1 0 1 0 
153	1 0 0 1 	^ v<----;BCC	173362		;BR IF NO ERROR
154	0 0 0 0 
155	0 0 1 1 
156	1 1 0 1 
157	0 0 0 0 	^ v  v  ;MOV	R0,10(R1)	;SET UNIT BITS IN RMCS2
160	1 0 0 0 
161	0 0 0 0 
162	1 1 0 0 
163	0 0 0 1 	^ v  v  ;
164	0 0 1 1 
165	1 1 0 0 
166	1 0 0 0 
167	0 0 0 0 	^ v  v  ;MOV	#71,R2		;SET READ,GO BITS FOR RMCS1
170	1 0 0 0 
171	0 0 1 1 
172	1 1 0 1 
173	0 0 0 1 	^ v  v  ;
174	1 0 0 1 
175	1 1 0 0 
176	1 0 0 1 
177	0 0 0 0 	^ v  v  ;MOV	#21,(R1)  v     ;SET READ-IN PRESET
200	0 0 0 0 
201	0 0 0 1 
202	1 1 0 1 
203	0 0 0 1 	^ v  v  ;
204	0 0 0 1 
205	1 1 1 1 
206	1 0 0 1 
207	0 0 0 0 	^ v  v  ;MOV	#14000,32(R1)	;SET FMT,ECI BITS IN RMOF
210	0 0 0 0 
211	0 0 0 0 
212	0 1 0 0 
213	0 0 0 0 	^ v  v  ;
214	1 0 1 0 
215	0 0 0 1 
216	1 1 0 0 
217	0 0 0 1 	^ v  v  ;
220	0 0 0 0 
221	0 1 1 1 
222	0 0 0 1 
223	0 0 0 0 	^ v  v  ;MOV	16(R1),16(R1)	;CLEAR ANY DRIVE ATA BIT
224	1 1 1 0 
225	0 0 0 0 
226	1 1 0 0 
227	0 0 0 1 	^ v  v  ;
230	1 1 1 0 
231	0 0 0 0 
232	1 1 0 0 
233	0 0 0 1 	^ v  v  ;
234	0 0 0 1 
235	1 1 1 1 
236	1 0 0 1 
237	0 0 0 0 	^ v  -->;MOV	#177000,2(R1)	;SET 1K BYTES IN WORD COUNT
240	0 0 0 0 
241	0 0 0 0 
242	0 0 1 0 
243	1 1 1 0 	^ v     ;
244	0 0 1 0 
245	0 0 0 0 
246	1 1 0 0 
247	0 0 0 1 	^ v     ;
250	0 0 1 0 
251	0 1 0 0 
252	1 1 1 1 
253	0 0 0 0 	^ v     ;MOV	(R1),R3		;GET RMCS1
254	0 0 1 1 
255	1 1 0 0 
256	1 0 0 1 
257	0 1 0 1 	^ v     ;BIC	#377,R3		;CLEAR LOWER BYTE
260	1 1 1 0 
261	1 1 1 1 
262	1 1 0 1 
263	0 0 0 1 	^ v     ;
264	0 0 1 0 
265	1 0 0 0 
266	1 1 0 1 
267	0 1 0 0 	^ v     ;BIS	R2,R3		;SET SEEK AND GO BITS
270	1 0 0 0 
271	1 1 0 0 
272	1 1 0 1 
273	0 0 0 0 	^ v     ;MOV	R3,(R1)		;GET RMCS1 IN R1
274	1 0 0 1 
275	1 1 0 0 
276	0 1 1 1 
277	1 0 0 1 	^ v  -->;TSTB	(R1)		;CHECK READY BIT
300	1 1 1 0 
301	1 1 1 1 
302	1 1 0 0 
303	1 0 0 1 	^ v  ^--;BPL	173336		;LOOP TIL READY BIT COMES BACK ON
304	1 0 0 1 
305	1 1 0 0 
306	0 1 1 1 
307	0 0 0 1 	^ v     ;TST	(R1)		;CHECK SPEC COND BIT
310	0 0 1 0 
311	0 0 0 0 
312	1 1 0 1 
313	1 0 0 1 	^ v  <--;BPL	173354		;BR IF OK
314	0 1 0 0 
315	0 0 0 0 
316	1 1 0 1 
317	0 0 0 1 	^ v  v  ;RESET			;ELSE DO UNIBUS RESET
320	0 1 0 0 
321	0 1 1 1 
322	1 1 0 0 
323	0 0 0 1 	^ v  v  ;JMP	2(R4)		;AND DO FULL RETRY
324	0 0 1 0 
325	0 0 0 0 
326	1 1 0 0 
327	0 0 0 1 	^ v  v  ;
330	1 0 0 1 
331	1 1 0 0 
332	1 0 0 1 
333	0 1 0 1 	^ v  -->;BIC	#377,(R1)	;CLEAR COMMAND & INT ENABLE
334	1 1 1 0 
335	1 1 1 1 
336	1 1 0 1 
337	0 0 0 1 	^ v     ;
340	0 1 1 0 
341	0 0 0 0 
342	0 1 1 1 
343	0 0 0 1 	^ v     ;CLR	PC
344	1 1 1 0 
345	0 1 0 1 
346	1 1 0 1 
347	0 0 0 1 	^ ----->;JMP	165564		;GO BACK TO CONSOLE UCODE
350	0 1 0 1 
351	0 1 1 1 
352	0 1 1 0 
353	1 1 1 1 	^	;
354	0 0 0 0 
355	1 0 1 1 
356	1 1 0 1 
357	0 0 0 1 	^	;SEC			;SET TO RET TO CONSOLE UCODE
360	0 0 0 1 
361	1 1 0 0 
362	1 0 0 0 
363	0 0 0 0 	^	;MOV	#1,R0		;WITH 1 IN R1
364	0 0 0 0 
365	0 0 0 0 
366	1 1 0 1 
367	0 0 0 1 	^	;			;DO FULL RETRY
370	0 1 1 1 
371	1 1 0 0 
372	1 1 0 0 
373	0 0 0 1 	^<------;BR	173212
374	1 0 1 1 
375	1 0 0 0 
376	1 1 1 0 
377	1 0 0 0 		;CRC CHARACTER