mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-26 09:54:20 +00:00
Upload
Digital Research
This commit is contained in:
84
MPM OPERATING SYSTEMS/MPM II/MPM II SOURCE/UTIL5/PRLB4.OLD
Normal file
84
MPM OPERATING SYSTEMS/MPM II/MPM II SOURCE/UTIL5/PRLB4.OLD
Normal file
@@ -0,0 +1,84 @@
|
||||
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
|
||||
|
||||
Reference in New Issue
Block a user