glife/locations/train

# train

!!destination 3
if $ARGS[0] = 'communal':
	*clr & cla
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/oldplat.jpg" ></center>'
	'An old railway platform, it looks like it was abandoned the sign no longer legible, but there''s a hand painted sign from the communal cottages not too far away.'

	act 'Return to the road':minut += 15 & nroad = 5 & gt 'road'
	*nl
	if Trainpass_day > daystart:
		'You have <<Trainpass_day - daystart>> days left on your train pass.'
		act 'Go to platforms': gt 'train', 'communal_trains'
	else
		act 'Buy a ticket': gt 'train', 'communal_tickets'
	end
end

if $ARGS[0] = 'communal_tickets':
	act 'Buy a ticket to St. Petersburg city center (75 <b>₽</b>)':
		if money >= 75:
			money -= 75
			gt 'train', 'communal_centre'
		else
			'You don''t have enough money for this ticket.'
		end
	end
	act 'Buy a ticket to St. Petersburg city industrial area (50 <b>₽</b>)':
		if money >= 50:
			money -= 50
			gt 'train', 'communal_ind'
		else
			'You don''t have enough money for this ticket.'
		end
	end
	act 'Buy a ticket to the village of Gadyukino (50 <b>₽</b>)':
		if money >= 50:
			money -= 50
			gt 'train', 'communal_village'
		else
			'You don''t have enough money for this ticket.'
		end
	end
	act 'Buy a ticket to the old platform by the old town (75 <b>₽</b>)':
		if money >= 75:
			money -= 75
			gt 'train', 'communal_oldtown'
		else
			'You don''t have enough money for this ticket.'
		end
	end
	act 'Buy a ticket to Pavlovsk (100 <b>₽</b>)':
		if money >= 100:
			money -= 100
			gt 'train', 'communal_pavlovsk'
		else
			'You don''t have enough money for this ticket.'
		end
	end
	act 'Return': gt 'train', 'communal'
end

if $ARGS[0] = 'communal_trains':
	act 'Take a train to St. Petersburg city center': gt 'train', 'communal_centre'

	act 'Take a train to St. Petersburg city industrial area': gt 'train', 'communal_ind'

	act 'Take a train to the village of Gadyukino': gt 'train', 'communal_village'

	act 'Take a train to the old platform by the old town': gt 'train', 'communal_oldtown'

	act 'Take a train to Pavlovsk': gt 'train', 'communal_pavlovsk'

	act 'Return': gt 'train', 'communal'
end

if $ARGS[0] = 'communal_centre':
	minut += 15
	$loc = 'cityTrain'
	$metka = 'inside'
	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
	if rand(1, 100) <= 20: gt 'train', 'events'
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/cityplat.jpg" ></center>'
	'After 15 minutes, the train stops at the St. Petersburg city center station. The large office blocks and shopping centers fill your view.'
	act 'Get off the train':
		if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
		gt 'cityTrain', 'inside'
	end
end

if $ARGS[0] = 'communal_ind':
	$loc = 'vokzalholle'
	$metka = ''
	minut += 10
	if rand(1, 100) < 20: gt 'train', 'events'
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/indusplat.jpg" ></center>'
	'After 10 minutes, the train stops at the St. Petersburg city industrial area station.'
	act 'Get off the train':
		if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
		gt 'vokzalholle'
	end
end

if $ARGS[0] = 'communal_village':
	$loc = 'train'
	$metka = 'village'
	minut += 10
	if rand(1, 100) < 20: gt 'train', 'events'
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/gadplat.jpg" ></center>'
	'After 10 minutes, the train stops at the small station near the village of Gadyukino.'
	act 'Get off the train':
		if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
		gt 'train', 'village'
	end
end

if $ARGS[0] = 'communal_oldtown':
	$loc = 'train'
	$metka = 'oldtown'
	minut += 20
	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
	if rand(1, 100) < 20: gt 'train', 'events'
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/pushplat.jpg" ></center>'
	'After 20 minutes, the train stops at old platform by the old town of Pushkin. Famous for its extensive park and old historic buildings, the locals are known to be eccentric but that adds to the charm.'
	act 'Get off the train':
		if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
		gt 'train', 'oldtown'
	end
end

if $ARGS[0] = 'communal_pavlovsk':
	$loc = 'vokzalperG'
	$metka = ''
	minut += 25
	if rand(1, 100) <= 20: gt 'train_incidental', 'events'
	if rand(1, 100) < 20: gt 'train', 'events'
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg" ></center>'
	'After 5 minutes, you see the town of Pavlovsk approaching. Pavlovsk Castle is an impressive sight, even from a long distance. The train stops at its final destination, a platform in Pavlovsk station.'
	act 'Get off the train': gt 'vokzalperG'
end

!!destination 4
if $ARGS[0] = 'village':
	*clr & cla
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/gadplat.jpg" ></center>'
	if storyline = 1:
		'A fairly non-descript railway platform. The small village of Gadyukino where your grandparents reside is not far from here.'
	else
		'A fairly non-descript railway platform. The small village of Gadyukino where some farmers reside is not far from here.'
	end

	act 'Return to the road':minut += 15 & nroad = 10 & gt 'road'
	*nl
	if Trainpass_day > daystart:
		'You have <<Trainpass_day - daystart>> days left on your train pass.'
		act 'Go to platforms': gt 'train', 'village_trains'
	else
		act 'Buy a ticket': gt 'train', 'village_tickets'
	end
end

if $ARGS[0] = 'village_tickets':
	act 'Buy a ticket to St. Petersburg city center (100 <b>₽</b>)':
		if money >= 100:
			money -= 100
			gt 'train', 'village_centre'
		else
			'You don''t have enough money for this ticket.'
		end
	end
	act 'Buy a ticket to St. Petersburg city industrial area (75 <b>₽</b>)':
		if money >= 75:
			money -= 75
			gt 'train', 'village_ind'
		else
			'You don''t have enough money for this ticket.'	
		end
	end
	act 'Buy a ticket to the old platform by the communal village (50 <b>₽</b>)':
		if money >= 50:
			money -= 50
			gt 'train', 'village_communal'
		else
			'You don''t have enough money for this ticket.'	
		end
	end	
	act 'Buy a ticket to the old town (50 <b>₽</b>)':
		if money >= 50:
			money -= 50
			gt 'train', 'village_oldtown'
		else
			'You don''t have enough money for this ticket.'	
		end
	end
	act 'Buy a ticket to Pavlovsk (75 <b>₽</b>)':
		if money >= 75:
			money -= 75
			gt 'train', 'village_pavlovsk'
		else
			'You don''t have enough money for this ticket.'	
		end
	end
	act 'Return': gt 'train', 'village'
end

if $ARGS[0] = 'village_trains':
	act 'Take a train to St. Petersburg city center': gt 'train', 'village_centre'

	act 'Take a train to St. Petersburg city industrial area': gt 'train', 'village_ind'

	act 'Take a train to the communal village': gt 'train', 'village_communal'

	act 'Take a train to the old town': gt 'train', 'village_oldtown'

	act 'Take a train to Pavlovsk': gt 'train', 'village_pavlovsk'

	act 'Return': gt 'train', 'village'
end


if $ARGS[0] = 'village_centre':
	$loc = 'cityTrain'
	$metka = 'inside'
	minut += 25
	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
	if rand(1, 100) <= 20: gt 'train', 'events'
	gs 'stat'
	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
	if rand(1, 100) <= 20: gt 'train', 'events'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/cityplat.jpg" ></center>'
	'After 25 minutes, the train stops at the St. Petersburg city center station. The large office blocks and shopping centers fill your view.'
	act 'Get off the train':
		if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
		gt 'cityTrain', 'inside'
	end
end

if $ARGS[0] = 'village_ind':
	$loc = 'vokzalholle'
	$metka = ''
	minut += 20
	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
	if rand(1, 100) <= 20: gt 'train', 'events'
	gs 'stat'
	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
	if rand(1, 100) <= 20: gt 'train', 'events'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/indusplat.jpg" ></center>'
	'After 20 minutes, the train stops at the St. Petersburg city industrial area station.'
	act 'Get off the train':
		if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
		gt 'vokzalholle'
	end
end

if $ARGS[0] = 'village_communal':
	$loc = 'train'
	$metka = 'communal'
	minut += 10
	if rand(1, 100) < 20: gt 'train', 'events'
	gs 'stat'
	if rand(1, 100) < 20: gt 'train', 'events'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/oldplat.jpg" ></center>'
	'After 10 minutes you arrive at an old railway platform near the communal village.'
	act 'Get off the train':
		if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
		gt 'train', 'communal'
	end
