locations/mod_bestmod.qsrc

@@ -25,12 +25,16 @@ if $curloc = 'bed' and ((bm_pet_dog_rel > 10 and pcs_horny > 60) or (pcs_horny >
 
 if $loc = 'glake' and $selact = 'Go sunbathing (30 minutes)' and $clothingworntype = 'nude' and bm_beast['exp'] > 0 and rand(1,10) = 5: gt 'mod_bestmod_lake_dog', 'start'
 
-if $locclass = 'park' and $metka = 'start' and (hour >= 20 or hour < 6) and menu_off = 0:
+if $locclass = 'park' and $loc ! 'parks' and $metka = 'start' and (hour >= 20 or hour < 6) and menu_off = 0:
 	*nl
-	'You see a stray dog sniffing around some trash.'
+	if $loc = 'lug':
+		'You see a stray dog wandering around just behind the tree line.'
+	else
+		'You see a stray dog sniffing around some trash.'
+	end
 	act 'Go up to the stray dog': gt 'mod_bestmod_park_dog', 'start', $loc
 end
-		
+
 if $loc = 'postdeliveries' and $ARGS[0] = '10':
 	if banditfrend = 1:
 		act 'Try to calm the dog':

locations/mod_bestmod_park_dog.qsrc

@@ -3,6 +3,9 @@ menu_off = 1
 
 !! Set a default large volume of sperm for stray dog
 sexvolume = rand(100, 200)
+$bm_park_array['gskver'] = 1
+$bm_park_array['park'] = 2
+$bm_park_array['lug'] = 3
 
 !! Might be interesting to add calls to a function like "'gadforest', 'torncloth'"
 
@@ -45,8 +48,8 @@ if $ARGS[0] = 'first_follow':
 		act 'Offer your sandwich':
 			*clr & cla
 			bm_know_parkdog = 1
-			bm_parkdog_QW += 1
-			bm_firstmet_parkdog = 1
+			bm_parkdog_QW = 1
+			bm_firstmet_parkdog = bm_park_array[$loc]
 			'You take the sandwich out from your bag and offer it to the dog. He sniffs at it for a bit, but seems hesitant to get very close to you.'
 			'You figure he might not trust you too much, so you put the sandwich down on the ground and step back. You guessed right, as the dog jumped forward after a moment''s pause and devoured the sandwich meat, leaving the bread behind.'
 			''