1
0
Selaa lähdekoodia

[Fixed] removed a blank page with only a further option during the event. Fixed some bad naming convention.

CroWke 5 vuotta sitten
vanhempi
säilyke
dc84109faf
1 muutettua tiedostoa jossa 46 lisäystä ja 96 poistoa
  1. 46 96
      locations/dimaEv.qsrc

+ 46 - 96
locations/dimaEv.qsrc

@@ -1,4 +1,5 @@
 # dimaEv
+
 !!files that can be deleted dima, dimagohome2, dimahome, dimkawarning, dimaev, dimaRudeEV
 
 menu_off = 1
@@ -93,7 +94,7 @@ if $ARGS[0] = 'drugged':
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/pre.jpg"></center>'
 		'You hear Dimka chuckling, it takes and eternity to turn your head and center your eyes at him. You see him looking intently at you, examining whatever have affected your brain. "Well, it looks like the drugs have taken full effect on you already." He stands up and unbuttons his pants and pulls out his dick, giving it a couple of strokes to get it hard for you. "Come here, baby, and suck on this." You stand there looking stupidity to his cock. He then sighed and taping it say "Come on slut, here, take your bone."'
-		act 'Take by mouth':
+		act 'Suck him':
 			*clr & cla
 			bja += 1
 			if maxdra = 0:maxdra = 1
@@ -118,8 +119,7 @@ if $ARGS[0] = 'drugged':
 					gs 'arousal', 'end'
 					gs 'stat'
 					act 'Clean up':
-						cla
-						*clr
+						*clr & cla
 						minut += 5
 						dimaFilm = 1
 						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
@@ -131,8 +131,7 @@ if $ARGS[0] = 'drugged':
 						'At his threat, your blood runs cold and your skin pale, you know what this would mean to your reputation, not counting how your mother would react.'
 						act 'Run out of his house': gt 'pavResidential'
 						act 'Plead':
-							cla
-							*clr
+							*clr & cla
 							minut += 5
 							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
 							'<center><img src="images/pc/tears1.jpg"></center>'
@@ -155,8 +154,7 @@ if $ARGS[0] = 'drugged':
 					gs 'arousal', 'end'
 					gs 'stat'
 					act 'Clean up':
-						cla
-						*clr
+						*clr & cla
 						minut += 5
 						dimaFilm = 1
 						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
@@ -168,8 +166,7 @@ if $ARGS[0] = 'drugged':
 						'At his threat, your blood runs cold and your skin pale, you know what this would mean to your reputation, not counting how your mother would react.'
 						act 'Run out of his house': gt 'pavResidential'
 						act 'Plead':
-							cla
-							*clr
+							*clr & cla
 							minut += 5
 							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
 							'<center><img src="images/pc/tears1.jpg"></center>'
@@ -199,8 +196,7 @@ if $ARGS[0] = 'drugged':
 					gs 'pain', 2, 'throat', 'stretch'
 					gs 'stat'
 					act 'Clean up':
-						cla
-						*clr
+						*clr & cla
 						minut += 5
 						dimaFilm = 1
 						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
@@ -212,8 +208,7 @@ if $ARGS[0] = 'drugged':
 						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
 						act 'Run out of his house': gt 'pavResidential'
 						act 'Plead':
-							cla
-							*clr
+							*clr & cla
 							minut += 5
 							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
 							'<center><img src="images/pc/tears1.jpg"></center>'
@@ -241,8 +236,7 @@ if $ARGS[0] = 'drugged':
 						gs 'arousal', 'end'
 						gs 'stat'
 						act 'Clean up':
-							cla
-							*clr
+							*clr & cla
 							minut += 5
 							dimaFilm = 1
 							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
@@ -254,8 +248,7 @@ if $ARGS[0] = 'drugged':
 							'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
 							act 'Run out of his house': gt 'pavResidential'
 							act 'Plead':
-								cla
-								*clr
+								*clr & cla
 								minut += 5
 								'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
 								'<center><img src="images/pc/tears1.jpg"></center>'
@@ -284,8 +277,7 @@ if $ARGS[0] = 'drugged':
 					gs 'arousal', 'end'
 					gs 'stat'
 					act 'Clean up':
-						cla
-						*clr
+						*clr & cla
 						minut += 5
 						dimaFilm = 1
 						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
