Some fixes to new car wash event from pchs

glife-notepad++

@@ -1,6 +1,7 @@
 <NotepadPlus>
     <Project name="GLife">
         <Folder name="Locations">
+            <File name="locations\abduction" />
             <File name="locations\agentned" />
             <File name="locations\AlbFatherQW" />
             <File name="locations\albinaEv" />
@@ -717,6 +718,7 @@
             <File name="locations\yvan" />
             <File name="locations\yzal" />
             <File name="locations\zaprF" />
+            <File name="locations\zaprFWash" />
             <File name="locations\zoomagazine" />
             <File name="locations\zsoft_gopskverGorSlut" />
             <File name="locations\_attributes_average" />

glife.qproj

@@ -688,6 +688,8 @@
       <Location name="avt"/>
       <Location name="avb"/>
       <Location name="zaprF"/>
+      <Location name="zaprFWash"/>
+      <Location name="Abduction"/>
       <Location name="autosalonF"/>
       <Location name="autoservisF"/>
       <Location name="autotraidF"/>

locations/abd → locations/abduction

@@ -1,21 +1,23 @@
+# abduction
+
 $location_type = private
 $metkaM = $ARGS[0]
 $locM = $CURLOC
 $metka = $ARGS[0]
 $loc = $CURLOC
 
-if $ARGS[0] = 'abduction':
+if $ARGS[0] = 'start':
 	i = rand(1, 2)
 	'<center><img src="images\abd\girltocar<<i>>.jpg"></center>'
 	'Suddenly you heard someone close up to you from behind. You felt that something hit your head and everything went black..'
-	act 'Pass out':gt 'abd', 'abdCarTrunk'
+	act 'Pass out':gt 'abduction', 'abdCarTrunk'
 end
 
 if $ARGS[0] = 'abdCarTrunk':
 	'<center><img src="images\abd\trunkint1.jpg"></center>'
 	'You wake up in a very tight dark place. You can feel that it is a car and you are probably in the trunk.'
 	'You try to bash the walls with your feet but after while you can see it''s pointless.'
-	act 'Continue':gt 'abd', 'abdRoomFirstEntry'
+	act 'Continue':gt 'abduction', 'abdRoomFirstEntry'
 end
 
 if $ARGS[0] = 'abdRoomFirstEntry':
@@ -23,7 +25,7 @@ if $ARGS[0] = 'abdRoomFirstEntry':
 	'The car stopped. Someone openned the door.'
 	'Sooner than you manage to overcome the sudden flow of daylight, you are taken by a strong man and carried to a house.'
 	'He''s carrying you downstairs.'
-	act 'Continue':gt 'abd', 'abdRoomFirstChaining'
+	act 'Continue':gt 'abduction', 'abdRoomFirstChaining'
 end
 
 if $ARGS[0] = 'abdRoomFirstChaining':
@@ -36,13 +38,20 @@ if $ARGS[0] = 'abdRoomFirstChaining':
 	'"..but..how..no.."'
 	'"Shut up, slut. Usually we torture you for fun as long as we want. When you become broken enough, we sell you to the highest bidder."'
 	'"You cannot do this to me! It''s illegal!'
-	'"Ha, who do you think are our best customers? Politicians, police officers, businessmans.. We have our cover. And you should finally shut up and get used to it!"'
+	'"Ha, who do you think are our best customers? Politicians, police officers, businessman.. We have our cover. And you should finally shut up and get used to it!"'
 	'Man leaves without another word, even though you are crying and shouting at him..'
 	tanga = 0
-	dirtbelo += 1
+	painkiller_bak = painkiller
+	prezik_bak = prezik
+	vitamin_bak = vitamin
+	kosmetica_bak = kosmetica
+	lipbalm_bak = lipbalm
+
 	painkiller = 0
 	prezik = 0
 	vitamin = 0
+	kosmetica = 0
+	lipbalm = 0
 
 	tabletkishot = rand(84,91)
 	shotdays = 84
@@ -52,7 +61,7 @@ if $ARGS[0] = 'abdRoomFirstChaining':
 	money = 0
 	gs 'stat'
 	gs 'clothing', 'strip'
-	act 'Continue':gt 'abd', 'abdRoom'
+	act 'Continue':gt 'abduction', 'abdRoom'
 end
 
 if $ARGS[0] = 'abdRoom':
@@ -60,13 +69,13 @@ if $ARGS[0] = 'abdRoom':
 	'You are in a dark basement with only one window and some lights, chained to a wall by your collar.'
 	'You can move just few meters around the wall, reaching some stuff left for you by your abductors.'
 
-	act 'Look around':gt 'abd', 'abdFood'
+	act 'Look around':gt 'abduction', 'abdFood'
 
 	eventChance = rand(1,100)
 	if eventChance > 50:
-		act 'Take a nap (4:00)':gt 'abd', 'abdSomeoneComing'
+		act 'Take a nap (4:00)':gt 'abduction', 'abdSomeoneComing'
 	else
-		act 'Take a nap (4:00)':gt 'abd', 'abdSleep'
+		act 'Take a nap (4:00)':gt 'abduction', 'abdSleep'
 	end
 end
 
@@ -89,20 +98,20 @@ if $ARGS[0] = 'abdSomeoneComing':
 
 	if broken = 0:
 		'You start to tremble in fear of what is going to happen to you next.'
-		act 'Cower in panic on your bed':gt 'abd', 'abdRape'
+		act 'Cower in panic on your bed':gt 'abduction', 'abdRape'
 	end
 	if rapeCount >= 5 and broken = 0:
-		act 'Beg you cannot bear anymore rough treatment':gt 'abd', 'abdBreak1'
+		act 'Beg you cannot bear anymore rough treatment':gt 'abduction', 'abdBreak1'
 	end
 	if broken >= 1:
 		saleChance = rand(1, 100)
 		if broken < 10:
-			act 'Welcome back, master.':gt 'abd', 'abdBrokenAsk'
+			act 'Welcome back, master.':gt 'abduction', 'abdBrokenAsk'
 		elseif broken >= 20 and saleChance <= 99:
 			'Master: "I have some good news for you slave."'
-			act 'Yes master?':gt 'abd', 'abdSoldSauna'
+			act 'Yes master?':gt 'abduction', 'abdSoldSauna'
 		else
-			act 'Welcome back, master.':gt 'abd', 'abdBrokenGivePainkiller'
+			act 'Welcome back, master':gt 'abduction', 'abdBrokenGivePainkiller'
 		end
 	end
 end
@@ -119,10 +128,10 @@ if $ARGS[0] = 'abdBreak1':
 	'"Now show me what sex slave you are."'
 
 	tortureType = rand(1,3)
-	act 'Spit in his face':gt 'abd', 'abdTorture'
+	act 'Spit in his face':gt 'abduction', 'abdTorture'
 
 	if rapeCount <= 10:
-		act 'Say nothing and crawl back to your bed':gt 'abd', 'abdRape'
+		act 'Say nothing and crawl back to your bed':gt 'abduction', 'abdRape'
 	end
 	'Broken: '+broken
 	'Torture: '+tortureCount
@@ -130,10 +139,10 @@ if $ARGS[0] = 'abdBreak1':
 
 	if tortureCount >= 5 or rapeCount >= 10:
 		if broken = 1:
-			act 'Please fuck my pussy master':gt 'abd', 'abdBreak2FuckA1'
-			act 'Please fuck my mouth master':gt 'abd', 'abdBreak2FuckB1'
+			act 'Please fuck my pussy master':gt 'abduction', 'abdBreak2FuckA1'
+			act 'Please fuck my mouth master':gt 'abduction', 'abdBreak2FuckB1'
 		else
-			act 'You..you are my master. Please use me..':gt 'abd', 'abdBreak2FuckA1'
+			act 'You..you are my master. Please use me..':gt 'abduction', 'abdBreak2FuckA1'
 		end
 	end
 end
@@ -143,9 +152,10 @@ if $ARGS[0] = 'abdBrokenGivePainkiller':
 	'Master: "You have been a good slave so far. Good slaves are rewarded."'
 	'He hands you a single piece of painkiller.'
     	
-	act 'Take and swallow it':gt 'abd', 'abdBrokenGivePainkillerYes'    	
-	act 'Refuse and keep your mouth shut':gt 'abd', 'abdBrokenGivePainkillerNo'
+	act 'Take and swallow it':gt 'abduction', 'abdBrokenGivePainkillerYes'    	
+	act 'Refuse and keep your mouth shut':gt 'abduction', 'abdBrokenGivePainkillerNo'
 end
+
 if $ARGS[0] = 'abdBrokenGivePainkillerYes':
 	'<center><img src="images\abd\pill2.jpg"></center>'
 	'You happily take the pill and swallow it immediately.'
