ZXNet эхоконференция «code.zx»

Hello, All Есть процедурка PIX_ADDR DE,HL (call pix_addr) - YXpix DE > $адр HL, А - bit offset LD A,E ;B DE YX AND A ;B HL $addr RRA SCF RRA AND A RRA XOR E AND #F8 XOR E LD H,A ;H LD A,D RLCA RLCA RLCA XOR E AND #C7 XOR E RLCA RLCA LD L,A LD A,D AND 7 RET Короче, всё как обычно. А вот теперь предложения по ускорению и/или использованию только 1 рег. т.е. в данном примере - YXpix DE > $адр HL а надо чтоб - YXpix DE > $адр DE Только желательно с конкр. примерами и замерами.

Hello, key-jee Ага. Ясно, но дело не в ex de,hl а в как бы работе только с 1 рег-ом т.е. на входе в de -> манипуляции с тем же de и результат в том же de. Таблица... гм... а как тогда это всё будет выглядеть в целом и сколько прироста даст ?

Hello, Знахарь Можно создать табличку на 2 сектора, где хранятся адреса всех крайних точек, а затем пользоваться такой нехитрой процедуркой: ┌─- code ─── ld a,l and 7 ld (end-1),a ; save offset xor l rrca rrca rrca ld l,h ld h,table or (hl) inc h ld h,(hl) ld l,a ld a,0 ; restore offset end; └──; code ─── Hа практике не проверял, что 'сходу' придумалось то и написал, но вроде должно работать. вообще-то процедуру можно с'оптимизировать на 4 такта и 1 байт, если входные параметры будут не вида H = y, L = x (как обычно принято на спеке), а наоборот, то есть H = x, а L = y. Hу а если нужно работать с de, то ex de,hl в начале и в конце процедуры.

Hello, Знахарь > Ага. Ясно, но дело не в ex de,hl а в как бы работе только с 1 рег-ом > т.е. на входе в de -> манипуляции с тем же de и результат в том же > de. Я не понял в чём проблема. :smile; EX; DE,HL можно поставить первой командой в процедуре, а затем ещё перед RET на выходе тогда и hl не попортится (хотя и поюзается).. Прирост скорости примерно 20 тактов на один вызов.. генератор таблицы примитивен, можно даже твоей процедурой воспользоваться :smile; Да; и у elfh вариант неплохой, только hl портит и табличка занимает килобай памяти (4 сектора) А если ещё и точку рисовать не надо (а только координаты узнать), то рутина шустрее ещё на 14 тактов, но нужно будет ещё и генератор таблиц перемухлевать.. :wink; Вообще-то; и вправду хорошая процедура.

Hello, key-jee http://zx.pk.ru/showthread.php?t=2823 Похожая тема.

Hello, Wlodek Эээххх... Т.е. со старых добрых времен "точки за 73 такта" ничего не изменилось / ускорилось ?

Hello, Знахарь Hу почему же, в те же старые добрые я использовал вот такую процедуру: ┌─- CODE ─── LD H,#80 ;7 LD A,(HL) ;7 INC H ;4 LD B,(HL) ;7 INC H ;4 LD L,C ;4 OR (HL) ;7 LD C,A ;4 INC H ;4 LD A,(BC) ;7 OR (HL) ;7 LD (BC),A ;7 └── CODE ─── Итого 69 тактов. Если адрес таблицы держать в регистре E, то первая строка заменяется на: LD H,E и получаем ускорение на 3 такта

Hello, key-jee key> EX DE,HL можно поставить первой командой в процедуре, а затем ещё key> перед RET на выходе тогда и hl не попортится (хотя и поюзается).. key> Прирост скорости примерно 20 тактов на один вызов.. Hе совсем, после LD H, A ; H Идет LD A, D Что будет работой с одним регистром, хоть с D, хоть с H, в случае если одну пару не изменять. Вот -- таблица !