Реконструкция CGLIB для использования из OMSI Pascal

[Oleg N. Cher]

Можете объяснить, что делает инструкция DEC #0 ?

вопрос - откуда фиксация на двухцветности ? УКНЦ таки может 16цветов

В графике? Точно 16, не 8? Или имеется в виду цветность через палитры? Тогда вроде даже больше.

В старых машинках при минимуме цветов было общепринято юзать графику, которая исполнена одним цветом. Поэтому можно такую графику хранить в виде битов, где 1 - цвет (выбранный из), и 0 - либо прозрачность, либо цвет фона, либо ещё один цвет (выбранный из). Ессно, я не предлагаю это для динамических объектов, только для статики и прочей декоративной графики.

[Advertiser]

[S_V_B]

Можете объяснить, что делает инструкция DEC #0 ?

Выше записывается счетчик цикла: MOV R0,3$+2

[Oleg N. Cher]

Выложил работающую процедуру вывода спрайта, адаптированную для работы из OMSI Pascal:

• • https://github.com/Oleg-N-Cher/UkncDev

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

По ссылке будет храниться вся подсистема с текущим снапом. Вызывается всё из XDev. Там есть батники, по которым можно понять как собирать. Цель, которую я преследую: не только разобраться с графическими примитивами в УКНЦ, но и сделать более лёгкий старт для желающих покодить для УКНЦ (а может и для БК/ДВК) тем людям, которые точно не будут копаться в ассемблере.

Сейчас стоит задача адаптировать вывод спрайта под произвольную ширину. При этом ширина должна задаваться не в байтах, а в пикселях. Возражения слышал, пусть в байте будут незначащие разряды. Всё равно такой вывод спрайта очень нужен. Помощи буду рад.

[Oleg N. Cher]

Как оказалось, данная процедура вывода спрайта выводит только по OR. Приделать AND и XOR не составит особого труда, но мне бы пригодился вывод с чисткой именно пиксельной, а не знакоместной маской. Т.е. как я себе это представляю: первый и последний байт строки в экранной памяти обрабатывается специальной маской, которая чистит пространство под вывод спрайта нужного размера. Средние строки выводятся просто по MOVB, т.е. замещают собой содержимое экрана. Для упрощения можно минимальную ширину спрайта сделать 8 пикселей (1 байт).

Есть сочувствующие и желающие мне помочь в этом деле? Чтобы в итоге получилась нормальная универсальная подпрограмма вывода спрайтов. Только без антимонии и философии типа "нафиг оно надо", ок? Это контрпродуктивно.

Остаётся удивляться, почему у вас нет такой нормальной готовой процедуры вывода спрайтов.

[S_V_B]

Средние строки выводятся просто по MOVB,

Какой MOVB???? Ты выводишь слово в первый и второй план сразу.

Остаётся удивляться, почему у вас нет такой нормальной готовой процедуры вывода спрайтов.

Потому что это не нормальная, а извратная процедура.. все делается гораздо проще с помощью маски без всяких затираний.

[Oleg N. Cher]

Ладно. Формулирую требования к процедуре вывода спрайта:

• 1. Спрайт четырёхцветный для работы из ЦП. Формат: ширина (в пикселях); высота (в пикселях); данные спрайта
  
  2. Координаты задаются в пикселях
  
  3. Длина и ширина спрайта задаётся в пикселях. Если ширина не кратна 8, то незначащие биты данных спрайта при выводе игнорируются: допустим, при ширине 12 [XXXXXXXX][XXXXOOOO]: X заюзанная точка, O игнорируемая.
  
  4. Экранное место под вывод спрайта длина*ширина чистится. Вывод по XOR, OR и AND не нужен (собственно, нужен, но для него процедура уже есть)

[S_V_B]

Экранное место под вывод спрайта длина*ширина чистится.

Когда ты выводишь BISом под спрайтом тоже все чистится, поставь между первым и вторым BISом CLR и проверку на последний байт по ширине (его не стирай)
Если ты уже вывел спрайт и тебе нужно передвинуть его на одну точку, согласно твоему ТЗ как ты сотрешь предыдущий???

[Oleg N. Cher]

Согласно моему ТЗ, вывод спрайта будет затирать весь прямоугольник под спрайтом, т.е. я его выведу сразу поверх старого. Если был сдвиг на 1 пиксель вправо или влево, то останется затереть только вертикальную линию слева или справа. Но у меня в игре такого вывода не будет.

Ты видел бегающего чувачка в Laser2Demo.zip? Там 4 спрайта в разных фазах. Просто познакоместный вывод одной фазы спрайта поверх спрайта в другой фазе.

  FOR x := -2 TO 30 BY 2 DO
    FOR phase := 1 TO 4 DO
      gr.PTBL(x, 0, phase);
      b.PAUSE(5);
    END;
  END;

С выводом по OR так не получится. А если перед выводом каждой файзы вначале чистить прямоугольник, то да, будет мерцать. Поэтому чистку надо совместить с выводом.

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

Когда ты выводишь BISом под спрайтом тоже все чистится

Разве? А, по-моему, нет. BIS делает наложение данных спрайта по OR с данными, уже находящимися на экране. Тогда как чистка подразумевает их замещение. Т.е. если на экране единицы, а в спрайте нули, то это нули должны затереть единицы.

поставь между первым и вторым BISом CLR и проверку на последний байт по ширине (его не стирай)

А что это даст? Судя по моим прикидкам, всё обстоит сложнее. Но я не очень досконально понимаю как оно работает. Всё ещё плаваю.

[S_V_B]

А что это даст? Судя по моим прикидкам, всё обстоит сложнее.

До цикла вывода нужно сделать BIC (NOT(от счетчика сдвига)), а после BIC(маску от счетчика сдвига).
в середине CLR. Проще сразу маску на весь спрайт использовать.

Логичнее сделать отдельную процедуру очистки заданного участка, а не пихать ее в вывод спрайта, поскольку она не всегда нужна будет.

Разве? А, по-моему, нет. BIS делает наложение данных спрайта по OR с данными, уже находящимися на экране. Тогда как чистка подразумевает их замещение. Т.е. если на экране единицы, а в спрайте нули, то это нули должны затереть единицы.

поставь между первым и вторым BISом CLR и проверку на последний байт по ширине (его не стирай)

см выше.

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

Остаётся удивляться, почему у вас нет такой нормальной готовой процедуры вывода спрайтов.

Такая процедура нужна только под конкретное приложение (для тебя), чтобы карты в стопочку сложить друг на друга
У меня обычно если спрайты накладываются они должны бабахнуть

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

В твоем случае карты же не будут двигаться?
1. сделай ширину кратную байту
2. выводить только видимую часть карты (смысл накладывать, стирать - делать кучу лишних тормозов).
Действительно полезная процедура - вывод части спрайта.

[Oleg N. Cher]

С картами я разберусь, тут бы со спрайтами сперва разобраться. Делать ширину, кратную байту, не с руки. Придётся перепланировать всю графику, получится уже другая игра.

Вопрос актуален именно в исходной формулировке.

Про пользу от вывода части спрайта не спорю. Но как - тоже по OR?

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

Логичнее сделать отдельную процедуру очистки заданного участка, а не пихать ее в вывод спрайта, поскольку она не всегда нужна будет.

Думал об этом. Но с предварительной чисткой будет сильнее мерцать. А если совместить чистку с выводом линии, то не так.