@@ -156,8 +166,9 @@ if $ARGS[0] = 'abdBrokenGivePainkillerYes':
 		'Master nods in approval and hands you a small pack of vitamins.'
 		vitamin += 6
 	end
-	act 'How can I thank you master?':gt 'abd', 'abdBrokenAsk'
+	act 'How can I thank you master?':gt 'abduction', 'abdBrokenAsk'
 end
+
 if $ARGS[0] = 'abdBrokenGivePainkillerNo':
 	'<center><img src="images\abd\pill1.gif"></center>'
 	'Master: "Refusing a gift? It seems this slaveslut needs to be reminded of her place."'
@@ -175,10 +186,9 @@ if $ARGS[0] = 'abdBrokenGivePainkillerNo':
 	pain['nose'] += 5
 	sub -= 2
 	gs 'stat'
-	act 'Continue':gt 'abd', 'abdTorture'
+	act 'Continue':gt 'abduction', 'abdTorture'
 end
 
-
 if $ARGS[0] = 'abdBrokenAsk':
 	'Broken: '+broken
 	'Torture: '+tortureCount
@@ -186,17 +196,17 @@ if $ARGS[0] = 'abdBrokenAsk':
 	'Master: "Good. What do you want me to do to you, slaveslut?"'
 	sub += 5
 	gs 'stat'
-	act 'Please fuck my pussy master':gt 'abd', 'abdBreak2FuckA1'
-	act 'Please fuck my mouth master':gt 'abd', 'abdBreak2FuckB1'
+	act 'Please fuck my pussy master':gt 'abduction', 'abdBreak2FuckA1'
+	act 'Please fuck my mouth master':gt 'abduction', 'abdBreak2FuckB1'
 	if broken >= 3 and sub >= 70:
 		sub += 3
 		gs 'stat'
-		act 'Please rape me master':gt 'abd', 'abdRape'
+		act 'Please rape me master':gt 'abduction', 'abdRape'
 	end
 	if broken >= 5 and sub >= 90:
 		sub += 5
 		gs 'stat'
-		act 'Please punish me master':gt 'abd', 'abdTorture'
+		act 'Please punish me master':gt 'abduction', 'abdTorture'
 	end
 end
 
@@ -214,8 +224,9 @@ if $ARGS[0] = 'abdBreak2FuckA1':
 	'Putting your legs wide apart, you spit on your hand and smear it on your pussy, saying: "Come, take me master."'
 	'"I like my bitches restrained." says master and ties your hands to your feet, thus securing your position.'
 	'His dick penetrates your pussy easily, as previously smeared saliva does it''s job.'
-	act 'Continue':gt 'abd', 'abdBreak2FuckA2'
+	act 'Continue':gt 'abduction', 'abdBreak2FuckA2'
 end
+
 if $ARGS[0] = 'abdBreak2FuckA2':
 	minut += 5
 	mouth += 1
@@ -232,8 +243,9 @@ if $ARGS[0] = 'abdBreak2FuckA2':
 		'"Very good, slave. You are on a path to redeem yourself." With these words he unties you, secures you back to your place and leaves.'
 	end
 	broken += 1
-	act 'Continue':gt 'abd', 'abdRoom'
+	act 'Continue':gt 'abduction', 'abdRoom'
 end
+
 if $ARGS[0] = 'abdBreak2FuckB1':
 	minut += 20
 	vagina += 1
@@ -249,8 +261,9 @@ if $ARGS[0] = 'abdBreak2FuckB1':
 	'You want to please your master, so you lie on it straight away and dutifully await attaching the restraints.'
 	'After master ties you, he goes to your head. Your already open mouth is then roughly fucked by his member.'
 	'When he''s about to cum, his dick is pointed towards your face. You welcome the flying sperm with open mouth and open eyes.'
-	act 'Continue':gt 'abd', 'abdBreak2FuckB2'
+	act 'Continue':gt 'abduction', 'abdBreak2FuckB2'
 end
+
 if $ARGS[0] = 'abdBreak2FuckB2':
 	minut += 20
 	pain['asshole'] += 1
@@ -265,7 +278,7 @@ if $ARGS[0] = 'abdBreak2FuckB2':
 	'Fucking you furiously for some time, master cums deep inside you.'
 
 	broken += 1
-	act 'Continue':gt 'abd', 'abdRoom'
+	act 'Continue':gt 'abduction', 'abdRoom'
 end
 
 if $ARGS[0] = 'abdSleep':
@@ -274,7 +287,7 @@ if $ARGS[0] = 'abdSleep':
 	gs 'stat'
 	'<center><img src="images\abd\bed1.jpg"></center>'
 	'You have slept for several hours, but bad dreams have awaken you.'
-	act 'Continue':gt 'abd', 'abdRoom'
+	act 'Continue':gt 'abduction', 'abdRoom'
 end
 if $ARGS[0] = 'abdEscape':
 	'<center><img src="images\abd\cellarwindow1.jpg"></center>'
@@ -282,9 +295,10 @@ if $ARGS[0] = 'abdEscape':
 	'There is a lock on it, though.'
 	minut += 5
 	gs 'stat'
-	act 'Try to break the lock':gt 'abd', 'abdEscapeWindow1'
-	act 'Go back to your bed and fix your leash back to the wall':gt 'abd', 'abdRoom'
+	act 'Try to break the lock':gt 'abduction', 'abdEscapeWindow1'
+	act 'Go back to your bed and fix your leash back to the wall':gt 'abduction', 'abdRoom'
 end
+
 if $ARGS[0] = 'abdEscapeWindow1':
 	'<center><img src="images\abd\cellarwindow1.jpg"></center>'
 	'You try to loose the screws locking the window sides.'
@@ -293,14 +307,15 @@ if $ARGS[0] = 'abdEscapeWindow1':
 	breakChance = rand(1, 100)
 	if breakChance <= 50:
 		'You hear someone slam a door. Maybe your captors are coming!'
-		'But you are so close to unsrew the window! You decide to..'
-		act 'Run back to your bed and leash your chain back':gt 'abd', 'abdSomeoneComing'
-		act 'Try to unscrew it desperately':gt 'abd', 'abdEscapeWindow2'
+		'But you are so close to unscrewing the window! You decide to..'
+		act 'Run back to your bed and leash your chain back':gt 'abduction', 'abdSomeoneComing'
+		act 'Try to unscrew it desperately':gt 'abduction', 'abdEscapeWindow2'
 	else
 		'No luck, the window is screwed in very tight.'
-		act 'Go back':gt 'abd', 'abdEscape'
+		act 'Go back':gt 'abduction', 'abdEscape'
 	end
 end
+
 if $ARGS[0] = 'abdEscapeWindow2':
 	'<center><img src="images\abd\cellarwindow1.jpg"></center>'
 	'You continue in your attempts to break the window.'
@@ -308,19 +323,20 @@ if $ARGS[0] = 'abdEscapeWindow2':
 	gs 'stat'
 	breakChance = rand(1, 100)
 	if breakChance <= 90:
-		'You desperately try to unscrew it, but you wen out of time and luck.'
+		'You desperately try to unscrew it, but you run out of time and luck.'
 		'Master comes in the basement and catches you running around unleashed. This won''t end well for you..'
 		failedEscapeCount += 1
-		act 'Panic':gt 'abd', 'abdTorture'
+		act 'Panic':gt 'abduction', 'abdTorture'
 	else
-		'You did it! Just in time, before someone managed to catch you, you have loosen the window a slipped yourself through.'
-		act 'Run away':gt 'abd', 'abdEscapeWindow3'
+		'You did it! Just in time, before someone managed to catch you, you loosen the window and slip yourself through.'
+		act 'Run away':gt 'abduction', 'abdEscapeWindow3'
 	end
 end
+
 if $ARGS[0] = 'abdEscapeWindow3':
 	i = rand(1, 3)
 	'<center><img src="images\abd\midnowhere<<i>>.jpg"></center>'
-	'You are in a mid of nowhere.'
+	'You are in a middle of nowhere.'
 	'Before you in a distance you can see shimmer of a something that could be water.'
 	'If you turn back, you can hear distant noise of what could be a highway.'
 	'On your left you can see air dust and polution of what could be a large city.'
@@ -330,9 +346,16 @@ if $ARGS[0] = 'abdEscapeWindow3':
 	minut += 180
 	water -= 50
 	gs 'stat'
-	act 'Turn and run the opposite direction':gt 'road', ''
-	act 'Run left':gt 'Nord', ''
-	act 'Run right':gt 'pavCommercial', ''
+
+	painkiller = painkiller_bak
+	prezik = prezik_bak
+	vitamin = vitamin_bak
+	kosmetica = kosmetica_bak
+	lipbalm = lipbalm_bak
+
+	act 'Turn and run the opposite direction':gt 'road'
+	act 'Run left':gt 'Nord'
+	act 'Run right':gt 'pavCommercial'
 	act 'Run forward':gt 'lake', 'start'
 end
 
