mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-25 09:24:19 +00:00
71 lines
1.6 KiB
Plaintext
71 lines
1.6 KiB
Plaintext
pip a:=user.plm[g8]
|
||
seteof user.plm
|
||
isx
|
||
plm80 user.plm nolist debug
|
||
era user.plm
|
||
link user.obj,x0100,plm80.lib to user1.mod
|
||
locate user1.mod code(0100H) stacksize(100)
|
||
era user1.mod
|
||
objhex user1 to user1.hex
|
||
link user.obj,x0200,plm80.lib to user2.mod
|
||
locate user2.mod code(0200H) stacksize(100)
|
||
era user2.mod
|
||
objhex user2 to user2.hex
|
||
era user2
|
||
cpm
|
||
objcpm user1
|
||
era user1.com
|
||
pip user.hex=user1.hex,user2.hex
|
||
era user1.hex
|
||
era user2.hex
|
||
zero
|
||
genmod user.hex xuser.prl
|
||
era *.hex
|
||
pip a:=abort.plm[g8]
|
||
seteof abort.plm
|
||
isx
|
||
plm80 abort.plm nolist debug
|
||
era abort.plm
|
||
link abort.obj,x0100,plm80.lib to abort1.mod
|
||
locate abort1.mod code(0100H) stacksize(100)
|
||
era abort1.mod
|
||
objhex abort1 to abort1.hex
|
||
link abort.obj,x0200,plm80.lib to abort2.mod
|
||
locate abort2.mod code(0200H) stacksize(100)
|
||
era abort2.mod
|
||
objhex abort2 to abort2.hex
|
||
era abort2
|
||
cpm
|
||
objcpm abort1
|
||
era abort1.com
|
||
pip abort.hex=abort1.hex,abort2.hex
|
||
era abort1.hex
|
||
era abort2.hex
|
||
zero
|
||
genmod abort.hex xabort.prl
|
||
era *.hex
|
||
pip a:=mschd.plm[g8]
|
||
seteof mschd.plm
|
||
isx
|
||
plm80 mschd.plm nolist debug
|
||
era mschd.plm
|
||
link mschd.obj,x0100,plm80.lib to mschd1.mod
|
||
locate mschd1.mod code(0100H) stacksize(100)
|
||
era mschd1.mod
|
||
objhex mschd1 to mschd1.hex
|
||
link mschd.obj,x0200,plm80.lib to mschd2.mod
|
||
locate mschd2.mod code(0200H) stacksize(100)
|
||
era mschd2.mod
|
||
objhex mschd2 to mschd2.hex
|
||
era mschd2
|
||
cpm
|
||
objcpm mschd1
|
||
era mschd1.com
|
||
pip mschd.hex=mschd1.hex,mschd2.hex
|
||
era mschd1.hex
|
||
era mschd2.hex
|
||
zero
|
||
genmod mschd.hex xmschd.prl
|
||
era *.hex
|
||
sub prlb4
|
||
|