era b:*.lst
era b:*.lin
era b:*.sym
era b:*.bak
isdd
plm80 :f1:type.plm pagewidth(80) debug
cpm
pip lst:=b:type.lst
pip lst:=nul:[p]
era b:type.lst
isdd
link :f1:type.obj,:f1:x0100,plm80.lib to :f1:type1.mod
locate :f1:type1.mod code(0100H) stacksize(48)
era b:type1.mod
objhex :f1:type1 to :f1:type1.hex
link :f1:type.obj,:f1:x0200,plm80.lib to :f1:type2.mod
locate :f1:type2.mod code(0200H) stacksize(48)
era b:type2.mod
objhex :f1:type2 to :f1:type2.hex
era b:type2
cpm
objcpm b:type1
era b:type*.
era b:type1.com
pip b:type.hex=b:type1.hex,b:type2.hex
era b:type1.hex
era b:type2.hex
genmod b:type.hex b:type.prl 
era b:*.hex
pip lst:=b:type1.sym[pt8]
pip lst:=b:type1.lin[pt8]
pip lst:=nul:[p]
era b:*.lst
era b:*.lin
era b:*.sym
era b:*.bak
isdd
plm80 :f1:user.plm pagewidth(80) debug
cpm
pip lst:=b:user.lst
pip lst:=nul:[p]
era b:user.lst
isdd
link :f1:user.obj,:f1:x0100,plm80.lib to :f1:user1.mod
locate :f1:user1.mod code(0100H) stacksize(48)
era b:user1.mod
objhex :f1:user1 to :f1:user1.hex
link :f1:user.obj,:f1:x0200,plm80.lib to :f1:user2.mod
locate :f1:user2.mod code(0200H) stacksize(48)
era b:user2.mod
objhex :f1:user2 to :f1:user2.hex
era b:user2
cpm
objcpm b:user1
era b:user*.
era b:user1.com
pip b:user.hex=b:user1.hex,b:user2.hex
era b:user1.hex
era b:user2.hex
genmod b:user.hex b:user.prl 
era b:*.hex
pip lst:=b:user1.sym[pt8]
pip lst:=b:user1.lin[pt8]
pip lst:=nul:[p]
sub prl7