Преглед изворни кода

[text edit] clean up tatiana_lab

Spackled Lanturn пре 3 година
родитељ
комит
470bff3980
1 измењених фајлова са 65 додато и 72 уклоњено
  1. 65 72
      locations/tatiana_lab.qsrc

+ 65 - 72
locations/tatiana_lab.qsrc

@@ -263,7 +263,7 @@ if $ARGS[0] = 'BodyModded':
 	cls & cla
 	act 'Thank you':gt 'tatiana_lab', 'Tatiana'
 
-	"You feel a bit drained and tingly all over.  You look in the mirror."
+	"You feel a bit drained and tingly all over. You look in the mirror."
 	"Your <<$bodyModType>> is now <<$bodyModVal>>."
 	"""Thanks Tatiana!"""
 
@@ -292,7 +292,7 @@ if $ARGS[0] = 'Tatiana':
 				act 'Ask her to tell you': gt 'succubus', 'tatianaask', 1
 				exit
 			elseif sucpcinfo = 5:
-				'"I heard from an old friend of mine who is now living in Morocco and she also has a Succubus for a lover. She said that after they had been together for some time, they discovered that with her help, her Succubus lover learned something new."'
+				'"I heard from an old friend of mine who is now living in Morocco and also has a Succubus for a lover. She said that after they had been together for some time, they discovered that with her help, her Succubus lover learned something new."'
 				sucpcinfo = 6
 				sucinfoday = daystart + 17 + rand(0,7)
 				act 'Ask her to tell you': gt 'succubus', 'tatianaask', 2
@@ -307,7 +307,7 @@ if $ARGS[0] = 'Tatiana':
 			end
 		end
 
-		if tatisucsex ! 0 and tatisucsexask ! daystart: act 'Ask if she want''s to have sex': tatianasucsexask = daystart & gt 'tatiana_lab', 'Tatianasucsexask'
+		if tatisucsex ! 0 and tatisucsexask ! daystart: act 'Ask if she wants to have sex': tatianasucsexask = daystart & gt 'tatiana_lab', 'Tatianasucsexask'
 
 		if sucpcinfo >= 4: act 'Ask her about Succubae': gt 'tatiana_lab', 'Tatianasuctalk'
 	end
@@ -316,10 +316,10 @@ if $ARGS[0] = 'Tatiana':
 
 	act 'Ask for help with your appearance':
 		cla
-		'"Tatiana, I''m having problems with my body image, I''m not happy and was hoping that you might be able to help me."'
+		'"Tatiana, I''m having problems with my body image. I''m not happy and was hoping that you might be able to help me."'
 		*nl
-		'"It''s possible but I will have to draw on your magical energy, it will cost some of your mana to perform a spell."'
-		'"Also, this will be painful.  The magic will force your flesh into new shapes."'
+		'"It''s possible, but I will have to draw on your magical energy. It will cost some of your mana to perform a spell."'
+		'"Also, this will be painful. The magic will force your flesh into new shapes."'
 
 		$HairColorTab =  func('tatiana_lab', 'ListBuilder', 'Hair Color', 500, 60, '$hairColors','i',		 'pcs_haircol','hair',	'nathcol = bodyModVal')
 		$HairLengthTab = func('tatiana_lab', 'ListBuilder', 'Hair Length',200, 120,'$hairTypes', 'hairTypes', 'pcs_hairlng','hair',	'')
@@ -365,17 +365,17 @@ if $ARGS[0] = 'Tatiana':
 		killvar '$SiliconeTab'
 		killvar '$SpellListStr'
 
-		act 'No, no, I''ve changed my mind. Thank you':gt 'tatiana_lab', 'Tatiana'
+		act 'No, no, I''ve changed my mind. Thank you.':gt 'tatiana_lab', 'Tatiana'
 
 
-		act 'Restore you body to it''s original shape':
+		act 'Restore your body to its original shape':
 			cla
-			'"Tatiana, I''m having problems with my body image, I''m not happy and was hoping that you might be able to help me."'
-			'"It''s possible but I will have to draw on your magical energy, it will cost 40 mana to perform a reset spell.'
-			'This will reduce excess fat, growth of body parts and reduce high levels of silicone, moving you closer to your original body shape.'
+			'"Tatiana, I''m having problems with my body image. I''m not happy and was hoping that you might be able to help me."'
+			'"It''s possible, but I will have to draw on your magical energy. It will cost 40 mana to perform a reset spell.'
+			'This will reduce excess fat, growth of body parts and high levels of silicone, moving you closer to your original body shape.'
 			'Do you wish to try this spell?'
 
