Mercurial > hgrepos > hgweb.cgi > skipweb
changeset 567:cdf96ef74054
updated
author | MURAKAMI Masaki <c112124@h.koeki-u.ac.jp> |
---|---|
date | Wed, 23 Jul 2014 21:24:41 +0900 |
parents | cad051518c1b |
children | f00ce72f48e5 |
files | minato2014/#Bingo.rb# |
diffstat | 1 files changed, 0 insertions(+), 452 deletions(-) [+] |
line wrap: on
line diff
--- a/minato2014/#Bingo.rb# Wed Jul 23 21:14:18 2014 +0900 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,452 +0,0 @@ -#!/usr/bin/env ruby -# -*- coding: utf-8 -*- - -require 'sqlite3' -require 'cgi' -require 'date' -require './sub.rb' -require 'net/http' - -c = CGI.new(:tag_maker => "html5", :accept_charest => "UTF-8") -db = SQLite3::Database.new("sql/stamp.sq3") - -id = c.cookies["id"][0].to_i -magic = c.cookies["magic"][0].to_i -#id = 1 # test -err = 0 # 不正な動きであれば負の値になる -sidesize = 3 -message = "はりきって行きましょう!<br>" # ビンゴ用テキスト - -print("Content-type: text/html; charset=UTF-8 \n\n") - -### DROP TABLE ### - -getcom = ARGV[0].to_s -drop = 'DROP TABLE main ;' -if getcom == 'ududlrllba' - db.execute(drop) -end - -###### - -### DELETE TABLE ### - -del = 'DELETE FROM main WHERE id=?' -if getcom == 'ududlrlrba' - db.execute(del, id) -end - -###### - -##### CHECKING UID ##### - -sql = "SELECT stamp_status, stamp_img, name, job, sex, exp FROM main WHERE id=? AND magic=?" -begin - user_data = db.execute(sql, id, magic) -rescue - user_data = [] -end - -if user_data == [] # ログインエラー(-1) - err -= 1 -end - -### LOGIN ERROR HTML ### - -if err == -1 - print' -<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" - "http://www.w3.org/TR/html4/strict.dtd"> -<html> -<head> -<meta http-equiv="refresh" content="3;http://skip.koeki-prj.org/minato2014/account.html"> -</head> -<title>たいとる</title> -<body> -' -print' -<p> ログインに失敗しました。 </p> -<p> -アカウント登録ページへ接続中…<br> -* 3秒経っても移動しない場合は<a href="account.html">こちら</a>から移動して下さい。 -</p> -</body> -</html> -' - exit -end - -###### - -########## - -##### RE-ARRAYING STAMP_STATUS AND STAMP_IMG ##### - -# stamp status -stamp_st = user_data[0][0] -stamp_st = stamp_st.split(//) # 一文字ずつ分けて配列にする -stamp_st = stamp_st.map {|s| s.to_i} # 配列内の文字列を数列になおす - -# stamp img -stamp_img = user_data[0][1] -stamp_img = stamp_img.split(",") # 文字列を","で区切って配列にする - -########## - -##### STAMPPING ##### - -### Making randam number ### - -def taiou(sidesize) - srand(123456789) - stamp = Hash.new("n") - stamp_name = ["kamo", "kite", "mame", "mo2usa", "inuwasi", "hanabu", "be", "UMIMARU", "murakamibot"] - (sidesize**2).times do |n| - stamp[rand(10000000)] = stamp_name[n] - end - stamp -end - -###### - -##### Checking bingo method ##### - -def bingocheck(start, sidesize, stepon, stamp, decision, bingo) - nbox = [] - setbox = Hash.new - if sidesize == stepon - x = sidesize - else - x = 1 - end - x.times do |m| - start.step(sidesize*sidesize - 1, stepon) do |n| - nbox << n + m - if nbox.length == sidesize - dbox = Array.new(0) # next bingo or reach numbers(bingoed -> nothing) - for i in nbox - if stamp[i] == 0 - dbox << i - end - end - # sidesizeにdecisionの値を加えることで、ビンゴ、次ビンゴ、リーチをそれぞれdecisionに0,1,2を加えることで表現。 - if dbox.length == decision - setbox[dbox] = nbox - bingo << setbox - setbox = Hash.new - nbox = [] - else - nbox = [] - end - end - end - end -end -# bingo[{[ビンゴまたはリーチに必要な番号] => [ビンゴまたはリーチのラインを形成する番号]}] -########## - -bingo = # 現在のビンゴ数 - -### Checking Access Cord(AC) ### - -getAC = ARGV[0].to_i # URL?以降の引数を取得 -rightAC = taiou(sidesize) # taiouで生成したACのハッシュ -#p rightAC -rightAC = rightAC[getAC] # ACが正しければスタンプ名が入り、異なる場合はn - -##### ACCESS LOG ##### -t = Time.now -time = (t.hour * 3600) + (t.min * 60) + t.sec - -## Checking sql_master table. If sqlite_master don't have tablename, it create. - -sql_master = "SELECT name FROM sqlite_master WHERE name='logs';" -check_master = db.execute(sql_master) -sql_logs = 'CREATE TABLE logs( -id INTEGER PRIMARY KEY AUTOINCREMENT, -uid INTEGER, -ac TEXT, -time INTEGER); -' -if check_master == [] - db.execute(sql_logs) -end - -########## - -begin - get_log = 'SELECT ac, time FROM logs WHERE uid=(SELECT MAX(id) FROM logs WHERE uid=?);' # ユーザーの最新のログ情報を取得 - log_check = db.execute(get_log, id) -rescue - print'GETTING LOG ERROR!' -end -begin - log = 'INSERT INTO logs(uid, ac, time) VALUES(?, ?, ?)' - db.execute(log, id, rightAC, time) -rescue - print'INSERT LOG ERROR!' -end -# /* memo: 再度同じようなシステムを作る際はスタンプ用のテーブルがほしい。 */ # - -########## - -### ビンゴしたラインを判定(decision = 0) ### -bingo = [] -# 横 -bingocheck(0, sidesize, 1, stamp_st, 0, bingo) -# 縦 -bingocheck(0, sidesize, sidesize, stamp_st, 0, bingo) -# 左斜め -bingocheck(0, sidesize, sidesize+1, stamp_st, 0, bingo) -# 右斜め -bingocheck(sidesize-1, sidesize, sidesize-1, stamp_st, 0, bingo) -####### - -bingo = bingo.length # ビンゴの数 - - -if rightAC != "n" # rightACが正しければ - - ### Update Stamp_status And Stamp_img ### - - # Replacing Image # - - index_st = [] - stamp_st.length.times { |c| - if stamp_st[c] == 0 - index_st << c - end - } - - ### リーチ(decision = 1)# [{[ビンゴの番号] => [リーチを構成する数]}] - reach = [] - # 横 - bingocheck(0, sidesize, 1, stamp_st, 1, reach) - # 縦 - bingocheck(0, sidesize, sidesize, stamp_st, 1, reach) - # 左斜め - bingocheck(0, sidesize, sidesize+1, stamp_st, 1, reach) - # 右斜め - bingocheck(sidesize-1, sidesize, sidesize-1, stamp_st, 1, reach) - ####### - - begin - reach = reach[0].flatten(2)[0] # ビンゴの番号のみ抽出 - rescue - reach = [] - end - - ### ビンゴしたラインを判定(decision = 0) ### - bingo = [] - # 横 - bingocheck(0, sidesize, 1, stamp_st, 0, bingo) - # 縦 - bingocheck(0, sidesize, sidesize, stamp_st, 0, bingo) - # 左斜め - bingocheck(0, sidesize, sidesize+1, stamp_st, 0, bingo) - # 右斜め - bingocheck(sidesize-1, sidesize, sidesize-1, stamp_st, 0, bingo) - ####### - - bingo = bingo.length # ビンゴの数 - - # Updating stamp_st # - if stamp_img.include?(rightAC) == true # 既に同名のスタンプが入っていたら - if stamp_st[stamp_img.index(rightAC)] < 9 - stamp_st[stamp_img.index(rightAC)] += 1 # 対応するスタンプの位置に1足す - message = "スタンプカウントが「1」増えました!(スタンプカウントは「9」が上限です)" - else - message="スタンプカウントMAX!!(※これ以上このスタンプのカウントは増えません)" - end - else - if reach != [] && bingo == 0 # はじめのビンゴは必ず3回で完成 - stamp_st[reach] += 1# ビンゴになる数字を代入 - stamp_img[reach] = rightAC - message = "新しいスタンプをGETしました!" # Top message - else - randam_number = index_st[rand(index_st.length)] # スタンプの入っていない個所のなかからランダムにひとつ選ぶ - stamp_st[randam_number] += 1 # 選ばれた個所に1足す - stamp_img[randam_number] = rightAC # stamp_stと同じ個所にstamp_imgにスタンプの名前を代入 - message = "新しいスタンプをGETしました!" # Top message - end - end - ## - - ### ビンゴしたラインを判定(decision = 0) ### - bingo = [] - # 横 - bingocheck(0, sidesize, 1, stamp_st, 0, bingo) - # 縦 - bingocheck(0, sidesize, sidesize, stamp_st, 0, bingo) - # 左斜め - bingocheck(0, sidesize, sidesize+1, stamp_st, 0, bingo) - # 右斜め - bingocheck(sidesize-1, sidesize, sidesize-1, stamp_st, 0, bingo) - ####### - - bingo = bingo.length # ビンゴの数 - - - ## - - # Convert to string # - - stamp_st_string = stamp_st.join - stamp_img_string = stamp_img.join(",") - - ## - - sql_update = "UPDATE main SET stamp_status=?, stamp_img=? WHERE id=?;" - db.execute(sql_update, stamp_st_string, stamp_img_string, id) -end - -###### - -########## - -##### HTML ##### -print' -<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" - "http://www.w3.org/TR/html4/strict.dtd"> -<html> -<head> -<title>たいとる</title> -<link rel="stylesheet" type="text/css" href="Bingo.css"> -</head> -<body> -' -### TOP ### - -sql_rank = 'select rank from main where id=?;' -rank = db.execute(sql_rank, id).flatten(2)[0].to_i - -print' -<div class="outflam"> -' -if rank > 0 - print'<div class="top" style="background: red;">' -else - print'<div class="top">' -end -# - ビンゴステータス処理 - # - -if rank > 0 - printf("<h1>おめでとうございます!!<br>☆ %d等 ☆が当選しました!!</h1>", rank) - # print'<p>抽選は終了しましたが、引続きゆる☆スタをお楽しみ下さい!!</p>' -end - -# End of top -print' -</div> -' -# Top message # - -printf("<p>%s</p>",message) - -## - -###### - -### CENTER ### -print' -<div class="center"> -<table border=1> -' -for i in 0..2 - print'<tr>' - 3.times do |n| - if stamp_st[3*i+n].to_i > 0 - printf("<td width=170 height=170><img src=\"png/%s.png\" alt=\"stamped\" width=\"160\" height=\"160\"><span style=\"color: green; font-weight: 900;\">%d</span></td>\n", stamp_img[3*i+n], stamp_st[3*i+n]) - else - print"<td width=170 height=170></td>\n" - end - end - print'<tr>' -end -# End of center -print' -</table> -</div> -' -###### - -### BOTTOM ### -print' -<div class="bottom"> -' -# - RPGの表示 - # - -name = user_data[0][2] -job = user_data[0][3] -sex = user_data[0][4] -exp = user_data[0][5] - -## GETTING EXP SUM ## - -sum_sql = 'SELECT SUM(exp) FROM main WHERE rank=0;' -sumexp = db.execute(sum_sql).flatten(2)[0] - -#### - -### GETTING EXP ### - -exp_sql = 'SELECT exp FROM main WHERE id=?' -last_exp = db.execute(exp_sql).flatten(2)[0] - -###### - -stamp = stamp_st.inject(:+) # 配列内の値を全て足す - -charST = rpg(job, sex, stamp, bingo, sumexp) # ユーザーのキャラクタステータス - -bc = charST[2].to_i - last_exp.to_i # expの差 - -if bc > 5 - while bc > 5 - - message += 'ビンゴ!<br>' -end - -## UPDATE EXP ## - -update_exp = 'UPDATE main SET exp=? WHERE id=?;' -db.execute(update_exp, charST[2], id) - -#### - -## GETTING EXP SUM ## - -sum_sql = 'SELECT SUM(exp) FROM main ;' -sumexp = db.execute(sum_sql).flatten(2)[0] - - -#### - -stamp = stamp_st.inject(:+) # 配列内の値を全て足す - -charST = rpg(job, sex, stamp, bingo, sumexp) # ユーザーのキャラクタステータス - -printf(" -<!-- キャラクターイメージの設定 --> -<div class=\"charIMG\"> -<img src=\"png/%s.png\"> -</div> -<div class=\"charSTATUS\"> -ID:%04d<br> -NAME:%s<br> -Lv: %d / 全Lv: %d<br> -当選確率: %3.3f \% -<div> -", charST[0], id, name, charST[2],sumexp , charST[1]) - -# End of bottom -print'</div>' -# End of outflam -print'</div>' -###### - -print' -</body> -</html> -' -##########