end

if $ARGS[0] = 'village_oldtown':
	$loc = 'train'
	$metka = 'oldtown'
	minut += 10
	if rand(1, 100) < 20: gt 'train', 'events'
	gs 'stat'
	if rand(1, 100) < 20: gt 'train', 'events'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/pushplat.jpg" ></center>'
	'After 10 minutes, the train stops at old platform by the old town of Pushkin. Famous for its extensive park and old historic buildings, the locals are known to be eccentric but that adds to the charm.'
	act 'Get off the train':
		if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
		gt 'train', 'oldtown'
	end
end

if $ARGS[0] = 'village_pavlovsk':
	$loc = 'vokzalperG'
	$metka = ''
	train_event = 0
	money -= 75
	train_dest = 6
	minut += 15
	if rand(1, 100) <= 20: gt 'train_incidental', 'events'
	if rand(1, 100) < 20: gt 'train', 'events'
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg" ></center>'
	'After 15 minutes, you see the town of Pavlovsk approaching. Pavlovsk Castle is an impressive sight, even from a long distance. The train stops at its final destination, a platform in Pavlovsk station.'
	act 'Get off the train':
		if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
		gt 'vokzalperG'
	end
end

!!destination 5
if $ARGS[0] = 'oldtown':
	*clr & cla
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/pushplat.jpg" ></center>'
	'A fairly modern railway platform. The old town of Pushkin is just a five minute walk away from here, on the other side of the road.'

	act 'Return to the road':minut += 15 & nroad = 15 & gt 'road'
	*nl
	if Trainpass_day > daystart:
		'You have <<Trainpass_day - daystart>> days left on your train pass.'
		act 'Go to platforms': gt 'train', 'oldtown_trains'
	else
		act 'Buy a ticket': gt 'train', 'oldtown_tickets'
	end
end

if $ARGS[0] = 'oldtown_tickets':
	
	act 'Buy a ticket to St. Petersburg city center (125 <b>₽</b>)':
		if money >= 125:
			money -= 125
			gt 'train', 'oldtown_centre'
		else
			'You don''t have enough money for this ticket.'
		end
	end
	act 'Buy a ticket to St. Petersburg city industrial area (100 <b>₽</b>)':
		if money >= 100:
			money -= 100
			gt 'train', 'oldtown_ind'
		else
			'You don''t have enough money for this ticket.'
		end
	end	
	act 'Buy a ticket to the old platform by the communal village (75 <b>₽</b>)':
		if money >= 75:
			money -= 75
			gt 'train', 'oldtown_communal'
		else
			'You don''t have enough money for this ticket.'
		end
	end
	act 'Buy a ticket to the village of Gadyukino (50 <b>₽</b>)':
		if money >= 50:
			money -= 50
			gt 'train', 'oldtown_village'
		else
			'You don''t have enough money for this ticket.'	
		end
	end
	act 'Buy a ticket to Pavlovsk (50 <b>₽</b>)':
		if money >= 50:
			money -= 50
			gt 'train', 'oldtown_pavlovsk'
		else
			'You don''t have enough money for this ticket.'	
		end
	end
end

if $ARGS[0] = 'oldtown_trains':
	act 'Take a train to St. Petersburg city center': gt 'train', 'oldtown_centre'

	act 'Take a train to St. Petersburg city industrial area': gt 'train', 'oldtown_ind'

	act 'Take a train to the old platform by the communal village': gt 'train', 'oldtown_communal'

	act 'Take a train to the village of Gadyukino': gt 'train', 'oldtown_village'

	act 'Take a train to Pavlovsk': gt 'train', 'oldtown_pavlovsk'
end

if $ARGS[0] = 'oldtown_centre':
	$loc = 'cityTrain'
	$metka = 'inside'
	minut += 35
	if rand(1, 100) < 15: gt 'train', 'private'
	if rand(1, 100) < 30: gt 'train', 'Gopnik'
	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
	if rand(1, 100) <= 20: gt 'train', 'events'
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/cityplat.jpg" ></center>'
	'After 35 minutes, the train stops at the St. Petersburg city center station. The large office blocks and shopping centers fill your view.'
	act 'Get off the train':
		if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
		gt 'cityTrain', 'inside'
	end
end

if $ARGS[0] = 'oldtown_ind':
	$loc = 'vokzalholle'
	$metka = ''
	minut += 30
	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
	if rand(1, 100) <= 20: gt 'train', 'events'
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/indusplat.jpg" ></center>'
	'After 30 minutes, the train stops at the St. Petersburg city industrial area station.'
	act 'Get off the train':
		if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
		gt 'vokzalholle'
	end
end

if $ARGS[0] = 'oldtown_communal':
	$loc = 'train'
	$metka = 'communal'
	minut += 20
	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
	if rand(1, 100) <= 20: gt 'train', 'events'
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/oldplat.jpg" ></center>'
	'After 20 minutes you arrive at an old railway platform near the communal village.'
	act 'Get off the train':
		if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
		gt 'train', 'communal'
	end
end

if $ARGS[0] = 'oldtown_village':
	$loc = 'train'
	$metka = 'village'
	minut += 10
	if rand(1, 100) < 20: gt 'train', 'events'
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/gadplat.jpg" ></center>'
	'After 10 minutes, the train stops at the small station near the village of Gadyukino.'
	act 'Get off the train':
		if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
		gt 'train', 'village'
	end
end

if $ARGS[0] = 'oldtown_pavlovsk':
	$loc = 'vokzalperG'
	$metka = ''
	minut += 5
	if rand(1, 100) <= 20: gt 'train_incidental', 'events'
	if rand(1, 100) < 20: gt 'train', 'events'
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg" ></center>'
	'After 5 minutes, you see the town of Pavlovsk approaching. Pavlovsk Castle is an impressive sight, even from a long distance. The train stops at its final destination, a platform in Pavlovsk station.'
	act 'Get off the train':
		if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
		gt 'vokzalperG'
	end
end

!!new train and train station events.
!!chances are for leaving Pavlovsk to the city. Private compartment 10%, oldman 10%, fit 15%, young 20%, weed 20%, gopnik 25%. 
!!chances are for leaving the city for Pavlovsk. Private compartment 15%, oldman 10%, fit 20%, young 25%, gopnik 30%. 
if $ARGS[0] = 'events':
	event_random = rand(15, 100)
	if event_random < 25:
		gt 'train', 'oldman'
	elseif event_random < 45:
		gt 'train', 'fit'
	elseif event_random < 70:
		gt 'train', 'young'
	else
		gt $loc, $metka
	end
end

!!event Weed
if $ARGS[0] = 'weed':
	train_event = 1
	*clr & cla
	gs 'stat'
    '<center><h4>Pavlovsk Station</h4></center>'
    '<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg" ></center>'
    'After you bought your ticket, they told you that you had just missed the train. A little miffed at this, you take a seat on one of the benches on the platform to wait for the next train to the city to one to arrive.'   
    act 'A man approaches you with an offer':
		*clr
		cla
        '<center><h4>Pavlovsk Station</h4></center>'
        '<center><img <<$set_imgh>> src="images/locations/shared/train/sex/weed.jpg" ></center>'
		'Only a few minutes have passed when you hear someone walk up behind you and stop. You know they must be mere inches away, so you turn to look. Standing there is a young man, smiling at you, holding up a self-rolled cigarette... that looks suspiciously like a joint. The guy doesn''t seem too concerned about somebody catching him with that in public, though, and focuses entirely on you:'
        *nl		
		'"Hey beautiful, I couldn''t help but notice you sitting here all by yourself. Guess you missed the train, too, huh?" He looks around, as if he only just noticed that he was walking around a public place with a joint in his hand, then leans down and whispers conspiratorially: "How about we blaze one while we wait?"'

        act 'Refuse':
			*clr
			cla
            '<center><h4>Pavlovsk Station</h4></center>'
            '<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg" ></center>'
			'You have no idea what could be in it and have no intention of being caught out in the open with marijuana either, so you shake your head. "No, thanks."'
			'He shrugs and steps away. "Alright, just trying to be friendly. It''s your loss."'
			*nl
			'He wanders around for a bit. Eventually another young woman comes down to the platform. You watch him go over, and you are sure he''s making her the same offer, but unlike you, she nods and they smoke the joint together.'
			*nl
			'You can see them talk a little and even from where you''re sitting you can tell that the woman is giving him wanton looks. Before long, the two of them sneak off across the tracks and disappear; just as the train arrives, they come rushing back, clothes out of place and hair disheveled.'
			'It isn''t hard to guess what they were doing to kill time.'

            act 'Board the train to the city':
                *clr & cla
                minut += 40
                gs 'stat'
                '<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg" ></center>'
				'After 40 minutes, you see the town of Pavlovsk approaching. Pavlovsk Castle is an impressive sight, even from a long distance. The train stops at its final destination, a platform in Pavlovsk station.'
				act 'Get off the train':
					if rand(1, 100) <= 5: gt 'train_incidental', 'end'
					gt 'vokzalperG'
				end
            end
		end
		act 'Smoke with him':
			*clr & cla
