3.9.grs

来自「UG二次开发很好的东西 需要的朋友可以下载来看看 很好用啊」· GRS 代码 · 共 13 行

$$输入一个数字
l10:
param/'输入一个数字','数字=',num,resp
jump/l10:,trm:,,resp

$$将输入的数字以信息框形式输出。
l20:
messg/'你输入的数字为'+istr(num)

$$程序结束。
trm:
halt