Browse Source

Change the body spell with Tatiana to use the hard reset instead and fixed some language/tabbing issues.

KevinSmarts 6 years ago
parent
commit
f31fab79f9
1 changed files with 129 additions and 127 deletions
  1. 129 127
      locations/lab

+ 129 - 127
locations/lab

@@ -254,176 +254,178 @@ if $ARGS[0] = 'Tatiana':
 
 	act 'Leave':gt 'lab', 'start'
 
-	act 'I''m too fat and do not want to get fat.':
+	act 'Ask for help with your appearance':
 		cla
-		'(You) - Tatiana, I oily dibilka not able to watch their weight, wave your magic wand, what would not I grew fat.'
-		'(Tatiana) - Ugh, that''s the same ponavylazyat downs of pussy, and then I vozis with them. Dick with you, take it. Just remember, this spell forever, you''ll be able to just come and change the waist and thighs, and since boobs are made of fat, I only supreme mercy 1st size you do, a little, shoved silicone. And the decision to reverse is or whether silicone doll or live as a man, I raskoldovyvat you will not. Since you have more fat will not be absorbed and body parameters are kept magically, marvel not at the post of dystrophy and not marvel that force will fall faster from malnutrition, you will no longer internal reserves.'
+		'"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 manna 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.'
+		'Do you wish to try this spell?'
 
-		act 'No no no, I changed my mind. Will continue smarter.':gt 'lab', 'Tatiana'
+		act 'No, no, I''ve changed my mind. Thank you':gt 'lab', 'Tatiana'
 
-		act 'I would want that waist was ...':
-			cla
-			dounspell = 1
-			TaliaDoun = input ("Waist in cm?")
-
-			if TaliaDoun <= 0:TaliaDoun = 20
-
-			act 'I would want that thighs ...':
+		if pcs_manna >= 40:
+			act 'That sounds great, let''s do it!':
+				*clr
 				cla
-				bedraDoun = input ("Hips in cm?")
-
-				if bedraDoun <= 0:bedraDoun = 40
-					act 'Enjoy your stupidity.':gt 'lab', 'Tatiana'
-				end
+				minut += 30
+				dounspell = 1
+				gs 'body_shape', 'hardreset'
+				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 its 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 'lab', 'Tatiana'
 			end
 		end
+	end
 
-		if IvanPodstavaQW = 2 and poverKAR = 0 and softKAR = 0:
-			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."'
-
-				act 'Military solution':
-					cls
-					poverKAR = 1
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/pre/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.'
-
-					act 'Leave':gt 'lab', 'Tatiana'
-				end
+	if IvanPodstavaQW = 2 and poverKAR = 0 and softKAR = 0:
+		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."'
 
-				act 'Tricky decision':
-					cls
-					softKAR = 1
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/pre/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.'
+			act 'Military solution':
+				cls
+				poverKAR = 1
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/pre/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.'
 
-					act 'Leave':gt 'lab', 'Tatiana'
-				end
+				act 'Leave':gt 'lab', 'Tatiana'
 			end
-		elseif poverKAR = 2:
-			act 'Approach to Tatiana about attacks apartments Ivan':
-				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. "'
+
+			act 'Tricky decision':
+				cls
+				softKAR = 1
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/pre/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.'
 
 				act 'Leave':gt 'lab', 'Tatiana'
 			end
 		end
+	elseif poverKAR = 2:
+		act 'Approach to Tatiana about attacks apartments Ivan':
+			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. "'
 
-		if Tatianaday ! daystart:
-			act 'Develop intelligence (1:00)':
-				cla
-				intel_exp += rand(3, 6)
-				minut += 60
-				Tatianaday = daystart
-				'You study with Tatiana developing your intellect.'
+			act 'Leave':gt 'lab', 'Tatiana'
+		end
+	end
 
-				act 'Leave':gt 'lab', 'Tatiana'
-			end
+	if Tatianaday ! daystart:
+		act 'Develop your intelligence (1:00)':
+			cla
+			intel_exp += rand(3, 6)
+			minut += 60
+			Tatianaday = daystart
+			'You study with Tatiana developing your intellect.'
 
-			act 'Will develop (1:00)':
-				cla
-				sprt_exp += rand(3, 6)
-				minut += 60
-				Tatianaday = daystart
-				'You meditate with Tatiana developing your willpower.'
+			act 'Leave':gt 'lab', 'Tatiana'
+		end
 
-				act 'Leave':gt 'lab', 'Tatiana'
-			end
+		act 'Develop your inner spirit (1:00)':
+			cla
+			sprt_exp += rand(3, 6)
+			minut += 60
+			Tatianaday = daystart
+			'You meditate with Tatiana improving your spirituality.'
+
+			act 'Leave':gt 'lab', 'Tatiana'
 		end
+	end
 