!!arousal maxes after smoking the laced weed.
			pcs_horny = 100
			gs 'stat'
			'<center><h4>Pavlovsk Station</h4></center>'
			'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/weedsmoke.jpg" ></center>'
			'You smile and nod, taking the joint from him - you only live once and it''s as good a pastime as any. He lights it as you take a long slow drag off it and hold it in, feeling it in your lungs... until you start coughing, causing him to chuckle. You feel the relaxing effect almost at once, your head feeling both lighter and heavier, your mind slowing down... but you notice a slightly odd taste to the smoke that you can''t place - maybe that''s just what this variety tastes like. You pace it back and forth with him, chatting idly as you smoke, and as you do, you are starting to feel aroused: Your nipples harden, your pussy is getting soaking wet and you feel so wound up that you have to actively keep your hands in check to prevent yourself from masturbating out in the open.'
			'One thing you know for sure, even in your current state: Marijuana isn''t supposed to have this effect. You look at your smoking buddy. "What else was in this joint?"'
			'"XTC", he responds with hesitation, a lazy smile on his face. "It feels great, right?" He grabs you by the hand and pulls you up along with him. "Come on, let''s go have some fun before the train arrives. I know you''re just as horny as I am."'
			'If you were simply horny, you might not have accompanied him, but the XTC had fully taken effect by now, your mind was in a rush and you felt like you could trust the guy who just drugged you, so you went with him, looking forward to some ''fun''.'       

			act 'Refuse':
				*clr
				cla
	            '<center><h4>Pavlovsk Station</h4></center>'
	            '<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg" ></center>'
			    'You still have enough presence of mind to know this would be a bad idea, so you shake your head. "No, thanks."'
			    'He shrugs and steps away. "Alright, just trying to be friendly. It''s your loss."'
			    *nl
			    'He wanders around for a bit. Eventually another young woman comes down to the platform. You watch him go over, and you are sure he''s making her the same offer, but unlike you, she nods and they smoke the joint together. You briefly consider going to the bathrooms to masturbate but you don''t want to miss the train again.'
			    *nl
			    'You can see them talk a little and even from where you''re sitting you can tell that the woman is giving him wanton looks. Before long, the two of them sneak off across the tracks and disappear; just as the train arrives, they come rushing back, clothes out of place and hair disheveled.'
			    'It isn''t hard to guess what they were doing to kill time. A part of you wishes you had taken him up on the offer.'
				act 'Board the train to the city':
					*clr & cla
					minut += 40
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg" ></center>'
					'After 40 minutes, you see the town of Pavlovsk approaching. Pavlovsk Castle is an impressive sight, even from a long distance. The train stops at its final destination, a platform in Pavlovsk station.'
					act 'Get off the train':
						if rand(1, 100) <= 5: gt 'train_incidental', 'end'
						gt 'vokzalperG'
					end
				end
			end		

			act 'Go with him':
				*clr & cla
				'<center><h4>Pavlovsk Station</h4></center>'
				'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/weedhorny.jpg" ></center>'
				'If you were simply horny, you might not have accompanied him, but the XTC had fully taken effect by now, your mind was in a rush and you felt like you could trust the guy who just drugged you, so you went with him, looking forward to some ''fun''. He leads you across the tracks to the less-used side of the platform and takes you behind one of the roofed waiting areas. Once there, he starts kissing you and pulling your top aside enough to bare your breasts, squeezing and caressing them as you make out, and you groan into his mouth in response.'
				*nl
				'You are turned on beyond reason and badly want to fuck him, or anybody else, as long as you just get to have a cock inside you. The XTC tells you that he is a great guy, that you can feel safe with him, that nothing you do here will backfire. Your hands undo his pants, you pull out his cock and start stroking him with one hand while your other hand is rubbing your pussy through your clothes.'
				gs 'boyStat', 'A72'
				gs 'arousal', 'foreplay', 5, 'unknown'
				act 'Suck him':
					*clr & cla
					'<center><h4>Pavlovsk Station</h4></center>'
					'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/weedbj.jpg" ></center>'
					'He gently pushes down your shoulders and that is all the encouragement you need. You squat down in front of him at once, taking his <<dick>>cm <<$dick_girth>> cock into your mouth and start sucking him. Your tongue is giving every bit of his cock it can reach its attention and you bob your head back and forth, your <<$liptalk>> wrapped tightly around his shaft.' 
					*nl
					'Then you take him as deep into your mouth as you can, keeping him there until you start to gag and have to come up for air, but after two, three heavy breaths to recover, you take him inside again, now rapidly moving your head, sucking and deepthroating him for all your worth.'
					gs 'arousal', 'bj', 5, 'deepthroat', 'unknown'
					act 'Fuck him':
						*clr & cla
                        '<center><h4>Pavlovsk Station</h4></center>'
                        '<center><img <<$set_imgh>> src="images/locations/shared/train/sex/weedvag.jpg" ></center>'
						'He is having the time of his life, but all your blowjob does is making you hornier, and you can''t take it any longer: You start removing your clothes bit for bit while you keep blowing him, until every item below your waist is removed. Once your pussy and ass are bare, you pull him down and get him to lay down on his back.'
						*nl
						'He has barely even touched the ground when you have already straddled him, facing his legs, and lowering yourself down until you feel his <<dick>>cm <<$dick_girth>> cock stretch out your wet cunt. You moan out loud as you impale yourself on his shaft, going all the way down on the first stroke. You lift yourself up again and, again, take his entire length, faster this time. Then again, and again, riding him harder and faster with every stroke, his cock feeling as big as that of a prized stallion.'
                        gs 'arousal', 'vaginal', 5, 'dom', 'unknown'
						act 'Take his cum':
							*clr & cla
                            spafinloc = 12
                            gs 'cum_manage'
                            spafinloc = 11
                            gs 'cum_manage'
                            '<center><h4>Pavlovsk Station</h4></center>'
                            '<center><img <<$set_imgh>> src="images/locations/shared/train/sex/weedcum.jpg" ></center>'
							'You give him the fuck of a lifetime, feeling your orgasm approaching fast, so close, so very close... but he lifts you off and quickly stands up. "I''m about to cum!"'
							*nl
							'You have half a mind to say the same but you are too turned on to speak. You squat down in front of him again, and start jerking him off as you open your mouth and stick out your tongue. It only takes a few strokes before he shoots most of his load into your mouth, with a few stray squirts landing on your chin.'
							*nl
							'With your mouth still open, you show him his sperm on your tongue before you swallow it down, then start sucking his cock again. He was getting soft, but you feel him getting hard again in your mouth and you are already looking forward to another go so you can have your own orgasm.' 
							*nl
							'That''s when you hear the train coming. "The train''s here; we have to stop", he states, with a hint of regret, as he pulls his cock out of your mouth. Without another look at you, he quickly pulls up his pants and rushes over to the train as it comes to a stop. You hurriedly get dressed as well and then rush after him to get on the train. You make it just in time - the doors close almost as soon as you are in.'
                            gs 'arousal', 'end'
							gs 'stat'
                            act 'Board the train to the city':
                                *clr & cla
                                minut += 5
                                gs 'stat'
                                '<center><img <<$set_imgh>> src="images/locations/shared/train/ride.jpg"></center>'
                                'Once on the train, you look around but you don''t see the young man. Perhaps he got on a different car? You go looking for him, passing through a few different sections, hoping to continue what you started and deal with your overwhelming horniness, but after checking the entire train without seeing a hint of him, you give up and find a seat.'
								'After 40 minutes, you see the town of Pavlovsk approaching. Pavlovsk Castle is an impressive sight, even from a long distance. The train stops at its final destination, a platform in Pavlovsk station.'
								act 'Get off the train':
									if rand(1, 100) <= 5: gt 'train_incidental', 'end'
									gt 'vokzalperG'
								end
                            end
                        end
                    end
                end
            end
        end
    end
end