@@ -344,7 +367,7 @@ if $ARGS[0] = 'abdFood':
 	chainChance = rand(1, 100)
 	if chainChance <= 20 and (rapeCount > 5 or tortureCount > 5):
 		'Suddenly you spot a loose chainpiece on your leash. You try to manipulate with it and you manage to free yourself from the wall.'
-		'<a href="exec:gt ''abd'', ''abdEscape''">Go to the window</a>'
+		'<a href="exec:gt ''abduction'', ''abdEscape''">Go to the window</a>'
 	end
 	act 'Eat dried food (0:20)':
 		cla
@@ -364,7 +387,7 @@ if $ARGS[0] = 'abdFood':
 		'<center><img src="images\abd\driedbread1.jpg"></center>'
 		'You ate the dried meat and bread. Your throat is dry and some water could come in handy.'
 
-		act 'Get back':gt 'abd', 'abdFood'
+		act 'Get back':gt 'abduction', 'abdFood'
 	end
 	
 	act 'Drink water (0:05)':
@@ -380,7 +403,7 @@ if $ARGS[0] = 'abdFood':
 		gs 'stat'
 		'<center><img src="images\abd\waterbottle1.jpg"></center>'
 		'You drank the whole bottle.'
-		act 'Get back':gt 'abd', 'abdFood'
+		act 'Get back':gt 'abduction', 'abdFood'
 	end
 
 	if vitamin > 0:
@@ -408,12 +431,17 @@ if $ARGS[0] = 'abdFood':
 
 				'You take some vitamins to stay healthy.'
 
-				act 'Continue':gt 'abd', 'abdFood'
+				act 'Continue':gt 'abduction', 'abdFood'
 			end
 		end
 	end
 
-	!act 'Look in the mirror':gt '?', '?'
+	act 'Look in the mirror':
+		cla
+		$gt1 = 'abduction'
+		$gt2 = 'abdFood'
+		gt 'portmirror'
+	end
 
 	act 'Take a cold shower (0:15)':
 		cumspclnt = 1
@@ -430,9 +458,9 @@ if $ARGS[0] = 'abdFood':
 		gs 'stat'
 		'<center><img src="images\abd\shower1.jpg"></center>'
 		'The shower is cold but at least you got clean again..'
-		act 'Get back':gt 'abd', 'abdFood'
+		act 'Get back':gt 'abduction', 'abdFood'
 	end
-	act 'Get back to your bed':gt 'abd', 'abdRoom'
+	act 'Get back to your bed':gt 'abduction', 'abdRoom'
 end
 
 if $ARGS[0] = 'abdRape':
@@ -447,7 +475,7 @@ if $ARGS[0] = 'abdRape':
 		stat['mouth'] += 1
 		pain['mouth'] += 2
 		dynamic $CatName, 'Torturer'
-		gs 'cum_call', 'mouth', $boy, svol,'', spot
+		gs 'cum_call', 'mouth', $boy
 		gs 'stat'
 		i = rand(1, 4)
 		gifornot = rand (1, 100)
@@ -458,59 +486,57 @@ if $ARGS[0] = 'abdRape':
 		end
 		'Your hands are tied. A metal ring is fastened inside your mouth.'
 		'You have to endure a very rough mouthfuck. The guy knows no limits and gags you as he wants. He does let you breath from time to time, but most of the experience you feel like passing out. Your saliva is both all over his dick and your tits and belly.'
-		act 'Continue':gt 'abd', 'abdRoom'
+		act 'Continue':gt 'abduction', 'abdRoom'
 	elseif rapeType = 2:
 		minut += 30
 		vagina += 1
 		stat['vaginal'] += 1
 		pain['vaginal'] += 5
 		dynamic $CatName, 'Torturer'
-		gs 'cum_call', 'pussy', $boy, svol,'', spot
+		gs 'cum_call', 'pussy', $boy
 		gs 'stat'
 		i = rand(1, 5)
 		'<center><img src="images\abd\fucktiedpussy<<i>>.jpg"></center>'
 		'Your hands are tied, you are bend on the bed.'
 		'The guy starts to penetrate your pussy without warning. Sharp pain goes through your belly as your pussy is not wet enough to receive a dick.'
-		act 'Continue':gt 'abd', 'abdRoom'
+		act 'Continue':gt 'abduction', 'abdRoom'
 	elseif rapeType = 3:
 		minut += 30
 		pain['asshole'] += 5
 		anus += 1
-		spafinloc = 3
-		gs 'cum_manage'
+		gs 'cum_call', 'anus', $boy
 		stat['anal'] += 1
 		gs 'stat'
-		i = rand(1, 4)
 		gifornot = rand (1, 100)
 		if gifornot > 50:
-			'<center><img src="images\abd\fucktiedanal<<i>>.jpg"></center>'
+			'<center><img src="images\abd\fucktiedanal'+rand(1,4)+'.jpg"></center>'
 		else
 			'<center><img src="images\abd\fucktiedanal1.gif"></center>'
 		end
 		'Your hands are tied, you are bend on the bed.'
 		'The guy starts to penetrate your ass without warning. Sharp pain goes through your anus as your ass is not relaxed and wet enough to receive a dick.'
-		act 'Continue':gt 'abd', 'abdRoom'
+		act 'Continue':gt 'abduction', 'abdRoom'
 	elseif rapeType = 4:
 		minut += 30
 		pain['asshole'] += 8
+		stat['anal_fist']
 		anus += 1
 		gs 'stat'
-		i = rand(1, 4)
-		'<center><img src="images\abd\fistanal<<i>>.jpg"></center>'
+		'<center><img src="images\abd\fistanal'+rand(1,4)+'.jpg"></center>'
 		'Your hands and feet are tied, your ass is reaching high above your head.'
 		'The guy starts pushing his thick fist inside your anus. At least he used a bit of lubricant..'
 		'When your sphincter fails to resist anymore, you can hear loud pop as his fist quickly penetrates your insides.'
 		'He doesnt stop there and pushes his hand deep. You can feel your stomach expanding as he opens his fist inside you.'
 		'The pain is unbearable, but he doesn''t care.'
-		act 'Continue':gt 'abd', 'abdRoom'
+		act 'Continue':gt 'abduction', 'abdRoom'
 	elseif rapeType = 5:
 		minut += 30
 		pain['vaginal'] += 5
 		pain['cervix'] += 10
+		stat['vaginal_fist'] += 1
 		vagina += 1
 		gs 'stat'
-		i = rand(1, 4)
-		'<center><img src="images\abd\fistvaginal<<i>>.jpg"></center>'
+		'<center><img src="images\abd\fistvaginal'+rand(1,4)+'.jpg"></center>'
 		'Your hands and feet are tied, your ass is reaching high above your head.'
 		'The guy starts pushing his thick fist inside your pussy. At least he used a bit of lubricant..'
 
@@ -518,7 +544,7 @@ if $ARGS[0] = 'abdRape':
 		'Hes pinching and pressing your cervix inside you. You cry aloud and try to shake him off your ass. But you are bound so there''s no hope of success..'
 		'"What bitch, you like it I see?" He stops pressing it but you can feel a finger pointing towards the cervix entry: "Should we penetrate another hole, girl?"'
 		'"No, please stop, just stop!"'
-		act 'Continue':gt 'abd', 'abdRoom'
+		act 'Continue':gt 'abduction', 'abdRoom'
 	end
 end
 
@@ -528,13 +554,14 @@ if $ARGS[0] = 'abdTorture':
 	tortureCount += 1
 	gs 'stat'
 	if tortureType = 1:
-		gt 'abd', 'abdTortureA1'
+		gt 'abduction', 'abdTortureA1'
 	elseif tortureType = 2:
-		gt 'abd', 'abdTortureB1'
+		gt 'abduction', 'abdTortureB1'
 	elseif tortureType = 3:
-		gt 'abd', 'abdTortureC1'
+		gt 'abduction', 'abdTortureC1'
 	end
 end
+
 if $ARGS[0] = 'abdTortureA1':
 	pain['feet'] += 5
 	pain['hands'] += 5
@@ -545,8 +572,9 @@ if $ARGS[0] = 'abdTortureA1':
 	'Your hands are secured with a rope high on the wall.'
 	'Your legs are unpleasantly lifted above your head and secured as well.'
 	'Now you are hanging by your hands, your pussy and ass available to any pervert actions.'
-	act 'Continue':gt 'abd', 'abdTortureA2'
+	act 'Continue':gt 'abduction', 'abdTortureA2'
 end
+
 if $ARGS[0] = 'abdTortureA2':
 	pain['nipples'] += 5
 	minut += 10
