восстановление External Zone, работа в эмуляторе (Страница 3 из 4)

Сейчас пока больше нет. Понимаю, что она больше для тестирования реальной "залипающей" памяти. :) Но редкую дискету хочу на всякий случай - на новом месте в другой стране, кто знает, возможно захочу собрать Агат обратно.

Понимаю. Спасибо! Поэтому и не мог найти поиском. Но все об этом тесте говорят. Собственно, TESTMEM95 для PC у меня на всех реанимационных носителях - первый тест что я делаю. :)
Потестирую как будет время.

Возвращаясь к EZ.

1. Выше я писал о необьяснимом поведении программы, капризной загрузке с диска и прочем.
SEI!!!
Исчерпав все свои способности найти источник проблем, я смутно вспомнил, что перед непосредственным обращением к FDD контроллеру надо отключать прерывания... От этого бага я страдал в 90х, не мог понять причину проблемы - сколько оно мне нервов попортило...

2. даже после избавления от привязки части кода к абcолютным адресам, код остается неперемещаемым - для части данных лежащих бок о бок с подпрограммами в сегменте кода используется адресная арифметика с обрезанием результата до младшего байта адреса, при пересечении страницы (100h байт) - непредсказуемый эффект:

;где-то в коде арифметика для вычисления индекса в массиве:
    ADC #_ARRAY&0FFh ;добавляем мл часть его адреса
;...
_ARRAY:
    .db 0C3h, 99h, 81h, 99h, 0C3h

Чтобы выдавать ошибку ассемблирования при опасном пересечении массивом 100h границы, стал добавлять проверки (для TASM)

_ARRAY:
    .db 0C3h, 99h, 81h, 99h, 0C3h
#if (($&0FFh) <= ($-_ARRAY))
    ! ;100h boundary !
#endif

Кстати, для слов в памяти, ускоряется ли к ним доступ при выравнивании на границу слова?

3.
Столкнулся с некорректно работающей процедурой опроса джойстика. С кнопками проблем нет, а вот считывание направления... В те годы на реальном своем железе со специфическими позициями paddles центральное положение вылавливал так:

INPUT_PADDLES
    PHA
    LSR A
    TAX
    LDA $C070  ;pdls: analog input reset
    SBC #7Eh
    LDY #0
_3
    LDA $C064-1,X  ;$C064..C067 Analog inputs
    BPL _4
    INY
    BNE _3
    DEY

_4
    TYA
    BPL _12
    SBC #6Ch
_12
    CPY #14h
    PLA
    TAX
    BCC _5
    DEX
    BVC _5
    LDX #0
_5
    RTS

И вызывалась процедура выше напр следующим кодом (где требовалось просто определить, что джойстик в центральной позиции (код 0) или нет (коды 1..4)):

    LDA #2               ;Joy lf/rt (1,2)
    JSR INPUT_PADDLES
    BNE _7               ;опрос движений joy
    LDA #4               ;Joy up/dn (3,4)
    JSR INPUT_PADDLES
    BNE _7
    LDA #0
_7  ;continue

Какие будут стандартные значения получаемые c портов paddles ($C064..$C067)?
Или проще - пример работающей процедуры. Чтобы в том числе работало в эмуляторе.

> SEI!!!
Если ты про команду SEI, то она только IRQ будет блокировать, NMI - нет.
Так что надо отключать именно таймер - C02x.

> Кстати, для слов в памяти, ускоряется ли к ним доступ при выравнивании на границу слова?

Скорее нет.

Про массивы не совсем понял:
Получить элемент однобайтного массива:
lda ARRAY, Y
В Y индекс.

Не важно - пересекается страница или нет - это работает.

Массив двухбайтовый элементов, если там элементы записаны в соседних байтах, а в Y - индекс:
TYA
ASL A
TAY
lda ARRAY+0,Y
sta КУДА-ТО
lda ARRAY+1,Y
sta КУДА-ТО

Тоже пересечение границы не важно.
Пересечение границы может быть будет важно при короткой адресации - там что-то вроде
ldx #$FF
lda $80,X
заберёт байт именно по адресу $7F.

--

Про джой:

Мне не понятна даже эта конструкция:
    PHA
    LSR A
    TAX
    LDA $C070  ;pdls: analog input reset
    SBC #7Eh
У тебя на выходе A будет зависеть от A на входе процедуры.
Это так и задумано? Выглядит как ошибка.

Опрос джоев довольно простой:
Щёлкаем C070 и ждём, пока на C064 и C065 упадёт старший бит.
Время его падения как раз и есть угол поворота оси джоя.
Оно подобрано схемотехнически таким образом, чтобы ЦП успел максимум прокрутить
примерно 256 циклов ожидания (loop: LDA C064,X / BPL EXIT / INY / BNE loop).