!!events starting on the train. Only one act will show up depending which one triggered but they all start the same.
if $ARGS[0] = 'private':
	*clr
	cla
	minut -= 35
	train_event = 1
	gs 'stat'
    '<center><img <<$set_imgh>> src="images/locations/shared/train/ride.jpg" ></center>'
	'You board the train and walk past several of the private compartments on your way to the general seating on the car you are on.'
	act 'You walk past the private compartments':
		*clr
		cla
	    '<center><img <<$set_imgh>> src="images/locations/shared/train/ride.jpg" ></center>'
		'After the first stop you are walking past the open door of one of the private compartments, you hear a man''s voice call out to you: "Hello there, young lady! Would you care to join me?"'
		'You stop and look inside, finding a clean-shaved man sitting there with a select few wrinkles that accentuate his angular features; you estimate that he''s in his late thirties or early forties. The expensive suit he''s wearing and the hints of cologne tickling your nose speak volumes of his wealth and his self-confident, even smug expression tells the rest of the story. He motions for you to sit with him. "It''s alright, there''s plenty of room in here. Why don''t you come in and close the door?"'
		*nl
		'You hesitate - he is undressing you with his eyes and not even trying to hide it, so you doubt that all he wants is a conversational partner and, sure enough, when he notices your pause, he pulls 500<b>₽</b> out of his wallet and puts it on the seat next to him. "If you come in and close the door, we can have a very enjoyable trip together... and you can get off with a little pocket money."'
		act 'Refuse him':
			*clr
			cla
			minut += 35
	        '<center><img <<$set_imgh>> src="images/locations/shared/train/ride2.jpg" ></center>'
			'You shake your head indignantly. "Fuck you, I''m no whore! Who do you think you are?!" You don''t give him time to respond but simply walk away and take a seat in the general seating area.' 
			*nl
			'You spend some time talking to some of your fellow passengers and share the story with a couple of them. They seem shocked that a man would make such an offer to a nice young lady like you right on this train and speculate that only a crook would be insolent enough to try something like that.'
!!which of these acts show up depending on where Sveta was going when the act triggered obviously.
			act 'Continue journey': gt $loc, $metka
		end
		act 'Accept his offer':
			*clr & cla
			'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/ridebj.jpg" ></center>'
	        gs 'boyStat', 'A72'
			'Another stop goes by as you wait for some passengers to pass.'
			*nl
			'You bite your lower lip as you consider his offer. You could use the money... and the thought of having sex on the train is exciting in itself, too. With your mind made-up, you step inside, close the door behind you and pull the privacy blinds down. When you turn back to him, you see that he already has his cock out and is looking at you with a strange, self-satisfied smile.' 
			*nl
			'Unfazed by his boldness, you kneel down in front of him and lick up and down his length a few times before you take his <<dick>>cm <<$dick_girth>> cock into your mouth, noticing that even it smells of that nice cologne. Your tongue moves around the head as you suck his cock and you start bobbing your head up and down while your hands take turns playing with his shaved balls. It''s hard for you to decide whether you want to move slow and tease him or speed up to avoid getting caught, but what you are doing seems to be to his liking.'
			*nl
			'"Good girl", he whispers, "I knew you could suck cock as soon as I saw you." His praise causes you to smile a little around his cock and you take him a little deeper in response.'
			gs 'arousal', 'bj', 10, 'prostitution', 'sub', 'unknown'
			dynamic $venerasiakOral

			act 'First stop':
				*clr & cla
				'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/ridevag.jpg" ></center>'
				'He enjoys your blowing him until the train arrives at its first stop, even opening the window blinds a little to look outside while you continue sucking him off, expecting somebody to find you in this position at any moment.' 
				*nl
				'The train leaves the station without incident, however, and at that point, the man motions for you to stop and get up with him. He turns you around and bends you over, pulling your clothes aside just enough to expose your pussy which, by this point, is dripping wet from the immense thrill of your risky actions. In one smooth stroke, his <<dick>>cm <<$dick_girth>> cock is inside you, the full length buried to the hilt, the feeling so intense that you have to keep yourself from moaning too loud; and the sensations multiply when he starts to move.' 
				*nl
				'He is not gentle with you, by any means, but the truth is that you wouldn''t have wanted gentle "love-making" in this situation - you are having sex on a train, for crying out loud! And all it would take would be one curious passenger brave enough to peek inside to expose you as the slut you are, but that is what makes it so wonderful, so depraved and exciting, and it is exactly why, at that moment, you want to be fucked hard, and he is more than happy to give you the pounding you crave.' 
				*nl
				'The man keeps going for a while until he starts breathing harder. You faintly notice that the train is slowing down and coming to a halt. People are getting off and on the train, surely somebody could discover you at any moment, and the blinds on the window aren''t fully closed either! But you cannot think straight and your lover chooses this particular moment of half-awareness to stop and lay you down on the seat.'
				gs 'arousal', 'vaginal', 15, 'prostitution', 'sub', 'unknown'

				act 'Second stop':
					*clr & cla
				    '<center><img <<$set_imgh>> src="images/locations/shared/train/sex/rideanal.jpg" ></center>'
					'Once he has you laying on your back, bedded on dusty seat cushions and your nether parts fully exposed to him and anybody who might enter, he moves up and slips his <<dick>>cm <<$dick_girth>> cock into your ass without warning. It enters surprisingly easily and even though you are unprepared, you manage to relax enough to avoid any pain. It certainly helps that he is taking it slow, giving your plenty of time to adjust to his cock while your mind is racing, running hot as it tries to comprehend how a simple train ride ended up with you having anal sex, on the train, with a complete stranger!' 
					*nl
					'Honestly, it makes relaxing difficult because your muscles are twitching around him in excitement and you can barely contain your moans. He goes a little deeper and a little faster, but your ass is too much for him and he can''t last much longer. You feel the first spurt of sperm deposited in your ass a second later and, as he continues to cum, he pulls out of you.'
					gs 'arousal', 'anal', 5, 'prostitution', 'sub', 'unknown'
					dynamic $venerasiak

					act 'Finished':
						*clr & cla
						money += 500
						gs 'boyStat', 'A72'
						gs 'cum_call','anus',$boy, 0,'','',20
						gs 'cum_call','butt',$boy, 0,'','',20
	                    '<center><img <<$set_imgh>> src="images/locations/shared/train/sex/ridecum.jpg" ></center>'
						'As he does, several spurts shoot all over your ass and you can feel more of his spunk leaking out of your gaping anus. With a final grunt and spurt, he sits down opposite you, giving you and the state he left you in an appreciative look before he puts his cock away and hands you the 500<b>₽</b>... And then, he simply pulls out a newspaper and starts reading it. The switch from ravaging your asshole to perusal is so sudden that you are confused for a moment. You soon realize, however, that he is really no longer paying attention to you and you are laying around with cum dripping out of your backdoor, so you quickly get up and get yourself cleaned up.'
						
						act 'Your stop':
							*clr & cla
						    '<center><video src="images/locations/shared/train/pantyup.mp4" ></center>'
							'Once you are dressed again and have removed most off the sperm, you sit down and quietly study the man you had sex with who seems content to spend the rest of the ride in silence and feigned obliviousness to your presence. After a bit, you pull out your phone and amuse yourself with it until the train finally reaches your destination. "Well, this is my stop", you tell him.'
						    *nl
						    'He looks up from his newspaper for the first time since he came. "I wish you a safe trip. And thank you for making this ride a bit less dull." he adds with a wink before returning to the headlines. You leave the compartment, the strange and naughty events fresh on your mind, and make your way to the closest exit.'
						    gs 'arousal', 'end'
						    gs 'stat'

							act 'Get off the train':gt $loc, $metka
				        end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'oldman':
	*clr
	cla
	'<center><img <<$set_imgh>> src="images/locations/shared/train/ride2.jpg" ></center>'
	'You choose an empty seat by the window and look outside, lost in thought, as others board the train. Shortly after the departure, an old man sits down next to you. He offers you some nuts from a bag he is carrying, and you politely take a few; you would have been content with spending the rest of the ride in silence but the man then starts talking to you about how he has not been back to this area since his wife died a few years ago. Curious and feeling somewhat obligated to keep the conversation going, as awkward as it may be, you ask him about his wife and learn that, until recently, they had had a happy, wonderful life together; alas, what they thought was just a bad cough that wouldn''t go away turned out to be lung cancer and she died a very slow and agonizing death while he could do nothing but watch and care for her.'
	*nl		
	'He gets very emotional while telling you the story, even has to wipe away tears a few times, and thanks you for listening to him once he finishes it. "I don''t even know why I started telling you about her", he apologizes, "I guess it''s because you remind me my wife when she was young. You are just as beautiful as she was. If only you could-"'
	*nl
	'He seems to want to say more but as the train pulls into the station you''re both headed for, he shakes his head as if saying no to himself. "Please, what is it?", you coax. He says he shouldn''t ask but wonders if you would be so kind to go with him to a place he and his wife liked to go. He would love the company if you were not too busy.'
	act 'Refuse his request':
		*clr
		cla
		'<center><img <<$set_imgh>> src="images/locations/shared/train/ride2.jpg" ></center>'
		'You feel sorry for him but you really don''t have time for this, especially since you think this won''t be just a quick walk - after all, accepting a handful of nuts from him turned into story time! You inform him, with audible regret, that you just don''t have the time to accompany him; he nods sadly but understandingly and, once you''ve disembarked the train, you both go your separate ways.'