@@ -556,8 +584,9 @@ if $ARGS[0] = 'abdTortureA2':
 	'As your nipples arouse he firmly attaches the rope on them and tightens it around your neck.'
 	'"Oouch! It hurts, please remove it!"'
 	'Instead of that, the tormentor slaps a gag in your mouth.'
-	act 'Continue':gt 'abd', 'abdTortureA3'
+	act 'Continue':gt 'abduction', 'abdTortureA3'
 end
+
 if $ARGS[0] = 'abdTortureA3':
 	pain['asshole'] += 2
 	anus += 1
@@ -569,8 +598,9 @@ if $ARGS[0] = 'abdTortureA3':
 	'Without a word he sticks the dildo inside your ass, so deep you can feel it touch your stomach.'
 	'He secures the stick on a ground and leaves.'
 	'You swing on the rope left and right, trying to push it out of your ass. But it is too deep inside you and the stick does not move.'
-	act 'Continue':gt 'abd', 'abdTortureA4'
+	act 'Continue':gt 'abduction', 'abdTortureA4'
 end
+
 if $ARGS[0] = 'abdTortureA4':
 	pain['tummy'] += 5
 	minut += 10
@@ -580,7 +610,7 @@ if $ARGS[0] = 'abdTortureA4':
 	'Pleased to find you with tears and saliva all over your tits and stomach, he unscrews the stick.'
 	'As a last sign of torture he pushes the stick inside you with one stroke even deeper and than swiftly takes it out.'
 	'You start to shake alot, but you know it is finally over.'
-	act 'Continue':gt 'abd', 'abdRoom'
+	act 'Continue':gt 'abduction', 'abdRoom'
 end
 
 if $ARGS[0] = 'abdTortureB1':
@@ -590,8 +620,9 @@ if $ARGS[0] = 'abdTortureB1':
 	'You are forced on the ground, lying on your stomach.'
 	'First your hands are tied together and raised on a crane high in the air. You can feel it''s your limit and as almost your shoulders were to break.'
 	'Then your legs are forced wide apart, secured on opposite sides. You cannot move an inch.'
-	act 'Continue':gt 'abd', 'abdTortureB2'
+	act 'Continue':gt 'abduction', 'abdTortureB2'
 end
+
 if $ARGS[0] = 'abdTortureB2':
 	pain['asscheeks'] += 10
 	minut += 10
@@ -600,8 +631,9 @@ if $ARGS[0] = 'abdTortureB2':
 	'You can hear tormentor going back to you.'
 	'"UUMmmphh!" Your gagged mouth makes this sound as a cane whips your ass.'
 	'You are given thorough ass whipping.'
-	act 'Continue':gt 'abd', 'abdTortureB3'
+	act 'Continue':gt 'abduction', 'abdTortureB3'
 end
+
 if $ARGS[0] = 'abdTortureB3':
 	pain['asshole'] += 2
 	pain['vaginal'] += 2
@@ -613,14 +645,15 @@ if $ARGS[0] = 'abdTortureB3':
 	'As soon as the whipping stops you can feel pain in your arse and pussy.'
 	'Something is being pushed inside both of your holes.'
 	'You are given no time to adjust and both holes are fucked viciously fast and deep.'
-	act 'Continue':gt 'abd', 'abdTortureB4'
+	act 'Continue':gt 'abduction', 'abdTortureB4'
 end
+
 if $ARGS[0] = 'abdTortureB4':
 	minut += 10
 	gs 'stat'
 	'<center><img src="images\abd\tortureB4.jpg"></center>'
 	'Finally your pussy and anus are left alone, whatever was inside you was taken out.'
-	act 'Continue':gt 'abd', 'abdRoom'
+	act 'Continue':gt 'abduction', 'abdRoom'
 end
 
 if $ARGS[0] = 'abdTortureC1':
@@ -631,8 +664,9 @@ if $ARGS[0] = 'abdTortureC1':
 	'He attaches a rope on your feet - you are lifted like a pig to be cleaned!'
 	'After some minutes of just hanging, tormetor comes with a leather whip.'
 	'He spins you around and whips whatever comes before him. Ass, back, belly, pussy, legs, tits.'
-	act 'Continue':gt 'abd', 'abdTortureC2'
+	act 'Continue':gt 'abduction', 'abdTortureC2'
 end
+
 if $ARGS[0] = 'abdTortureC2':
 	minut += 10
 	pain['asscheeks'] += 15
@@ -645,7 +679,7 @@ if $ARGS[0] = 'abdTortureC2':
 	'<center><img src="images\abd\tortureC2.jpg"></center>'
 	'Twenty minutes of thourough whipping leaves your body trembling.'
 	'Especially your tender breasts are sore alot.'
-	act 'Continue':gt 'abd', 'abdRoom'
+	act 'Continue':gt 'abduction', 'abdRoom'
 end
 
 if $ARGS[0] = 'abdSoldSauna':
@@ -659,5 +693,15 @@ if $ARGS[0] = 'abdSoldSauna':
 	'"I am not a bad person. If you earn me at least five times more, I may let you go."'
 	'With this faint sign of hope she leaves.'
 	workDolg = 100000
-	act 'Continue':gt 'saunaroom', ''
-end
+
+	painkiller = painkiller_bak
+	prezik = prezik_bak
+	vitamin = vitamin_bak
+	kosmetica = kosmetica_bak
+	lipbalm = lipbalm_bak
+
+	act 'Continue':gt 'saunaroom'
+end
+
+--- abduction ---------------------------------
+

locations/zaprF

@@ -1,3 +1,5 @@
+# zaprF
+
 if $ARGS[0] = 'start':
 
 	$metka = $ARGS[0]
@@ -121,4 +123,7 @@ if $ARGS[0] = 'toilet':
 		act 'Leave the restroom':gt 'zaprF', 'start'
 		end
 	end
-end
+end
+
+--- zaprF ---------------------------------
+

locations/zaprFWash

@@ -1,439 +1,444 @@
-	$metkaM = $ARGS[0]
-	$locM = $CURLOC
-	$metka = $ARGS[0]
-	$loc = $CURLOC
+# zaprFWash
 
-	if $ARGS[0] = 'start':
-		$metka = $ARGS[0]
-		$loc = $CURLOC
-		cla
-		clr
+$metkaM = $ARGS[0]
+$locM = $CURLOC
+$metka = $ARGS[0]
+$loc = $CURLOC
 
-		if spdirtyc > 0 or spdirtyv > 0:
-			minut += 5
-			'The gas station worker chases you away: "Go at least wash yourself, whore!"'
-			act 'Leave':gt 'zaprF', 'start'
-		else
-			if (CloBimbo = 1 or $clothingworntype = 'naughty' and PCloQuality < 4) and vnesh >= 60:
-				minut += 60
-				sweat += 2
-				money += 120
-				skimpyCustomerChance = rand(1, 100)
-
-				if skimpyCustomerChance > 30:
-					gt 'zaprFWash', 'titsQ'
-				else
-					gt 'zaprFWash', 'wash'
-				end
+if $ARGS[0] = 'start':
+	$metka = $ARGS[0]
+	$loc = $CURLOC
+	cla
+	clr
 
+	if spdirtyc > 0 or spdirtyv > 0:
+		minut += 5
+		'The gas station worker chases you away: "Go at least wash yourself, whore!"'
+		act 'Leave':gt 'zaprF', 'start'
+	else
+		if (CloBimbo = 1 or $clothingworntype = 'naughty' and PCloQuality < 4) and vnesh >= 60:
+			minut += 60
+			sweat += 2
+			money += 120
+			skimpyCustomerChance = rand(1, 100)
+
+			if skimpyCustomerChance > 30:
+				gt 'zaprFWash', 'titsQ'
 			else
-				minut += 60
-				sweat += 2
-				money += 80
 				gt 'zaprFWash', 'wash'
 			end
-		end
-	end
 
-	if $ARGS[0] = 'wash':
-		if CloBimbo = 1 or $clothingworntype = 'naughty' and PCloQuality < 4:
-			i = rand(1, 4)
-			'<center><img src="images\carwash\bimboclean<<i>>.jpg"></center>'
 		else
-			i = rand(1, 4)
-			'<center><img src="images\carwash\regular<<i>>.jpg"></center>'
+			minut += 60
+			sweat += 2
+			money += 80
+			gt 'zaprFWash', 'wash'
 		end
-		'You washed windows of several cars and earned some cash.'
-		act 'Continue':gt 'zaprF', 'start'
 	end
+end
 
-	if $ARGS[0] = 'titsQ':
+if $ARGS[0] = 'wash':
+	if CloBimbo = 1 or $clothingworntype = 'naughty' and PCloQuality < 4:
 		i = rand(1, 4)
 		'<center><img src="images\carwash\bimboclean<<i>>.jpg"></center>'
