Retro/pcjs
Watch
1
0
Fork
You've already forked pcjs
 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Added support to FileDump for generating binary dumps from MACRO11 listing (.lst) files, since I wasn't having much success with dumpobj or obj2hex.pl; note that this assumes a listing file produced by the macro11 cross-assembler written by Richard Krehbiel in 2001, updated in 2009, and maintained here: https://github.com/shattered/macro11. There are other versions of macro11 floating around, like the one in the simtools project that accompanies simh, and the one built for the Windows-based PDP11GUI app.

Browse source
This commit is contained in:
Jeff Parsons 2016-10-15 11:05:38 -07:00 • committed by Jeff Parsons
commit 3a7b769fa3
31 changed files with 1117 additions and 751 deletions
Download patch file Download diff file Expand all files Collapse all files

40
devices/pdp11/rom/custom/boot.mac
View file

@ -4,21 +4,23 @@
; WANT PERFORMANCE COUNTER - CLOCK TICKS TO DO SOMETHING?
PSW = 177776
DL11_XCSR = 177564
DL11_VEC = 64
DL11XCSR = 177564
DL11VEC = 64
KW11_LKS = 177546
KW11_VEC = 100
KW11LKS = 177546
KW11VEC = 100
.ASECT
.=140000
START: RESET ; 140000
CLR @#PSW
MOV #START,SP
CLR @#DL11_XCSR ; CLEAR THE XCSR
CLR @#DL11XCSR ; CLEAR THE XCSR
MOV #BANNER,R0
JSR PC,PRINT
MOV #CLKAST,@#KW11_VEC
MOV #340,@#KW11_VEC+2
BIS #100,@#KW11_LKS ; SET CLOCK TICKING
MOV #CLKAST,@#KW11VEC
MOV #340,@#KW11VEC+2
BIS #100,@#KW11LKS ; SET CLOCK TICKING
MOV #PROMPT,R0
JSR PC,PRINT
@ -32,17 +34,17 @@ START: RESET ; 140000
BEQ 1$
MOV #054000,-(SP) ; SUPER PRIORITY 0 ALT REG
MOV LGHTON,-(SP) ; CALL SUPER LOOP START
RTT
RTI
LGHTON: .WORD 0
CLKTIC: .WORD 0
CLKAST: ; 140124
INC CLKTIC
RTT
RTI
ONECHR:
TSTB @#DL11_XCSR ; 140132
TSTB @#DL11XCSR ; 140132
BPL ONECHR
MOVB R0,@#177566
RTS PC
@ -50,12 +52,12 @@ ONECHR:
PRTPTR: .WORD 0 ; 140146
PRINT: ; 140150
BITB #100,@#DL11_XCSR
BITB #100,@#DL11XCSR
BNE PRINT
MOV R0,PRTPTR
MOV #PRTAST,@#DL11_VEC
MOV #200,@#DL11_VEC+2
BISB #100,@#DL11_XCSR
MOV #PRTAST,@#DL11VEC
MOV #200,@#DL11VEC+2
BISB #100,@#DL11XCSR
RTS PC
PRTAST: ; 140210
@ -63,9 +65,9 @@ PRTAST: ; 140210
BEQ 2$
MOVB @PRTPTR,@#177566
INC PRTPTR
RTT
RTI
2$: CLRB @#177564
RTT
RTI
BUFFER: .WORD 0 ; INPUT BUFFER POINTER
LENGTH: .WORD 0 ; INPUT BUFFER LENGTH
@ -119,7 +121,7 @@ INPAST: ; 140300
MOV #100,@#242
MOV #2000,@#177772
9$: MOV (SP)+,R0
RTT
RTI
CMD: ; 140506
CLR @#177772 ; NO MORE PIR CALLS
@ -169,7 +171,7 @@ CMD: ; 140506
MOV (SP)+,R2
MOV (SP)+,R1
MOV (SP)+,R0
RTT
RTI
CMDTBL: .WORD BOOT,HALT,TEST,LIGHTS,HELP