Forum

Stranded II

General

Realistic hunting script?

Forums overview Stranded II overview General overview Log in to reply

Realistic hunting script?

12 replies

Realistic hunting script?

Lion_Hearted
User Off

Offline

31.03.11 01:04:36 am

Hello,

I have been for the last several weeks, devising a more realistic hunting system for stranded 2. In games such as deer hunter, and in real life its rare that a newbie hit the animal every time. When you land on the island, you have 0 skill points in the hunting department... and yet if you have experience in playing the game you can hit a lion with two direct hits with a spear and beat him.

In real life that would just not be so...

I want to make a script that incorporates the following into the item script.

Damage is based on a 4 fold area...

Miss, graze, wound, critical hit.

Which of these 4 areas would depend on your, hunting skill, and your distance from the target...

A miss would be 0 damage, a graze would be a low amount of damage, a wound would be a decent amount of damage and bleeding for a short amount of time, critical hit would be a drop dead hit.

The farther away your target is, and the lower your skill level, the more likely it is to miss the animal, or graze it... the higher your skill level, and the closer the animal is, the more likely to wound it, or even critically hit it.

A critical hit can easily be explained by a hit to the heart, lungs, or even the neck's air pipe or main blood vein. Obviously you're not going to get too many of those until your skill level is high, like 400 to 500...

Also, instead of finding your arrow, or spear where you hit the animal, there would be a certain percentage of a chance for the spear to get stuck in the animal, especially if it was a critical hit, unlikely if it was a graze. The arrow would get stuck in the animal at a wound or a critical hit.

This script is possible with the player distance commands and of course the skill commands. Certain random factors would make it possible as well. Cause a newbie can surprise a veteran every once in a while and so can a veteran lose some times.

My question is, is anyone interested in such a script?

Re: Realistic hunting script?

hoodedbella
User Off

Offline

31.03.11 01:22:43 am

i would be interested in it to add to my mod, (with your permission ofcourse) to help make it harder

Re: Realistic hunting script?

Xaeveax
User Off

Offline

31.03.11 02:30:15 am

That sounds like a brilliant idea. It would certainly add a new level of challenge to the game. Love it.

Re: Realistic hunting script?

Lion_Hearted
User Off

Offline

31.03.11 01:46:59 pm

Is there any extra ideas though, to make it more realistic.

I have no RL hunting experience, so I'm rather vague in that area. Those of you who do hunt could help me out here...

Re: Realistic hunting script?

Xaeveax
User Off

Offline

31.03.11 02:31:35 pm

Well, from what you have already planned, if you add anything else, it will be crazy complicated to script. You COULD potentially make it so that you have to take the bullets out of the animal and such before it gets lead poisoning and becomes unsafe to eat, or maybe make it so that once it is dead, instead of disappearing overnight, it leaves a pile of bones, but that's not really "hunting" stuff. Hmmm...

Maybe a good idea would be to make it possible to zoom in (like with a sniper scope) so that you could hit things that are too far away to see. I tried making a scope system by modifying the script for the telescope in the Ext. Mod, but it didn't work. If anybody could get it so that you can still move and aim while zoomed, it would be truly amazing, not to mention it would add a level of realism to he game.

Re: Realistic hunting script?

Lion_Hearted
User Off

Offline

31.03.11 03:41:54 pm

Lead bullets creating lead poisoning is realistic...

But rarely do I ever use guns in stranded 2...

An arblaster is so much easier to get the ammo for...

As for a script that would allow you to aim, that would be pretty easy... I think...

Just make a model for the player that would include that specific image... when you activated the zoom the event would trigger a model change... and you would have a piece of your model image in-front of the forward view camera...

The model would have to be introverted in order for you to see it, since your looking from the inside of the model.

But those graphics are a whole diffrent deal... its possible that I do that deal some time in the future... but... I'm interested in the script, not in the graphics right now.

Leaving a pile of bones would also be a graphical script.

Lead poisoning though is definatly something to check out...

Re: Realistic hunting script?

UnIdEnTiFiEd
User Off

Offline

03.04.11 09:52:55 am

I like your enthusiasm towards this hunting script and I thought you may need some more ideas and i thought, food poisoning.

