COLDSTART:
	move.l	#$7000,a7

*** Träffkod
	cmp.b	POSX,TPOSX
	bne	GAME
	cmp.b	POSY,TPOSY
	bne	GAME



***	#$10 resp #$18
	or.b	#%00011000,$10086 * Höj och sänk CB2
	and.b	#%11110111,$10086
	or.b	#%00001000,$10086 * Höj igen...

***
XCOORD	move.b	$10080,d0

	and.b 	#$c0,d0
	cmp.b 	#$c0,d0
	bne	XFGV
	dec.b	#1,POSX
	bra ENDXC
XFGV
	tst.b	d0
	bne ENDXC
	inc.b	#1,POSX

ENDXC

YCOORD	move.b	$10080,d0

	and.b 	#$30,d0
	cmp.b 	#$30,d0
	bne	YFGV
	dec.b	#1,POSY
	bra ENDYC
YFGV
	tst.b	d0
	bne ENDYC
	inc.b	#1,POSY

ENDYC

MUX
	move.l	a1,-(a7)
	move.l 	#$900,a1
LOOP	move.b	(a1)+,$10082
	cmp.l	#$905,a1
	bne	LOOP
	move.l	(a7)+,a1
	move.w	pc,sr



RANDOMTARGET
	*** Kod som överför randomvärdet till rätt intervall...
	and.b	#$3
	***


	*** Kod som överför randomvärdet till rätt intervall...
	and.b	#$3
	***