;Promien_Y-jak nazwa...A-Promie X zdarzenia,X-X Zdarzenia,Y-Y Zdarzenia
Kolizje_Dizzy:
 cpx Hero_X
 bcc Druga_Szansa_Kolizje_X	;Jeli obiekt jest poza obszarem X Dizzy to sprawd czy chocia promie wchodzi..
 
 PHA
 lda Hero_X
 clc
 adc #$10
 sta Temp1		;Temp1 jest uywane w obrbach funkcji-nie wymaga zachowania
 PLA
 cpx Temp1
 bcs Brak_kolizji	;Jeli obiekt jest poza obszarem X Dizzy to brak kolizji...

Kolizje_Dizzy_Y:
 cpy Hero_Y
 bcc Druga_Szansa_Kolizje_Y	;Jeli obiekt jest poza obszarem Y Dizzy to brak kolizji...

 PHA
 lda Hero_Y
 clc
 adc #$0C
 sta Temp1		;Temp1 jest uywane w obrbach funkcji-nie wymaga zachowania
 PLA
 cpy Temp1
 bcs Brak_kolizji	;Jeli obiekt jest poza obszarem X Dizzy to brak kolizji...
 
 lda #$00		;0 oznacza e kolizja nastpia
 rts

Druga_Szansa_Kolizje_X:
 sta Temp1		;Zapisz promie X
 TXA			;Daj X obiektu do A
 clc
 adc Temp1		;Dodaj promie obiektu
 cmp Hero_X
 bcc Brak_kolizji	;Nawet z promieniem si nie mieci wic...

 lda #$00		;0 oznacza e kolizja nastpia
 jmp Kolizje_Dizzy_Y

Druga_Szansa_Kolizje_Y:
 TYA
 clc
 adc Promien_Y		;Dodaj promie obiektu
 cmp Hero_Y
 bcc Brak_kolizji	;Nawet z promieniem si nie mieci wic...

 lda #$00		;0 oznacza e kolizja nastpia
 rts

Brak_kolizji:
 lda #$01		;1 oznacza e nie ma kolizji.
 rts
