SRC質問掲示板Mk2
(現在 過去ログ68 を表示中)

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

[ 親記事をトピックトップへ ]

このトピックに書きこむ

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

■12873 / inTopicNo.1)  Re[2]: レンタルシステム
  
□投稿者/ Chico -(2004/03/15(Mon) 16:30:21)
    どうもありがとうございます。
    正常にさどうしました。
解決済み!
引用返信/返信 削除キー/
■12868 / inTopicNo.2)  Re[1]: レンタルシステム
□投稿者/ TomTom -(2004/03/14(Sun) 22:35:21)
    TomTomです。

    >Ask "兵士" "誰を借りますか?" "拡大"

    これでは、兵士という「文字」そして認識されてしまいます。
    実際には兵士という「変数」を指定したいので、

     Ask 兵士 "誰を借りますか?" 拡大

    このような形にしてください。
    「拡大」などのコマンドの各種オプションも、""で括らずに指定したほうが良いでしょう。


引用返信/返信 削除キー/
■12867 / inTopicNo.3)  レンタルシステム
□投稿者/ Chico -(2004/03/14(Sun) 22:03:00)
    どうも。Chicoです。
    今回はSetしたはずが表示されない、という状況が解決できないのです。
    兵士という変数を作り、それをAskにて選択するのですが表示してくれません。
    ソースを貼り付けますので、どうかアドバイスをお願いします。


    スタート:
    If 初回撃墜 = 1 Then
    Global 兵士
    Global 乗り
    Global 借賃
    Switch Random(3)
    Case 1
    Set 兵士[アレクサンドラ=イノリ] "アレクサンドラ=イノリ"
    Set 乗り[アレクサンドラ=イノリ] "MS"
    Set 借賃[アレクサンドラ=イノリ] "2000"
    Set 兵士[マコト=サウス] "マコト=サウス"
    Set 乗り[マコト=サウス] "戦艦"
    Set 借賃[マコト=サウス] "1500"
    Set 兵士[クリス=ウォータ] "クリス=ウォータ"
    Set 乗り[クリス=ウォータ] "MS"
    Set 借賃[クリス=ウォータ] "2000"
    Set 兵士[終了] "終了"
    Talk システム
    OK!パターン1!
    End
    Case 2
    Set 兵士[セルフィ=アラス] "セルフィ=アラス"
    Set 乗り[セルフィ=アラス] "MS MSサポート"
    Set 借賃[セルフィ=アラス] "2000"
    Set 兵士[EBDS(汎用)] "EBDS"
    Set 乗り[EBDS(汎用)] "MS"
    Set 借賃[EBDS(汎用)] "1000"
    Set 兵士[オコゼー=リー] "クリス=ウォータ"
    Set 乗り[オコゼー=リー] "MS"
    Set 借賃[オコゼー=リー] "2500"
    Set 兵士[終了] "終了"
    Talk システム
    OK!パターン2!
    End
    Case 3
    Set 兵士[サリエル=グローランス] "サリエル=グローランス"
    Set 乗り[サリエル=グローランス] "MS PT"
    Set 借賃[サリエル=グローランス] "3000"
    Set 兵士[ラース=クラウド=ラース] "ラース=クラウド=ラース"
    Set 乗り[ラース=クラウド=ラース] "MS"
    Set 借賃[ラース=クラウド=ラース] "3000"
    Set 兵士[オコゼー=リー] "クリス=ウォータ"
    Set 乗り[オコゼー=リー] "MS"
    Set 借賃[オコゼー=リー] "2500"
    Set 兵士[終了] "終了"
    Talk システム
    OK!パターン3!
    End
    EndSw
    EndIf

    本番:

    Ask "兵士" "誰を借りますか?" "拡大"
    Set レンタル兵士 選択
    If 選択 = 終了 Then
    Continue
    Else
    Talk レンタル兵士
    Talk
    搭乗ユニット:$(兵士[レンタル兵士]);搭乗ユニット:$(乗り[レンタル兵士]);レンタル代 :$(借賃[レンタル兵士])
    この人でいいですか?
    End
    Ask OK?
    はい
    いいえ
    End
    Switch 選択
    Case 1
    Pilot レンタル兵士 5
    Talk
    レンタルしました。
    End
    UnSet 兵士[レンタル兵士]
    UnSet 乗り[レンタル兵士]
    UnSet 借賃[レンタル兵士]
    UnSet レンタル兵士
    Case 2
    Goto "本番"
    EndSw
    EndIf
    Exit




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



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

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

- Child Tree -
- Antispam Version -