Browse Source

Train fixes

KevinSmarts 6 years ago
parent
commit
2ea29c14c6
4 changed files with 37 additions and 31 deletions
  1. 4 4
      locations/cityTrain
  2. 24 16
      locations/train
  3. 5 4
      locations/vokzalGin
  4. 4 7
      locations/vokzalholle

+ 4 - 4
locations/cityTrain

@@ -153,9 +153,9 @@ if $ARGS[0] = 'communal':
 	$loc = 'train'
 	$metka = 'communal'
 	minut += 15
-	gs 'stat'
 	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 15 minutes you arrive at an old railway platform near the communal village.'
 	act 'Get off the train':
@@ -168,9 +168,9 @@ if $ARGS[0] = 'village':
 	$loc = 'train'
 	$metka = 'village'
 	minut += 25
-	gs 'stat'
 	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/gadplat.jpg" ></center>'
 	'After 25 minutes, the train stops at the small station near the village of Gadyukino.'
 	act 'Get off the train':
@@ -183,11 +183,11 @@ if $ARGS[0] = 'oldtown':
 	$loc = 'train'
 	$metka = 'oldtown'
 	minut += 35
-	gs 'stat'
 	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/pushplat.jpg" ></center>'
 	'After 35 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':
@@ -200,11 +200,11 @@ if $ARGS[0] = 'pavlovsk':
 	$loc = 'vokzalperG'
 	$metka = ''
 	minut += 40
-	gs 'stat'
 	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'
 	if train_event = 0 and rand(1, 100) < 20: gt 'train', 'events'
 	'<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.'

+ 24 - 16
locations/train

@@ -84,8 +84,8 @@ if $ARGS[0] = 'communal_ind':
 	$loc = 'vokzalholle'
 	$metka = ''
 	minut += 10
-	gs 'stat'
 	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':
@@ -98,8 +98,8 @@ if $ARGS[0] = 'communal_village':
 	$loc = 'train'
 	$metka = 'village'
 	minut += 10
-	gs 'stat'
 	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':
@@ -112,9 +112,9 @@ if $ARGS[0] = 'communal_oldtown':
 	$loc = 'train'
 	$metka = 'oldtown'
 	minut += 20
-	gs 'stat'
 	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':
@@ -127,9 +127,9 @@ if $ARGS[0] = 'communal_pavlovsk':
 	$loc = 'vokzalperG'
 	$metka = ''
 	minut += 25
-	gs 'stat'
 	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'
@@ -209,6 +209,8 @@ 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'
@@ -224,6 +226,8 @@ 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'
@@ -239,6 +243,7 @@ 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>'
@@ -253,6 +258,7 @@ 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>'
@@ -270,9 +276,9 @@ if $ARGS[0] = 'village_pavlovsk':
 	money -= 75
 	train_dest = 6
 	minut += 15
-	gs 'stat'
 	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':
@@ -351,6 +357,7 @@ if $ARGS[0] = 'oldtown_centre':
 	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':
@@ -363,9 +370,9 @@ if $ARGS[0] = 'oldtown_ind':
 	$loc = 'vokzalholle'
 	$metka = ''
 	minut += 30
-	gs 'stat'
 	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':
@@ -378,9 +385,9 @@ if $ARGS[0] = 'oldtown_communal':
 	$loc = 'train'
 	$metka = 'communal'
 	minut += 20
-	gs 'stat'
 	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':
@@ -393,8 +400,8 @@ if $ARGS[0] = 'oldtown_village':
 	$loc = 'train'
 	$metka = 'village'
 	minut += 10
-	gs 'stat'
 	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':
@@ -407,9 +414,9 @@ if $ARGS[0] = 'oldtown_pavlovsk':
 	$loc = 'vokzalperG'
 	$metka = ''
 	minut += 5
-	gs 'stat'
 	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':
@@ -908,9 +915,6 @@ if $ARGS[0] = 'young':
 end
 
 if $ARGS[0] = 'Gopnik':
-	*clr
-	cla
-	minut -= 30
 	'<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':
@@ -924,12 +928,14 @@ if $ARGS[0] = 'Gopnik':
 	act 'Go with it':
 		*clr
 		cla
-		pav_slut += 5
+		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
@@ -969,6 +975,7 @@ if $ARGS[0] = 'Gopnik':
 				'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
@@ -978,6 +985,7 @@ if $ARGS[0] = 'Gopnik':
 					*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
@@ -987,13 +995,13 @@ if $ARGS[0] = 'Gopnik':
 						'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.
-						'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.'
-						'Had anybody walked by and heard or seen you right now, you wouldn''t have even cared.'
+						$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', 'vaginal', 10, 'exhibitionism', 'unknown', 'rough'
 						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':

+ 5 - 4
locations/vokzalGin

@@ -239,8 +239,8 @@ if $ARGS[0] = 'oldtown':
 	$loc = 'train'
 	$metka = 'oldtown'
 	minut += 5
-	gs 'stat'
 	if rand(1, 100) < 20: gt 'train', 'events'
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/pushplat.jpg" ></center>'
 	'After 5 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':
@@ -253,9 +253,9 @@ if $ARGS[0] = 'village':
 	$loc = 'train'
 	$metka = 'village'
 	minut += 15
-	gs 'stat'
 	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/gadplat.jpg" ></center>'
 	'After 15 minutes, the train stops at the small station near the village of Gadyukino.'
 	act 'Get off the train':
@@ -268,9 +268,9 @@ if $ARGS[0] = 'communal':
 	$loc = 'train'
 	$metka = 'communal'
 	minut += 25
-	gs 'stat'
 	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':
@@ -283,11 +283,11 @@ if $ARGS[0] = 'ind':
 	$loc = 'vokzalholle'
 	$metka = ''
 	minut += 35
-	gs 'stat'
 	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/indusplat.jpg" ></center>'
 	'After 35 minutes, the train stops at the St. Petersburg city industrial area station.'
 	act 'Get off the train':
@@ -304,6 +304,7 @@ if $ARGS[0] = 'centre':
 	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 40 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':

+ 4 - 7
locations/vokzalholle

@@ -114,8 +114,8 @@ if $ARGS[0] = 'communal':
 	$loc = 'train'
 	$metka = 'communal'
 	minut += 10
-	gs 'stat'
 	if rand(1, 100) < 20: gt 'train', 'events'
+	gs 'stat'
 	'<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':
@@ -128,9 +128,9 @@ if $ARGS[0] = 'village':
 	$loc = 'train'
 	$metka = 'village'
 	minut += 20
-	gs 'stat'
 	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/gadplat.jpg" ></center>'
 	'After 20 minutes, the train stops at the small station near the village of Gadyukino.'
 	act 'Get off the train':
@@ -143,9 +143,9 @@ if $ARGS[0] = 'oldtown':
 	$loc = 'train'
 	$metka = 'oldtown'
 	minut += 30
-	gs 'stat'
 	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 30 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':
@@ -158,14 +158,11 @@ if $ARGS[0] = 'pavlovsk':
 	$loc = 'vokzalperG'
 	$metka = ''
 	minut += 35
-	gs 'stat'
-	minut += 5
-	gs 'stat'
 	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'
-	if train_event = 0 and rand(1, 100) < 20: gt 'train', 'events'
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg" ></center>'
 	'After 35 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':