武器


※上記の広告は60日以上更新のないWIKIに表示されています。更新することで広告が下部へ移動します。

武器の追加

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

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]"; }


関連項目

  • を追加する
|新しいページ|検索|ページ一覧|RSS|@ウィキご利用ガイド | 管理者にお問合せ
|ログイン|