tnt23
14.09.2025, 15:33
Как многим известно, человек-гора Алексей Морозов мимоходом наделал много полезного для "Океана-240", помимо заживления КНГМД.
В частности, отдизелил ПЗУ версии 8 - https://github.com/alemorf/retro_computers/blob/master/Ocean_240/firmware_source/
И там полно всяких интересных штук, которые в Книге (https://zx-pk.ru/threads/14176-kompyuter-quot-okean-240-quot.html?p=1187322&viewfull=1#post1187322) не упомянуты. Например, список графических процедур в файле printchar.inc выглядит так:
esc_functions:
.dw DrawFillRect ; 1
.dw DrawLine ; 2
.dw DrawPixel ; 3
.dw ColorSet ; 4
.dw CursorPositionSet ; 5
.dw ScreenModeSet ; 6
.dw CodepageSet ; 7
.dw PaletteSet ; 8
.dw CursorPositionSet2 ; 9
.dw PrinterScreen ; :
.dw DrawCircle ; ;
.dw Paint ; <
.dw GetPutImage ; =
.dw Picture ; >
.dw BeepSet ; ?
В частности, отдизелил ПЗУ версии 8 - https://github.com/alemorf/retro_computers/blob/master/Ocean_240/firmware_source/
И там полно всяких интересных штук, которые в Книге (https://zx-pk.ru/threads/14176-kompyuter-quot-okean-240-quot.html?p=1187322&viewfull=1#post1187322) не упомянуты. Например, список графических процедур в файле printchar.inc выглядит так:
esc_functions:
.dw DrawFillRect ; 1
.dw DrawLine ; 2
.dw DrawPixel ; 3
.dw ColorSet ; 4
.dw CursorPositionSet ; 5
.dw ScreenModeSet ; 6
.dw CodepageSet ; 7
.dw PaletteSet ; 8
.dw CursorPositionSet2 ; 9
.dw PrinterScreen ; :
.dw DrawCircle ; ;
.dw Paint ; <
.dw GetPutImage ; =
.dw Picture ; >
.dw BeepSet ; ?