【问题标题】:call "EOF" in Ti-83 BASIC在 Ti-83 BASIC 中调用“EOF”
【发布时间】:2016-01-25 03:22:34
【问题描述】:

Ti-83 Basic 中是否有与许多其他语言(例如 C)一样的 EOF 运算符? 我知道某些程序会在按下“On”按钮时终止(很像 *nix 中的 EOF 运算符 Ctrl+D),但我无法弄清楚这个操作是如何分配的。

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

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

我希望它打印“此代码有效!”然后提示输入 Str0,直到我输入终止文件的组合键(我猜是“打开”按钮)。

当然,还有其他表达上述代码的方式依赖于 EOF。我只是想给出一个简单的例子,说明 EOF 可能 有用的场景。

【问题讨论】:

  • 我不明白为什么这是必要的。由于 On 按钮会立即终止程序(并且还会产生 ERR: BREAK 错误,所以它不是很理想),我不明白您为什么需要任何 EOF 业务来处理它。
  • @user3932000 我认为你是对的。 2nd + Quit 似乎也终止了,没有任何混乱的 ERR: BREAK 消息。 ;)

标签: eof ti-basic


【解决方案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,然后显示“程序结束”然后退出。如果您对getKey 功能不熟悉,我推荐this link。祝你的编码好运!

【讨论】:

  • 对不起,这太晚了(我有一段时间没来了),但这看起来很有帮助。谢谢!如果一切顺利,我会在测试后接受它。 ;)
  • @Fred 希望一切都能让您满意。如果您有任何其他问题,您知道在哪里提问!
猜你喜欢
  • 1970-01-01
  • 1970-01-01
  • 2023-03-17
  • 2016-02-08
  • 1970-01-01
  • 1970-01-01
  • 2012-06-19
  • 1970-01-01
  • 1970-01-01
相关资源
最近更新 更多