Removed hard-coded addresses from BOOTMAN.mac
This commit is contained in:
parent
71546f1ed5
commit
08d48b9257
6 changed files with 153 additions and 153 deletions
|
|
@ -13,7 +13,7 @@
|
|||
13
|
||||
14 .ASECT
|
||||
15 140000 .=140000
|
||||
16 140000 000005 START: RESET ; 140000
|
||||
16 140000 000005 START: RESET
|
||||
17 140002 005037 177776 CLR @#PSW
|
||||
18 140006 012706 140000 MOV #START,SP
|
||||
19 140012 005037 177564 CLR @#DL11XCSR ; CLEAR THE XCSR
|
||||
|
|
@ -41,19 +41,19 @@
|
|||
41 140124 000000 LGHTON: .WORD 0
|
||||
42 140126 000000 CLKTIC: .WORD 0
|
||||
43
|
||||
44 CLKAST: ; 140124
|
||||
44 CLKAST:
|
||||
45 140130 005267 140126' INC CLKTIC
|
||||
46 140134 000002 RTI
|
||||
47
|
||||
48 ONECHR:
|
||||
49 140136 105737 177564 TSTB @#DL11XCSR ; 140132
|
||||
49 140136 105737 177564 TSTB @#DL11XCSR
|
||||
50 140142 100375 BPL ONECHR
|
||||
51 140144 110037 177566 MOVB R0,@#177566
|
||||
52 140150 000207 RTS PC
|
||||
53
|
||||
54 140152 000000 PRTPTR: .WORD 0 ; 140146
|
||||
54 140152 000000 PRTPTR: .WORD 0
|
||||
55
|
||||
56 PRINT: ; 140150
|
||||
56 PRINT:
|
||||
57 140154 132737 000100 177564 BITB #100,@#DL11XCSR
|
||||
58 140162 001374 BNE PRINT
|
||||
59 140164 010067 140152' MOV R0,PRTPTR
|
||||
|
|
@ -62,7 +62,7 @@
|
|||
62 140204 152737 000100 177564 BISB #100,@#DL11XCSR
|
||||
63 140212 000207 RTS PC
|
||||
64
|
||||
65 PRTAST: ; 140210
|
||||
65 PRTAST:
|
||||
66 140214 105777 140152' TSTB @PRTPTR
|
||||
67 140220 001406 BEQ 2$
|
||||
68 140222 117737 140152' 177566 MOVB @PRTPTR,@#177566
|
||||
|
|
@ -75,14 +75,14 @@
|
|||
75 140246 000000 LENGTH: .WORD 0 ; INPUT BUFFER LENGTH
|
||||
76
|
||||
77 INPUT:
|
||||
78 140250 010067 140244' MOV R0,BUFFER ; 140244
|
||||
78 140250 010067 140244' MOV R0,BUFFER
|
||||
79 140254 005067 140246' CLR LENGTH
|
||||
80 140260 012737 140304 000060 MOV #INPAST,@#60
|
||||
81 140266 012737 000200 000062 MOV #200,@#62
|
||||
82 140274 152737 000100 177560 BISB #100,@#177560
|
||||
83 140302 000207 RTS PC
|
||||
84
|
||||
85 INPAST: ; 140300
|
||||
85 INPAST:
|
||||
86 140304 010046 MOV R0,-(SP)
|
||||
87 140306 113700 177562 MOVB @#177562,R0
|
||||
88 140312 120027 000015 CMPB R0,#15
|
||||
|
|
@ -125,7 +125,7 @@
|
|||
125 140506 012600 9$: MOV (SP)+,R0
|
||||
126 140510 000002 RTI
|
||||
127
|
||||
128 CMD: ; 140506
|
||||
128 CMD:
|
||||
129 140512 005037 177772 CLR @#177772 ; NO MORE PIR CALLS
|
||||
130 140516 010046 MOV R0,-(SP)
|
||||
131 140520 010146 MOV R1,-(SP)
|
||||
|
|
@ -257,18 +257,18 @@
|
|||
195
|
||||
196 .EVEN
|
||||
197
|
||||
198 HELP: ; 141244
|
||||
198 HELP:
|
||||
199 141236 012700 140716 MOV #HLPMSG,R0
|
||||
200 141242 004767 140154' JSR PC,PRINT
|
||||
201 141246 000207 RTS PC
|
||||
202
|
||||
203 HALT: ; 141260
|
||||
203 HALT:
|
||||
204 141250 000000 HALT
|
||||
205 141252 012700 141040 MOV #EOL,R0
|
||||
206 141256 004767 140154' JSR PC,PRINT
|
||||
207 141262 000207 RTS PC
|
||||
208
|
||||
209 TEST: ; 141272
|
||||
209 TEST:
|
||||
210 141264 005067 140126' CLR CLKTIC
|
||||
211
|
||||
212 141270 012705 015000 MOV #15000,R5
|
||||
|
|
@ -290,7 +290,7 @@
|
|||
228 141332 012700 141217 MOV #PERMSG+5,R0
|
||||
229 141336 016703 140126' MOV CLKTIC,R3
|
||||
230
|
||||
231 141342 005002 25$: CLR R2 ; 141350
|
||||
231 141342 005002 25$: CLR R2
|
||||
232 141344 071227 000010 DIV #10,R2
|
||||
233 141350 062703 000060 ADD #'0,R3
|
||||
234 141354 110340 MOVB R3,-(R0)
|
||||
|
|
@ -306,7 +306,7 @@
|
|||
244 177576 MMR2=177576
|
||||
245 172516 MMR3=172516
|
||||
246
|
||||
247 LIGHTS: ; 141376
|
||||
247 LIGHTS:
|
||||
248 141370 012703 077406 MOV #77406,R3 ; DEFAULT PDR
|
||||
249 141374 005002 CLR R2
|
||||
250 141376 005001 CLR R1
|
||||
|
|
@ -350,7 +350,7 @@
|
|||
288 ; TO BE COPIED TO SUPER #40200 AT PHYSICAL #170000
|
||||
289 ; #40000 TO #40200 FOR WAIT & JMP INSTRUCTIONS
|
||||
290 ;
|
||||
291 SUPERS: ; 141616
|
||||
291 SUPERS:
|
||||
292 141610 012700 000037 MOV #37,R0 ; LOAD PATTERN
|
||||
293 141614 012701 174000 MOV #174000,R1
|
||||
294 141620 032737 000001 177570 BIT #1,@#177570
|
||||
|
|
@ -406,7 +406,7 @@
|
|||
344 142052 000702 BR 10$
|
||||
345 SUPERE:
|
||||
346
|
||||
347 BOOT: ; 142062
|
||||
347 BOOT:
|
||||
348 142054 005003 CLR R3 ; UNIT
|
||||
349 142056 112201 1$: MOVB (R2)+,R1
|
||||
350 142060 001545 BEQ BOOTRK ; DEFAULT DEVICE IS RK0
|
||||
|
|
@ -450,7 +450,7 @@
|
|||
388 142224 000207 RTS PC
|
||||
389
|
||||
390 174400 RLCS=174400
|
||||
391 BOOTRL: ; 142326
|
||||
391 BOOTRL:
|
||||
392 142226 000005 RESET
|
||||
393 142230 000303 SWAB R3 ; UNIT NUMBER
|
||||
394 142232 012701 174400 MOV #RLCS,R1 ; CSR
|
||||
|
|
@ -491,7 +491,7 @@
|
|||
429 177412 RKDA=177412
|
||||
430 000005 READGO=5
|
||||
431 BOOTRK:
|
||||
432 142374 000005 RESET ; 142402
|
||||
432 142374 000005 RESET
|
||||
433 142376 000303 SWAB R3 ; UNIT NUMBER
|
||||
434 142400 006303 ASL R3
|
||||
435 142402 006303 ASL R3
|
||||
|
|
@ -513,7 +513,7 @@
|
|||
451 142450 005007 CLR PC
|
||||
452
|
||||
453 176700 RPCSR=0176700
|
||||
454 BOOTRP: ; 142460
|
||||
454 BOOTRP:
|
||||
455 142452 000005 RESET
|
||||
456 142454 012701 176700 MOV #RPCSR, R1
|
||||
457 142460 012761 000040 000010 MOV #0000040, 10(R1) ; RESET
|
||||
|
|
|
|||
Loading…
Reference in a new issue