-		'You wash another car. The driver finishes filling his tank and goes towards you giving you some change. It''s obvious he''d like something more.'
-		'Want to earn more? Show me your tits, girl. Theres 100 in it, just like that.'
-		act 'Agree and show him your tits':gt 'zaprFWash', 'titsFlash'
-		act 'Refuse':gt 'zaprF', 'start'
-	end
-
-	if $ARGS[0] = 'assQ':
+	else
 		i = rand(1, 4)
-		'<center><img src="images\carwash\bimboclean<<i>>.jpg"></center>'
-		'That was cool, girl. How about your ass, will another 100 make it flash for me?'
-		act 'Agree and show him your ass':gt 'zaprFWash', 'assFlash'
-		act 'Refuse':gt 'zaprF', 'start'
+		'<center><img src="images\carwash\regular<<i>>.jpg"></center>'
 	end
-
-	if $ARGS[0] = 'blowQ':
-		i = rand(1, 4)
-		'<center><img src="images\carwash\bimboclean<<i>>.jpg"></center>'
-		'Wonderful ass! I have a problem now, girl. It''s getting tight down here, in my pants. Want to put your mouth to a good use? There is another 300 in it.'
-		act 'Agree and give him blowjob':gt 'zaprFWash', 'blowjob'
-		act 'Refuse':gt 'zaprF', 'start'
-	end
-
-	if $ARGS[0] = 'titsFlash':
-		minut += 5
-		money += 100
-		horny += 2
-		gifornot = rand (1, 100)
-		if gifornot < 30:
-			i = rand(1, 3)
-			'<center><img src="images\carwash\titsflash<<i>>.jpg"></center>'
-		else
-			i = rand(1, 7)
-			'<center><img src="images\carwash\titsflash<<i>>.gif"></center>'
-		end
-		
-		'You quickly pull up your top and show him your naked breasts for a few seconds. Then you hurry to cower up and quickly take your money.'
-		if sub >= 30 or bimbolevel >= 1 or horny > 4:
-			act 'Continue':gt 'zaprFWash', 'assQ'
-		else	
-			act 'Run away':gt 'zaprF', 'start'
-		end
+	'You washed windows of several cars and earned some cash.'
+	act 'Continue':gt 'zaprF', 'start'
+end
+
+if $ARGS[0] = 'titsQ':
+	i = rand(1, 4)
+	'<center><img src="images\carwash\bimboclean<<i>>.jpg"></center>'
+	'You wash another car. The driver finishes filling his tank and goes towards you giving you some change. It''s obvious he''d like something more.'
+	'Want to earn more? Show me your tits, girl. Theres 100 in it, just like that.'
+	act 'Agree and show him your tits':gt 'zaprFWash', 'titsFlash'
+	act 'Refuse':gt 'zaprF', 'start'
+end
+
+if $ARGS[0] = 'assQ':
+	i = rand(1, 4)
+	'<center><img src="images\carwash\bimboclean<<i>>.jpg"></center>'
+	'That was cool, girl. How about your ass, will another 100 make it flash for me?'
+	act 'Agree and show him your ass':gt 'zaprFWash', 'assFlash'
+	act 'Refuse':gt 'zaprF', 'start'
+end
+
+if $ARGS[0] = 'blowQ':
+	i = rand(1, 4)
+	'<center><img src="images\carwash\bimboclean<<i>>.jpg"></center>'
+	'Wonderful ass! I have a problem now, girl. It''s getting tight down here, in my pants. Want to put your mouth to a good use? There is another 300 in it.'
+	act 'Agree and give him blowjob':gt 'zaprFWash', 'blowjob'
+	act 'Refuse':gt 'zaprF', 'start'
+end
+
+if $ARGS[0] = 'titsFlash':
+	minut += 5
+	money += 100
+	horny += 2
+	gifornot = rand (1, 100)
+	if gifornot < 30:
+		i = rand(1, 3)
+		'<center><img src="images\carwash\titsflash<<i>>.jpg"></center>'
+	else
+		i = rand(1, 7)
+		'<center><img src="images\carwash\titsflash<<i>>.gif"></center>'
 	end
-
-	if $ARGS[0] = 'assFlash':
-		minut += 5
-		money += 100
-		horny += 4
-		gifornot = rand (1, 100)
-		if gifornot < 30:
-			i = rand(1, 2)
-			'<center><img src="images\carwash\assflash<<i>>.jpg"></center>'
-		else
-			i = rand(1, 5)
-			'<center><img src="images\carwash\assflash<<i>>.gif"></center>'
-		end
-		'You quickly pull down your pants and show him your ass for a few seconds. Then you hurry to cower up and quickly take your money.'
-		
-		if sub >= 30 or bimbolevel >= 1 or horny > 6:
-			act 'Continue':gt 'zaprFWash', 'blowQ'
-		else	
-			act 'Run away':gt 'zaprF', 'start'
-		end
+	
+	'You quickly pull up your top and show him your naked breasts for a few seconds. Then you hurry to cower up and quickly take your money.'
+	if sub >= 30 or bimbolevel >= 1 or horny > 4:
+		act 'Continue':gt 'zaprFWash', 'assQ'
+	else	
+		act 'Run away':gt 'zaprF', 'start'
 	end
-
-	if $ARGS[0] = 'blowjob':
-		minut += 15
-		money += 300
-		
-		gifornot = rand (1, 100)
-		if gifornot < 30:
-			i = rand(1, 4)
-			'<center><img src="images\carwash\blowjob<<i>>.jpg"></center>'
-		else
-			i = rand(1, 3)
-			'<center><img src="images\carwash\blowjob<<gi>>.gif"></center>'
-		end
-		'You go with him behind the gas station, where you get the promised money, kneel down, unzip his pants and start working with your mouth.'
-		'After a while, the man starts trying to remove your clothes. He asks you to surrender to him your pussy: "I''ll give you another 300 if you let me take your pussy! C''mon!'
-		
-		if sub >= 30 or bimbolevel >= 1 or horny > 6:
-			if vagina = 0:
-				act 'Offer your ass instead (you don''t want to loose virginity to this stranger..)':gt 'zaprFWash', 'fuckAnal'
-			else
-				act 'Offer your pussy':gt 'zaprFWash', 'fuckPussy'
-				act 'Offer your ass':gt 'zaprFWash', 'fuckAnal'	
-			end
-			act 'Suck stronger to make him cum':gt 'zaprFWash', 'blowjobEndQ'
-		else
-			act 'Suck stronger to make him cum':gt 'zaprFWash', 'blowjobEndQ'
-		end
+end
+
+if $ARGS[0] = 'assFlash':
+	minut += 5
+	money += 100
+	horny += 4
+	gifornot = rand (1, 100)
+	if gifornot < 30:
+		i = rand(1, 2)
+		'<center><img src="images\carwash\assflash<<i>>.jpg"></center>'
+	else
+		i = rand(1, 5)
+		'<center><img src="images\carwash\assflash<<i>>.gif"></center>'
 	end
-
-	if $ARGS[0] = 'fuckPussy':
-		money += 300
-		minut += 30
-		vagina += 1
-		stat['vaginal'] += 1
-		dynamic $CatName, 'Gas station customer'
-		gs 'cum_call', 'pussy', $boy, svol,'', spot
-		gs 'stat'
-
-		gifornot = rand (1, 100)
-		if gifornot < 40:
-			i = rand(1, 4)
-			'<center><img src="images\carwash\fuckpussy<<i>>.jpg"></center>'
-		else
-			i = rand(1, 4)
-			'<center><img src="images\carwash\fuckpussy<<i>>.gif"></center>'
-		end
-		'You bent you over and the man started fucking your pussy.'
-		act 'Continue':gt 'zaprFWash', 'pussyEndQ'
+	'You quickly pull down your pants and show him your ass for a few seconds. Then you hurry to cower up and quickly take your money.'
+	
+	if sub >= 30 or bimbolevel >= 1 or horny > 6:
+		act 'Continue':gt 'zaprFWash', 'blowQ'
+	else	
+		act 'Run away':gt 'zaprF', 'start'
 	end
-
-	if $ARGS[0] = 'fuckAnal':
-		money += 300
-		minut += 30
-
-		gifornot = rand (1, 100)
-		if gifornot < 40:
-			i = rand(1, 4)
-			'<center><img src="images\carwash\fuckanal<<i>>.jpg"></center>'
-		else
-			i = rand(1, 4)
-			'<center><img src="images\carwash\fuckanal<<i>>.gif"></center>'
-		end
-		'You bent you over and the man started fucking your ass with his cock already wet from your saliva.'
-
-		rapePussyChance = rand(1, 100)
-		if rapePussyChance < 10:
-			act 'Continue':gt 'zaprFWash', 'rapePussy'
-		else
-			act 'Continue':gt 'zaprFWash', 'analEndQ'
-		end
+end
+
+if $ARGS[0] = 'blowjob':
+	minut += 15
+	money += 300
+	
+	gifornot = rand (1, 100)
+	if gifornot < 30:
+		i = rand(1, 4)
+		'<center><img src="images\carwash\blowjob<<i>>.jpg"></center>'
+	else
+		i = rand(1, 3)
+		'<center><img src="images\carwash\blowjob<<gi>>.gif"></center>'
 	end
