;**************************************************************************
;*
;* xex load test
;*
;**************************************************************************
	
	opt h+
	
CODEADR = $4000	
	
	org $4000			   ;prg start
	
	icl "custom.i"

;-------- CODEADR is start segment

	cld
	
	;

	sei				  ;disable irqs
	lda	#$00
	sta	NMIEN			  ;NMIEN all off 
	sta	DMACTL			  ;DMACTL all off

	;os key remove
	
	lda	#<noKeyRead
        sta	VSERINL        
        lda	#>noKeyRead
        sta	VSERINH        
	
	;chbase
	
	lda	#$E0
	sta	CHBASE
	
	;color setup
	
	lda	#$0	
	sta	COLBK
	lda	#$a	
	sta	COLPF0
	lda	#$e	
	sta	COLPF1
	lda	#$8	
	sta	COLPF2
	lda	#$88				
	sta	COLPF3
				
	;disable player/missile dma
	
	lda	#$00
	sta	GRACTL
	
	;setup displays
	   
	lda	#0	;clear all				
	sta	DMACTL	;DMACTL
	
@	
	clc
	adc	#1
	sta	COLBK
	jmp	@-
	
	org	$2000
	
;************************************************
;*
;* dummy
;*
;************************************************
	
noKeyRead	
	rts	
	
	lda	#$0
	sta	HSCROL