質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

ただいまの
回答率

88.23%

入力した数字と答えを合わせる

解決済

回答 1

投稿

  • 評価
  • クリップ 0
  • VIEW 973

yusuke.

score 64

クイズのようなプログラムを作りたいです。
問題などは、ほかのファイルから読み込んで表示させ、その問題に合う答えを入力できるようにしたいです。
次の文ではうまく判定してくれないのですが、エラーメッセージも出ずに、フリーズしてしまいます。

#!ruby -Ks
require "sdl"
require "./color.rb"



$tisiki = 0





class Gmen
 WINDOW_YOKO = 750
 WINDOW_TATE = 550
 BITPIKUSERU = 0


 def initialize
   SDL.init(SDL::INIT_EVERYTHING)
    @screen2 = SDL.set_video_mode(WINDOW_YOKO,WINDOW_TATE,BITPIKUSERU,SDL::SWSURFACE)
    SDL::TTF.init
    @font = SDL::Kanji.open("font/jiskan24.bdf",24) 
    @font.set_coding_system(SDL::Kanji::SJIS)
    @font2 = SDL::TTF.open("C:/WINDOWS/Fonts/TAHOMA.TTF",30)
 end

 def drawBack
  @screen2.fill_rect(0,0,WINDOW_YOKO,WINDOW_TATE,Color::WHITE)
 end

 def refresh
  @screen2.update_rect(0,0,0,0)  
 end

 def kotaeawase
  a = gets.chomp
  @font.put(@screen2,"入力した数字#{a}",50,280,0,0,0)
 if a == $kotae.to_i
   $tisiki = $tisiki.to_i + $score.to_i
   @font.put(@screen2,"正解です",50,250,0,0,0)
   @font.put(@screen2,"正解は#{$kotae}です。",50,220,0,0,0)
 else
  @font.put(@screen2,"間違いです。",50,250,0,0,0)
  @font.put(@screen2,"正解は#{$kotae}です。",50,220,0,0,0)
 end
 end



  while true do
    while event = SDL::Event2.poll 
       case event 
         when SDL::Event2::Quit
            exit
         when SDL::Event2::KeyDown
          if event.sym == SDL::Key::SPACE then
             yomikomi 
             drawBack
             mondaihyouji
             @font.put(@screen2,"数字を入力してください。",50,220,0,0,0)
             refresh
             kotaeawase
             refresh
          end
       end
    end 
  end
 end

 def mondaihyouji
  @font.put(@screen2,"#{$mondai}",   50,20,0,0,0)
  @font.put(@screen2,"#{$sentakusi1}", 50,50,0,0,0)
  @font.put(@screen2,"#{$sentakusi2}", 50,80,0,0,0)
  @font.put(@screen2,"#{$sentakusi3}", 50,110,0,0,0)
  @font.put(@screen2,"#{$sentakusi4}", 50,140,0,0,0)
  @font.put(@screen2,"#{$sentakusi5}", 50,170,0,0,0)
  @font2.draw_solid_utf8(@screen2," #{$tisiki}",100,500,0,0,0)
 end
end

caseのところでスペースキーが押されているかを調べて押されていると問題を表示していくようにしたいです。ほかのところで実行しています。いらない部分は消してあります。

  • 気になる質問をクリップする

    クリップした質問は、後からいつでもマイページで確認できます。

    またクリップした質問に回答があった際、通知やメールを受け取ることができます。

    クリップを取り消します

  • 良い質問の評価を上げる

    以下のような質問は評価を上げましょう

    • 質問内容が明確
    • 自分も答えを知りたい
    • 質問者以外のユーザにも役立つ

    評価が高い質問は、TOPページの「注目」タブのフィードに表示されやすくなります。

    質問の評価を上げたことを取り消します

  • 評価を下げられる数の上限に達しました

    評価を下げることができません

    • 1日5回まで評価を下げられます
    • 1日に1ユーザに対して2回まで評価を下げられます

    質問の評価を下げる

    teratailでは下記のような質問を「具体的に困っていることがない質問」、「サイトポリシーに違反する質問」と定義し、推奨していません。

    • プログラミングに関係のない質問
    • やってほしいことだけを記載した丸投げの質問
    • 問題・課題が含まれていない質問
    • 意図的に内容が抹消された質問
    • 過去に投稿した質問と同じ内容の質問
    • 広告と受け取られるような投稿

    評価が下がると、TOPページの「アクティブ」「注目」タブのフィードに表示されにくくなります。

    質問の評価を下げたことを取り消します

    この機能は開放されていません

    評価を下げる条件を満たしてません

    評価を下げる理由を選択してください

    詳細な説明はこちら

    上記に当てはまらず、質問内容が明確になっていない質問には「情報の追加・修正依頼」機能からコメントをしてください。

    質問の評価を下げる機能の利用条件

    この機能を利用するためには、以下の事項を行う必要があります。

回答 1

check解決した方法

0

a = STDIN.getchを使うことで読み込みました。
しかしこれだと、コマンドプロンプトに答えを入力しなければならないことになってしまいます。
なにかいいほうほうはないでしょうか

投稿

  • 回答の評価を上げる

    以下のような回答は評価を上げましょう

    • 正しい回答
    • わかりやすい回答
    • ためになる回答

    評価が高い回答ほどページの上位に表示されます。

  • 回答の評価を下げる

    下記のような回答は推奨されていません。

    • 間違っている回答
    • 質問の回答になっていない投稿
    • スパムや攻撃的な表現を用いた投稿

    評価を下げる際はその理由を明確に伝え、適切な回答に修正してもらいましょう。

15分調べてもわからないことは、teratailで質問しよう!

  • ただいまの回答率 88.23%
  • 質問をまとめることで、思考を整理して素早く解決
  • テンプレート機能で、簡単に質問をまとめられる

関連した質問

同じタグがついた質問を見る