!!which of these acts show up depending on where Sveta was going when the act triggered obviously.
		act 'Continue': gt $loc, $metka
	end
	act 'Accept his request':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/old.jpg" ></center>'
		'Your heart goes out to the guy; after spending the entire train ride listening to him, you feel sorry for him and his loss. You decide that you can make time for him and you agree to go with him and keep him company. He livens up and seems happier than you have seen him since he sat down next to you. Once off the train, he leads you down the tracks a bit, to a small bridge, over a gully, then down and along the end alongside the bridge. He points out a small old building, informing you that he and his wife used to come down here all the time, especially when they were younger.'
		*nl
		'Honestly, the place is one of the most rundown and shabby you''ve seen in a while but maybe it looked a lot different when he was young, so you hold your tongue so as not to spoil his sentimental mood and walk with him. As you do, he wraps his arm around your waist and points out several other buildings and things, talking about what they were like years ago and the many picnics and such he and his wife had here. He leads you up a set of stairs to a concert platform... and sighs when he finds the door at the top barred. "Last time me and my wife were here, we were able to sneak inside and...", but you don''t listen to how this story ends because, right at that moment, you notice the raging hard-on in his pants.'
		*nl
		'He glances down when he sees what you''ve caught and quickly apologizes. He admits that he and his wife used to sneak down here and have sex. He says that you look so much like her and it has been years since he had sex... so maybe you could make an old, sad man feel young and happy again, even if only for a few short minutes?'

		act '"No, that''s too much to ask"':
			*clr
			cla
			'You tell him that you''re not going to have sex with him. It is more than a little creepy to have sex where he and his wife used to do it, anyways. Feeling repelled by him and his request, you quickly pull free from him and make your way back to the platform, leaving the old guy to himself and his strange ideas.'
			act 'Return to the station': gt $loc, $metka
		end
		act 'Fulfill his wish':
			*clr & cla
			gs 'boyStat', 'A72'
			gs 'pain', 3, 'vaginal', 'ache'
			'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/oldvag.jpg" ></center>'
			'"Poor guy", you think to yourself. After all he''s been through, his request doesn''t seem like too tall an order; he really looks like he could use a little love, so you nod your head and are halfway down on your knees when he stops you: "I am very grateful you want to help me, Miss, but my wife didn''t believe in oral sex and I think she rubbed off on me. Maybe you could just... take off your bottoms?", he asks in a pleading and hopeful tone. You raise an eyebrow - you actually kind of hoped that a quick blowjob would be the extent of it and he must be the first man you''ve met who actually turned one down - but you agreed to "sex", after all. You wordlessly strip from the waist down and watch as he does the same, feeling a little uneasy now that you''re half-naked in this strange place. It doesn''t help that the old man''s look is a lot more lecherous now, but who would blame him in this situation?'
			*nl
			'He turns you around and has you put one foot up on the gate blocking the door, spreading your legs as you face the door. The elderly guy comes up behind you and, without warning, he shoves his <<dick>>cm <<$dick_girth>> cock into your vagina. He didn''t even check if you were wet, roughly boring through any resisting tissue. You grit your teeth to stifle a cry of pain, but it escapes you anyway when he begins to roughly fuck you, holding you by your hips and pulling your ass back against him. You endure, sure that he wouldn''t last long, but he ends up fucking you for quite a while before he pulls out. By this point, you were somewhat lubricated and a little numb to the pain, but you were still glad it was over... except it wasn''t.' 
			*nl
			'The old man simply pulls you down to the ground, laying you on your side in a spoon position, he right behind you, and slips his cock back into you. A second later, he has resumed pounding your pussy as hard as he physically can.'
			gs 'arousal', 'vaginal', 15, 'rough', 'unknown'

			act 'Surprise buttsex':
				*clr & cla
				gs 'pain', 3, 'asshole', 'ache'
				'<center><im  src="images/locations/shared/train/sex/oldanal.jpg" ></center>'
				'He keeps this up for a while and it is almost starting to feel okay when he pulls out and pauses. Again, you briefly think that he is done and only have a second to realize that, actually, he is rubbing the tip of his cock against you anus. Before you can even protest, his <<dick>>cm <<$dick_girth>> cock has already painfully penetrated your ass. You instinctively want to flinch away but he grabs your hips with surprising strength and forces his cock as far into your ass as he can... before he starts hammering your ass. "My wife loved anal", he informs you between slaps of flesh against flesh, "I hope you don''t mind."'
				*nl
				'You can merely groan in response as he violates your little asshole. His wife must have really liked rough sex, if this was the norm for them. He lifts your leg up and props your foot on the wall to keep your legs spread, which thankfully puts you at an angle where it hurts a little less. Still, you are really starting to regret that you wanted to help him out.'
				gs 'arousal', 'anal', 10, 'rough', 'unknown'

				act 'Take his cum':
					*clr & cla
					spafinloc = 4
					gs 'cum_manage'
					spafinloc = 1
					gs 'cum_manage'
					spafinloc = 9
					gs 'cum_manage'
					'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/oldcum.jpg" ></center>'
					'All of a sudden, he pulls out of your ass and you feel his hot sperm splattering against your puckered hole, pussy lips and inner thighs. It''s not as much cum as you expected for somebody who didn''t have sex in years, but maybe he jerks off a lot? He gets up first, using your shoulder for support to help himself get up which holds you down until he is fully on his feet. Bearing it without clamor, you start wiping off the cum as he gets dressed; by the time you finally get off the ground yourself, he''s fully clothed, whistling and already walking off, back the way you came with him.'
					*nl
					'You hurry up in getting yourself back in order, but by the time you have your bottoms back on and look up, he is almost out of the gully already, halfway back to the tracks! He seems <b>a lot</b> more spry than before, and you get the sneaking suspicion that you have been had, in more ways than one.' 
					'Cursing your gullibility and wincing at the ache in your pussy and ass, you finish dressing and head back to the platform - as unpleasant as this was, maybe you''ve learned your lesson at least.'
					gs 'arousal', 'end'
					gs 'stat'

					act 'Return to the station': gt $loc, $metka
				end
			end
		end
	end
end

if $ARGS[0] = 'fit':
	*clr
	cla
	'<center><img <<$set_imgh>> src="images/locations/shared/train/ride1.jpg" ></center>'
	'You are sitting in an empty seat by the window and looking outside, lost in thought, as others board the train. Shortly after the departure, a man in his thirties - or perhaps early forties - sits down next to you. You don''t give him more than a short glance as he takes the seat but it doesn''t take more than that to notice that he is in <b>great</b> shape. You try not to stare but you just can''t help yourself - the world outside the window is just too boring to hold your attention. Of course, your gaze does not go unnoticed and the man, grinning, engages you in a conversation.'
	*nl
	'He asks you your name, where you''re going and a few other questions, and before you know it, you''re chatting and laughing about a movie both of you happen to have watched recently. He is pretty charming and it even a blind deaf woman would notice his flirting.'
	*nl
	'As you talk, you realize you are both getting off at the next stop and he asks if you would like to go for a walk with him along the tracks after you disembark the train. As innocent as he tries to make it sound, you have no doubt what he would really like to do with you on that "walk"; but he <i>is</i> attractive and his fitness and charm are sexy enough to make his offer tempting.'
	act 'Refuse his offer':
		*clr
		cla
		'<center><img <<$set_imgh>> src="images/locations/shared/train/ride2.jpg" ></center>'
		'You thank him but politely refuse his offer, claiming that, sadly, you don''t have time to go on a walk today and are already running late, really. He doesn''t seem too disappointed, though. "I''m sure we will meet again on the train sometime", he augurs with a smile, "and then you will have time for that walk." You don''t know if his prophecy is going to come true or not or if he truly believes what he said but, regardless, he remains a pleasant dialog partner for the rest of the ride.'
