Вопросы по программированию

[Pyk]

Подскажите пожалуйста, каким способом можно загрузить исходник на Бейсике в эмуляторе Emu80?

Если исходник в виде обычного текста, то проще всего копипастом: View - Paste text / Отображение - Вставить текст, Alt-Shift-V
Возможны ошибки при вставке, если ошибок окажется слишком много, могу попробовать поиграться таймингами.

[AlexS58]

Если исходник в виде обычного текста

Да, действительно ошибки возникают. Когда-то пробовал таким способом "набирать" текст программы Можно попробовать вставлять порциями по несколько строк. Или сохранить исходник в виде текстового файла с раширением BSC (например, - ну чтобы не спутать с BAS), закинуть его в образ дискеты .KDI, а в Бейсике загрузить с параметром A: LOAD "PRIMER1.BSC",A

[Pyk]

действительно ошибки возникают

Можно попробовать увеличить задержки вот в этих параметрах в korvet.conf:

kbdTapper.pressTime = 40
kbdTapper.releaseTime = 40
kbdTapper.crDelay = 100

Но через файл, конечно, надежней.

[yevrowl]

закинуть его в образ дискеты .KDI

Сделал образ дискеты .DSK (от MSX) — Emu80, кажется, принимает. Как делать образы .KDI — не знаю.

в Бейсике загрузить с параметром A: LOAD "PRIMER1.BSC",A

Попробовал, увы, не получилось:

[Willy]

Это Бейсик из ПЗУ, похоже. Он не умеет работать с дисками, нужен дисковый Бейсик.
Можно поискать на форуме образы дисков для Корвета, там много чего было.

[AlexS58]

Это Бейсик из ПЗУ, похоже.

Так и есть.
Да и для дискового команда была набрана неверно:
A: LOAD "BT.BAS", A
Нужно:
LOAD "BT.BAS", A

Можно поискать на форуме образы дисков для Корвета, там много чего было.

Да, KDI-образов много, софта разного прилично. Кстати, Бейсик дисковый есть и с командой DRAW и без.. И компилер попадался (вопрос был в теме по Васику). А вот "кушает" ли он исходники для интерпретатора - вопрос...

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

Попробовал, увы, не получилось

Это Бейсик из ПЗУ

ПЗУ-шный умеет только с кассеты:
LOAD "CAS:BT.BAS", A

[shattered]

в архиве INFO.rar (https://zx-pk.ru/threads/2597-korvet...=1#post1139106) смешаны два набора файлов -- документация из МикС (1991 год):

BIOS.DOC -- ROM BIOS (2.1 от 02.1989) (точки входа, внутренние переменные)
FUNBDOS.DOC -- к CP/M 2.2
MYSCR.DOC -- описание управляющих последовательностей драйвера CONOUT в ROM BIOS
PK8020_2.DOC -- описание платформы ПК8020

и более старая:

BIOS.TXT -- ROM BIOS 03.1988
CPM.DOC -- к CP/M 2.1
PK8020.DOC -- описание платформы ПК8020 (1986), продублирован много где, например в https://emu80.org/docs/korvet_techinfo

другие тексты:

https://www.emuverse.ru/wiki/Корвет/BIOS -- "ОПИСАНИЕ БАЗОВОЙ СИСТЕМЫ ВВОДА-ВЫВОДА BIOS vers. 2.0" (речь о CP/M BIOS)

[yevrowl]

Код, опубликованный в тематической группе Telegram, и позволяющий отображать на экране одновременно 16 (8 в двух градациях яркости) цветов:

100 CLS
110 PCLS
120 LOCATE , , 0
130 DIM P%(15)
140 FOR I = 0 TO 15
150 P%[I] = I
160 NEXT I
170 LUT P%(0)
180 FOR I = 0 TO 7
190 LINE (I * 32, 0) - (I * 32 + 31, 255), I, BF
200 LINE (256 + I * 32, 0) - (287 + I * 32, 255), I, BF
210 NEXT I
220 FOR Y = 0 TO 15
230 FOR X = 32 TO 63
240 POKE 64512! + Y * 64 + X, 191
250 NEXT X, Y
260 GOTO 260

[yevrowl]

Прошу подсказать, можно ли сделать и если да — то каким образом, чтобы квадратики отображались цветами из дополнительной палитры?



Source — mm-src.7z
Wave — mm-wav.7z

[marinovsoft]

Нет никакой "дополнительной палитры". Эффект 16 цветов в вышеприведенной программе достигается выводом в АЦЗУ символов закрашенного прямоугольника (код 191).
Если убрать из программы 190 и 200 строки будет более наглядно.