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

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

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

このトピックに書きこむ

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

■8730 / inTopicNo.1) 　Re[2]: シナリオのタイトル
  ▼■
□投稿者/ アスキラ -(2003/06/09(Mon) 23:36:52)
    Helpの各イベントコマンドの説明もじっくり読んで
    理解できましたシャアペンさんのわかりやすいやり方も勉強になりましたね。
    ありがとうございます。
解決済み!
引用返信/返信 削除キー/
■8728 / inTopicNo.2) 　Re[1]: シナリオのタイトル
□投稿者/ シャアペン -(2003/06/09(Mon) 22:00:23)
http://charpen-web.hp.infoseek.co.jp
    　私のほうから１つ意見を…
    この場合、わざわざこのような面倒な方法を取らずとも…

    タイトル:
    Night
    StartBGM Subtitle.mid
    Wait 5
    For i = 1 To 10
    Font 24pt RGB(25 * i, 25 * i, 25 * i) Italic
    PaintString - 160 Args(1)
    PaintString - 260 Args(2)
    Refresh
    Wait 1
    Next
    Wait 40
    ClearPicture
    If (Args(3) <> 夜) Then
    Noon
    Endif
    Font
    Return

    　というインクルードを組んでDataフォルダに入れておき…
    If クリアー数 = 3 then
    タイトル 第４話 決別 昼
    ElseIf クリアー数 = 2 then
    タイトル 第３話 決別 昼
    Else
    タイトル 第２話 決別 昼
    Endif

    としてもよろしいのではないかと思います
引用返信/返信 削除キー/
■8727 / inTopicNo.3) 　Re[1]: シナリオのタイトル
□投稿者/ 幻魔の公子 -(2003/06/09(Mon) 21:39:45)
    　幻魔の公子です。


    　Refreshコマンドを使用しないと、PaintPictureコマンドの描画結果は表示されません。
    　また、各ラベルをExitしないと、第2話のあとで第3話、第4話と続けて実行されることになります。

    　詳しくは、Helpの各イベントコマンドの説明を参照してください。
    　PaintPictureコマンドのあとでRefreshコマンドを使わなければならないことなどもきちんと書いてありますので。


    　それでは。

引用返信/返信 削除キー/
■8726 / inTopicNo.4) 　シナリオのタイトル
□投稿者/ アスキラ -(2003/06/09(Mon) 21:35:04)
    こんばんわアスキラですが
    シナリオのクリアー数でタイトル表示を変えたいのですが
    以下のテキストですとうまくいきません誰か細かい修正を教えてください

    If クリアー数 >= 3 Goto 第４話
    If クリアー数 >= 2 Goto 第３話
    If クリアー数 >= 1 Goto 第２話

    第２話:
    Night
    StartBGM Subtitle.mid
    Wait 5
    For i = 1 To 10
    Font 24pt RGB(25 * i, 25 * i, 25 * i) Italic
    PaintString - 160 第2話
    PaintString - 260 決別
    Wait 1
    Next
    Wait 40
    Noon
    ClearPicture

    第３話:
    Night
    StartBGM Subtitle.mid
    Wait 5
    For i = 1 To 10
    Font 24pt RGB(25 * i, 25 * i, 25 * i) Italic
    PaintString - 160 第3話
    PaintString - 260 決別
    Wait 1
    Next
    Wait 40
    Noon
    ClearPicture

    第４話:
    Night
    StartBGM Subtitle.mid
    Wait 5
    For i = 1 To 10
    Font 24pt RGB(25 * i, 25 * i, 25 * i) Italic
    PaintString - 160 第4話
    PaintString - 260 決別
    Wait 1
    Next
    Wait 40
    Noon
    ClearPicture


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


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

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

- Child Tree -
- Antispam Version -