nedoPC.org

Electronics hobbyists community established in 2002
Atom Feed | View unanswered posts | View active topics It is currently 28 Mar 2024 01:08



Reply to topic  [ 7 posts ] 
Родословная бейсиков для 580ВМ80 
Author Message
Writer

Joined: 23 May 2006 13:40
Posts: 24
Reply with quote
провет тут небольшое исследование
возможно будет интересно

http://zx.pk.ru/showthread.php?p=712575#post712575
Quote:
сразу вывод
большинство бейсиков на бытовых компах пошли от 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.



24 May 2014 13:08
Profile
Supreme God
User avatar

Joined: 21 Oct 2009 08:08
Posts: 7777
Location: Россия
Reply with quote
esl wrote:
провет тут небольшое исследование
возможно будет интересно

Мы тут как-то уже довольно давно тоже провели похожее исследование
с привлечением статистических методов:
"откуда растут уши у советских бейсиков"

возможно, Вам будет интересно сравнить свои выводы с нашими...

_________________
iLavr


24 May 2014 13:16
Profile
Writer

Joined: 23 May 2006 13:40
Posts: 24
Reply with quote
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 -
стал копать, получилась призабавная картинка

и вот он прародитель.


24 May 2014 13:30
Profile
Supreme God
User avatar

Joined: 21 Oct 2009 08:08
Posts: 7777
Location: Россия
Reply with quote
Post 
В той же ветке мы пробовали какой-то древний Васик от Билла:

Image

Это не он, тот самый "прародитель"?

_________________
iLavr


24 May 2014 13:41
Profile
Writer

Joined: 23 May 2006 13:40
Posts: 24
Reply with quote
Post 
Lavr wrote:
Это не он, тот самый "прародитель"?

это его младший брат, 4к

Code:
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 .... ....


24 May 2014 14:32
Profile
Maniac

Joined: 22 Jun 2005 04:35
Posts: 260
Location: МО Россия
Reply with quote
Post 
Quote:
вот тут сводная табличка https://dl.dropboxusercontent.com/u/...sic_tokens.txt

ссылка не работает


24 May 2014 23:11
Profile ICQ
Writer

Joined: 23 May 2006 13:40
Posts: 24
Reply with quote
Post 
DimkaM wrote:
Quote:
вот тут сводная табличка https://dl.dropboxusercontent.com/u/...sic_tokens.txt

ссылка не работает


поправил. в оригинальном посте (по сслыке) работала


25 May 2014 01:49
Profile
Display posts from previous:  Sort by  
Reply to topic   [ 7 posts ] 

Who is online

Users browsing this forum: No registered users and 15 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Group
Designed by ST Software.