@@ -297,8 +289,7 @@ if $ARGS[0] = 'drugged':
 						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
 						act 'Run out of his house': gt 'pavResidential'
 						act 'Plead':
-							cla
-							*clr
+							*clr & cla
 							minut += 5
 							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
 							'<center><img src="images/pc/tears1.jpg"></center>'
@@ -323,8 +314,7 @@ if $ARGS[0] = 'drugged':
 					gs 'arousal', 'end'
 					gs 'stat'
 					act 'Clean up':
-						cla
-						*clr
+						*clr & cla
 						minut += 5
 						dimaFilm = 1
 						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
@@ -336,8 +326,7 @@ if $ARGS[0] = 'drugged':
 						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
 						act 'Run out of his house': gt 'pavResidential'
 						act 'Plead':
-							cla
-							*clr
+							*clr & cla
 							minut += 5
 							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
 							'<center><img src="images/pc/tears1.jpg"></center>'
@@ -356,8 +345,7 @@ if $ARGS[0] = 'drugged':
 					gs 'arousal', 'end'
 					gs 'stat'
 					act 'Clean up':
-						cla
-						*clr
+						*clr & cla
 						minut += 5
 						dimaFilm = 1
 						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
@@ -369,8 +357,7 @@ if $ARGS[0] = 'drugged':
 						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
 						act 'Run out of his house': gt 'pavResidential'
 						act 'Plead':
-							cla
-							*clr
+							*clr & cla
 							minut += 5
 							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
 							'<center><img src="images/pc/tears1.jpg"></center>'
@@ -428,8 +415,7 @@ if $ARGS[0] = 'cocaine':
 					gs 'arousal', 'end'
 					gs 'stat'
 					act 'Clean up':
-						cla
-						*clr
+						*clr & cla
 						minut += 5
 						dimaFilm = 1
 						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
@@ -441,8 +427,7 @@ if $ARGS[0] = 'cocaine':
 						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
 						act 'Run out of his house': gt 'pavResidential'
 						act 'Plead':
-							cla
-							*clr
+							*clr & cla
 							minut += 5
 							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
 							'<center><img src="images/pc/tears1.jpg"></center>'
@@ -465,8 +450,7 @@ if $ARGS[0] = 'cocaine':
 					gs 'arousal', 'end'
 					gs 'stat'
 					act 'Clean up':
-						cla
-						*clr
+						*clr & cla
 						minut += 5
 						dimaFilm = 1
 						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
@@ -478,8 +462,7 @@ if $ARGS[0] = 'cocaine':
 						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
 						act 'Run out of his house': gt 'pavResidential'
 						act 'Plead':
-							cla
-							*clr
+							*clr & cla
 							minut += 5
 							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
 							'<center><img src="images/pc/tears1.jpg"></center>'
@@ -509,8 +492,7 @@ if $ARGS[0] = 'cocaine':
 					gs 'pain', 2, 'throat', 'stretch'
 					gs 'stat'
 					act 'Clean up':
-						cla
-						*clr
+						*clr & cla
 						minut += 5
 						dimaFilm = 1
 						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
@@ -522,8 +504,7 @@ if $ARGS[0] = 'cocaine':
 						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
 						act 'Run out of his house': gt 'pavResidential'
 						act 'Plead':
-							cla
-							*clr
+							*clr & cla
 							minut += 5
 							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
 							'<center><img src="images/pc/tears1.jpg"></center>'
@@ -551,8 +532,7 @@ if $ARGS[0] = 'cocaine':
 						gs 'arousal', 'end'
 						gs 'stat'
 						act 'Clean up':
-							cla
-							*clr
+							*clr & cla
 							minut += 5
 							dimaFilm = 1
 							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
@@ -564,8 +544,7 @@ if $ARGS[0] = 'cocaine':
 							'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
 							act 'Run out of his house': gt 'pavResidential'
 							act 'Plead':
-								cla
-								*clr
+								*clr & cla
 								minut += 5
 								'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
 								'<center><img src="images/pc/tears1.jpg"></center>'
@@ -594,8 +573,7 @@ if $ARGS[0] = 'cocaine':
 					gs 'arousal', 'end'
 					gs 'stat'
 					act 'Clean up':
-						cla
-						*clr
+						*clr & cla
 						minut += 5
 						dimaFilm = 1
 						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
