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

User Tag List

Страница 77 из 109 ПерваяПервая ... 737475767778798081 ... ПоследняяПоследняя
Показано с 761 по 770 из 1084

Тема: ЭТЮДЫ

  1. #761
    Veteran
    Регистрация
    26.11.2013
    Адрес
    г. Новосибирск
    Сообщений
    1,041
    Спасибо Благодарностей отдано 
    931
    Спасибо Благодарностей получено 
    224
    Поблагодарили
    121 сообщений
    Mentioned
    1 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Знахарь,
    Нагуглил я.

    zxpress.ru
    ZX Power #03
    31 декабря 1997
    Программирование
    Ликбез - Автоматическое создание маски для спрайтов.

    Там 3 метода. Первые 2 побитывые, а третий - (заморский баклажанный ) тот самый со сдвигами.
    А ещё игра упоминается, в которой быстрая но неполноценная маска. Сдвиги только по горизонтали.

  2. #762
    Guru Аватар для ZX_NOVOSIB
    Регистрация
    24.12.2006
    Адрес
    р.п. Маслянино, Новосибирская обл.
    Сообщений
    5,547
    Спасибо Благодарностей отдано 
    233
    Спасибо Благодарностей получено 
    258
    Поблагодарили
    178 сообщений
    Mentioned
    5 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Какой на асме аналог бейсик-процедуре:
    10 IF INKEY$ > "" THEN GO TO 10

    Т.е. какой процедурой можно отследить отпускание любой клавиши? Иными словами процедура выходит из цикла, только если ни одна клавиша не нажата.
    Куплю корпус и материнку от Spectrum +2/+3

  3. #763
    Guru Аватар для Shiny
    Регистрация
    19.01.2017
    Адрес
    г. Арзамас
    Сообщений
    2,121
    Записей в дневнике
    36
    Спасибо Благодарностей отдано 
    0
    Спасибо Благодарностей получено 
    21
    Поблагодарили
    10 сообщений
    Mentioned
    3 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    если я правильно понял, то:
    Код:
    wk:
    	xor a
    	in a,($FE)
    	cpl
    	and 31
    	jr z,wk

  4. #764
    Guru Аватар для ZX_NOVOSIB
    Регистрация
    24.12.2006
    Адрес
    р.п. Маслянино, Новосибирская обл.
    Сообщений
    5,547
    Спасибо Благодарностей отдано 
    233
    Спасибо Благодарностей получено 
    258
    Поблагодарили
    178 сообщений
    Mentioned
    5 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Шынни, "and 31" это как-то относится к управляющим кодам? Ведь до 31 идут управляющие коды, но там есть и исключение в виде 13 кода (клавиша ентер)

    - - - Добавлено - - -

    Если сделать and 12 вместо and 31, то тогда процедура и на ентер распространится? )
    Куплю корпус и материнку от Spectrum +2/+3

  5. #765
    Veteran
    Регистрация
    26.11.2013
    Адрес
    г. Новосибирск
    Сообщений
    1,041
    Спасибо Благодарностей отдано 
    931
    Спасибо Благодарностей получено 
    224
    Поблагодарили
    121 сообщений
    Mentioned
    1 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от ZX_NOVOSIB Посмотреть сообщение
    "and 31" это как-то относится к управляющим кодам?
    Нет! Не относится! 31 это пять двоичных единичек. А кнопки в Спектруме разбиты на восемь групп по пять. Вот к чему это относится!

  6. #766
    Сибирский антропоморфн Аватар для Black Cat / Era CG
    Регистрация
    06.05.2010
    Адрес
    Бердск, НСО
    Сообщений
    4,530
    Спасибо Благодарностей отдано 
    913
    Спасибо Благодарностей получено 
    846
    Поблагодарили
    628 сообщений
    Mentioned
    5 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от ZX_NOVOSIB Посмотреть сообщение
    and 31
    С порта 254 5 бит - 5 клавиш полуряда клавы, and 31 - это and %00011111.
    Личка заполнена! И чистить я ее не буду! Пользуйтесь адекватными средствами связи! Спасибо.

    Seamos realistas y hagamos lo imposible!

    Ernesto Che Guevara
    Переехал сюда: SteinBlume (ex ATM CP/M Explorer)
    http://era-cg.su

    Скрытый текст

    Speccy2010 r2 (Спасибо m.d. & xlat),
    Sinclair ZX Spectrum + (Спасибо stepmotor),
    ZX Evolution rev.C + 5'25 FDD Epson SD-700AA + NedoPC PAL-Coder (Спасибо m.d. & xlat)
    [свернуть]

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

  8. #767
    Master Аватар для DenisGrachev
    Регистрация
    15.04.2011
    Адрес
    г. Новосибирск
    Сообщений
    741
    Спасибо Благодарностей отдано 
    39
    Спасибо Благодарностей получено 
    211
    Поблагодарили
    44 сообщений
    Mentioned
    3 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от ZX_NOVOSIB Посмотреть сообщение
    Т.е. какой процедурой можно отследить отпускание любой клавиши? Иными словами процедура выходит из цикла, только если ни одна клавиша не нажата.
    Код:
    loop:
          call 654
          inc e
          jr nz,loop

  9. #768
    Guru Аватар для Shiny
    Регистрация
    19.01.2017
    Адрес
    г. Арзамас
    Сообщений
    2,121
    Записей в дневнике
    36
    Спасибо Благодарностей отдано 
    0
    Спасибо Благодарностей получено 
    21
    Поблагодарили
    10 сообщений
    Mentioned
    3 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    короче так
    Миниатюры Миниатюры Нажмите на изображение для увеличения. 

Название:	___portFE.png 
Просмотров:	131 
Размер:	7.0 Кб 
ID:	65630  

  10. #769
    Guru Аватар для ZX_NOVOSIB
    Регистрация
    24.12.2006
    Адрес
    р.п. Маслянино, Новосибирская обл.
    Сообщений
    5,547
    Спасибо Благодарностей отдано 
    233
    Спасибо Благодарностей получено 
    258
    Поблагодарили
    178 сообщений
    Mentioned
    5 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от Шынни Посмотреть сообщение
    если я правильно понял, то:
    Код:
    wk:
    	xor a
    	in a,($FE)
    	cpl
    	and 31
    	jr z,wk
    Всё же NZ , а не Z ?
    Куплю корпус и материнку от Spectrum +2/+3

  11. #770
    Guru Аватар для Shiny
    Регистрация
    19.01.2017
    Адрес
    г. Арзамас
    Сообщений
    2,121
    Записей в дневнике
    36
    Спасибо Благодарностей отдано 
    0
    Спасибо Благодарностей получено 
    21
    Поблагодарили
    10 сообщений
    Mentioned
    3 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    ёклмн. Как работает клавиатура?
    5 битов по портам отведены соответсвующим значениям: 1-не нажата, 0-нажата.

    Например, проверяем нажатие клавиши А:

    tt:
    ld a,$FD
    in a,($FE)
    and 1
    jr nz, tt

    в примере A=0, поэтому чтение будет из всех портов.

    cpl - инверсия
    and 31 даст 0, если клавиша НЕ нажата, или не 0, если нажата.

Страница 77 из 109 ПерваяПервая ... 737475767778798081 ... ПоследняяПоследняя

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

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

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

Похожие темы

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

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

Ваши права

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