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:
15
CPM OPERATING SYSTEMS/CPM 2.X/CPM 2.2/PATCHES/DEXSUB.ASM
Normal file
15
CPM OPERATING SYSTEMS/CPM 2.X/CPM 2.2/PATCHES/DEXSUB.ASM
Normal file
@@ -0,0 +1,15 @@
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
; This program is intended to be executed from a submit file to de-activate ;
|
||||
; xsub and allow input from the console. It has a side effect of turning off;
|
||||
; the ^P toggle if it is on. ;
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
org 100h ;stay above page 0
|
||||
bdos equ 0005h ;bdos location in base page
|
||||
mvi c,9 ;print string = function 9
|
||||
lxi d,msg ;
|
||||
call bdos ;
|
||||
mvi c,0 ;system reset = function 0
|
||||
jmp bdos ;exit bdos to ccp
|
||||
msg db 0dh,0ah,'(xsub deactivated; ^P turned off if on)$'
|
||||
end
|
||||
|
||||
Reference in New Issue
Block a user