[SRC] GW-BASIC

[Shaos]

Мелкомягкие открыли сырцы GW-BASIC (1983) - последний продукт, как пишут, который собственноручно кодил Билли

https://github.com/microsoft/GW-BASIC

https://devblogs.microsoft.com/commandline/microsoft-open-sources-gw-basic/

[Lavr]

Ооооо... GW-BASIC! Кодил на нём на "Искре-1030" сразу после "Специалиста_МХ".

И был у меня (и есть) вот такой фирменный "мануал" к нему:

gb.jpg

Мануал куда как толще самогО GW-BASIC! Сам GW-BASIC занимал всего ничего...

Кстати, с BASIC-а "Специалиста_МХ" под GW-BASIC всё очень корректно перенеслось!

И GW-BASIC, видимо, последний из семейства BASIC-ов, которому присуще всё то, за что
BASIC-и принято заслуженно ругать...

QuickBASIC и TurboBASIC - это уже совсем иная "песня" была...

[Tronix]

Не так то просто его собрать....

[Tronix]

Хотя бы потому, что там нет списка зарезервированных слов BASIC, соответственно не развернуть макросы BINTRP.H и др. Походу у них какая-то самописная утилитка была, которая проходилась по дефайнам и собирала нужный инклюд в зависимости от. Ее не положили.
Так что "из коробки" не собрать. Нужно допиливать напильником. Но, я думаю, фанаты справятся, а мне уже лень.

[Tronix]

А, не, прогнал. Все там есть. Потихоньку вкуриваю, собрал GWMAIN.OBJ.

[Tronix]

Но все равно кода не хватает, вот этих процедур:

 map file

Unresolved externals:


