Д.С. СУХОВ (г. Сочи)

В одном из последних выпусков прочёл статью с приведённой ниже программой о *HALP* драйвере. Но позволю себе заметить, что она немного великовата.

И я создал программу аналогичного характера, использующую под *HALP* пространство служебную строку. Замечу, что по желанию пользователя *HALP* информация может, естественно, выводиться в любой другой части экранной области и в «окне» любых размеров.

Привожу текст программы:

10 А$(1...10)=STRING$(30%,32%) + «текст пользователя»
100 FOR I%=1% ТО (1...10)
110 FOR Х%=1% ТО LEN (А$(I%))
120 РОКЕ 130%, &036100
130 ?AT(0%,0%) MID$ (А$(I%),X,32)
140 РОКЕ 130%,&040000
150 FOR Т% =0% ТО (I%...+∞)
160 NEXT Т%,Х%,I%

Примечание: К 10-й строке - количество *HALP* информации может варьироваться и в более широких пределах, в случае нехватки памяти использовать оператор CLEAR. Подчёркнутое число изменяет величину «окна».

Performed by © gid, 2012-2024.