【症状】とりあえず、再生されなくなる
【再現方法】下記ソース
【要望】せめて、エラーメッセージを・・・
【バージョン】2.376
【その他】
MIDIポートも開けなくなる
終了時、iniファイルも書き込めなくなる
※
[1 の状態では再生できるが、[10 ぐらいにすると、再生できなくなり
[1 に戻すと、上記エラーが発生する
System.TimeBase=768
Tempo 50
Int I=1
Function BGAP(Str MML) {
Str BUF=""
Str ML=""
Str M
Str R
BUF=""
For(Int i=1; MID(MML, i, 1)!=""; i++) {
M=MID(MML, i, 1)
IF(M="a"||M="b"||M="c"||M="d"||M="e"||M="f"||M="g") {
IF(BUF!="") {
BUF=BUF+R+ML+CHR(125)
R=R+"r"+Random(120,150)
}
BUF=BUF+"Sub" + CHR(123)
ML=M
} ELSE {
ML=ML+M
}
}
BUF=BUF+ML+R+CHR(125)+"r16"
I=I+1
Print(I)
Print(BUF)
BUF
}
TR(1)
@1
v127
o5
[1
[999 BGAP(a>c#e<) ]
]