| 私はロデオマンモスです。
↓サブルーチンコール ItemMaking ドラゴンシールド 生成 6 ↑サブルーチンコール
↓サブルーチンここから ItemMaking: Local Eval("$(Args(1))のIDナンバー前回最終値") Eval("$(Args(1))のIDナンバー前回最終値") = Eval("$(Args(1))のIDナンバー") Switch Args(2) Case 生成 For アイテム生成数 = 1 To Args(3) Item Args(1) Eval("$(Args(1))のIDナンバー修正値") = Args(3) Eval("$(Args(1))装備状況[$(Eval("$(Args(1))のIDナンバー前回最終値") + $(アイテム生成数))]") = 未装備 Next EndSw Eval("$(Args(1))のIDナンバー") = Eval("$(Args(1))のIDナンバー前回最終値") + Eval("$(Args(1))のIDナンバー修正値") Return ↑サブルーチンここまで
上記のサブルーチンは独自のアイテムIDを設定しつつ、 アイテムを複数生成するための処理です。
生成については何の問題も起きていないのですが、 ID設定時に問題が起きました。
3度サブルーチンコールを行い、確認しましたが、 結果は以下のようになります。
・ドラゴンシールド18個(正常) ・ドラゴンシールドのIDナンバー(内容は「18」・正常) ・ドラゴンシールド装備状況(インデックスが6のもののみ存在・異常) (正常時はインデックスが1〜18が存在)
どこが悪いのでしょうか。
注意:このサブルーチンは先に 「ドラゴンシールドのIDナンバー」 「ドラゴンシールド装備状況」 という名前でGlobalコマンドを使用してから使ってください。
|