Спасибо за хорошую новость! =)Цитата:
Сообщение от litwr
Значит и прошлая тоже заработает — https://zx-pk.ru/threads/15302-korve...=1#post1219347
Вид для печати
Спасибо за хорошую новость! =)Цитата:
Сообщение от litwr
Значит и прошлая тоже заработает — https://zx-pk.ru/threads/15302-korve...=1#post1219347
Хорошо бы сделать поддержку клавиши выхода в ДОС - это команда SYSTEM в дисковом бейсике. При запуске с кассеты такую клавишу можно либо блокировать, либо оставить дефолтный для такого случая краш. Отличить ПЗУ бейсик от дискового можно по пикам.
Какой адрес PEEK следует считывать для этого в Корвет-Бейсике?Цитата:
Сообщение от litwr
Наверное можно придумать какой-то хороший PEEK для этого, но сам такое пока предложить не готов.
Могу предложить несколько более сложный вариант. Пикаем байт с адреса 80h, добавляем 1 и покаем туда же, затем пикаем оттуда опять. Если значение там не изменилось, то работаем с ПЗУ, а если изменилось, то мы в ДОС.
Добавить единицу не получилось, ввиду того что POKE 80h = 255, пришлось отнять.Цитата:
Сообщение от litwr
Архив с исходником и звуковым файлом прилагаю — Вложение 83753
Даже не знал, что POKE контролирует значение второго аргумента на диапазон 0..255. Лучше тогда использовать XOR, например, PEEK(128) XOR 1.Цитата:
Сообщение от yevrowl
Вы, получается, выложили код без проверки?
Код проверен, всё работает, во всяком случае на Бейсик-Корвет с ПЗУ.Цитата:
Сообщение от litwr
Можно прочитать копию системного регистра из &HF703: &H1C - конфигурация ODOSA (CP/M-80, МикроДОС.., т.е. Бейсик дисковый), &H40 - конфигурация BASIC (Бейсик ПЗУшный)Цитата:
Сообщение от yevrowl
Ну и "быстрый" запуск под ДОС:
basic mm
Извиняюсь, похоже предложил неверную идею. :( Выход в бейсик - это лучшее решение для такой программы. SYSTEM - это реально лишнее.Цитата:
Сообщение от yevrowl