Initial commit of original files

This commit is contained in:
sanjeok77
2026-06-22 21:09:26 +09:00
commit dc9058e0da
74 changed files with 12466 additions and 0 deletions
+302
View File
@@ -0,0 +1,302 @@
$ver = 'v02-04-16'; # バージョン情報(変更不可)
#-----------------------------------------------------------#
# 罪と罰++ 二律背反 #
# Copyright(C) 2001-2002 by Vivid Studio. BLANK BOARD #
# Vivid Studio.[ http://www17.big.or.jp/~obochan/vivid/ ] #
# BLANK BOARD [ http://pom.to/ ] #
#-----------------------------------------------------------#
# 環境設定 Version 1.1
#--- [注意事項] --------------------------------------------#
# 1.このスクリプトは以下の利用規程に従って配布しています。 #
# http://www24.big.or.jp/~obo/game/ore_/gild/ #
#-----------------------------------------------------------#
$er = 0; # メンテナンス表示(0:通常 1:メンテ)
$ertm = '30'; # メンテ予測時間(分)
$erni = 'メンテナンス'; # メンテ理由
$admin_pass = "admin"; # 管理者パスワード(変更しないと危険です)
#===============================================================================
# 初期設定
require './jcode.pl'; # jcode.plのパス
require './inc/ore_sub-system.cgi'; # 共通ライブラリのパス
$cdatfile = "./logdata/cdata.cgi"; # 国データ
$histfile = "./logdata/hist_log.cgi"; # 国バックアップ(過去の栄光ログ)
$usrdata = "./usrdata/"; # キャラデータ格納ディレクトリ。
$chmod = 0666; # キャラデータ作成時のパーミッション。
$lockdir = "./lock/"; # ロックファイルを入れるディレクトリ
$lockfile = "lock"; # ロックファイル名
$script = "./ore_.cgi"; # 本スクリプト名
$ore_reg = "./ore_reg.cgi"; # 新規登録
# 管理者機能 アクセス方法は
# http://あなたのURL/ore_plus/ore_admin.cgi?administrator=管理者パスワード
$ore_admin = "./ore_admin.cgi";
$park = "./park.cgi"; # 国際交流広場
$public = "./public.cgi"; # 公式条約
$campbbs = "./campbbs.cgi"; # 各国国際会議
$hist = "./hist.cgi"; # 過去の栄光
$imgs = "./imgs"; # 画像格納ディレクトリ
$css = "./html/ore_.css"; # 外部スタルシート
$titleh = '罪と罰++ 二律背反'; # <title>タグ
$title = '<img src="./imgs/title_game.png" width="220" height="52">'; # 表示タイトル
$title_i = '<div align="center">罪 と 罰 ++</div><div align="right">二律背反 </div>'; # 表示タイトル(モバイル)
$body = 'bgcolor="#000000" text="#dddddd" link="#9999dd" alink="#9999dd" vlink="#9999dd"'; # body装飾
$home = "http://pom.to/"; # 戻り先
$home_i = "http://pom.to/"; # 戻り先(モバイル)
$index = "./index.cgi"; # トップページ
# 自由項目
$kakiko=<<EOM;
<a href="http://www24.big.or.jp/~obo/game/ore_/gild/" target="_blank">[罪と罰++配布所]</a>
  <a href="http://pom.to" target="_blank">ねっと遊園地♪</a>
  <a href="http://www2s.biglobe.ne.jp/~aries/Mercury/ring1/ering.cgi?mode=all" target="_blank">[罪と罰++設置所]</a>