-			act 'No, no, I''ve changed my mind. Thank you':gt 'tatiana_lab', 'Tatiana'
+			act 'No, no, I''ve changed my mind. Thank you.':gt 'tatiana_lab', 'Tatiana'
 
 			if pcs_mana >= 40:
 				act 'That sounds great, let''s do it!':
@@ -387,8 +387,8 @@ if $ARGS[0] = 'Tatiana':
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/city/tatiana/magiclook.jpg"></center>'
 					'Tatiana lowers her glasses and stares deeply into your eyes. It feels like time just stops being a thing and you are floating.'
-					'It seems very soon afterwards when you snap back to reality but the big clock on the lab wall tells you it''s been 30 minutes.'
-					'Your body has changed much as Tatiana said it would and she is already busy checking nothing went wrong.'
+					'It seems very soon afterwards when you snap back to reality, but the big clock on the lab wall tells you it''s been 30 minutes.'
+					'Your body has changed much as Tatiana said it would, and she is already busy checking nothing went wrong.'
 					act 'Continue': gt 'tatiana_lab', 'Tatiana'
 				end
 			end
@@ -399,33 +399,33 @@ if $ARGS[0] = 'Tatiana':
 		act 'Ask Tatiana for help with Ivan':
 			cla
 			gs 'stat'
-			'You explained the situation and asked her to Tatiana assistance. Tatiana said thoughtfully. "I do not think there is any physical evidence of the guilt of Ivan. Necessary is achieved recognition. I think it would be possible to capture and interrogate. Or drink his cunning truth serum and interrogate. Anyway it is necessary to remove it all on video."'
+			'You explain the situation and ask Tatiana for assistance. Tatiana says thoughtfully, "It doesn''t sound like there is any physical evidence of Ivan''s guilt, so you need a confession. I think it would be possible to capture and interrogate him. Or, you and I could try a more cunning approach to get the truth out of him. Either way, you need to capture it all on video."'
 
 			act 'Military solution':
 				cls
 				poverKAR = 1
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/system/intro/shared/karinpre.jpg"></center>'
-				'You have decided to achieve recognition Ivan force. Tatiana told you. You go to the apartment of Ivan. There vstretishsya with Gustav. It will help resolve the issue. Just see if he will go to the second level of the press, he was distraught. At the second level of the press he turns into a monster.'
+				'You decide to get Ivan to admit what he''s done by force. Tatiana tells you to go to Ivan''s apartment. There you will meet with Gustav, who will help resolve the issue. She stresses that you keep an eye on him in case he starts getting distraught. Apparently when he does, he turns into a monster.'
 
 				act 'Leave':gt 'tatiana_lab', 'Tatiana'
 			end
 
-			act 'Tricky decision':
+			act 'Trick him':
 				cls
 				softKAR = 1
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/system/intro/shared/karinpre.jpg"></center>'
-				'You have decided to achieve recognition Ivan cunning. Tatiana told you. You go to the apartment of Ivan. There we meet with you and obtyapaem owners.'
+				'You decide to trick Ivan into admitting what he''s done. Tatiana tells you to go to Ivan''s apartment and that she will meet you there.'
 
 				act 'Leave':gt 'tatiana_lab', 'Tatiana'
 			end
 		end
 	elseif poverKAR = 2:
-		act 'Approach to Tatiana about attacks apartments Ivan':
+		act 'Approach Tatiana about the attack on Ivan''s apartment':
 			cla
 			poverKAR = 3
-			'You came to Tatiana and she sighed. "Yes, failed. Gustav caught a bullet in his head and his strength went up to the next level, it has cured, made almost invulnerable, but finally deprived of his mind. Gustav not only gained recognition for Ivan, and not just kill him, he blew part of the entrance his attack. But there are pluses. Cops think it was a gas explosion. But now you have to either pay the debt or goes to jail. "'
+			'You come to Tatiana, and she sighs. "Yes, you failed. That bullet Gustav caught in his head made his strength go up to the next level, almost invulnerable but deprived of his mind. That''s why he couldn''t stop himself from killing Ivan before you could get a confession out of him. There are pluses. The cops think it was just a gas explosion for one, so you probably don''t need to worry about much of an investigation. But now you are going to have to pay the debt if you don''t want to go to jail. "'
 
 			act 'Leave':gt 'tatiana_lab', 'Tatiana'
 		end
@@ -485,7 +485,7 @@ if $ARGS[0] = 'Tatiana':
 			cla
 			minut += 60
 			spellavtoklon = 1
-			'You learned the technique preparation. This technique allows you to enter into battle with the already created three clones.'
+			'You learn the technique preparation. This technique allows you to enter into battle with three clones already created.'
 
 			act 'Leave':gt 'tatiana_lab', 'Tatiana'
 		end
