По просьбам телезрителей выкладываю полный комплект исходников XAS->TXT - еще один развитый пример использования моей оконной библиотеки. Здесь используются все функции, самая интересная из которых - Listbox. С ее помощью реализован выбор файла в каталоге дискеты. При этом работают клавиши Up, Down, PgUp (CS+SS+Q) и PgDn (CS+SS+A). Также используются функции ввода и редактирования текста, менюшки.
В комплект входит:
1) Оконный интерфейс, компоненты и драйверы, которые были описаны выше;
2) Модуль TRFIL.MAC - функции файловой системы TR-DOS. Обращается к драйверу дисковода RADISK (или урезанному RADXAS). Набор функций очень ограничен, реализация так себе, но сойдет для небольших проектов, вроде этого.
3) образ диска TR-DOS с компилированной и рабочей этой программой. На этот раз применен драйвер стандартной клавиатуры, а не "Орель-БК". Основные функции программы я проверить не смог, т.к. под моим эмулятором (FUSE) доступ к диску почему-то не работает. На реале работало всегда, на Unreal - тоже.
Компиляция исходников - под CP/M. Для компоновки набрать "L STARTUP,XASCONV,SPKEYB40[L8300[NR"
Ответить с цитированием