Music Throttle Based on Distance from Entity. It works! Sort of...

Author

Message

Ekipshi

15

Years of Service

User Offline

Joined: 20th May 2009

Location:

Posted: 14th Feb 2013 20:29

Link

So.. I tried whipping up a script that would control the volume of the music depending on my distance from the entity who possesses the script.

But it only HALF works

I'm not entirely sure why, but it only works one way.

I start out far away from the entity, and it indeed immediately sets the music volume down. However, it does not increment up to full strength, instead immediately hitting 100 when I get RIGHT up to the entity.

NOW! When I start walking away from it, it DOES decrement gradually the further I get away..

Can anyone lend me a little insight as to why this might be the case?

+ Code Snippet

;Artificial Intelligence Script

;Header

desc          = Throttle Music based on location of entity

;Triggers

:state=0,plrdistfurther=2000:musicvolume=20,state=0
:state=0,plrdistwithin=1999:musicvolume=30,state=1
:state=1,plrdistfurther=1750:musicvolume=30,state=0
:state=1,plrdistwithin=1749:musicvolume=40,state=2
:state=2,plrdistfurther=1500:musicvolume=40,state=1
:state=2,plrdistwithin=1499:musicvolume=50,state=3
:state=3,plrdistfurther=1250:musicvolume=50,state=2
:state=3,plrdistwithin=1249:musicvolume=60,state=4
:state=4,plrdistfurther=1000:musicvolume=60,state=3
:state=4,plrdistwithin=999:musicvolume=70,state=5
:state=5,plrdistfurther=750:musicvolume=70,state=4
:state=5,plrdistwithin=749:musicvolume=80,state=6
:state=6,plrdistfurther=500:musicvolume=80,state=5
:state=6,plrdistwithin=499:musicvolume=100,state=6





;End of Script

Thank you!

Back to top

Profile PM Email

Akanto10

14

Years of Service

User Offline

Joined: 24th Apr 2010

Location: Earth

Posted: 15th Feb 2013 02:56

Link

I believe I see a small mistake in your snippet. However, you may want to use my version of your script, which is, in fact, very similar, but uses a different method of changing the music volume in a way that may save RAM consumption in your level.

;Artificial Intelligence Script

;Header

desc          = Throttle Music based on location of entity

;Triggers

;DECLARE VARIABLES
:state=0:state=1,dimlocalvar=level

;CLASSIFY DISTANCE
:state=1,plrdistfurther=2000:state=2,setvar=level 2
:state=1,plrdistwithin=1999,plrdistfurther=1750:state=3,setvar=level 3
:state=1,plrdistwithin=1749,plrdistfurther=1500:state=4,setvar=level 4
:state=1,plrdistwithin=1499,plrdistfurther=1250:state=5,setvar=level 5
:state=1,plrdistwithin=1249,plrdistfurther=1000:state=6,setvar=level 6
:state=1,plrdistwithin=999,plrdistfurther=750:state=7,setvar=level 7
:state=1,plrdistwithin=749,plrdistfurther=500:state=8,setvar=level 8
:state=1,plrdistwithin=499:state=9,setvar=level 9

;CHANGE MUSIC VOLUME
:state=2:musicvolume=20,state=10
:state=3:musicvolume=30,state=10
:state=4:musicvolume=40,state=10
:state=5:musicvolume=50,state=10
:state=6:musicvolume=60,state=10
:state=7:musicvolume=70,state=10
:state=8:musicvolume=80,state=10
:state=9:musicvolume=100,state=10

;DETECT CHANGE IN DISTANCE CLASSIFICATION
:state=10,varequal=level 2,plrdistwithin=1999:state=1
:state=10,varequal=level 3,plrdistwithin=1749:state=1
:state=10,varequal=level 3,plrdistfurther=2000:state=1
:state=10,varequal=level 4,plrdistwithin=1499:state=1
:state=10,varequal=level 3,plrdistfurther=1750:state=1
:state=10,varequal=level 5,plrdistwithin=1249:state=1
:state=10,varequal=level 3,plrdistfurther=1500:state=1
:state=10,varequal=level 6,plrdistwithin=999:state=1
:state=10,varequal=level 3,plrdistfurther=1250:state=1
:state=10,varequal=level 7,plrdistwithin=749:state=1
:state=10,varequal=level 3,plrdistfurther=1000:state=1
:state=10,varequal=level 8,plrdistwithin=499:state=1
:state=10,varequal=level 3,plrdistfurther=750:state=1
:state=10,varequal=level 9,plrdistfurther=500:state=1

