味噌味の技


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

sub skill_72 { # 算術士
return (
	[0,		15,		'MP5',		sub{ return if &is_bad_state('魔'); $com =~ /@(.+?)(?:(?:\x20| )?@(×.+?)(?:\x20| )|\x20| )/; my $action2 = $2; if (defined $actions{$action2}) { $_mp_num = 5; &{ $actions{$action2}[1] }; } else { $com.=qq|詠唱失敗!|; };	}],
	[100,	14,		'MP4',		sub{ return if &is_bad_state('魔'); $com =~ /@(.+?)(?:(?:\x20| )?@(×.+?)(?:\x20| )|\x20| )/; my $action2 = $2; if (defined $actions{$action2}) { $_mp_num = 4; &{ $actions{$action2}[1] }; } else { $com.=qq|詠唱失敗!|; };	}],
	[150,	13,		'MP3',		sub{ return if &is_bad_state('魔'); $com =~ /@(.+?)(?:(?:\x20| )?@(×.+?)(?:\x20| )|\x20| )/; my $action2 = $2; if (defined $actions{$action2}) { $_mp_num = 3; &{ $actions{$action2}[1] }; } else { $com.=qq|詠唱失敗!|; };	}],
	[0,		17,		'MP7',		sub{ return if &is_bad_state('魔'); $com =~ /@(.+?)(?:(?:\x20| )?@(×.+?)(?:\x20| )|\x20| )/; my $action2 = $2; if (defined $actions{$action2}) { $_mp_num = 7; &{ $actions{$action2}[1] }; } else { $com.=qq|詠唱失敗!|; };	}],
	[20,	0,		'×フレア',		sub{ return if &is_bad_state('魔'); if (!$_mp_num) { $com.=qq|詠唱失敗!|; return; }; for my $y (@members) { next unless $ms{$y}{mp}; next if $ms{$y}{hp} <= 0; next if $ms{$y}{mp} % $_mp_num != 0; my $v=int(260 * (rand(0.3)+0.9)); $v=int(rand(2)+1) if $ms{$y}{mdf} > 999; $ms{$y}{hp}-=$v; $com.=qq|<b>$y</b>に <span class="damage">$v</span> のダメージ!|; if ($ms{$y}{hp} <= 0) { $ms{$y}{hp}=0; $com .= qq|<span class="die">$yをたおした!</span>|; &defeat($y); }; };		}],
	[40,	0,		'×リフレク',	sub{ return if &is_bad_state('魔'); if (!$_mp_num) { $com.=qq|詠唱失敗!|; return; }; for my $y (@members) { next unless $ms{$y}{mp}; next if $ms{$y}{hp} <= 0; next if $ms{$y}{mp} % $_mp_num != 0; $ms{$y}{tmp}='魔反撃'; $com.=qq|<span class="tmp">$yは魔法の壁で守られた!</span>|; };		}],
	[70,	0,		'×ケアルガ',	sub{ return if &is_bad_state('魔'); if (!$_mp_num) { $com.=qq|詠唱失敗!|; return; }; for my $y (@members) { next unless $ms{$y}{mp}; next if $ms{$y}{hp} <= 0; next if $ms{$y}{mp} % $_mp_num != 0; my $v=int(500 * (rand(0.3)+0.9)); $ms{$y}{hp}+=$v; $ms{$y}{hp}=$ms{$y}{mhp} if $ms{$y}{hp} > $ms{$y}{mhp}; $com.=qq|<b>$y</b>の$e2j{mhp}が <span class="heal">$v</span> 回復した!|; };		}],
	[120,	0,		'×アレイズ',	sub{ return if &is_bad_state('魔'); if (!$_mp_num) { $com.=qq|詠唱失敗!|; return; }; for my $y (@members) { next unless $ms{$y}{mp}; next if $ms{$y}{hp} >  0; next if $ms{$y}{mp} % $_mp_num != 0; $ms{$y}{hp}=$ms{$y}{mhp}; $com.=qq|なんと、<span class="revive">$yが生き返りました!</span>|; };		}],
	[180,	0,		'×デス',		sub{ return if &is_bad_state('魔'); if (!$_mp_num) { $com.=qq|詠唱失敗!|; return; }; for my $y (@members) { next unless $ms{$y}{mp}; next if $ms{$y}{hp} <= 0; next if $ms{$y}{mp} % $_mp_num != 0; next if $ms{$y}{hp} > 999; $ms{$y}{hp}=0; $com.=qq|<span class="die">$yは死んでしまった!</span>|; &defeat($y); };		}],

);
}
名前:
コメント: