[an error occurred while processing this directive]
( ПРОДОЛЖЕНИЕ ) Ncase ? Оператор выбора альтернативы Пример: 1 2 2 ncase my1 two one default ^ ^ ^ ^ ^ ^ ^ первый код------+ ! ! ! ! ! + по-умолч. второй код--------+ ! ! ! +-для кода 1 число кодов----------+ ! +-для кода 2 +-имя переключателя При выполнении слова My1: Если в стеке число= 1, то будет исполнено слово ONE Если в стеке число= 2, то будет исполнено слово TWO Иначе будет исполнено слово DEFAULT 5.2.3 Библиoтека MEM Alloc A Зарезервировать память для текущего ID Формат обращения: QBlocks , где QBlocks число запрашиваемых у системы блоков по 8 кб. Выход: QAllocBlocks- число реально выделенных блоков Bank5 C Адрес начала 5 банка( A000 ) Block5On V Адрес ячейки на подключения памяти к 5 банку Free A Выйти из ЗАДАНИЯ и освободить всю память FreeBlock A Освободить текущий блок памяти( он же и оста- нется подключенным ) GetId A Взять на стек номер текущего ЗАДАНИЯ GetMemBl A Взять на стек номер текущего блока памяти MemLeft A Выдать на стек кол- во оставшейся памяти системы в блоках NoFree A Выйти из ЗАДАНИЯ и НЕ освобождать память RestoreMem A Восстановить память после графики SetMem A Установит на 5 банк нужную страницу памяти SetVMem A Установка по номеру страницы графической станицы ( если страница была зарезервирована ) Пример: 1 setid 1 alloc ( Резервируем под гра- ( фику 1 страницу nofree ( Выйдем из ID 0 MonoGrHi Screen ( Не делать ЭТОГО, пока не загружена ( библиотека GRAPHICS.FRL ( Графика теперь доступна ПРИМЕЧАНИЕ: Графика включается ТОЛЬКО на время действия графических команд!!! 5.2.4 Не вошедшие никуда слова Load" F Применение: LOAD" EDITOR.FRT"( загрузка в память редактора или можно еще что- нибудь ) ReadFile F Прочитать файл в память Формат обращения: FName MemAdr, где FName адрес строки- имени файла, а MemAdr куда загрузить файл WriteFile F Записать файл Формат обращения: MemAdr FType FName Flen, где FType тип файла, FLen длина файла в блоках по 256 байт[an error occurred while processing this directive]