m=0

В "collision":

m+=1
if m=1
sound_play(snd_shell)

--

m=0
sound_play(snd_shell)
m+=1
if m=1
sound_stop(snd_shell)

--
m - просто переменная любая...