-
-	if $ARGS[0] = 'rapePussy':
-		i = rand(1, 5)
-		'<center><img src="images\carwash\hardanal<<i>>.gif"></center>'
-		'The man fucks your ass furiously, taking no regard to your painful moans. As you try to move away a bit to limit the depth of him being in your ass, he slaps your buttcheeks hard and shouts:'
-		'"Stop moving bitch! What do you think you are that you can tell me what to do?"'
+	'You go with him behind the gas station, where you get the promised money, kneel down, unzip his pants and start working with your mouth.'
+	'After a while, the man starts trying to remove your clothes. He asks you to surrender to him your pussy: "I''ll give you another 300 if you let me take your pussy! C''mon!'
+	
+	if sub >= 30 or bimbolevel >= 1 or horny > 6:
 		if vagina = 0:
-			'He gropes your ass, lifts it up and suddenly he sees your virgin membrane.'
-			'"What, you are a virgin? Such slut and virgin, really?"'
-			rapeAnyway = rand(1, 100)
-			if rapeAnyway < 50:
-				'"It would have come to you, virgin slut, sooner or later. Now enjoy and remember this moment!"'
-				act 'Continue':gt 'zaprFWash', 'rapePussyYes'
-			else
-				'"Girls like you should not be whoring like that! Someone was supposed to give you a hard lesson long time ago."'
-				act 'Continue':gt 'zaprFWash', 'punishSpank'
-			end
+			act 'Offer your ass instead (you don''t want to loose virginity to this stranger..)':gt 'zaprFWash', 'fuckAnal'
 		else
-			act 'Continue':gt 'zaprFWash', 'rapePussyYes'
+			act 'Offer your pussy':gt 'zaprFWash', 'fuckPussy'
+			act 'Offer your ass':gt 'zaprFWash', 'fuckAnal'	
 		end
-
+		act 'Suck stronger to make him cum':gt 'zaprFWash', 'blowjobEndQ'
+	else
+		act 'Suck stronger to make him cum':gt 'zaprFWash', 'blowjobEndQ'
 	end
-
-	if $ARGS[0] = 'rapePussyYes':
-		'He gropes your ass, lifts it up and pushes his dick inside your pussy in one thrust, all the way in!'
-		i = rand(1, 3)
-		'<center><img src="images\carwash\pussytoanal<<i>>.gif"></center>'
-		act 'Continue':gt 'zaprFWash', 'vaginaCum'
-	end
-
-	if $ARGS[0] = 'analEndQ':
-		'You can feel that the man is reaching orgasm. You decide to..:'
-		act 'Let him cum in your ass':gt 'zaprFWash', 'assCum'
-		act 'Take his cum on your face':gt 'zaprFWash', 'blowjobEndFace'
-		act 'Let him cum inside your mouth':gt 'zaprFWash', 'blowjobEndMouth'
-	end
-
-	if $ARGS[0] = 'pussyEndQ':
-		'You can feel that the man is reaching orgasm. You decide to..:'
-		act 'Let him cum in your vagina':gt 'zaprFWash', 'vaginaCum'
-		act 'Take his cum on your face':gt 'zaprFWash', 'blowjobEndFace'
-		act 'Let him cum inside your mouth':gt 'zaprFWash', 'blowjobEndMouth'
+end
+
+if $ARGS[0] = 'fuckPussy':
+	money += 300
+	minut += 30
+	vagina += 1
+	stat['vaginal'] += 1
+	dynamic $CatName, 'Gas station customer'
+	gs 'cum_call', 'pussy', $boy, svol,'', spot
+	gs 'stat'
+
+	gifornot = rand (1, 100)
+	if gifornot < 40:
+		i = rand(1, 4)
+		'<center><img src="images\carwash\fuckpussy<<i>>.jpg"></center>'
+	else
+		i = rand(1, 4)
+		'<center><img src="images\carwash\fuckpussy<<i>>.gif"></center>'
 	end
+	'You bent you over and the man started fucking your pussy.'
+	act 'Continue':gt 'zaprFWash', 'pussyEndQ'
+end
 
-	if $ARGS[0] = 'assCum':
-		minut += 5
-		pain['asshole'] += 1
-		anus += 1
-		spafinloc = 3
-		gs 'cum_manage'
-		stat['anal'] += 1
-		gs 'stat'
-		i = rand(1, 2)
-		'<center><img src="images\carwash\cumanal<<i>>.gif"></center>'
-		'You let him cum deep inside your ass. Pleasant warmth fills your insides as he flushes his load deep inside you. When he pulls out, a bit of sperm goes out of your hole, before you can tighten your fucked out anus.'
-		dynamic $CatName, 'Gas station customer'
-		gs 'cum_call', 'face', $boy, svol,'', spot
-		act 'Go back to gas station':gt 'zaprF', 'start'
-	end
+if $ARGS[0] = 'fuckAnal':
+	money += 300
+	minut += 30
 
-	if $ARGS[0] = 'vaginaCum':
-		dynamic $CatName, 'Gas station customer'
-		minut += 5
-		vagina += 1
-		stat['vaginal'] += 1
-		pain['vaginal'] += 4
-		dynamic $CatName, 'Gas station customer'
-		gs 'cum_call', 'pussy', $boy, svol,'', spot
-		gs 'stat'
-		i = rand(1, 5)
-		'<center><img src="images\carwash\cumpussy<<i>>.gif"></center>'
-		'You let him cum deep inside your vagina. Pleasant warmth fills your insides as he flushes his load deep inside you. When he pulls out, a bit of sperm goes out of your hole.'
-		act 'Go back to gas station':gt 'zaprF', 'start'
-	end
-
-	if $ARGS[0] = 'blowjobEndQ':
-		'You can feel that the man is reaching orgasm. You decide to take it..:'
-		act 'On your face':gt 'zaprFWash', 'blowjobEndFace'
-		act 'In your mouth':gt 'zaprFWash', 'blowjobEndMouth'
+	gifornot = rand (1, 100)
+	if gifornot < 40:
+		i = rand(1, 4)
+		'<center><img src="images\carwash\fuckanal<<i>>.jpg"></center>'
+	else
+		i = rand(1, 4)
+		'<center><img src="images\carwash\fuckanal<<i>>.gif"></center>'
 	end
+	'You bent you over and the man started fucking your ass with his cock already wet from your saliva.'
 
-	if $ARGS[0] = 'blowjobEndFace':
-		minut += 5
-		if gifornot < 30:
-			i = rand(1, 2)
-			'<center><img src="images\carwash\cumface<<i>>.gif"></center>'
-		else
-			i = rand(1, 4)
-			'<center><img src="images\carwash\cumface<<i>>.jpg"></center>'
-		end
-		'When the man started to ejaculate, you have quickly taken his cock out and pointed it towards your face. His sack was full, you can say that for sure.'
-		dynamic $CatName, 'Gas station customer'
-		gs 'cum_call', 'face', $boy, svol,'', spot
-		act 'Go back to gas station':gt 'zaprF', 'start'
+	rapePussyChance = rand(1, 100)
+	if rapePussyChance < 10:
+		act 'Continue':gt 'zaprFWash', 'rapePussy'
+	else
+		act 'Continue':gt 'zaprFWash', 'analEndQ'
 	end
-
-	if $ARGS[0] = 'blowjobEndMouth':
-		minut += 5
-		gifornot = rand (1, 100)
-		if gifornot < 30:
-			i = rand(1, 4)
-			'<center><img src="images\carwash\cummouth<<i>>.jpg"></center>'
+end
+
+if $ARGS[0] = 'rapePussy':
+	i = rand(1, 5)
+	'<center><img src="images\carwash\hardanal<<i>>.gif"></center>'
+	'The man fucks your ass furiously, taking no regard to your painful moans. As you try to move away a bit to limit the depth of him being in your ass, he slaps your buttcheeks hard and shouts:'
+	'"Stop moving bitch! What do you think you are that you can tell me what to do?"'
+	if vagina = 0:
+		'He gropes your ass, lifts it up and suddenly he sees your virgin membrane.'
+		'"What, you are a virgin? Such slut and virgin, really?"'
+		rapeAnyway = rand(1, 100)
+		if rapeAnyway < 50:
+			'"It would have come to you, virgin slut, sooner or later. Now enjoy and remember this moment!"'
+			act 'Continue':gt 'zaprFWash', 'rapePussyYes'
 		else