Есть один подводный камень: если ты крутнул цикл по одному пульту и получил довольно небольшое значение, то щёлкать вновь C070 и читать второй пульт будет не совсем хорошей идеей, если у второго пульта значение будет много больше: он просто не среагирует на второй C070.
Т.е. нужно дожидаться завершения счёта по обеим пультам прежде чем вновь их опрашивать.
В эмуляторах это не будет заметно, скорее всего, а на реальном железе - важно.
Процедура, которая это реализует:

*
* Чтение состояния пультов
*
GET_PAD_ANGLE:
 STY HT
 
 STA $C070
 LDY #0
 NOP
 NOP
GP_LOOP:
 LDA $C064,X
 BPL GP_FIN
 INY
 BNE GP_LOOP
 DEY
GP_FIN:

* OЖИДAEM ЗABEPШEHИЯ ПO BTOPOMУ ПУЛЬTУ

 TXA
 EOR #1
 TAX                                                      

 TYA
 PHA

 LDY #255
GR_WASTE:
 DEY
 BEQ GR_WASTE_FIN
 LDA $C064,X
 BMI GR_WASTE

GR_WASTE_FIN:
 PLA
 TAY

*

 JMP DECCIF     - вывод на экран числа

Характеристка пультов близка к линейной, так что Y примерно 128 - это где-то как бы центр.
Но лучше брать его пошире, чтобы на реале было надёжно. Сколько именно - зависит
от логики игры и убитости пультов, надо пробовать.

> dos33c2

Это не совсем баги, это предсказуемый пофигизм: экспорт-импорт не считались важными функциями, поэтому имена вводятся строкой, а не выбираются из меню, причем имя буквально передаётся операционке, а она полный путь вычисляет как текущий каталог + то, что ты указал. dos33c2 не меняет текущий каталог при работе, а в винде принято назначать по умолчанию текущим тот, в котором находиться исполняемый файл (если ты создаёшь ярлык на исполняемый файл или просто щёлкаешь по исполняемому файлу в "проводнике"). Так что если ты вводишь только имя файла, то подразумевается, что это файл в том же каталоге, где dos33c2w.exe

Текущий каталог легко сменить в свойствах ярлыка (если dos33c2 вызывается щёлчком по её ярлыку (.LNK)). Более того, можно просто назначить dos33c2 обработчиком файлов DSK, FIL, AIM (что-то в винде это вроде "открывать эти файлы такой-то программой" или "ассоциировать расширение файла с программой") - в этом случае текущим каталогом будет ставиться именно тот, где находятся рабочие файлы. Я именно в такой настройке работаю сам.

Другой - скучный - вариант: можно имя файла указывать с частью пути (alex\ent\ret.fil) или даже с полным путём (c:\need\for\log.fil).

По причине того же пофигизма, экспорт и импорт не обёрнуты в обработчики ошибок. Поэтому если file not found или какая-то ещё ошибка доступа к файлу происходит, прога падает. Основное - это работа с образами дисков и FIL-контейнерами - вот там всё ловиться, с сообщением обо всём, что выглядит странно или неверно.

--

Экспорт K-файла не совсем понял:
если ты в меню выбираешь :

"Экспорт К файла: F9|Экспорт|K файл без перекодировки. "

Это означает, что ты хочешь некий абстрактный дамп байт из PC-шного файла залить внутрь нового K- файла. Хоть EXE-шник можешь залить, лишь бы < 64 кб размер был. При этом адрес загрузки во вновь создаваемом файле будет задан как $1800 и размер до байта соответствовать исходному файлу.

Если же ты хочешь в образ диска залить уже чем-то (хоть TASM-ом) синтезированный К- файл (со всеми заголовками и прочим и расширением .FIL) - то просто на одной панели открываешь образ, на другой - каталог, где лежит готовый K- и копируешь его нажатием F5.

Все это неважно, пока не начинаем оптимизировать код на производительность. Cейчас поясню :)

Если старший байт при этом не меняется (если массив менее 100h байт длиной и программа об этом ЗНАЕТ),
если младший байт адреса подпатчивается непосредственно в операнде того опкода который адресует этот массив (ограничение 6502 - невозможность одновременной индексации по х И y),
то адрес завертывается.
В большинстве случаев экономия памяти и тактов от использования только мл байта адреса при рассчете адреса массива
и экономия тактов на простой инкремент/декремент до нуля/до смены знака (вместо инкремента/декремента со сравнением) неоправдана кроме отдельных случаев, но тем не менее без правки логики кода имеем неперемещаемую часть.

