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:=cns.plm[g8]
|
||
seteof cns.plm
|
||
isx
|
||
plm80 cns.plm nolist debug
|
||
era cns.plm
|
||
link cns.obj,x0100,plm80.lib to cns1.mod
|
||
locate cns1.mod code(0100H) stacksize(100)
|
||
era cns1.mod
|
||
objhex cns1 to cns1.hex
|
||
link cns.obj,x0200,plm80.lib to cns2.mod
|
||
locate cns2.mod code(0200H) stacksize(100)
|
||
era cns2.mod
|
||
objhex cns2 to cns2.hex
|
||
era cns2
|
||
cpm
|
||
objcpm cns1
|
||
era cns1.com
|
||
pip cns.hex=cns1.hex,cns2.hex
|
||
era cns1.hex
|
||
era cns2.hex
|
||
zero
|
||
genmod cns.hex xcns.prl
|
||
era *.hex
|
||
pip a:=drst.plm[g8]
|
||
seteof drst.plm
|
||
isx
|
||
plm80 drst.plm nolist debug
|
||
era drst.plm
|
||
link drst.obj,x0100,plm80.lib to drst1.mod
|
||
locate drst1.mod code(0100H) stacksize(100)
|
||
era drst1.mod
|
||
objhex drst1 to drst1.hex
|
||
link drst.obj,x0200,plm80.lib to drst2.mod
|
||
locate drst2.mod code(0200H) stacksize(100)
|
||
era drst2.mod
|
||
objhex drst2 to drst2.hex
|
||
era drst2
|
||
cpm
|
||
objcpm drst1
|
||
era drst1.com
|
||
pip drst.hex=drst1.hex,drst2.hex
|
||
era drst1.hex
|
||
era drst2.hex
|
||
zero
|
||
genmod drst.hex xdrst.prl
|
||
era *.hex
|
||
pip a:=print.plm[g8]
|
||
seteof print.plm
|
||
isx
|
||
plm80 print.plm nolist debug
|
||
era print.plm
|
||
link print.obj,x0100,plm80.lib to print1.mod
|
||
locate print1.mod code(0100H) stacksize(100)
|
||
era print1.mod
|
||
objhex print1 to print1.hex
|
||
link print.obj,x0200,plm80.lib to print2.mod
|
||
locate print2.mod code(0200H) stacksize(100)
|
||
era print2.mod
|
||
objhex print2 to print2.hex
|
||
era print2
|
||
cpm
|
||
objcpm print1
|
||
era print1.com
|
||
pip print.hex=print1.hex,print2.hex
|
||
era print1.hex
|
||
era print2.hex
|
||
zero
|
||
genmod print.hex xprint.prl
|
||
era *.hex
|
||
sub prlb2
|
||
|