А.В. Ильин (г. Воркута)

Предлагаю в программах для БК-0010.01 перед каждым запуском на выполнение проверять содержимое ячейки &O40, в которой записана информация о текущем состоянии режима 32/64. При этом появляется возможность автоматического переключения режимов независимо от текущего режима. Это повысит уровень сервиса программ.

Например, для программ на языке BASIC, работающих в режиме 32 символа в строке, эту операцию можно реализовать так:

1 IF PEEK(&O40)=0 THEN ? CHR$(&O233)
10 < ТЕКСТ ПРОГРАММЫ >

То же для программы на языке ФОКАЛ:

1.1 I (FX(1,40)),1.2,10.10
1.2 X FCHR(155)
10.10 < ТЕКСТ ПРОГРАММЫ >

Performed by © gid, 2012-2024.