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

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

ただいまの
回答率

88.22%

外部ファイルの読み込み

解決済

回答 2

投稿 編集

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

yusuke.

score 64

なぜこのようなエラーが起こるのかわかりません。
このエラー部分でしたいことは
まず、外部ファイルから問題の内容を読み込みます。
問題は

問1 ~はなんでしょう #問題
1 。。。 #選択肢
2・・・
3・・・
4・・・
5・・・
3  #選択肢の答え
10  #スコア
このような8行で一つの問題が成り立っています。
そしてこれをmondaiでグローバル変数に当てはめていって別のファイルで表示できるようにしているつもりです。
kuizu.rb

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


def gamen
kuizugamen = Gmen.new
kuizugamen.drawBack
kuizugamen.refresh
kuizugamen.start
kuizugamen.mondaihyouji
end

def yomikomi()
  i = 0
  j = 0
  mondai = "mondai1.dat"
  $moji =[]
  f = open("./dat/mondai1.dat","r")
  while text = f.gets do
    $moji[i] = text.chomp
    i += 1
  end
 f.close
 $mondaisu = i/8
  while j <= i/8
    eval("$q#{j} = [ moji[j*8+0],moji[j*8+1],moji[j*8+2], moji[j*8+3],moji[j*8+4],moji[j*8+5],moji[j*8+6],moji[j*8+7 ]")
    j += 1
  end
end

def mondai
eval("q = $q#{rand($mondaisu)}.clone")
$mondai     = q[0]
$sentakusi1 = q[1]
$sentakusi2 = q[2]
$sentakusi3 = q[3]
$sentakusi4 = q[4]
$sentakusi5 = q[5]
$kotae      = q[6]
$score      = q[7]
end


main.rb

#!ruby -Ks
require "./window.rb"
require "./kuizu.rb"

window = Window.new
window.drawBack
window.gamestart
window.refresh
yomikomi
mondai

while true do 
  while event = SDL::Event2.poll do
     case event
       when SDL::Event2::Quit
            exit
       when SDL::Event2::MouseButtonDown
           x = event.x
           y = event.y
           if window.kuizuclicked?(x,y)
              gamen
              window.refresh
           end
           if window.zairyoclicked?(x,y)
             require "./zairyo.rb"
           end
       end
  end

end


エラー文

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

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

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

    クリップを取り消します

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

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

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

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

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

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

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

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

    質問の評価を下げる

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

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

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

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

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

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

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

    詳細な説明はこちら

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

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

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

質問への追記・修正、ベストアンサー選択の依頼

  • ozwk

    2016/07/04 18:03

    エラーメッセージ読みました?

    キャンセル

回答 2

check解決した方法

0

eval("$q#{j} = [ moji[j*8+0],moji[j*8+1],moji[j*8+2], moji[j*8+3],moji[j*8+4],moji[j*8+5],moji[j*8+6],moji[j*8+7 ]")
これを、  eval("$q#{j} = [ moji[j*8+0],moji[j*8+1],moji[j*8+2], moji[j*8+3],moji[j*8+4],moji[j*8+5],moji[j*8+6],moji[j*8+7 ]]")最後にかっこを付けることで解決しました

投稿

  • 回答の評価を上げる

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

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

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

  • 回答の評価を下げる

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

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

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

0

解決したようですが、コメントが1つあります。

eval("$q#{j} = ...)
は、適切なコードとは思えません。

参考情報

...
スクリプト実行関数を避ける
...
eval()関数によって悪意のスクリプトが実行されることになる。
したがって、eval()関数は安易に多用しないほうがよい。使用せざるを得ない場合は、eval()に与える引数に対し厳しい検査を行う。
...

$q1, $q2 , ... の変数をつかう代わりに、
q = {} とハッシュとして、
i = 0
q[1] = [ moji[j*8+0], ... ]
のように値を保持するとよいと思います。

投稿

  • 回答の評価を上げる

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

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

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

  • 回答の評価を下げる

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

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

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

  • 2016/07/05 17:38

    ご指摘ありがとうございます。 
    では、whileの中に
     q = [ $moji[j*8+0],$moji[j*8+1],$moji[j*8+2], $moji[j*8+3],$moji[j*8+4],$moji[j*8+5],$moji[j*8+6],$moji[j*8+7 ] ]
    j += 1
    $q1 = q[0]
    $q2 = q[1]
    $q3 = q[2]
    $q4 = q[3]
    $q5 = q[4]
    $q6 = q[5]
    $q7 = q[6]
    $q8 = q[7]
    end
    を入れればいいということですか。
    よくわかっていなくてすいません。


    キャンセル

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

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

関連した質問

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