Советские программируемые калькуляторы, микрокомпьютеры и большие ЭВМ, не попавшие в другие разделы
Moderator: Shaos
esl
Writer
Posts: 24 Joined: 23 May 2006 13:40
Post
by esl » 24 May 2014 13:08
провет тут небольшое исследование
возможно будет интересно
http://zx.pk.ru/showthread.php?p=712575#post712575
сразу вывод
большинство бейсиков на бытовых компах пошли от Microsoft Basic 3.2 8k
бейсик для Корвет (и его дети basmsx на апогее и basicлщкмуе на векторе) Microsoft Basic 5.x
и отдельно бейсик для ПК8002 - он явно делался из MSX Basic
почему так утверждаю
у разных MS бейсиков - разные представления таблицы токенов, разные у 3.x,4.x,5.x/msx
под "делался из" я имею в виду, что его дизассемблировали а потом уже вносили изменения.
вот тут сводная табличка
https://dl.dropboxusercontent.com/u/490 ... tokens.txt
рассмотрим детальнее Microsoft Basic 3.2 8k
его прямые потомки
бейсик для MICRO-80
и бейсик для Львова (вроде как он одинок)
из MICRO-80 родился
бейсик для РАДИО86-РК
потом на его основе появился Бейсик Микрон,
ну и потом всё пошло - поехало уже из этих источников
причем бейсик для Вектора (тот который 2.5, похоже дитё Микрона)
Last edited by esl on 25 May 2014 01:49, edited 1 time in total.
Lavr
Supreme God
Posts: 16703 Joined: 21 Oct 2009 08:08
Location: Россия
Post
by Lavr » 24 May 2014 13:16
esl wrote: провет тут небольшое исследование
возможно будет интересно
Мы тут как-то уже довольно давно тоже провели похожее исследование
с привлечением статистических методов:
"
откуда растут уши у советских бейсиков "
возможно, Вам будет интересно сравнить свои выводы с нашими...
iLavr
esl
Writer
Posts: 24 Joined: 23 May 2006 13:40
Post
by esl » 24 May 2014 13:30
Lavr wrote: возможно, Вам будет интересно сравнить свои выводы с нашими...
конечно читал
основное почему стал копать -
обнаружил что редактор из корвета - наследник микрософта (
http://zx.pk.ru/showthread.php?t=23448 )
далее что Бейсик Корвет - не прямое дитя basic micro-80
тогда стал копать в сторону альтаир басиков
обноружил зоопарк
3.2 4k
4.0 4k
4.0 8k
5.x 8k
и у них есть различия
а потом нашелся (только в виде .TAP для эмулятора Альтаира 3.2 8k)
написал конвертор, сделал из него .BIN -
стал копать, получилась призабавная картинка
и вот он прародитель.
esl
Writer
Posts: 24 Joined: 23 May 2006 13:40
Post
by esl » 24 May 2014 14:32
Lavr wrote: Это не он, тот самый "прародитель"?
это его младший брат, 4к
Code: Select all
4K BASIC Ver 3-2_.bin | 8K BASIC Ver 3-2_.bin
----------------------------------------------------------
81: END 0057 00d2 01f7 | 81: END 0088 0170 05f5
82: FOR 005a 00d4 03d5 | 82: FOR 008b 0172 0538
83: NEXT 005d 00d6 0649 | 83: NEXT 008e 0174 0927
84: DATA 0061 00d8 04f5 | 84: DATA 0092 0176 06fd
85: INPUT 0065 00da 05e4 | 85: INPUT 0096 0178 085c
86: DIM 006a 00dc 0716 | 86: DIM 009b 017a 0b24
87: READ 006d 00de 05f6 | 87: READ 009e 017c 0883
88: LET 0071 00e0 0502 | 88: LET 00a2 017e 0714
89: GOTO 0074 00e2 04cf | 89: GOTO 00a5 0180 06cb
8a: RUN 0078 00e4 02a1 | 8a: RUN 00a9 0182 06ae
8b: IF 007b 00e6 0516 | 8b: IF 00ac 0184 0782
8c: RESTORE 007d 00e8 0469 | 8c: RESTORE 00ae 0186 05df
8d: GOSUB 0084 00ea 04be | 8d: GOSUB 00b5 0188 06ba
8e: RETURN 0089 00ec 04df | 8e: RETURN 00ba 018a 06e7
8f: REM 008f 00ee 04f7 | 8f: REM 00c0 018c 06ff
90: STOP 0092 00f0 01f7 | 90: STOP 00c3 018e 05f3
91: PRINT 0096 00f2 0557 | 91: OUT 00c7 0190 0fa4
92: LIST 009b 00f4 038e | 92: ON 00ca 0192 0766
93: CLEAR 009f 00f6 02a6 | 93: NULL 00cc 0194 062e
94: NEW 00a4 00f8 0295 | 94: WAIT 00d0 0196 0faa
95: TAB( 00a7 .... .... | 95: DEF 00d4 0198 0cce
96: TO 00ab .... .... | 96: POKE 00d7 019a 10aa
97: THEN 00ad .... .... | 97: PRINT 00db 019c 079b
98: STEP 00b1 .... .... | 98: CONT 00e0 019e 061b
99: + 00b5 .... .... | 99: LIST 00e4 01a0 04f1
9a: - 00b6 .... .... | 9a: CLEAR 00e8 01a2 0685
9b: * 00b7 .... .... | 9b: CLOAD 00ed 01a4 1040
9c: / 00b8 .... .... | 9c: CSAVE 00f2 01a6 1020
9d: > 00b9 .... .... | 9d: NEW 00f7 01a8 03a1
9e: = 00ba .... .... | 9e: TAB( 00fa .... ....
9f: < 00bb .... .... | 9f: TO 00fe .... ....
a0: SGN 00bc .... .... | a0: FN 0100 .... ....
a1: INT 00bf .... .... | a1: SPC( 0102 .... ....
a2: ABS 00c2 .... .... | a2: THEN 0106 .... ....
a3: USR 00c5 .... .... | a3: NOT 010a .... ....
a4: SQR 00c8 .... .... | a4: STEP 010d .... ....
a5: RND 00cb .... .... | a5: + 0111 .... ....
a6: SIN 00ce .... .... | a6: - 0112 .... ....
| a7: * 0113 .... ....
| a8: / 0114 .... ....
| a9: ^ 0115 .... ....
| aa: AND 0116 .... ....
| ab: OR 0119 .... ....
| ac: > 011b .... ....
| ad: = 011c .... ....
| ae: < 011d .... ....
| af: SGN 011e .... ....
| b0: INT 0121 .... ....
| b1: ABS 0124 .... ....
| b2: USR 0127 .... ....
| b3: FRE 012a .... ....
| b4: INP 012d .... ....
| b5: POS 0130 .... ....
| b6: SQR 0133 .... ....
| b7: RND 0136 .... ....
| b8: LOG 0139 .... ....
| b9: EXP 013c .... ....
| ba: COS 013f .... ....
| bb: SIN 0142 .... ....
| bc: TAN 0145 .... ....
| bd: ATN 0148 .... ....
| be: PEEK 014b .... ....
| bf: LEN 014f .... ....
| c0: STR$ 0152 .... ....
| c1: VAL 0156 .... ....
| c2: ASC 0159 .... ....
| c3: CHR$ 015c .... ....
| c4: LEFT$ 0160 .... ....
| c5: RIGHT$ 0165 .... ....
| c6: MID$ 016b .... ....
DimkaM
Maniac
Posts: 261 Joined: 22 Jun 2005 04:35
Location: МО Россия
Post
by DimkaM » 24 May 2014 23:11
esl
Writer
Posts: 24 Joined: 23 May 2006 13:40
Post
by esl » 25 May 2014 01:49
DimkaM wrote:
ссылка не работает
поправил. в оригинальном посте (по сслыке) работала