@@ -496,7 +496,7 @@ if $ARGS[0] = 'Tatiana':
 			cla
 			minut += 60
 			spellbefshild = 1
-			'You learned the technique of pre-shield. This technique allows you to enter into battle with a magical shield protecting you against physical impacts.'
+			'You learn the technique pre-shield. This technique allows you to enter into battle with a magical shield protecting you against physical attacks.'
 
 			act 'Leave':gt 'tatiana_lab', 'Tatiana'
 		end
@@ -509,11 +509,11 @@ if $ARGS[0] = 'Tatiana':
 				minut += 30
 				sucskill = 1
 				gs 'stat'
-				'You spend 30 minutes meditating, with Tatiana in a light link with you as she shows you how to tell what your Succubus energy levels are.'
+				'You spend 30 minutes meditating with Tatiana in a light link with you as she shows you how to tell what your Succubus energy levels are.'
 				'You open your eyes and look at Tatiana sitting across from you.'
 				'She is flushed, breathing hard, and her nipples are showing clearly through her blouse.'
 				if 1 + (succublvl * 2) + tatisucsex < 20 and rand(0,100) < 90:
-					'After a moment, she gives herself a shake and pulls herself together, before saying, "There you go!"'
+					'After a moment, she gives herself a shake and pulls herself together before saying, "There you go!"'
 					'She then stands up and goes back to her studying.'
 					act 'Finish': gt 'tatiana_lab', 'Tatiana'
 				else
@@ -536,14 +536,14 @@ if $ARGS[0] = 'Tatiana':
 				gs 'stat'
 				sucskill = 2
 				'Tatiana shows you how to build a storage reservoir that draws the excess energy in before your body uses it.'
-				'Once you''re finished, Tatiana is again showing clear signs of arousal and she says, "You know, touching your power is a really, <i>really</i>, intense experience!"'
+				'Once you''re finished, Tatiana is again showing clear signs of arousal, and she says, "You know, touching your power is a really, <i>really</i>, intense experience!"'
 				'She then closes her eyes and visibly tries to get ahold of herself.'
 				if tatisucsex >= 20 or rand(1,100) < 95:
 					'After several moments, she pulls herself together, opens her eyes, smiles at you, and says, "There, I knew I could do it!"'
 					'She then stands up and goes back to her studying.'
 					act 'Finish': gt 'tatiana_lab', 'Tatiana'
 				else
-					'Then her eyes snap open and you feel arousal suddenly flooding the link!'
+					'Then her eyes snap open, and you feel arousal suddenly flooding the link!'
 					xgt 'tatiana_lab', 'suctrainsex'
 				end
 			end
@@ -555,9 +555,9 @@ if $ARGS[0] = 'Tatiana':
 					minut += 60
 					'You ask her what''s involved in the training and preparations.'
 					'She spends some time explaining the technical details of what you need to do during the "ritual", then says,'
-					'"The preparations will take 7 days, the money is to modify one of my devices to pull in free sexual energy from the adult businesses around here and to make several potions we''ll need, one of which is going to temporarily make me into a sexual energy "battery" and the others are so we can do the ritual without hurting ourselves.'
-					'"Once I start, you''ll have 2 days to tell me to abort, after that I will have started building up the charge. We would not be able stop ourselves and premature sex could kill us, so I''ll be putting up a barrier to keep you out until 7 days have pasted and I''ll set it not to let you through unless you have 3 days of reserves and 100 units of stored energy.'
-					'"Once I''ve built up to a full charge, I''ll only be able to hold it for a day, after that I''ll have to release it. The "battery" potion itself as well as the materials for it will not keep, so aborting after I start or fail to show up on time and 2000 <b>₽</b> will have been wasted.'
+					'"The preparations will take 7 days, I''ll need 3000 <b>₽</b to modify one of my devices to pull in free sexual energy from the adult businesses around here and another 2000 <b>₽</b> to make several potions we''ll need, one of which is going to temporarily make me into a sexual energy "battery" and the others are so we can do the ritual without hurting ourselves.'
+					'"Once I start, you''ll have 2 days to tell me to abort, after that I will have started building up the charge. We would not be able stop ourselves, and premature sex could kill us, so I''ll be putting up a barrier to keep you out until 7 days have passed, and I''ll set it not to let you through unless you have 3 days of reserves and 100 units of stored energy.'
+					'"Once I''ve built up to a full charge, I''ll only be able to hold it for a day, after that I''ll have to release it. The "battery" potion itself as well as the materials for it will not keep, so abort after I start or fail to show up on time and 2000 <b>₽</b> will have been wasted.'
 					'"So, do you want me to start the preparations?"'
 					act 'Yes':
 						cla
@@ -607,15 +607,15 @@ if $ARGS[0] = 'Tatiana':
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/shared/sex/mast/dildo.jpg"></center>'
 					'She walks you through everything you need to do while leading you to the couch.'
-					'Once there, as you as stripping, so is she! At your look, she says, "What? I don''t want to tear my clothes if one of us slips."'
-					'You settle onto the couch then work the massive dildo into your snach. After working the dildo for a bit, with Tatiana in a light link guiding you, you switch to your ass. You work there for a while before switching back. You continue this way for nearly two hours, concentrating so hard you only have two orgasms, before you feel your body responding as it should. A quick test and you’re done.'
+					'Once there, as you are stripping, so is she! At your look, she says, "What? I don''t want to tear my clothes if one of us slips."'
+					'You settle onto the couch then work a massive dildo into your snatch. After working the dildo for a bit, with Tatiana in a light link guiding you, you switch to your ass. You work there for a while before switching back. You continue this way for nearly two hours, concentrating so hard you only have two orgasms, before you feel your body responding as it should. A quick test and you’re done.'
 					sucskill = 4
 					sucexcess -= 100
 					act 'Continue':
 						pcs_horny = 0
 						'As you''re finishing, you notice Tatiana has her eyes closed and is visibly trying to get ahold of herself.'
 						if tatisucsexday < daystart or rand(1,100) > 95:
-							'Then her eyes snap open and you feel arousal suddenly flooding the link!'
+							'Then her eyes snap open, and you feel arousal suddenly flooding the link!'
 							xgt 'tatiana_lab', 'suctrainsex'
 						else
 							cla
@@ -639,7 +639,7 @@ if $ARGS[0] = 'Tatiana':
 			'She tilts her head and seems to think the problem over, but it looks like she isn''t too worried by this revelation.'
 			'"Hmm, that complicates the job somewhat, <<$pcs_nickname>>. It seems that the curse is only active during operating hours, so sneaking back in during the night isn''t an option."'
 			'"So... I need to sneak back in there during daylight hours?"'
-			'Tatiana just snorts. "Don''t worry, <<$pcs_nickname>>, I have Gustav for those sorts of jobs. No, I was thinking of an <i>alternative.</i>" She gives you a look that makes you shiver, then continues."I know a way to help you infiltrate the place so you can look for the item in question. When the moment feels right, go to Aphrodite building and give me a call, but remember, only when it''s open."'
+			'Tatiana just snorts. "Don''t worry, <<$pcs_nickname>>, I have Gustav for those sorts of jobs. No, I was thinking of an <i>alternative.</i>" She gives you a look that makes you shiver, then continues, "I know a way to help you infiltrate the place so you can look for the item in question. When the moment feels right, go to the Aphrodite building and give me a call. But remember, only when it''s open."'
 			'Saying this, Tatiana turns towards her studies, leaving you to your own devices.'
 			act 'Continue': gt 'tatiana_lab', 'Tatiana'
 		end
@@ -653,38 +653,33 @@ if $ARGS[0] = 'Tatiana':
 			'"Yes, I am pretty sure. Is that bad?"'
 			'Tatiana pinches the bridge of her nose and sighs. "Yeah, <<$pcs_nickname>>, it''s pretty bad. Aleksei... Well, Alexandria, is an ex-councilor and probably one of the most powerful electric wizards in the world. Remember how The Amulet of Power isn''t supposed to end up in the hands of a woman? Well, she was looking for a form to obtain it, the back alleys word is that the quest made her magic <i>quirky</i>, and that beautiful blonde hair is the consequence of a simple scare."'
 			'"So... Pretty bad?"'
-			'"You have no idea <<$pcs_nickname>>." Tatiana sighs. "Look, we are talking here of a <i>centuries</i> old mindset, the one that yearns for the times were cannibalizing no-magical children was fashionable to recharge your energies. Do you a favor, just lie down, and let Reinhold take care of this."'
+			'"You have no idea <<$pcs_nickname>>." Tatiana sighs. "Look, we are talking here of a <i>centuries</i> old mindset, the one that yearns for the times where cannibalizing non-magical children was fashionable to recharge your energies. Do yourself a favor, just lie down and let Reinhold take care of this."'
 			minut +=5
 			gs 'stat'
 
 			act '"Okay, Tatiana, and what do I get out of this job?"':
 				*clr & cla
 				'<center><table><tr><td><img <<$set_imgh>> src="images/system/intro/shared/karinpre.jpg"></td><td><img <<$set_imgh>> src="images/characters/city/jugo/jugopre.jpg"></tr></td></table></center>'
