PET_ROOM_plus -- The pet training GAME
ここから設置者のお知らせやメッセージなど。
#############################################
ここには管理者である貴方の紹介など設置者情報とか。
スペースのシーケンスとかで構造体を自動で作成してくれます。
ルールとかも書いてあげるといかもしれません。
POD様式で自由に書くことができます。
書けたらHTMLにしたり、TEXTで表示させることもできます。
別のPODファイルを取り込んで表示させることも可能です。
PODについては、/lib/Pod などを参考に。
#############################################
#############################################
作成者 : Sho
E-mail : sho@area-s.com
Home Page : http://www.area-s.com/
EDIT Page : http://ganjah.hippy.jp/
Copyright (C) 2002 Missing Link.
All rights reserved.
#############################################
著作権はMISSING LINKが保有します。
このスクリプトはMISSINGLINKさんの｢PET ROOM｣改造版です。
http://www.area-s.com/
この改造スクリプトはMISSINGLINKさんのMISSING LINK
利用規定に準拠して配布しています。
本スクリプトを利用する方は以下のURLに記載された
利用既定に同意したものとみなします。
http://www.area-s.com/main/rule.html
#############################################
ver 2c
■設定をスタイルシートにも移した。
■古いペットを見れる記念館ができた。
■一度ブリダーズで勝つ(賞金を獲得)とランキングに緑のジャージが表示される。
システム的には
前回より少しオブジェクト的なのでデターは追い難くなっているかもです。
基本的には、設定定数$S->とサブルーチン$B->をコントストラクトでブレス
記念館のサブルーチンは$B->とCGIの継承していて。$B->がスーパークラス。
スキンのeval置き換え処理($B->print_skinメソッド)は、最後に
各変数を設定定数オブジェクト$Sに仮想でキャリングして置き換えします。
%F = %{$S->{F}}, if(ref($S->{F}) eq 'HASH');
仮想キャリングは、以前見た海外の通信制御システムのクラスパッケージから
ヒントもらったのだが無駄の無い良いアイデアだとおもったので使わせてもらった。
ただ引数にもこれを使うとデーターが完全にブラックボックス化して保守が
しにくいのでeval置き換えだけで使っている。
Pet_ulパッケージ内の引数をできるだけmainと同じものを使用。
petroom専用メソッドなので大概は変数を返さずに特定変数を$S->で作成します。
秘密の言葉を喋るときにメールを表示していたのを直した。
ver 2b
■ブリーダーにお金という要素が加わりました。
■お金が無い人は、行動が限られます。
■お金を支払(餌をあげる)餌代
■お金を支払(おやつをあげる)おやつ代
■お金を支払(うんこを掃除)シート代
■お金を支払(子犬が生まれた時)動物病院避妊代
■お金を支払(子犬を拾ってきた時)動物病院避妊代
■お金が発生(子犬をｼｮｯﾌﾟに売った時)子犬販売代金
■お金が発生(お小遣い日になった時)こづかい
■ブリーダーにやさしさという要素が加わりました。
■やさしさが低いと突発的なマイナスの確率が高くなります。
■ブリーダーに賢さという要素が加わりました。
■賢さが高いとお金を(pat)での加算される確率が高くなります。
■ブリダーズカップという要素が加わりました。
■カップブリーダーは毎週発表されます。
■カップブリーダーはコメント残せます。
■カップブリーダーは賞金がもらえます。
■犬小屋を調べるという要素が加わりました。
■犬小屋を調べるとたまにお金や靴等何か拾ってます。
■犬小屋を調べると妊娠していることがあります。
■ペットの行動がランダムにできます。
■ペットの健康値にマックスが指定できます。
■ペットは指定時間遊んで(play)あげないとペットの健康が悪くなります。
■ペットは指定時間散歩(out)させないとペットの健康が悪くなります。
■ペットは指定確率でしかる(hit)とブリダー値が一気に上下します。
■ペットは指定確率でなでる(pat)と貴方か誰かのお金を盗んで加算か減算します。
■ペットはたまに妊娠したり(メスの場合)
■ペットはたまに子犬を拾ってきたり(オスの場合)します。
■ペットはたまに日記を貴方やブリダーにメールします。
システム的には
メインは主にプロシージャーで移動はリファレンス渡し
なので作業量は増えたが前回比で少し高速になった。
PODで簡単に設置者の紹介などを変更できるようにした。
use Pod::Html と use Pod::Text両方に対応した。
あとパッケージの位置関係がわかりにくくなるので
ルーチンの継承は途中でとりやめた。追っかけにくいので。
いろいろ輸入したかったが早さを考えて一から書いた。
負荷に気をつけたので処理はいろいろ分散させた。
ver 2a
■健康という新しい数値がありひどくなると死にます。
■精神的に嫌なことがあると健康が悪くなります。
■ペットは、うんこを興奮してもらす事があります。
■そのうんこが一定以上たまると健康値が下がります
■ブリダー値という指数があります。
■好き嫌いとは別に育て方がうまい場合には上位になります。
■ペットは日記を付けています。
■たまにその日記を読むことがあります。
あんまり難しいことは、正直わかりませんが。
PET ROOM_plus ver++2c [base2.4]
PERL: 5.006001
OS: Windows_NT Linux
SERVER: AnWeb/1.40c Apache/2.0.43 (Win) /1.3.22 (Unix)
位置と相当値
ファイルは、SHIFT-JISです。
FTP で転送する場合は ASCII モードで転送。
SuExec 等、ユーザー権限で動く場合はもう少しきつめに。
public_html
|
+--/petroom/[705]設置ディレクトリ
pet.cgi[705] PET ROOM_plus CGI
pet_kinen.cgi[705] PET記念館CGI
pet_ini.cgi[604] 設定パッケージ
pet_room_skin.cgi[604] スキンパッケージ
pet_ul.cgi[604] ルーチンパッケージ
kine_ul.cgi[604] PET記念館パッケージ
pod_ul.cgi[604] PODパッケージ
log_user.cgi[606] ユーザーの情報が入ってるファイル
log_pet.cgi[606] ペットの情報が入ってるファイル
log_pet_old.cgi[606] 古いペットの情報が入ってるファイル
log_niki.cgi[606] 秘密の日記のファイル
log_bcup.cgi[606] ブリーダーズカップのファイル
dami.txt[606] 書込みダミーファイル
readme.html[666] PODなどで作成する場合
pet_p.css[644] スタイルシート
jcode.pl[644] 日本語処理パッケージ
|
+--/img/[705]イメージディレクトリ
usr_convert.cgi[705] データコンバータ
pet_editer.cgi[705] 開発用確認君
改造品のPET ROOMプラスのサポートはMISSING LINKでは受けられません。
もしわからないことがあればGANJAHの掲示板にお願いします。オソレスですが。
http://ganjah.hippy.jp/demo/superita_plus/index.cgi