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

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

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

■4138 / inTopicNo.1) 　If〜Endifの対応
  ▼■
□投稿者/ 隼人 -(2002/06/25(Tue) 13:58:56)
http://isweb43.infoseek.co.jp/play/ha_ya_to/shop.eve
    以前相談に乗っていただいたルーチンを流用して汎用ショップインクルを組んだのですが、
    C:\SRC\シナリオ\少年たちの冒険(仮)\lib\shop.eve：78行目
    「」というアイテムは存在しません
    77: Else
    78: Item 商品[購入]
    79: Money (0 - 価格[購入])
    というメッセージで止まってしまいました。
    本来ここは品物を選択した後に通る部分ですが、品物のリストが出る前に発生しているので、If〜Endifの対応が取れてないのかとも思ったのですが、If文は全部ちゃんと正しい位置でEndifされているので、原因がわかりません。
    リンクにインクルをアップしましたので、気付いた点があれば教えていただけないでしょうか。
    このインクルは組み込んだ後、
    進入 味方 10 10:
    ショップ 商品ファイル 対象ユニット
    Exit
    のように呼んでいます。
    商品ファイルは"lib\ショップ\商品ファイル.txt"に置くファイルで、ここに商品の羅列を記述しておきます。
    よろしくお願いします。
引用返信/返信 削除キー/
■4141 / inTopicNo.2) 　Re[1]: If〜Endifの対応
□投稿者/ ヒロキ -(2002/06/25(Tue) 16:47:31)
    こんばんは、ヒロキです。

    >商品ファイルは"lib\ショップ\商品ファイル.txt"に置くファイルで、ここに商品の羅列を記述しておきます

    と書かれていますが、実際には

    >Open 店ファイル For 入力 As F

    となっているため、配列「品」への代入がされていないことが
    原因なんではねーかと思いますが。

    正しくは

    Open lib\ショップ\商品ファイル.txt For 入力 As F

    ですよね？

    それでは
引用返信/返信 削除キー/
■4142 / inTopicNo.3) 　Re[2]: If〜Endifの対応
□投稿者/ 隼人 -(2002/06/25(Tue) 16:52:36)
http://isweb43.infoseek.co.jp/play/ha_ya_to/shop.eve
    それはインクルの頭で設定しているんです。
    > 店ファイル = "lib\ショップ\" & Args(1) & ".txt"
    > Open 店ファイル For 入力 As F
    としていますので。
    一応選択肢リストが配列に入っているのは確認しています。
引用返信/返信 削除キー/
■4192 / inTopicNo.4) 　原因、判明しました。
□投稿者/ 隼人 -(2002/06/28(Fri) 11:03:16)
    原因判明しました。
    リストを作成する前段階の変数に商品名が格納されていたのは確認していたのですが、
    その後に実際の選択肢リストを作るところでうまくループが動いていませんでした。

    お騒がせしてすいません。
解決済み!
引用返信/返信 削除キー/


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

このトピックに書きこむ

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

Pass/

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

- Child Tree -
- Antispam Version -