TCL问多用户输入

我想问用户多个问题，以便机器可以根据输入制作零件。输入将被保存为变量，稍后在程序中调用。我写了下面的代码，并请求帮助理解它为什么不运行。使用puts命令时出现错误，并且程序没有在每个问题后等待响应。正如你所看到的，我对此很陌生，对于你可以提供的任何指针都会感激不尽。先谢谢你。TCL问多用户输入

#Asks user for diameter of probe 
    flush stdout; 
    puts “Enter Diameter ” 
    gets stdin diameter 
    #Asks user for Taper Length of probe 
    flush stdout; 
    puts “Enter Taper Length ” 
    gets stdin taper 
    #Asks user for tip shape of probe 
    flush stdout; 
    puts “Enter Tip Shape s=sharp, r=radius and f=flat” 
    gets stdin shape 
    # Prompt for tip size 
    flush stdout; 
    if {r} { 
    puts “Enter Radius Size ” 
    gets stdin radius 
    } elseif {d}{ 
    puts “Enter Diameter Size” 
    gets stdin diameter 
    }

来源

2017-10-04 Spectre50

那些来自程序或复制粘贴过程的程式化引号？这些引号在程序中无效。 –

你究竟遇到什么错误？如果我们要帮助你，这些信息很重要。 –

错误＃ARGS：执行应该是 “？？？？放-nonewline渠道ID字符串” “把‘输入直径’” 从中调用 “插补EVAL $ :: tkcon :: OPT（可执行程序）的$ args” （过程 “:: tkcon :: EvalSlave” 第2行）内从调用 “EvalAttached [列表源$ FN]” （过程 “:: tkcon ::加载” 第18行）内 – Spectre50

经确定，因为报价均使用MS Word中写他们的类型不正确而导致的错误。这是通过删除它们并在Notepad ++中添加引号来纠正的。 if语句也使用（if {$shape == "r"}）和（elseif {$shape == "f"}）进行了更正。感谢您的帮助。

来源

2017-10-05 23:16:27 Spectre50

TCL问多用户输入

回答

相关问题