Язык программирования Форт
также CURRENT; DEFINITIONS; VOCABULARY. CONTROL
См. также CURRENT; DEFINITIONS; VOCABULARY. CONTROL "control" "управление" ТХТ ( n ... -) Слово-описатель, которое создает слово, предназначенное для посылки одного или более управляющих кодов на активное выходное устройство. При использовании в форме n... CONTROL (1) формирует статью в словаре с именем и компилирует один или более управляющих кодов ASCII из стека. Когда исполняется, управляющие коды, скомпилированные в его поле параметров, посылаются на активное в данный момент выходное устройство. : CONTROL CREATE DEPTH DUP С, 0 DO DEPTH ROLL С, LOOP (1) DOES> DUP DUP C@ + SWAP DO I 1 + C@ EMIT LOOP ; Дальнейшие пояснения можно найти в соотв. главе. CONVERT "convert" "преобразовать" 83REQ 79REQ ( d1 адр1 -- d2 адр2) Преобразует в соответствии с величиной BASE несчетную ASCII-строку цифр в число, d2 является результатом преобразования каждого из символов (цифр) в строке, начиная с адреса "адр+1", в число и аккумуляции каждого числа, умноженного на величину BASE, в d1 (d1 в норме равно 0). Преобразование продолжается до тех пор, пока не встретится не преобразуемы и символ. Адрес этого символа засылается в качестве "адр2". Таким образом, если стек содержит число двойной длины 55, а строка имеет вид "11х", тогда CONVERT занесет в стек число двойной длины 5511; а адрес "х" будет занесен в качестве "адр2". COPIES "copies" "скопировать" ТХТ ( n1 n2 n3 --) ================================== 1 Описание предполагает, что перед обращением (1) стек пуст,- Прим. перев. ============================== Копирует серию из "n3" смежных блоков, начиная с блока "n1", и укладывает их, начиная с блока "n2". Копирование начинается с блока с наименьшим номером и продолжается в направлении последнего блока. Смотри описание. COPIES> "copies-up" TXT ( n1 n2 n3 --) Копирует серию из n3 смежных блоков, начиная с n1, и записывает их, начиная с n2.
Forekc.ru
Рефераты, дипломы, курсовые, выпускные и квалификационные работы, диссертации, учебники, учебные пособия, лекции, методические пособия и рекомендации, программы и курсы обучения, публикации из профильных изданий