	org	100H
;
; inserts a patch to set the max drive in seldsk to avoid problems
; with the Morrow virtual drive concept...
; can be inserted in BYE/MBYE, finds SELDSK address through the
; vector jump table.
;
; prevents a remote user from hanging the system by requesting a drive
; that doesn't exist...
;
; Gary Breuckman, Computer Services, P.O. Box 1648, Milwaukee WI 53201
;
start:	lhld	1	;warm boot jump
	lxi	d,9*3	;add seldsk 3x
	dad	d	;(each entry in jump table is 3 bytes)
	dcx	h
	mov	d,m
	dcx	h
	mov	e,m
	xchg		;addr of seldsk to hl
	inx	h	;byte to patch
	mvi	m,1
;			;note, the '1' in the above line is
;			;the number of drives less 1,
;			;ie, 1 means allow two drives (A and B).
;			;standard seldsk has '4', drives through
;			;'E' are allowed.
;
	ret
	end	start
