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

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

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

■18027 / inTopicNo.1) 　撃墜数管理と性格の気力変化を混ぜてみたけど・・・
  ▼■
□投稿者/ RGM -(2006/02/18(Sat) 06:29:58) [ID:tXFZ0DTD]
    初めましてRGMです
    今シナリオ作りに挑戦中なのですが

    ＯＧの性格とエースボーナスを再現したいのですが上手くいきません

    以下のインクルを試すと現在やっているEve内のイベント(ターン 2 敵: とか)が作動してしまいます

    どなたか原因分かる方おられましたらお願いします

    *破壊 敵:
    *破壊 中立:
    *チェックです:
    ## 性格関連 ##########################################
    If Info(Pilot(相手パイロット), 性格) = "超強気" Then
    　IncreaseMorale 相手パイロット +1
    Goto 撃墜王
    EndIf

    〜略〜

    If Info(Pilot(相手パイロット), 性格) = "激情" Then
    　IncreaseMorale 相手パイロット+1
    Goto 撃墜王
    EndIf

    撃墜王:
    ## マップ兵器かチェック ########################
    If Info(ユニット,Unit(相手ユニット),武器,相手ユニット使用武器,属性所有,"Ｍ") = 1 Then
    Goto 敵処理
    Else
    EndIf

    ## ネームド・キャラかチェック ##################
    If Party(相手ユニット) = 味方 Then
    If Info(パイロット,愛称) = 海賊 Or 革命軍兵 Or テロリスト Then
    Goto 敵処理
    Else
    EndIf

    Incr 撃墜数[相手ユニット]
    Else
    Goto 敵処理
    EndIf

    ## Aceチェック #################################
    If 撃墜数[相手ユニット] = 50 Then
    Goto "相手ユニット"Ace
    Else
    Goto 敵処理
    Endif

    ## Aceボーナス #################################
    パイロットAce:
    Talk パイロット
    Talk
    パイロット.五十機撃墜達成
    Aceボーナス :ＡＣＥ
    End
    Item ＡＣＥ
    Equip パイロット ＡＣＥ
    Goto 敵処理

    敵処理:
    ForEach 敵

    　If Info(Pilot(), 性格) = "慎重" Then
    　　IncreaseMorale 1
    　EndIf
    〜略〜

    　If Info(Pilot(), 性格) = "激情" Then
    　　IncreaseMorale -1
    　EndIf

    Next
    Return
引用返信/返信 削除キー/
■18037 / inTopicNo.2) 　Re[1]: 撃墜数管理と性格の気力変化を混ぜてみたけど・・・
□投稿者/ 明けの明星 -(2006/02/18(Sat) 21:45:17) [ID:ptfKNni4]
    とりあえず、最後の一行ですが、これはExitが正しいかと。
    『Goto "相手ユニット"Ace』ですが、これは『パイロットAce:』を呼び出していると考えていいのでしょうか？ それならば、素直に『Goto "パイロットAce"』で良いのでは…？ 違っていたらすみません。
引用返信/返信 削除キー/
■18042 / inTopicNo.3) 　Re[2]: 撃墜数管理と性格の気力変化を混ぜてみたけど・・・
□投稿者/ RGM -(2006/02/19(Sun) 07:10:09) [ID:tXFZ0DTD]
    ■No18037に返信(明けの明星さんの記事)

    お返事ありがとうございます

    > とりあえず、最後の一行ですが、これはExitが正しいかと。

    Exit で試してみましたが撃墜数はカウントされませんでした・・・

    > 『Goto "相手ユニット"Ace』ですが、これは『パイロットAce:』を呼び出していると考えていいのでしょうか？ それならば、素直に『Goto "パイロットAce"』で良いのでは…？ 違っていたらすみません。

    これは例えばアムロなら“白い奴”、ラルなら“蒼い巨星”みたいな感じにしたいので
    アムロ＝レイAce:　ランバ＝ラルAce:　といった感じにしようとしているのですが・・・
    なにやらこれよりも簡単な式が出来そうな気がしてきました

    う〜んもう少し悩んでみます
引用返信/返信 削除キー/
■18043 / inTopicNo.4) 　Re[3]: 撃墜数管理と性格の気力変化を混ぜてみたけど・・・
□投稿者/ 明けの明星 -(2006/02/19(Sun) 08:47:59) [ID:ptfKNni4]
    大体理解しました。
    しかし、キャラ毎にイベントを作るのは非常に大変では…？
    以下に今回の動作で、自分なりに考えたものを書いておきます。仕様が間違っていたらすみません。

    #### ここから

    #ネームドキャラには特殊能力『ネームド』を付けておきます。

    *破壊 敵:
    *破壊 中立:

    #性格部分です。必要な分だけ追加してください。
    if (info(相手パイロット,性格) = "超強気") or _
    (info(相手パイロット,性格) = "激情") then
    increasemorale 相手パイロット 1
    endif

    #撃墜数部分です。
    if (party(相手ユニットＩＤ) = "味方") and _
    (info(ユニット,unit(相手ユニットＩＤ),武器,相手ユニット使用武器,属性所有,"Ｍ") != 1) and _
    (skill(相手パイロット,"ネームド") != 0) then
    incr 撃墜数[相手パイロット]
    if 撃墜数[相手パイロット] = 50 then
    call getACE 相手パイロット
    endif
    endif

    #敵処理をサブルーチンにしてcallします。
    #イベントラベル『敵処理』の最後がexitなら、callではなくgotoにします。
    call 敵処理
    exit

    getACE:
    talk args(1)
    talk
    $(args(1)).五十機撃墜達成
    Aceボーナス :ＡＣＥ
    end
    item ＡＣＥ
    equip args(1) ＡＣＥ
    return

    #### ここまで

    以上です。Ace取得時に表示するパイロット名が名称だと不都合がある場合、info関数で愛称を使用する等変更してください。

引用返信/返信 削除キー/
■18055 / inTopicNo.5) 　Re[4]: 撃墜数管理と性格の気力変化を混ぜてみたけど・・・
□投稿者/ ＲＧＭ -(2006/02/21(Tue) 20:15:21) [ID:iIi0vMly]
    問題解決しました
    明けの明星さんありがとうございました！！
解決済み!
引用返信/返信 削除キー/


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

このトピックに書きこむ

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

Pass/

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

- Child Tree -
- Antispam Version -