Workaround with Lights and Stealth

Author

Message

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 20th Aug 2011 07:43 Edited at: 20th Aug 2011 10:58

Link

I've been looking around the FPSC forums, curious about how people have tried to implement stealth into their games. It seems like most people opt to use zones, but I was curious abut how effective it would be to have stealth based on light.

+ Code Snippet

;Artificial Intelligence Script

;Header

desc          = Light Toggle (On By Default)

;Triggers
;globalvar=100 is the universal stealth variable
:state=0:globalvar=100,state=1
:state=1,activated=0:state=2,lighton
:state=2,activated=1:state=1,lightoff

;if player is in zone, highly visible (setvar=2)
:state=2,plrdistwithin=300:setvar=2
;if within two segments, partially visible (setvar=1)
:state=2,plrdistfurther=300,plrdistwithin=500:setvar=1
;if farther than a segment from the edge of zone, totally hidden
:state=2,plrdistfurther=500,plrdistwithin=510:setvar=0
;if light off, totally hidden
:state=1,plrdistwithin=510:setvar=0

;End of Script

This is pretty much the basis of the stealth system I've come up with so far. Put this in a light and make it dynamic.

Basically, there are three levels of light: bright, dim, and totally hidden. The advantage of this script is that it matches with the actual area covered in light. The disadvantage is that the "brightness" is transferred through walls and doesn't play well with multiple instances of this script in close proximity.

+ Code Snippet

;Stealth Indicator

;Healthless Indicator
desc          = Shows How Hidden You Are

;Triggers
:state=0:hudreset,hudx=90,hudy=90,hudimage=texturebank/user/eye.dds,hudname=eye,hudhide=1,hudmake=display
:state=0:hudreset,hudx=90,hudy=90,hudimage=texturebank/user/eye2.dds,hudname=eye2,hudhide=1,hudmake=display

;globalvar=100 is the universal stealth variable
:state=0:globalvar=100,state=10

;varequal=2 means in bright light
:state=10,varequal=2:hudunshow=eye,hudunshow=eye2,hudshow=eye

;varequal=1 means in dim light
:state=10,varequal=1:hudunshow=eye,hudunshow=eye2,hudshow=eye2

;varequal=0 means in complete shadows
:state=10,varequal=0:hudunshow=eye,hudunshow=eye2

;End of Script

Put this in a trigger zone or other such marker. This sets up a hud that will indicate how hidden the player is. Really just cosmetic, and for the player's benefit.

+ Code Snippet

...
:state=0:globalvar=100,state=1
:state=1,plrcanbeseen,varequal=2,plrdistwithin=1000:settarget,state=2
:state=1,plrcanbeseen,varequal=1,plrdistwithin=500:settarget,state=2
:state=1,plrcanbeseen,varequal=0,plrdistwithin=100:settarget,state=2
...

This is the most important part. In the AI's script where ever plrcanbeseen can be found, three variations for each of the brightness levels are made so that they actually have an effect.

Now I ask you, do you think it is much of an improvement over the zone method? And how would you deal with the problem of "brightness" passing through walls, making you "visible" even though you may be in total darkness? At this moment, the best solution I can think of is to make sure any light with this script isn't anywhere near a wall.

Back to top

Profile PM

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 23rd Aug 2011 09:11

Link

Okay, I've been fiddling around with the scripts and what not, and it seems like the best way to have the stealth lights work is by having a static light with another dynamic light on top of it. The static light provides the illumination, while the dynamic light's range is set to zero and given a script like:

+ Code Snippet

;Artificial Intelligence Script

;Header

desc          = Stealth Allowed Light for Static Lights

;Triggers
;globalvar=100 is the universal stealth variable
:state=0:globalvar=100,state=1


;if player is in zone, highly visible (setvar=2)
:state=1,plrdistwithin=50:setvar=2
;if within a segment, partially visible (setvar=1)
:state=1,plrdistfurther=50,plrdistwithin=100:setvar=1
;if farther than a segment from the edge of zone, totally hidden
:state=1,plrdistfurther=100,plrdistwithin=110:setvar=0


;End of Script

This seems to give the best results. I didn't figure out a way to reasonably prevent "brightness" from passing through walls, so basically I have to either rely on zones or designing the level around those lights.

I did also manage to make it work with the Dark AI that comes with FPSC, which combined with the ability to investigate noises allows for a reasonable facsimile of a stealth game.

...
:state=1:airotatetotarget

:state=1,idle=1,aicanshoot=0,aiheardsound=2500:aistop,state=30,etimerstart
:state=1,idle=0,aicanshoot=0,aiheardsound=1000:aistop,state=30,etimerstart

:state=1,ifweapon=1,aicanshoot=1,plrdistfurther=70,plrcanbeseen,varequal=0,plrdistwithin=100,idle=1,random=1:aisettarget,useweapon,rundecal=6
:state=1,ifweapon=1,aicanshoot=1,plrdistfurther=70,plrcanbeseen,varequal=1,plrdistwithin=500,idle=1,random=1:aisettarget,useweapon,rundecal=6
:state=1,ifweapon=1,aicanshoot=1,plrdistfurther=70,plrcanbeseen,varequal=2,plrdistwithin=1000,idle=1,random=1:aisettarget,useweapon,rundecal=6

:state=1,ifweapon=1,aicanshoot=1,plrdistfurther=70,idle=0,rateoffire,plrcanbeseen,varequal=0,plrdistwithin=100,:aisettarget,useweapon,rundecal=6
:state=1,ifweapon=1,aicanshoot=1,plrdistfurther=70,idle=0,rateoffire,plrcanbeseen,varequal=1,plrdistwithin=500,:aisettarget,useweapon,rundecal=6
:state=1,ifweapon=1,aicanshoot=1,plrdistfurther=70,idle=0,rateoffire,plrcanbeseen,varequal=2,plrdistwithin=1000,:aisettarget,useweapon,rundecal=6

:state=1,varequal=0,aicanshoot=1,plrdistfurther=70,plrdistwithin=100,plrcanbeseen:state=54,aistop
:state=1,varequal=1,aicanshoot=1,plrdistfurther=70,plrdistwithin=500,plrcanbeseen:state=54,aistop
:state=1,varequal=2,aicanshoot=1,plrdistfurther=70,plrdistwithin=1000,plrcanbeseen:state=54,aistop
...

+ Code Snippet

...
:state=1:airotatetotarget

:state=1,idle=1,aicanshoot=0,aiheardsound=2500:aistop,state=30,etimerstart
:state=1,idle=0,aicanshoot=0,aiheardsound=1000:aistop,state=30,etimerstart

:state=1,ifweapon=1,aicanshoot=1,plrdistfurther=70,plrcanbeseen,varequal=0,plrdistwithin=100,idle=1,random=1:aisettarget,useweapon,rundecal=6
:state=1,ifweapon=1,aicanshoot=1,plrdistfurther=70,plrcanbeseen,varequal=1,plrdistwithin=500,idle=1,random=1:aisettarget,useweapon,rundecal=6
:state=1,ifweapon=1,aicanshoot=1,plrdistfurther=70,plrcanbeseen,varequal=2,plrdistwithin=1000,idle=1,random=1:aisettarget,useweapon,rundecal=6

:state=1,ifweapon=1,aicanshoot=1,plrdistfurther=70,idle=0,rateoffire,plrcanbeseen,varequal=0,plrdistwithin=100,:aisettarget,useweapon,rundecal=6
:state=1,ifweapon=1,aicanshoot=1,plrdistfurther=70,idle=0,rateoffire,plrcanbeseen,varequal=1,plrdistwithin=500,:aisettarget,useweapon,rundecal=6
:state=1,ifweapon=1,aicanshoot=1,plrdistfurther=70,idle=0,rateoffire,plrcanbeseen,varequal=2,plrdistwithin=1000,:aisettarget,useweapon,rundecal=6

:state=1,varequal=0,aicanshoot=1,plrdistfurther=70,plrdistwithin=100,plrcanbeseen:state=54,aistop
:state=1,varequal=1,aicanshoot=1,plrdistfurther=70,plrdistwithin=500,plrcanbeseen:state=54,aistop
:state=1,varequal=2,aicanshoot=1,plrdistfurther=70,plrdistwithin=1000,plrcanbeseen:state=54,aistop
...

Still I would appreciate some feedback from someone more knowledgeable about whether or not this script is efficient. I've only tested same levels so far, so I'm not sure if performance might dramatically drop in larger levels - or if the whole light-based stealth is just over-engineered and zones would be the better choice.

Back to top

Profile PM

maho76

13

Years of Service

User Offline

Joined: 31st May 2011

Location: universe-hub, playing the flute

Posted: 23rd Aug 2011 18:48 Edited at: 23rd Aug 2011 18:49

Link

nice done, but have you thought of combining zones and entities?

pure zonework is not that good because you only can define 1 zone with this script shown in the other thread. when you use 2 zones, one sets the var to 1 and the other where you are not in sets var=0 > enemy will see you.

setup a zone that activates a var, then write a mainscript for furniture relying to this specific zone/var wich checks the var and the plrdistwithin to the object, as you have done above, but on an entity. in this way you can set up multiple very detailed stealthzones with different vars, but place the lights as you wish.

more complicated, but with more options.

finally dont forget to revise the mainscript of the enemies with a plrdistwithin condition so a patroling npc that comes near you sees you if you are too close.

that would be the most detailed optimum for stealthtriggers, i think.

Back to top

Profile PM Email

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 23rd Aug 2011 22:03

Link

Thanks maho76! I did actually think of combining zones and entities, but I didn't think of using regular entities instead of light markers. That's a much more flexible system than what I was originally going with.

I've modified most of my current scripts for the plrdistwithin condition, with the exception of the Dark-AI patrolling script. For some reason, once I include the plrdistwithin check they stop animating their movement.

Anyways, I appreciate the advice!

Back to top

Profile PM

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 24th Aug 2011 08:53 Edited at: 24th Aug 2011 09:55

Link

In case anyone is wondering, here are the scripts I use for stealth zones:

+ Code Snippet

;High Light Zone (Stealth)

desc = High Light Zone (Stealth)

;Triggers
;globalvar=100 is the universal stealth variable
:state=0:globalvar=100,state=10

;if player is in zone, highly visible (setvar=2)
:state=10,plrwithinzone=1:setvar=2

+ Code Snippet

;Dim Light Zone (Stealth)

desc = Dim Light Zone (Stealth)

