Something like this:
flash(5)
playef(9)
shake(20)
delay(30)
flash(5)
playef(9)
shake(20)
delay(30)
flash(5)
playef(10)
hideplayer()
delay(30)
gotoroom(x,y)
delay(30)
flash(5)
playef(9)
shake(20)
delay(30)
flash(5)
playef(9)
shake(20)
delay(30)
flash(5)
playef(10)
showplayer()
So to get that, you will need to enter this:
say(-1)
text(1,0,0,4)
say(5)
flash(5)
playef(9)
shake(20)
delay(30)
text(1,0,0,4)
say(5)
flash(5)
playef(9)
shake(20)
delay(30)
text(1,0,0,4)
say(5)
flash(5)
playef(10)
hideplayer()
delay(30)
text(1,0,0,4)
say(5)
gotoroom(x,y)
delay(30)
flash(5)
playef(9)
text(1,0,0,4)
say(5)
shake(20)
delay(30)
flash(5)
playef(9)
text(1,0,0,4)
say(5)
shake(20)
delay(30)
flash(5)
playef(10)
text(1,0,0,4)
say(4)
showplayer()
endcutscene()
untilbars()
loadscript(stop)