「武器」の編集履歴（バックアップ）一覧はこちら

「武器」(2008/03/17 (月) 20:47:34) の最新版変更点

追加された行は緑色になります。

削除された行は赤色になります。

**武器の追加
例＞新たに「闇」属性の武器を追加する

***config_game.cgiの@weasに追加する
 #[0]No, [1]名前, [2]属性, [3]強さ, [4]耐久, [5]重さ
 [33, 'ﾊﾟﾝﾄﾞﾗﾎﾞｯｸｽ', '闇', 30, 666, 50,],

[0]No…管理側で何番目かわかる目印なだけなので実は何番でも良い
[1]名前…武器名。
[2]属性…属性により覚えれる技や武器による攻撃力の強弱をつける
[3]強さ…戦闘時に攻撃力にプラスされる値。数値はいくつでも可能(マイナスも可)。
-ランダムな数値にする場合は、int(rand(数値))のように書く
[4]耐久…武器が壊れるまでの耐久数。
[5]重さ…戦闘時に重さ分素早さが下がる。

**変更・削除・並び換え
自由にOK

**属性による優劣を作る ./lib/battle.cgi
-「|」で区切ることで複数可能
 my %tokkous = (
 # '強い属性' => qr/弱い属性/,
		'剣' => qr/斧/,
		'斧' => qr/槍/,
		'槍' => qr/剣/,
		'炎' => qr/風/,
		'風' => qr/雷/,
		'雷' => qr/炎/,
		'闇' => qr/風|炎|雷/,
 );

**関連項目
-[[技]]を追加する

**武器の追加
例＞新たに「闇」属性の武器を追加する

***config_game.cgiの@weasに追加する
 #[0]No, [1]名前, [2]属性, [3]強さ, [4]耐久, [5]重さ
 [33, 'ﾊﾟﾝﾄﾞﾗﾎﾞｯｸｽ', '闇', 30, 666, 50,],

[0]No…管理側で何番目かわかる目印なだけなので実は何番でも良い
[1]名前…武器名。
[2]属性…属性により覚えれる技や武器による攻撃力の強弱をつける
[3]強さ…戦闘時に攻撃力にプラスされる値。数値はいくつでも可能(マイナスも可)。
-ランダムな数値にする場合は、int(rand(数値))のように書く
[4]耐久…武器が壊れるまでの耐久数。
[5]重さ…戦闘時に重さ分素早さが下がる。

**変更・削除・並び換え
自由にOK

**属性による優劣を作る ./lib/battle.cgi
-「|」で区切ることで複数可能
 my %tokkous = (
 # '強い属性' => qr/弱い属性/,
		'剣' => qr/斧/,
		'斧' => qr/槍/,
		'槍' => qr/剣/,
		'炎' => qr/風/,
		'風' => qr/雷/,
		'雷' => qr/炎/,
		'闇' => qr/風|炎|雷/,
 );


**攻撃力に武器の強さを反映させる ./lib/battle.cgi
 if ($m{wea_c} && $m{wea}) {
	if    ($weas[$m{wea}][2] =~ /剣|斧|槍/) { $m_at = $m{at}  + $weas[$m{wea}][3]; }
	elsif ($weas[$m{wea}][2] =~ /風|炎|雷|闇/) { $m_at = $m{mat} + $weas[$m{wea}][3]; $y_df = $y{mdf}; }
	$m_ag -= $weas[$m{wea}][5];
	$m_ag = int(rand(5)) if $m_ag < 1;
	$m_at *= 2 if $y{wea} && &is_tokkou($m{wea},$y{wea});
 }
 if ($y{wea}) {
	if    ($weas[$y{wea}][2] =~ /剣|斧|槍/) { $y_at = $y{at}  + $weas[$y{wea}][3]; }
	elsif ($weas[$y{wea}][2] =~ /炎|風|雷|闇/) { $y_at = $y{mat} + $weas[$y{wea}][3]; $m_df = $m{mdf}; }
	$y_ag -= $weas[$y{wea}][5];
	$y_ag = int(rand(5)) if $y_ag < 1;
	$y_at *= 2 if $m{wea} && &is_tokkou($y{wea},$m{wea});
 }

**ステータス表示にも武器の強さを反映させる ./lib/myself.cgi

***sub my_status_mobile
 if    ($weas[$m{wea}][2] =~ /無|剣|斧|槍/) { $sub_at  = "+$weas[$m{wea}][3]"; $sub_ag = "-$weas[$m{wea}][5]"; }
 elsif ($weas[$m{wea}][2] =~ /風|炎|雷|闇/) { $sub_mat = "+$weas[$m{wea}][3]"; $sub_ag = "-$weas[$m{wea}][5]"; }
***sub my_status_pc
 if    ($weas[$m{wea}][2] =~ /無|剣|斧|槍/) { $sub_at  = "▲$weas[$m{wea}][3]"; $sub_ag = "▼$weas[$m{wea}][5]"; }
 elsif ($weas[$m{wea}][2] =~ /風|炎|雷|闇/) { $sub_mat = "▲$weas[$m{wea}][3]"; $sub_ag = "▼$weas[$m{wea}][5]"; }


**関連項目
-[[技]]を追加する