@@ -607,8 +585,7 @@ if $ARGS[0] = 'cocaine':
 						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
 						act 'Run out of his house': gt 'pavResidential'
 						act 'Plead':
-							cla
-							*clr
+							*clr & cla
 							minut += 5
 							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
 							'<center><img src="images/pc/tears1.jpg"></center>'
@@ -633,8 +610,7 @@ if $ARGS[0] = 'cocaine':
 					gs 'arousal', 'end'
 					gs 'stat'
 					act 'Clean up':
-						cla
-						*clr
+						*clr & cla
 						minut += 5
 						dimaFilm = 1
 						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
@@ -646,8 +622,7 @@ if $ARGS[0] = 'cocaine':
 						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
 						act 'Run out of his house': gt 'pavResidential'
 						act 'Plead':
-							cla
-							*clr
+							*clr & cla
 							minut += 5
 							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
 							'<center><img src="images/pc/tears1.jpg"></center>'
@@ -666,8 +641,7 @@ if $ARGS[0] = 'cocaine':
 					gs 'arousal', 'end'
 					gs 'stat'
 					act 'Clean up':
-						cla
-						*clr
+						*clr & cla
 						minut += 5
 						dimaFilm = 1
 						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
@@ -679,8 +653,7 @@ if $ARGS[0] = 'cocaine':
 						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
 						act 'Run out of his house': gt 'pavResidential'
 						act 'Plead':
-							cla
-							*clr
+							*clr & cla
 							minut += 5
 							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
 							'<center><img src="images/pc/tears1.jpg"></center>'
@@ -796,34 +769,11 @@ end
 
 if $ARGS[0] = 'dimkaplays2':
 	dimasexday = daystart
-
 	dimadalrand = rand(0,10)
-	if dimadalrand = 0:
-		act 'Further':gt 'dimaEv', '0'
-	elseif dimadalrand = 1:
-		act 'Further':gt 'dimaEv', '1'
-	elseif dimadalrand = 2:
-		act 'Further':gt 'dimaEv', '2'
-	elseif dimadalrand = 3:
-		act 'Further':gt 'dimaEv', '3'
-	elseif dimadalrand = 4:
-		act 'Further':gt 'dimaEv', '4'
-	elseif dimadalrand = 5:
-		act 'Further':gt 'dimaEv', '5'
-	elseif dimadalrand = 6:
-		act 'Further':gt 'dimaEv', '6'
-	elseif dimadalrand = 7:
-		act 'Further':gt 'dimaEv', '7'
-	elseif dimadalrand = 8:
-		act 'Further':gt 'dimaEv', '8'
-	elseif dimadalrand = 9:
-		act 'Further':gt 'dimaEv', '9'
-	elseif dimadalrand = 10:
-		act 'Further':gt 'dimaEv', '10'
-	end
+	gt 'dimaEv', 'dimkaabuse<<dimadalrand>>'
 end
 
-if $ARGS[0] = '0':
+if $ARGS[0] = 'dimkaabuse0':
 	*clr & cla
 	gs 'pain', 2, 'armR', 'bind'
 	gs 'pain', 2, 'armL', 'bind'
@@ -854,7 +804,7 @@ if $ARGS[0] = '0':
 	end
 end
 
-if $ARGS[0] = '1':
+if $ARGS[0] = 'dimkaabuse1':
 	*clr & cla
 	if maxdradrug = 1:maxdradrug = 2
 	spafinloc = 12
@@ -870,7 +820,7 @@ if $ARGS[0] = '1':
 	act 'Leave':gt 'pavResidential'
 end
 
-if $ARGS[0] = '2':
+if $ARGS[0] = 'dimkaabuse2':
 	*clr & cla
 	gs 'boyStat', 'A1'
 	silavag = 1
@@ -889,7 +839,7 @@ if $ARGS[0] = '2':
 	act 'Leave':gt 'pavResidential'
 end
 
-if $ARGS[0] = '3':
+if $ARGS[0] = 'dimkaabuse3':
 	*clr & cla
 	gs 'boyStat', 'A1'
 	silavag = 1
@@ -904,7 +854,7 @@ if $ARGS[0] = '3':
 	act 'Leave':gt 'pavResidential'
 end
 
-if $ARGS[0] = '4':
+if $ARGS[0] = 'dimkaabuse4':
 	*clr & cla
 	if pcs_makeup ! 1:pcs_makeup = 0
 	pcs_throat += 5
