ага, точно, сейчас посмотрел,
8002 - это ТОЧНО MSX, эта версия старше чем та на которой корветовский базируется
там почти один в один
посмотрел например на DRAW - там такие странные таблички переходов - совпадение
не говоря уже о кодах токенов

итого сейчас видно три "поколения" microsoft бейсиков

1) basic 4k
его визуальное отличие имхо таблица токенов линейна, и старший бит последнего символа 1

2) basic 8k, extendend basic (mbasic 4.5+, 5.x точно)
таблица ключевых слов уже сложная структура
26 указателей (по первым буквам A-Z) на таблицы где 2+символы, и последним байтом токен
AUTO -> 'UTO',0A9H

такие таблички указателей на функции работы с арифметикой

Скрытый текст


(адреса тут левые, только для примера как выглядит)
Код:
I3D47:	DEFW	C303A			; convert DAC to double real
	DEFW	0
	DEFW	C2F8A			; convert DAC to integer
	DEFW	C3058			; check if string (error if not)
	DEFW	C2FB2			; convert DAC to single real

I3D51:	DEFW	C269A			; double real addition DECADD
	DEFW	C268C			; double real subtract DECSUB
	DEFW	C27E6			; double real multiply DECMUL
	DEFW	C289F			; double real divide DECDIV
	DEFW	C2F83			; double real compare

I3D5D:	DEFW	C324E			; single real addition
	DEFW	C3257			; single real subtract
	DEFW	C325C			; single real muliply
	DEFW	C3267			; single real divide
	DEFW	C2F21			; single real compare (FCOMP)

I3D69:	DEFW	C3172			; integer addition
	DEFW	C3167			; integer subtract
	DEFW	C3193			; integer multiply
	DEFW	C4DB8			; integer divide
	DEFW	C2F4D			; integer compare
[свернуть]



3) msx basic (возможно и другие, но не попадалось)
тоже что и 2,
но только
в таблички указателей на функции работы с арифметикой добавился еще эллемент "to the power"

Скрытый текст


Код:
I3D47:	DEFW	C303A			; convert DAC to double real
	DEFW	0
	DEFW	C2F8A			; convert DAC to integer
	DEFW	C3058			; check if string (error if not)
	DEFW	C2FB2			; convert DAC to single real

I3D51:	DEFW	C269A			; double real addition DECADD
	DEFW	C268C			; double real subtract DECSUB
	DEFW	C27E6			; double real multiply DECMUL
	DEFW	C289F			; double real divide DECDIV
	DEFW	C37D7			; double real to the power
	DEFW	C2F83			; double real compare

I3D5D:	DEFW	C324E			; single real addition
	DEFW	C3257			; single real subtract
	DEFW	C325C			; single real muliply
	DEFW	C3267			; single real divide
	DEFW	C37C8			; single real to the power
	DEFW	C2F21			; single real compare (FCOMP)

I3D69:	DEFW	C3172			; integer addition
	DEFW	C3167			; integer subtract
	DEFW	C3193			; integer multiply
	DEFW	C4DB8			; integer divide
	DEFW	C383F			; integer to the power
	DEFW	C2F4D			; integer compare
[свернуть]



варианты
1 - похоже почти все к580вм80 бейсики
2 - Корвет (и он же есть на векторе как бейсик-корвет) ноги похоже ростут от TRS-80
3 - ПК8002 - корни из MSX