| お久しぶりです、氷漬けです。
今、製作中のシナリオが四部仕立てで第一部がいよいよ終了するのですが、次の第二部序・中盤は第一部と平行した時間軸で展開していくので第一部のメンバーが合流するまで第一部の資金とアイテムを一時的に凍結するつもりで製作しています。
で、資金の方は
第一部残金 = 資金 資金 = 0
アイテムのほうは
For i = 1 To CountItem(未装備) If (IsVarDefined(第一部アイテム残り[Eval(Item(未装備, i))]) = 0) Then 第一部アイテム残り[Eval(Item(未装備, i))] = 1 Else 第一部アイテム残り[Eval(Item(未装備, i))] = 第一部アイテム残り[Eval(Item(未装備, i))] + 1 EndIf Next
とすることで 第一部アイテム残り[アイテム名] = アイテム数 と言った形でグローバル変数に残すことはできます。
が、アイテム削除は上手い方法が思いつかず、その上
Money 第一部残金
と入れても資金が戻ってきませんでした。
何かいい解決法がありましたらご教授願いたく存じます
|