告知欄です

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