⟨♯

Материал из ПМК вики
Перейти к: навигация, поиск

<# — стандартное слово Каллисто.

<#             ( −− )                               Начать форматное преобразование целого числа.

Начинает процесс преобразования целого числа в последовательность литер.

Ввод слова <#[править]

В режиме NUM последовательно нажмите четыре клавиши  F  $\mathrm{\overset{\rightarrow}{ШГ}}$    F   3 

<# в стандарте ANS Forth[править]

 6.1.0490   <#                             "less-number-sign"               CORE
            ( -- )
            Инициализирует процесс выходного преобразования отображаемого 
            числа.

        См.: 6.1.0030 #, 6.1.0040 #>, 6.1.0050 #S.

История[править]

<# в предыдущем стандарте Forth-83 (англ.)[править]

     <#           --                            79        "less-sharp"
          Initialize pictured numeric output conversion.  The words:
                  #  #>  #S  <#  HOLD  SIGN
          can be used to specify the conversion of a double number
          into an ASCII text string stored in right-to-left order.

<# в стандарте Forth-79 (англ.)[править]

<#                                           169       "less-sharp"
    Initialize pictured numeric output.  The words:
         #  #>  #S  <#  HOLD  SIGN
    can   be used to specify the conversion of a  double-precision
    number into an ASCII character string stored in  right-to-left
    order.

<# в fig-FORTH Release 1 glossary, май 1979 (англ.)[править]

<#                                              L0
       Setup for pictured numeric output formatting using the words:
           <# # #S SIGN #>
       The conversion is done on a double number producing
       text at PAD.

Реализация[править]

3802 ;#num−start
3803 ; <#               ( −− )                               Начать форматное преобразование целого числа.
3804 LBDIGS:         .DB     2
3805                 .TEXT   "<#"
3806                 .DW     LDIGS                   ; Начать процесс преобразования целого числа в последовательность кодов литер.
3807 BDIGS:          .DW CALL, PAD,HLD,STORE, EXIT

Реализация из SP-Forth 4.20:

: <# ( -- ) \ 94
\ Начать форматное преобразование чисел.
  PAD CHAR- HLD !
  0 PAD CHAR- C!
;

Советская реализация[править]

Следующее определение слова <# приводится у Юрия Семёнова (стр. 99) и у Баранова-Ноздрунова (стр. 37):

 : <#   ( ---> )    PAD HLD ! ;

Описание и определение слова <# в ядре ФОРТ-ЕС:

  <#           ->                       НАЧАТЬ ФОРМАТНОЕ  ПРЕОБРАЗОВАНИЕ  37

                     Экран номер 37
( 31.03.86  PAD  HOLD  ALPHA  <# #> # #S SIGN )

: <# ( -> )  PAD HLD ! ;

Определение слова <# в FORTH ИТЭФ:

             HEAD    202Q,'<',243Q,BDIGS,$COL             ; <#
             DW  PAD,HLD,STORE,SEMI

Ссылки[править]


  Nopictures-icon.png У этой статьи нет иллюстраций. Вы можете помочь проекту, добавив их.


  Stub-icon-48px.png Это заготовка статьи. Вы можете помочь проекту, дополнив её.