variables - 接受用户输入的变量

Question

所以，对于以前使用过 FORTH 的人来说，这应该是一个简单的问题，但我是一个试图学习如何编写这种语言的新手(这与 C++ 有很大不同)。

无论如何，我只是想在 FORTH 中创建一个名为“Height”的变量，并且我希望用户能够在调用某个单词“setHeight”时输入“Height”的值。但是，我尝试的一切似乎都失败了，因为我不知道如何设置变量，也不知道如何获取用户输入并将其放入变量中。

    VARIABLE Height 5 ALLOT
    : setHeight 5 ACCEPT ATOI CR ;

我希望这是一个容易解决的问题，任何帮助将不胜感激。
提前谢谢你。

Answer 1

看看Rosettacode string or number input in FORTH 的输入/输出示例:

字符串输入

: INPUT$ ( n -- addr n )
   PAD SWAP ACCEPT
   PAD SWAP ;

数字输入

: INPUT# ( -- u true | false )
  0. 16 INPUT$ DUP >R
  >NUMBER NIP NIP 
  R> <> DUP 0= IF NIP THEN ;