mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-24 08:54:17 +00:00
Upload
Digital Research
This commit is contained in:
81
CPM OPERATING SYSTEMS/CPM 2.X/CPM 2.2/PATCHES/CPM22APN.08
Normal file
81
CPM OPERATING SYSTEMS/CPM 2.X/CPM 2.2/PATCHES/CPM22APN.08
Normal file
@@ -0,0 +1,81 @@
|
||||
CP/M V2.2
|
||||
Application Note 08, 2/20/82
|
||||
Nested SUBMIT Files
|
||||
|
||||
Copyright 1982 by Digital Research
|
||||
CP/M is a registered trademark of Digital Research.
|
||||
DDT is a trademark of Digital Research.
|
||||
Compiled November 1982
|
||||
|
||||
Applicable products and version numbers: CP/M V2.1 and V2.2
|
||||
|
||||
Program: SUBMIT.COM
|
||||
|
||||
The CP/M SUBMIT program allows you to embed another SUBMIT
|
||||
command within a submit file. However, control does not return to
|
||||
the original SUBMIT file after executing the nested SUBMIT command.
|
||||
To return control to the original SUBMIT command, use any standard
|
||||
editor to type the following procedure into a file named
|
||||
SUBPATCH.ASM:
|
||||
|
||||
;
|
||||
;
|
||||
subfcb: equ 5bbh
|
||||
bdos: equ 5
|
||||
open: equ 211h
|
||||
;
|
||||
org 22dh ;submit erase subroutine
|
||||
;
|
||||
opsl: lda subfcb+15 ;file open ok if ext not full
|
||||
ral
|
||||
rnc
|
||||
lxi h,subfcb+12 ;try next extent
|
||||
inr m
|
||||
ops: lxi d,subfcb ;open extent
|
||||
jmp create
|
||||
;
|
||||
org 25dh ;submit create subroutine
|
||||
create: call open
|
||||
inr a
|
||||
jnz opsl ;loop if open ok
|
||||
lxi d,subfcb
|
||||
mvi c,22
|
||||
call bdos
|
||||
adi 1
|
||||
ret
|
||||
;
|
||||
; the following code calls the above routines
|
||||
;
|
||||
org 4feh
|
||||
;
|
||||
call ops ;open the $$$.sub file
|
||||
jc 517h ;jump if not opened ok
|
||||
lda subfcb+15 ;set current record to end
|
||||
sta subfcb+32
|
||||
jmp 51dh ;jump if open ok
|
||||
;
|
||||
org subfcb
|
||||
db 1 ;force $$$.sub file to A:
|
||||
;
|
||||
end
|
||||
|
||||
|
||||
Assemble SUBPATCH ASM to create the file SUBPATCH.HEX. Then use
|
||||
DDT to insert SUBPATCH.HEX into the SUBMIT.COM program, as shown
|
||||
below.
|
||||
|
||||
A>ddt submit.com
|
||||
DDT VERS 2.2
|
||||
NEXT PC
|
||||
0600 0100
|
||||
-isubpatch.hex
|
||||
-r
|
||||
-g0
|
||||
A>save 5 submit1.com
|
||||
|
||||
|
||||
In the new program SUBMIT1.COM, control returns to the original
|
||||
SUBMIT file after the system executes embedded SUBMIT commands.
|
||||
|
||||
Licensed users are granted the right to include these
|
||||
modifications in CP/M V2.1 and V2.2 software.
|
||||
Reference in New Issue
Block a user