Asterisk sequence of audio files playback

The directory for every queue contains sequence of greetings named as 1.wav, 2.wav, 3.wav, etc.
Required to play those files before enter queue, in ascending order.

[subPlaySequence]

exten => start,1,NoOp(Play sequence from announce/queue/${ARG1})

   same => n,Set(i=1)

   same => n,While($[${i} < 15])

   same => n,Set(exists=${STAT(e,${ASTDATADIR}/sounds/ru/announce/queue/${ARG1}/${i}.wav)})

   same => n,ExecIf($[${exists} = 1]?Playback(announce/queue/${ARG1}/${i}))

   same => n,Set(i=$[${i} + 1])

   same => n,EndWhile

   same => n,Return

[incoming]

exten => 600,1,NoOp(${CALLERID(num)} Call to ${EXTEN})

 same => n,Answer()

 same => n,GoSub(subPlaySequence,start,1(callcenter))

 same => n,Queue(callcenter,120)