罪と罰++二律背反


sub attack_myself{
  ・・・省略・・・
  $log .="$nm は $dg_data[$dg_a][1] で攻撃!!<br>$tnm に $vの傷を与えた!<br>\n";
  $thp -= $v;

  # 武器の特殊攻撃
  if(rand(100)<10 && $dg_a==斬鉄剣のアイテム番号){
    $log .="$nm は $dg_data[$dg_a][1] で攻撃!!<br>$tnm を一刀の元に切り伏せた!<br>\n";
    $thp = 0;
  # 通常攻撃
  }else{
    $log .="$nm は $dg_data[$dg_a][1] で攻撃!!<br>$tnm に $vの傷を与えた!<br>\n";
    $thp -= $v;
  }
  • @dg_data = (
      ['ぶき1',  1,  'こめんと'],
      ['ぶき2',  2,  'こめんと'],
      ['ぶき3',  3,  'こめんと']
    );
  •     $log .="$nm は $dg_data[$dg_a][1] で攻撃!!<br>$tnm に $vの傷を与えた!<br>\n";
        $thp -= $v;


if(rand(100)<8 && $dg_a==14){
    $log .="略\n";
    $thp = 0;
    〜略〜
}elsif(rand(100)<8 && $dg_a==15){
    $log .="略\n";
    $thp = 0;
    〜略〜
}else{
$log .="略\n";
以下階級技の呼び出し


トップ   編集 凍結 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 単語検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2012-06-08 (金) 00:28:05 (3061d)