Важная информация

User Tag List

Показано с 1 по 7 из 7

Тема: ATTR-->Y

  1. #1
    Veteran Аватар для drbars
    Регистрация
    01.03.2005
    Адрес
    Новосибирск
    Сообщений
    1,529
    Благодарностей: 654
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию ATTR-->Y

    Ломаю вот мозг на процедуркой:

    на входе HL--> адрес атрибутов экрана, на выходе координата Y --> A.

    Как сделать не используя регистр C ?

    Код:
    	LD A,L
    	AND %11100000
    	LD C,A
    	LD A,H
    	AND %00000011
    	OR C
    	RLCA
    	RLCA
    	RLCA
    ZX Spectrum +2 / DataGear / DivIDE 2k14
    ZX Evolution rev.C
    ZX Spectrum NEXT

  2. #1
    С любовью к вам, Yandex.Direct
    Размещение рекламы на форуме способствует его дальнейшему развитию

  3. #2
    Master
    Регистрация
    27.03.2005
    Адрес
    CПб
    Сообщений
    689
    Благодарностей: 226
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Код:
       ADD HL,HL
       ADD HL,HL
       ADD HL,HL
       LD A,H
       AND #1F

  4. #3
    Veteran Аватар для drbars
    Регистрация
    01.03.2005
    Адрес
    Новосибирск
    Сообщений
    1,529
    Благодарностей: 654
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от Blade Посмотреть сообщение
    Код:
       ADD HL,HL
       ADD HL,HL
       ADD HL,HL
       LD A,H
       AND #1F
    Запарывает собвстенно регистр HL, его менять нельзя.

    В рабочей процедуре у меня входной регистр DE.
    ZX Spectrum +2 / DataGear / DivIDE 2k14
    ZX Evolution rev.C
    ZX Spectrum NEXT

  5. #4
    Super Moderator Аватар для Alex Rider
    Регистрация
    07.02.2008
    Адрес
    г. Рязань
    Сообщений
    2,720
    Благодарностей: 947
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Пральна думаю?

    Код:
            ld a,l
            rr h
            rra
            rr h
            rra
            rra
            rra
            rra
            and #1f


    ---------- Post added at 21:38 ---------- Previous post was at 21:38 ----------

    Опоздал

  6. #5
    Veteran Аватар для drbars
    Регистрация
    01.03.2005
    Адрес
    Новосибирск
    Сообщений
    1,529
    Благодарностей: 654
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от Alex Rider Посмотреть сообщение
    Пральна думаю?

    Код:
            ld a,l
            rr h
            rra
            rr h
            rra
            rra
            rra
            rra
            and #1f


    ---------- Post added at 21:38 ---------- Previous post was at 21:38 ----------

    Опоздал
    Интересный вариант Но проблему пока не решил.. запарывает H

    ---------- Post added at 00:46 ---------- Previous post was at 00:40 ----------

    Пока результат такой:

    Моя - 42 такта... запарывает C
    Blade -44 такта.. запарывает HL
    Rider - 39 тактов (!) запарывает H
    Последний раз редактировалось drbars; 08.08.2013 в 19:42.
    ZX Spectrum +2 / DataGear / DivIDE 2k14
    ZX Evolution rev.C
    ZX Spectrum NEXT

  7. #6
    Guru
    Регистрация
    08.10.2005
    Адрес
    Москва
    Сообщений
    9,937
    Благодарностей: 3436
    Mentioned
    2 Post(s)
    Tagged
    1 Thread(s)

    По умолчанию

    Че-нить типа:

    LD A,L
    AND 0xE0
    ADD A,H
    SUB 0x58
    RLCA
    RLCA
    RLCA

    Проверить не могу, под рукой нет ни эмуля, ни справочника)

  8. Этот пользователь поблагодарил Titus за это полезное сообщение:
    drbars (08.08.2013)

  9. #7
    Veteran Аватар для drbars
    Регистрация
    01.03.2005
    Адрес
    Новосибирск
    Сообщений
    1,529
    Благодарностей: 654
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от Titus Посмотреть сообщение
    Че-нить типа:

    LD A,L
    AND 0xE0
    ADD A,H
    SUB 0x58
    RLCA
    RLCA
    RLCA

    Проверить не могу, под рукой нет ни эмуля, ни справочника)
    И... Titus получает пирожок с полки!!!

    ---------- Post added at 00:59 ---------- Previous post was at 00:57 ----------

    Моя - 42 такта... запарывает C
    Blade -44 такта.. запарывает HL
    Rider - 39 тактов (!) запарывает H
    Titus - 34 такта (!!!) не запарывает ничего!
    ZX Spectrum +2 / DataGear / DivIDE 2k14
    ZX Evolution rev.C
    ZX Spectrum NEXT

Информация о теме

Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)

Похожие темы

  1. Функция ATTR (x,y) на бейсике.
    от женя999 в разделе Программирование
    Ответов: 15
    Последнее: 03.04.2012, 21:53

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •