
	cnop 0,4
		
CopperList:
	dc.w	DIWSTRT,$2077,DIWSTOP,$38c6
	dc.w	DDFSTRT,$0030,DDFSTOP,$00d8
	;dc.w	DDFSTRT,$0038,DDFSTOP,$00d0	

	;dc.w	SPR0PTH,0,SPR0PTL,0,SPR1PTH,0,SPR1PTL,0
	;dc.w	SPR2PTH,0,SPR2PTL,0,SPR3PTH,0,SPR3PTL,0
	;dc.w	SPR4PTH,0,SPR4PTL,0,SPR5PTH,0,SPR5PTL,0
	;dc.w	SPR6PTH,0,SPR6PTL,0,SPR7PTH,0,SPR7PTL,0

	dc.w	AgaFMode,$0

	dc.w	BPLCON0,$0200		
	dc.w	BPLCON1,0,BPLCON2,$0040
	dc.w	BPL1MOD,0,BPL2MOD,0,BPLCON3,$0c00	;AGA FIX 0c00

	dc.w	$360f,$fffe
	dc.w	COLOR00,$0000,COLOR01,$0ddd
	dc.w	COLOR02,$0888,COLOR03,$0444
LBSup:
	dc.w	$370f,$fffe,Color00,$0fff 					;Linea en blanco
LBSup1:
	dc.w	$3801,$fffe,BplCon0,$2200,Color00,$0000

BMap:	
	dc.w	BPL1PTH,0,BPL1PTL,0,BPL2PTH,0,BPL2PTL,0			
	dc.w	$fe2f,$fffe,Color00,$fff 					;linea en blanco
	
	dc.w	$ff0f,$fffe,Color00,0,BplCon0,0



	dc.w	$FFFF,$FFFE

BlindSpr:	
	dc.l	0

Screen:	
	dc.l	Screen1
	dc.l	Screen2

Screen1:
	dcb.b	BMapSize*3,0
	even
Screen2:
	dcb.b	BMapSize*3,0
	even
