Просмотр сообщений
В этом разделе можно просмотреть все сообщения, сделанные этим пользователем.
Эх, что-то всё заглохло... Неужели только в звуках загвоздка?Нет, во времени загвоздка. Думаю, в августе вернусь к проекту. Но со звуками помощь реально пригодилась бы!
Звук вторжения на 1:12На 9:13 звуковой эффект отказа тайной полиции.
По части музыки - при необходимости, конечно, можем и ZX звезд-музыкантов привлечь - очень известных.Наверное, вы неправильно поняли тему. Под ZX новых версий игры "Диктатор" не будет. Та, что в первом посте темы и так измененная и дополненная на базе оригинала.
Есть ли какие то новости по части новых версий?Новостей нет, было лето, период отпусков, потому проект был на это время заброшен. Но скоро вернусь к работе, на самом деле осталось не так много, основное уже сделано.
Может нужна какая то помощь?Главная загвоздка на текущий момент - звуковое сопровождение. С музыкой своими силами разобрался, простые пикающие звуки тоже повторил один в один как в оригинале. А вот сложные звуковые эффекты (вроде озвучки войны и прочее) сам вряд ли потяну... Эти звуковые эффекты в оригинале написаны на Ассемблере, хотя сама игра на Бейсике.
Поэтому, если у тебя много данных для записи (более 1 фрейма по времени) то NMI отключают вместе с дисплеем (или можно в самом nmi вначале добавить 'флаг'),Или можно разбить вывод на несколько кадров, если скорость неважна. Я так делаю, разбиваю информацию на части и вывожу порциями в разных кадрах.
LDA PPU_STATUS тоже нет никакого смысла каждый раз перед установкой адреса делать, это нужно только в 1 случае - если ты где-то записал только 1 раз в $2006 или $2005.Ну по идеи чисто в теории такая ситуация может возникнуть, если между парой записей произойдет вызов nmi. Хотя это весьма странно, так как к этому моменту работу с PPU уже надо бы завершить. Но читал рекомендацию делать LDA PPU_STATUS, видимо, как раз на такой случай (вариант что просто в коде где-то забыли второй раз записать маловероятен, да и в принципе ошибочен). В общем убрал.
_GOTOXY #1, #11 ; это координаты курсора
_PRINT str_hello4 ; это вывод строки на экран
_PRINT16 game_hst ; тут вывод 16-битного числа
_PRINT_CHAR #'.' ; и символ "." в конце предложения
; переместить курсор в позицию (X,Y)
; posx - #значение, переменнаЯ, регистры A, X
; posy - #значение, переменнаЯ, регистры A, Y
.macro _GOTOXY posx, posy
.local addr, px, py
; если оба параметра константы,
; то считаем адрес сразу без вызова процедуры
.if .xmatch (.left (1, {posx}), #) .and .xmatch (.left (1, {posy}), #)
LDA PPUSTATUS
px = .right (.tcount ({posx}) - 1, {posx})
py = .right (.tcount ({posy}) - 1, {posy})
addr = py * 32 + px + SCR_BASE
LDA #>addr
STA PPUADDR
; если старший и младший байты адреса совпадают, то втораЯ запись в A не нужна
.if .not >addr = <addr
LDA #<addr
.endif
STA PPUADDR
.else
.if .xmatch ({posx}, A)
TAX
.elseif .not .xmatch ({posx}, X)
LDX posx
.endif
; если posy константа, то считаем сразу Y * 32
.if .xmatch (.left (1, {posy}), #)
addr = .right (.tcount ({posy}) - 1, {posy}) * 32
_LD16 sreg, #addr
JSR gotoxy::offset
.else
.if .xmatch ({posy}, A)
TAY
.elseif .not .xmatch ({posy}, Y)
LDY posy
.endif
JSR gotoxy
.endif
.endif
.endmacro
; переместить курсор в позицию (X,Y)
; X - новер столбца 0-31, Y - номер строки 0-29
; addr = Y * 32 + X + SCR_BASE
.proc gotoxy
; Y * 32
TYA
_SHL A, 4 ; * 16
STA sreg
LDA #0
ROL A
ASL sreg ; * 32
ROL A
STA sreg + 1
offset:
; + X + SCR_BASE
TXA
ADC sreg
TAX
LDA #>SCR_BASE ; SCR_BASE = $2000
ADC sreg + 1
BIT PPUSTATUS
STA PPUADDR
STX PPUADDR
RTS
.endproc
_GOTOXY #3, #2
_PRINT str_hello0; вывод строки на экран
; str - строка
; offset - смещение (не обЯзательно): #значение, переменнаЯ, регистр
; Result: X - длина строки
.macro _PRINT str, offset
.ifnblank offset
_LDX offset
.else
LDX #0
.endif
:
LDA str,X
BEQ :+ ; конец строки
STA PPUDATA ; вывод очередного символа
INX
JMP :-
:
.endmacroТам же нужен один BIT PPUDATA для возврата к цвету фона, а вторая запись в $2006 должна быть #$40.Логично, что один. Видимо я там уже экспериментировал, потому что и один не возвращал фон в черный в эмуляторе Nintaco (NES). Самое интересное, что мне удалось изначально сделать черный фон в Nintaco (NES), потом что-то еще правил в коде, в итоге фон сбился, и я так и не смог восстановить исходную версию, где фон правильно отрабатывал...
о, что ждать 2 раза это никак не связано с инит кодом, просто вначале идёт проверка на вне vblank, а потом vblank.В приведенном по ссылке коде сначала делают bit $2002 и утверждают, что он должен сбросить состояние, после чего ждут первый раз vblank, затем предлагают заняться разными манипуляциями с памятью (время есть) и ждут второй раз vblank.
_GOTOXY #31, #25 ; установить курсор в позицию (31,25)
_PRINT_CHAR #$ff ; вывести символ $ff (он черный, но не фон)
LDA #200
STA _SPRITE_ADDR_Y(0) ; установить координату Y спрайта 0
@loop1:
; ждем столкновениЯ спрайта 0
@Sprite0:
BIT PPUSTATUS
BVS @Sprite0
; загружаю адрес палитры в регистры заранее
LDX #$3f ; старший адрес палитры
LDY #$0d ; младший адрес палитры
; восстанавливаю палитру длЯ всего экрана
STX PPUADDR
STY PPUADDR
LDA #$11 ; цвет фона текста длЯ всего экрана
STA PPUDATA
LDA #$29 ; цвет текста длЯ всего экрана
STA PPUDATA
LDA #$00
; ставим адрес на цвет фона
STX PPUADDR
STA PPUADDR
; сбрасываем адрес в ноль
STA PPUADDR
STA PPUADDR
@Sprite0b:
BIT PPUSTATUS ; эти такты тоже надо считать
BVC @Sprite0b ; ведь Sprite 0 hits уже случилсЯ
; отключаем рендеринг (в A у нас уже 0, см. выше)
STA PPUMASK
; менЯем палитру
STX PPUADDR ; старший адрес палитры (он уже в X)
STY PPUADDR ; младший адрес палитры (он уже в Y)
LDA #$27 ; цвет фона текста
STA PPUDATA ; устанавливаем цвет фона текста
LDA #$3d ; цвет текста
STA PPUDATA ; устанавливаем цвет текста
; пропускаю цвета, чтобы вернутьсЯ на цвет фона (иначе фон зальет этим цветом)
BIT PPUDATA
BIT PPUDATA
; возвращаем адрес на позицию экрана (тот знакомест, где у нас нулевой спрайт)
LDA #$23
STA PPUADDR
LDA #$3f
STA PPUADDR
; включаем рендеринг
LDA #%00011110
STA PPUMASK ; отключаем рендеринг (в A у нас уже 0, см. выше)
; сбрасываем прокрутку
; не знаю, нужно или нет, но в любом случае тут уже не надо спешить
LDA #$0
STA PPUSCROLL
STA PPUSCROLL
JMP @loop1
@loop:
; ждем столкновениЯ спрайта 0
@Sprite0:
BIT PPUSTATUS
BVS @Sprite0
LDA #%10010000
STA PPUCTRL
LDA #0
STA PPUSCROLL
STA PPUSCROLL
@Sprite0b:
BIT PPUSTATUS
BVC @Sprite0b
LDA #%10000000
STA PPUCTRL
LDA #0
STA PPUSCROLL
STA PPUSCROLL
JMP @loop
@loop:
; ждем столкновениЯ спрайта 0
@Sprite0:
BIT PPUSTATUS
BVS @Sprite0
LDA PPUSTATUS
LDA #$3f
STA PPUADDR
LDA #$01
STA PPUADDR
LDA #$0f ; черный
STA PPUDATA
LDA #$3F
STA PPUADDR
LDA #$00
STA PPUADDR
STA PPUADDR
STA PPUADDR
STA PPUSCROLL
STA PPUSCROLL
@Sprite0b:
BIT PPUSTATUS
BVC @Sprite0b
LDA PPUSTATUS
LDA #$3f
STA PPUADDR
LDA #$01
STA PPUADDR
LDA #$01 ; синий
STA PPUDATA
LDA #$3F
STA PPUADDR
LDA #$00
STA PPUADDR
STA PPUADDR
STA PPUADDR
STA PPUSCROLL
STA PPUSCROLL
JMP @loop
Добавлю, что даже с отключенным экраном запись палитры нужно делать в VBlankЯ правильно понимаю, что не получится переключать палитру с помощью нулевого спрайта, чтобы у нас на экраны было как бы два набора палитр?
Можно сделать для PAL и NTSC, весить будет больше и нужно будет вставить небольшой код для определения NTSC/PAL/Dendy, к сожалению нет поддержки Dendy, а там звук отличается от PAL и NTSC.Добавил поддержку PAL и NTSC, причем не только в музыке, но и везде, где есть задержки (ну то есть в PAL считает, что секунда это 50 кадров, а NTSC, что 60 кадров).
Круто! Но всё же букву ё надо бы использовать...Добавил Ё.Не забудьте про неё.
Без звукового движка можно сделать, но там прямо 1 в 1 со спектрумовской пищалкой будет.Пропищать аля Спектрум звуками из оригинальной игры и я могу, но на NES это никуда не годится.
будет ли действительно существовать смысл поддерживать NTSCИзначально пишу под NTSC. Запустил в режиме PAL, музыка просто несколько медленнее проигрывается, во всяком случае в эмуляторе никаких особых проблем после смена региона не заметил.
там музыку можно из MIDI импортировать и эффекты сделатьТут бы портировать музыку из оригинальной игры, там играет гимн Ритимбании и прочее подобное. Я максимум смогу по нотам это перенести, но качество музыки будет примерно как на Спектруме...
Не совсем понимаю с этими адресами.Эксперименты показали следующее:
Разрешение будет 256*240?Крайние столбцы экрана нежелательно использовать, так как, в отличии от Спектрума, нет бордюра. То есть полезное горизонтальное разрешение ниже спектрумовского. По высоте тоже все 30 строк использовать не получится.
Сочетание цветов фона и тона слишком кислотное.Сделал палитру потемнее, теперь так:
В коде попадаются длинные записи как STA $0012 вместо STA $12.У меня везде вроде бы обращение по меткам идет, то есть сам компилятор должен подставлять адрес. Но надо код еще раз просмотреть. Сегодня выявил несколько ошибок, связанных с тем, что еще не привык каждый раз начинать числа с решетки #.
Информацию лучше не располагать на краю экрана (8 пикселей слева и справа)Я заметил, что впритык к краю экрана выглядит не очень, а в режиме PAL вообще чуть-чуть (пару пикселей) обрезается. Проблему тут в том, что в ZX Spectrum ширина экрана такая же, но там есть бордюр, который эту проблему решает. Придется текст переписывать, чтобы уменьшить его ширину.
Чтение контроллера без поддержки порта расширения Famicom и лишняя инструкцияЕсли уж гнаться за каждой инструкцией, тогда чтение контроллера лучше не выносить в подпрограмму, а вставить прямо в NMI, чтобы избежать лишнего вызова и возврата.
Добавлю, что даже с отключенным экраном запись палитры нужно делать в VBlankПонятно, почему у меня при смене экрана (и перезаписи палитры) появлялась полоса на экране типа вспышки. Переместил загрузку палитры в начало, артефакт исчез.
В коде попадаются длинные записи как STA $0012 вместо STA $12.Не совсем понимаю с этими адресами. Вот что показывает отладчик:
Ну и код обновленного командного файла compilation_nes.cmdОчередная доработка файла compilation_nes.cmd. Теперь в корневую папку проекта можно положить файл nes.cfg, данный конфиг будет использоваться компоновщиком вместо стандартного. Если файла конфига не будет в корневой папке проекта, то подключается стандартный конфиг nes из набора cc65.
@echo off
setlocal enabledelayedexpansion
title Compilation NES
rem Переходим в папку с файлом
%~d1
cd "%~p1"
set ext=.asm
:next
rem Ищем файл .asm, имя которого совпадает с именем папки
set "dir=%CD%"
for %%n in (%dir:\= %) do set "file=%%n"
if "%file:~-1%"==":" (
rem Дошли до корневой папки диска, останавливаем поиск
cd "%~p1"
set "file=%~dpn1"
set "ext=%~x1"
goto compil
)
set "file=%dir%\%file%"
if not exist "%file%%ext%" (
rem Файл не найден, ищем дальше...
cd ..
goto next
)
:compil
rem Начинаем компиляцию проекта
echo Compilation: %file%%ext%
rem Удаляем старые файлы .nes и .o
if exist "%file%.nes" del /q "%file%.nes"
if exist "%file%.o" del /q "%file%.o"
rem Компилируем .asm файл
ca65 "%file%%ext%"
if errorlevel 1 goto error
rem Компонуем в .nes файл
if exist nes.cfg (
ld65 "%file%.o" -C nes.cfg -o "%file%.nes"
) else (
ld65 "%file%.o" -t nes -o "%file%.nes"
)
if errorlevel 1 goto error
rem Удаляем объектный файл
del /q "%file%.o"
rem Компиляция успешно выполнена
echo OK
rem Запускаем .nes файл в эмуляторе
"%file%.nes"
goto :EOF
:error
rem Сообщение об ошибке
echo ERROR
pause
.segment "CODE"
.proc main
_COLOR 0
_GOTOXY #9, #12
_PRINT hello1
_GOTOXY #9, #14
_PRINT hello2
_GOTOXY #8, #4
_PRINT peasant
_GOTOXY #8, #5
_PRINT peasant + 5
_GOTOXY #14, #4
_PRINT landlord
_GOTOXY #14, #5
_PRINT landlord + 5
_COLOR 2
_GOTOXY #26, #4
_PRINT dollar
_GOTOXY #26, #5
_PRINT dollar + 4
_GOTOXY #26, #6
_PRINT dollar + 8
_COLOR 1
_GOTOXY #20, #4
_PRINT army
_GOTOXY #20, #5
_PRINT army + 5
_GOTOXY #2, #4
_PRINT police
_GOTOXY #2, #5
_PRINT police + 4
_VBLANK
_SCROLL 0, 0
_SCREEN_ON
@loop:
JMP @loop
.endproc
.segment "RODATA"
hello1: .byte "Hello, World!", $ff
hello2: .byte "Привет, Мир!", $ff
police:
.byte $c3, $c4, $c5, $ff
.byte $d3, $d4, $d5, $ff
peasant:
.byte $a3, $a4, $a5, $a6, $ff
.byte $b3, $b4, $b5, $b6, $ff
landlord:
.byte $a7, $a8, $a9, $aa, $ff
.byte $b7, $b8, $b9, $ba, $ff
army:
.byte $ab, $ac, $ad, $ae, $ff
.byte $bb, $bc, $bd, $be, $ff
dollar:
.byte $a0, $a1, $a2, $ff
.byte $b0, $b1, $b2, $ff
.byte $c0, $c1, $c2, $ff
А можно сперва нарисовать оригинальную, а потом если что улучшить?Ну скорее всего по такому пути и придется идти. Графику добавить не проблема, главное каркас игры создать.
некоторые символа в русском и английском вариантах имеют общее начертание, то есть при необходимости можно эти места использовать для графики, тем более что Ассемблер позволяет делать перекодировку символовНемного привел в порядок таблицу символов, сдвинул диапазон ASCII в начало таблицы, чтобы пробел занимал нулевую позицию, ну и дальше в порядке ASCII. Русские буквы, которые визуально ничем не отличаются от английских (типа А, М, Р и прочие) удалил совсем. Малую русскую букву "я" поместил на место символа ` (это который на кнопке с буквой Ё). Тут сыграла роль ошибка компилятора ca65, он букву "я" (с кодом 255) воспринимает как конец файла, а потому буква "я" не может присутствовать в исходнике нигде, ни в строке, ни даже в комментарии, иначе компиляция крашется. То есть если мы хотим вывести текст с буквой "я", надо в коде писать что-то такое:
hello: .byte "Привет`, Мир!", $ff
hello:
.byte "!", '"', "#$%&'()*+,-./0123456789:;<=>?@"
.byte "ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`"
.byte "abcdefghijklmnopqrstuvwxyz{|}~", $5f
.byte "АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ"
.byte "абвгдежзийклмнопрстуфхцчшщъыьэю`", $ff