TCL複数の入力を求めるユーザ

Question

機械に入力に応じて部品が作られるように、複数の質問をします。入力は、後でプログラムで呼び出される変数として保存されます。私は以下のコードを書いて、それがなぜ動かないのかを理解する助けを要求する。私はputsコマンドと各質問の後に応答を待たないプログラムでエラーが出ます。ご覧のとおり、私はこれを初めて熟知しており、あなたが提供できるあらゆる指針に感謝しています。前もって感謝します。

#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 
    } 

Answer 1

MSワードを使用して引用符が書かれているため、誤ったタイプのものであると判断されました。これは、それらを削除し、メモ帳++で引用符を追加することで修正されました。 if文も（if {$shape == "r"}）と（elseif {$shape == "f"}）を使用して修正されました。ご協力ありがとうございました。