ЭТЮДЫ

[NovaStorm]

Если в CF результат, IX адрес возврата, то может так(проверить-то не на чем)?
Или если будет хреново при равных координатах, поставить где надо CCF. Так избавились от OR A и выходим по JR быстрее. Надо, правда, посчитать все пути графа, может в результате тактов и больше, но из-за большей вероятности выхода без коллизии будет лучше.

	ld hl,(jean_xx)
;d b
	ld a,h
	cp b
	jr c,1f
	jp (ix)
1
	ld a,d
	cp l
	jr c,2f
	jp (ix)
2	
	ld hl,(jean_yy)
;e c
	ld a,h
	cp c
	jr c,3f
	jp (ix)
3
	ld a,e
	cp l
	jp (ix)

[drbars]

SBC HL,DE (BC) не?

[jerri]

drbars, не

[drbars]

drbars, не

Может так?

collision_jean
;de left  up   corner
;bc right down corner
	ld 	hl,ret_
	push 	hl
	
	ld	hl,(jean_xx) ;х координата левого края и правого края
;d b	
	ld	a,b
	cp	h
	ret 	c
	ld	a,d
	cp	l
	ret 	nc
;left or between
	
no_coll1	
	ld	hl,(jean_yy) ;у координата верха и низа.
;e c
	ld	a,c
	cp	h
	ret	c
	ld	a,e	
	cp	l
	ret	nc
	pop	hl
	ret

;no collision_jean
ret_
	or	a
	ret

[Blade]

Размеры прямоугольников фиксированные или переменные?

[GM BIT]

jerri, подумал бы если понял, твое ТЗ

[Advertiser]

[jerri]

drbars, ret нельзя
на стеке структура.

Blade, переменные, а какая разница?

GM BIT, да в принципе пофиг - первый вариант вполне фурычит.

[drbars]

drbars, ret нельзя
на стеке структура.

Стек на экране в этот момент? Стеком пишется или читается?

[jerri]

drbars, на стеке структура объекта. беру данные сравниваю, провожу обработку.
что то вроде

p_item
	pop	de
	ld	(sta_koor),de
	ld	a,d
	add	a,a
	add	a,a
	ld	d,a
	add	a,8
	ld	b,a
	ld	a,e
	add	a,a
	add	a,a
	ld	e,a
	add	a,8
	ld	c,a
	ld	ix,p_heart0
	jp	collision_jean
p_heart0			
;collision checked	
;c=collision detected
;здесь переход на подпрограмму обработки
	ret 

pick_heart
;heart_collided_jean
	pop	hl
	jp	nc,p_heart1
	ld	(hl),#ff
	ld	hl,draw_lives
	ld	(hl),#00		
	ld	hl,tot_lives
	ld	a,(hl)
	cp	9
	adc	a,0
	ld	(hl),a
;picked up heart, lives incremented
pick_h0
	ld	hl,-6
	add	hl,sp
	ld	sp,hl
	ld	hl,0
	push	hl
	ld	hl,obj_lenght
	add	hl,sp
	jp	anim_items0

[drbars]

Так, попробуй.

sta_koor (H or L) =< #3f, так я понял?

то, что со стека в sta_koor снялось на стеке само собой запарывается. не знаю надо ли восстанавливать.

p_item
	LD HL,ret_
	EX (SP),HL
	LD (sta_koor),HL	
	ADD HL,HL
	ADD HL,HL
	EX DE,HL
	LD A,D
	ADD A,#08
	LD B,A
	LD A,E
	ADD A,#08
	LD C,A
	JP collision_jean
p_heart0			
;collision checked	
;c=collision detected
;здесь переход на подпрограмму обработки
	ret 

collision_jean
;de left  up   corner
;bc right down corner
	ld	hl,(jean_xx) ;х координата левого края и правого края
;d b	
	ld	a,b
	cp	h
	ret 	c
	ld	a,d
	cp	l
	ret 	nc
;left or between
	
no_coll1	
	ld	hl,(jean_yy) ;у координата верха и низа.
;e c
	ld	a,c
	cp	h
	ret	c
	ld	a,e	
	cp	l
	ret	nc
	pop	hl
	inc	hl
	jp	(hl)

;no collision_jean
ret_
	or	a
	JP	p_heart0