ＳＲＣ質問掲示板Mk2 [One Topic All View / Re[6]: （合成インクル用）特定の能力を持ったアイテムをリストに載せる配列 / Page: 0]

ＳＲＣ質問掲示板Mk2
(現在過去ログ94 を表示中)

[ 最新記事及び返信フォームをトピックトップへ ]

■17217 / inTopicNo.1)

　（合成インクル用）特定の能力を持ったアイテムをリストに載せる配列

□投稿者/ （略して）将軍 -(2005/08/12(Fri) 19:28:01) [ID:TeC9LRqU]

どうも、（略して）将軍です
今回は、所有しているアイテムの中から特殊能力『素材アイテム』を持ったアイテムのみを配列に加えるといったインクルを作成しているのですが、どうもうまく動きません……
ヘルプを参考にしてみたのですが、素通りして終ってしまいます

#まず配列を初期化
UnSet アイテム

#所持しているアイテムの名前を配列に格納
For i = 1 To CountItem()
If Info([Item(i)], 特殊能力所有, 素材アイテム) = 1 Then
アイテム[i] = Item(i)
EndIf
Next

#アイテムの一覧を表示
Ask アイテム "アイテムを選んで下さい"

Switch 選択

Case 銀の指輪
Talk システム
ここでイベントを起こします
End

EndSw

Ｉｎｆｏ関数を使ってみたのですが、使い方間違ってましたでしょうか……？
それでは、どうかよろしくお願いします

引用返信/返信削除キー/

■17218 / inTopicNo.2)

　Re[1]: （合成インクル用）特定の能力を持ったアイテムをリストに載せる配列

▲▼■

□投稿者/ 黒茶 -(2005/08/12(Fri) 20:08:18) [ID:rAzKzOGG]

2005/08/12(Fri) 20:10:33 編集(投稿者)

> If Info([Item(i)], 特殊能力所有, 素材アイテム) = 1 Then

　ヘルプのInfo関数の書式に書かれている[データ区分,]は、省略可能を表すものです。

　この行の、[Item(i)], から、[]を消して、Item(i), にして見てください。

引用返信/返信削除キー/

■17219 / inTopicNo.3)

　Re[1]: （合成インクル用）特定の能力を持ったアイテムをリストに載せる配列

▲▼■

□投稿者/ axiom -(2005/08/12(Fri) 20:56:41) [ID:PuPwfwmg]
http://www.lilie.jp/itemworld/

今回の質問内容とは関係ないのですが、
配列名にＳＲＣで使われてる用語(予約語)を使うのは
避けたほうがいいです。

以前、Info関数の予約語に使われていることを知らずに
「最大アイテム数」という配列を使用していたことがありますが、
いざInfo関数で最大アイテム数を参照しようとしても
上手く参照できなかった経験があります。

…というわけなので、必要技能と装備個所で
システム的に使われてる「アイテム」という配列名は
変えたほうがいいんじゃないかと思います。

引用返信/返信削除キー/

■17221 / inTopicNo.4)

　Re[1]: （合成インクル用）特定の能力を持ったアイテムをリストに載せる配列

▲▼■

□投稿者/ （略して）将軍 -(2005/08/12(Fri) 21:50:41) [ID:TeC9LRqU]

黒茶さん、axiomさん、ご意見どうもありがとうございます
早速指摘された部分を訂正してみたのですが、やはり素通りしてしまいます
（イベントが起こらず、その下のContinueでインターミッション画面へ）
AskやCaseの方も、これでよろしいのでしょうか……？

引用返信/返信削除キー/

■17223 / inTopicNo.5)

　Re[1]: （合成インクル用）特定の能力を持ったアイテムをリストに載せる配列

▲▼■

□投稿者/ ギルフェイム -(2005/08/12(Fri) 22:25:38) [ID:vOxSMFrw]
http://www.geocities.jp/gillfame_rgb/

＞Switch 選択

この部分を

＞Switch アイテム[選択]

という風に変更してみてください。
おそらくこれで動作するようになるはずです。

引用返信/返信削除キー/

■17225 / inTopicNo.6)

　Re[2]: （合成インクル用）特定の能力を持ったアイテムをリストに載せる配列

