Working the streets has an affect.

The beginning of a - probably optional - system that implements some negative effects of working on the street.
Basically aging the player faster due to standing out in heat, rain, the stress caused by the work and the clients, etc.

I think this will be an optional feature, that can be turned on/off.
Also, it is not used yet.

locations/prostitution_functions.qsrc

@@ -820,6 +820,48 @@ if $ARGS[0] = 'parameters':
 		prostitute['cum_visible_mod'] = 0
 	end
 
+!!---------- Prostitution long term effects ---------------------------------------------------------------------
+if $ARGS[0] = 'solicitation_effort':
+	cost = ARGS[1]
+	prostitute['skin_penalty'] += 5
+	if temper < 15: prostitute['skin_penalty'] += 5
+	if temper > 25: prostitute['skin_penalty'] += 5
+	if cost <= willpowermax/4:
+		prostitute['age_mod'] += 5
+	elseif cost <= willpowermax/3:
+		prostitute['age_mod'] += 10
+	elseif cost <= willpowermax/2:
+		prostitute['age_mod'] += 15
+	else
+		prostitute['age_mod'] += 20
+	end
+end
+
+if $ARGS[0] = 'client_effort':
+	$client_type = iif($ARGS[1] = '', 'normal', $ARGS[1])
+	if $client_type = 'nice':
+		prostitute['age_mod'] += 5
+	elseif $client_type = 'normal':
+		prostitute['age_mod'] += 10
+	elseif $client_type = 'abusive':
+		prostitute['age_mod'] += 20
+	end
+end
+
+if $ARGS[0] = 'daily_effects':
+	if prostitute['age_mod'] >= 100: 
+		temp_age_mod_remain = prostitute['age_mod'] MOD 100
+		vidageday -= ((prostitute['age_mod'] - temp_age_mod_remain) / 100)
+		prostitute['age_mod'] = temp_age_mod_remain
+		killvar 'temp_age_mod_remain'
+	end
+	if prostitute['skin_penalty'] >= 100:
+		temp_skin_remain = prostitute['skin_penalty'] MOD 100
+		skinDailyPenalty += ((prostitute['skin_penalty'] - temp_skin_remain) / 100)
+		prostitute['skin_penalty'] = temp_skin_remain
+		killvar 'temp_skin_remain'
+	end
+end
 !!---------- Age ------------------------------------------------------------------------------------------------
 
 	if vidage < 18 and rand(1,10) < 7:
@@ -1267,4 +1309,4 @@ if $ARGS[0] = 'exact_round':
 end
 
 
---- prostitution_functions ---------------------------------
+--- prostitution_functions ---------------------------------