Schemeでユーザー入力を受け入れて処理する

Question

Schemeで小さなアプリケーションを作成するために、DrRacketバージョン6.4、英語を使用しています。

私のアプリケーションでは、簡単なロールバックのダイアログに挑戦したいと思います。

これはこれまで私が行ってきたことです。 [FYI-Iが設定され、ロール数= 0私のプログラムは、コードの後半で終了します。]今

(begin 
    (display "Would you like to roll again?(Y/N)\n") 
    (if(not (equal? (read) "Y")) 
     (begin 
      (set! roll-number 0) 
     ) 
     (display "") 
     ) 
) 

を。ロール・ナンバー変数は0に設定されていますが、「あなたはロールバックしますか？（Y/N）」という質問には答えません。

正確にはリードバックが返されますが、戻り値を何かと比較すると、私のプログラムは正しい決定を下すことができますか？

ありがとうございます。

Answer 1

はこれを試してみてください：

(equal? (read) 'Y) 

読むにはシンボル、ない文字列を返しています。