glife/locations/parks.qsrc

# parks

if $ARGS[0] = 'start':
	cls
	$location_type = 'public_outdoors'
	$metka = 'start'
	$loc = 'parks'
	gs'stat'
	'<center><B>Old Town Park</B></center>'
	'<center><img <<$set_imgh>> src="images/locations/oldtown/park/parkus.jpg" ></center>'
	'These gardens of the old palace have been sculpted over many years into wonderful, landscaped gardens with a tranquil atmosphere.'
	'The old park is a favorite vacation spot for tourists and the main feature of old town.'

	'Wander deeper into the <a href="exec:GT ''lug'',''start''">park</a> .'


	act 'Go to the high street': minut += 10 &  gt 'liames'

	act 'Go to the town center': minut += 10 & gt 'liam'

	act 'Walk around the park (1 hour)':
		if pcs_exhibition >= 50 and exhibitionQW = 0: gt 'kseniyaQW', 'event1', 1
		cla
		minut += 60
		pcs_mood += 10
		pcs_willpwr += 10
		gs'stat'
		'You leisurely stroll through the park of the Old Town. Breathe in the fresh air, reflecting on the vicissitudes of fate.'

		act 'Complete outing':gt 'parks','start'
	end

	gs 'parkivent', 'run'

	if month = 5 or month = 6 or month = 7 or month = 8 or month = 9:
		if hour > 6 and hour < 23:
			act 'Rest on the bench':
				cla
				*clr
				'<center><img <<$set_imgh>> src="images/locations/shared/park/bench_6.jpg"></center>'

				waiting = input ("How many minutes of sitting? (Not more 120 minutes)")

				if waiting > 120:
					minut = minut + 15
				elseif waiting > 0:
					minut = minut + waiting
					pcs_mood += 10
					pcs_willpwr = pcs_willpwr + 10
					if pcs_sleep < 90:pcs_sleep += 10
				else
					'Invalid time.'
				end

				act 'Consult a watch': gt 'parks', 'start'
			end
		end	
	end

	if pcs_inhib >= 35:
		act 'Flash your tits':
			if pcs_exhibition >= 50 and exhibitionQW = 0: gt 'kseniyaQW', 'event1'
			cls
			exhibition_exp += rand(1,5)
			inhib_exp += rand(1,3)
			gs 'events', 'flash_tits', 'outdoors', 5
			gs 'stat'

			act 'Continue': gt 'parks', 'start'
		end
	end

	if pcs_exhibition >= 40:
		act 'Flash your pussy':
			if pcs_exhibition >= 50 and exhibitionQW = 0: gt 'kseniyaQW', 'event1'
			cls
			exhibition_exp += rand(9,12)
			gs 'events', 'flash_pussy', 'outdoors', 5
			gs 'stat'

			act 'Continue': gt 'parks', 'start'
		end
	end
end


--- parks ---------------------------------