-			'<center><img src="images\carwash\cummouth1.gif"></center>'
+			'"Girls like you should not be whoring like that! Someone was supposed to give you a hard lesson long time ago."'
+			act 'Continue':gt 'zaprFWash', 'punishSpank'
 		end
-		'When the started to ejaculate, you have quickly taken his cock slightly out of your mouth and pointed it towards it, so he can see the cum flying inside you. His sack was full, you can say that for sure.'
-		dynamic $CatName, 'Gas station customer'
-		gs 'cum_call', 'mouth', $boy, svol,'', spot
-		act 'Continue':gt 'zaprFWash', 'blowjobEndMouthQ'
+	else
+		act 'Continue':gt 'zaprFWash', 'rapePussyYes'
 	end
 
-	if $ARGS[0] = 'blowjobEndMouthQ':
-		'Your mouth is full of sperm. You decide to..:'
-		act 'Swallow and show him your empty mouth':gt 'zaprFWash', 'blowjobEndMouthSwallow'
-		act 'Spit it out in front of him':gt 'zaprFWash', 'blowjobEndMouthSpit'
+end
+
+if $ARGS[0] = 'rapePussyYes':
+	'He gropes your ass, lifts it up and pushes his dick inside your pussy in one thrust, all the way in!'
+	i = rand(1, 3)
+	'<center><img src="images\carwash\pussytoanal<<i>>.gif"></center>'
+	act 'Continue':gt 'zaprFWash', 'vaginaCum'
+end
+
+if $ARGS[0] = 'analEndQ':
+	'You can feel that the man is reaching orgasm. You decide to..:'
+	act 'Let him cum in your ass':gt 'zaprFWash', 'assCum'
+	act 'Take his cum on your face':gt 'zaprFWash', 'blowjobEndFace'
+	act 'Let him cum inside your mouth':gt 'zaprFWash', 'blowjobEndMouth'
+end
+
+if $ARGS[0] = 'pussyEndQ':
+	'You can feel that the man is reaching orgasm. You decide to..:'
+	act 'Let him cum in your vagina':gt 'zaprFWash', 'vaginaCum'
+	act 'Take his cum on your face':gt 'zaprFWash', 'blowjobEndFace'
+	act 'Let him cum inside your mouth':gt 'zaprFWash', 'blowjobEndMouth'
+end
+
+if $ARGS[0] = 'assCum':
+	minut += 5
+	pain['asshole'] += 1
+	anus += 1
+	spafinloc = 3
+	gs 'cum_manage'
+	stat['anal'] += 1
+	gs 'stat'
+	i = rand(1, 2)
+	'<center><img src="images\carwash\cumanal<<i>>.gif"></center>'
+	'You let him cum deep inside your ass. Pleasant warmth fills your insides as he flushes his load deep inside you. When he pulls out, a bit of sperm goes out of your hole, before you can tighten your fucked out anus.'
+	dynamic $CatName, 'Gas station customer'
+	gs 'cum_call', 'face', $boy, svol,'', spot
+	act 'Go back to gas station':gt 'zaprF', 'start'
+end
+
+if $ARGS[0] = 'vaginaCum':
+	dynamic $CatName, 'Gas station customer'
+	minut += 5
+	vagina += 1
+	stat['vaginal'] += 1
+	pain['vaginal'] += 4
+	dynamic $CatName, 'Gas station customer'
+	gs 'cum_call', 'pussy', $boy, svol,'', spot
+	gs 'stat'
+	i = rand(1, 5)
+	'<center><img src="images\carwash\cumpussy<<i>>.gif"></center>'
+	'You let him cum deep inside your vagina. Pleasant warmth fills your insides as he flushes his load deep inside you. When he pulls out, a bit of sperm goes out of your hole.'
+	act 'Go back to gas station':gt 'zaprF', 'start'
+end
+
+if $ARGS[0] = 'blowjobEndQ':
+	'You can feel that the man is reaching orgasm. You decide to take it..:'
+	act 'On your face':gt 'zaprFWash', 'blowjobEndFace'
+	act 'In your mouth':gt 'zaprFWash', 'blowjobEndMouth'
+end
+
+if $ARGS[0] = 'blowjobEndFace':
+	minut += 5
+	if gifornot < 30:
+		i = rand(1, 2)
+		'<center><img src="images\carwash\cumface<<i>>.gif"></center>'
+	else
+		i = rand(1, 4)
+		'<center><img src="images\carwash\cumface<<i>>.jpg"></center>'
 	end
-
-
-	if $ARGS[0] = 'blowjobEndMouthSwallow':
-		'You gulp the mouthfull of sperm and stick out your tongue as a proof that all is gone in your belly.'
+	'When the man started to ejaculate, you have quickly taken his cock out and pointed it towards your face. His sack was full, you can say that for sure.'
+	dynamic $CatName, 'Gas station customer'
+	gs 'cum_call', 'face', $boy, svol,'', spot
+	act 'Go back to gas station':gt 'zaprF', 'start'
+end
+
+if $ARGS[0] = 'blowjobEndMouth':
+	minut += 5
+	gifornot = rand (1, 100)
+	if gifornot < 30:
 		i = rand(1, 4)
-		'<center><img src="images\carwash\swallow<<i>>.jpg"></center>'
-		'The man smiles, slaps you mildly on your face and says: "What a nice young slut you are. Next time I need a refill, I''ll be sure to stop by."'
-		act 'Go back to gas station':gt 'zaprF', 'start'
+		'<center><img src="images\carwash\cummouth<<i>>.jpg"></center>'
+	else
+		'<center><img src="images\carwash\cummouth1.gif"></center>'
 	end
-
-	if $ARGS[0] = 'blowjobEndMouthSpit':
-		'You spit the moutfull down between the legs of your customer. He doesnt seem happy about it...'
-		i = rand(1, 3)
-		gifornot = rand (1, 100)
-		if gifornot > 30:
-		'<center><img src="images\carwash\spit<<i>>.jpg"></center>'
-		else
-		'<center><img src="images\carwash\spit1.gif"></center>'
-		end
-		'His face darkens and he says: "What, my cum is not good enough for you to swallow? I''ll teach you bitch!"'
-		'He moves onto you with angry scary face!'
-		act 'Run away back to gas station':gt 'zaprFWash', 'runback'
+	'When the started to ejaculate, you have quickly taken his cock slightly out of your mouth and pointed it towards it, so he can see the cum flying inside you. His sack was full, you can say that for sure.'
+	dynamic $CatName, 'Gas station customer'
+	gs 'cum_call', 'mouth', $boy, svol,'', spot
+	act 'Continue':gt 'zaprFWash', 'blowjobEndMouthQ'
+end
+
+if $ARGS[0] = 'blowjobEndMouthQ':
+	'Your mouth is full of sperm. You decide to..:'
+	act 'Swallow and show him your empty mouth':gt 'zaprFWash', 'blowjobEndMouthSwallow'
+	act 'Spit it out in front of him':gt 'zaprFWash', 'blowjobEndMouthSpit'
+end
+
+
+if $ARGS[0] = 'blowjobEndMouthSwallow':
+	'You gulp the mouthfull of sperm and stick out your tongue as a proof that all is gone in your belly.'
+	i = rand(1, 4)
+	'<center><img src="images\carwash\swallow<<i>>.jpg"></center>'
+	'The man smiles, slaps you mildly on your face and says: "What a nice young slut you are. Next time I need a refill, I''ll be sure to stop by."'
+	act 'Go back to gas station':gt 'zaprF', 'start'
+end
+
+if $ARGS[0] = 'blowjobEndMouthSpit':
+	'You spit the moutfull down between the legs of your customer. He doesnt seem happy about it...'
+	i = rand(1, 3)
+	gifornot = rand (1, 100)
+	if gifornot > 30:
+	'<center><img src="images\carwash\spit<<i>>.jpg"></center>'
+	else
+	'<center><img src="images\carwash\spit1.gif"></center>'
 	end