;Triggers
;globalvar=100 is the universal stealth variable
:state=0:globalvar=100,state=10

;if within a segment, partially visible (setvar=1)
:state=10,plrwithinzone=1:setvar=1

+ Code Snippet

;No Light Zone (Stealth)

desc = No Light Zone (Stealth)

;Triggers
;globalvar=100 is the universal stealth variable
:state=0:globalvar=100,state=10

;if farther than a segment from the edge of zone, totally hidden
:state=10,plrwithinzone=1:setvar=0

They're pretty simple, and are based on meteorite's script.

Back to top

Profile PM

The Storyteller 01

15

Years of Service

User Offline

Joined: 11th May 2009

Location: On a silent hill in dead space

Posted: 24th Aug 2011 13:32 Edited at: 24th Aug 2011 13:34

Link

I found the only 100% reliable method still is to work with zones. My setup is a follows:

- enemy1 is spawned at start with a script that ignores the player as long as the enemy isn't getting wounded at.
- the triggerzones have a script that doesn't change anything as long as the scankcodekeypressed=<whichever key does CROUCH> true.
- if scankcodekeypressed=untrue the script destroys enemy1 and activates enemy2 (a copy) that has a script that makes him immideately attack the player.

This has the added advantage, that the guards (enemy1) can be given additional script lines that make them p.e sit or having a conversation, without the risk of the script misfiring.

But my method was created for a Fantasy game where there are no gun sounds so it has an obvious flaw in a modern setting:
- as long as the player is crouching he can shoot without spawning the agressive enemy.
- besides that, it doubles the amount of dynamic entities used and could raise the polycount quite high.

In case you find my grammar and spelling weird ---> native German speaker ^^

Back to top

Profile PM Email Website

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 24th Aug 2011 17:24

Link

I was considering including crouching as something that improved your ability to hid by reducing the global variable, but since my current system has very discrete values, it doesn't work so well.

I like your idea of having a separate script for detecting the player though! Since I'm using the WASP Mod, I can use "setmainscript = X" to change to a regular attack script without needing to create multiple entities, provided the command works like I think it does.

Currently I also have it set up so that when the ai hears a sound, it'll go check it out:

+ Code Snippet

:state=1,idle=1,aicanshoot=0,aiheardsound=1000:aistop,state=30,etimerstart
:state=1,idle=0,aicanshoot=0,aiheardsound=1000:aistop,state=30,etimerstart
...
:state=30:aisettarget,airotatetotarget
:state=30,aiheardsound=3000:aimovetosound

but since I'm not entirely sure what counts as a sound to the ai (sometimes I can shot the ground behind it, and it won't respond, other times I could be two rooms away and it'll come checkout what I'm doing) I have no idea if it works well or not.

So thanks for telling me what you usually do The Storyteller 01, since the whole separate script for detecting the player may in fact work better than just modifying the main script directly like I am right now.

Back to top

Profile PM

The Storyteller 01

15

Years of Service

User Offline

Joined: 11th May 2009

Location: On a silent hill in dead space

Posted: 25th Aug 2011 02:13 Edited at: 25th Aug 2011 08:19

Link

I have to admit I never had nor have a lot of trust in the AI/dark AI.

For me the reliable path (in any game engine) has always been, to directly feed the engine with conditions and have it tell the NPC exactly what actions to take. Of course that doesn't allow complex NPC behaviour

In case you find my grammar and spelling weird ---> native German speaker ^^

Back to top

Profile PM Email Website

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 25th Aug 2011 03:02 Edited at: 25th Aug 2011 19:34

Link

True enough. Relying on rules to procedurally create generate AI only really works if you've got a great understanding of both math and coding, and are willing to spend a huge amount of time coming up with that code. It's much more reliable to just code it in than to try and be clever unless you really have a grasp on what you're doing (which I don't :p).

Anyways, I actually ended up adding directly to the scripts the commands, instead of using the "setmainscript = X" since I spent about an hour trying to figure it out and couldn't. Also, I cleaned up some of my stealth code.

+ Code Snippet

;Artificial Intelligence ScriptStealth Indicator

;Healthless Indicator
desc          = Shows How Hidden You Are

;Triggers
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye.dds,hudname=eye,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye2.dds,hudname=eye2,hudhide=1,hudmake=display

;globalvar=100 is the universal stealth variable
:state=0:dimvar=stealth,dimvar=crouch,state=10

:varequal=crouch 1:setvar=crouch 0
:scancodekeypressed=46:setvar=crouch 1

;varequal=2 means in bright light
:state=10,varequal=stealth 2:hudunshow=eye,hudunshow=eye2,hudshow=eye

;varequal=1 means in dim light
:state=10,varequal=stealth 1:hudunshow=eye,hudunshow=eye2,hudshow=eye2

;varequal=0 means in complete shadows
:state=10,varequal=stealth 0:hudunshow=eye,hudunshow=eye2

;End of Script

With my stealth indicator, I changed the stealth variable from "globalvar=100" to "dimvar=stealth" and correspondingly changed all the stealth code to match. This way I can use more than one global variable. Also, your idea about crouching inspired me to add crouching as a feature. I'm still experimenting with it, but basically the idea is that crouching will reduce the amount of noise you make, thus making it easier to sneak.

+ Code Snippet

:aiheardsound=500,varequal=crouch 0,state=300:setvar=patrol 0,state=30,etimerstart,airotatetosound
:aiheardsound=100,varequal=crouch 1,state=300:setvar=patrol 0,state=30,etimerstart,airotatetosound
...
;//Go to shoot script
:state=30,aicanshoot=1,varequal=stealth 0,plrdistwithin=100:state=999
:state=30,aicanshoot=1,varequal=stealth 1,plrdistwithin=500:state=999
:state=30,aicanshoot=1,varequal=stealth 2,plrdistwithin=1000:state=999
...
;//Listen for enemy
:state=1,aicanshoot=0,aiheardsound=600,varequal=crouch 0:state=30,etimerstart.aisettarget
:state=1,aicanshoot=0,aiheardsound=100,varequal=crouch 1:state=30,etimerstart.aisettarget

Here are the major changes I made to the "TF341_Main_Default.fpi" script. Essentially standing up and running attracts more attention (farther hearing distance) than crouching, and being in bright light allows enemies to see you from half-way across the room. In no light, they practically have to enter melee range to see you.

The major issue I've currently got with crouching is that it isn't togglable. As it is at the moment, someone can crouch and then start moving, and as long as they keep moving they still count as crouched even if they let go of the button.

Also, here are the scripts I attach to entities I use as a source of light:

+ Code Snippet

;Artificial Intelligence Script

;Header

desc          = Stealth Allowed Light for Static Lights

;Triggers
;globalvar=100 is the universal stealth variable
:state=0:state=1


;if player is in zone, highly visible (setvar=2)
:state=1,plrdistwithin=50:setvar=stealth 2
;if within a segment, partially visible (setvar=1)
:state=1,plrdistfurther=50,plrdistwithin=100:setvar=stealth 1
;if farther than a segment from the edge of zone, totally hidden
:state=1,plrdistfurther=100,plrdistwithin=110:setvar=stealth 0


;End of Script

Basically, I just cut out the "light on/off" & "activated=" bits, so that they take up marginally less time to calculate. There are occasional glitches where if the player is moving too fast, they might leave the area before the script resets them to "setvar=stealth 0", which results in them being stuck in dim light (even though they may be in total darkness) until they walk through another stealth light zone. Fixes for this include increasing the range of the area, & slowing the player down.

Back to top

Profile PM

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 25th Aug 2011 03:17

Link

Actually, right after I posted this I figured out how to make crouch-stealth work without toggling it.

By replacing

:varequal=crouch 1:setvar=crouch 0

with

:scancodekeypressed=!46:setvar=crouch 0

I made it check to see if the button wasn't pressed. I didn't know that "=!" was actually something that worked in FPSC. You learn something new every day!

Back to top

Profile PM

The Storyteller 01

15

Years of Service

User Offline

Joined: 11th May 2009

Location: On a silent hill in dead space

Posted: 25th Aug 2011 08:22 Edited at: 25th Aug 2011 08:25

Link

Quote: "I didn't know that "=!" was actually something that worked in FPSC. You learn something new every day"

Although I tried to follow any script syntax changes/additions for 1.17 to 1.18 I never spotted that

I am not into any stealthy projects right now but your scripts look very simple, yet advanced - I would like to try them out myself

In case you find my grammar and spelling weird ---> native German speaker ^^

Back to top

Profile PM Email Website

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 25th Aug 2011 10:00 Edited at: 25th Aug 2011 10:10

Link

I'd be honored if you tried them out! It's partially why I'm sharing them too. There aren't a whole lot of first-person stealth games in general (the only good ones that come to mind are the Thief series). I can help but feel like there's some, more elegant/less computationally intensive way to do stealth, but I'm glad you think that they're advanced.

Since I've put up the scripts, I might as well add the pictures I'm using for the "eye" hud. They were originally taken from freedigitalphotos.net. The idea is to have a little symbol representing how hidden you are, ala the light gem from Thief.

Attachments

Login to view attachments

Back to top

Profile PM

maho76

13

Years of Service

User Offline

Joined: 31st May 2011

Location: universe-hub, playing the flute

Posted: 25th Aug 2011 18:27

Link

Quote: "(the only good ones that come to mind are the Thief series). "

dont forget the ultimate: metal gear solid 1+2

also all parts of deus ex can be played as stealth-action most of the time. (YEEEAAHH, tomorrow is the day of the decade... i hope: deus ex 3 release!! http://www.youtube.com/watch?v=Ncym_kOuqv4 )

Back to top

Profile PM Email

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 25th Aug 2011 19:32 Edited at: 25th Aug 2011 19:33

Link

Man, how could I forget those? Although to be fair, the Metal Gear series are primarily third-person with an option for limited first-person. But otherwise, you're totally right. I've heard from a friend who has already bought it that Deus Ex 3 is a pretty good sequel, barring the mandatory boss fights that are pretty much bullet sponges.

That does bring to mind a question: how would you do bosses in a stealth game? It seems like most designers go for the route of making them a powerful enemy you have to kill, yet that ignores pretty much everything you've been doing up to that point.

Anyways, on the topic of the stealth scripts, I figured out a better way to use entities as a source of the light scripts. Just set in their properties "Always Active?" to "Yes". This solves all the glitches I mentioned above, but has the downside of having them always calculating those scripts. It's not so bad if you make the objects immobile and turn off their physics, but for someone whose trying to optimize their level's memory usage, it might be annoying.

Back to top

Profile PM

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 25th Aug 2011 19:52

Link

Other things to note: the "aiheardsound = X" seems to vary in effectiveness based on level design. I've done most of my testing with the stock ww2 segments, and they work pretty much like I want them to (when the ai hears a sound, it'll walk close enough to spot you in dim light, but not in no light - unless you continue to make noise). But with the dungeon pack, there seems to be a little lag between when you make a noise and when the ai hears you (but then the ai is more aggressive when it pursues you).

