[added] Bushcraft skill stat added

locations/Cheatmenu_din.qsrc

@@ -966,6 +966,7 @@ $cheatmenu['stats'] = {
 	*p 'Kicks (<<kick_lvl>>) - Total (<<pcs_kick>>): ' & dynamic $cheatmenu['printStatLinks'], 'kick', 'Kicks'
 	*p 'Defence (<<def_lvl>>) - Total (<<pcs_def>>): ' & dynamic $cheatmenu['printStatLinks'], 'def', 'Defence'
 	*p 'Marksmanship (<<shoot_lvl>>) - Total (<<pcs_shoot>>): ' & dynamic $cheatmenu['printStatLinks'], 'shoot', 'Marksmanship'
+	*p 'Bushcraft (<<bushcraft_lvl>>) - Total (<<pcs_bushcraft>>): ' & dynamic $cheatmenu['printStatLinks'], 'bushcraft', 'Bushcraft'
 	*nl
 	*pl'<b>Craft:</b>'
 	*p 'Singing (<<vokal_lvl>>) - Total (<<pcs_vokal>>): ' & dynamic $cheatmenu['printStatLinks'], 'vokal', 'Singing'

locations/hunter_interactions.qsrc

@@ -675,133 +675,7 @@ if $ARGS[0] = 'huntersmokBJ':
 end
 
 !TODO:: Move conditional into meal table or chat with hunter. Also different comments depending on attitude
-if $ARGS[0] = 'naked_encounter':
-	if huntersKnowSlut = 0 and $clothingworntype = 'nude':
-		cla
-		*clr
-		gs 'stat'
-
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/swampdvornude.jpg"></center>'
-		'You notice the hunters ogling your body while you are walking around naked. You subconsciously cover up your private parts'
-
-		if FUNC('lost_clothes_here','swamphouse') = 1 and $lastwornclothingtype ! 'nude':
-			act 'Run inside and get dressed':
-				*clr & cla
-				minut += 5
-				gs 'underwear', 'wear'
-				gs 'clothing', 'recover_lost_clothes', 'swamphouse', 1
-
-				'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/swampdvornude1.jpg"></center>'
-				'You rush inside the hut so you can get dressed.'
-				act'Further':gt 'swamphouse'
-			end
-		else
-			act 'Run inside and cover up with a burlap sack':
-				*clr & cla
-				minut+=5
-				gs 'clothing', 'swamp_clothes', 1
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/tkan_cloth.jpg"></center>'
-				'You quickly rush inside the hut and wear a sack... It''s not much, but at least it''s better than nothing.'
-				act'Further':gt 'swamphouse'
-			end
-		end
 
-		!TODO: Make this dependent on exhibitionist or inhibition
-		act 'Drop your hands':
-			*clr & cla
-			gs 'arousal', 'flash', 5, 'exhibitionism'
-			gs 'arousal', 'end'
-			hunterknowday = daystart
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/swampdvornude2.jpg"></center>'
-			'You decide you do not mind the men seeing you naked. You drop your hands and let the men stare at your tits and ass all they want.'
-
-			!Nudity reactions. Might need to split into more  events if it gets too massive
-			if hunter_sexual_comfort < 40:
-				if hunter_collective_opinion > 45:
-					hunter_sexual_comfort += 5
-					'"<<$pcs_nickname>>, why are you not wearing clothes?" says Sergei'
-					'"Leave the girl alone Sergei. It is just us around. In fact, we should go naked too!" says Andrei and starts unzippping his jacket'
-					'"Okay, okay, you made your point, you do not have to do a striptease now. <<$pcs_nickname>>, you can do whatever you are comfortable with. You are among friends." says Sergei'
-					act 'Further': gt 'swamp_yard'
-				elseif hunter_collective_opinion > 25:
-					hunter_sexual_comfort += 3
-					hunter_collective_opinion -= 1
-
-					'"Well well, we have ourselves a free spirit here!" says Andrei'
-					'"<<$pcs_nickname>>, we like you. But please cover up, we are all men here and it is making us uncomfortable to see you naked like this." says Sergei'
-					act 'Further': gt 'swamp_yard'
-				else
-					hunter_sexual_comfort += 3
-					hunter_collective_opinion -= 3
-					'"What in the hell are you doing you dumb girl, put something on!" says Sergei'
-					'"Seriously <<$pcs_nickname>>. It is not very ladylike to expose yourself to some men you barely know. What if we were people with less than good intentions?" says Igor'
-					act 'Further': gt 'swamp_yard'
-				end
-			elseif hunter_sexual_comfort < 75:
-				if hunter_collective_opinion > 45:
-					hunter_sexual_comfort += 5
-					hunter_collective_opinion += 5
-					'"Wow nice dress!" says Andrei, grinning, and gives you a playful fondle and slap on the ass'
-					gs 'arousal', 'fondling'
-					
-					!TODO: Find an image for here, preferably gif
-					'"You sure do look good, <<$pcs_nickname>>" says Igor before pulling you in for a kiss.'
-					
-					act 'Return the kiss':
-						*clr & cla
-						!TODO: find image that fits here
-						'You happily return the kiss, not caring if you are making out completely naked outside with the other men watching you'
-						!TODO: find image that fits here
-						'Igor''s fingers explore your body, fondling your tits and ass before slipping in your pussy.'
-						'You start grinding against his fingers before he pulls back out and gives you a smirk before walking back, leaving you aching for more.'
-						
-						gs 'arousal', 'kiss', 5, 'exhibitionism'
-						gs 'arousal', 'vaginal_fingering', 5, 'sub'
-						gs 'arousal', 'end'
-						gs 'stat'
-
-
-						act 'Further': gt 'swamp_yard'
-					end
-
-					act 'Lightly push him away':
-						*clr & cla
-						hunter_sexual_comfort -= 3
-						hunter_collective_opinion += 5
-						
-						'"Whoa there guy! Getting ahead of ourselves aren''t we?" you say before giving Igor a slap on the ass.'
-						'He looks at you with a mix of confusion and amusement'
-						
-						gs 'arousal', 'fondling', 5, 'dom'
-						gs 'arousal', 'end'
-						gs 'stat'
-
-						act 'Further': gt 'swamp_yard'
-					end	
-
-				elseif hunter_collective_opinion > 25:
-					hunter_sexual_comfort += 5
-					hunter_collective_opinion += 3
-				
-					'"That''s the spirit <<$pcs_nickname>>. You have got nothing to hide so why hide it?" says Andrei'
-					'"I...uh...wow." stammers Igor. "Still not used to you prancing around like that"'
-					act 'Help him get more used to it':	gs 'swamp_yard', 'igor_demonstration'
-				else
-					hunter_sexual_comfort += 5
-					hunter_collective_opinion += 1
-
-					'"What in the hell are you doing you dumb girl, put something on" says Sergei'
-					'"Leave her Sergei, she is not useful for anything else anyway. Might as well be eye candy and easy acccess for a quick fuck." says Andrei'
-					'"In fact, let me demonstrate" he says before looking at you, grinning wolfishly"'
-					gs 'swamp_yard', 'andrei_quick_fuck'
-				end
-			act'Keep moving':gt 'swamp_yard'
-			end
-		end	
-	end
-end
 
 if $ARGS[0] = 'cum_comment':
     if ($clothingworntype = 'nude' and arrsize('sparrvol') > 0) or cumloc[11] = 1:

locations/obj_din.qsrc

@@ -325,6 +325,7 @@ if $ARGS[0] = 'skills':
 	if pcs_ftbll > 0: 'Football - <<pcs_ftbll>>'
 	if pcs_wrstlng > 0: 'Wrestling - <<pcs_wrstlng>>'
 	if pcs_shoot > 0: 'Shooting Accuracy - <<pcs_shoot>>'
+	if pcs_bushcraft > 0: 'Bushcraft - <<pcs_bushcraft>>'
 	if pcs_chess > 0: 'Chess - <<pcs_chess>>'
 	if pcs_icesktng > 0: 'Ice Skating - <<pcs_icesktng>>'
 	if pcs_gaming > 0: 'Gaming - <<pcs_gaming>>'

locations/preSYS.qsrc

@@ -1102,6 +1102,7 @@ if $ARGS[0] = 'jock':
 	shampoo = 20
 	tampon = 20
 	pcs_run = 20
+	pcs_bushcraft = 5
 	pcs_ftbll = 10
 	pcs_vball = 10
 	pcs_danc = 10

locations/preSYS2.qsrc

@@ -437,6 +437,7 @@ if $ARGS[0] = 'modskl_spo':
 	gs 'preSYS2', 'modrel_setup2', 'pcs_ftball', 'Football'
 	gs 'preSYS2', 'modrel_setup2', 'pcs_wrstlng', 'Wrestling'
 	gs 'preSYS2', 'modrel_setup2', 'pcs_shoot', 'Marskmanship'
+	gs 'preSYS2', 'modrel_setup2', 'pcs_bushcraft', 'Bushcraft'
 	gs 'preSYS2', 'modrel_setup2', 'pcs_chess', 'Chess'
 	gs 'preSYS2', 'modrel_setup2', 'pcs_icesktng', 'Ice Skating'
 	gs 'preSYS2', 'modrel_setup2', 'pcs_gaming', 'Gaming'
@@ -528,6 +529,7 @@ if $ARGS[0] = 'none':
 	pcs_ftball = 0
 	pcs_wrstlng = 0
 	pcs_shoot = 0
+	pcs_bushcraft = 0
 	pcs_chess = 0
 	pcs_icesktng = 0
 	pcs_gaming = 0

locations/stat_display.qsrc

@@ -368,6 +368,7 @@ else
 		if pcs_ftbll > 0: gs 'show_table', '<<pcs_ftbll>> Football', '2'
 		if pcs_wrstlng > 0: gs 'show_table', '<<pcs_wrstlng>> Wrestling', '2'
 		if pcs_shoot > 0: gs 'show_table', '<<pcs_shoot>> Marksmanship', '2'
+		if pcs_bushcraft > 0: gs 'show_table', '<<pcs_bushcraft>> Bushcraft', '2'	
 		if pcs_chess > 0: gs 'show_table', '<<pcs_chess>> Chess', '2'
 		if pcs_icesktng > 0: gs 'show_table', '<<pcs_icesktng>> Ice Skating', '2'
 		if pcs_gaming > 0: gs 'show_table', '<<pcs_gaming>> Gaming', '2'

locations/stat_sklattrib.qsrc

@@ -84,6 +84,7 @@ $skl_name[31] = 'heels'
 $skl_name[32] = 'pool'
 $skl_name[33] = 'inhib'
 $skl_name[34] = 'perform'
+$skl_name[35] = 'bushcraft'
 
 !!Trait Section
 !!This is where Traits that will affect attribute or skill advancement or degradation have those aspects defined.

locations/stat_sklattrib_lvlset.qsrc

@@ -54,6 +54,10 @@ def[1] = 0 & def[2] = 1 & def[3] = 4 & def[4] = -1
 pcs_shoot = (shoot_lvl + (pcs_agil + pcs_react) / 2) / 2
 shoot[1] = 1 & shoot[2] = 4 & shoot[3] = -1
 
+!!Bushcraft; Wildlife survival and pathfinding skills
+pcs_bushcraft = (bushcraft_lvl + (pcs_agil + pcs_stren + pcs_intel) / 3) / 2 - 15
+bushcraft[1] = 1 & bushcraft[2] = 4 & bushcraft[3] = -1
+
 !!Singing; Should be self-explanatory
 pcs_vokal = (vokal_lvl + (pcs_intel + pcs_chrsm) / 2) / 2
 vokal[1] = 3 & vokal[2] = 6 & vokal[3] = -1