Mercurial > hgrepos > hgweb.cgi > skipweb

annotate mackey/academy/ans.rb @ 1412:806ec1da59b6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
koushinn
author SUZUKI Naoyuki <c111086@g.koeki-u.ac.jp>
date Tue, 22 Dec 2015 18:28:18 +0900
parents 12f86e86a07f
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
664
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
1 #!/usr/bin/ruby
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
2 # coding: utf-8
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
3
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
4 require 'cgi'
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
5 c = CGI.new(:accept_charset => "utf-8")
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
6 print "Content-type: text/html; charset=utf-8\n\n"
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
7
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
8 check = c["answer"]
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
9 quiznum = c["dat"]
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
10
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
11 srand
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
12 number=rand(1060)
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
13 num = 0
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
14 damage = ""
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
15 quiz = ""
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
16 ansone = ""
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
17 anstwo = ""
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
18 ansthi = ""
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
19 ansfou = ""
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
20 anstrue = ""
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
21 open("data.txt", "r:utf-8") do |list|
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
22 while line = list.gets
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
23 if /(\d+),(\S+),(\S+),(\S+),(\S+),(\S+),(\d)/ =~ line
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
24 if quiznum.to_i == $1.to_i
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
25 if check.to_i == $7.to_i
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
26 damage = "攻撃成功！"
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
27 else
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
28 damage = "攻撃失敗!"
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
29 end
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
30 end
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
31 if number.to_i == $1.to_i
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
32 num = $1.to_i
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
33 quiz = $2.to_s
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
34 ansone = $3.to_s
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
35 anstwo = $4.to_s
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
36 ansthi = $5.to_s
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
37 ansfou = $6.to_s
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
38 anstrue = $7.to_i
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
39 end
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
40 end
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
41 end
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
42 end
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
43
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
44
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
45
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
46 printf("<html>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
47 <head>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
48 <title>きみのこうげきだよ!</title>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
49 <link rel=\"stylesheet\" href=\"style.css\" type=\"text/css\">
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
50 </head>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
51 <body>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
52 <h1>きみのこうげきだよ</h1>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
53 <h2>#{damage}</h2>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
54 <p>No.#{number}</p>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
55 <div class=\"main\">
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
56 <div>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
57 <img border=\"1\" src=\"maou.png\" width=\"480\" height=\"320\"
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
58 alt=\"まおうのがぞうっぽいよ\" title=\"まおう\">
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
59
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
60 <h2>問題</h2>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
61 <p>%s</p>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
62
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
63 <form method=\"POST\" action=\"ans.rb\">
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
64 <button class=\"css3button\" type=\"submit\" name=\"answer\" value=\"1\">%s</bu\
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
65 tton>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
66 <button class=\"css3button\" type=\"submit\" name=\"answer\" value=\"2\">%s</bu\
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
67 tton>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
68 <button class=\"css3button\" type=\"submit\" name=\"answer\" value=\"3\">%s<br></bu\
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
69 tton>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
70 <button class=\"css3button\" type=\"submit\" name=\"answer\" value=\"4\">%s<br></bu\
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
71 tton>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
72 <input type=\"hidden\" name=\"dat\" value=\"%d\">
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
73 </form>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
74 </div>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
75 </div>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
76 </body>
12f86e86a07f Mackey academy added
MASAHIRO Suzuki <c112085@roy.e.koeki-u.ac.jp>
parents:
diff changeset
77 </html>", quiz, ansone, anstwo, ansthi, ansfou, num)

yatex.org