;
;	CUSTOM MOV-BIOS SKELETON FOR MOVE-IT   (12/1/81)
;
;
;		WRITTEN BY:     JEFF WOOLF
;				WOOLF SOFTWARE SYSTEMS
;				23842 ARCHWOOD ST.
;				CANOGA PARK, CA 91307
	ORG	100H

BIOS:	EQU	$		;THIS IS THE USER'S BIOS!!!
START:	JMP	0302H		;THE WAY TO THE PROGRAM
	JMP	4000H		;END OF USER SECTION
	JMP	INITI		;COMLINE INIT.
	JMP	FINISH		;COMLINE DE-INIT.
	JMP	INSTA		;COMLINE STATUS
	JMP	INDAT		;COMLINE DATA INPUT
	JMP	OUTSTA		;COMLINE OUTPUT STATUS
	JMP	OUTDAT		;COMLINE OUTPUT DATA
	JMP	CNFGMS		;POINT TO THE CONFIGURATION MESSAGE
	JMP	DIAL		;AUTO-DIAL/ANSWER SUPPORT

;	THE CONFIG MESSAGE IS 80 CHARACTERS LONG, PLUS A CR AND TWO LFS
CNFGMS:	
	DB	'               INSERT A MESSAGE THAT DESCRIBES '
	DB	'YOUR MACHINE HERE               '
	DB	0DH,0AH,0AH,'$'


INITI:				;INIT. COMLINE (NO ENTRY,EXIT PARMS)

; ----- ANY CODE THE SYSTEM NEEDS TO INITIALIZE THE COMLINE -----
; -----                SHOULD BE ADDED HERE                 -----

	RET


FINISH:			;DE-INIT. COMLINE (NO ENTRY,EXIT PARMS)

; ----- ANY CODE THE SYSTEM NEEDS TO UN -- INITIALIZE THE COMLINE -----
; -----                   SHOULD BE ADDED HERE                    -----

	RET

INSTA:			;INPUT STATUS (A=FF IF CHAR READY,0 IF NOT)

;	ADD A ROUTINE TO READ THE STATUS OF THE INPUT PORT HERE
;	USE ANY REGISTERS YOU LIKE, AND UPON EXIT, SET THE A REG
;	TO 0FFH IF A CHARACTER IS WAITING, OR TO 0 IF NOT

	RET

INDAT:			;INPUT DATA (EXIT W/ CHARS. IN A REG)

;	ADD A ROUTINE TO GET THE DATA AT THE INPUT PORT HERE
;	RETURN THE CARACTER IN THE A REGISTER (DO NOT CHANGE THE 
;	CHARACTER IN ANY WAY!

	RET

OUTSTA:			;OUTPUT STATUS (A=FF IF RDY FOR CHAR, 0 IF NOT)

;	ADD A ROUTINE TO READ THE STATUS OF THE OUTPUT PORT HERE.
;	USE ANY REGISTERS YOU LIKE, AND, UPON EXIT, SET THE A REG
;	TO 0FFH IF THE DATA PORT IS READY TO SEND DATA, OR TO 0 IF
;	NOT.

	RET

OUTDAT:			;OUTPUT DATA (CHAR IN A ON ENTRY)

;	ADD A ROUTINE TO OUTPUT THE CHARACTER IN THE A REGISTER TO
;	THE DATA PORT.

	RET

DIAL:			;AUTO DIAL/ANSWER SUPPORT

;
;	UPON ENTRY, B=0 FOR DIALING, 1 FOR HANGING UP,
;		   OR 2 FOR ANSWERING
;
;	IF B=0 (DIALING), HL POINTS TO THE DIALING STRING,
;			TERMINATED BY A COMMA, CR, OR CONTROL-Z
;
	RET
	END