!!which of these acts show up depending on where Sveta was going when the act triggered obviously.
		act 'Leave the train': gt $loc, $metka
	end
	act 'Accept his offer':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/fit.jpg" ></center>'
		'You consider his offer; it doesn''t exactly sound like a smart idea to go on a walk along the train tracks with a complete stranger. But somewhere between his charming compliments and the hard abs he let you feel, you lose all sense for what is smart and now that he asks you to go with him, you throw caution to the wind because it could be fun.' 
		*nl
		'You let him know you would love to go for that walk and, once you''ve reached your destination, you disembark the train together and wait for it to pull out of the station. He then takes you by the hand and leads you down the tracks, talking to you about how pretty you are, his flirting amped up to eleven.'
		*nl
		'The two of you end up walking further than you expected, well out of sight of the station, when he finally stops and starts kissing you so abruptly are momentarily stunned. Your friend doesn''t lose any time, however, and his hands are, piece by piece, removing your clothes as you passionately kiss him back. He has you half-naked in no time, right here out on the tracks, and you feel thrilled at the idea someone could very easily happen by and see you like this.'
		*nl
		'While you are making out, his fingers find your clit and... you don''t really know what he''s doing or how he''s touching you, but there is no doubt that he knows <b>exactly</b> what he has to do to please you: Every move of him feels like jolts of electricity are running through your body, waves of relish going up and down your spine. Half the town could be watching you right now, for all you care, as long as he doesn''t stop.' 
		*nl
		'But, of course, he does once he has you good and wet and he gently pushes you down by your shoulders so you can reciprocate.'
		gs 'arousal', 'vaginal_finger', 15, 'unknown'

		act 'Give him a blowjob':
			*clr & cla
			gs 'boyStat', 'A72'
			'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/fitbj.jpg" ></center>'
			'As much as you would have liked to feel his heavenly fingers some more, you drop to your knees and waste no time in taking his <<dick>>cm <<$dick_girth>> cock deep into your mouth, immediately feeling his hand on back of your head. You wrap your lips tightly around the shaft of his cock and bob your head, sucking hard on him to give him an idea of the intense stimulation he gave you. Occasionally, he uses his hand to force you deeper down on him so you would gag a bit on his cock, but he seems mostly content with letting you pleasure him at your own pace.'
			*nl
			'You stay on your knees, blowing him, for quite a while - if the sore jaw muscles are anything to go by - and even with your discarded clothes to kneel on, you''re probably going to have sore knees after this.'
			gs 'arousal', 'bj', 15, 'deepthroat', 'unknown'
			gs 'pain', 1, 'legL', 'ache'
			gs 'pain', 1, 'legR', 'ache'
			gs 'stat'

			act 'Let him fuck you':
				*clr & cla
				'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/fitvag.jpg" ></center>'
				'He pulls you up, back on your feet, and turns you around. You expect him to bend you over the next moment but instead, he lifts one of your legs off the ground and you feel him rubbing the head of his cock against your pussy lips, teasing you and himself and getting you all worked up again. Once he his tip is nice and wet, he slides his <<dick>>cm cock into you, filling your pussy with his <<$dick_girth>> cock.'
				*nl
				'Holding one of your legs up with one hand, his other wraps around your waist to help you keep your balance and you have to reach back, around his shoulders, as well to support yourself, but it is easy in the face of the pleasure you''re feeling. He strokes the length of his cock inside you, giving you a passionate fuck right there on the train tracks. You moans come loud and unrestrained; you don''t care if anyone is nearby, if anybody can hear you, or see you. He completely fills you, both physical and emotionally, and every rational thought is washed away by waves of pleasure.'
				gs 'arousal', 'vaginal', 10, 'unknown'

				act 'Take his cum':
					*clr & cla
					minut += 5
					spafinloc = 12
					gs 'cum_manage'
					'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/fitcum.jpg" ></center>'
					'His hard breathing turns into groans and, the next moment, he pulls out of you, letting go of your leg and body. You squat down in front of him, rubbing your clit and opening your mouth. Before he can even get his cock back into your mouth, the first jet of cum spurts across your lips; the following ones end up shooting into your now fully-opened mouth.'
					*nl
					'He squeezes the last few drops of sperm into your mouth and then sticks his cock in your mouth. You swallow his cum obediently and then suck his cock clean, licking every tasty inch of it you can reach. Once he is going soft in your mouth, he pulls back and the two of you start getting dressed.'
					*nl
					'Naturally, he is the first to be back in order but he waits until you are cleaned up and presentable again and then walks you back to the station. The walk back is anything but awkward: He flirts with you, just like he did at the very start, and you are getting the sense that he might be genuinely interested in you. Or, at the very least, he''s not the kind of ass who just wants to fuck you and forget you.'
					gs 'arousal', 'end'
					gs 'stat'

					act 'Return to the station': gt $loc, $metka
				end
			end
		end
	end
end

if $ARGS[0] = 'young':
	*clr
	cla
	'<center><img <<$set_imgh>> src="images/locations/shared/train/ride1.jpg" ></center>'
	'You are sitting in an empty seat by the window, looking outside, lost in thought, as others board the train and it eventually departs. Most of the train ride passes in you silently daydreaming with the scenery outside blurring together. It''s not until someone heavily sits down next to you that you snap out of it. You turn to see a good looking young guy in his early to mid-twenties, greeting you with a bright smile. "I''ve gotta say: I''ve walked from one end of this train to the other and you are by far the most beautiful girl on it."' 
	*nl
	'You blush slightly at his compliment. "Thank you, you''re not so bad looking yourself", you reply as you look him over. He is well groomed, with a nice suit jacket over a button-up shirt. His pants are patched but you suppose it is done intentionally, for style - still, it clashes with the nice jacket and makes it look like he is trying to look his best but hasn''t quite figured out all the tricks yet.'
	*nl
	'"So where are you headed?", he asks.'
	'"I get off at the next stop", you respond without thinking. A suggestive grin curls his lips; it takes you a moment to realize how your words could be taken as a sexual innuendo and blush slightly - something about this guy makes you blush a lot more than usual.'
	'"Well, I could help you with that, if you like", he offers, his eyes following your curves, "it''s always better to get off together."'
	act 'Refuse':
		*clr
		cla
		'<center><img <<$set_imgh>> src="images/locations/shared/train/ride2.jpg" ></center>'
		'He may be good-looking, but it''s time he learned that that doesn''t have to mean anything. Shaking your head no, you tell him that "that''s not how I meant it." As you do, the train slows and comes to a stop.'
		'"Oh, I get it!", he feigns realization at the ''misunderstanding'', "I didn''t mean that, either. I just, you know, thought we could hang out and have fun." His effort to save the situation is valiant, but you shoot him down again with a "no, thank you" and disembark the train without looking at him again.'