For example, you leave some food coated with poison on the ground, an animal comes up to it, eats it and gets poisened, dies, and you take it's stuff. But then you will have to boil the meat or something to get the poison out to eat it, or use its meat to poison more animals.

Re: Realistic hunting script?

Xaeveax
User Off

Offline

03.04.11 12:16:23 pm

Quote

For example, you leave some food coated with poison on the ground, an animal comes up to it, eats it and gets poisened, dies, and you take it's stuff. But then you will have to boil the meat or something to get the poison out to eat it, or use its meat to poison more animals.

That's quite a cool idea!

Re: Realistic hunting script?

Lion_Hearted
User Off

Offline

04.04.11 10:35:43 am

Very good idea, and very possible for some future mod...

I just got a new computer, and I haven't had the time to transfer all my stranded 2 tools and scripts so the hunting script is sorta on hold...

Right now, I got the script to insert an arrow, or bullet, or basically anything I want INTO the animal. So if you shoot an animal with an arrow, get a wound status, the arrow will lodge itself inside the animal and you'll be able to get it when you get the meat and etc later...

Edit:>

Could someone give me an example on how this command?

playerdistance "Class", ID

edited 1×, last 06.04.11 02:41:19 am

Re: Realistic hunting script?

Xaeveax
User Off

Offline

06.04.11 10:19:16 am

1
2
3
4

if (playerdistance("self")<200) {
	play "randomsong.wav";
	msg "This is a testing script!";
  }

That's one way it could be used.

Re: Realistic hunting script?

Lion_Hearted
User Off

Offline

06.04.11 02:13:15 pm

Good,

How about something like this...?

1
2
3
4
5
6
7

