setMoneyName("タマー"); setDenomination("T") ;
setCustomParamMenuEnable(true)
setCustomParamMenuName("旅の便利機能")
def onShowCustomParameter()
case speakWithSelect(3,"タマー","BGM","やめる",
"何をする？")
when 0
setCustomParamName(2, "タマー")
setCustomParamValue(2, getMoney()+"T")
when 1
    case speakWithSelect(5,"カッコいい曲","カッコいい曲２","町のテーマ","戦闘曲",
    "やめる","何の曲を再生する？")

    when 0
    playBGM(xxx)
    speak("BGMを変えた")

    when 1
    playBGM(xxx)
    speak("BGMを変えた")

    when 2
    playBGM(xxx)
    speak("BGMを変えた")
    when 3
    playBGM(xxx)
    speak("BGMを変えた")
    when 4
    speak("やっぱやめよう")

    end
when 2
speak("やっぱやめよう")

end

end

setMoneyName("タマー"); setDenomination("T") ;
setCustomParamMenuEnable(true)
setCustomParamMenuName("旅の便利機能")
def onShowCustomParameter()
case speakWithSelect(3,"タマー","BGM","やめる",
"何をする？")
when 0
setCustomParamName(2, "タマー")
setCustomParamValue(2, getMoney()+"T")
when 1
    case speakWithSelect(5,"カッコいい曲","カッコいい曲２","町のテーマ","戦闘曲",
    "やめる","何の曲を再生する？")

    when 0
    playBGM(xxx)
    speak("BGMを変えた")

    when 1
    playBGM(xxx)
    speak("BGMを変えた")

    when 2
    playBGM(xxx)
    speak("BGMを変えた")
    when 3
    playBGM(xxx)
    speak("BGMを変えた")
    when 4
    speak("やっぱやめよう")

    end
when 2
speak("やっぱやめよう")

end

end