; include file
#dontinclude



function	setdisplay_cg3	setdisplay_cg3_c
rem	setdisplay_cg3( mode.b )
rem	
rem	sets the display mode to 128x96x4 color mode with color set 0 or 1
rem	
def	setdisplay_cg3_c	byte


setdisplay_cg3


	lda	#0
	ldx	#65472
	sta	1,x
	sta	3,x
	sta	4,x



; setup memory page 0
; @e00
	clra	;set value 7 so its at 3584 view
	ldx	#$ffc6
	sta	1,x
	sta	3,x
	sta	5,x
	sta	6,x
	sta	8,x
	sta	10,x
	sta	12,x


	if	b,setdisplay_cg3_c=#0
;192 / 200
	lda	$ff22
	ora	#192
	sta	$ff22
	else
	lda	$ff22
	ora	#200
	sta	$ff22
	endif

	rts

endfunction


