;
; Oliver Schmidt, 03.03.2007
;
; COUT routine
;

	.export		COUT

	.include	"apple2.inc"

	.segment        "LOWCODE"

COUT:
	; Switch in ROM and call COUT
	bit	$C082
	jsr	$FDED		; Vector to user output routine

	; Switch in LC bank 2 for R/O and return
	bit	$C080
	rts