<br><br>
共有・共同サイト(<span style="color:#ff99cc">募集中♪</span>) /
<a href="" target="_blank"></a>/
<a href="" target="_blank"></a>/
<a href="" target="_blank"></a>/
<a href="" target="_blank"></a>/
<a href="" target="_blank"></a>
EOM
# ホスト名取得モード
# --> 0 : $ENV{'REMOTE_HOST'} で取得できる場合
# --> 1 : gethostbyaddr で取得できる場合
$get_remotehost = 1;
$gzip = ''; # 圧縮転送 gzipのパスを入力 無効の場合は無記入(転送量対策)
$play_limit = 15; # 同時ログイン可能数 これを超える人数がプレイ中はログイン不可(負荷対策)
@act_limit = ([22,0],[23,0],[0,0]); # [時間帯,行動間隔(秒)] 行動間隔をこの秒数以上空けないと無効にする(負荷対策)
@safetime = (-1); # プレイ規制時間 時間の間は[ , ]で区切ること。無効は-1を記入(負荷対策)
$no_mouse = 1; # マウス自動操作チート防止(yes=1 or no=0)(負荷対策)
$no_js = 1; # Javascript自動操作チート・frame取り込み防止(yes=1 or no=0)(負荷対策)
$act_cnt_limit = 250; # 修業の累計がこの数値に達すると強制的に内政or休憩させる(負荷対策)
$lock_check = 1; #lock処理を行なう(yes=1 or no=0)
$backdata = "./backup/"; # 定期バックアップディレクトリ(定期バックアップを行わない場合は無記入)
$sanka = 200; # 全参加人数 共用サーバでは安全のため300程度が限度
$del_limit = 10; # キャラ削除放置時間 これを超えるとキャラを削除します
$player_now = 60*5; # 何秒以内にログインした人をプレイ中の参加者にするか
# 各国の人数制限
# --> 0 : 手動割り当てモード(管理者モードで直接指定)
# --> 1 : 自動算出モード(参加人数/(国数+無所属)) 統一後の優劣機能搭載
$limit_mode = 1;
$clv = 2; # 仕官できるレベル
$kisei = 0; # 新規登録規制(0:なし 1:あり)
# デバックモード
# なし:PC・モバイル両対応
# pc :PC限定モード(モバイル非対応)
# mv :モバイル固定モード(PC上でモバイル画面をエミュレート表示)
$mv_mode = '';
# 機種別設定
if( $ENV{'HTTP_USER_AGENT'} =~/DoCoMo/ ||
$ENV{'HTTP_USER_AGENT'} =~/UP\.Browser/ ||
$ENV{'HTTP_USER_AGENT'} =~/J-PHONE/ ||
$ENV{'HTTP_USER_AGENT'} =~/ASTEL/ ||
$ENV{'HTTP_X_JPHONE_MSNAME'} || $mv_mode eq 'mv'){
# -- モバイル用設定 --
$mv_mode = 'mv'; # モバイル識別子 変更不可
require './inc/ore_sub-base_mv.cgi';# モバイル用ベースルーチン
$method = "GET"; # フォームメソッド
$bt_count = 15; # 修行時キャラ最大数
# モバイル用パケット軽量モード 0X か XX を選択
# ・プレイヤー情報>> 00:待機中だけ表示 無し:常に表示
# ・各種BBSリンク >> 01:待機中だけ表示 11:常に表示 無し:常に非表示
# ・最新情報 >> 02:待機中だけ表示 22:常に表示 無し:常に非表示
# ・各国ステータス>> 03:待機中だけ表示 33:常に表示 無し:常に非表示
# ・ゲームバランス>> 04:待機中だけ表示 44:常に表示 無し:常に非表示
# ・プレイ中参加者>> 05:待機中だけ表示 55:常に表示 無し:常に非表示
# ・一言伝言 >> 06:待機中だけ表示 66:常に表示 無し:常に非表示
$lt_mode = "00,01,02,03"; # 項目間は[ , ]で区切る
}else{
# -- PC用設定 --
$mv_mode = 'pc'; # PC識別子 変更不可
require './inc/ore_sub-base_pc.cgi';# PC用サブルーチン
$td_end = "</td>"; # レイアウト補正 変更不可
$button1 = 'class="button1"'; # レイアウト補正 変更不可
$method = "POST"; # フォームメソッド
$bt_count = 90; # 修行時キャラ最大数
}
# アクセス制限(ホスト名もしくはIPアドレスを記述)
@deny = (
"anonymizer.com",
"cache*.*.interlog.com",
"",
""
);
#===============================================================================
#以下設定変えないほうがいいかもよ
# ゲーム内拘束時間 3600 が一時間 変更は一時間単位で。
$GMT = int(3600*1); #int(3600*2)
$GMW = int($GMT/3600); #int($GMT/3600)
# この秒数ごとにHP,MPが1ポイント回復する
$hrg_time= 60;
# 統一難易度 ↑難しい:↓簡単 (ビミョウなので変更しないのが無難。)
$reset_point = 0.45; #変更は0.010.1刻みで。
# 統一期限 この日数以内に統一しないとリセットされる
$reset_time_limit= 20;
# 統一・リセット後の国データ(0:旧式[固定] 1:ランダム[多様性高])
$reset_cdat = 1;
# 何をしても行動中・・・あと??分と表示される場合の回避オプション[通常は0のまま]
# ??分の秒数換算を記入 EX 2分 >> 120
$spend_time = 0;
@cmp = ('無所属','アルメリア王国','フラリン教国','イギス連合国','ソーディナ帝国','ヤマト神国'); # 陣営 国の追加は不可能です。改造すれば別ですが。
@color = ('#EEEEEE','#EE9999','#00EEEE','#88EE88','#FFCCFF','#55BBFF'); # 各陣営の色。無所属は関係なし
@cl = ('傭兵','農兵','従卒','足軽','槍兵士','足軽大将','騎士見習','騎士','上級騎士','騎士隊長','大隊長','大将','上級大将','将軍','元帥'); # 階級 名称は変更可能
@g_p = (0,1000,2000,3000,4000,5000,6000,7000,8000,10000,12000,14000,16000,18000,20000); # 階級兵士数上限他 変更可能ですがシステムを理解せずにいじるとゲームが崩壊します。
@sogo_p =('----','覇者','英雄','借金王','鬼畜',' ',' ',' ',' ',' ','管理人'); #称号
@seibetu =('--','男','女');
sub settei {
# 所属別必殺技 - 名称は変更可能 -
if($camp==0){
@spell = ('マジン剣','全回復');
@sp_mp = (3,9);
}elsif($camp==1){
@spell = ('疾風剣','生命功','奏撃功','炎蒼旋','鋼気','絶心功','鳳凰転生','魂砕き');
@sp_mp = (6,9,12,15,18,21,60,90);
}elsif($camp==2){
@spell = ('バーティカルソード','アタック','ヒール','セイントクロス','アンクレアブレイク','ハイヒール','夢を継ぐ者','龍破斬');
@sp_mp = (6,12,9,18,30,21,45,90);
}elsif($camp==3){
@spell = ('ソードスラッシュ','アタック','ソードダンス','シールド','アーマーブレイク','ハイヒール','オーガソード','アルティメットアタック');
@sp_mp = (6,12,12,18,25,21,40,99);
}elsif($camp==4){
@spell = ('暗黒剣','デッドクラウン','ナイトメア','黒炎','ハイヒール','アタック','シールド','地獄門');
@sp_mp = (9,12,10,15,21,12,18,70);
}elsif($camp==5){
@spell = ('壱式','壱式・断','弐式','弐式・裂','参式','参式・波','零式','零式・絶');
@sp_mp = (10,10,20,20,30,30,60,80);
}
# 階級技 - 名称は変更可能 -
@kspell = ('ファイアー','アイスストーム','ダイヤキュート','ブレインダムド');
@ksp_mp = (5,25,50,100);
# 武具 追加簡単 [番号,武具名,値段,回数,攻撃力,説明] 1~10までが隠し武器 11~がお店の商品
# int(rand(xxx)) で 0xxx のランダム値。EX. int(rand(20)+50) >> 020 + 50 が攻撃力
@dg_data =(
[0,'----', 0, 0, 0, 0],
[1,'ハグレメタルの剣', 100000, 100, int(rand(100)), 0],
[2,'エクスカリバー', 150000, 250, 60, 0],
[3,'ロンギヌスの槍', 100000, 100, 60, 0],
[4,'クサナギの剣', 90000, 300, 50, 0],
[5,'',,,,],
[6,'',,,,],
[7,'',,,,],
[8,'',,,,],
[9,'',,,,],
[10,'',,,,],
[11,'クリスタルソード', 75000, 200, 35, 'クリスタルから精製した剣'],
[12,'ムラマサ', 50000, 75, 35, '古来より伝わる妖刀。強いが脆い'],
[13,'ナイトオブシャドウ', 34000, 300, 25, '漆黒の剣。非常に頑丈'],
[14,'マジンの斧', 20000, 100, 20, 'ハンドアックス。刃毀れしやすい'],
[15,'モーニングスター', 12000, 200, 15, '針つき鉄球'],
[16,'ロングスピア', 6000, 100, 10, '鉄製の長槍'],
[17,'ブロンズソード', 3000, 150, 5, 'ブロンズ製の剣']
);
# 防具 追加簡単 [番号,防具名,値段,回数,防御力,説明] 1~10までが隠し防具 11~がお店の商品
# int(rand(xxx)) で 0xxx のランダム値。EX. int(rand(20)+50) >> 020 + 50 が防御力
@df_data =(
[0,'----', 0, 0, 0, 0],
[1,'水の羽衣', 100000, 150, int(rand(60)), 0],
[2,'光の鎧', 120000, 300, 40, 0],
[3,'刃の鎧', 900000, 150, 35, 0],
[4,'大地の鎧', 70000, 350, 30, 0],
[5,'',,,,],
[6,'',,,,],
[7,'',,,,],
[8,'',,,,],
[9,'',,,,],
[10,'',,,,],
[11,'ドラゴンアーマー', 50000, 250, 25, 'ドラゴンの角を加工した鎧'],
[12,'ミスリルアーマー', 34000, 150, 20, 'ミスリル製の鎧'],
[13,'鋼の鎧', 20000, 300, 15, '鋼製の鎧。頑丈で壊れにくい'],
[15,'見交わしの服', 14000, 150, int(rand(30)), '軽く とても動きやすい服'],
[14,'鉄の鎧', 8000, 250, 10, '鉄製の鎧'],
[16,'鎖がたぴら', 4000, 150, 5, '鉄鎖が編みこまれた服'],
[17,'皮の鎧', 1500, 200, 2, '鞣革を鍛えた鎧 無いよりはマシ・・']
);
# 道具 追加難しい [番号,道具名,値段,回数,説明] 1~10までが隠し道具 11~がお店の商品
@di_data =(
[0,'----', 0, 0, 0],
[1,'賢者の石', 80000, 250, 0],
[2,'セカイジュの葉', 64000, 1, 0],
[3,'命の木の実', 64000, 1, 0],
[4,'魔物の尻尾', 64000, 1, 0],
[5,'',,,,],
[6,'',,,,],
[7,'',,,,],
[8,'',,,,],
[9,'',,,,],
[10,'',,,,],
[11,'皇帝液', 42000, 1, '体力&精神がある程度回復'],
[12,'精霊水', 24000, 1, '精神がある程度回復'],
[13,'和み液', 8000, 1, '精神が多少回復'],
[14,'癒し水', 15000, 1, '体力がある程度回復'],
[15,'薬草', 5000, 1, '体力が多少回復'],
);
}
1;#削除不可