▲▼■

□投稿者/ （略して）将軍 -(2005/08/12(Fri) 22:52:56) [ID:TeC9LRqU]

ギルフェイムさんすみません、やはり素通りしてしまいます

#まず配列を初期化
UnSet 合成

#所持しているアイテムの名前を配列に格納
For i = 1 To CountItem()
If Info(Item(i), 特殊能力所有, 素材アイテム) = 1 Then
合成[i] = Item(i)
EndIf
Next

#アイテムの一覧を表示
Ask 合成 "アイテムを選んで下さい"

Switch 合成[選択]

Case 銀の指輪
Talk システム
ここでイベントを起こします
End

EndSw

Continue

Exit

今までの意見を入れてみたのですが、まだおかしい所はあるでしょうか？

引用返信/返信削除キー/

■17226 / inTopicNo.7)

　Re[3]: （合成インクル用）特定の能力を持ったアイテムをリストに載せる配列

▲▼■

□投稿者/ ギルフェイム -(2005/08/12(Fri) 23:16:08) [ID:vOxSMFrw]
http://www.geocities.jp/gillfame_rgb/

＞For i = 1 To CountItem()
＞If Info(Item(i), 特殊能力所有, 素材アイテム) = 1 Then
＞合成[i] = Item(i)
＞EndIf
＞Next

この部分のCountItem関数やItem関数の引数の指定が間違っています。
この記述だとこれらの関数は正しく動作しません。
詳しくはヘルプをご覧ください。

引用返信/返信削除キー/

■17233 / inTopicNo.8)

　Re[4]: （合成インクル用）特定の能力を持ったアイテムをリストに載せる配列

▲▼■

□投稿者/ （略して）将軍 -(2005/08/13(Sat) 21:32:48) [ID:TeC9LRqU]

ギルフェイムさん、毎度どうもありがとうございます
CountItemとItemについて調べ、それらしい物をやってみたのですが
やはり素通りして終ってしまいます

#まず配列を初期化
UnSet 合成

#所持しているアイテムの名前を配列に格納
For i = 1 To CountItem(未装備)
If Info(Item(未装備, i), 特殊能力所有, 素材アイテム) = 1 Then
合成[i] = Item(未装備, i)
EndIf
Next

#アイテムの一覧を表示
Ask 合成 "アイテムを選んで下さい"

Switch 合成[選択]

Case 銀の指輪
Talk システム
ここでイベントを起こします
End

EndSw

失敗している点は、未装備の所だけではなかったのでしょうか……？

引用返信/返信削除キー/

■17235 / inTopicNo.9)

　Re[5]: （合成インクル用）特定の能力を持ったアイテムをリストに載せる配列

▲▼■

□投稿者/ axiom -(2005/08/13(Sat) 23:36:33) [ID:PuPwfwmg]
http://www.lilie.jp/itemworld/

う～ん。見た目は問題なさそうですね。
とりあえず、データ区分を省略せずに書いてみてください。

> If Info(Item(未装備, i), 特殊能力所有, 素材アイテム) = 1 Then

ここを
　If Info(アイテム, Item(未装備,i), 特殊能力所有, 素材アイテム) Then
にする。

それと、もう１点だけ。
「素材アイテム」という特殊能力が別名になってないでしょうか？

OK: 素材アイテム=非表示
NG: ダミー特殊能力=素材アイテム

別名をInfo関数で指定しても参照されませんので
ご注意下さい。

引用返信/返信削除キー/

■17236 / inTopicNo.10)

　Re[6]: （合成インクル用）特定の能力を持ったアイテムをリストに載せる配列

▲▼■

□投稿者/ （略して）将軍 -(2005/08/14(Sun) 00:50:51) [ID:TeC9LRqU]

axiomさん、どうもありがとうございます、無事に動きました
質問に答えてくださった皆様、どうもありがとうございました

解決済み!

引用返信/返信削除キー/

トピック内ページ移動 / << 0 >>

このトピックに書きこむ

過去ログには書き込み不可

HOME HELP 新規作成新着記事トピック表示検索新着情報過去ログ

- Child Tree -
- Antispam Version -