here is a script I made it blinks a light like an alarm and as you move closer by segment the light blinks faster here is the script
;Artificial Intelligence Script
;Header
desc = player distance flashing light script
;Triggers
;further than 400
:state=0,plrdistfurther=400:timerstart,lighton,state=1
:state=1,plrdistfurther=400,timergreater=500:lightoff,state=2
:state=1,plrdistwithin=400:state=8
:state=2,plrdistfurther=400,timergreater=1000:lighton,state=3
:state=2,plrdistwithin=400:state=8
:state=3,plrdistfurther=400,timergreater=1500:lightoff,state=4
:state=3,plrdistwithin=400:state=8
:state=4,plrdistfurther=400,timergreater=2000:lighton,state=5
:state=4,plrdistwithin=400:state=8
:state=5,plrdistfurther=400,timergreater=2500:lightoff,state=6
:state=5,plrdistwithin=400:state=8
:state=6,plrdistfurther=400:state=0
:state=7,plrdistwithin=400:state=8
;within 400
:state=8,plrdistwithin=400:timerstart,lighton,state=9
:state=8,plrdistfurther=400:state=0
:state=8,plrdistwithin=300:state=15
:state=9,plrdistwithin=400,timergreater=400:lightoff,state=10
:state=9,plrdistfurther=400:state=0
:state=9,plrdistwithin=300:state=15
:state=10,plrdistwithin=400,timergreater=800:lighton,state=11
:state=10,plrdistfurther=400:state=0
:state=10,plrdistwithin=300:state=15
:state=11,plrdistwithin=400,timergreater=1200:lightoff,state=12
:state=11,plrdistfurther=400:state=0
:state=11,plrdistwithin=300:state=15
:state=12,plrdistwithin=400,timergreater=1600:lighton,state=13
:state=12,plrdistfurther=400:state=0
:state=12,plrdistwithin=300:state=15
:state=13,plrdistwithin=400,timergreater=2000:lightoff,state=14
:state=13,plrdistfurther=400:state=0
:state=13,plrdistwithin=300:state=15
:state=14,plrdistwithin=400,plrdistfurther=300:state=8
:state=14,plrdistwithin=300:state=15
;within 300
:state=15,plrdistwithin=300:timerstart,lighton,state=16
:state=15,plrdistfurther=300:state=8
:state=15,plrdistwithin=200:state=22
:state=16,plrdistwithin=300,timergreater=300:lightoff,state=17
:state=16,plrdistfurther=300:state=8
:state=16,plrdistwithin=200:state=22
:state=17,plrdistwithin=300,timergreater=600:lighton,state=18
:state=17,plrdistfurther=300:state=8
:state=17,plrdistwithin=200:state=22
:state=18,plrdistwithin=300,timergreater=900:lightoff,state=19
:state=18,plrdistfurther=300:state=8
:state=18,plrdistwithin=200:state=22
:state=19,plrdistwithin=300,timergreater=1200:lighton,state=20
:state=19,plrdistfurther=300:state=8
:state=19,plrdistwithin=200:state=22
:state=20,plrdistwithin=300,timergreater=1500:lightoff,state=21
:state=20,plrdistfurther=300:state=8
:state=20,plrdistwithin=200:state=22
:state=21,plrdistfurther=200:state=16
:state=21,plrdistfurther=300:state=8
:state=21,plrdistwithin=200:state=22
;within 200
:state=22,plrdistwithin=200:timerstart,lighton,state=23
:state=22,plrdistfurther=200:state=15
:state=22,plrdistwithin=100:state=29
:state=23,plrdistwithin=200,timergreater=200:lightoff,state=24
:state=23,plrdistfurther=200:state=15
:state=23,plrdistwithin=100:state=29
:state=24,plrdistwithin=200,timergreater=400:lighton,state=25
:state=24,plrdistfurther=200:state=15
:state=24,plrdistwithin=100:state=29
:state=25,plrdistwithin=200,timergreater=600:lightoff,state=26
:state=25,plrdistfurther=200:state=15
:state=25,plrdistwithin=100:state=29
:state=26,plrdistwithin=200,timergreater=800:lighton,state=27
:state=26,plrdistfurther=200:state=15
:state=26,plrdistwithin=100:state=29
:state=27,plrdistwithin=200,timergreater=1000:lightoff,state=28
:state=27,plrdistfurther=200:state=15
:state=27,plrdistwithin=100:state=29
:state=28,plrdistfurther=200:state=15
:state=28,plrdistwithin=200:state=23
:state=28,plrdistwithin=100:state=29
;within 100
:state=29,plrdistwithin=100:timerstart,lighton,state=30
:state=29,plrdistfurther=100:state=22
:state=30,plrdistwithin=100,timergreater=100:lightoff,state=31
:state=30,plrdistfurther=100:state=22
:state=31,plrdistwithin=100,timergreater=200:lighton,state=32
:state=31,plrdistfurther=100:state=22
:state=32,plrdistwithin=100,timergreater=300:lightoff,state=33
:state=32,plrdistfurther=100:state=22
:state=33,plrdistwithin=100,timergreater=400:lighton,state=34
:state=33,plrdistfurther=100:state=22
:state=34,plrdistwithin=100,timergreater=500:lightoff,state=35
:state=34,plrdistfurther=100:state=22
:state=35,plrdistfurther=400:state=0
:state=35,plrdistwithin=400:state=8
:state=35,plrdistwithin=300:state=15
:state=35,plrdistwithin=200:state=22
:state=35,plrdistwithin=100:state=29
;End of Script
enjoy
I know not what WWIII will be fought but I do know that WWIV will be fought with sticks and stones-Albert Einstein