User Tag List

Страница 40 из 113 ПерваяПервая ... 363738394041424344 ... ПоследняяПоследняя
Показано с 391 по 400 из 1128

Тема: ЭТЮДЫ

  1. #391

    Регистрация
    12.02.2014
    Адрес
    г. Арзамас
    Сообщений
    6,123
    Спасибо Благодарностей отдано 
    0
    Спасибо Благодарностей получено 
    3
    Поблагодарили
    3 сообщений
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    вот неугомонный

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

  3. #392

    Регистрация
    01.03.2005
    Адрес
    Саранск
    Сообщений
    5,830
    Спасибо Благодарностей отдано 
    0
    Спасибо Благодарностей получено 
    247
    Поблагодарили
    106 сообщений
    Mentioned
    5 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Предлагаю г-ну Колотову использовать это в грядущих демах Или 4k
    Свирепый агрессивно-депрессивный мордовец!
    Не уверен - не напрягай!

    Не сдавайся. Дыши?

    Virtual TR-DOS

  4. #393

    Регистрация
    12.02.2014
    Адрес
    г. Арзамас
    Сообщений
    6,123
    Спасибо Благодарностей отдано 
    0
    Спасибо Благодарностей получено 
    3
    Поблагодарили
    3 сообщений
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    што, опять атрибутами?оО

  5. #394

    Регистрация
    01.03.2005
    Адрес
    Новосибирск
    Сообщений
    2,080
    Спасибо Благодарностей отдано 
    87
    Спасибо Благодарностей получено 
    480
    Поблагодарили
    145 сообщений
    Mentioned
    7 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Другая задачка: рисуем букву атрибутами (8х8 знакомест)

    Никаких PUSH POP !!!

    Код:
    ; ATTR symbol print by Dr.Bars (29 bytes)
    ; HL = ATTR_ADR (#5800)
    ; A = Letter_code
    ; E = Color_code (#57)
    
    ATTR_SYM:
    	EXX
    	ADD A,A
    	LD L,A
    	LD H,#0F
    	ADD HL,HL
    	ADD HL,HL
    	LD B,#08
    L2	LD A,(HL)
    	EXX
    	LD BC,#0818
    L1	RLA
    	LD D,A
    	SBC A,A
    	AND E
    	LD (HL),A
    	LD A,D
    	INC L
    	DJNZ L1
    	ADD HL,BC
    	EXX
    	INC L
    	DJNZ L2
    	RET
    Вариант 2 (изменяемый цвет фона):

    Юзается push/pop

    Код:
    PRINT:
    	LD HL,#5800
    	LD A,#7F
    	LD D,#57-#07
    	LD E,#07
    
    ; ATTR symbol print by Dr.Bars (30 bytes)
    ; HL = ATTR_ADR (#5800)
    ; A = Letter_code
    ; D = Color_code - Background_code
    ; E = Background_code
    
    ATTR_SYM:
    	ADD A,A
    	EXX
    	LD L,A
    	LD H,#0F
    	ADD HL,HL
    	ADD HL,HL
    	LD B,#08
    L2	LD A,(HL)
    	EXX
    	LD BC,#0818
    L1	RLA
    	PUSH AF
    	SBC A,A
    	AND D
    	ADD A,E
    	LD (HL),A
    	POP AF
    	INC L
    	DJNZ L1
    	ADD HL,BC
    	EXX
    	INC L
    	DJNZ L2
    	RET



    ---------- Post added at 00:25 ---------- Previous post was at 00:16 ----------

    P.S моя процедурка вывода спрайта никому не интересна?

    Она ведь чуть медленее табличного варианта по скорости.
    Последний раз редактировалось drbars; 12.06.2014 в 08:29.

  6. #395

    Регистрация
    25.03.2013
    Адрес
    г. Лондон, Великобритания
    Сообщений
    948
    Спасибо Благодарностей отдано 
    9
    Спасибо Благодарностей получено 
    4
    Поблагодарили
    4 сообщений
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от drbars Посмотреть сообщение
    P.S моя процедурка вывода спрайта никому не интересна?

    Она ведь чуть медленее табличного варианта по скорости.
    Интересна, просто она непростая, а времени нет. Скачал сразу после выхода, обязательно прочту, когда чуть разгружусь.
    "introspec" читается как "интроспек". некоторые читают как "интроспец", но я никакой не спец. я спек.

  7. #396

    Регистрация
    26.03.2008
    Адрес
    Питкяранта
    Сообщений
    1,822
    Спасибо Благодарностей отдано 
    274
    Спасибо Благодарностей получено 
    122
    Поблагодарили
    95 сообщений
    Mentioned
    1 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от drbars Посмотреть сообщение
    Разве глючная?
    В голове прокрутил - да.
    Испробовать пока-что не с руки.
    Да и ревюшники хоть и пыжились (мол мы тут все тру), но бывало что и ушами хлопали всякий бред печатая без проверки.
    А уж что рассылали (причём за деньги) - про то вообще отдельная песня.
    Сколько жалоб в прессе на их "дистрибутивы".
    Хотя конечно понять можно: тогда это дело только зарождалось, конечно в те времена только методом проб и ошибок...

  8. #397

    Регистрация
    01.03.2005
    Адрес
    Новосибирск
    Сообщений
    2,080
    Спасибо Благодарностей отдано 
    87
    Спасибо Благодарностей получено 
    480
    Поблагодарили
    145 сообщений
    Mentioned
    7 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от introspec Посмотреть сообщение
    Интересна, просто она непростая, а времени нет. Скачал сразу после выхода, обязательно прочту, когда чуть разгружусь.
    Писал для диззика, но в итоге реализовал табличный способ... более универсальный и компактный в быстрой памяти.

  9. #398

    Регистрация
    01.03.2005
    Адрес
    Новосибирск
    Сообщений
    2,080
    Спасибо Благодарностей отдано 
    87
    Спасибо Благодарностей получено 
    480
    Поблагодарили
    145 сообщений
    Mentioned
    7 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Ещё в дополнение рисования буквы атрибутами на весь экран, мой пример:

    Он не самый короткий, но показывает насколько ассебмлер многогранен

    Код:
    ; fullscreen (32x24) letter print by Dr.Bars
    ; A = symbol code - 1
    
            ADD A,A
            SBC HL,HL
            ADD HL,SP
            LD SP,#5B00
            EXX
            LD L,A
            LD H,#0F
            ADD HL,HL
            ADD HL,HL
            EX DE,HL
            LD C,#08
    L2      DEC DE
            LD A,(DE)
            LD B,#18
    L1      RRCA
            SBC HL,HL
            PUSH HL
            PUSH HL
            DJNZ L1
            DEC C
            JR NZ,L2
            EXX
            LD SP,HL
            RET

  10. #399

    Регистрация
    12.02.2014
    Адрес
    г. Арзамас
    Сообщений
    6,123
    Спасибо Благодарностей отдано 
    0
    Спасибо Благодарностей получено 
    3
    Поблагодарили
    3 сообщений
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от drbars Посмотреть сообщение
    LD L,A
    LD H,#0F
    ADD HL,HL
    ADD HL,HL
    EX DE,HL
    не помню кто, вроде бы Vitamin предлагал: если использовать код символа*8, то часть байтов на процедуре можно съэкономить..

  11. #400

    Регистрация
    26.03.2008
    Адрес
    Питкяранта
    Сообщений
    1,822
    Спасибо Благодарностей отдано 
    274
    Спасибо Благодарностей получено 
    122
    Поблагодарили
    95 сообщений
    Mentioned
    1 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от denpopov Посмотреть сообщение
    не помню кто, вроде бы Vitamin предлагал: если использовать код символа*8, то часть байтов на процедуре можно съэкономить..
    А если хранить текст не кодами символов, а уже адресами литер - то можно и ещё сэкономить.
    "Но, господа, это уже не физика!" (Это цитата. В данном случае она означает что экономия байтов уже начинает перетекать в абстрактную задачу. Хотя в частных случаях возможно это и пригодится.)

Страница 40 из 113 ПерваяПервая ... 363738394041424344 ... ПоследняяПоследняя

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

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

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

Похожие темы

  1. Этюды: как бы написать поизящнее.
    от AndTorp в разделе Программирование
    Ответов: 5
    Последнее: 17.03.2008, 00:43
  2. Ответов: 0
    Последнее: 18.08.2006, 22:40
  3. Этюды: печать шрифтом 5x5...
    от breeze в разделе Программирование
    Ответов: 12
    Последнее: 27.03.2005, 05:21

Метки этой темы

Ваши права

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