!!which of these acts show up depending on where Sveta was going when the act triggered obviously.
		act 'Return to the station': gt $loc, $metka
	end

	act 'Accept':
		*clr
		cla
		'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/young.jpg" ></center>'
		'You look him over and bite your lower lip as you consider his suggestion. You don''t even know him but, somehow, that makes it an even bigger turn on. You know exactly what he wants and, to your own small surprise, you find yourself wanting it too.' 
		*nl
		'"Okay", is all you say to him but, really, that is all he needs to hear.' 
		'"Great! I''ll get you off in no time, or money back!", he says laughing.'
		'When the train stops at the final station, he leads you off the car and the two of you wait as people leave the platform and new passengers get on. When the train has left and there''s nobody around anymore, he motions for you to follow him and takes you on a walk along the tracks.'

		act 'Follow him':
			*clr & cla
			gs 'boyStat', 'A72'
			'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/youngvag.jpg" ></center>'
			'You keep looking back towards the station as you walk, making sure that nobody sees where you''re headed. Your male companion, on the other hand, seems to be a lot more interested in your anatomy than potential observers. He puts his arm around your waist as you walk together and somehow manages to worm his way into your panties, rubbing your clit as you move. You somewhat lose interest in looking back after that, focusing entirely on the fingers playing with your pussy and dipping inside you. As soon as he has you good and soaking wet - and has put enough distance between you and the station that you''re no longer in plain sight - he pulls down his pants and sits on the tracks, his erect cock an unmistakable invitation.' 
			*nl
			'Your need seems to explode at the sight, and you urgently pull your clothes aside enough to reveal your pussy and tits, squat down on his <<dick>>cm <<$dick_girth>> cock and guide him inside. You can feel it filling you up as you impale yourself on his hard shaft.'
			*nl
			'You start riding him, completely controlling the action and taking him at the exact depth and speed you want. The power over the situation is intoxicating but it pales in comparison to the knowledge that you are fucking a stranger out in the open where anybody could find you at any moment; unsurprisingly, your moans are getting louder and louder and you feel yourself building up to a strong orgasm, every thrust getting you closer to the peek... but before you can reach it, he pulls you off and stands back up. You are confused and groan in protest, but he pulls you up with him. "Don''t come yet, not yet. That was just the warm up", he promises. You have half a mind to scream at him for yanking you back so close to the edge, but you are too horny to be angry. All you wanna do is fuck right now.'
			gs 'arousal', 'vaginal', 10, 'exhibitionism', 'unknown'
			gs 'stat'

			act 'See what he has in mind':
				*clr & cla
				'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/youngbj.jpg" ></center>'
				'He takes your hand and walks you down the tracks a bit more, his cock back in his pants but you''re completely exposed - he insisted on it and, really, you don''t mind; it is thrilling, even with nobody around. As you pass two electricity sub-stations for the trains, he stops and pulls you between them, a mischievous grin on his face. "I saw a track worker, just a few hundred meters away", he whispers with a chuckle and pulls down his pants. "I wonder how he''d react if he found you, sucking my cock."' 
				*nl
				'You are not sure if he''s being serious about having seen somebody or not, but you are not thinking straight anymore; the notion that somebody might be close-by who could catch you raises the stakes in an exciting way, so you don''t think twice before squatting down in front of him and taking his <<dick>>cm <<$dick_girth>> cock into your mouth. You can taste your own pussy juices on his cock as you suck him, a subtle reminder of your "warm-up". With your <$liptalk> lips wrapped tightly around his shaft, you start bobbing your head, while one of your hands fondles his balls: If somebody''s gonna find you, he''s gonna get an eyeful, that''s for sure!'
				*nl
				'After a few minutes, he pulls his cock out of your mouth and then lays down on his back again, his legs peeking out from between the sub-stations - either the track worker was imaginary or your friend is too horny to care anymore. His eyes are burning with desire, so both options are possible.' 
				'"Lower yourself down on me again, baby... but this time, I want you to take my cock up your ass."'
				gs 'arousal', 'bj', 10, 'exhibitionism', 'unknown'
				gs 'stat'

				act 'Do as he says':
					*clr & cla
					'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/younganal.jpg" ></center>'
					'You are too desperate for sex to say no, even if you''d wanted to. Without hesitation, you spread a little bit of your secretions around your puckered hole and you lower yourself on him. You can feel the head of his cock rubbing against your asshole; the pressure builds, your sphincter resisting the penetration... until the head pops inside. You gasp softly, pain and pleasure both vying for your attention, and you slowly lower yourself further, taking more and more of his <<dick>>cm <<$dick_girth>> cock into your ass.'
					*nl
					'Once you have as much of his cock in your ass as you comfortably can on the first go, you start moving your hips, rising up and lowering yourself again, taking a tiny bit more of him into you each time. As you''re riding his cock with your ass, his hands come up to grab your waist - not to wrest control from you, as you first thought, but to support your weight, allowing you to focus on getting into a rhythm and enjoying yourself as much as he audibly does, with a little help from your hand on your clit.'
					$orgasm_or = 'custom'
					$orgasm_txt = 'You are incredibly turned on, by him, by this situation, by having his cock in your ass, moaning loudly and riding him harder and faster. You barely even realize that you''re taking him balls deep into your ass with each thrust. Your body shudders and your moans come to a crescendo as you orgasm, falling back against him as the wave after wave of ecstasy shakes you. You moans turn into screams when he picks up the pace and thrusts up into you, fucking you hard from below and extending the climax.'
					gs 'arousal', 'anal', 10, 'sub', 'unknown'
					gs 'stat'

					act 'Take his cum':
						*clr & cla
						spafinloc = 12
						gs 'cum_manage'
						'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/youngcum.jpg" ></center>'
						'He lifts you off him and stands up beside you, jerking his cock. You know what he wants and you don''t mind opening your mouth for him. Maybe two seconds later, the first jet of hot, sticky sperm flies into your mouth; most of those that follow hit their target too - only one or two miss and end up on your lips.' 
						'When the torrent of semen has run dry, your lover pulls up his pants while you swallow his load, the salty reward for an incredible experience. He waits for you to get dressed and cleaned up, then he walks you back to the platform, flirting and chatting amicably with you along the way, right up until you''re inside the station and it''s time to part ways.'
						'"I''m glad that we''ve met today, <<$pcs_nickname>>. This has been one of the best days of my life; I''m not exaggerating. You are an amazing girl... and I hope to see you again some day." Honestly, you are a bit overwhelmed by this, but in a good way... in a great way, actually.'
						'"Yeah, I... I had a lot of fun with you", you say lamely and give him an awkward smile as you try to find the right words, "and I hope we run into each other again, too. Who knows, maybe we''ll meet on the train again?"' 
						'"I''d like that". He gives you a kiss on the cheek, a boyish grin that makes you feel weak in the knees, and walks away. You follow him with your eyes until he''s turned a corner, then sigh and, with a heavy heart, return to your day-to-day life.'
						gs 'arousal', 'end'
						gs 'stat'

						act 'Return to the station and catch the next train':
							*clr
							cla
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/locations/shared/train/electri.jpg"></center>'
							'The journey is uneventful and you aren''t paying much attention to it, it doesn''t seem like long before you arrive at your destination.'
							act 'Get off the train': gt $loc, $metka
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'Gopnik':
	'<center><img <<$set_imgh>> src="images/locations/shared/train/ride3.jpg" ></center>'
	'You are sitting in an empty seat by the window, looking outside, lost in thought, as others board the train. A gopnik boy sits down next to you, but you try to ignore him and keep staring outside. Unfazed by that, he gives you once-over, a lewd grin you only see from the corner of your eyes, and leans in close, putting his arm around you. You turn your head to tell him off but your mouth is immediately covered by his! And, not content with just kissing you, the gopnik''s hand starts roaming across your breasts.'
	act 'Stop him':
		*clr
		cla
		'<center><img <<$set_imgh>> src="images/locations/shared/train/ride2.jpg" ></center>'
		'After the immediate shock has passed, you push him away, but that doesn''t deter him in the slightest: He immediately tries to kiss and grope you again. You push him off once more, then get up and move to another seat, next to a woman who nods at you sympathetically and shoots the gopnik a nasty look. With nowhere to sit from where he could harass you, the boy looks at you for a moment, then shrugs and looks out the window. The rest of the ride is fairly uneventful; you spend most of it chatting with your seatmate / savior about men who molest women on trains.'
