Начальный курс программирования на языке Форт


ВЫВОД ТЕКСТА С ДИСКА - часть 2


Однако вы можете быть уверены в том, что данный буфер содержит один и тот же блок во время перекачки этого буфера в рабочую область1. Так как каждой задаче отведена своя рабочая область, >TYPE может выводить из нее информацию без риска получить не те данные.

В приведенном ниже примере используется слово TYPE, но вы при необходимости можете подставить вместо него >TYPE. В конце раздела мы покажем вам полезный прием с применением генератора случайных чисел.Block # 231 0 ( Генератор бессмысленных сообщений ) 1 : АБРЕД ( -- а) 232 BLOCK ; 2 : БРЕД ( строка# столбец# -- а) 3 20 * SWAP 64 * + АБРЕД + ; 4 : .БРЕД ( столбец# колонка# -- ) БРЕД 2И -TRAILING TYPE ; 5 : 1ПРИЛАГАТЕЛЬНОЕ 10 CHOOSE 0 .БРЕД ; 6 : 2ПРИЛАГАТЕЛЬНОЕ 10 CHOOSE 1 .БРЕД ; 7 : СУЩЕСТВИТЕЛЬНОЕ 10 CHOOSE 2 .БРЕД ; 8 : ФРАЗА 1ПРИЛАГАТЕЛЬНОЕ SPACE 2ПРИЛАГАТЕЛЬНОЕ SPACE СУЩЕСТВИТЕЛЬНОЕ ; 9 : СООБЩЕНИЕ 10 CR ." Применяя " ФРАЗА ." имея в виду " 11 CR ФРАЗА ." представляется возможным даже несмотря на " 12 CR ФРАЗА . " функционировать как " 13 CR ФРАЗА ." при существующих ограничениях на " 14 CR ФРАЗА ." . " ; 15 СООБЩЕНИЕ

Block # 232 0 высокий культурный уровень 1 общий производственный интерес 2 автоматизированный наукоемкий комплекс 3 запланированный валовой объем 4 интегрированный цифровой коэффициент 5 квалифицированный многоотраслевой принцип 6 представительный химический генератор 7 автономный аппаратный интерфейс 8 цифровой независимый автомат 9 синхронизированный функциональный критерий 10 систематизированный коротковолновой проект 11 12 13 14 15

1 Для специалистов. В мультипрограммной системе задача передает управление центрального процессора следующей задаче только на время ввода-вывода или по специальной команде, которая преднамеренно не включена в определение слова, пересылающего строки.

После загрузки блока (в нашем примере блока 231) вы получите следующий текст, хотя некоторые слова при выполнении слова СООБЩЕНИЕ всякий раз будут меняться: применяя высокий функциональный критерий имея в виду цифровой производственный комплекс представляется возможным даже несмотря на представительный независимый коэффициент функционировать как автоматизированный наукоемкий уровень при существующих ограничениях на квалифицированный Функциональный автомат.




Начало  Назад  Вперед