MAPSUP in file(s):
GIOKYB.OBJ(GIOKYB)
POKFLT in file(s):
GWMAIN.OBJ(GWMAIN)
SCRINP in file(s):
SCNDRV.OBJ(SCNDRV) GWSTS.OBJ(GWSTS)
POLLEV in file(s):
GWSTS.OBJ(GWSTS)
TRMCOM in file(s):
GIOCOM.OBJ(GIOCOM)
SCRATR in file(s):
GWSTS.OBJ(GWSTS)
SETCLR in file(s):
GWSTS.OBJ(GWSTS)
PNTINI in file(s):
ADVGRP.OBJ(ADVGRP)
SCROUT in file(s):
SCNDRV.OBJ(SCNDRV) GWSTS.OBJ(GWSTS)
SETATR in file(s):
ADVGRP.OBJ(ADVGRP) GENGRP.OBJ(GENGRP)
CSRDSP in file(s):
GIOKYB.OBJ(GIOKYB) GWSTS.OBJ(GWSTS)
SCRSTT in file(s):
GWSTS.OBJ(GWSTS)
NWRITE in file(s):
ADVGRP.OBJ(ADVGRP)
GWINI in file(s):
GWINIT.OBJ(GWINIT)
CSRATR in file(s):
GWSTS.OBJ(GWSTS)
RDPEN in file(s):
GWSTS.OBJ(GWSTS)
KEYINP in file(s):
GIOKYB.OBJ(GIOKYB)
PRTMAP in file(s):
SCNDRV.OBJ(SCNDRV)
FKYADV in file(s):
SCNDRV.OBJ(SCNDRV) GWSTS.OBJ(GWSTS)
GRPSIZ in file(s):
GENGRP.OBJ(GENGRP)
LSTVAR in file(s):
GWINIT.OBJ(GWINIT)
GWTERM in file(s):
GIODSK.OBJ(GIODSK)
FKYFMT in file(s):
SCNDRV.OBJ(SCNDRV) GWSTS.OBJ(GWSTS)
LCPY in file(s):
GWSTS.OBJ(GWSTS)
DOWNC in file(s):
ADVGRP.OBJ(ADVGRP) GENGRP.OBJ(GENGRP)
PIXSIZ in file(s):
ADVGRP.OBJ(ADVGRP) GENGRP.OBJ(GENGRP)
SETC in file(s):
GWSTS.OBJ(GWSTS) ADVGRP.OBJ(ADVGRP) GENGRP.OBJ(GENGRP)
WORDS in file(s):
GWINIT.OBJ(GWINIT)
RECCOM in file(s):
GIOCOM.OBJ(GIOCOM)
GTASPC in file(s):
ADVGRP.OBJ(ADVGRP)
SEGOFF in file(s):
GWINIT.OBJ(GWINIT)
MOTOR in file(s):
IBMRES.OBJ(IBMRES)
NEXTS in file(s):
GWMAIN.OBJ(GWMAIN)
RIGHTC in file(s):
GENGRP.OBJ(GENGRP)
TUPC in file(s):
ADVGRP.OBJ(ADVGRP)
NEXT in file(s):
IBMRES.OBJ(IBMRES) GWDATA.OBJ(GWDATA)
MAPCLC in file(s):
GWINIT.OBJ(GWINIT)
INFMAP in file(s):
GIOKYB.OBJ(GIOKYB)
READC in file(s):
GENGRP.OBJ(GENGRP)
INITSA in file(s):
GWINIT.OBJ(GWINIT)
STACOM in file(s):
GIOCOM.OBJ(GIOCOM)
SNDCOM in file(s):
GIOCOM.OBJ(GIOCOM)
GETFBC in file(s):
GWSTS.OBJ(GWSTS) GENGRP.OBJ(GENGRP)
SCALXY in file(s):
ADVGRP.OBJ(ADVGRP) GENGRP.OBJ(GENGRP)
SCANL in file(s):
ADVGRP.OBJ(ADVGRP)
UPC in file(s):
ADVGRP.OBJ(ADVGRP) GENGRP.OBJ(GENGRP)
FETCHC in file(s):
ADVGRP.OBJ(ADVGRP) GENGRP.OBJ(GENGRP)
GETHED in file(s):
GWINIT.OBJ(GWINIT)
INICOM in file(s):
GIOCOM.OBJ(GIOCOM)
MAPINI in file(s):
GWINIT.OBJ(GWINIT)
SCANR in file(s):
ADVGRP.OBJ(ADVGRP)
TDOWNC in file(s):
ADVGRP.OBJ(ADVGRP)
SETFBC in file(s):
GWSTS.OBJ(GWSTS)
INKMAP in file(s):
GIOKYB.OBJ(GIOKYB)
PGINIT in file(s):
ADVGRP.OBJ(ADVGRP)
MAPXYC in file(s):
ADVGRP.OBJ(ADVGRP) GENGRP.OBJ(GENGRP)
LEFTC in file(s):
ADVGRP.OBJ(ADVGRP) GENGRP.OBJ(GENGRP)
SNDLPT in file(s):
GIOLPT.OBJ(GIOLPT)
PEKFLT in file(s):
GWMAIN.OBJ(GWMAIN)
DONOTE in file(s):
GWSTS.OBJ(GWSTS)
EDTMAP in file(s):
SCNDRV.OBJ(SCNDRV)
NSETCX in file(s):
GENGRP.OBJ(GENGRP)
RDTRIG in file(s):
GWSTS.OBJ(GWSTS)
NREAD in file(s):
ADVGRP.OBJ(ADVGRP)
SWIDTH in file(s):
GIOSCN.OBJ(GIOSCN) GWSTS.OBJ(GWSTS)
STOREC in file(s):
ADVGRP.OBJ(ADVGRP) GENGRP.OBJ(GENGRP)
CLRSCN in file(s):
SCNDRV.OBJ(SCNDRV) GWSTS.OBJ(GWSTS)
SCROLL in file(s):
SCNDRV.OBJ(SCNDRV)
CLREOL in file(s):
SCNDRV.OBJ(SCNDRV) GWSTS.OBJ(GWSTS)

[Vic3Dexe]

readme.md

Contains no build scripts, makefiles, or tools required to generate executable binaries, nor does it contain any pre-built binaries / executables

что как бы намекает. Судя по именам, это обмен с экраном. Подозреваю, что оно все в какой-нибудь .lib (бинарной т.е.), а исходники ее или попадают под приступ копирастии, или банально протеряны.
Но поковыряться будет интересно.