在 Ti-83 BASIC 中调用 "EOF"

Question

Ti-83 Basic 是否像许多其他语言（例如 C）一样有 EOF 运算符？我知道某些程序会在按下 "On" 按钮时终止（很像 *nix 中的 EOF 运算符 Ctrl+D），但我一直无法弄清楚该操作是如何分配的。

作为一个非常糟糕的例子，假设我有

:Prompt Str0
:While Str0 ≠ "EOF"
:Disp "This code works!"
:Prompt Str0
:End

我希望它打印 "This code works!"，然后提示输入 Str0，直到我输入终止文件的组合键（我猜是 "On" 按钮）。

现在当然还有其他表达上述代码的方式不依赖于 EOF。我只是想举一个简单的例子，说明 EOF 可能在什么情况下有用。

Answer 1

如果您正在寻找一种方法来获取键盘输入以结束您的程序，没有单一的功能，但您可以使用 getKey 编写代码来完成它。下面是一个示例，说明如何让程序运行直到输入特定的组合键或程序被破坏。

:Disp "This code works!"
:While getKey ≠ 21
:End
:While getKey ≠ 31
:End
:While getKey ≠ 45
:End
:Disp "Program ending"
:Stop

上面的代码显示"This code works!"，然后等到2nd，ALPHA，然后CLEAR，显示"Program ending"，然后退出。如果你不熟悉getKey函数，我推荐this link。祝你编码顺利！

call "EOF" in Ti-83 BASIC