Я приведу пример целиком (от него не требовалась максимальная производительность (это просто cчет игрока) - иначе ухищрения по оптимизации тут не заканчивались  бы - вплоть до генерации ВСЕГО кода динамически, без условных переходов и без арифметики индексов):

PR_NUMBER  ;A:мл,Y:ст адр куда, X:0..9 digit
    STA _M2+1        
    STY _M2+2
    TXA
    STA SAV
    ASL A
    ASL A
    ADC SAV  ;= x5 (каждый символ длиной 5 байт).
    ADC #_NUMS8X5&0FFh ;low byte
    STA _M1+1
;_M1+2 не вычисляем и не меняем - экономия #1

    STA BANK1+20h  ;C131 (SEG 6000..7FFF)
    JSR _1
    STA BANK2+20h  ;C13D. double buffering: отображаем счет сразу на обоих экранах A и B

_1
    LDX #4
_2
    LDY _LINEDAT,X
_M1 ;L dyn. mod.  здесь модицифицируется только мл часть адреса
    LDA _NUMS8X5,X
_M2 ;LH dyn. mod.  здесь модифицируются мл и ст части адреса
    STA SEG1,Y
    DEX
    BPL _2  ;экономия #2
    RTS

_LINEDAT .db 0,20h,40h,60h,80h,0A0h,0C0h,0E0h

_NUMS8X5:  ;8x5 digits
    .db 0C3h, 99h, 81h, 99h, 0C3h
    .db 0E7h, 0C7h, 0E7h, 0E7h, 0C3h
    .db 83h, 0B9h, 0E3h, 0CFh, 81h
    .db 81h, 0B3h, 0E3h, 0B9h, 81h
    .db 0E3h, 0C3h, 0B3h, 1, 0F3h
    .db 83h, 9Fh, 0C3h, 0B9h, 81h
    .db 0E3h, 0CFh, 83h, 99h, 81h
    .db 81h, 99h, 0F3h, 0E7h, 0E7h
    .db 0C1h, 99h, 0C3h, 99h, 83h
    .db 0C3h, 99h, 0C1h, 0F3h, 0E7h
#if (($&0FFh) <= ($-_NUMS8X5))
    ! ;100h boundary !
#endif

Работая в режиме жестких ограничений производительности, подобные ухищрения у меня вошли в привычку и я иногда "усложнял" простые вещи там, где скорость выполнения даже не требовалась. :)

хмм. спасибо за дополнение! об этом я тогда не задумывался - а ведь опрос аналоговых пультов тоже будет сбоить при таймерных прерываниях. :)

Вопрос к автору: ЧТО ЭТО?

Я экспериментировал с защитой диска от копирования хахаха. :) Наигравшись намеренным созданием сбойных секторов, я пошел дальше с индексными отверстиями итд. Теоретически, если на дискете несколько индексных отверстий, то при многократной попытке считывания данных идущих сразу за сигналом дырки, фактически считаны будут разные данные. Практических результатов не помню.
---------------------
по External Zone (это 4/5 дисков) финальная вычитка относящихся к ней дискет больше НЕ НУЖНА - пре-пре чтение было удачным!!! Огромное спасибо! Мне удалось по миксу файлов с разных дискет восстановить более-менее работоспособность версии близкой к последним датам работы над ней.

