home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / forth / compiler / fpc / tutor / l7p020 < prev    next >
Encoding:
Text File  |  1990-07-15  |  2.6 KB  |  79 lines
  1.  
  2.        ╔════════════════════════════════════════════════════╗
  3.        ║  Lesson 7 Part 020 F-PC 3.5 Tutorial by Jack Brown ║
  4.        ╚════════════════════════════════════════════════════╝
  5.  
  6. Lesson 6 Review ( continued )
  7.  
  8.              ┌─────────────────────────────────┐
  9.              │  Number Formatting Operators.   │
  10.              └─────────────────────────────────┘
  11.  
  12. PAD  ( -- addr )  Leave address of output buffer.
  13.  
  14. The variable HLD points to the current position in the output buffer.
  15. HLD is initialized to PAD by  <# below and is decremented by 1 just
  16. before another ASCII digit is added to the output.
  17.  
  18. VARIABLE  HLD    Pointer to current output address in below PAD .
  19.  
  20. HOLD   ( n -- )  Add ASCII character n to string being formed
  21.                  and decrement HLD
  22.  
  23.  
  24. <#     ( -- )    Start numeric conversion, initialize HLD for
  25.                  new output.
  26.  
  27.  
  28. #>   ( dn -- addr len )  Terminate numeric conversion.
  29.  
  30.  
  31. SIGN ( n -- )  If n is negative insert a -ve sign in the output string.
  32.  
  33.  
  34. #  ( dn -- dn' ) Convert a single digit using the current number BASE.
  35.  
  36. #S  ( dn -- dn') Convert all remaining digits.
  37.  
  38.                  ┌────────────────────────┐
  39.                  │   Compiler Extension   │
  40.                  └────────────────────────┘
  41.  
  42. IMMEDIATE   is used right after the definition of a word to declare it
  43.             to be IMMEDIATE. An IMMEDIATE word will execute at compile
  44.             time instead of being compiled.
  45.  
  46. LITERAL     compiles the stack number in to the dictionary.
  47.             LITERAL  is an IMMEDIATE word itself.
  48.  
  49. ' ( tick )  Get the cfa of the next word in the input stream.
  50.             '  is not IMMEDIATE in F-PC ( it was in Fig Forth).
  51.  
  52. STATE       a system variable that is true if the system is
  53.             in compile mode and false if the system is in
  54.             interpretive mode.
  55.  
  56. [COMPILE]   force the compilation of an IMMEDIATE word when it
  57.             would other wise execute.
  58.  
  59. COMPILE     When the word containing  COMPILE <xxx>  executes
  60.             the word <xxx> will be compile into the dictionary.
  61.  
  62.                 ┌────────────────────────┐
  63.                 │   The Case Statement   │
  64.                 └────────────────────────┘
  65.  
  66. CASE ... OF ... ENDOF ...  ENDCASE
  67.  
  68. CASE    causes an index value to be compared to a series of values.
  69.  
  70. OF      is equivalent to  OVER = IF DROP
  71. ENDOF   is equivalent to  ELSE
  72.         Any number of OF .. ENDOF  pairs may be used.
  73.  
  74. ENDCASE is equivalent of the appropriate number of THENs
  75.  
  76. ┌────────────────────────────────────┐
  77. │   Please Move to Lesson 7 Part 030 │
  78. └────────────────────────────────────┘
  79.