I'm not sure if it's the way I've got the levels set up, or if it has something to do with the properties of the segments, but it's something I've noticed.

Also another tip for using the stealth-lights is that they work best in conjunction with zones. The stealth-lights work best in either small rooms, or rooms that don't block a lot of light. If you've got columns or platforms blocking large chunks of the light, using zones to modify the areas of shadow (so that they count as dim/no light instead of high light) helps with the realism. Zones also work better for narrow corridors (where the light is more directional than spread) and for rooms that are side-by-side and have multiple lights in them.

Back to top

Profile PM

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 26th Aug 2011 08:35

Link

After further testing the issues with the segments, it turned out all I needed to do was run FPSCreatorDumpMem and Cleaner to clear up those segment issues.

Back to top

Profile PM

maho76

13

Years of Service

User Offline

Joined: 31st May 2011

Location: universe-hub, playing the flute

Posted: 26th Aug 2011 10:25 Edited at: 26th Aug 2011 10:28

Link

Quote: "I figured out a better way to use entities as a source of the light scripts. Just set in their properties "Always Active?" to "Yes". This solves all the glitches I mentioned above, but has the downside of having them always calculating those scripts. It's not so bad if you make the objects immobile and turn off their physics, but for someone whose trying to optimize their level's memory usage, it might be annoying. "

when you got performance probs with the entities you can use THIS method to appear/reappear them to cancel calculating when you are out of sight:

http://forum.thegamecreators.com/?m=forum_view&t=187181&b=23

it will start to get real complex, but thats how good games are done

EDIT: dont forget keypressed?-routine for player running (shift)

gz

Back to top

Profile PM Email

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 26th Aug 2011 14:25

Link

Thanks for reminding me to modify the run routine so that it makes more sound than normal walking. I'm thinking of modifying the indicator script to:

+ Code Snippet

...
:scancodekeypressed=!42:setvar=crouch 0
:scancodekeypressed=!46:setvar=crouch 0
:scancodekeypressed=46:setvar=crouch 1
:scancodekeypressed=42:setvar=crouch -1
...

and the enemy's script to:

+ Code Snippet

...
:aiheardsound=1000,varequal=crouch -1,state=300:setvar=patrol 0,state=30,etimerstart,airotatetosound
:aiheardsound=500,varequal=crouch 0,state=300:setvar=patrol 0,state=30,etimerstart,airotatetosound
:aiheardsound=100,varequal=crouch 1,state=300:setvar=patrol 0,state=30,etimerstart,airotatetosound
...

which allows the enemy to detect the player from further away when they are running than walking or crouching.

Also, thanks for the link to your scripts, hope you don't mind if I cannibalize them for ideas.

Back to top

Profile PM

maho76

13

Years of Service

User Offline

Joined: 31st May 2011

Location: universe-hub, playing the flute

Posted: 26th Aug 2011 16:17 Edited at: 26th Aug 2011 16:18

Link

Quote: "Also, thanks for the link to your scripts, hope you don't mind if I cannibalize them for ideas."

feel free to do, it was for the community.

my actual project on fpsc is not a stealth thing, but i also have an alternative idea to use your system, so thx for this interesting conversation.

Back to top

Profile PM Email

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 26th Aug 2011 17:53 Edited at: 26th Aug 2011 21:22

Link

Thanks to you too. I'm pretty much posting this up for the community as well. One final note is a slight change to one of the scripts.

Instead of

:scancodekeypressed=!46:setvar=crouch 0

it should be

:scancodekeypressed!=46:setvar=crouch 0

I tried out the "!=" symbol with a few other variables, including "plrblocking=". For example:

+ Code Snippet

:state=493,framebeyond=27 40,aitargetdistwithin=70,plrblocking=0:state=494,camshake=30,aisetmeleedamage=10,aiusemelee=1,sound=audiobank\misc\melee.wav
:state=493,framebeyond=27 40,aitargetdistwithin=70,plrblocking!=0:state=494,camshake=10,aisetmeleedamage=0,aiusemelee=1,sound=audiobank\misc\melee.wav

the "plrblocking!=0" is effectively the same as "plrblocking=1", but if you're not using something including plysmod it fixes up an error where after the block animation ends the plrblocking equal neither 1 or 0 - which in this case results in no damage and no camshake. The one down side of "!=" is that FPI EditPad treats it as a new command, and will keep telling you to fix it.

EDIT: Actually it seems that both "!=" and "=!" work, but with minor variations. But at that point, it's really now a topic for another thread.

Back to top

Profile PM

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 26th Aug 2011 21:57

Link

I'm curious if there is a way to detect if a key has been pressed, regardless of whether or not any other keys have been pressed. Right now I've got

+ Code Snippet

...
:scancodekeypressed=46:setvar=crouch 1
:scancodekeypressed=42:setvar=crouch -1
:scancodekeypressed=!42,scancodekeypressed=!46:setvar=crouch 0
...

Which basically is supposed to detect if you're running or crouching. If you're pressing the corresponding button, the crouch variable changes. If you're pressing neither, it returns to the default state. It works just fine if I press shift (scancode=42) before I start moving, but the problem is that if I press shift after I start moving, it won't change the variable. Same problem with the crouch button.

So, again, is there a way to detect if a key has been pressed, regardless of whether or not any other keys have been pressed?

Back to top

Profile PM

The Storyteller 01

15

Years of Service

User Offline

Joined: 11th May 2009

Location: On a silent hill in dead space

Posted: 26th Aug 2011 22:26 Edited at: 26th Aug 2011 22:26

Link

How about a simple workaround with an additional line at the end, that will turn run+crouch into run regarding the stealth variable (just an idea):

+ Code Snippet

:scancodekeypressed=46:setvar=crouch 1
:scancodekeypressed=42:setvar=crouch -1
:scancodekeypressed=!42,scancodekeypressed=!46:setvar=crouch 0
:scancodekeypressed=42,scancodekeypressed=46:setvar=crouch -1

In case you find my grammar and spelling weird ---> native German speaker ^^

Back to top

Profile PM Email Website

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 26th Aug 2011 23:08 Edited at: 26th Aug 2011 23:19

Link

Your additions to the script do make it so that crouching & running at the same time counts as running for the purposes of noise (which is really what the crouch variable is for),yet the issue with being able to move, and then run/crouch without it counting as running/crouching. Essentially if you start out walking, and then run or crouch, it doesn't detect that you're now running or crouching and you count as walking for the purposes of noise.

I did a little research on scancodes, and then wrote a quick program to confirm it, but it seems like the issue is that the WASD controls are read before the Shift/C keys - which then prevents them from being read unless you release those keys.

The script actually works almost perfectly if you use the arrow keys to move, since the shift/C keys are read before the arrow keys (although, there's still a problem of the run/crouch status not ending when you release they keys unless you also release arrow keys).

But thanks for point out the crouch/run thing, since it's yet another problem that could've arisen. Ugh, so many things to code contingencies for! :p

Anyways, one non-solution is to set the crouch/run keys to something before the WASD keys in terms of the scancode, or setting the WASD keys to something after the crouch/run keys (this is a non-solution, because doing so would make the controls very awkward).

Is there a way to detect if the player is crouched or running, without having to rely on scancodes? I tried having it based on the player's speed (eg ":speed=100:setvar=crouch 0") but that didn't seem to work at all.

Back to top

Profile PM

The Storyteller 01

15

Years of Service

User Offline

Joined: 11th May 2009

Location: On a silent hill in dead space

Posted: 26th Aug 2011 23:17

Link

You are scripting on a level that's far beyond mine (I never got as far as usings variables

) but I have one last thought before I have to give up:

Could using ALWAYS for establishing the conditions for crouch/stealth solve the problem?

In case you find my grammar and spelling weird ---> native German speaker ^^

Back to top

Profile PM Email Website

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 27th Aug 2011 01:12 Edited at: 27th Aug 2011 01:16

Link

Thanks for the complement, but I can't help but feel like not all that good at scripting. I pretty much have no idea what I'm doing, and just kinda trying out random commands until I get something that resembles working. XD

Well, I tried the "always" condition, but in the end I ended up pretty much completely changing around the script:

+ Code Snippet

...
:isrunning=0:setvar=crouch 0
:scancodekeypressed=46:setvar=crouch 1
:isrunning=1:setvar=crouch -1
...

I took another look through my WASP mod manual, and found the "isrunning=" command, which does exactly what I wanted that scancode mess to do for the shift key, but with none of the errors. Pretty face palm-worthy of me. Unfortunately this has two downsides: "isrunning=" is (as far as I know) exclusive to WASP mod, and I always hate having code specific to a single mod/platform. If I ever use something other than WASP, I'd be back at square one - but at least for now it solves the problem.

The other issue is that there is no "iscrouching=" counterpart to it, leaving me with the same set of problems for crouching. At the moment, crouching only really applies if you don't move; other wise you count as walking for the purposes of noise making.

Back to top

Profile PM

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 27th Aug 2011 11:09 Edited at: 27th Aug 2011 11:11

Link

I've decided to make the stealth system a little more smooth.

+ Code Snippet

;Stealth Indicator

;Healthless Indicator
desc          = Shows How Hidden You Are

;Triggers
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye.dds,hudname=eye,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye2.dds,hudname=eye2,hudhide=1,hudmake=display

;Dim global variables
:state=0:dimvar=stealth,dimvar=sound,state=10

:isrunning=1:setvar=sound 1000
:isrunning=0:setvar=sound 500
:scancodekeypressed=46:setvar=sound 0


;vargreater=stealth 501 means in bright light
:state=10,vargreater=stealth 501:hudunshow=eye,hudunshow=eye2,hudshow=eye

;vargreater=stealth 1,varless=stealth 500 means in dim light

:state=10,vargreater=stealth 1,varless=stealth 500:hudunshow=eye,hudunshow=eye2,hudshow=eye2

;varequal=stealth 0 means in complete shadows
:state=10,varequal=stealth 0:hudunshow=eye,hudunshow=eye2