+				'Tatiana gives you a half-smile, and you understand that she isn''t going to pay you for the Aphrodite job.'
 				if AlexandriaQW =4:				
 					money += 5000
+					'However, at that moment, to everyone''s surprise, Gustav sneaks up to your side and grabs your hand, placing a roll of bills on it. "Take this, <<$pcs_nickname>>. You succeeded in beating Tatiana''s double, and if not for Alex, the film would be here."'
 					if pfilmNO = 1:
-						'Tatiana gives you a half-smile, and you understand that she isn''t going to pay you for the Aphrodite job.'
-						'However, at that moment, to everyone''s surprise, Gustav sneaks up to your side and grabs your hand, placing a roll of bills on it. "Take this, <<$pcs_nickname>>. You succeeded in beating Tatiana''s double, and if not for Alex, the film would be here."'
 						'Gustav just stands there staring at a flabbergasted Tatiana who, after a beat, simply shrugs. "Okay, Gustav, don''t suggest that I am scrimpy or anything... Jeez..."'
 					else
-						'Tatiana gives you a half-smile, and you understand that she isn''t going to pay you for the Aphrodite job.'
-						'However, at that moment, to everyone''s surprise, Gustav sneaks up to your side and grabs your hand, placing a roll of bills on it. "Take this, <<$pcs_nickname>>. You succeeded in beating Tatiana''s double, and if not for Alex, the film would be here."'
-						'Gustav just stands there staring at a flabbergasted Tatiana who, after a beat, simply shrugs. "Okay, Gustav, don''t suggest that I am scrimpy or anything... Jeez. I was going to speak to some of the people in the agency on her behalf, but now... . Okay, fine. <<$pcs_nickname>>, I will do it anyway."'
+						'Gustav just stands there staring at a flabbergasted Tatiana who, after a beat, simply shrugs. "Okay, Gustav, don''t suggest that I am scrimpy or anything... Jeez. I was going to speak to some of the people in the agency on her behalf, but now... Okay, fine. <<$pcs_nickname>>, I will do it anyway."'
 						gs 'fame', 'city', 'modelling', 10
-					end if
+					end
 				else
+					'"<<$pcs_nickname>>, you''ve failed to bring me the film. Instead, it has ended up in the hands of a powerful magician, who may be planning to use it against us."'
 					if pfilmNO = 1:
-						'Tatiana gives you a half-smile, and you understand that she isn''t going to pay you for the Aphrodite job.'
-						'"<<$pcs_nickname>>, you''ve failed to bring me the film. Instead, it has ended up in the hands of a powerful magician, who may be planning to use it against us."'
 						'You open your mouth to protest that it isn''t your fault, but one look at Tatiana''s face tells you that she''s already made up her mind... Fuck!'
 					else
 						gs 'fame', 'city', 'modelling', 10
-						'Tatiana gives you a half-smile, and you understand that she isn''t going to pay you for the Aphrodite job.'
-						'"<<$pcs_nickname>>, you''ve failed to bring me the film. Instead, it has ended up in the hands of a powerful magician, who may be planning to use it against us."'
 						'You open your mouth to protest that it isn''t your fault, but before you can, Tatiana raises her hands consolingly.'
 						'"Don''t worry, <<$pcs_nickname>>, you''re not going to leave empty-handed. I''m going to speak to some of the people in the agency on your behalf. It''ll be good for your modelling career."'
-					end if
-				end if
+					end
+				end
 				AlexandriaQW = 6
 				minut +=5
 				gs 'stat'
@@ -698,8 +693,8 @@ if $ARGS[0] = 'Tatiana':
 				act 'Continue':gt 'tatiana_lab', 'Tatiana'
 			end
 		end
-	end if
-end if
+	end
+end
 
 
 if $ARGS[0] = 'Tatianasuctalk':
@@ -713,12 +708,7 @@ if $ARGS[0] = 'Tatianasuctalk':
 	if sucpcinfo < 2:
 		minut += 15
 		'As you both settle onto the couch, Tatiana turns to you and says, "Ok, tell me what happened."'
