#!/usr/bin/env ruby22 # -*- coding: utf-8 -*- require 'sqlite3' require 'kconv' require 'cgi' c = CGI.new(:tag_maker => "html5", :accept_charest => "UTF-8") db = SQLite3::Database.new("sql/main.sq3") id = c.cookies["id"][0].to_i chenge = c["chenge"].to_i box = db.execute("select * from box where id = ?",id) hoge,no1,e1,t1,tm1,no2,e2,t2,tm2,no3,e3,t3,tm3=box[0] newname = "select name from zukan where no = ?" if chenge == 2 db.execute("update box set no1=?,e1=?,t1=?,tm1=?,no2=?,e2=?,t2=?,tm2=? where id = ?",no2,e2,t2,tm2,no1,e1,t1,tm1,id) calname = db.execute(newname,no2)[0][0] db.execute("update test set cal = ? where id = ?",calname,id) elsif chenge == 3 db.execute("update box set no1=?,e1=?,t1=?,tm1=?,no3=?,e3=?,t3=?,tm3=? where id = ?",no3,e3,t3,tm3,no1,e1,t1,tm1,id) calname = db.execute(newname,no3)[0][0] db.execute("update test set cal = ? where id = ?",calname,id) end cmps = c["cmps"] x = 0 per ="%" newone = "" data = "select * from test where id = ?" cook = db.execute(data, id) begin cal = cook[0][2] rescue printf(<<_EOS_) <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd"> <html><head> <meta name="viewport" content="width=device-width,initial-scale=1,maximum-scale=1,user-scalable=no"> <meta name="format-detection" content="telephone=no"> <link media="only screen and (max-device-width:480px)" href="smart.css" type="text/css" rel="stylesheet" /> <link media="screen and (min-device-width:481px)" href="profeel.css" type="text/css" rel="stylesheet" /> <link rel="shortcut icon" href="./img/cabage.png"/> <title>Miyazac Quest</title> <style type="text/css"> <!-- --> </style> </head> <body> <header></header> <h1>記録が無くなったようだ...</h1><h2>記憶も消してやりなおしたまえ......</h2> <div class="f1"><a href="index.html"><div class="lets"><span>新規記憶の作成</span></div></a></div> <div class="f1"><a href="cookie.rb"><div class="lets"><span>作成前に記憶を消す</span></div></a></div> <address>skip@xxxx.co.jp</address> <footer></footer> </body> </html> _EOS_ exit(0) ##プログラム終了! これがないと以降のプログラムが動いてしまう。 end ################################## exppoint = "select e1 from box where id = ?" #じぶんのidのboxにある一体目の経験値 expup = "update box set e1 = ? where id = ?" exp2 = db.execute(exppoint,id) exp = exp2[0][0].to_i srand if cmps == "↑" exp += 2 x = rand(2)+1 elsif cmps == "→" exp += 1 x = rand(3)+1 #################### elsif cmps == "←" ##当たりルート no1 = db.execute("select no1 from box where id = ?",id)[0][0] no2 = db.execute("select no2 from box where id = ?",id)[0][0] no3 = db.execute("select no3 from box where id = ?",id)[0][0] number = rand(8)+1 while number == no1.to_i number = rand(8)+1 end ##############2 if no2 == 0 newcal = db.execute('select * from zukan where no = ?',"#{number}") no2 = newcal[0][0] calname = newcal[0][1] t2 = newcal[0][2].to_i/5 db.execute("update box set no2 = ?, t2 = ?, tm2 = ? where id = ?",no2,t2,t2,id) newone = "#{calname}が現われた!<br>#{calname}が仲間になった!" ##############3 elsif no3 == 0 while number == no1.to_i || number == no2.to_i number = rand(8)+1 end newcal = db.execute('select * from zukan where no = ?',"#{number}") no3 = newcal[0][0] calname = newcal[0][1] t3 = newcal[0][2].to_i/5 db.execute("update box set no3 = ?, t3 = ?, tm3 = ? where id = ?",no3,t3,t3,id) newone = "#{calname}が現われた!<br>#{calname}が仲間になった!" ############## else x = 49 end end db.execute(expup,exp,id) coin = db.execute("select pt from test where id = ?",id)[0][0] coin += x db.execute("update test set pt = ?",coin) ############################################ if x > 0 xs = x.to_s + "$get!" else xs = "" end x = rand(30) if x == 0 cmpsget ='<input type="submit" name="cmps" value="←"> <input type="submit" name="cmps" value="↑"> <input type="submit" name="cmps" value="→">' elsif x == 1 cmpsget ='<input type="submit" name="cmps" value="←"> <input type="submit" name="cmps" value="↑" disabled> <input type="submit" name="cmps" value="→">' else cmpsget ='<input type="submit" name="cmps" value="←" disabled> <input type="submit" name="cmps" value="↑"> <input type="submit" name="cmps" value="→">' end lv = 1 gage = 0 e1 = db.execute("select e1 from box where id = ?",id)[0][0]#じぶんのidのboxにある一体目の経験値 no1 = db.execute("select no1 from box where id = ?",id)[0][0] lv2 = db.execute("select lv2 from zukan where no = ?",no1)[0][0].to_i lv3 = db.execute("select lv3 from zukan where no = ?",no1)[0][0].to_i lv4 = db.execute("select lv4 from zukan where no = ?",no1)[0][0].to_i lv5 = db.execute("select lv5 from zukan where no = ?",no1)[0][0].to_i if e1 < lv2 lv = 1 gage = 100-(e1/lv2.to_f*100) elsif e1 >= lv5 lv = 5 gage = 0 elsif e1 >= lv4 lv = 4 gage = 100-(e1-lv4)/(lv5-lv4.to_f)*100 elsif e1 >= lv3 lv = 3 gage = 100-(e1-lv3)/(lv4-lv3.to_f)*100 elsif e1 >= lv2 lv = 2 gage = 100-(e1-lv2)/(lv3-lv2.to_f)*100 end ################################################## if lv == 1 color = "black" elsif lv == 2 color = "navy" elsif lv == 3 color = "green" elsif lv == 4 color = "red" elsif lv == 5 color = "yellow" else color = "pink" image = "./img/snail.png" alt = "snails_bug" end image = "./img/#{cal}#{lv}.png" alt = "#{cal}.png" printf(<<_EOS_,per,gage,per,per,per,color,cmps,xs,newone,image,alt,cmpsget) <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd"> <html> <head> <meta name="viewport" content="width=device-width,initial-scale=1,maximum-scale=1,user-scalable=no"> <meta name="format-detection" content="telephone=no"> <link media="only screen and (max-device-width:480px)" href="smart.css" type="text/css" rel="stylesheet" /> <link media="screen and (min-device-width:481px)" href="profeel.css" type="text/css" rel="stylesheet" /> <link rel="shortcut icon" href="./img/cabage.png"/> <title>だぁんじょん</title> <style type="text/css"> <!-- p.gage{ background:#adf; margin-left:0%s; margin-right:%d%s; text-align:left; border-radius: 10ex; } div.gage{ background:#ddf; margin-left:20%s; margin-right:20%s; border-radius: 10ex;} div.calque div{float:center; border:solid %s;} --> </style> </head> <body> <h1>だぁんじょん%s</h1> <p>%s %s</p> <div class="calque"> <div> <img src=%s alt=%s width="172" height="172"> </div> </div> <div class="gage"> <p class="gage">exp</p> </div> <form method="POST" action="quest.rb"> %s </form> <div class="f1"> <div class="lets"> <a href="prof.rb">出る...</a> </div></div> <footer></footer> </body> </html> _EOS_