@エターナルメロディ
@エターナルメロディ拡張データ
#主人公特訓システム
#IntermissionCommand スケジュール Data\エターナルメロディ拡張データ\主人公特訓.eve
#で追加して下さい

プロローグ:

If 初めての特訓 = 1 Then
StartBGM EternalMelody.mid
StartBGM EternalMelody_Intermission.mid
StartBGM EM_Intermission.mid
Show
Talk フィリー(ＥＭ)
はいは〜い、よく聞いてね〜
ここでは、お金を使って;アンタの能力をＵＰすることができるの
それぞれ一回実行するごとに;１づつ上昇するんだけど…
なんとタマ〜に大成功して;２上昇しちゃったりするわけよ。
ま、失敗する事もあるんだけどね〜
ちなみにちょうどお金が0になると;バグるから注意しなさいよ
End
 Else
StartBGM EternalMelody.mid
Show
Talk フィリー(ＥＭ)
はいは〜い、よく聞いてね〜
ここでは、お金を使って;アンタの能力をＵＰすることができるの
それぞれ一回実行するごとに;１づつ上昇するんだけど…
なんとタマ〜に大成功して;２上昇しちゃったりするわけよ。
ま、失敗する事もあるんだけどね〜
ちなみにちょうどお金が0になると;バグるから注意しなさいよ
End

Global 初めての特訓
Set 初めての特訓 1
Global 筋トレ回数
Set 筋トレ回数 1
Global 勉強回数
Set 勉強回数 1
Global ダッシュ回数
Set ダッシュ回数 1
Global ダッシュ回数
Set ダッシュ回数 1
Global 手作業回数
Set 手作業回数 1
Global おしゃれ回数
Set おしゃれ回数 1
Global お祈り回数
Set お祈り回数 1
Endif



主人公(ＥＭ)特訓:
Talk システム
現在の資金$(資金)
End
Ask なにをしますか？
スケジュール
スケジュールメニュー
インターミッションに戻る
End
Switch 選択
Case 1
Ask どれにしますか？　　　
筋トレ               $(1000 * 筋トレ回数)
勉強                 $(1000 * 勉強回数)
ダッシュ             $(2700 * ダッシュ回数)
手作業               $(2400 * 手作業回数)
おしゃれ             $(3000 * おしゃれ回数)
お祈り               $(1800 * お祈り回数)
やめる
End
    If 選択 = 1 Then
