Mercurial > hgrepos > hgweb.cgi > skipweb

#!/usr/bin/env ruby
# -*- coding: utf-8 -*-
Encoding.default_internal = "UTF-8"
Encoding.default_external = "UTF-8"

require 'cgi'
require 'csv'

c = CGI.new(:accept_charset => "UTF-8")
print "Content-type: text/html; charset=UTF-8\n\n"

number = c["rd"]
img = c["img"]

x = Hash.new
CSV.foreach("tamago.csv") do |row|
  q_number = row.shift
  question = row.shift
   x[q_number] = [question, Hash[*row]]
  ##x[number] = {"Q" => question, "A" => Hash[*row]}
end
#p x
#encoding:"SJIS:UTF-8"

gazou1="tori1.png"#1ページ目の画像
link1 ="tori1.png"#1ページ目のリンク画像
alt1  ="hiyoko"#1ページ目のalt画像
gazou2="tori2.png"#2ページ目の画像
link2 ="tori2.png"#2ページ目のリンク画像
alt2  ="tori"#2ページ目のalt画像
gazou3="tori3.png"#3ページ目の画像
link3 ="tori3.png"#3ページ目のリンク画像
alt3  ="tori"#3ページ目のalt画像
ongaku1="hiyoko1.mp3"
ongaku2="hiyoko2.mp3"
ongaku3="hiyoko3.mp3"
ongaku4="hiyoko.ogg"


def outinput(value, name)
  printf("<label><input type=\"radio\" name=\"rd\" value=\"%s\">%s</label>", value, name)
end

def imgsrc(img)
  printf("<img src=\"%s\">", img)
end

if number == ""  #初回起動時のみ
  number = "1"    #numberに"1"を代入
end


print"<html><head><title>鳥</title>
<meta name=\"viewport\" content=\"width=device-width,initial-scale=1\">
<link rel="stylesheet" type="text/css" href="tamago.css"></head><body>\n"

print"<form method=\"POST\" action=\"./tamago.rb\">\n"

q = x[number]

#ifで場合分け初めてその問題に行く、正解、不正解１、不正解２，の４通り

if number == "1" || number == "5" || number == "9" #初めて挑戦
  printf("<p>%s</p>", q[0])
  if number == "1"

    printf("<p><a href=\"%s\"><img src=\"%s\" alt=\"%s\" height=\"300px\" width=\"300px\"></a></p>",link1,gazou1,alt1)

  elsif number == "5"
    printf("<p><a href=\"%s\"><img src=\"%s\" alt=\"%s\" height=\"300px\" width=\"300px\"></a></p>",link2,gazou2,alt2)
  elsif number == "9"
    printf("<p><a href=\"%s\"><img src=\"%s\" alt=\"%s\" height=\"300px\" width=\"300px\"></a></p>",link3,gazou3,alt3)
  end
  for v, sel in q[1]
    outinput(v, sel)
  end
  print"<input name=\"ok\" type=\"submit\" value=\"送信\">\n"
  print"<input name=\"ng\" type=\"reset\" value=\"リセット\">\n"

elsif number == "3" || number == "8" || number == "10"          #正解
  printf("%s", q[0])
  #printf("%s", q[1])
  if number == "3"
   print("<p>")
   printf("<audio controls autoplay loop false preload=\"auto\"><source src=\"%s\"></audio>",ongaku1)
   print("<\p>")

   printf("<label><input type=\"radio\" name=\"rd\" value=\"5\">次へ進もう<br></label>")
   #  printf("<input type=\"submit\" value=\"次へ\">")

 elsif number =="8"
   print("<p>")

   printf("<audio controls autoplay loop false preload=\"auto\"><source src=\"%s\"></audio>",ongaku2)
print("</p>")
   printf("<label><input type=\"radio\" name=\"rd\" value=\"9\">次へ進もう<br></label>")


 elsif number == "10"
   print("<p>")

   printf("<audio controls autoplay loop false preload=\"auto\"><source src=\"%s\"></audio>",ongaku3)
   print("<\p>")
    printf("<label><input type=\"radio\" name=\"rd\" value=\"13\">次へ進もう<br></label>")
  end
  printf("<input type=\"submit\" value=\"次へ\">")


elsif number == "2" || number == "6" || number == "11"          #不正解1
  print("<h1>残念！もう一度挑戦だーー</h1>")
  printf("<p>%s</p>", q[0])
  if number == "2"
    printf("<p><a href=\"%s\"><img src=\"%s\" alt=\"%s\" height=\"300px\" width=\"300px\"></a></p>",link1,gazou1,alt1)
  elsif number == "6"
    printf("<p><a href=\"%s\"><img src=\"%s\" alt=\"%s\" height=\"300px\" width=\"300px\"></a></p>",link2,gazou2,alt2)
  elsif number == "11"
    printf("<p><a href=\"%s\"><img src=\"%s\" alt=\"%s\" height=\"300px\" width=\"300px\"></a></p>",link3,gazou3,alt3)
  end
  for v, sel in q[1]
    outinput(v, sel)
  end
  print"<input name=\"ok\" type=\"submit\" value=\"送信\">\n"
  print"<input name=\"ng\" type=\"reset\" value=\"リセット\">\n"


elsif number == "4" || number == "7" || number == "12"        #不正解2
  print("<h1>惜しい！もう一度やってみよーー</h1>")
  printf("<p>%s</p>", q[0])
  if number == "4"
    printf("<p><a href=\"%s\"><img src=\"%s\" alt=\"%s\" height=\"300px\" width=\"300px\"></a></p>",link1,gazou1,alt1)
  elsif number == "7"
    printf("<p><a href=\"%s\"><img src=\"%s\" alt=\"%s\" height=\"300px\" width=\"300px\"></a></p>",link2,gazou2,alt2)
  elsif number == "12"
    printf("<p><a href=\"%s\"><img src=\"%s\" alt=\"%s\" height=\"300px\" width=\"300px\"></a></p>",link3,gazou3,alt3)
  end
  for v, sel in q[1]
    outinput(v, sel)
  end
  print"<input name=\"ok\" type=\"submit\" value=\"送信\">\n"
  print"<input name=\"ng\" type=\"reset\" value=\"リセット\">\n"

elsif number == "13"
  print("<p>音楽の融合</p>\n")
 printf("<audio controls autoplay loop false preload=\"auto\"><source src=\"%s\"></audio>\n",ongaku4)
#printf("<p><a href=\"http://roy.e.koeki-u.ac.jp/~c115036/ikusei2017/ikusei.html\">topページに戻る</a></p>\n")
end

print"</form>\n"
print "</body>\n"
print "</html>\n"
author	ITO Shiho <c115022@g.koeki-u.ac.jp>
date	Tue, 25 Jul 2017 20:26:42 +0900
parents	8aa744a89c99
children	00754c2ec75e