;End of Script

+ Code Snippet

;Artificial Intelligence Script

;Header

desc          = Throttle Music based on location of entity

;Triggers

;DECLARE VARIABLES
:state=0:state=1,dimlocalvar=level

;CLASSIFY DISTANCE
:state=1,plrdistfurther=2000:state=2,setvar=level 2
:state=1,plrdistwithin=1999,plrdistfurther=1750:state=3,setvar=level 3
:state=1,plrdistwithin=1749,plrdistfurther=1500:state=4,setvar=level 4
:state=1,plrdistwithin=1499,plrdistfurther=1250:state=5,setvar=level 5
:state=1,plrdistwithin=1249,plrdistfurther=1000:state=6,setvar=level 6
:state=1,plrdistwithin=999,plrdistfurther=750:state=7,setvar=level 7
:state=1,plrdistwithin=749,plrdistfurther=500:state=8,setvar=level 8
:state=1,plrdistwithin=499:state=9,setvar=level 9

;CHANGE MUSIC VOLUME
:state=2:musicvolume=20,state=10
:state=3:musicvolume=30,state=10
:state=4:musicvolume=40,state=10
:state=5:musicvolume=50,state=10
:state=6:musicvolume=60,state=10
:state=7:musicvolume=70,state=10
:state=8:musicvolume=80,state=10
:state=9:musicvolume=100,state=10

;DETECT CHANGE IN DISTANCE CLASSIFICATION
:state=10,varequal=level 2,plrdistwithin=1999:state=1
:state=10,varequal=level 3,plrdistwithin=1749:state=1
:state=10,varequal=level 3,plrdistfurther=2000:state=1
:state=10,varequal=level 4,plrdistwithin=1499:state=1
:state=10,varequal=level 3,plrdistfurther=1750:state=1
:state=10,varequal=level 5,plrdistwithin=1249:state=1
:state=10,varequal=level 3,plrdistfurther=1500:state=1
:state=10,varequal=level 6,plrdistwithin=999:state=1
:state=10,varequal=level 3,plrdistfurther=1250:state=1
:state=10,varequal=level 7,plrdistwithin=749:state=1
:state=10,varequal=level 3,plrdistfurther=1000:state=1
:state=10,varequal=level 8,plrdistwithin=499:state=1
:state=10,varequal=level 3,plrdistfurther=750:state=1
:state=10,varequal=level 9,plrdistfurther=500:state=1

;End of Script

I hope this helps,
Akanto

Back to top

Profile PM Email Website

Ekipshi

15

Years of Service

User Offline

Joined: 20th May 2009

Location:

Posted: 16th Feb 2013 00:12

Link

Thanks for having a look-see. It's... going to take me a bit to actually figure out how your script works.

Did you just whip that up or have you had that for a while?

There are many ways I can emulate the effect including the script you posted, but I still want to know why? Why does it work, why does mine not?

As well as (pardon my ignorance) how is it that yours uses less RAM, as it seems to throw in variables along side the states?

Back to top

Profile PM Email

Akanto10

14

Years of Service

User Offline

Joined: 24th Apr 2010

Location: Earth

Posted: 16th Feb 2013 03:57

Link

I had just made it right on the spot, actually. I believe that the reason why your script wouldn't work is because you didn't start at 2000 units or further away from the entity, which is equal to 20 segment spaces. Therefore, the music starts louder than you want it to. My script is designed to detect your distance and classify it as a certain level, which is passed on to a variable to detect any distance change. The reason it consumes less RAM is because FPSC runs scripts constantly, reading each line and executing it if it returns true. Therefore, when you have a line like the one below, FPSC constantly is setting the music volume over and over until you aren't further than 100 units. My script, on the other hand, will not repeat the "musicvolume=X" command unless there is a change in distance level.

+ Code Snippet

:state=0,plrdistfurther=100:musicvolume=10,state=0

I hope that clears everything up.

Thanks,
Akanto

Back to top

Profile PM Email Website

Sorry your browser is not supported!

FPSC Classic Scripts / Music Throttle Based on Distance from Entity. It works! Sort of...