-
-	if $ARGS[0] = 'runback':
-		runSuccess = rand(1, 100)
-		if runSuccess > 50:
-			'You have managed to escape his grasp!'
-			act 'Continue':gt 'zaprF', 'start'
-		else
-			pain['cheeks'] += 2
-			pain['head'] += 2
-			pain['mouth'] += 2
-			pain['neck'] += 4
-			'<center><img src="images\carwash\punishbeatface.gif"></center>'
-			'You werent quick enough and he caught you. He pushed you down and started to slap your face!'
-			act 'Endure his punishment':gt 'zaprFWash', 'punish'
-		end
+	'His face darkens and he says: "What, my cum is not good enough for you to swallow? I''ll teach you bitch!"'
+	'He moves onto you with angry scary face!'
+	act 'Run away back to gas station':gt 'zaprFWash', 'runback'
+end
+
+if $ARGS[0] = 'runback':
+	runSuccess = rand(1, 100)
+	if runSuccess > 50:
+		'You have managed to escape his grasp!'
+		act 'Continue':gt 'zaprF', 'start'
+	else
+		pain['cheeks'] += 2
+		pain['head'] += 2
+		pain['mouth'] += 2
+		pain['neck'] += 4
+		'<center><img src="images\carwash\punishbeatface.gif"></center>'
+		'You werent quick enough and he caught you. He pushed you down and started to slap your face!'
+		act 'Endure his punishment':gt 'zaprFWash', 'punish'
 	end
-
-	if $ARGS[0] = 'punish':
-		punishType = rand(1, 100)
-		if punishType < 33:
-			gt 'zaprFWash', 'punishSpank'
-		elseif punishType < 66:
-			gt 'zaprFWash', 'punishPussyQ'
-		else
-			gt 'zaprFWash', 'punishAnal'
-		end
+end
+
+if $ARGS[0] = 'punish':
+	punishType = rand(1, 100)
+	if punishType < 33:
+		gt 'zaprFWash', 'punishSpank'
+	elseif punishType < 66:
+		gt 'zaprFWash', 'punishPussyQ'
+	else
+		gt 'zaprFWash', 'punishAnal'
 	end
-
-	if $ARGS[0] = 'punishSpank':
-		minut += 20
-		horny = 0
-		pain['asscheeks'] += 5
-		'<center><img src="images\carwash\punishspank.gif"></center>'
-		'The angry man bent you over an old chair, took down your pants and began to spank you. Hard.'
-		'After twenty minutes of ruthless punishment, you can finally crawl away with your burning ass.'
-		abductionChance = rand(1, 100)
-		if abductionChance <= 10 or sub > 90:
-			act 'Continue':gt 'zaprFWash', 'getAbducted'
-		else
-			act 'Get back to gas station':gt 'zaprF', 'start'
-		end
+end
+
+if $ARGS[0] = 'punishSpank':
+	minut += 20
+	horny = 0
+	pain['asscheeks'] += 5
+	'<center><img src="images\carwash\punishspank.gif"></center>'
+	'The angry man bent you over an old chair, took down your pants and began to spank you. Hard.'
+	'After twenty minutes of ruthless punishment, you can finally crawl away with your burning ass.'
+	abductionChance = rand(1, 100)
+	if abductionChance <= 10 or sub > 90:
+		act 'Continue':gt 'zaprFWash', 'getAbducted'
+	else
+		act 'Get back to gas station':gt 'zaprF', 'start'
 	end
-
-	if $ARGS[0] = 'punishPussyQ':
-		'The angry man dragged you to an old house. He bend you over something and started to rub your pussy.'
-		if vagina = 0:
-			'Suddenly he shouted: "What? You are a virgin? Such self selling slut and still a virgin?'
-			penetrate = rand (1, 100)
-			if penetrate <= 100 and penetrate > 66:
-				'Someone should have done this long time ago!'
-				act 'Endure':gt 'zaprFWash', 'punishSpank'
-			elseif penetrate <= 66 and penetrate > 33:
-				'I''ll spare your virginity but you''ll get fucked anyway. Sluts don''t have just one hole, right?'
-				act 'Endure':gt 'zaprFWash', 'punishAnal'
-			else
-				'This makes it even better! I''ll enjoy your tears even more!'
-				act 'Endure':gt 'zaprFWash', 'punishPussy'
-			end
+end
+
+if $ARGS[0] = 'punishPussyQ':
+	'The angry man dragged you to an old house. He bend you over something and started to rub your pussy.'
+	if vagina = 0:
+		'Suddenly he shouted: "What? You are a virgin? Such self selling slut and still a virgin?'
+		penetrate = rand (1, 100)
+		if penetrate <= 100 and penetrate > 66:
+			'Someone should have done this long time ago!'
+			act 'Endure':gt 'zaprFWash', 'punishSpank'
+		elseif penetrate <= 66 and penetrate > 33:
+			'I''ll spare your virginity but you''ll get fucked anyway. Sluts don''t have just one hole, right?'
+			act 'Endure':gt 'zaprFWash', 'punishAnal'
 		else
-			'Let''s try this teenie snatch!'
+			'This makes it even better! I''ll enjoy your tears even more!'
 			act 'Endure':gt 'zaprFWash', 'punishPussy'
 		end
+	else
+		'Let''s try this teenie snatch!'
+		act 'Endure':gt 'zaprFWash', 'punishPussy'
 	end
-
-	if $ARGS[0] = 'punishPussy':		
-		minut += 30
-		vagina += 1
-		stat['vaginal'] += 1
-		pain['vaginal'] += 4
-		dynamic $CatName, 'Gas station customer'
-		gs 'cum_call', 'pussy', $boy, svol,'', spot
-		gs 'stat'
-		i = rand(1, 5)
-		'<center><img src="images\carwash\punishpussy<<i>>.gif"></center>'
-		'He bent you over and started ruthlessly fucking your dry pussy.'
-		'After half hour of ruthless pussy destroying, you can finally crawl away with your sore pussy.'
-		horny = 0
-		abductionChance = rand(1, 100)
-		if abductionChance <= 10 or sub > 90:
-			act 'Continue':gt 'zaprFWash', 'getAbducted'
-		else
-			act 'Get back to gas station':gt 'zaprF', 'start'
-		end
+end
+
+if $ARGS[0] = 'punishPussy':		
+	minut += 30
+	vagina += 1
+	stat['vaginal'] += 1
+	pain['vaginal'] += 4
+	dynamic $CatName, 'Gas station customer'
+	gs 'cum_call', 'pussy', $boy, svol,'', spot
+	gs 'stat'
+	i = rand(1, 5)
+	'<center><img src="images\carwash\punishpussy<<i>>.gif"></center>'
+	'He bent you over and started ruthlessly fucking your dry pussy.'
+	'After half hour of ruthless pussy destroying, you can finally crawl away with your sore pussy.'
+	horny = 0
+	abductionChance = rand(1, 100)
+	if abductionChance <= 10 or sub > 90:
+		act 'Continue':gt 'zaprFWash', 'getAbducted'
+	else
+		act 'Get back to gas station':gt 'zaprF', 'start'
+	end
+end
+
+if $ARGS[0] = 'punishAnal':
+	minut += 30
+	pain['asshole'] += 6
+	anus += 1
+	spafinloc = 3
+	gs 'cum_manage'
+	stat['anal'] += 1
+	gs 'stat'
+
+	horny = 0
+	i = rand(1, 3)
+	'<center><img src="images\carwash\punishanal<<i>>.gif"></center>'
+	'The angry man dragged you to an old house. He bent you over on the ground and started ruthlessly fucking your dry anus.'
+	'After half hour of ruthless assfuck, you can finally crawl away with your sore ass.'
+	
+	abductionChance = rand(1, 100)
+	if abductionChance <= 10 or sub > 90:
+		act 'Continue':gt 'zaprFWash', 'getAbducted'
+	else
+		act 'Get back to gas station':gt 'zaprF', 'start'
 	end
+end
 
-	if $ARGS[0] = 'punishAnal':
-		minut += 30
-		pain['asshole'] += 6
-		anus += 1
-		spafinloc = 3
-		gs 'cum_manage'
-		stat['anal'] += 1
-		gs 'stat'
+if $ARGS[0] = 'getAbducted':
+	'But your perpetrator hasn''t stopped yet.'
+	'He catches you again and drags you to his car and pushes you into the trunk..'
+	'You probably made a terrible mistake..'
+	act 'Cry for help':gt 'abduction', 'start'
+end
 
-		horny = 0
-		i = rand(1, 3)
-		'<center><img src="images\carwash\punishanal<<i>>.gif"></center>'
-		'The angry man dragged you to an old house. He bent you over on the ground and started ruthlessly fucking your dry anus.'
-		'After half hour of ruthless assfuck, you can finally crawl away with your sore ass.'
-		
-		abductionChance = rand(1, 100)
-		if abductionChance <= 10 or sub > 90:
-			act 'Continue':gt 'zaprFWash', 'getAbducted'
-		else
-			act 'Get back to gas station':gt 'zaprF', 'start'
-		end
-	end
+--- zaprFWash ---------------------------------
 
-	if $ARGS[0] = 'getAbducted':
-		'But your perpetrator hasn''t stopped yet.'
-		'He catches you again and drags you to his car and pushes you into the trunk..'
-		'You probably made a terrible mistake..'
-		act 'Cry for help':gt 'abd', 'abduction'
-	end