mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-23 16:34:07 +00:00
109 lines
2.0 KiB
Plaintext
109 lines
2.0 KiB
Plaintext
; CPM 3 PLM PROGRAM GENERATION SUBMIT #2
|
|
;
|
|
; ERASE GENERATION
|
|
;
|
|
stat con:=tty:
|
|
vax $$as\sd mason.cpm30.sources\ar
|
|
vax erase.plm $$stran
|
|
stat con:=uc1:
|
|
seteof erase.plm
|
|
is14
|
|
plm80 erase.plm pagewidth(100) debug optimize
|
|
link mcd80a.obj,erase.obj,parse.obj,plm80.lib to erase.mod
|
|
locate erase.mod code(0100H) stacksize(100)
|
|
era erase.mod
|
|
cpm
|
|
zero
|
|
objcpm erase
|
|
stat con:=tty:
|
|
vax $$as\sd mason.cpm30.listing\ar
|
|
vax erase.lst $$stran
|
|
vax erase.sym $$stran
|
|
vax erase.lin $$stran
|
|
stat con:=uc1:
|
|
era erase.obj
|
|
era *.lst
|
|
era *.sym
|
|
era *.lin
|
|
;
|
|
; TYPE GENERATION
|
|
;
|
|
stat con:=tty:
|
|
vax $$as\sd mason.cpm30.sources\ar
|
|
vax type.plm $$stran
|
|
stat con:=uc1:
|
|
seteof type.plm
|
|
is14
|
|
plm80 type.plm pagewidth(100) debug optimize
|
|
link mcd80a.obj,type.obj,parse.obj,plm80.lib to type.mod
|
|
locate type.mod code(0100H) stacksize(100)
|
|
era type.mod
|
|
cpm
|
|
zero
|
|
objcpm type
|
|
era type.obj
|
|
stat con:=tty:
|
|
vax $$as\sd mason.cpm30.listing\ar
|
|
vax type.lst $$stran
|
|
vax type.sym $$stran
|
|
vax type.lin $$stran
|
|
stat con:=uc1:
|
|
era *.sym
|
|
era *.lst
|
|
era *.lin
|
|
;
|
|
; RENAME GENERATION
|
|
;
|
|
stat con:=tty:
|
|
vax $$as\sd mason.cpm30.sources\ar
|
|
vax rename.plm $$stran
|
|
stat con:=uc1:
|
|
seteof rename.plm
|
|
is14
|
|
plm80 rename.plm pagewidth(100) debug optimize
|
|
link mcd80a.obj,rename.obj,parse.obj,plm80.lib to rename.mod
|
|
locate rename.mod code(0100H) stacksize(100)
|
|
era rename.mod
|
|
cpm
|
|
zero
|
|
objcpm rename
|
|
stat con:=tty:
|
|
vax $$as\sd mason.cpm30.listing\ar
|
|
vax rename.lst $$stran
|
|
vax rename.sym $$stran
|
|
vax rename.lin $$stran
|
|
stat con:=uc1:
|
|
era rename.obj
|
|
era *.lin
|
|
era *.lst
|
|
era *.sym
|
|
;
|
|
; SETDEF GENERATION
|
|
;
|
|
stat con:=tty:
|
|
vax $$as\sd mason.cpm30.sources\ar
|
|
vax setdef.plm $$stran
|
|
stat con:=uc1:
|
|
seteof setdef.plm
|
|
is14
|
|
plm80 setdef.plm pagewidth(132) debug optimize
|
|
link mcd80a.obj,setdef.obj,plm80.lib to setdef.mod
|
|
locate setdef.mod code(0100H) stacksize(100)
|
|
era setdef.mod
|
|
cpm
|
|
zero
|
|
objcpm setdef
|
|
stat con:=tty:
|
|
vax $$as\sd mason.cpm30.listing\ar
|
|
vax setdef.lst $$stran
|
|
vax setdef.sym $$stran
|
|
vax setdef.lin $$stran
|
|
stat con:=uc1:
|
|
era setdef.obj
|
|
era *.lst
|
|
era *.lin
|
|
era *.sym
|
|
;
|
|
; CALL CPM3PLM3
|
|
SUB CPM3PLM3
|