NOTE: This requires FPSC v1.18 BETA 4 or later!
I have made a simple script that will decreasingly shake the HUD if you are within 200 units (2 segments) of an exploding object (in my case it was a barrel). Just apply the script to any explosion enabled dynamic entity, such as a barrel. If you have played any of the S.T.A.L.K.E.R. games, then you are probably familiar with this effect.
:state=0:localvar=0,setvar=0
:state=0,plrdistwithin=200:setalphafade=0,state=2
:state=0,plrdistfurther=200:explode,destroy
;LOL NO STATE=1
:state=2,alphafadeequal=0:state=3
:state=3,varequal=15:state=5
:state=3,varless=15:state=4,etimerstart
:state=4,timergreater=20:state=3,incvar=1,camshake=5
:state=5,varequal=30:state=7
:state=5,varless=30:state=6,etimerstart
:state=6,timergreater=20:state=5,incvar=1,camshake=4
:state=7,varequal=45:state=9
:state=7,varless=45:state=8,etimerstart
:state=8,timergreater=20:state=7,incvar=1,camshake=3
:state=9,varequal=60:state=11
:state=9,varless=60:state=10,etimerstart
:state=10,timergreater=20:state=9,incvar=1,camshake=2
:state=11,varequal=75:destroy
:state=11,varless=75:state=12,etimerstart
:state=12,timergreater=20:state=11,incvar=1,camshake=1
Unfortunately I couldn't capture a video of it because I couldn't get enough FPS to see it shake. Have fun!
Akanto