Folder$ = [color=#800000]'<SrcDir>\Data\Sound\\'[/color]
Repeat = [color=#ff0000]2[/color]
Range_From = [color=#ff0000]5[/color]
Range_To = [color=#ff0000]11[/color]
[color=#0000FF]If[/color] (Repeat < [color=#ff0000]1[/color]) [color=#0000FF]Then[/color]
Repeat = [color=#ff0000]1[/color]
[color=#0000FF]End[/color]
[color=#0000FF]For[/color] i=[color=#ff0000]1[/color] [color=#0000FF]To[/color] Repeat
[color=#0000FF]For[/color] j=Range_From [color=#0000FF]To[/color] Range_To
[color=#009000]**// i assume filename is like: "Sound (5).mp3"[/color]
FilePath$ = Folder$ + [color=#800000]'Sound ('[/color] + [color=#000090][b]CHAR[/b][/color](j) + [color=#800000]').mp3'[/color]
[color=#000090][b]PlaySound[/b][/color]("FilePath$")
[color=#0000FF]Next[/color] j
[color=#0000FF]Next[/color] i
سلام
1- من میخوام هر فایل صوتی چند بار تکرار بشه،مثلا صدای شماره یک سه بار تکرار بشه بعد صدای شماره دو و الی آخر ، در حالی که تمام فایل های انتخاب شده یک بار تا آخر پخش می شن و بعد دوباره همه با هم تکرار می شن .
2- بر فرض اگر سه موزیک با هم انتخاب شده اند. موزیک آخری یعنی شماره سه فقط دو بار تکرار میشه .چرا ؟
Seek = Seek + [color=#ff0000]1[/color]
Range$ = [color=#800000]'1|3|3|3|4|5|2|5|7|5|'[/color]
Total = [color=#000090][b]GetArrayNum[/b][/color](Range$,|)
FileNum = [color=#000090][b]VAL[/b][/color]([color=#000090][b]GetArrayItem[/b][/color](Range$,|,Seek))
[color=#0000FF]If[/color] (Seek >= Total) [color=#0000FF]Then[/color]
[color=#009000]**// Makes looping infinite[/color]
Seek = [color=#ff0000]0[/color]
[color=#009000]**// Or you can just terminate the script[/color]
[color=#009000]**// Return()[/color]
[color=#0000FF]End[/color]
[color=#000090][b]RunScript[/b][/color]("AOpen")