-		if spelltuman = 0 and pcs_magik >= 1:
-			act 'Learn technique fog (1:00)':
-				cla
-				minut += 60
-				spelltuman = 1
-				'You learnt the technique of calling fog in battle.'
+	if spelltuman = 0 and pcs_magik >= 1:
+		act 'Learn technique fog (1:00)':
+			cla
+			minut += 60
+			spelltuman = 1
+			'You learnt the technique of calling fog in battle.'
 
-				act 'Leave':gt 'lab', 'Tatiana'
-			end
+			act 'Leave':gt 'lab', 'Tatiana'
 		end
+	end
 
-		if spellklon = 0 and pcs_magik >= 1:
-			act 'Learn technique protection cloning (1:00)':
-				cla
-				minut += 60
-				spellklon = 1
-				'You learnt the technique of cloning yourself to create decoys in battle.'
+	if spellklon = 0 and pcs_magik >= 1:
+		act 'Learn technique protection cloning (1:00)':
+			cla
+			minut += 60
+			spellklon = 1
+			'You learnt the technique of cloning yourself to create decoys in battle.'
 
-				act 'Leave':gt 'lab', 'Tatiana'
-			end
+			act 'Leave':gt 'lab', 'Tatiana'
 		end
+	end
 
-		if spellstun = 0 and pcs_magik >= 2:
-			act 'Learn technique paralysis (1:00)':
-				cla
-				minut += 60
-				spellstun = 1
-				'You learnt the technique of paralyzing the enemy.'
+	if spellstun = 0 and pcs_magik >= 2:
+		act 'Learn technique paralysis (1:00)':
+			cla
+			minut += 60
+			spellstun = 1
+			'You learnt the technique of paralyzing the enemy.'
 
-				act 'Leave':gt 'lab', 'Tatiana'
-			end
+			act 'Leave':gt 'lab', 'Tatiana'
 		end
+	end
 
-		if spellwind = 0 and pcs_magik >= 2:
-			act 'Learn mist blowing (1:00)':
-				cla
-				minut += 60
-				spellwind = 1
-				'You learnt the technique of blowing mist.'
+	if spellwind = 0 and pcs_magik >= 2:
+		act 'Learn mist blowing (1:00)':
+			cla
+			minut += 60
+			spellwind = 1
+			'You learnt the technique of blowing mist.'
 
-				act 'Leave':gt 'lab', 'Tatiana'
-			end
+			act 'Leave':gt 'lab', 'Tatiana'
 		end
+	end
 
-		if spellklon2 = 0 and pcs_magik >= 2:
-			act 'Learn triple cloning (1:00)':
-				cla
-				minut += 60
-				spellklon2 = 1
-				'You learnt the technique triple cloning.'
+	if spellklon2 = 0 and pcs_magik >= 2:
+		act 'Learn triple cloning (1:00)':
+			cla
+			minut += 60
+			spellklon2 = 1
+			'You learnt the technique triple cloning.'
 
-				act 'Leave':gt 'lab', 'Tatiana'
-			end
+			act 'Leave':gt 'lab', 'Tatiana'
 		end
+	end
 
-		if spellenergo = 0 and pcs_magik >= 3:
-			act 'Learn energoschit (1:00)':
-				cla
-				minut += 60
-				spellenergo = 1
-				'You learnt the technique energoschita.'
+	if spellenergo = 0 and pcs_magik >= 3:
+		act 'Learn energoschit (1:00)':
+			cla
+			minut += 60
+			spellenergo = 1
+			'You learnt the technique energoschita.'
 
-				act 'Leave':gt 'lab', 'Tatiana'
-			end
+			act 'Leave':gt 'lab', 'Tatiana'
 		end
+	end
 
-		if spellinit = 0 and pcs_magik >= 3:
-			act 'Learn technique deceleration time (1:00)':
-				cla
-				minut += 60
-				spellinit = 1
-				'You learnt the technique of time dilation.'
+	if spellinit = 0 and pcs_magik >= 3:
+		act 'Learn technique deceleration time (1:00)':
+			cla
+			minut += 60
+			spellinit = 1
+			'You learnt the technique of time dilation.'
 
-				act 'Leave':gt 'lab', 'Tatiana'
-			end
+			act 'Leave':gt 'lab', 'Tatiana'
 		end
+	end
 
-		if pcs_magik >= 4 and spellhel = 0:
-			!!'With this level of magic I can not teach you anymore.'
-				act 'Learn the technique of treatment (1:00)':
-				cla
-				minut += 60
-				spellhel = 1
-				'You learnt the technique of treatment.'
+	if pcs_magik >= 4 and spellhel = 0:
+		!!'With this level of magic I can not teach you anymore.'
+			act 'Learn the technique of treatment (1:00)':
+			cla
+			minut += 60
+			spellhel = 1
+			'You learnt the technique of treatment.'
 
-				act 'Leave':gt 'lab', 'Tatiana'
-			end
+			act 'Leave':gt 'lab', 'Tatiana'
 		end
+	end
 
 	if pcs_magik >= 5 and spellavtoklon = 0:
 		act 'Learn technique preparation (1:00)':