	.Z80
	TITLE	COLEX 880 series hardware initialisation
	SUBTTL	Copyright (C) 1984, Colex Electronic Co. Ltd.
	NAME	('HDWINI')
	INCLUDE COPYRIGH
;****************************************************************
;*								*
;*	    Colex-880 series Hardware initialisation		*
;*								*
;*	This module performs hardware initialisation for the	*
;*	system by calling the various initialisation		*
;*	subroutines within the various modules.			*
;*								*
;****************************************************************
;  Date		    Author		Modification
;20-Jul-84	R.J. Wellsted
;22-Sep-84	R.J. Wellsted	added call to rtcnul init point RTCNIT
	PAGE
	COMMON	/?INIT?/	;code in initialisation area

	PUBLIC	HDWNIT		;entry point

	EXTRN	INTINI,BNKINI	;interupt/bank switch init
	EXTRN	CONINA		;console init
	EXTRN	LSTINA,LSTINB	;list device init
	EXTRN	SCCINI,CIOINI	;character device init
	EXTRN	DSKINA,DSKINB	;disk i/o init
	EXTRN	CKTINA,CKTINB	;network i/o init
	EXTRN	RTCNIT		;rtcnul init

HDWNIT:	DI			;stop interupts (if any)
	CALL	INTINI		;initialise interupt page
	CALL	BNKINI		;initialise bank code
	CALL	CONINA		;initialise console
	CALL	LSTINA		;initialise printer(s)
	CALL	LSTINB		;intialise alternate printers
	CALL	DSKINA		;initialise disk driver A
	CALL	DSKINB		;initialise disk driver B
	CALL	CKTINA		;initialise local network
	CALL	CKTINB		;initialise remote network
	CALL	SCCINI		;initialise scc
	CALL	CIOINI		;initialise cio
	CALL	RTCNIT		;initialise rtcnul
	RET			;finished initialisation

	END
