ＳＲＣ質問掲示板Mk2
(現在 過去ログ94 を表示中)

HOME HELP 新規作成 新着記事 トピック表示 検索 掲示板新着情報RSS配信新着情報 過去ログ

[ 最新記事及び返信フォームをトピックトップへ ]

■17121 / inTopicNo.1) 　異なるパイロット間でSetSkillを共有
  ▼■
□投稿者/ Wider -(2005/07/30(Sat) 08:47:50) [ID:wUnqpZj7]
    現在シナリオ内で「ユニットＡ」が「ユニットＡ´」にアップグレードし、
    それと同時にそのパイロットも「パイロットａ」から「パイロットａ´」に変化させようとしているのですが、
    実はパイロットａは成長率制御でそれまでの行動によって色々SetSkillが施されており、これが継承されずに困っております。

    異なるパイロット間でSetSkillされた能力を共有する方法、あるいはこれを再現するサブルーチンの
    アルゴリズムのアイディアなど教えていただけませんでしょうか
引用返信/返信 削除キー/
■17122 / inTopicNo.2) 　Re[1]: 異なるパイロット間でSetSkillを共有
□投稿者/ ハク -(2005/07/30(Sat) 13:14:31) [ID:gz7VQwOo]
    ハクというものです。

    以下の方法で動作を確認しました。※Ａ→Ｂと変化するとしています

    =====

    Pilot Ｂ Level(Ａ)
    ExpUp Ｂ Info(Ａ, 累積経験値)

    For i = 1 To Info(パイロット, Ａ, 特殊能力数)
    　If Info(パイロット, Ｂ, 特殊能力所有, Info(パイロット, Ａ, 特殊能力, i) ) <> "1" Then
    　　If Info(パイロット, Ａ, 特殊能力レベル, i) = 1 Then
    　　　SetSkill Ｂ Info(パイロット, Ａ, 特殊能力, i) -1 Info(パイロット, Ａ, 特殊能力名称, i)
    　　Else
    　　　SetSkill Ｂ Info(パイロット, Ａ, 特殊能力, i) Info(パイロット, Ａ, 特殊能力レベル, i) Info(パイロット, Ａ, 特殊能力名称, i)
    　　EndIf
    　EndIf
    Next

    〜Ａを消してＢを乗せる〜

    =====

    ただし解説用のダミー特殊能力の継承は想定していません。
    その場合は別の処理が必要です(Info関数の特殊能力データ等を使用)

    とりあえずこれで試してみて下さい。それでは。
引用返信/返信 削除キー/
■17123 / inTopicNo.3) 　Re[2]: 異なるパイロット間でSetSkillを共有
□投稿者/ Wider -(2005/07/30(Sat) 22:21:12) [ID:wUnqpZj7]
    Widerです。

    ＞ハクさん

    コード使わせていただきました。望みどおりの動きを果たしてくれました。
    どうもありがとうございます。

    以上でこのツリーを解決済みとさせていただきます。
解決済み!
引用返信/返信 削除キー/


トピック内ページ移動 / << 0 >>

このトピックに書きこむ

過去ログには書き込み不可

Pass/

HOME HELP 新規作成 新着記事 トピック表示 検索 掲示板新着情報RSS配信新着情報 過去ログ

- Child Tree -
- Antispam Version -