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