	TITLE	'Sorcim CompuPro DISK1 CP/M BIOS.'
;CBIOS - Sorcim CompuPro CP/M 2.2 CBIOS.
;
;	+-----------------------+
;	|			|
;	|	C B I O S 	|
;	|			|
;	+-----------------------+
;
;
;	CompuPro			Sorcim Corp.
;	Oakland, CA			Santa Clara, CA
;
;	This product is a copyright program product of
;	Sorcim Corp. and is supplied for use with the CompuPro
;	Disk controllers.
;
;	Version number:	2.2J
; 80-10-27	Ver 2.2A
; 81-03-05	Ver 2.2E	Seek fixes. dwd.
; 81-03-30	Ver 2.2F	Add Bit Banger.  phm.
; 81-04-25	Ver 2.2G	Add System Support, two list devs. bdg.
; 81-05-21	Ver 2.2H	Add flushing fixes. dwd.
; 81-09-08	Ver 2.2J	Add Interfacer 3 I/O. bdg.
;
;	The following code is supplied to customers who
;	purchase a hard/floppy disk system from CompuPro.
;	The intent of the following code is to illustrate
;	how to create a CBIOS for the user supplied
;	CP/M 2.2.  In order to actually assemble this
;	source, the Sorcim ACT assembler is required.
;	The following CBIOS was developed and
;	tested using the following hardware components.
;
;	CompuPro IEEE 696 Floppy Disk Controller.
;	CompuPro IEEE 696 chassis and motherboards.
;	CompuPro IEEE 696 Dual Processor board.
;	CompuPro IEEE 696 RAM 20 boards (2).
;	CompuPro IEEE 696 Interfacer I (assigned port 0 thru 3).

OPARM:	EQU	*o		;Capture O parameter

VERS:	EQU	22
CBIOSV:	EQU	10		;CBIOS revision level (2.2J)

FALSE:	EQU	0
TRUE:	EQU	NOT FALSE
Z80:	EQU	FALSE		;Set to true if processor is Z80.
C8080:	EQU	not Z80		;Otherwise processor is 8080 type.
HARD:	EQU	FALSE		;Set to true if hard disk code
BANG:	EQU	TRUE		;False to eliminate Bit Banger.
SYSSUP:	EQU	TRUE		;Set to true to include system support code.
INTER3:	EQU	TRUE		;Set to true to include Interfacer 3

BIOSLN	=	01000h		;Bios length
	space	4,10
;	Link files.

	link	bios1		;Jump Table
	link	GBcbios2	;CP/M disk definitions
	link	GBcbios3	;Unit record I/O
	link	bios4		;Non data transfer disk
	link	GBcbios5	;Cold and Warm boot
	link	GBcbios6	;Disk data transfer I/O
	IF	HARD
;	(Link of hard disk support routines would go here.)
;*	link	gbcbios7.asm	;hard disk I/O routines
	ENDIF
	link	bios8		;Utility routines
	link	bios9		;CBIOS storage cells
