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

프로그램이나 복사 - 붙여 넣기 과정에서 양식화 된 따옴표가 있습니까? 그 따옴표는 프로그램에서 유효하지 않습니다. –

정확히 어떤 오류가 나고 있습니까? 우리가 당신을 도우려면 메시지가 중요합니다. –

잘못된 #의 인수 : "???? 풋가 -nonewline 채널 ID 문자열"해야 을 을 실행하는 동안 "$ 인수를 평가 $ :: tkcon :: OPT (간부)을 보정시" 내에서 호출 "직경"입력 "두고" (절차 ":: tkcon :: EvalSlave"라인 2) 는 내에서 호출 "EvalAttached [리스트 소스 $의 FN]" – Spectre50

따옴표는 MS Word를 사용하여 작성 되었기 때문에 잘못된 유형으로 인해 오류가 발생합니다. 이것은 그들을 삭제하고 메모장 + +에서 따옴표를 추가하여 수정되었습니다. if 문은 (if {$shape == "r"}) 및 (elseif {$shape == "f"})을 사용하여 수정되었습니다. 도와 줘서 고마워.

출처

2017-10-05 23:16:27 Spectre50

TCL 여러 입력에 대해 사용자에게 묻기

답변

관련 문제