!!which of these acts show up depending on where Sveta was going when the act triggered obviously.
		act 'Continue journey': gt $loc, $metka
	end
	act 'Go with it':
		*clr
		cla
		minut -= 30
		pav_sex += 5
		'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/gopnik.jpg" ></center>'
		'He is pretty cute and you find yourself in the mood for a little tenderness, so you return his kiss and allow him to paw at your body. During the ride, you hear more than a few people comment on the two of you making out like this on the train; several seem to be of the opinion that this is not a proper place to show this level of affection. Instead of deterring you, however, all that does is tickle your rebellious streak and making you feel even more brazen.'
		*nl
		'Once the train stops at your destination, you get off the train with him but barely make it off onto the platform before he pulls you into another kiss. He is actually a pretty good kisser, and while his pawing hands might drive most innocent girls away, he seems to mostly know where he has to grope, too. Breaking the kiss and finding you breathing as heavily as him, he suggests: "Let''s go for a walk; you know, somewhere a little more private."'
		gs 'arousal', 'foreplay', 5, 'unknown', 'exhibitionism'
		gs 'stat'
		act 'Decline':
			*clr
			cla
			'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/gopnik.jpg" ></center>'
			'You shake your head no - you don''t wanna take it this far with him. "Sorry, but I don''t have time. It was fun, though. The trip was a lot more exciting than I expected." He looks a little disappointed, so you comfortingly pat his cheek. "Maybe I will see you again sometime and we can pick up where we left off." You lean in and give him a long, slow kiss goodbye, then bounce away and head off the platform. You hear him mutter about not getting more action, but you don''t really care - all you care about right now is that the train ride just flew by.'
			act 'Return to the station and catch the next train':
				*clr
				cla
				minut += 30	
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/shared/train/electri.jpg"></center>'
				'The journey is uneventful and you aren''t paying much attention to it, it doesn''t seem like long before you arrive at your destination.'
				act 'Get off the train': gt $loc, $metka
			end
		end
		act 'Agree':
			*clr
			cla
			'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/gopnikwalk.jpg" ></center>'
			'He takes you to the skyway over the tracks, holding your hand and pointing out different buildings and things. You already know almost everything he is talking about, but you let him talk for one very simple reason: He is surprisingly charming and sweet now, compared to the pawing weirdo you met on the train. He throws a lot of compliments your way, telling you how "the sun pales in comparison to your beauty" and the like. You consider telling him he really doesn''t have to try this hard, but some exaggeration funny exaggerations aside, you genuinely enjoy flirting with him and let him go on.'
			*nl
			'Once the train has left the station and all who disembarked with you are gone, he carefully inspects your surroundings to see if anybody else is around. When he doesn''t see anyone, he stops and turns towards you. Back to his train persona, your gopnik friend decides to take this to the next level or three, unbuttons his pants and pulls them down to his knees. His cock springs free, already hard and proudly fluttering in the wind.'
			act '"Um... No"':
				*clr
				cla
				'Even as he''s pulling down his pants, you are already shaking your head and laughing. "Do you think I''m a slut or something? I''m not gonna do something with you after a couple of compliments, especially not out in the open like this!" You turn and walk off, calling over your shoulder: "I thought you were a nice guy, but I guess I was wrong."' 
				*nl
				'The gopnik seems anything but pleased by your response. He tries to pull his pants back up and yells: "You fucking tease! Get back here!" You don''t; on the contrary, you exploit his current distraction with his pants to run back down the stairs to the platform and into the station before he can follow.'
				act 'Return to the station': gt $loc, $metka
			end
			act 'Blow him':
				*clr & cla
				gs 'boyStat', 'A72'
				'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/gopnikbj.jpg" ></center>'
				'The back and forth between him being nice and an ass was weird, the place is wide open, you barely know him - literally everything about this should discourage you from going near his crotch, and yet... yet, you find yourself squatting down in front of him and taking his <<dick>>cm <<$dick_girth>> cock into your mouth. Your hand strokes his hard shaft while you roll your tongue around the head of his cock; you jerk his cock in tune with the bobs of your head, back and forth along his length, your <$liptalk> lips wrapped tightly around him.' 
				*nl
				'You know this is kind of slutty - a little more than just "kind of", actually - but the idea that you could get caught at any moment is making this a lot more arousing than it should be; so, here you are, sucking his cock right above the train platform. Plus, he is kinda cute and you like his cock, so who care''s if it is slutty? The things the people said on the train got you riled up, and this makes you feel like you''re getting back at their stuffy selves: You''re having fun and it''s your body to do with as you please, and that''s all that matters.'
				'Well, that, and the hard cock you''re sucking with passion.'
				gs 'arousal', 'bj', 10, 'exhibitionism', 'unknown'
				gs 'stat'

				act 'Let him fuck you':
					*clr & cla
					gs 'boyStat', 'A72'
					'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/gopnikvag.jpg" ></center>'
					'You don''t know how many minutes pass as you suck him; somewhere along the way, you worm your fingers into your panties, rubbing your clit, feeling a lot more turned on by sucking his cock than you expected. You don''t know if he always planned on more than just a blow job or if he sensed that you were getting horny and influence-able, but he eventually has you stop and stand up, pulls your clothes aside enough to bare you naked ass and expose your glistening wet pussy.'
					*nl
					'He meets no resistance when he turns you around and bends you over, up against the side of the walkway railings; by the time he has lined his cock up with your pussy, you are looking back at him with eager anticipation. Impatient as you expected him to be, he slips his <<dick>>cm <<$dick_girth>> cock into your sopping wet pussy. It slides in easily and he has no trouble at all bottoming out on the first thrust. Hearing your moan and feeling how wet and turned on you are, he starts fucking you hard right away. His hips slap against your butt cheeks with every thrust and he reaches up and grabs your shoulder with one hand to keep you from moving away, furiously fucking your pussy and putting you into a state of ecstatic bliss, right there on the skywalk.'
					gs 'arousal', 'vaginal', 10, 'exhibitionism', 'rough', 'unknown'
					gs 'stat'

					act 'Have anal sex with him':
						*clr & cla
						'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/gopnikanal.jpg" ></center>'
						'When another train rolls into the station, he curses, pulls out of you and hastily tucks his penis back into his pants. Without waiting until you could do anything similar, he grabs your hand and pulls you along with him; you manage to cover yourself to some extent but you know your ass is still partially showing.' 
						*nl
						'He rushes down one of the access ramps of the skywalk to an older platform of the station that now serves as a storage siding. As soon as you turn the corner and not longer visible from the skywalk or other platforms anymore - so basically as soon as you turn the corner - he pushes you up against the graffiti-covered wall, pulls your clothes aside again and shoves his cock back into your pussy, fucking you like you hadn''t been interrupted. While you try to stifle your moans so passersby on the walkway won''t hear you, he leans forward and seductively whispers into your ear: "I''m going to fuck that tight little ass of yours."' 
						*nl
						'Without waiting for a response from you, the boy pulls his cock out once more and slides his <<dick>>cm <<$dick_girth>> cock up your ass. You gasp in pain, but it turns into a moan of pleasure along the way. You don''t have to consciously relax your asshole to enjoy this at this point; you are so turned on at the moment that you don''t really care where he sticks his cock as long as he just keeps fucking you.'
						gs 'arousal', 'vaginal', 10, 'exhibitionism', 'unknown', 'rough'
!!if Sveta has a orgasm then add below.
						$orgasm_txt = 'Your ass is getting pounded almost as hard as your pussy; he is just rough enough to make it hurt a little, but in this strange state you''re in, it seems to hurt in a <i>good</i> way, adding more fuel to the mounting climax inside of you. And then, just like that, the pressure is released explosively, shaking you like a leaf in the wind as you have an anal orgasm, maybe five meters away from a skywalk. You cannot contain your moans at this point, and it doesn''t help that your lover redoubles his efforts and fucks your tight little asshole even harder when he realizes that you''re cumming.'
						$orgasm_or = 'yes'
						gs 'arousal', 'anal', 10, 'exhibitionism', 'unkown', 'rough'
						minut -= 10
						'Had anybody walked by and heard or seen you right now, you wouldn''t have even cared.'
						gs 'stat'

						act 'Take his cum':
							*clr & cla
							gs 'boy'
							spafinloc = 3
							gs 'cum_manage'
							spafinloc = 4
							gs 'cum_manage'
							'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/gopnikcum.jpg" ></center>'
!! <<boy>> is random boyfriend name. 
							'He suddenly groans; a first jet of sperm shoots into your bowels just as he pulls out, and you feel his hot sperm rain down all over your ass cheeks as he jerks himself off. When the stream dies down, he wipes off the last few drops at his tip on your butt before pulling his pants up; he then helpfully offers you a tissue.'
							*nl
							'As you clean yourself up, he breaks into a chuckle as he realizes something: "By the way, I''m <<$boydesc>>."'
							'You can''t help but laugh at that; you just let him fuck you in every which way and you didn''t even know his name! "<<$pcs_nickname>>, pleasure to meet you", you say in mock formality and even offer him your hand, "a real pleasure," you add with a suggestive smile. He feigns seriousness as he shakes the offered hand but cannot keep himself from grinning.'
							'"It was nice meeting you as well, <<$pcs_nickname>>. Maybe I can call you sometime?", he asks hopefully.'
							gs 'arousal', 'end'
							gs 'stat'

							act 'Give him your number':
								*clr
								cla
!!25% chance he really does call and become a boyfriend, unless you already have 3 lovers.
								if rand(0,3) = 0:
									gs 'boyfrend', 'start'
									stopboy = 0
								end
								'"I''d like that", you tell him and give him your phone number. He waits until you''re more or less presentable again, then walks you back up to the skywalk where you two part ways.'

								act 'Return to the station and catch the next train':
									*clr
									cla
									minut += 30	
									gs 'stat'
									'<center><img <<$set_imgh>> src="images/locations/shared/train/electri.jpg"></center>'
									'The journey is uneventful and you aren''t paying much attention to it, it doesn''t seem like long before you arrive at your destination.'
									act 'Get off the train': gt $loc, $metka
								end
							end
							act 'Don''t give him your number':
								*clr
								cla
								'You shake your head. "Look, <<$boydesc>>, I had fun but I am not looking for anything more than a fuck right now. Maybe we will run into each other on the train again or something, sometime?"'
								'He shrugs like he doesn''t care either way but the look he gives you tells you that he''s a little pissed. "Sure, whatever. See you around." With that, he turns and walks off, leaving you to finish getting your clothes back in order.'

								act 'Return to the station and catch the next train':
									*clr
									cla
									minut += 30	
									gs 'stat'
									'<center><img <<$set_imgh>> src="images/locations/shared/train/electri.jpg"></center>'
									'The journey is uneventful and you aren''t paying much attention to it, it doesn''t seem like long before you arrive at your destination.'
									act 'Get off the train': gt $loc, $metka
								end
							end
						end
					end
				end
			end
		end
	end
end

--- train ---------------------------------