;End of Script

+ Code Snippet

...
:state=0:aiusefullaim=1,dimlocalvar=awareness
...
:state=1:setvar=awareness 100,addvar=awareness %stealth
:state=1,aicanshoot=1,plrdistwithin=%awareness:state=999
...
:state=1:setvar=awareness 500,addvar=awareness %sound
:state=1,aiheardsound=%awareness:state=30,etimerstart.aisettarget
...

It's definitely a work in progress, but basically I'm trying to make the stealth system less discrete. Now the area the enemy can listen/see is less hard-coded - or rather they are more directly influenced by the variables. Eventually, I'm hoping that the system will be flexible enough to allow multiple intersecting modifiers on the noise you make and how visible you are. But in the mean time, this is what I've got.

Back to top

Profile PM

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 27th Aug 2011 11:25 Edited at: 27th Aug 2011 11:37

Link

Additional scripts:

+ Code Snippet

;Artificial Intelligence Script

;Header

desc          = Stealth Allowed Light for Static

;Triggers
;stealth is the universal stealth variable

;Normal Light Intensity
:state=0:state=1

;if player is in zone, highly visible
:state=1,plrdistwithin=100:addvar=stealth 1000,state=2
;if within a segment, partially visible
:state=1,plrdistfurther=100,plrdistwithin=200:addvar=stealth 500,state=3
;if farther than a segment from the edge of zone, totally hidden
:state=1,plrdistfurther=200,plrdistwithin=210:addvar=stealth 0,state=4

;reset stealth when out of high light zone
:state=2,plrdistfurther=100:subvar=stealth 1000,state=1

;reset stealth when out of dim light zone
:state=3,plrdistfurther=200:subvar=stealth 500,state=1
:state=3,plrdistwithin=100:subvar=stealth 500,state=1

;reset stealth when out of no light zone
:state=4,plrdistfurther=210:subvar=stealth 0,state=1
:state=4,plrdistwithin=200:subvar=stealth 0,state=1

;End of Script

Here's an example of how the lights have changed. With this change, multiple stealth-lights can be placed near each other. If you stand in-between multiple close lights, it results in you becoming more visible than if you were just standing in a single light.

Back to top

Profile PM

The Storyteller 01

15

Years of Service

User Offline

Joined: 11th May 2009

Location: On a silent hill in dead space

Posted: 27th Aug 2011 17:17 Edited at: 27th Aug 2011 17:18

Link

I don't want to spoil your fun, but doesn't it get a bit complicated?

And another thing - if you want it super realistic then the general ambience level as well as the difference between that and every lightsource has to be taken into account too

In case you find my grammar and spelling weird ---> native German speaker ^^

Back to top

Profile PM Email Website

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 27th Aug 2011 18:00 Edited at: 27th Aug 2011 18:05

Link

True enough, but now I'm coming up with stuff under the assumption that stealth would play a large role in the game. If it's going to a feature, then I might as well go all out right?