パターン = Random(10)
If パターン = 1 Then
        If 資金 > (1000 * (筋トレ回数)) Then
        SetAbility 主人公(ＥＭ) 格闘ＵＰ (Skill(主人公(ＥＭ),格闘ＵＰ) + 1)
         Money (-1000 * (筋トレ回数))
        Incr 筋トレ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の格闘値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (筋トレ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 2 Then
        If 資金 > (1000 * (筋トレ回数)) Then
        SetAbility 主人公(ＥＭ) 格闘ＵＰ (Skill(主人公(ＥＭ),格闘ＵＰ) + 1)
         Money (-1000 * (筋トレ回数))
        Incr 筋トレ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の格闘値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (筋トレ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 3 Then
        If 資金 > (1000 * (筋トレ回数)) Then
        SetAbility 主人公(ＥＭ) 格闘ＵＰ (Skill(主人公(ＥＭ),格闘ＵＰ) + 1)
         Money (-1000 * (筋トレ回数))
        Incr 筋トレ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の格闘値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (筋トレ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 4 Then
        If 資金 > (1000 * (筋トレ回数)) Then
        SetAbility 主人公(ＥＭ) 格闘ＵＰ (Skill(主人公(ＥＭ),格闘ＵＰ) + 1)
         Money (-1000 * (筋トレ回数))
        Incr 筋トレ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の格闘値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (筋トレ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 5 Then
        If 資金 > (1000 * (筋トレ回数)) Then
        SetAbility 主人公(ＥＭ) 格闘ＵＰ (Skill(主人公(ＥＭ),格闘ＵＰ) + 1)
         Money (-1000 * (筋トレ回数))
        Incr 筋トレ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の格闘値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (筋トレ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 6 Then
        If 資金 > (1000 * (筋トレ回数)) Then
        SetAbility 主人公(ＥＭ) 格闘ＵＰ (Skill(主人公(ＥＭ),格闘ＵＰ) + 1)
         Money (-1000 * (筋トレ回数))
        Incr 筋トレ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の格闘値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (筋トレ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 7 Then
        If 資金 > (1000 * (筋トレ回数)) Then
        SetAbility 主人公(ＥＭ) 格闘ＵＰ (Skill(主人公(ＥＭ),格闘ＵＰ) + 1)
         Money (-1000 * (筋トレ回数))
        Incr 筋トレ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の格闘値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (筋トレ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 8 Then
        If 資金 > (1000 * (筋トレ回数)) Then
        SetAbility 主人公(ＥＭ) 格闘ＵＰ (Skill(主人公(ＥＭ),格闘ＵＰ) + 1)
         Money (-1000 * (筋トレ回数))
        Incr 筋トレ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の格闘値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (筋トレ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 9 Then
        If 資金 > (1000 * (筋トレ回数)) Then
         Money (-1000 * (筋トレ回数))
        Talk システム
        <COLOR=RGB(0,0,255)>特訓失敗;<COLOR=RGB(0,0,0)>$(主人公(ＥＭ)愛称)の格闘値は上昇しませんでした;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (筋トレ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 10 Then
        If 資金 > (1000 * (筋トレ回数)) Then
        SetAbility 主人公(ＥＭ) 格闘ＵＰ (Skill(主人公(ＥＭ),格闘ＵＰ) + 2)
         Money (-1000 * (筋トレ回数))
        Incr 筋トレ回数 1
        Talk システム
        <COLOR=RGB(255,0,0)>特訓大成功;<COLOR=RGB(0,0,0)><COLOR=RGB(0,0,0)>$(主人公(ＥＭ)愛称)の格闘値が2上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (筋トレ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf

EndIf
    If 選択 = 2 Then
パターン = Random(10)
If パターン = 1 Then
        If 資金 > (1000 * (勉強回数)) Then
        SetAbility 主人公(ＥＭ) 射撃ＵＰ (Skill(主人公(ＥＭ),射撃ＵＰ) + 1)
         Money (-1000 * (勉強回数))
        Incr 勉強回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の魔力値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (勉強回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 2 Then
        If 資金 > (1000 * (勉強回数)) Then
        SetAbility 主人公(ＥＭ) 射撃ＵＰ (Skill(主人公(ＥＭ),射撃ＵＰ) + 1)
         Money (-1000 * (勉強回数))
        Incr 勉強回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の魔力値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (勉強回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 3 Then
        If 資金 > (1000 * (勉強回数)) Then
        SetAbility 主人公(ＥＭ) 射撃ＵＰ (Skill(主人公(ＥＭ),射撃ＵＰ) + 1)
         Money (-1000 * (勉強回数))
        Incr 勉強回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の魔力値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (勉強回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 4 Then
        If 資金 > (1000 * (勉強回数)) Then
        SetAbility 主人公(ＥＭ) 射撃ＵＰ (Skill(主人公(ＥＭ),射撃ＵＰ) + 1)
         Money (-1000 * (勉強回数))
        Incr 勉強回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の魔力値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (勉強回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 5 Then
        If 資金 > (1000 * (勉強回数)) Then
        SetAbility 主人公(ＥＭ) 射撃ＵＰ (Skill(主人公(ＥＭ),射撃ＵＰ) + 1)
         Money (-1000 * (勉強回数))
        Incr 勉強回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の魔力値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (勉強回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 6 Then
        If 資金 > (1000 * (勉強回数)) Then
        SetAbility 主人公(ＥＭ) 射撃ＵＰ (Skill(主人公(ＥＭ),射撃ＵＰ) + 1)
         Money (-1000 * (勉強回数))
        Incr 勉強回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の魔力値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (勉強回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 7 Then
        If 資金 > (1000 * (勉強回数)) Then
        SetAbility 主人公(ＥＭ) 射撃ＵＰ (Skill(主人公(ＥＭ),射撃ＵＰ) + 1)
         Money (-1000 * (勉強回数))
        Incr 勉強回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の魔力値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (勉強回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 8 Then
        If 資金 > (1000 * (勉強回数)) Then
        SetAbility 主人公(ＥＭ) 射撃ＵＰ (Skill(主人公(ＥＭ),射撃ＵＰ) + 1)
         Money (-1000 * (勉強回数))
        Incr 勉強回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の魔力値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (勉強回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 9 Then
        If 資金 > (1000 * (勉強回数)) Then
         Money (-1000 * (勉強回数))
        Talk システム
        <COLOR=RGB(0,0,255)>特訓失敗;<COLOR=RGB(0,0,0)>$(主人公(ＥＭ)愛称)の魔力値は上昇しませんでした;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (勉強回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 10 Then
        If 資金 > (1000 * (勉強回数)) Then
        SetAbility 主人公(ＥＭ) 射撃ＵＰ (Skill(主人公(ＥＭ),射撃ＵＰ) + 2)
         Money (-1000 * (勉強回数))
        Incr 勉強回数 1
        Talk システム
        <COLOR=RGB(255,0,0)>特訓大成功;<COLOR=RGB(0,0,0)>$(主人公(ＥＭ)愛称)の魔力値が2上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1000 * (勉強回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf

EndIf
    If 選択 = 3 Then
パターン = Random(10)
If パターン = 1 Then
        If 資金 > (2700 * (ダッシュ回数)) Then
        SetAbility 主人公(ＥＭ) 命中ＵＰ (Skill(主人公(ＥＭ),命中ＵＰ) + 1)
        SetAbility 主人公(ＥＭ) 回避ＵＰ (Skill(主人公(ＥＭ),回避ＵＰ) + 1)
        Money (-1800 * (ダッシュ回数))
        Incr ダッシュ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の命中・回避値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (ダッシュ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 2 Then
        If 資金 > (2700 * (ダッシュ回数)) Then
        SetAbility 主人公(ＥＭ) 命中ＵＰ (Skill(主人公(ＥＭ),命中ＵＰ) + 1)
        SetAbility 主人公(ＥＭ) 回避ＵＰ (Skill(主人公(ＥＭ),回避ＵＰ) + 1)
        Money (-1800 * (ダッシュ回数))
        Incr ダッシュ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の命中・回避値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (ダッシュ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 3 Then
        If 資金 > (2700 * (ダッシュ回数)) Then
        SetAbility 主人公(ＥＭ) 命中ＵＰ (Skill(主人公(ＥＭ),命中ＵＰ) + 1)
        SetAbility 主人公(ＥＭ) 回避ＵＰ (Skill(主人公(ＥＭ),回避ＵＰ) + 1)
        Money (-1800 * (ダッシュ回数))
        Incr ダッシュ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の命中・回避値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (ダッシュ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 4 Then
        If 資金 > (2700 * (ダッシュ回数)) Then
        SetAbility 主人公(ＥＭ) 命中ＵＰ (Skill(主人公(ＥＭ),命中ＵＰ) + 1)
        SetAbility 主人公(ＥＭ) 回避ＵＰ (Skill(主人公(ＥＭ),回避ＵＰ) + 1)
        Money (-1800 * (ダッシュ回数))
        Incr ダッシュ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の命中・回避値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (ダッシュ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 5 Then
        If 資金 > (2700 * (ダッシュ回数)) Then
        SetAbility 主人公(ＥＭ) 命中ＵＰ (Skill(主人公(ＥＭ),命中ＵＰ) + 1)
        SetAbility 主人公(ＥＭ) 回避ＵＰ (Skill(主人公(ＥＭ),回避ＵＰ) + 1)
        Money (-1800 * (ダッシュ回数))
        Incr ダッシュ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の命中・回避値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (ダッシュ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 6 Then
        If 資金 > (2700 * (ダッシュ回数)) Then
        SetAbility 主人公(ＥＭ) 命中ＵＰ (Skill(主人公(ＥＭ),命中ＵＰ) + 1)
        SetAbility 主人公(ＥＭ) 回避ＵＰ (Skill(主人公(ＥＭ),回避ＵＰ) + 1)
        Money (-1800 * (ダッシュ回数))
        Incr ダッシュ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の命中・回避値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (ダッシュ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 7 Then
        If 資金 > (2700 * (ダッシュ回数)) Then
        SetAbility 主人公(ＥＭ) 命中ＵＰ (Skill(主人公(ＥＭ),命中ＵＰ) + 1)
        SetAbility 主人公(ＥＭ) 回避ＵＰ (Skill(主人公(ＥＭ),回避ＵＰ) + 1)
        Money (-1800 * (ダッシュ回数))
        Incr ダッシュ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の命中・回避値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (ダッシュ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 8 Then
        If 資金 > (2700 * (ダッシュ回数)) Then
        SetAbility 主人公(ＥＭ) 命中ＵＰ (Skill(主人公(ＥＭ),命中ＵＰ) + 1)
        SetAbility 主人公(ＥＭ) 回避ＵＰ (Skill(主人公(ＥＭ),回避ＵＰ) + 1)
        Money (-1800 * (ダッシュ回数))
        Incr ダッシュ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の命中・回避値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (ダッシュ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 9 Then
        If 資金 > (2700 * (ダッシュ回数)) Then
        Money (-1800 * (ダッシュ回数))
        Talk システム
        <COLOR=RGB(0,0,255)>特訓失敗;<COLOR=RGB(0,0,0)>$(主人公(ＥＭ)愛称)の命中値は上昇しませんでした;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (ダッシュ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 10 Then
        If 資金 > (2700 * (ダッシュ回数)) Then
        SetAbility 主人公(ＥＭ) 命中ＵＰ (Skill(主人公(ＥＭ),命中ＵＰ) + 2)
        SetAbility 主人公(ＥＭ) 回避ＵＰ (Skill(主人公(ＥＭ),回避ＵＰ) + 2)
        Money (-1800 * (ダッシュ回数))
        Incr ダッシュ回数 1
        Talk システム
        <COLOR=RGB(255,0,0)>特訓大成功;<COLOR=RGB(0,0,0)><COLOR=RGB(0,0,0)>$(主人公(ＥＭ)愛称)の命中・回避値が2上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (ダッシュ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf

EndIf
    If 選択 = 4 Then
パターン = Random(10)
If パターン = 1 Then
        If 資金 > (2400 * (手作業回数)) Then
        SetAbility 主人公(ＥＭ) 技量ＵＰ (Skill(主人公(ＥＭ),技量ＵＰ) + 1)
        Money (-2400 * (手作業回数))
        Incr 手作業回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の技量値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (2400 * (手作業回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 2 Then
        If 資金 > (2400 * (手作業回数)) Then
        SetAbility 主人公(ＥＭ) 技量ＵＰ (Skill(主人公(ＥＭ),技量ＵＰ) + 1)
        Money (-2400 * (手作業回数))
        Incr 手作業回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の技量値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (2400 * (手作業回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 3 Then
        If 資金 > (2400 * (手作業回数)) Then
        SetAbility 主人公(ＥＭ) 技量ＵＰ (Skill(主人公(ＥＭ),技量ＵＰ) + 1)
        Money (-2400 * (手作業回数))
        Incr 手作業回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の技量値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (2400 * (手作業回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 4 Then
        If 資金 > (2400 * (手作業回数)) Then
        SetAbility 主人公(ＥＭ) 技量ＵＰ (Skill(主人公(ＥＭ),技量ＵＰ) + 1)
        Money (-2400 * (手作業回数))
        Incr 手作業回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の技量値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (2400 * (手作業回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 5 Then
        If 資金 > (2400 * (手作業回数)) Then
        SetAbility 主人公(ＥＭ) 技量ＵＰ (Skill(主人公(ＥＭ),技量ＵＰ) + 1)
        Money (-2400 * (手作業回数))
        Incr 手作業回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の技量値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (2400 * (手作業回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 6 Then
        If 資金 > (2400 * (手作業回数)) Then
        SetAbility 主人公(ＥＭ) 技量ＵＰ (Skill(主人公(ＥＭ),技量ＵＰ) + 1)
        Money (-2400 * (手作業回数))
        Incr 手作業回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の技量値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (2400 * (手作業回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 7 Then
        If 資金 > (2400 * (手作業回数)) Then
        SetAbility 主人公(ＥＭ) 技量ＵＰ (Skill(主人公(ＥＭ),技量ＵＰ) + 1)
        Money (-2400 * (手作業回数))
        Incr 手作業回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の技量値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (2400 * (手作業回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 8 Then
        If 資金 > (2400 * (手作業回数)) Then
        SetAbility 主人公(ＥＭ) 技量ＵＰ (Skill(主人公(ＥＭ),技量ＵＰ) + 1)
        Money (-2400 * (手作業回数))
        Incr 手作業回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の技量値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (2400 * (手作業回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 9 Then
        If 資金 > (2400 * (手作業回数)) Then
        Money (-2400 * (手作業回数))
        Talk システム
        <COLOR=RGB(0,0,255)>特訓失敗;<COLOR=RGB(0,0,0)>$(主人公(ＥＭ)愛称)の技量値は上昇しませんでした;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (2400 * (手作業回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 10 Then
        If 資金 > (2400 * (手作業回数)) Then
        SetAbility 主人公(ＥＭ) 技量ＵＰ (Skill(主人公(ＥＭ),技量ＵＰ) + 2)
        Money (-2400 * (手作業回数))
        Incr 手作業回数 1
        Talk システム
        <COLOR=RGB(255,0,0)>修行大成功;<COLOR=RGB(0,0,0)><COLOR=RGB(0,0,0)>$(主人公(ＥＭ)愛称)の技量値が2上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (2400 * (手作業回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf

EndIf
    If 選択 = 5 Then
パターン = Random(10)
If パターン = 1 Then
        If 資金 > (3000 * (おしゃれ回数)) Then
        SetAbility 主人公(ＥＭ) 反応ＵＰ (Skill(主人公(ＥＭ),反応ＵＰ) + 1)
        Money (-3000 * (おしゃれ回数))
        Incr おしゃれ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の反応値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (3000 * (おしゃれ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 2 Then
        If 資金 > (3000 * (おしゃれ回数)) Then
        SetAbility 主人公(ＥＭ) 反応ＵＰ (Skill(主人公(ＥＭ),反応ＵＰ) + 1)
        Money (-3000 * (おしゃれ回数))
        Incr おしゃれ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の反応値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (3000 * (おしゃれ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 3 Then
        If 資金 > (3000 * (おしゃれ回数)) Then
        SetAbility 主人公(ＥＭ) 反応ＵＰ (Skill(主人公(ＥＭ),反応ＵＰ) + 1)
        Money (-3000 * (おしゃれ回数))
        Incr おしゃれ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の反応値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (3000 * (おしゃれ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 4 Then
        If 資金 > (3000 * (おしゃれ回数)) Then
        SetAbility 主人公(ＥＭ) 反応ＵＰ (Skill(主人公(ＥＭ),反応ＵＰ) + 1)
        Money (-3000 * (おしゃれ回数))
        Incr おしゃれ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の反応値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (3000 * (おしゃれ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 5 Then
        If 資金 > (3000 * (おしゃれ回数)) Then
        SetAbility 主人公(ＥＭ) 反応ＵＰ (Skill(主人公(ＥＭ),反応ＵＰ) + 1)
        Money (-3000 * (おしゃれ回数))
        Incr おしゃれ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の反応値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (3000 * (おしゃれ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 6 Then
        If 資金 > (3000 * (おしゃれ回数)) Then
        SetAbility 主人公(ＥＭ) 反応ＵＰ (Skill(主人公(ＥＭ),反応ＵＰ) + 1)
        Money (-3000 * (おしゃれ回数))
        Incr おしゃれ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の反応値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (3000 * (おしゃれ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 7 Then
        If 資金 > (3000 * (おしゃれ回数)) Then
        SetAbility 主人公(ＥＭ) 反応ＵＰ (Skill(主人公(ＥＭ),反応ＵＰ) + 1)
        Money (-3000 * (おしゃれ回数))
        Incr おしゃれ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の反応値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (3000 * (おしゃれ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 8 Then
        If 資金 > (3000 * (おしゃれ回数)) Then
        SetAbility 主人公(ＥＭ) 反応ＵＰ (Skill(主人公(ＥＭ),反応ＵＰ) + 1)
        Money (-3000 * (おしゃれ回数))
        Incr おしゃれ回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)の反応値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (3000 * (おしゃれ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 9 Then
        If 資金 > (3000 * (おしゃれ回数)) Then
        Money (-3000 * (おしゃれ回数))
        Talk システム
        <COLOR=RGB(0,0,255)>特訓失敗;<COLOR=RGB(0,0,0)>$(主人公(ＥＭ)愛称)の反応値は上昇しませんでした;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (3000 * (おしゃれ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 10 Then
        If 資金 > (3000 * (おしゃれ回数)) Then
        SetAbility 主人公(ＥＭ) 反応ＵＰ (Skill(主人公(ＥＭ),反応ＵＰ) + 2)
        Money (-3000 * (おしゃれ回数))
        Incr おしゃれ回数 1
        Talk システム
        <COLOR=RGB(255,0,0)>特訓大成功;<COLOR=RGB(0,0,0)>$(主人公(ＥＭ)愛称)の反応値が2上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (3000 * (おしゃれ回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf

EndIf
    If 選択 = 6 Then
パターン = Random(10)
If パターン = 1 Then
        If 資金 > (1800 * (お祈り回数)) Then
        SetAbility 主人公(ＥＭ) ＳＰＵＰ (Skill(主人公(ＥＭ),ＳＰＵＰ) + 1)
        Money (-1800 * (お祈り回数))
        Incr お祈り回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)のＳＰ値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (お祈り回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 2 Then
        If 資金 > (1800 * (お祈り回数)) Then
        SetAbility 主人公(ＥＭ) ＳＰＵＰ (Skill(主人公(ＥＭ),ＳＰＵＰ) + 1)
        Money (-1800 * (お祈り回数))
        Incr お祈り回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)のＳＰ値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (お祈り回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 3 Then
        If 資金 > (1800 * (お祈り回数)) Then
        SetAbility 主人公(ＥＭ) ＳＰＵＰ (Skill(主人公(ＥＭ),ＳＰＵＰ) + 1)
        Money (-1800 * (お祈り回数))
        Incr お祈り回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)のＳＰ値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (お祈り回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 4 Then
        If 資金 > (1800 * (お祈り回数)) Then
        SetAbility 主人公(ＥＭ) ＳＰＵＰ (Skill(主人公(ＥＭ),ＳＰＵＰ) + 1)
        Money (-1800 * (お祈り回数))
        Incr お祈り回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)のＳＰ値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (お祈り回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 5 Then
        If 資金 > (1800 * (お祈り回数)) Then
        SetAbility 主人公(ＥＭ) ＳＰＵＰ (Skill(主人公(ＥＭ),ＳＰＵＰ) + 1)
        Money (-1800 * (お祈り回数))
        Incr お祈り回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)のＳＰ値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (お祈り回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 6 Then
        If 資金 > (1800 * (お祈り回数)) Then
        SetAbility 主人公(ＥＭ) ＳＰＵＰ (Skill(主人公(ＥＭ),ＳＰＵＰ) + 1)
        Money (-1800 * (お祈り回数))
        Incr お祈り回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)のＳＰ値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (お祈り回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 7 Then
        If 資金 > (1800 * (お祈り回数)) Then
        SetAbility 主人公(ＥＭ) ＳＰＵＰ (Skill(主人公(ＥＭ),ＳＰＵＰ) + 1)
        Money (-1800 * (お祈り回数))
        Incr お祈り回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)のＳＰ値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (お祈り回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 8 Then
        If 資金 > (1800 * (お祈り回数)) Then
        SetAbility 主人公(ＥＭ) ＳＰＵＰ (Skill(主人公(ＥＭ),ＳＰＵＰ) + 1)
        Money (-1800 * (お祈り回数))
        Incr お祈り回数 1
        Talk システム
        特訓成功;$(主人公(ＥＭ)愛称)のＳＰ値が1上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (お祈り回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 9 Then
        If 資金 > (1800 * (お祈り回数)) Then
        Money (-1800 * (お祈り回数))
        Talk システム
        <COLOR=RGB(0,0,255)>特訓失敗;<COLOR=RGB(0,0,0)>$(主人公(ＥＭ)愛称)のＳＰ値は上昇しませんでした;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (お祈り回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf
If パターン = 10 Then
        If 資金 > (1800 * (お祈り回数)) Then
        SetAbility 主人公(ＥＭ) ＳＰＵＰ (Skill(主人公(ＥＭ),ＳＰＵＰ) + 2)
        Money (-1800 * (お祈り回数))
        Incr お祈り回数 1
        Talk システム
        <COLOR=RGB(255,0,0)>特訓大成功;<COLOR=RGB(0,0,0)>$(主人公(ＥＭ)愛称)のＳＰ値が2上昇しました;残資金　$(資金)
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
        If 資金 < (1800 * (お祈り回数)) Then
        Talk システム
        資金が足りません
        End
        Goto 主人公(ＥＭ)特訓
        EndIf
    EndIf

EndIf
    If 選択 = 7 Then
        Goto 主人公(ＥＭ)特訓
    EndIf
EndSw

Switch 選択
Case 2
Talk システム
<b>筋トレ</b>;格闘値をＵＰさせます
<b>勉強</b>;魔力値をＵＰさせます
<b>ダッシュ</b>;命中・回避値をＵＰさせます
<b>手作業</b>;技量値をＵＰさせます
<b>おしゃれ</b>;反応値をＵＰさせます
<b>お祈り</b>;ＳＰ値をＵＰさせます
End
Goto 主人公(ＥＭ)特訓
Case 3
戻る:
Continue
EndSw