-		'You spend the next 15 minutes telling her about the Fairy, the odd dream, the energy you let loose the other night,'
-		if succubusQW = 4:
-			'and the felling you get when you''ve had sex.'
-		elseif succubusQW > 4:
-			'the felling you get when you''ve had sex, and the reaction you had to almost being raped.'
-		end
+		'You spend the next 15 minutes telling her about the Fairy, the odd dream, ' + iif(succubusQW < 4, 'and ', '') + 'the energy you let loose the other night.' + iif(succubusQW < 4, '.', iif(succubusQW = 4, ', and ', ', ') + 'the feeling you get when you''ve had sex' + iif(succubusQW = 4, '.', ', and the reaction you had to almost being raped.')
 		''
 		'She thinks about it for a moment and then says, "Well, I have a couple of ideas, but no sense guessing when I can just magically examine you."'
 		'She hops up and says, "Get undressed and lie down on the couch."'
@@ -743,16 +733,16 @@ if $ARGS[0] = 'Tatianasuctalk':
 				act 'Ask her to tell you': gt 'succubus', 'tatianaask', 1
 			elseif sucpcinfo = 5:
 				'"Actually, I have gotten some more information about Succubae."'
-				'"I heard from an old friend of mine who is now living in Morocco and she actually has a Succubus for a lover. She said that after they had been together for some time, they discovered that with her help, her Succubus lover learned something new."'
+				'"I heard from an old friend of mine who is now living in Morocco and actually has a Succubus for a lover. She said that after they had been together for some time, they discovered that, with her help, her Succubus lover learned something new."'
 				sucpcinfo = 6
 				sucinfoday = daystart + 10 + rand(0,7)
 				act 'Ask her to tell you': gt 'succubus', 'tatianaask', 2
 			else
-				'No, I havn''t.'
+				'No, I haven''t.'
 				act 'Continue': gt 'tatiana_lab', 'Tatianasuctalk'
 			end
 		else
-			'No, I havn''t.'
+			'No, I haven''t.'
 			act 'Continue': gt 'tatiana_lab', 'Tatianasuctalk'
 		end
 	end
@@ -790,7 +780,7 @@ if $ARGS[0] = 'Tatianasucsexask':
 				act 'Move on to something else': gt 'tatiana_lab', 'Tatiana'
 			else
 				'"I would love to!", with a wide smile.'
-				'She leads you over to the couch and you both strip.'
+				'She leads you over to the couch, and you both strip.'
 				act 'Proceed': gt 'succubus', 'tatianasex'
 			end
 		else
@@ -801,7 +791,7 @@ if $ARGS[0] = 'Tatianasucsexask':
 				else
 					'She gives you a "come hither" smile and says, "I would love to, <<$pcs_nickname>>!"'
 					'You both head toward the couch, stripping as you go.'
-					'Once there, you both sit down facing each other and she looks at you in anticipation.'
+					'Once there, you both sit down facing each other, and she looks at you in anticipation.'
 					act 'Proceed': gt 'succubus', 'tatianasex'
 				end
 			else
@@ -835,13 +825,13 @@ if $ARGS[0] = 'Tatianasexreject':
 end
 
 if $ARGS[0] = 'suctrainsex':
-	'She suddenly lunges at you and starts kissing you! You''re so surprised it takes you a bit to respond and, before you can do anything, she is nibbling your ear and whispering, "Let it go..."'
+	'She suddenly lunges at you and starts kissing you! You''re so surprised it takes you a bit to respond, and before you can do anything, she is nibbling your ear and whispering, "Let it go..."'
 
 	gs 'arousal', 'kiss', 5, 'lesbian', 'sub'
 	gs 'stat'
 
 	if pcs_horny >= 100:
-		'You''re so shocked at this; you suddenly feel a powerful orgasm rush through you, causing you to cry out even as it rushes down the link to Tatiana, giving her a powerful orgasm as well!'
+		'You''re so shocked at this you suddenly feel a powerful orgasm rush through you, causing you to cry out even as it rushes down the link to Tatiana, giving her a powerful orgasm as well!'
 		'Then, you feel your control slip...'
 		$orgasm_or = 'yes'
 		gs 'stat'
@@ -864,7 +854,7 @@ if $ARGS[0] = 'suctraining':
 		*clr
 		'<center><b><font color="maroon">Tatiana</font></b></center>'
 		'<center><img <<$set_imgh>> src="images/system/intro/shared/karinpre.jpg"></center>'
-		'The moment you walked into her lab, Tatiana''s head jerked up and she hurried over to you.'
+		'The moment you walk into her lab, Tatiana''s head jerks up and she hurries over to you.'
 		'She stares at you for several seconds, then demands, "What the hell happened to you!?!?"'
 		'You start to answer her when she holds up her hand and says, "Wait, come sit on the couch and tell me."'
 		'She turns away from you and walks toward the couch.'
@@ -878,13 +868,16 @@ if $ARGS[0] = 'suctraining':
 			*clr
 			'<center><b><font color="maroon">Tatiana</font></b></center>'
 			'<center><img <<$set_imgh>> src="images/system/intro/shared/karinpre.jpg"></center>'
-			'You attempt to enter Tatiana''s lab but an invisible barrier stops you, but Tatiana apparently heard you as she rushes over and says, "What''s wrong? Do we need to cancel?"'
+			'You attempt to enter Tatiana''s lab, but an invisible barrier stops you. Tatiana apparently heard you as she rushes over and says, "What''s wrong? Do we need to cancel?"'
 			act 'Yes, I need to cancel':
 				cla
 				'"Are you sure?"'
 				act 'Yes, I''m sure':
 					cla
 					if tatisucsexday = daystart + 7:
+						!! this looks like a potential bug. if this isn''t the first time you''re preparing
+						!! then you should only get 2000 back and sctrainprep should be set back to -1 here.
+						!! fixing this likely requires another sctrainprep value besides -1, 0, and 1
 						sctrainprep = 0
 						money += 5000
 						'"Ok, good thing I hadn''t bought anything yet." and she hands you back the 5000 <b>₽</b> before going back to her studying.'
@@ -918,7 +911,7 @@ if $ARGS[0] = 'suctraining':
 			else
 				$scsextmp = 'day'
 			end
-			'You attempt to enter Tatiana''s lab but an invisible barrier stops you, but Tatiana apparently heard you as she shouts from across the lab, "I''ve already taken the first potion so I can''t come anywhere near you, come back all charged up in <<tatisucsexday - daystart>> <<$scsextmp>>!"'
+			'You attempt to enter Tatiana''s lab, but an invisible barrier stops you. Tatiana apparently heard you as she shouts from across the lab, "I''ve already taken the first potion, so I can''t come anywhere near you, come back all charged up in <<tatisucsexday - daystart>> <<$scsextmp>>!"'
 			killvar '$scsextmp'
 			act 'Leave':
 				minut += 3
@@ -938,10 +931,10 @@ if $ARGS[0] = 'suctraining':
 				'As you step through the barrier, Tatiana seems to teleport to you and start kissing you.'
 				'She then starts pulling you toward her workbench while saying between kisses, "Thank (kiss) goodness (kiss) you''re (kiss) here (kiss) and ready (kiss)! You wouldn''t (kiss) believe (kiss) how (kiss) <i><b>horny</b></i> (kiss) carrying (kiss) all this (kiss) sexual (kiss) energy (kiss) has made me!"'
 !!				Maybe add arousal call here
-				'She suddenly turns away from you and you realize that you have reached her workbench. She grabs two smallish vails off the top, pops the tops off both, hands you one saying, "Drink this," before downing the other.'
+				'She suddenly turns away from you, and you realize that you have reached her workbench. She grabs two smallish vials off the top, pops the tops off both, and hands you one, saying, "Drink this," before downing the other.'
 				'It tastes like strawberry syrup.'
-				'This time you''re ready when Tatiana lunges at you and you resume kissing as you lead her toward the couch while she is striping the clothes off both of you and you feel a large amount of your stored energy being released into your body.'
-				'Once there, you both sit down facing each other, she looks at you with burning lust, and says, "Do it!"'
+				'This time you''re ready when Tatiana lunges at you, and you resume kissing as you lead her toward the couch while she is striping the clothes off both of you and you feel a large amount of your stored energy being released into your body.'
+				'Once there, you both sit down facing each other. She looks at you with burning lust and says, "Do it!"'
 				act 'Proceed': gt 'succubus', 'tatianasex'
 				exit
 			elseif sucexcess < 100 and succhungry > -2 and tatisucsexday = daystart:
@@ -957,7 +950,7 @@ if $ARGS[0] = 'suctraining':
 			act 'Leave': minut += 5 & gt 'city_center'
 			exit
 		else
-			'The barrier is down when you get to the lab and Tatiana calls from across the room, "You''re too late, I had to release the energy and we''ll need to start over."'
+			'The barrier is down when you get to the lab, and Tatiana calls from across the room, "You''re too late, I had to release the energy, and we''ll need to start over."'
 			sctrainprep = -1
 			act 'Continue': gt 'tatiana_lab', 'start'
 			exit
@@ -980,11 +973,11 @@ if $ARGS[0] = 'missions':
 		TatianaMissionDay = daystart
 		minut += 15
 		*clr & cla
-		'Tatiana looks up from the pile of files she always seems to be sifting when she notices you. "<<$pcs_firstname>>, finally! I''ve been waiting for you. We need to talk."'
+		'Tatiana looks up from the pile of files she always seems to be sifting through when she notices you. "<<$pcs_firstname>>, finally! I''ve been waiting for you. We need to talk."'
 		'"What about?"'
 		'"Well, you''ve had some time to acclimate yourself to your new situation and to process everything Reinhold and I told you, so," she smiles, "it''s time we started your actual training."'
 		'You feel a rush of excitement going through you, and images of shooting fireballs from your hands and parting the sea come before your inner eye. "Great!" You exclaim. "I''m so ready for that."'
-		'Tatiana probably guessed what you were thinking, because she chuckles and placates: "That doesn''t mean we''re gonna teach you super-powerful spells. At least not yet." She gives the words a moment to take effect; your enthusiasm for her plans, figuratively throbbing and erect a second ago, shrivels and goes limp by the time she continues. "This part of your training is the most important: You will actually put your skills, senses and knowledge into practice."'
+		'Tatiana probably guessed what you were thinking, because she chuckles and placates, "That doesn''t mean we''re gonna teach you super-powerful spells. At least not yet." She gives the words a moment to take effect; your enthusiasm for her plans, figuratively throbbing and erect a second ago, shrivels and goes limp by the time she continues. "This part of your training is the most important: You will actually put your skills, senses and knowledge into practice."'
 		'The last bit rouses your interest once more. "Into practice? You mean like doing missions for the council?"'
 		'"Well, the council''s kinda responsible for the big leagues, which is way more than you could handle yet. But long-term, yes." Her tone takes on a mocking quality. "Once Reinhold thinks you''re ready, I''m sure he''ll swoop in, take credit for all the progress you have made thanks to me and swamp you with dangerous adventures. That''d be just like the old bastard." Tatiana sees the uncertainty with which you look at her, grins and shakes her head, confirming that it was all in good humor.'
 		act 'What kind of missions?':
@@ -999,12 +992,12 @@ if $ARGS[0] = 'missions':
 			'Tatiana smiles as you quote her and nods. "And some of those things really turn out to have magical causes: The dog with two tails had been experimented on by one of us, so it was practically bursting with magic. As for the voices..." her smile turns lewd, "those were just some tenants having some extramarital fun away from prying eyes, regularly and loudly."'
 			act 'Why are we doing this?':
 				*clr & cla
-				'You feel your face heating up slightly at the thought. Something about this is bothering you, though: "But... why would we even look into this? I mean, it sounds interesting enough, but is there a reason behind it?"'
+				'You feel your face heating up slightly at the thought. Something about this is bothering you, though. "But... why would we even look into this? I mean, it sounds interesting enough, but is there a reason behind it?"'
 				'Tatiana shrugs. "Well, you <i>could</i> go and get some ancient tomes, lock yourself into an ivory tower and spend half a century or something reading about magic, like most of the old farts on the council do. <b>OR</b>," she spreads her arms to point towards her many files and books on one hand and the exit on the other, "you could just cover the basics and then go out and experience magic first-hand, like I do."'
 				'You stare at the heaps and piles of paper incredulously - they are a multiple of everything you''ve read in your entire life! "Those are the basics?!"'
 				'"Yep," she laughs, "if you wanna really understand how magic works and why it does this at one time and that at another, you gotta get some reading done. Trust me, if there was any way around it, I would have found it. But magic makes the reading easier and quicker, and it''s sooo worth it. The things you can do once you grasp what energies the universe holds are incredible. And I''ve only just scratched the surface."'
 				'"What do you mean by ''energies of the universe''? I thought you said that magic only exists in living things, like plants and animals."'
-				'"Did I?" She looks thoughtful but shrugs again. "Well, it''s a little complicated, but to put it simply: When scientists speak of ''dark matter'' and ''dark energy'', then, in reality, they are trying to explain the magic in this plane of existence and all the others, like demons and the magic that exists in their ''dimension'' or whatever you''d wanna call it. But," she waves her hand as if to shoo away a pesky fly, "you don''t have to concern yourself with that right now. When the time comes, Reinhold can explain it to you in more detail - hell, considering that he''s your mentor, I''ve done an awful lot of explaining already... Now, let''s go!"'
+				'"Did I?" She looks thoughtful but shrugs again. "Well, it''s a little complicated, but to put it simply: when scientists speak of ''dark matter'' and ''dark energy'', then, in reality, they are trying to explain the magic in this plane of existence and all the others, like demons and the magic that exists in their ''dimension'' or whatever you''d wanna call it. But," she waves her hand as if to shoo away a pesky fly, "you don''t have to concern yourself with that right now. When the time comes, Reinhold can explain it to you in more detail - hell, considering that he''s your mentor, I''ve done an awful lot of explaining already... Now, let''s go!"'
 				'With that, Tatiana turns towards the exit once more and beckons you to follow.'
 				'"Go where?" You ask.'
 				'"To the magic!" She answers cryptically.'