@@ -918,7 +868,7 @@ if $ARGS[0] = '4':
 	act 'Leave':gt 'pavResidential'
 end
 
-if $ARGS[0] = '5':
+if $ARGS[0] = 'dimkaabuse5':
 	*clr & cla
 	spank += 1
 	minut += 15
@@ -932,7 +882,7 @@ if $ARGS[0] = '5':
 	act 'Leave':gt 'pavResidential'
 end
 
-if $ARGS[0] = '6':
+if $ARGS[0] = 'dimkaabuse6':
 	*clr & cla
 	if maxdradrug = 6:maxdradrug = 7
 	if pcs_makeup ! 1:pcs_makeup = 0
@@ -955,7 +905,7 @@ if $ARGS[0] = '6':
 	act 'Leave':gt 'pavResidential'
 end
 
-if $ARGS[0] = '7':
+if $ARGS[0] = 'dimkaabuse7':
 	*clr & cla
 	gs 'pain', 9, 'pierce', 'tongue'
 	if maxdradrug = 7:maxdradrug = 8
@@ -964,18 +914,18 @@ if $ARGS[0] = '7':
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/ton.jpg"></center>'
 	'Dimka binds you until you are fully immobilized. "As a slut, you have a dirty tongue. That can''t be, you must be clean for me. So..I am going to teach you a lesson in personal hygiene." You try to recoil in horror at the needles in his hands, but you are trapped. He grabs hold of your tongue and suddenly pushes a needle through it. You squeal and twitch from the sharp pain. Dimka amuses himself by sticking needles through your tongue, lips and cheeks. The more you howl in pain, the more excited he gets.'
-	if pirsA > 0:'When he tire out. Dimka pulls the needles out of your tongue and sets you free.'
+	if pirsA > 0:'When he gets bored of watching you in pain, Dimka pulls the needles out of your tongue and sets you free.'
 	if pirsA = 0:
 		pirsA = 1
 		pirsA1_owned = 1
 		pierWearCount += 1
-		'When he tire out. Dimka pulls the needles, pierces your tongue with a metal bar, then sets you free'
+		'When he gets bored of watching you in pain, Dimka pulls the needles, pierces your tongue with a metal bar, then sets you free'
 		pierCount += 1
 	end
 	act 'Leave':gt 'pavResidential'
 end
 
-if $ARGS[0] = '8':
+if $ARGS[0] = 'dimkaabuse8':
 	*clr & cla
 	gs 'pain', 9, 'pierce', 'labia'
 	if pcs_makeup ! 1:pcs_makeup = 0
@@ -983,18 +933,18 @@ if $ARGS[0] = '8':
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/vag.jpg"></center>'
 	'Dimka binds you until you are fully immobilized. "You know, a lot of people think that a piercing in the cunt enhances the pleasure during sex..Something about more blood flow..So..I was thinking, that you as my personal fucktoy need a little encouragement to come here..So let''s begin." Then he picks up a safety pin and pricks your labia. You howled at the sharp unbearable pain, struggling against your bonds, but Dimka does not calm down until he has sealed your entire vagina with safety pins.'
-	if pirsG > 0:'When he tire out. Dimka takes the pins out of your pussy and sets you free.'
+	if pirsG > 0:'When he gets bored of watching you in pain, Dimka takes the pins out of your pussy and sets you free.'
 	if pirsG = 0:
 		pirsG = 1
 		pirsG1_owned = 1
 		pierWearCount += 1
-		'When he tire out. Dimka takes the pins out of your pussy, pierces your clitoris, then sets you free'
+		'When he gets bored of watching you in pain, Dimka takes the pins out of your pussy, pierces your clitoris, then sets you free'
 		pierCount += 1
 	end
 	act 'Leave':gt 'pavResidential'
 end
 
-if $ARGS[0] = '9':
+if $ARGS[0] = 'dimkaabuse9':
 	*clr & cla
 	bja += 1
 	spafinloc = 12
@@ -1013,7 +963,7 @@ if $ARGS[0] = '9':
 	act 'Leave':gt 'pavResidential'
 end
 
-if $ARGS[0] = '10':
+if $ARGS[0] = 'dimkaabuse10':
 	*clr & cla
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/1.jpg"></center>'