Files
Digital-Research-Source-Code/MPM OPERATING SYSTEMS/MPM II/MPM II SOURCE/UTIL5/PRLB4.OLD
Sepp J Morris 31738079c4 Upload
Digital Research
2020-11-06 18:50:37 +01:00

84 lines
1.7 KiB
Plaintext
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

pip a:=mspl.plm[g8]
seteof mspl.plm
isx
plm80 mspl.plm nolist debug
era mspl.plm
link mspl.obj,x0100,plm80.lib to mspl1.mod
locate mspl1.mod code(0100H) stacksize(100)
era mspl1.mod
objhex mspl1 to mspl1.hex
link mspl.obj,x0200,plm80.lib to mspl2.mod
locate mspl2.mod code(0200H) stacksize(100)
era mspl2.mod
objhex mspl2 to mspl2.hex
era mspl2
cpm
objcpm mspl1
era mspl1.com
pip mspl.hex=mspl1.hex,mspl2.hex
era mspl1.hex
era mspl2.hex
zero
genmod mspl.hex xmspl.prl
era *.hex
pip a:=mscmn.plm[g8]
seteof mscmn.plm
pip a:=msts.plm[g8]
seteof msts.plm
isx
plm80 msts.plm nolist debug
era mscmn.plm
era msts.plm
link msts.obj,x0100,plm80.lib to msts1.mod
locate msts1.mod code(0100H) stacksize(100)
era msts1.mod
objhex msts1 to msts1.hex
link msts.obj,x0200,plm80.lib to msts2.mod
locate msts2.mod code(0200H) stacksize(100)
era msts2.mod
objhex msts2 to msts2.hex
era msts2
cpm
objcpm msts1
era msts1.com
pip msts.hex=msts1.hex,msts2.hex
era msts1.hex
era msts2.hex
zero
genmod msts.hex xmsts.prl
era *.hex
pip a:=stpsp.plm[g8]
seteof stpsp.plm
isx
plm80 stpsp.plm nolist debug
era stpsp.plm
link stpsp.obj,x0100,plm80.lib to stpsp1.mod
locate stpsp1.mod code(0100H) stacksize(100)
era stpsp1.mod
objhex stpsp1 to stpsp1.hex
link stpsp.obj,x0200,plm80.lib to stpsp2.mod
locate stpsp2.mod code(0200H) stacksize(100)
era stpsp2.mod
objhex stpsp2 to stpsp2.hex
era stpsp2
cpm
objcpm stpsp1
era stpsp1.com
pip stpsp.hex=stpsp1.hex,stpsp2.hex
era stpsp1.hex
era stpsp2.hex
zero
genmod stpsp.hex xstpsp.prl
era *.hex
pip a:=dump.asm[g8]
seteof dump.asm
pip a:=extrn.asm[g8]
seteof extrn.asm
rmac dump $$pzsz
era dump.asm
rmac extrn $$pzsz
era extrn.asm
link xdump=dump,extrn[op]
era dump.rel
era extrn.rel