mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-25 17:34:06 +00:00
71 lines
1.5 KiB
Plaintext
71 lines
1.5 KiB
Plaintext
pip a:=prlcm.plm[g8]
|
||
seteof prlcm.plm
|
||
isx
|
||
plm80 prlcm.plm nolist debug
|
||
era prlcm.plm
|
||
link prlcm.obj,x0100,plm80.lib to prlcm1.mod
|
||
locate prlcm1.mod code(0100H) stacksize(100)
|
||
era prlcm1.mod
|
||
objhex prlcm1 to prlcm1.hex
|
||
link prlcm.obj,x0200,plm80.lib to prlcm2.mod
|
||
locate prlcm2.mod code(0200H) stacksize(100)
|
||
era prlcm2.mod
|
||
objhex prlcm2 to prlcm2.hex
|
||
era prlcm2
|
||
cpm
|
||
objcpm prlcm1
|
||
era prlcm1.com
|
||
pip prlcm.hex=prlcm1.hex,prlcm2.hex
|
||
era prlcm1.hex
|
||
era prlcm2.hex
|
||
zero
|
||
genmod prlcm.hex xprlcm.prl
|
||
era *.hex
|
||
pip a:=sub.plm[g8]
|
||
seteof sub.plm
|
||
isx
|
||
plm80 sub.plm nolist debug
|
||
era sub.plm
|
||
link sub.obj,x0100,plm80.lib to sub1.mod
|
||
locate sub1.mod code(0100H) stacksize(100)
|
||
era sub1.mod
|
||
objhex sub1 to sub1.hex
|
||
link sub.obj,x0200,plm80.lib to sub2.mod
|
||
locate sub2.mod code(0200H) stacksize(100)
|
||
era sub2.mod
|
||
objhex sub2 to sub2.hex
|
||
era sub2
|
||
cpm
|
||
objcpm sub1
|
||
era sub1.com
|
||
pip sub.hex=sub1.hex,sub2.hex
|
||
era sub1.hex
|
||
era sub2.hex
|
||
zero
|
||
genmod sub.hex xsub.prl
|
||
era *.hex
|
||
pip a:=tod.plm[g8]
|
||
seteof tod.plm
|
||
isx
|
||
plm80 tod.plm nolist debug
|
||
era tod.plm
|
||
link tod.obj,x0100,plm80.lib to tod1.mod
|
||
locate tod1.mod code(0100H) stacksize(100)
|
||
era tod1.mod
|
||
objhex tod1 to tod1.hex
|
||
link tod.obj,x0200,plm80.lib to tod2.mod
|
||
locate tod2.mod code(0200H) stacksize(100)
|
||
era tod2.mod
|
||
objhex tod2 to tod2.hex
|
||
era tod2
|
||
cpm
|
||
objcpm tod1
|
||
era tod1.com
|
||
pip tod.hex=tod1.hex,tod2.hex
|
||
era tod1.hex
|
||
era tod2.hex
|
||
zero
|
||
genmod tod.hex xtod.prl
|
||
era *.hex
|
||
sub prlb3
|
||
|