For super realism, I guess we could always have an "ambience variable" (let's call it ambi) and having something like "ambience=%ambi", and a variable for the light's intensity(eg "dimlocalvar=intensity" This isn't actual intensity mind you, but an arbitrary value we've assigned to it to represent how bright the light is).

+ Code Snippet

...
;if player is in zone, highly visible
:state=1,plrdistwithin=100:addvar=stealth 1000,addvar=stealth %intensity,subvar=stealth %ambience,state=2
...

The idea here is that the greater the contrast between the light source and the surrounding area, the more that light source and everything in it stands out - thus increasing the likelihood of an enemy noticing the player there (represented by an increasing the range an enemy can spot the player).

Conversely, if intensity is less than the general ambience level, then we are assuming the light is dim, weak, or otherwise not particularly noticeable. In those cases, the enemy is less likely to notice the player since that area blends into the background, so to speak.

ALTERNATELY:

+ Code Snippet

...
;if player is in zone, highly visible
:state=1,plrdistwithin=100,vargreater=intensity %ambi:addvar=stealth 1000,addvar=stealth %intensity,subvar=stealth %ambience,state=2
:state=1,plrdistwithin=100,vargreater=ambi %intensity:addvar=stealth 1000,subvar=stealth %intensity,addvar=stealth %ambience,state=2
...

where we're just saying that the greater the contrast, the more likely the player is going to be seen.

Of course, the downside here is that now each light will need it's own intensity level assigned to it. :p Also, there won't be too much added to or from the stealth variable, since both ambience and light intensity are measured from 1 to 100, thus the most added/subtracted would be a segment.

And don't worry about spoiling my fun, I'm one of those rare people who love to make over-complicated systems. XD

Back to top

Profile PM

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 27th Aug 2011 21:46

Link

Also as a side note, KEYPRESSED=X Y works more predicatably than KEYPRESSED!=X.

+ Code Snippet

KEYPRESSED=X Y
Description: Is true if the key corresponding to the keycode X is pressed and Y
is 1 or the key is not pressed and Y is 0.
Range: X = Keycode, see figure below.
Y = 0 – True if key is not pressed,
Y = 1 – True if key is pressed.

Found it in the unofficial FPSC complete script syntax. Just sharing it, since I did bring up these kinds of commands earlier in the thread.

Back to top

Profile PM

The Storyteller 01

15

Years of Service

User Offline

Joined: 11th May 2009

Location: On a silent hill in dead space

Posted: 27th Aug 2011 21:50

Link

I have allready added this thread's link to my favourites. I have the feeling, one day I'll be glad I did

In case you find my grammar and spelling weird ---> native German speaker ^^

Back to top

Profile PM Email Website

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 28th Aug 2011 00:06

Link

I'm glad you think this thread is worth favoriting!

I made a few more changes to the stealth indicator:

;Stealth Indicator

;Healthless Indicator
desc          = Shows How Hidden You Are

;Triggers
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye1.png,hudname=eye1,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye2.png,hudname=eye2,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye3.png,hudname=eye3,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye4.png,hudname=eye4,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye5.png,hudname=eye5,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye6.png,hudname=eye6,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye7.png,hudname=eye7,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye8.png,hudname=eye8,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye9.png,hudname=eye9,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye10.png,hudname=eye10,hudhide=1,hudmake=display

;Dim global variables
:state=0:dimvar=stealth,dimvar=sound,state=10

:isrunning=1:setvar=sound 1000
:isrunning=0:setvar=sound 500
:scancodekeypressed=46:setvar=sound 0

:state=10,vargreater=stealth 900:hudunshow=eye1,hudunshow=eye2,hudunshow=eye3,hudunshow=eye4,hudunshow=eye5,hudunshow=eye6,hudunshow=eye7,hudunshow=eye8,hudunshow=eye9,hudshow=eye10

:state=10,vargreater=stealth 800,varless=stealth 900:hudunshow=eye1,hudunshow=eye2,hudunshow=eye3,hudunshow=eye4,hudunshow=eye5,hudunshow=eye6,hudunshow=eye7,hudunshow=eye8,hudshow=eye9,hudunshow=eye10

:state=10,vargreater=stealth 700,varless=stealth 800:hudunshow=eye1,hudunshow=eye2,hudunshow=eye3,hudunshow=eye4,hudunshow=eye5,hudunshow=eye6,hudunshow=eye7,hudshow=eye8,hudunshow=eye9,hudunshow=eye10

:state=10,vargreater=stealth 600,varless=stealth 700:hudunshow=eye1,hudunshow=eye2,hudunshow=eye3,hudunshow=eye4,hudunshow=eye5,hudunshow=eye6,hudshow=eye7,hudunshow=eye8,hudunshow=eye9,hudunshow=eye10

:state=10,vargreater=stealth 500,varless=stealth 600:hudunshow=eye1,hudunshow=eye2,hudunshow=eye3,hudunshow=eye4,hudunshow=eye5,hudshow=eye6,hudunshow=eye7,hudunshow=eye8,hudunshow=eye9,hudunshow=eye10

:state=10,vargreater=stealth 400,varless=stealth 500:hudunshow=eye1,hudunshow=eye2,hudunshow=eye3,hudunshow=eye4,hudshow=eye5,hudunshow=eye6,hudunshow=eye7,hudunshow=eye8,hudunshow=eye9,hudunshow=eye10

:state=10,vargreater=stealth 300,varless=stealth 400:hudunshow=eye1,hudunshow=eye2,hudunshow=eye3,hudshow=eye4,hudunshow=eye5,hudunshow=eye6,hudunshow=eye7,hudunshow=eye8,hudunshow=eye9,hudunshow=eye10

:state=10,vargreater=stealth 200,varless=stealth 300:hudunshow=eye1,hudunshow=eye2,hudshow=eye3,hudunshow=eye4,hudunshow=eye5,hudunshow=eye6,hudunshow=eye7,hudunshow=eye8,hudunshow=eye9,hudunshow=eye10

:state=10,vargreater=stealth 100,varless=stealth 200:hudunshow=eye1,hudshow=eye2,hudunshow=eye3,hudunshow=eye4,hudunshow=eye5,hudunshow=eye6,hudunshow=eye7,hudunshow=eye8,hudunshow=eye9,hudunshow=eye10

:state=10,vargreater=stealth 0,varless=stealth 100:hudshow=eye1,hudunshow=eye2,hudunshow=eye3,hudunshow=eye4,hudunshow=eye5,hudunshow=eye6,hudunshow=eye7,hudunshow=eye8,hudunshow=eye9,hudunshow=eye10

:state=10,varequal=stealth 0:hudunshow=eye1,hudunshow=eye2,hudunshow=eye3,hudunshow=eye4,hudunshow=eye5,hudunshow=eye6,hudunshow=eye7,hudunshow=eye8,hudunshow=eye9,hudunshow=eye10

;End of Script

+ Code Snippet

;Stealth Indicator

;Healthless Indicator
desc          = Shows How Hidden You Are

;Triggers
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye1.png,hudname=eye1,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye2.png,hudname=eye2,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye3.png,hudname=eye3,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye4.png,hudname=eye4,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye5.png,hudname=eye5,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye6.png,hudname=eye6,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye7.png,hudname=eye7,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye8.png,hudname=eye8,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye9.png,hudname=eye9,hudhide=1,hudmake=display
:state=0:hudreset,hudx=10,hudy=90,hudimage=texturebank/user/eye10.png,hudname=eye10,hudhide=1,hudmake=display

;Dim global variables
:state=0:dimvar=stealth,dimvar=sound,state=10

:isrunning=1:setvar=sound 1000
:isrunning=0:setvar=sound 500
:scancodekeypressed=46:setvar=sound 0


:state=10,vargreater=stealth 900:hudunshow=eye1,hudunshow=eye2,hudunshow=eye3,hudunshow=eye4,hudunshow=eye5,hudunshow=eye6,hudunshow=eye7,hudunshow=eye8,hudunshow=eye9,hudshow=eye10

:state=10,vargreater=stealth 800,varless=stealth 900:hudunshow=eye1,hudunshow=eye2,hudunshow=eye3,hudunshow=eye4,hudunshow=eye5,hudunshow=eye6,hudunshow=eye7,hudunshow=eye8,hudshow=eye9,hudunshow=eye10

:state=10,vargreater=stealth 700,varless=stealth 800:hudunshow=eye1,hudunshow=eye2,hudunshow=eye3,hudunshow=eye4,hudunshow=eye5,hudunshow=eye6,hudunshow=eye7,hudshow=eye8,hudunshow=eye9,hudunshow=eye10

:state=10,vargreater=stealth 600,varless=stealth 700:hudunshow=eye1,hudunshow=eye2,hudunshow=eye3,hudunshow=eye4,hudunshow=eye5,hudunshow=eye6,hudshow=eye7,hudunshow=eye8,hudunshow=eye9,hudunshow=eye10

:state=10,vargreater=stealth 500,varless=stealth 600:hudunshow=eye1,hudunshow=eye2,hudunshow=eye3,hudunshow=eye4,hudunshow=eye5,hudshow=eye6,hudunshow=eye7,hudunshow=eye8,hudunshow=eye9,hudunshow=eye10

:state=10,vargreater=stealth 400,varless=stealth 500:hudunshow=eye1,hudunshow=eye2,hudunshow=eye3,hudunshow=eye4,hudshow=eye5,hudunshow=eye6,hudunshow=eye7,hudunshow=eye8,hudunshow=eye9,hudunshow=eye10

:state=10,vargreater=stealth 300,varless=stealth 400:hudunshow=eye1,hudunshow=eye2,hudunshow=eye3,hudshow=eye4,hudunshow=eye5,hudunshow=eye6,hudunshow=eye7,hudunshow=eye8,hudunshow=eye9,hudunshow=eye10

:state=10,vargreater=stealth 200,varless=stealth 300:hudunshow=eye1,hudunshow=eye2,hudshow=eye3,hudunshow=eye4,hudunshow=eye5,hudunshow=eye6,hudunshow=eye7,hudunshow=eye8,hudunshow=eye9,hudunshow=eye10

:state=10,vargreater=stealth 100,varless=stealth 200:hudunshow=eye1,hudshow=eye2,hudunshow=eye3,hudunshow=eye4,hudunshow=eye5,hudunshow=eye6,hudunshow=eye7,hudunshow=eye8,hudunshow=eye9,hudunshow=eye10

:state=10,vargreater=stealth 0,varless=stealth 100:hudshow=eye1,hudunshow=eye2,hudunshow=eye3,hudunshow=eye4,hudunshow=eye5,hudunshow=eye6,hudunshow=eye7,hudunshow=eye8,hudunshow=eye9,hudunshow=eye10

:state=10,varequal=stealth 0:hudunshow=eye1,hudunshow=eye2,hudunshow=eye3,hudunshow=eye4,hudunshow=eye5,hudunshow=eye6,hudunshow=eye7,hudunshow=eye8,hudunshow=eye9,hudunshow=eye10

;End of Script

Basically the indicator while change a bit more smoothly and show more degrees of stealth than just "highly visible" "somewhat visible" and "not visible". The huds are made from PNG files instead of DDS files so that it is easier to modify the appearance of the indicator. Correspondingly, I've altered the stealth-lights to produce a more variable amount of light:

;Artificial Intelligence Script

;Header

desc          = Stealth Allowed Light for Static

;Triggers
;stealth is the universal stealth variable

;Normal Light Intensity
:state=0:state=10

;Visibility
:state=10,plrdistwithin=20:addvar=stealth 1000,state=20
:state=10,plrdistfurther=20,plrdistwithin=40:addvar=stealth 900,state=21
:state=10,plrdistfurther=40,plrdistwithin=60:addvar=stealth 800,state=22
:state=10,plrdistfurther=60,plrdistwithin=80:addvar=stealth 700,state=23
:state=10,plrdistfurther=80,plrdistwithin=100:addvar=stealth 600,state=24
:state=10,plrdistfurther=100,plrdistwithin=120:addvar=stealth 500,state=25
:state=10,plrdistfurther=120,plrdistwithin=140:addvar=stealth 400,state=26
:state=10,plrdistfurther=140,plrdistwithin=160:addvar=stealth 300,state=27
:state=10,plrdistfurther=160,plrdistwithin=180:addvar=stealth 200,state=28
:state=10,plrdistfurther=180,plrdistwithin=200:addvar=stealth 100,state=29

;reset stealth when out of high light zone
:state=20,plrdistfurther=20:subvar=stealth 1000,state=10

:state=21,plrdistfurther=40:subvar=stealth 900,state=10
:state=21,plrdistwithin=20:subvar=stealth 900,state=10

:state=22,plrdistfurther=60:subvar=stealth 800,state=10
:state=22,plrdistwithin=40:subvar=stealth 800,state=10

:state=23,plrdistfurther=80:subvar=stealth 700,state=10
:state=23,plrdistwithin=60:subvar=stealth 700,state=10

:state=24,plrdistfurther=100:subvar=stealth 600,state=10
:state=24,plrdistwithin=80:subvar=stealth 600,state=10

:state=25,plrdistfurther=120:subvar=stealth 500,state=10
:state=25,plrdistwithin=100:subvar=stealth 500,state=10

:state=26,plrdistfurther=140:subvar=stealth 400,state=10
:state=26,plrdistwithin=120:subvar=stealth 400,state=10

:state=27,plrdistfurther=160:subvar=stealth 300,state=10
:state=27,plrdistwithin=140:subvar=stealth 300,state=10

:state=28,plrdistfurther=180:subvar=stealth 200,state=10
:state=28,plrdistwithin=160:subvar=stealth 200,state=10

:state=29,plrdistfurther=200:subvar=stealth 100,state=10
:state=29,plrdistwithin=180:subvar=stealth 100,state=10

;End of Script

+ Code Snippet

;Artificial Intelligence Script

;Header

desc          = Stealth Allowed Light for Static

;Triggers
;stealth is the universal stealth variable

;Normal Light Intensity
:state=0:state=10

;Visibility
:state=10,plrdistwithin=20:addvar=stealth 1000,state=20
:state=10,plrdistfurther=20,plrdistwithin=40:addvar=stealth 900,state=21
:state=10,plrdistfurther=40,plrdistwithin=60:addvar=stealth 800,state=22
:state=10,plrdistfurther=60,plrdistwithin=80:addvar=stealth 700,state=23
:state=10,plrdistfurther=80,plrdistwithin=100:addvar=stealth 600,state=24
:state=10,plrdistfurther=100,plrdistwithin=120:addvar=stealth 500,state=25
:state=10,plrdistfurther=120,plrdistwithin=140:addvar=stealth 400,state=26
:state=10,plrdistfurther=140,plrdistwithin=160:addvar=stealth 300,state=27
:state=10,plrdistfurther=160,plrdistwithin=180:addvar=stealth 200,state=28
:state=10,plrdistfurther=180,plrdistwithin=200:addvar=stealth 100,state=29

;reset stealth when out of high light zone
:state=20,plrdistfurther=20:subvar=stealth 1000,state=10

:state=21,plrdistfurther=40:subvar=stealth 900,state=10
:state=21,plrdistwithin=20:subvar=stealth 900,state=10

:state=22,plrdistfurther=60:subvar=stealth 800,state=10
:state=22,plrdistwithin=40:subvar=stealth 800,state=10

:state=23,plrdistfurther=80:subvar=stealth 700,state=10
:state=23,plrdistwithin=60:subvar=stealth 700,state=10

:state=24,plrdistfurther=100:subvar=stealth 600,state=10
:state=24,plrdistwithin=80:subvar=stealth 600,state=10

:state=25,plrdistfurther=120:subvar=stealth 500,state=10
:state=25,plrdistwithin=100:subvar=stealth 500,state=10

:state=26,plrdistfurther=140:subvar=stealth 400,state=10
:state=26,plrdistwithin=120:subvar=stealth 400,state=10

:state=27,plrdistfurther=160:subvar=stealth 300,state=10
:state=27,plrdistwithin=140:subvar=stealth 300,state=10

:state=28,plrdistfurther=180:subvar=stealth 200,state=10
:state=28,plrdistwithin=160:subvar=stealth 200,state=10

:state=29,plrdistfurther=200:subvar=stealth 100,state=10
:state=29,plrdistwithin=180:subvar=stealth 100,state=10

;End of Script

The coding's a little bit more brute force than I would've liked, but it gets the job done. Attached are copies of some of the stealth scripts and the huds, in case anyone wants to try them out. I didn't include any enemy scripts, since I've been mostly modifying the TF341 scripts, but it isn't too hard to make the enemy use the stealth stuff.

To make it so that the enemy has to spot you before attacking, include this line before any "shootplr" commands:

+ Code Snippet

...
:state=1,plrcanbeseen,plrdistwithin=%stealth:shootplr
...

or at least something along those lines.

To make it so that the enemy can hear you, include this piece:

+ Code Snippet

...
:state=1,aiheardsound=%sound:state=2,etimerstart.aisettarget
:state=2:airotatetosound,aimovetosound,rotateheadrandom=30
:state=2,etimergreater=2000:aistop,state=3,etimerstart
:state=3:state=1
...

These are pretty basic, and really are just to demonstrate that they can be used.

Attachments

Login to view attachments

Back to top

Profile PM

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 28th Aug 2011 03:03

Link

Yet another script change (big surprise there):

;Artificial Intelligence Script

;Header

desc          = Stealth Allowed Light for Static

;Triggers
;stealth is the universal stealth variable

;Normal Light Intensity
:state=0:dimlocalvar=range,dimlocalvar=lightunit1,dimlocalvar=lightunit2,dimlocalvar=lightunit3,dimlocalvar=lightunit4,dimlocalvar=lightunit5,dimlocalvar=lightunit6,dimlocalvar=lightunit7,dimlocalvar=lightunit8,dimlocalvar=lightunit9,dimlocalvar=lightunit10

:state=0:setvar=range 200

:state=0:setvar=lightunit1 %range,setvar=lightunit2 %range,setvar=lightunit3 %range,setvar=lightunit4 %range,setvar=lightunit5 %range,setvar=lightunit6 %range,setvar=lightunit7 %range,setvar=lightunit8 %range,setvar=lightunit9 %range,setvar=lightunit10 %range
:state=0:divvar=lightunit1 10,divvar=lightunit2 5,divvar=lightunit3 3.333333,divvar=lightunit4 2.5,divvar=lightunit5 2,divvar=lightunit6 1.666667,divvar=lightunit7 1.428571,divvar=lightunit8 1.25,divvar=lightunit9 1.111111,divvar=lightunit10 1
:state=0:state=10

;Visibility
:state=10,plrdistwithin=%lightunit1:addvar=stealth 1000,state=20
:state=10,plrdistfurther=%lightunit1,plrdistwithin=%lightunit2:addvar=stealth 900,state=21
:state=10,plrdistfurther=%lightunit2,plrdistwithin=%lightunit3:addvar=stealth 800,state=22
:state=10,plrdistfurther=%lightunit3,plrdistwithin=%lightunit4:addvar=stealth 700,state=23
:state=10,plrdistfurther=%lightunit4,plrdistwithin=%lightunit5:addvar=stealth 600,state=24
:state=10,plrdistfurther=%lightunit5,plrdistwithin=%lightunit6:addvar=stealth 500,state=25
:state=10,plrdistfurther=%lightunit6,plrdistwithin=%lightunit7:addvar=stealth 400,state=26
:state=10,plrdistfurther=%lightunit7,plrdistwithin=%lightunit8:addvar=stealth 300,state=27
:state=10,plrdistfurther=%lightunit8,plrdistwithin=%lightunit9:addvar=stealth 200,state=28
:state=10,plrdistfurther=%lightunit9,plrdistwithin=%lightunit10:addvar=stealth 100,state=29

;reset stealth when out of high light zone
:state=20,plrdistfurther=%lightunit1:subvar=stealth 1000,state=10

:state=21,plrdistfurther=%lightunit2:subvar=stealth 900,state=10
:state=21,plrdistwithin=%lightunit1:subvar=stealth 900,state=10

:state=22,plrdistfurther=%lightunit3:subvar=stealth 800,state=10
:state=22,plrdistwithin=%lightunit2:subvar=stealth 800,state=10

:state=23,plrdistfurther=%lightunit4:subvar=stealth 700,state=10
:state=23,plrdistwithin=%lightunit3:subvar=stealth 700,state=10

:state=24,plrdistfurther=%lightunit5:subvar=stealth 600,state=10
:state=24,plrdistwithin=%lightunit4:subvar=stealth 600,state=10

:state=25,plrdistfurther=%lightunit6:subvar=stealth 500,state=10
:state=25,plrdistwithin=%lightunit5:subvar=stealth 500,state=10

:state=26,plrdistfurther=%lightunit7:subvar=stealth 400,state=10
:state=26,plrdistwithin=%lightunit6:subvar=stealth 400,state=10

:state=27,plrdistfurther=%lightunit8:subvar=stealth 300,state=10
:state=27,plrdistwithin=%lightunit7:subvar=stealth 300,state=10

:state=28,plrdistfurther=%lightunit9:subvar=stealth 200,state=10
:state=28,plrdistwithin=%lightunit8:subvar=stealth 200,state=10

:state=29,plrdistfurther=%lightunit10:subvar=stealth 100,state=10
:state=29,plrdistwithin=%lightunit9:subvar=stealth 100,state=10

;End of Script

+ Code Snippet

;Artificial Intelligence Script

;Header

desc          = Stealth Allowed Light for Static

;Triggers
;stealth is the universal stealth variable

;Normal Light Intensity
:state=0:dimlocalvar=range,dimlocalvar=lightunit1,dimlocalvar=lightunit2,dimlocalvar=lightunit3,dimlocalvar=lightunit4,dimlocalvar=lightunit5,dimlocalvar=lightunit6,dimlocalvar=lightunit7,dimlocalvar=lightunit8,dimlocalvar=lightunit9,dimlocalvar=lightunit10

:state=0:setvar=range 200

:state=0:setvar=lightunit1 %range,setvar=lightunit2 %range,setvar=lightunit3 %range,setvar=lightunit4 %range,setvar=lightunit5 %range,setvar=lightunit6 %range,setvar=lightunit7 %range,setvar=lightunit8 %range,setvar=lightunit9 %range,setvar=lightunit10 %range
:state=0:divvar=lightunit1 10,divvar=lightunit2 5,divvar=lightunit3 3.333333,divvar=lightunit4 2.5,divvar=lightunit5 2,divvar=lightunit6 1.666667,divvar=lightunit7 1.428571,divvar=lightunit8 1.25,divvar=lightunit9 1.111111,divvar=lightunit10 1
:state=0:state=10

;Visibility
:state=10,plrdistwithin=%lightunit1:addvar=stealth 1000,state=20
:state=10,plrdistfurther=%lightunit1,plrdistwithin=%lightunit2:addvar=stealth 900,state=21
:state=10,plrdistfurther=%lightunit2,plrdistwithin=%lightunit3:addvar=stealth 800,state=22
:state=10,plrdistfurther=%lightunit3,plrdistwithin=%lightunit4:addvar=stealth 700,state=23
:state=10,plrdistfurther=%lightunit4,plrdistwithin=%lightunit5:addvar=stealth 600,state=24
:state=10,plrdistfurther=%lightunit5,plrdistwithin=%lightunit6:addvar=stealth 500,state=25
:state=10,plrdistfurther=%lightunit6,plrdistwithin=%lightunit7:addvar=stealth 400,state=26
:state=10,plrdistfurther=%lightunit7,plrdistwithin=%lightunit8:addvar=stealth 300,state=27
:state=10,plrdistfurther=%lightunit8,plrdistwithin=%lightunit9:addvar=stealth 200,state=28
:state=10,plrdistfurther=%lightunit9,plrdistwithin=%lightunit10:addvar=stealth 100,state=29

;reset stealth when out of high light zone
:state=20,plrdistfurther=%lightunit1:subvar=stealth 1000,state=10

:state=21,plrdistfurther=%lightunit2:subvar=stealth 900,state=10
:state=21,plrdistwithin=%lightunit1:subvar=stealth 900,state=10

:state=22,plrdistfurther=%lightunit3:subvar=stealth 800,state=10
:state=22,plrdistwithin=%lightunit2:subvar=stealth 800,state=10

:state=23,plrdistfurther=%lightunit4:subvar=stealth 700,state=10
:state=23,plrdistwithin=%lightunit3:subvar=stealth 700,state=10

:state=24,plrdistfurther=%lightunit5:subvar=stealth 600,state=10
:state=24,plrdistwithin=%lightunit4:subvar=stealth 600,state=10

:state=25,plrdistfurther=%lightunit6:subvar=stealth 500,state=10
:state=25,plrdistwithin=%lightunit5:subvar=stealth 500,state=10

:state=26,plrdistfurther=%lightunit7:subvar=stealth 400,state=10
:state=26,plrdistwithin=%lightunit6:subvar=stealth 400,state=10

:state=27,plrdistfurther=%lightunit8:subvar=stealth 300,state=10
:state=27,plrdistwithin=%lightunit7:subvar=stealth 300,state=10

:state=28,plrdistfurther=%lightunit9:subvar=stealth 200,state=10
:state=28,plrdistwithin=%lightunit8:subvar=stealth 200,state=10

:state=29,plrdistfurther=%lightunit10:subvar=stealth 100,state=10
:state=29,plrdistwithin=%lightunit9:subvar=stealth 100,state=10

;End of Script

Functionally, it is the same as the last one, but this makes it easy to change the the range of the stealth-light. Has limited use, but I'm always a fan of doing something now to reduce the amount of work later.

Although, I do wonder: anyone else write scripts so that they are easy to modify?

Back to top

Profile PM

The Storyteller 01

15

Years of Service

User Offline

Joined: 11th May 2009

Location: On a silent hill in dead space

Posted: 28th Aug 2011 10:19 Edited at: 28th Aug 2011 10:24

Link

Quote: "Although, I do wonder: anyone else write scripts so that they are easy to modify?"

You can bet on it

For EVERY script I write, I include a "how to use" into the header, just in case I forget over the years what I made it for

But more important (and heavily recommended!), is that I NEVER use consecutive numbers for state=. When jumping to the next state I always skip several numbers so I can insert additional states later without having to renumber the whole script.

Currently I am working on a conversation script that is pretty simple right now, but prepared to easily include alternate lines and animations once I start to use variables:

;Artificial Intelligence Script

by TheStoryteller01 2011

;Header

desc=

This script only works with FPSC 1.18 or later

Made for dynamic entities that talk to the player.

To start the script at any time, the player has to move the crosshair over the NPC and press <Enter>. 
THIS SCRIPT IS DIFFERENT - IT STARTS WHEN THE PLAYER IS CLOSE ENOUGH TO THE NPC AND CAN BEE SEEN:

While the script is running the player cannot move or use mouselook but still shoot. Pressing <Del> at any time ends the script.

Best ist to set the item properties "Isimmobile" to "Yes" and "Strength" to "0" (=indestructible)

;Triggers

:state=0:state=1

:state=1,plrcanbeseen,plrdistwithin=100:etimerstart,state=11

:state=11:fpgcrawtextsize=24,fpgcrawtextfont=verdana,fpgcrawtextr=051,fpgcrawtextg=204,fpgcrawtextb=255,fpgcrawtextx=50,fpgcrawtexty=10
:state=11:fpgcrawtext= Don't Attack! I only want to get out of here!
:state=11,etimergreater=500,pickobject=1,plrusingaction=1:state=15
:state=11,etimergreater=1500:state=8

:state=15:etimerstart,plrdisable=100000,rotatetoplr,state=21

:state=21:fpgcrawtextsize=26,fpgcrawtextfont=verdana,fpgcrawtextr=000,fpgcrawtextg=000,fpgcrawtextb=255,fpgcrawtextx=50,fpgcrawtexty=80
:state=21:fpgcrawtext=What are you doing down here?
:state=21,etimergreater=500,plrusingaction=1:state=25
:state=21,etimergreater=1500:state=8

:state=25:etimerstart,plrdisable=100000,rotatetoplr,state=31

:state=31:rotatetoplr
:state=31:fpgcrawtextsize=24,fpgcrawtextfont=verdana,fpgcrawtextr=051,fpgcrawtextg=204,fpgcrawtextb=255,fpgcrawtextx=50,fpgcrawtexty=10
:state=31:fpgcrawtext= I don't want to fight you. These spiders badly wounded me.
:state=31,etimergreater=500,pickobject=1,plrusingaction=1:plrdisable=0,state=35

:state=35,pickobject=1,plrdistwithin=60,plrusingaction=1:etimerstart,plrdisable=100000,state=41

:state=41:fpgcrawtextsize=26,fpgcrawtextfont=verdana,fpgcrawtextr=000,fpgcrawtextg=000,fpgcrawtextb=255,fpgcrawtextx=50,fpgcrawtexty=80
:state=41:fpgcrawtext=You are one of the Blood Queen's mercenaries. Why shall I spare you?
:state=41,etimergreater=500,plrusingaction=1:plrdisable=0,state=45
:state=41,etimergreater=1500:plrdisable=0,state=45
:state=41,scancodekeypressed=14:plrdisable=0,state=45

:state=45,pickobject=1,plrdistwithin=60,plrusingaction=1:etimerstart,plrdisable=100000,state=51

:state=51:rotateheadrandom=10
:state=51:fpgcrawtextsize=24,fpgcrawtextfont=verdana,fpgcrawtextr=051,fpgcrawtextg=204,fpgcrawtextb=255,fpgcrawtextx=50,fpgcrawtexty=10
:state=51:fpgcrawtext=I am Dunir the dwarf - not a mercenary. It is true that I was hired by her though.
:state=51,etimergreater=500,plrusingaction=1:plrdisable=0,state=55
:state=51,etimergreater=1500:plrdisable=0,state=55
:state=51,scancodekeypressed=14:plrdisable=0,state=55

:state=55,pickobject=1,plrdistwithin=60,plrusingaction=1:etimerstart,plrdisable=100000,state=61

:state=61:rotateheadrandom=20
:state=61:fpgcrawtextsize=24,fpgcrawtextfont=verdana,fpgcrawtextr=051,fpgcrawtextg=204,fpgcrawtextb=255,fpgcrawtextx=50,fpgcrawtexty=10
:state=61:fpgcrawtext=But only as a miner to find a way down to the tombs!
:state=61,etimergreater=500,plrusingaction=1:plrdisable=0,state=65
:state=61,etimergreater=1500:plrdisable=0,state=65
:state=61,scancodekeypressed=14:plrdisable=0,state=65

:state=65,pickobject=1,plrdistwithin=60,plrusingaction=1:etimerstart,plrdisable=100000,state=65

:state=71:fpgcrawtextsize=26,fpgcrawtextfont=verdana,fpgcrawtextr=000,fpgcrawtextg=000,fpgcrawtextb=255,fpgcrawtextx=50,fpgcrawtexty=80
:state=71:fpgcrawtext=I am listening.
:state=71,etimergreater=500,plrusingaction=1:plrdisable=0,state=75
:state=71,etimergreater=1500:plrdisable=0,state=75
:state=71,scancodekeypressed=14:plrdisable=0,state=75

:state=75,etimergreater=1500:state=100

:state=100,pickobject=1,plrdistwithin=50,plrusingaction=1:timerstart,plrdisable=100000,state=11

;End of Script

+ Code Snippet

;Artificial Intelligence Script

by TheStoryteller01 2011

;Header

desc=

This script only works with FPSC 1.18 or later 

Made for dynamic entities that talk to the player.

To start the script at any time, the player has to move the crosshair over the NPC and press <Enter>. 
THIS SCRIPT IS DIFFERENT - IT STARTS WHEN THE PLAYER IS CLOSE ENOUGH TO THE NPC AND CAN BEE SEEN:

While the script is running the player cannot move or use mouselook but still shoot. Pressing <Del> at any time ends the script.

Best ist to set the item properties "Isimmobile" to "Yes" and "Strength" to "0" (=indestructible)

;Triggers

:state=0:state=1

:state=1,plrcanbeseen,plrdistwithin=100:etimerstart,state=11

:state=11:fpgcrawtextsize=24,fpgcrawtextfont=verdana,fpgcrawtextr=051,fpgcrawtextg=204,fpgcrawtextb=255,fpgcrawtextx=50,fpgcrawtexty=10
:state=11:fpgcrawtext= Don't Attack! I only want to get out of here!
:state=11,etimergreater=500,pickobject=1,plrusingaction=1:state=15
:state=11,etimergreater=1500:state=8

:state=15:etimerstart,plrdisable=100000,rotatetoplr,state=21

:state=21:fpgcrawtextsize=26,fpgcrawtextfont=verdana,fpgcrawtextr=000,fpgcrawtextg=000,fpgcrawtextb=255,fpgcrawtextx=50,fpgcrawtexty=80
:state=21:fpgcrawtext=What are you doing down here?
:state=21,etimergreater=500,plrusingaction=1:state=25
:state=21,etimergreater=1500:state=8

:state=25:etimerstart,plrdisable=100000,rotatetoplr,state=31

:state=31:rotatetoplr
:state=31:fpgcrawtextsize=24,fpgcrawtextfont=verdana,fpgcrawtextr=051,fpgcrawtextg=204,fpgcrawtextb=255,fpgcrawtextx=50,fpgcrawtexty=10
:state=31:fpgcrawtext= I don't want to fight you. These spiders badly wounded me.
:state=31,etimergreater=500,pickobject=1,plrusingaction=1:plrdisable=0,state=35

:state=35,pickobject=1,plrdistwithin=60,plrusingaction=1:etimerstart,plrdisable=100000,state=41

:state=41:fpgcrawtextsize=26,fpgcrawtextfont=verdana,fpgcrawtextr=000,fpgcrawtextg=000,fpgcrawtextb=255,fpgcrawtextx=50,fpgcrawtexty=80
:state=41:fpgcrawtext=You are one of the Blood Queen's mercenaries. Why shall I spare you?
:state=41,etimergreater=500,plrusingaction=1:plrdisable=0,state=45
:state=41,etimergreater=1500:plrdisable=0,state=45
:state=41,scancodekeypressed=14:plrdisable=0,state=45

:state=45,pickobject=1,plrdistwithin=60,plrusingaction=1:etimerstart,plrdisable=100000,state=51

:state=51:rotateheadrandom=10
:state=51:fpgcrawtextsize=24,fpgcrawtextfont=verdana,fpgcrawtextr=051,fpgcrawtextg=204,fpgcrawtextb=255,fpgcrawtextx=50,fpgcrawtexty=10
:state=51:fpgcrawtext=I am Dunir the dwarf - not a mercenary. It is true that I was hired by her though.
:state=51,etimergreater=500,plrusingaction=1:plrdisable=0,state=55
:state=51,etimergreater=1500:plrdisable=0,state=55
:state=51,scancodekeypressed=14:plrdisable=0,state=55

:state=55,pickobject=1,plrdistwithin=60,plrusingaction=1:etimerstart,plrdisable=100000,state=61

:state=61:rotateheadrandom=20
:state=61:fpgcrawtextsize=24,fpgcrawtextfont=verdana,fpgcrawtextr=051,fpgcrawtextg=204,fpgcrawtextb=255,fpgcrawtextx=50,fpgcrawtexty=10
:state=61:fpgcrawtext=But only as a miner to find a way down to the tombs!
:state=61,etimergreater=500,plrusingaction=1:plrdisable=0,state=65
:state=61,etimergreater=1500:plrdisable=0,state=65
:state=61,scancodekeypressed=14:plrdisable=0,state=65

:state=65,pickobject=1,plrdistwithin=60,plrusingaction=1:etimerstart,plrdisable=100000,state=65

:state=71:fpgcrawtextsize=26,fpgcrawtextfont=verdana,fpgcrawtextr=000,fpgcrawtextg=000,fpgcrawtextb=255,fpgcrawtextx=50,fpgcrawtexty=80
:state=71:fpgcrawtext=I am listening.
:state=71,etimergreater=500,plrusingaction=1:plrdisable=0,state=75
:state=71,etimergreater=1500:plrdisable=0,state=75
:state=71,scancodekeypressed=14:plrdisable=0,state=75

:state=75,etimergreater=1500:state=100

:state=100,pickobject=1,plrdistwithin=50,plrusingaction=1:timerstart,plrdisable=100000,state=11

;End of Script

That might sound a little OCD but I even used a system for numbering the states so the different steps are more easily identifiable

In case you find my grammar and spelling weird ---> native German speaker ^^

Back to top

Profile PM Email Website

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 28th Aug 2011 19:47

Link

You've certainly got better documentation for your scripts than I do. XD

And generally I don't use consecutive numbers for states. In the previous script, however, I actually ended up filling in all the space I had left open.

Sadly, it doesn't seem like variables can store text strings, although I'm guessing you're using the fpgcrawtext since it's easier to modify than a hud?

Back to top

Profile PM

The Storyteller 01

15

Years of Service

User Offline

Joined: 11th May 2009

Location: On a silent hill in dead space

Posted: 28th Aug 2011 20:16 Edited at: 29th Aug 2011 02:07

Link

I admit, I LOVE fpgrawtext. It's one of the reasons I haven't ditched FPSC yet

And there is no problem with variables - any state can display text and add/call a variable at the same time (afaik).

In case you find my grammar and spelling weird ---> native German speaker ^^

Back to top

Profile PM Email Website

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 28th Aug 2011 21:08 Edited at: 29th Aug 2011 02:33

Link

Well when I say variables can't store text strings, I mean doing something like:

+ Code Snippet

...
:state=10:setvar=text WORDS
...
:state=20:fpgcrawtext=%text
...

But I've yet to do much with text. I was also thinking of including some rpg elements, so that you can get better at sneaking, run faster, jump higher, punch harder, etc:

;RPG Experience System

desc  = Gain experience, upgrade stats, etc

;Triggers

;Set up global variables
:state=0:dimvar=exp,dimvar=strength,dimvar=speed,dimvar=jump,dimvar=sneak,dimvar=player_level
:state=0:dimlocalvar=exp_needed,setvar=player_level 1,setvar=exp 0

:state=0,varless=strength 100:setvar=strength 100
:state=0,varless=speed 100:setvar=speed 100
:state=0,varless=jump 100:setvar=jump 100
:state=0,varless=sneak 0:setvar=sneak 0
:state=0,varless=exp 0:setvar=exp 0

:state=0:state=10

;Determine how much exp is needed for the next level
:state=10:setvar=exp_needed 100,mulvar=exp_needed %player_level
:state=10:state=20

;Change the player's stats
:state=20:setplrspeedmod=%speed,setplrjumpmod=%jump,setplayerstrength=%strength
:state=20:state=30

;Reset exp, increase level, go to stat increase menu
:state=30,vargreater=exp %exp_needed:setvar=exp 0,incvar=player_level 1,state=40

;Choose your stat increases
:state=40:plrdisable=10000,state=50
:state=50,scancodekeypressed=2:plrdisable=0,incvar=strength 100,state=10
:state=50,scancodekeypressed=3:plrdisable=0,incvar=speed 100,state=10
:state=50,scancodekeypressed=4:plrdisable=0,incvar=jump 100,state=10
:state=50,scancodekeypressed=5:plrdisable=0,incvar=sneak 100,state=10

;End

+ Code Snippet

;RPG Experience System

desc  = Gain experience, upgrade stats, etc

;Triggers

;Set up global variables
:state=0:dimvar=exp,dimvar=strength,dimvar=speed,dimvar=jump,dimvar=sneak,dimvar=player_level
:state=0:dimlocalvar=exp_needed,setvar=player_level 1,setvar=exp 0

:state=0,varless=strength 100:setvar=strength 100
:state=0,varless=speed 100:setvar=speed 100
:state=0,varless=jump 100:setvar=jump 100
:state=0,varless=sneak 0:setvar=sneak 0
:state=0,varless=exp 0:setvar=exp 0

:state=0:state=10

;Determine how much exp is needed for the next level
:state=10:setvar=exp_needed 100,mulvar=exp_needed %player_level
:state=10:state=20

;Change the player's stats
:state=20:setplrspeedmod=%speed,setplrjumpmod=%jump,setplayerstrength=%strength
:state=20:state=30

;Reset exp, increase level, go to stat increase menu
:state=30,vargreater=exp %exp_needed:setvar=exp 0,incvar=player_level 1,state=40

;Choose your stat increases
:state=40:plrdisable=10000,state=50
:state=50,scancodekeypressed=2:plrdisable=0,incvar=strength 100,state=10
:state=50,scancodekeypressed=3:plrdisable=0,incvar=speed 100,state=10
:state=50,scancodekeypressed=4:plrdisable=0,incvar=jump 100,state=10
:state=50,scancodekeypressed=5:plrdisable=0,incvar=sneak 100,state=10

;End

however my ineptitude with code prevents me from quite figuring out what my mistakes here are (probably doesn't help that it's pretty roughly put together at the moment).

But basically, it works like this:

+ Code Snippet

...
:state=1:setvar=awareness 0,subvar=awareness sneak,addvar=awareness %stealth
:state=1,plrcanbeseen,aicanshoot=1,plrdistwithin=%awareness:state=999
...

EDIT: Accidentally put an older version of some of the scripts up.

Back to top

Profile PM

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 28th Aug 2011 21:20

Link

Actually I figured out the problem: the "incvar" command. It doesn't work with custom variables it seems.

Back to top

Profile PM

Scimitar

13

Years of Service

User Offline

Joined: 24th Apr 2011

Location:

Posted: 29th Aug 2011 02:39 Edited at: 29th Aug 2011 02:40

Link

So, I've been trying to fix that leveling script:

;RPG Experience System

desc  = Gain experience, upgrade stats, etc

;Triggers

;Set up global variables
:state=0:dimvar=exp,dimvar=strength,dimvar=speed,dimvar=jump,dimvar=sneak,dimvar=player_level
:state=0:dimlocalvar=exp_needed

;Make Levelup HUD
:state=0:hudreset,hudx=50,hudy=10,hudtext=Level Up!,hudsize=36,hudname=levelup1,hudhide=1,hudmake=display
:state=0:hudreset,hudx=50,hudy=30,hudtext=Speed,hudsize=12,hudname=levelup2,hudhide=1,hudmake=display
:state=0:hudreset,hudx=50,hudy=40,hudtext=Sneak,hudsize=12,hudname=levelup3,hudhide=1,hudmake=display
:state=0:hudreset,hudx=50,hudy=50,hudtext=Strength,hudsize=12,hudname=levelup4,hudhide=1,hudmake=display
:state=0:hudreset,hudx=50,hudy=60,hudtext=Jump,hudsize=12,hudname=levelup5,hudhide=1,hudmake=display

:state=0:state=10

;Make sure player has at least the minimum stats
:state=10,varless=strength 100:setvar=strength 100
:state=10,varless=speed 80:setvar=speed 80
:state=10,varless=jump 100:setvar=jump 100
:state=10,varless=sneak 0:setvar=sneak 0
:state=10,varless=exp 0:setvar=exp 0
:state=10,varless=exp_needed 100:setvar=exp_needed 100
:state=10,varless=player_level 1:setvar=player_level 1

;Determine how much exp is needed for the next level
:state=10:mulvar=exp_needed %player_level
:state=10:state=20

;Change the player's stats
:state=20:setplrspeedmod=%speed,setplrjumpmod=%jump,setplayerstrength=%strength
:state=20:state=30

;Reset exp, increase level, go to stat increase menu
:state=30,vargreater=exp %exp_needed:setvar=exp 0,addvar=player_level 1,pausegame,state=40

;Choose your stat increases
:state=40:hideall,hudshow=levelup1,hudshow=levelup2,hudshow=levelup3,hudshow=levelup4,hudshow=levelup5
:state=40:showcursor,state=50

:state=50,hudmouseup=levelup2 1:addvar=speed 5,state=60
:state=50,hudmouseup=levelup3 1:addvar=sneak 100,state=60
:state=50,hudmouseup=levelup4 1:addvar=strength 5,state=60
:state=50,hudmouseup=levelup5 1:addvar=jump 5,state=60

:state=60:resumegame,hidecursor,hudfadeout=levelup1,hudfadeout=levelup2,hudfadeout=levelup3,hudfadeout=levelup4,hudfadeout=levelup5,state=10

;End

+ Code Snippet

;RPG Experience System

desc  = Gain experience, upgrade stats, etc

;Triggers

;Set up global variables
:state=0:dimvar=exp,dimvar=strength,dimvar=speed,dimvar=jump,dimvar=sneak,dimvar=player_level
:state=0:dimlocalvar=exp_needed

;Make Levelup HUD
:state=0:hudreset,hudx=50,hudy=10,hudtext=Level Up!,hudsize=36,hudname=levelup1,hudhide=1,hudmake=display
:state=0:hudreset,hudx=50,hudy=30,hudtext=Speed,hudsize=12,hudname=levelup2,hudhide=1,hudmake=display
:state=0:hudreset,hudx=50,hudy=40,hudtext=Sneak,hudsize=12,hudname=levelup3,hudhide=1,hudmake=display
:state=0:hudreset,hudx=50,hudy=50,hudtext=Strength,hudsize=12,hudname=levelup4,hudhide=1,hudmake=display
:state=0:hudreset,hudx=50,hudy=60,hudtext=Jump,hudsize=12,hudname=levelup5,hudhide=1,hudmake=display

:state=0:state=10

;Make sure player has at least the minimum stats
:state=10,varless=strength 100:setvar=strength 100
:state=10,varless=speed 80:setvar=speed 80
:state=10,varless=jump 100:setvar=jump 100
:state=10,varless=sneak 0:setvar=sneak 0
:state=10,varless=exp 0:setvar=exp 0
:state=10,varless=exp_needed 100:setvar=exp_needed 100
:state=10,varless=player_level 1:setvar=player_level 1

;Determine how much exp is needed for the next level
:state=10:mulvar=exp_needed %player_level
:state=10:state=20

;Change the player's stats
:state=20:setplrspeedmod=%speed,setplrjumpmod=%jump,setplayerstrength=%strength
:state=20:state=30

;Reset exp, increase level, go to stat increase menu
:state=30,vargreater=exp %exp_needed:setvar=exp 0,addvar=player_level 1,pausegame,state=40

;Choose your stat increases
:state=40:hideall,hudshow=levelup1,hudshow=levelup2,hudshow=levelup3,hudshow=levelup4,hudshow=levelup5
:state=40:showcursor,state=50

:state=50,hudmouseup=levelup2 1:addvar=speed 5,state=60
:state=50,hudmouseup=levelup3 1:addvar=sneak 100,state=60
:state=50,hudmouseup=levelup4 1:addvar=strength 5,state=60
:state=50,hudmouseup=levelup5 1:addvar=jump 5,state=60

:state=60:resumegame,hidecursor,hudfadeout=levelup1,hudfadeout=levelup2,hudfadeout=levelup3,hudfadeout=levelup4,hudfadeout=levelup5,state=10

;End

but the cursor won't show up. :/

Anyways, I've also updated the zone scripts to match with the changes made to the stealth variables.

+ Code Snippet

;No Light Zone (Stealth)

desc = No Light Zone (Stealth)

;Triggers
:state=0:state=10

;if farther than a segment from the edge of zone, totally hidden
:state=10,plrwithinzone=1:setvar=stealth 0,state=20
:state=20,plrwithinzone=0:subvar=stealth 0,state=10

+ Code Snippet

;Dim Light Zone (Stealth)

desc = Dim Light Zone (Stealth)

;Triggers
:state=0:state=10

;if within a segment, partially visible
:state=10,plrwithinzone=1:setvar=stealth 500,state=20
:state=20,plrwithinzone=0:subvar=stealth 500,state=10

+ Code Snippet

;High Light Zone (Stealth)

desc = High Light Zone (Stealth)

;Triggers
:state=0:state=10

;if player is in zone, highly visible
:state=10,plrwithinzone=1:addvar=stealth 1000,state=20
:state=20,plrwithinzone=0:subvar=stealth 1000,state=10

Unfortunately they aren't as smooth at transitions as I'd like, but they do serve their purpose. Hmmm, after all this, I should probably make a level to see if they can actually be combined into something fun and playable. So far I've mostly just been testing these scripts to see if they work, not if they work well as gameplay.

Back to top

Profile PM

ajkcool

14

Years of Service

User Offline

Joined: 31st Dec 2009

Location: Home

Posted: 25th Sep 2011 09:08

Link

so, which ones actually work, and what do i set them to?

"Hey everyone, I love you." jk

Back to top

Profile PM Email

Sorry your browser is not supported!

FPSC Classic Scripts / Workaround with Lights and Stealth

Attachments

Attachments