Вид для печати
Если в 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)
SBC HL,DE (BC) не?
drbars, не
Может так?Цитата:
Сообщение от jerri
Код: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
Размеры прямоугольников фиксированные или переменные?
jerri, подумал бы если понял, твое ТЗ
drbars, ret нельзя
на стеке структура.
Blade, переменные, а какая разница?
GM BIT, да в принципе пофиг - первый вариант вполне фурычит.
Стек на экране в этот момент? Стеком пишется или читается?Цитата:
Сообщение от 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
Так, попробуй.
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