板 1- 前 次 新 レス
どんなくだらねぇ質問にもマジレスするスレPart13
[816]名無しさん(ザコ):2007/04/15(日) 10:19:27 ID:uKkWqvjQ0
For i = 1 To CountItem(未装備)
Set あいてむ一覧[i] = Item(未装備,i)
Next
これで装備してないアイテムのリストを作れる。
装備してるアイテムも取得するならForEachのユニット一覧を使って
ユニット1つずつ順番にリストに加える処理をしていく。
前 次
0ch BBS 2005-06-05