Попутно также восстановился проект "64 поля" (исходники) - шахматы. Мне не нравилось, что популярная программа Sargon имела скорость обдумывания по 5..15 и более минут на 1 ход (просчитывание на несколько ходов вперед)... И разобрав несколько шахматных программ на Apple ][, я начал оптимизировать в своей версии шахмат...

Игорь, акцентировать чистовую вычитку надо для дисков относящихся к "Подземелья Черного Замка" - здесь пока все неудачно, в черновой вычитке части комплектных дисков вообще нет. Я по email отправлял описание, какое примерное содержимое имеют диски этого проекта.
--------------------
В аттаче рабочая версия EZ от 1996.04.08, в том виде, в каком шла над ней работа. Устранены грубые ошибки, мешающие запуску. Чтобы оценить проект в целом. Work in progress...
1. обратный выход в best неполноценный - отваливаются дисковые функции. :( На игру не влияет, но возможно осложнится процесс редактирования уровней через редактор, если в нем не реализована запись измененных данных обратно на диск (не помню).
2. недоделанные пункты меню, промежуточные заставки и полу-рабочий функционал в игре временно заблокировал.
3. опрос аналоговых пультов/джойстика отключил (их кнопки работают).
4. часть надписей на русском, часть на английском - оставил пока все как есть. Был тогда в процессе переделки всех текстов в игре на английский.
5. В игре пишется Stage 1, хотя по факту это не первый уровень - просто для тестирования грузится этот. Я больше работал над самим движком и созданием редактора тогда.
---------------
Список всех клавиш, на которые может реагировать игра: Q, обе кнопки джойстика, стрелки Up/Dn/Lf/Rt, Space, Esc (РЕД на Агате), CTRL-Break (выход в Best), 1,2,0 (эти три для отладки), 9(PgUp) на нумпаде через эмулятор (F3 на Агате) для выхода в меню. Долгое нажатие кнопок стрельбы - накопление энергии.

Запуск редактора уровней хитрый - жмем Esc сразу после старта уровня. Описание его команд - в исходниках зоны (первая страница темы).

Попробовал, летает
После примерно трёх падений словил
        ДИСКЕТА ЗАЩИЩЕНА       
            ОТ ЗАПИСИ           
А зачем ей запись на диск?

Дальше висит и ждёт РЕД, наверное, но не говорит об этом.
Но на РЕД дёргает дисковод и продолжает висеть.

Вроде так задумано. Процедура вызывается с Acc = 2 или 4 для опроса разных осей джойстика, на выходе 1..2 или 3..4 соответственно.

Волдемар, спасибо за технический комментарий - таких деталей я не узнал бы уже нигде!
Но камень в огород дизайнеров железа (понятно, что причина - удешевление) - процедура могла бы называться простой, если C064/C065 сразу возвращал бы цифровое 128/256-байтное значение. А так - как минимум нужно этот loop обрамлять в запрет/разрешение прерываний.

Спасибо за ценное дополнение. Конечная цель - реальная машина конечно же, эмулятор вторичен. :)

Кстати, С066/С067 - второй джойстик? И только для Apple ][?

Подобные операции я обычно заменял на BIT $C070, чтобы отличить чтение и запись от простого обращения. :)

Это надо в теме опечаток на сайте писать, где-то наверху форума.

Игорь, огромное спасибо! Восстановились все 100% необходимых файлов для ВЗ и все доступные файлы для ЧЗ (что были на дисках - если что-то было где-то еще то увы утрачено).
На дисках остались битыми мелкие бинарники с экспериментами, файлы с промежуточной графикой, попытки снятия защиты и прочие патчи для эппл игрушек и агатовского софта - все это несущественно для восстановления.
----------
На фантоме я читал про ваши с Волдемаром фирменные технологии снятия образа, когда каждый проход попытки чтения сохраняется отдельно и уже из многомегабайтного слепка с помощью хитрых алгоритмов высчитываются наиболее удачные попытки чтения для каждого сектора. Я сузил зону поиска до примерно пяти дисков, Волдемар прошелся по всем нечитаемым файлам, вытащил все тела файлов что были стерты - чудо, но через разные подходы восстановились все сбойные места!!! Далее мне после сличения и дальнейшей правки удалось восстановить все недостающиие файлы Внешней Зоны в рабочем виде почти на момент ее последней даты редактирования, отредактировать исходники и начать вносить правки. Буду выкладывать апдейты и добавлять то, что хотел реализовать но не успел - собираюсь как минимум сделать полноценное демо. И поделюсь последней версией исходника под TASM (сейчас он в неспешной стадии кардинальных правок c глобальными переименованиями и прочими пертурбацияими - вспоминаю что делал тогда и заново ассимилирую код). В первом посте темы буду обновлять ссылку на последний апдейт.

Подземелья Черного Замка - здесь сложнее, новая версия проекта была переделана из A-файлов бейсика в скрипт, но программу для интерпретации скрипта тогда не успел написать. Есть пока технически не решаемые сложности.
Тем не менее, для текущего статуса, после сличения полный набор файлов для ранней версии (107 файлов локаций) и файлов для поздней версии (153 файла локации) выложил в соседней теме в аттачах.

=) Название улыбнуло.

Увы, Подземелье Черного Замка требует серьезной доработки - ранняя версия запускаема как proof of concept, но для полноценной игры требуется, чтобы каждый присоединяемый по chain файл имел в своем составе управляющий код (64 блока), в котором исполь зование предметов и заклинаний, сохранение состояния игры на диск итд.
Задача на практике трудно решаема (загрузка каждого файла из 106 доступных и присоединение через EXEC файла с управляющим кодом).
Новая версия игры (расширенная до 153+ локаций) была и вовсе оставлена в 1996 в нерабочем состоянии, в процессе переписки под скрипт + управляющий код на ассемблере. Цель-минимум пока - привести все скрипты локаций к одному формату.