on:impact {
		$tmp=impact_class();
		$tmp2=impact_id();		
		$tmp3=playerdistance $tmp,$tmp2;
		if (compare_material($tmp,$tmp2,"flesh")==1){
			if (skillvalue("hunt")<=50){
				if ($tmp3<=50){

The code above doesn't work by the way... its just an example of what I want...

I'm currently trying to find a way to use that command so it grabs $tmp and $tmp2's values, checks the distance, and then sees if its above or below 50, 100, 150, 200. (still gotta tweak with the distance settings, but thats going to require gameplay...

Edit:

So far, I have this script done, and from my beta testing it appears to be working excellent...

Spoiler

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255

script=start

on:impact {
	$tmp=impact_class();
	$tmp2=impact_id();
	$fac1=random(1,5);
	if (compare_material($tmp,$tmp2,"flesh")==1){
		if (skillvalue("hunt")<=50){
			if ($fac1==1){
				damage $tmp,$tmp2,19;
				msg "Wound hit!",1;
				addstate $tmp,$tmp2,"bleeding";
				statevalue $tmp,$tmp2,"bleeding",7;
				local $tmp3;
				$tmp3=create("item",200,0,0,1);
				store $tmp3,$tmp,$tmp2;
				freevar $tmp3;
			}
			elseif ($fac1==2){
				damage $tmp,$tmp2,5;
				msg "Grazed it!",1;
				$tmp=create("item",200);
				setpos "item",$tmp,impact_x(),impact_y(),impact_z();
				setrot "item",$tmp,0,getyaw("unit",1),0;
			}
			elseif ($fac1==3){
				damage $tmp,$tmp2,5;
				msg "Grazed it!",1;
				$tmp=create("item",200);
				setpos "item",$tmp,impact_x(),impact_y(),impact_z();
				setrot "item",$tmp,0,getyaw("unit",1),0;
			}
			elseif ($fac1==4){
				msg "Missed!",1;
				$tmp=create("item",200);
				setpos "item",$tmp,impact_x(),impact_y(),impact_z();
				setrot "item",$tmp,0,getyaw("unit",1),0;
			}
			elseif ($fac1==5){
				msg "Missed!",1;
				$tmp=create("item",200);
				setpos "item",$tmp,impact_x(),impact_y(),impact_z();
				setrot "item",$tmp,0,getyaw("unit",1),0;
			}
		}
		elseif (skillvalue("hunt")>50,<=100){
			if ($fac1==1){
				damage $tmp,$tmp2,999;
				msg "Critical hit!",1;
				addstate $tmp,$tmp2,"bleeding";
				statevalue $tmp,$tmp2,"bleeding",7;
				local $tmp3;
				$tmp3=create("item",200,0,0,1);
				store $tmp3,$tmp,$tmp2;
				freevar $tmp3;
			}
			elseif ($fac1==2){
				damage $tmp,$tmp2,19;
				msg "Wound hit!",1;
				addstate $tmp,$tmp2,"bleeding";
				statevalue $tmp,$tmp2,"bleeding",7;
				local $tmp3;
				$tmp3=create("item",200,0,0,1);
				store $tmp3,$tmp,$tmp2;
				freevar $tmp3;
			}
			elseif ($fac1==3){
				damage $tmp,$tmp2,19;
				msg "Wound hit!",1;
				addstate $tmp,$tmp2,"bleeding";
				statevalue $tmp,$tmp2,"bleeding",7;
				local $tmp3;
				$tmp3=create("item",200,0,0,1);
				store $tmp3,$tmp,$tmp2;
				freevar $tmp3;
			}
			elseif ($fac1==4){
				damage $tmp,$tmp2,5;
				msg "Grazed it!",1;
				$tmp=create("item",200);
				setpos "item",$tmp,impact_x(),impact_y(),impact_z();
				setrot "item",$tmp,0,getyaw("unit",1),0;
			}
			elseif ($fac1==5){
				msg "Missed!",1;
				$tmp=create("item",200);
				setpos "item",$tmp,impact_x(),impact_y(),impact_z();
				setrot "item",$tmp,0,getyaw("unit",1),0;
			}
		}
		elseif (skillvalue("hunt")>100,<=150){
			if ($fac1==1){
				damage $tmp,$tmp2,999;
				msg "Critical hit!",1;
				addstate $tmp,$tmp2,"bleeding";
				statevalue $tmp,$tmp2,"bleeding",7;
				local $tmp3;
				$tmp3=create("item",200,0,0,1);
				store $tmp3,$tmp,$tmp2;
				freevar $tmp3;
			}
			elseif ($fac1==2){
				damage $tmp,$tmp2,999;
				msg "Critical hit!",1;
				addstate $tmp,$tmp2,"bleeding";
				statevalue $tmp,$tmp2,"bleeding",7;
				local $tmp3;
				$tmp3=create("item",200,0,0,1);
				store $tmp3,$tmp,$tmp2;
				freevar $tmp3;
			}
			elseif ($fac1==3){
				damage $tmp,$tmp2,19;
				msg "Wound hit!",1;
				addstate $tmp,$tmp2,"bleeding";
				statevalue $tmp,$tmp2,"bleeding",7;
				local $tmp3;
				$tmp3=create("item",200,0,0,1);
				store $tmp3,$tmp,$tmp2;
				freevar $tmp3;
			}
			elseif ($fac1==4){
				damage $tmp,$tmp2,5;
				msg "Grazed it!",1;
				$tmp=create("item",200);
				setpos "item",$tmp,impact_x(),impact_y(),impact_z();
				setrot "item",$tmp,0,getyaw("unit",1),0;
			}
			elseif ($fac1==5){
				damage $tmp,$tmp2,19;
				msg "Wound hit!",1;
				addstate $tmp,$tmp2,"bleeding";
				statevalue $tmp,$tmp2,"bleeding",7;
				local $tmp3;
				$tmp3=create("item",200,0,0,1);
				store $tmp3,$tmp,$tmp2;
				freevar $tmp3;
			}
		}
		elseif (skillvalue("hunt")>150,<=200){
			if ($fac1==1){
				damage $tmp,$tmp2,999;
				msg "Critical hit!",1;
				addstate $tmp,$tmp2,"bleeding";
				statevalue $tmp,$tmp2,"bleeding",7;
				local $tmp3;
				$tmp3=create("item",200,0,0,1);
				store $tmp3,$tmp,$tmp2;
				freevar $tmp3;
			}
			elseif ($fac1==2){
				damage $tmp,$tmp2,999;
				msg "Critical hit!",1;
				addstate $tmp,$tmp2,"bleeding";
				statevalue $tmp,$tmp2,"bleeding",7;
				local $tmp3;
				$tmp3=create("item",200,0,0,1);
				store $tmp3,$tmp,$tmp2;
				freevar $tmp3;
			}
			elseif ($fac1==3){
				damage $tmp,$tmp2,999;
				msg "Critical hit!",1;
				addstate $tmp,$tmp2,"bleeding";
				statevalue $tmp,$tmp2,"bleeding",7;
				local $tmp3;
				$tmp3=create("item",200,0,0,1);
				store $tmp3,$tmp,$tmp2;
				freevar $tmp3;
			}
			elseif ($fac1==4){
				damage $tmp,$tmp2,19;
				msg "Wound hit!",1;
				addstate $tmp,$tmp2,"bleeding";
				statevalue $tmp,$tmp2,"bleeding",7;
				local $tmp3;
				$tmp3=create("item",200,0,0,1);
				store $tmp3,$tmp,$tmp2;
				freevar $tmp3;
			}
			elseif ($fac1==5){
				damage $tmp,$tmp2,19;
				msg "Wound hit!",1;
				addstate $tmp,$tmp2,"bleeding";
				statevalue $tmp,$tmp2,"bleeding",7;
				local $tmp3;
				$tmp3=create("item",200,0,0,1);
				store $tmp3,$tmp,$tmp2;
				freevar $tmp3;
			}
		}
		elseif (skillvalue("hunt")>200){
			if ($fac1==1){
				damage $tmp,$tmp2,999;
				msg "Critical hit!",1;
				addstate $tmp,$tmp2,"bleeding";
				statevalue $tmp,$tmp2,"bleeding",7;
				local $tmp3;
				$tmp3=create("item",200,0,0,1);
				store $tmp3,$tmp,$tmp2;
				freevar $tmp3;
			}
			elseif ($fac1==2){
				damage $tmp,$tmp2,999;
				msg "Critical hit!",1;
				addstate $tmp,$tmp2,"bleeding";
				statevalue $tmp,$tmp2,"bleeding",7;
				local $tmp3;
				$tmp3=create("item",200,0,0,1);
				store $tmp3,$tmp,$tmp2;
				freevar $tmp3;
			}
			elseif ($fac1==3){
				damage $tmp,$tmp2,999;
				msg "Critical hit!",1;
				addstate $tmp,$tmp2,"bleeding";
				statevalue $tmp,$tmp2,"bleeding",7;
				local $tmp3;
				$tmp3=create("item",200,0,0,1);
				store $tmp3,$tmp,$tmp2;
				freevar $tmp3;
			}
			elseif ($fac1==4){
				damage $tmp,$tmp2,999;
				msg "Critical hit!",1;
				addstate $tmp,$tmp2,"bleeding";
				statevalue $tmp,$tmp2,"bleeding",7;
				local $tmp3;
				$tmp3=create("item",200,0,0,1);
				store $tmp3,$tmp,$tmp2;
				freevar $tmp3;
			}
			elseif ($fac1==5){
				damage $tmp,$tmp2,999;
				msg "Critical hit!",1;
				addstate $tmp,$tmp2,"bleeding";
				statevalue $tmp,$tmp2,"bleeding",7;
				local $tmp3;
				$tmp3=create("item",200,0,0,1);
				store $tmp3,$tmp,$tmp2;
				freevar $tmp3;
			}
		}
	}
	elseif (compare_material($tmp,$tmp2,"flesh")==0){
		$tmp=create("item",200);
		setpos "item",$tmp,impact_x(),impact_y(),impact_z();
		setrot "item",$tmp,0,getyaw("unit",1),0;
	}
	freevar $tmp;
	freevar $tmp2;
	freevar $fac1;
}
	
script=end

Once I figure out how to use the player distance command I'll be implementing that in there... the closer you are to the animal, the easier it will be to hit it.

I could use some help in that general area...

edited 1×, last 07.04.11 09:57:58 pm

Re: Realistic hunting script?

Yates
Reviewer Off

Offline

07.04.11 10:15:49 pm

I will be waiting..
Well, I'll be planting hemp until this is done.

Re: Realistic hunting script?

Lion_Hearted
User Off

Offline

13.04.11 01:29:59 am

The hunting script is done, all I have to do now is adjust it to each projectile in stranded 2, and release it for you guys to beta test... When your playing with a code that big, there's bound to be bugs...

Give thanks to DC for helping me with pieces of the code...