BELL: различия между версиями
Перейти к навигации
Перейти к поиску
AtH (обсуждение | вклад) Нет описания правки |
AtH (обсуждение | вклад) Нет описания правки |
||
| Строка 6: | Строка 6: | ||
В [[Режим ЛАТ|режиме ЛАТ]] последовательно нажмите четыре клавиши [[Клавиша В/О|{{Чёрная клавиша|В/О}}]] [[Клавиша ИП|{{Чёрная клавиша|ИП}}]] [[Клавиша -|{{Серая клавиша|−}}]] [[Клавиша -|{{Серая клавиша|−}}]] | В [[Режим ЛАТ|режиме ЛАТ]] последовательно нажмите четыре клавиши [[Клавиша В/О|{{Чёрная клавиша|В/О}}]] [[Клавиша ИП|{{Чёрная клавиша|ИП}}]] [[Клавиша -|{{Серая клавиша|−}}]] [[Клавиша -|{{Серая клавиша|−}}]] | ||
== BELL в предыдущем стандарте Forth-83 (англ.) == | == История == | ||
Английское слово [http://www.lingvo-online.ru/ru/Translate/en-ru/bell ''bell''] означает «звонок». Название слова взято из Форта ИТЭФ. Оно присутствовало в стандартах Форта до 1994 года. | |||
=== BELL в предыдущем стандарте Forth-83 (англ.) === | |||
BELL -- M | BELL -- M | ||
Activate a terminal bell or noise-maker as appropriate to | Activate a terminal bell or noise-maker as appropriate to | ||
the device in use. | the device in use. | ||
== BELL в стандарте Forth-79 (англ.) == | === BELL в стандарте Forth-79 (англ.) === | ||
BELL | BELL | ||
Activate a terminal bell or noise-maker as appropriate to the | Activate a terminal bell or noise-maker as appropriate to the | ||
device in use. | device in use. | ||
== Реализация == | == Реализация == | ||
Версия от 16:33, 5 июня 2016
BELL (звонок) — встроенное слово Каллисто.
BELL ( -- ) Звонок. Озвучить гудок терминала.
Издать короткий звуковой сигнал для привлечения внимания оператора. Этот же звук можно получить, выведя на индикатор символ с кодом 7.
Ввод слова BELL
В режиме ЛАТ последовательно нажмите четыре клавиши В/О ИП − −
История
Английское слово bell означает «звонок». Название слова взято из Форта ИТЭФ. Оно присутствовало в стандартах Форта до 1994 года.
BELL в предыдущем стандарте Forth-83 (англ.)
BELL -- M
Activate a terminal bell or noise-maker as appropriate to
the device in use.
BELL в стандарте Forth-79 (англ.)
BELL
Activate a terminal bell or noise-maker as appropriate to the
device in use.
Реализация
В FORTH ИТЭФ слово BELL было примитивом, вот его определение:
HEAD 202Q,'I',314Q,IL ; BELL
MOV AX, 7
JMP ENT$
...
$EM: INT 16
CMP WORD PTR [DI+42Q],0
JNE PRINT
OK: NEXT
HEAD 204Q,'EMI',324Q,EMIT,$EMIT ; EMIT
$EMIT LABEL FAR
POP AX
ENT$: PUSH AX
MOV AH, 15
INT 16
POP AX
MOV AH, 14
JMP $EM
PRINT: MOV DX, 0 ; Установка номера принтера
SUB AH, AH
INT 23
TES AH, 51Q
JE OK
ERR4: MOV AL, AH
ADD AL, 60Q
MOV AH, 14
INT 16
MOV DX, OFFSET ERMES4
MOV AH, 9H
INT 21H
JMP TYPE$
ERMES4: DB ' PRINTER ERROR $'
Ссылки
- Исходный текст слова BELL в Каллисто Классик 1.0
- См. слово BEEP, которое позволяет контролировать частоту и длительность звукового сигнала.
|
У этой статьи нет иллюстраций. Вы можете помочь проекту, добавив их. |
|
Это заготовка статьи. Вы можете помочь проекту, дополнив её. |