burger enhancments and bug fixes

locations/BurgerTip.qsrc

@@ -3,32 +3,34 @@
 menu_off = 1
 
 $BurgerQW['IlyQWBlackmailPhoto'] = ''
-if film > 0:
- !pornoaktrissa
-	$BurgerQW['IlyQWBlackmailPhoto'] = 'The photo is a screenshot from one of your porn movies.'
+if BurgerQW['IlyQWBlackmail'] >= 0:
+	if film > 0:
+	 !pornoaktrissa
+		$BurgerQW['IlyQWBlackmailPhoto'] = 'The photo is a screenshot from one of your porn movies.'
 
-elseif fotoyousuck = 1:
-	!!sucked in a couple of guys and was sfotografirovanna
-	$BurgerQW['IlyQWBlackmailPhoto'] = 'The picture shows you sucking two cocks at the same time.'
+	elseif fotoyousuck = 1:
+		!!sucked in a couple of guys and was sfotografirovanna
+		$BurgerQW['IlyQWBlackmailPhoto'] = 'The picture shows you sucking two cocks at the same time.'
 
-elseif fotoCFNMsex > 0:
-	$BurgerQW['IlyQWBlackmailPhoto'] = 'In the photo you see yourself getting fucked from behind by a random guy. This must have been taken in the stripclub.'
+	elseif fotoCFNMsex > 0:
+		$BurgerQW['IlyQWBlackmailPhoto'] = 'In the photo you see yourself getting fucked from behind by a random guy. This must have been taken in the stripclub.'
 
-elseif fotoCFNMblowjobCum > 0:
-	!!cum on face in the strip club
-	$BurgerQW['IlyQWBlackmailPhoto'] = 'In the photo you are sitting in front of a guy, kissing his cock. There seems to be cum on your face. This photo must have been taken in the stripclub.'
+	elseif fotoCFNMblowjobCum > 0:
+		!!cum on face in the strip club
+		$BurgerQW['IlyQWBlackmailPhoto'] = 'In the photo you are sitting in front of a guy, kissing his cock. There seems to be cum on your face. This photo must have been taken in the stripclub.'
 
-elseif fotoCFNMblowjob > 0:
-	!!sucked in front of everyone
-	$BurgerQW['IlyQWBlackmailPhoto'] = 'In the photo you are giving a guy a blowjob. You can spot a group of women in the background and it seems like this photo was taken in the stripclub.'
+	elseif fotoCFNMblowjob > 0:
+		!!sucked in front of everyone
+		$BurgerQW['IlyQWBlackmailPhoto'] = 'In the photo you are giving a guy a blowjob. You can spot a group of women in the background and it seems like this photo was taken in the stripclub.'
 
-elseif stripdancesum > 0:
-	!!stripper
-	$BurgerQW['IlyQWBlackmailPhoto'] = 'In the photo you are dancing on a pole. Obviously someone photographed you, while you were on stage at the stripclub.'
+	elseif stripdancesum > 0:
+		!!stripper
+		$BurgerQW['IlyQWBlackmailPhoto'] = 'In the photo you are dancing on a pole. Obviously someone photographed you, while you were on stage at the stripclub.'
 
-elseif modelfoto > 0:
-	!!photo model
-	$BurgerQW['IlyQWBlackmailPhoto'] = 'The photo shows you naked, it is very well taken and must be from a shoot at the modeling agency.'
+	elseif modelfoto > 0:
+		!!photo model
+		$BurgerQW['IlyQWBlackmailPhoto'] = 'The photo shows you naked, it is very well taken and must be from a shoot at the modeling agency.'
+	end
 end
 
 if $ARGS[0] = 'work':
@@ -54,12 +56,13 @@ if $ARGS[0] = 'work':
 				
 					if BurgerQW['WorkShift'] = 1:
 						act 'Have your lunch': gt 'burgerWork', 'work'
-					elseif BurgerQW['WorkShift'] = 2:
+					else
 						act 'Leave work': gs 'burgerWork', 'work2'
 					end
 				end
 			elseif bossrand = 1:
 				'When you enter his office, Anatoly tells you: "<<$pcs_nickname>>, I need these documents sighed by the accountant. Take them to her, and see that she signs them. When he does, return them to me."'
+				if rand(0,3) = 0:'When you bend over to pick up the papers from the table, Anatoly gives you a slap on the ass.'
 
 				act 'Go to the chief accountant':
 					*clr&cla
@@ -75,7 +78,7 @@ if $ARGS[0] = 'work':
 
 						if BurgerQW['WorkShift'] = 1:
 							act 'Have your lunch': gt 'burgerWork', 'work'
-						elseif BurgerQW['WorkShift'] = 2:
+						else
 							act 'Leave work': gs 'burgerWork', 'work2'
 						end
 					end
@@ -90,6 +93,60 @@ if $ARGS[0] = 'work':
 					'You hand the papers to Ilyushkin, telling him that Anatoly wants them done immediately.'
 					'Ilyushkin takes the folder from you. He opens the folder, and flips though the papers. With a little nod, he sends you on your way.'
 
+					if rand(0,2) = 0: 
+						cla
+						'He suddenly grabs you by the hand, pulling you towards him.'
+						act 'Bend over':
+							*clr & cla
+							'<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/bj2.jpg"></center>'
+							'You bend over and come face to face with Ily, he whispers, unbuttoning his pants, "Get to work with your mouth, baby"'
+
+							act 'Use your mouth':
+								*clr & cla
+								'<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/bj3.jpg"></center>'
+								'Still standing in front of Ily you bend over even more gently lick his member with your tongue, again and again. Finally your lips wrap around his cock and begin to suck it. His curly pubes tickle your nose with every movement, as you put his whole member in your mouth.'
+								'Ily finally lets out a loud moan and without warning begins to cum in your mouth. A Jet of hot liquid hits you in the mouth. Your eyes widen, but you continue to suck his seed-spewing dick until finally you have a mouth full of semen. As your mouth can not contain it anymore it emerges on your lips and runs down Ily''s member.'
+
+								gs 'arousal', 'bj', 3, 'sub', 'prostitution'
+								gs 'stat'
+
+								act 'Swallow cum and clean his cock':
+									*clr & cla
+									minut += 2
+									gs 'cum_call', 'mouth_swallow', 'A76', 1
+									money += 500
+									gs 'stat'
+									'<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/bj4.jpg"></center>'
+									'You squat in front of the manager and swallow his sperm before licking the remnants of his semen off of the still standing, but quickly lowering penis.'
+									'Finally Ily sinks back, completely satisfied and gives you 500 <b>₽</b> for the work you have done.'
+
+									gs 'arousal', 'end'
+									gs 'stat'
+
+									if BurgerQW['WorkShift'] = 1:
+										act 'Have your lunch': gt 'burgerWork', 'work'
+									else
+										act 'Leave work': gs 'burgerWork', 'work2'
+									end
+								end
+							end
+						end
+
+						gs 'willpower', 'bj', 'resist'
+						if will_cost <= pcs_willpwr:
+							act 'Pull away (<<will_cost>> Willpower)':
+								gs 'willpower', 'pay', 'resist'
+								if BurgerQW['WorkShift'] = 1:
+									'burgerWork', 'work'
+								else
+									gs 'burgerWork', 'work2'
+								end
+							end
+						else
+							act 'Pull away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+						end
+					end
+
 					act 'Back to your desk':
 						*clr&cla
 						gs 'stat'
@@ -98,7 +155,7 @@ if $ARGS[0] = 'work':
 
 						if BurgerQW['WorkShift'] = 1:
 							act 'Have your lunch': gt 'burgerWork', 'work'
-						elseif BurgerQW['WorkShift'] = 2:
+						else
 							act 'Leave work': gs 'burgerWork', 'work2'
 						end
 					end
@@ -130,29 +187,33 @@ if $ARGS[0] = 'work':
 					
 					act 'Suck his dick': gt 'BurgerTip', 'bj'
 					
-					if pcs_vag > 0 or pcs_ass > 0:
-						act 'Have sex':
-							*clr&cla
-							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/characters/city/anatoly/sex/bossex2.jpg"></center>'
-							'Anatoly puts you on your back, and begins to undress you. His kisses and his hands run all over your body, soon his hand finds its way between your legs.'
+					act 'Have sex':
+						*clr&cla
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/characters/city/anatoly/sex/bossex2.jpg"></center>'
+						'Anatoly puts you on your back, and begins to undress you. His kisses and his hands run all over your body, soon his hand finds its way between your legs.'
 
-							bosstipsexrand = rand(1, 10)
+						gs 'arousal', 'vaginal_finger', 5, 'sub'
+						gs 'stat'
+					
+						 act 'Moan': gt 'BurgerTip', 'sex2'
+					end
 
-							gs 'arousal', 'vaginal_finger', 5, 'sub'
-							gs 'stat'
+					act 'Show ass':
+						*clr&cla
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/characters/city/anatoly/sex/bossex2.jpg"></center>'
+						'Anatoly puts you on your back, and begins to undress you. His kisses and his hands run all over your body, soon his hand finds its way between your legs.'
+
+						gs 'arousal', 'vaginal_finger', 5, 'sub'
+						gs 'stat'
+					
+						'His hand goes further finding your sphincter with one of his fingers. The probing of his finger leaves no doubt about what he wants.'
 						
-							if bosstipsexrand >= 3:
-								act 'Moan': gt 'BurgerTip', 'sex2'
-							elseif bosstipsexrand < 3:
-								'His hand goes further finding your sphincter with one of his fingers. The probing of his finger leaves no doubt about what he wants.'
-								
-								gs 'arousal', 'anal_finger', 5, 'sub'
-								gs 'stat'
-							
-								act 'Take it in the ass':gt 'BurgerTip', 'anal2'
-							end
-						end
+						gs 'arousal', 'anal_finger', 5, 'sub'
+						gs 'stat'
+					
+						act 'Take it in the ass':gt 'BurgerTip', 'anal2'
 					end
 				end
 
@@ -176,6 +237,20 @@ if $ARGS[0] = 'work':
 
 					act 'Suck his dick': gt 'BurgerTip', 'bj'
 				end
+
+				gs 'willpower', 'sex', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Pull away (<<will_cost>> Willpower)':
+						gs 'willpower', 'pay', 'resist'
+						if BurgerQW['WorkShift'] = 1:
+							'burgerWork', 'work'
+						else
+							gs 'burgerWork', 'work2'
+						end
+					end
+				else
+					act 'Pull away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 			end
 		end
 
@@ -204,7 +279,7 @@ if $ARGS[0] = 'work':
 
 					if BurgerQW['WorkShift'] = 1:
 						act 'Have your lunch': gt 'burgerWork', 'work'
-					elseif BurgerQW['WorkShift'] = 2:
+					else
 						act 'Leave work': gs 'burgerWork', 'work2'
 					end
 				end
@@ -234,16 +309,16 @@ if $ARGS[0] = 'work':
 
 					if BurgerQW['WorkShift'] = 1:
 						act 'Have your lunch': gt 'burgerWork', 'work'
-					elseif BurgerQW['WorkShift'] = 2:
+					else
 						act 'Leave work': gs 'burgerWork', 'work2'
 					end
 				end
 			end
-		elseif BurgerQW['WorkShift'] = 2:
+		else
 			bosstiprand = rand(0, 3)
 
 			if bosstiprand = 0:
-				'Anatoly comes out of the office and says, "<<$pcs_nickname>>, I have to leave early today. Here''s a few papers for you to file,"  He hands you a folder on his way out of the office.'
+				'Anatoly comes out of the office and says, "<<$pcs_nickname>>, I have to leave early today. Here''s a few papers for you to file,"	He hands you a folder on his way out of the office.'
 				bburand = rand(0, 10)
 
 				if bburand = 0:
@@ -255,7 +330,7 @@ if $ARGS[0] = 'work':
 
 						if BurgerQW['WorkShift'] = 1:
 							act 'Have your lunch': gt 'burgerWork', 'work'
-						elseif BurgerQW['WorkShift'] = 2:
+						else
 							act 'Leave work': gs 'burgerWork', 'work2'
 						end
 					end
@@ -277,7 +352,7 @@ if $ARGS[0] = 'work':
 
 							if BurgerQW['WorkShift'] = 1:
 								act 'Have your lunch': gt 'burgerWork', 'work'
-							elseif BurgerQW['WorkShift'] = 2:
+							else
 								act 'Leave work': gs 'burgerWork', 'work2'
 							end
 						end
@@ -318,7 +393,7 @@ if $ARGS[0] = 'work':
 
 					if BurgerQW['WorkShift'] = 1:
 						act 'Have your lunch': gt 'burgerWork', 'work'
-					elseif BurgerQW['WorkShift'] = 2:
+					else
 						act 'Leave work': gs 'burgerWork', 'work2'
 					end
 
@@ -329,7 +404,7 @@ if $ARGS[0] = 'work':
 					
 					if BurgerQW['WorkShift'] = 1:
 						act 'Have your lunch': gt 'burgerWork', 'work'
-					elseif BurgerQW['WorkShift'] = 2:
+					else
 						act 'Leave work': gs 'burgerWork', 'work2'
 					end
 				elseif bburand = 3:
@@ -337,7 +412,7 @@ if $ARGS[0] = 'work':
 
 					if BurgerQW['WorkShift'] = 1:
 						act 'Have your lunch': gt 'burgerWork', 'work'
-					elseif BurgerQW['WorkShift'] = 2:
+					else
 						act 'Leave work': gs 'burgerWork', 'work2'
 					end
 				elseif bburand > 3:
@@ -345,13 +420,27 @@ if $ARGS[0] = 'work':
 
 					if BurgerQW['WorkShift'] = 1:
 						act 'Have your lunch': gt 'burgerWork', 'work'
-					elseif BurgerQW['WorkShift'] = 2:
+					else
 						act 'Leave work': gs 'burgerWork', 'work2'
 					end
 				end
 			elseif bosstiprand = 1:
 				'Anatoly comes out of the office and says, "<<$pcs_nickname>>, let''s get out of here and go have some fun."'
 
+				gs 'willpower', 'sex', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Refuse (<<will_cost>> Willpower)':
+						gs 'willpower', 'pay', 'resist'
+						if BurgerQW['WorkShift'] = 1:
+							'burgerWork', 'work'
+						else
+							gs 'burgerWork', 'work2'
+						end
+					end
+				else
+					act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
+
 				act 'Go with Anatoly':
 					*clr & cla
 					gs 'stat'
@@ -386,13 +475,13 @@ if $ARGS[0] = 'work':
 									gs 'arousal', 'bj', 5, 'sub'
 									gs 'stat'
 									
-									if pcs_vag = 0:
+									if stat['vaginal'] = 0:
 										'Wait! You''ve never had sex before!'
 										'Anatoly grins and says, "It''s not that big of a deal just lay down on this bench and relax. All secretaries do it for their bosses from time to time."'
 										'He continues, "Now just spread your legs a little. I promise you''ll enjoy this, just maybe not as much as me."'
 									end
 									
-									act 'Further':
+									act 'Fuck him':
 										*clr&cla
 										minut += 5
 										gs 'boyStat', 'A74'
@@ -426,7 +515,7 @@ if $ARGS[0] = 'work':
 										end
 										protect = 0
 										sexcontra = 0
-										dynamic 'showerdin'
+										dynamic $showerdin
 										'You head to the shower to wash up. When you return, you see that he is already dressed."<<$pcs_nickname>>, I''ve got to run, but you were great baby," he says, giving you a kiss before he leaves.'
 										if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 										gs 'arousal', 'vaginal', 15, 'sub'
@@ -435,6 +524,29 @@ if $ARGS[0] = 'work':
 						
 										act 'Leave':gt 'city_residential'
 									end
+
+									act 'Offer Anal':
+										*clr&cla
+										minut += 5
+										gs 'boyStat', 'A74'
+										gs 'stat'
+										'<center><img <<$set_imgh>> src="images/characters/city/anatoly/sex/bossanal2.jpg"></center>'
+
+										'"Anal? How could I refuses such a tight ass!", Anatoly exclaims. He then grabs you by the hand pushing you to the bed. You lift your leg towards your head while spreading your ass checks, ready for action.'
+										'He assults your ass with vigor, then suddenly groans and twitches as he fills your ass with cum.'
+										gs 'cum_call', 'anal', 'A74', 1, 5
+
+										dynamic $showerdin
+
+										'You head to the shower to wash up. When you return, you see that he is already dressed."<<$pcs_nickname>>, I''ve got to run, but you were great baby," he says, giving you a kiss before he leaves.'
+										if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
+
+										gs 'arousal', 'anal', 15, 'sub'
+										gs 'arousal', 'end'
+										gs 'stat'
+						
+										act 'Leave':gt 'city_residential'
+									end
 								end
 							end
 						end
@@ -478,7 +590,7 @@ if $ARGS[0] = 'work':
 
 					if BurgerQW['WorkShift'] = 1:
 						act 'Have your lunch': gt 'burgerWork', 'work'
-					elseif BurgerQW['WorkShift'] = 2:
+					else
 						act 'Leave work': gs 'burgerWork', 'work2'
 					end
 				end
@@ -489,7 +601,7 @@ if $ARGS[0] = 'work':
 					*clr&cla
 					minut += 60
 					gs 'stat'
-					'Two men join  Anatoly in his office for the meeting. You are tasked with bringing coffee and taking notes. An hour later, the men are gone and Anatoly sends you on your way.'
+					'Two men join	Anatoly in his office for the meeting. You are tasked with bringing coffee and taking notes. An hour later, the men are gone and Anatoly sends you on your way.'
 
 					act 'Leave':gt 'city_center'
 				end
@@ -508,7 +620,7 @@ if $ARGS[0] = 'work':
 
 			if BurgerQW['WorkShift'] = 1:
 				act 'Have your lunch': gt 'burgerWork', 'work'
-			elseif BurgerQW['WorkShift'] = 2:
+			else
 				act 'Leave work': gs 'burgerWork', 'work2'
 			end
 		else
@@ -516,7 +628,7 @@ if $ARGS[0] = 'work':
 			'Nothing interesting happens.'
 			if BurgerQW['WorkShift'] = 1:
 				act 'Have your lunch': gt 'burgerWork', 'work'
-			elseif BurgerQW['WorkShift'] = 2:
+			else
 				act 'Leave work': gs 'burgerWork', 'work2'
 			end
 		end
@@ -529,7 +641,7 @@ if $ARGS[0] = 'work':
 
 		if BurgerQW['WorkShift'] = 1:
 			act 'Have your lunch': gt 'burgerWork', 'work'
-		elseif BurgerQW['WorkShift'] = 2:
+		else
 			act 'Leave work': gs 'burgerWork', 'work2'
 		end
 
@@ -541,7 +653,7 @@ if $ARGS[0] = 'work':
 
 		if BurgerQW['WorkShift'] = 1:
 			act 'Have your lunch': gt 'burgerWork', 'work'
-		elseif BurgerQW['WorkShift'] = 2:
+		else
 			act 'Leave work': gs 'burgerWork', 'work2'
 		end
 
@@ -551,7 +663,7 @@ if $ARGS[0] = 'work':
 
 		if BurgerQW['WorkShift'] = 1:
 			act 'Have your lunch': gt 'burgerWork', 'work'
-		elseif BurgerQW['WorkShift'] = 2:
+		else
 			act 'Leave work': gs 'burgerWork', 'work2'
 		end
 
@@ -559,17 +671,17 @@ if $ARGS[0] = 'work':
 	elseif burand = 6:
 		'An elegantly dressed woman shows up at the office.'
 
-		if BurgerQW['SlutReputation'] < 10:
+		if BurgerQW['SlutReputation'] < 10 or BurgerQW['PleadJob'] ! 0:
 			'The lady looks at you scornfully and asks, "Is he in there?" You nod your head meekly. Without knocking she marches into Anatoly''s office. A short time later they both come back out. "Yes dear, I''ll see you at your mothers house later, I promise," he says, as he ushers her out the door. After she is gone, he chuckles, "My wife is a rare bitch."'
 		
 			if BurgerQW['WorkShift'] = 1:
 				act 'Have your lunch': gt 'burgerWork', 'work'
-			elseif BurgerQW['WorkShift'] = 2:
+			else
 				act 'Leave work': gs 'burgerWork', 'work2'
 			end
 		end
 
-		if BurgerQW['SlutReputation'] >= 10:
+		if BurgerQW['SlutReputation'] >= 10 and BurgerQW['PleadJob'] = 0:
 			'She looks at you with contempt, and storms into Anatoly''s office. You can here her screaming through the door: "I know all about your adventures with that slut out there. If you don''t send your whore packing immediately I''m leaving you, and taking you for everything you''re worth." With that she storms out of the office, and spits on you on her way out the door.'
 			'A few minutes later Anatoly comes out, and says, "<<$pcs_nickname>>, I''m sorry, I can''t afford to lose my marriage over you. I''m going to have to insist on your resignation."'
 			
@@ -586,18 +698,32 @@ if $ARGS[0] = 'work':
 
 				act 'Leave':gt 'city_center'
 			end
+
+			act 'Plead for job':
+				*clr & cla
+				'<center><img <<$set_imgh>> src="images/characters/city/anatoly/sex/bossex1.jpg"></center>'
+				'Kneeling before Anatoly, you begin to deftly undo his pants. He stares down at you silently, as work to get access to the bulge in his briefs.'
+		
+				BurgerQW['PleadJob'] = 1
+
+				act 'Caress his cock through his briefs':
+					*clr & cla
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/characters/city/anatoly/sex/bossbj.jpg"></center>'
+					'When his pants are around his ankles, you kiss and rub your hands along the fabric covering his bulge. Eventually you see the tip of his penis poking out his briefs, and can''t take it anymore. Playfully, you remove his underwear with your teeth.'
+
+					gs 'arousal', 'foreplay', 5, 'sub'
+					gs 'stat'
+					
+					act 'Suck his dick': gt 'BurgerTip', 'bj'
+				end
+			end
 		end
 
 		exit
 	end
 end
 
-$boss_ass_din = {
-	bossassrand = rand(0, 3)
-
-	if bossassrand = 0:'When you bend over to pick up the papers from the table, Anatoly gives you a slap on the ass.'
-}
-
 if $ARGS[0] = 'bj':
 	*clr&cla
 	numbjrand = rand(0, 14)
@@ -611,7 +737,7 @@ if $ARGS[0] = 'bj':
 	
 	if wantrand = 3:
 		'After a short time, Anatoly takes his cock from your mouth and says, "<<$pcs_nickname>>, I want all of you."'
-		if pcs_vag > 0 or pcs_ass > 0:
+		if stat['vaginal'] > 0 or stat['anal'] > 0:
 			act 'Bend over the desk': gt 'BurgerTip', 'bend'
 		else
 			'Wait! You''ve never had sex before!'
@@ -621,7 +747,7 @@ if $ARGS[0] = 'bj':
 		end
 	elseif wantrand = 2:
 		'After a short time, Anatoly groans, "<<$pcs_nickname>> if you keep sucking, I''m going to finish"'
-		if pcs_vag > 0 or pcs_ass > 0: act 'Bend over the desk': gt 'BurgerTip', 'bend'
+		if stat['vaginal'] > 0 or stat['anal'] > 0: act 'Bend over the desk': gt 'BurgerTip', 'bend'
 		act 'Finish him by hand': gt 'BurgerTip', 'bj_cum'
 		act 'Continue to suck': gt 'BurgerTip', 'bj2'
 	elseif wantrand < 2:
@@ -677,7 +803,7 @@ if $ARGS[0] = 'toilet':
 
 			if BurgerQW['WorkShift'] = 1:
 				act 'Have your lunch': gt 'burgerWork', 'work'
-			elseif BurgerQW['WorkShift'] = 2:
+			else
 				act 'Leave work': gs 'burgerWork', 'work2'
 			end
 		end
@@ -698,7 +824,7 @@ if $ARGS[0] = 'toilet_wash':
 
 	if BurgerQW['WorkShift'] = 1:
 		act 'Have your lunch': gt 'burgerWork', 'work'
-	elseif BurgerQW['WorkShift'] = 2:
+	else
 		act 'Leave work': gs 'burgerWork', 'work2'
 	end
 end
@@ -717,7 +843,7 @@ if $ARGS[0] = 'toilet_wash2':
 
 	if BurgerQW['WorkShift'] = 1:
 		act 'Have your lunch': gt 'burgerWork', 'work'
-	elseif BurgerQW['WorkShift'] = 2:
+	else
 		act 'Leave work': gs 'burgerWork', 'work2'
 	end
 end
@@ -781,7 +907,7 @@ if $ARGS[0] = 'bj2':
 		if boburand > 2:
 			if BurgerQW['WorkShift'] = 1:
 				act 'Have your lunch': gt 'burgerWork', 'work'
-			elseif BurgerQW['WorkShift'] = 2:
+			else
 				act 'Leave work': gs 'burgerWork', 'work2'
 			end
 		elseif boburand <= 2:
@@ -807,7 +933,7 @@ if $ARGS[0] = 'bj2':
 		if boburand > 2:
 			if BurgerQW['WorkShift'] = 1:
 				act 'Have your lunch': gt 'burgerWork', 'work'
-			elseif BurgerQW['WorkShift'] = 2:
+			else
 				act 'Leave work': gs 'burgerWork', 'work2'
 			end
 		elseif boburand <= 2:
@@ -830,6 +956,10 @@ if $ARGS[0] = 'bend':
 	if bosstipsex <= 8:
 		'He starts rubbing the head of his cock against your little pussy.'
 		act 'Moan': gt 'BurgerTip', 'sex'
+		act 'Offer ass': 
+			'He bends down and spits into your ass. Then you feel his finger start working its way into your backdoor.'
+			gt 'BurgerTip', 'anal'
+		end
 	elseif bosstipsex > 8:
 		'He bends down and spits into your ass. Then you feel his finger start working its way into your backdoor.'
 		act 'Give it to him': gt 'BurgerTip', 'anal'
@@ -859,9 +989,10 @@ if $ARGS[0] = 'sex':
 		gs 'arousal', 'end'
 		gs 'stat'
 		
+		act 'Go to the toilet': gt 'BurgerTip', 'toilet'
 		if BurgerQW['WorkShift'] = 1:
 			act 'Have your lunch': gt 'burgerWork', 'work'
-		elseif BurgerQW['WorkShift'] = 2:
+		else
 			act 'Leave work': gs 'burgerWork', 'work2'
 		end
 	elseif bosswantrand < 3:
@@ -888,9 +1019,10 @@ if $ARGS[0] = 'anal':
 	gs 'arousal', 'end'
 	gs 'stat'
 
+	act 'Go to the toilet': gt 'BurgerTip', 'toilet'
 	if BurgerQW['WorkShift'] = 1:
 		act 'Have your lunch': gt 'burgerWork', 'work'
-	elseif BurgerQW['WorkShift'] = 2:
+	else
 		act 'Leave work': gs 'burgerWork', 'work2'
 	end
 end
@@ -919,9 +1051,10 @@ if $ARGS[0] = 'sex2':
 		gs 'arousal', 'end'
 		gs 'stat'
 		
+		act 'Go to the toilet': gt 'BurgerTip', 'toilet'
 		if BurgerQW['WorkShift'] = 1:
 			act 'Have your lunch': gt 'burgerWork', 'work'
-		elseif BurgerQW['WorkShift'] = 2:
+		else
 			act 'Leave work': gs 'burgerWork', 'work2'
 		end
 	elseif bosswantrand < 3:
@@ -948,9 +1081,10 @@ if $ARGS[0] = 'anal2':
 	gs 'arousal', 'end'
 	gs 'stat'
 	
+	act 'Go to the toilet': gt 'BurgerTip', 'toilet'
 	if BurgerQW['WorkShift'] = 1:
 		act 'Have your lunch': gt 'burgerWork', 'work'
-	elseif BurgerQW['WorkShift'] = 2:
+	else
 		act 'Leave work': gs 'burgerWork', 'work2'
 	end
 end
@@ -972,7 +1106,7 @@ if $ARGS[0] = 'ily_work':
 
 		if BurgerQW['WorkShift'] = 1:
 			act 'Have your lunch': gt 'burgerWork', 'work'
-		elseif BurgerQW['WorkShift'] = 2:
+		else
 			act 'Leave work': gs 'burgerWork', 'work2'
 		end
 
@@ -1015,7 +1149,7 @@ if $ARGS[0] = 'ily_work2':
 				gs 'stat'
 				if BurgerQW['WorkShift'] = 1:
 					act 'Have your lunch': gt 'burgerWork', 'work'
-				elseif BurgerQW['WorkShift'] = 2:
+				else
 					act 'Leave work': gs 'burgerWork', 'work2'
 				end
 			end
@@ -1054,7 +1188,7 @@ if $ARGS[0] = 'ily_work3':
 
 	if BurgerQW['WorkShift'] = 1:
 		act 'Have your lunch': gt 'burgerWork', 'work'
-	elseif BurgerQW['WorkShift'] = 2:
+	else
 		act 'Leave work': gs 'burgerWork', 'work2'
 	end
 end

locations/burger.qsrc

@@ -33,8 +33,17 @@ if $ARGS[0] = 'start':
 	end
 
 	if BurgerQW['WashDishesCount'] >= 1 and BurgerQW['WashedDishesLastDay']  ! daystart and BurgerQW['WorkBlocked'] = 0 and BurgerQW['Secretary'] = 0: act 'Wash the dishes for 70 <b>₽</b> (1:00)':gt 'burger', 'dishes'
-
 	if BurgerQW['WashFloorCount'] >= 1 and BurgerQW['WashFloorLastDay'] ! daystart and hour < 10 and BurgerQW['WorkBlocked'] = 0 and BurgerQW['Secretary'] = 0: act 'Wash the floor for 70 <b>₽</b> (1:00)':gt 'burger', 'floor'
+
+  if BurgerQW['Secretary'] = 1 and hour < 10: 
+		if PCloStyle3 ! 4: 
+			act 'Use restroom to change into secretary attire': gt 'wardrobe', 'sets'
+		else
+			act 'Work as Secretary':
+				burgerSecWorkday = daystart & gt 'burgerWork', 'start'
+			end
+		end
+  end
 end
 
 if $ARGS[0] = 'office':
@@ -184,17 +193,18 @@ if $ARGS[0] = 'dishes':
 					'You undress and begin to inspect the dress.'
 					'Suddenly Anatoly comes into the dressing room.'
 					'"Sorry, I could not resist to take a look at your beauty."'
+	        '<center><img <<$set_imgh>> src="images/pc/items/fashionista/dress/20.jpg"></center>'
 					'Looking at the dresses, Anatoly says, '
 					'"I think you should take this one. It is the most expensive one. And I think, <<$pcs_nickname>>, you should be very thankful for such a gift."'
 					'Anatoly''s eyes point at his pants showing what he wants from you.'
 
+					fashionista[20] = 1
+					fashionista[20] = 160
+					fashionista[20] = pcs_hips
+
 					act 'Give him a blowjob':
 						*clr & cla
 						BurgerQW['Level'] = 50
-						guy += 1
-						cats_dress[23] = 1
-						cats_dress_h[23] = 160
-						cats_dress_b[23] = pcs_hips
 						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/bj.jpg"></center>'
 						'You squat down in front of Anatoly, he unbuttons his pants and pulls out his penis. You lean over his hard cock and kiss it, feeling its warmth. You run your tongue along his cock finally putting it in your big wet mouth and start to suck his dick.'
 						'Soon Anatoly groans and you feel a spurt of warm liquid like in your mouth. You are giving your best to swallow all of his cum, trying not to choke. Anatoly straightens his clothes and leaves.'
@@ -215,7 +225,7 @@ if $ARGS[0] = 'dishes':
 							gs 'arousal', 'end'
 							gs 'stat'
 
-							act 'Out of the car':gt 'city_residential'
+							act 'Out of the car':gt 'city_center'
 						end
 					end
 
@@ -229,10 +239,6 @@ if $ARGS[0] = 'dishes':
 							*clr & cla
 							minut += 1
 							BurgerQW['Level'] = 50
-							guy += 1
-							cats_dress[24] = 1
-							cats_dress_h[24] = 160
-							cats_dress_b[24] = pcs_hips
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/pr.jpg"></center>'
 							'You look up at him startled as you notice the hot head of his cock resting on your lips. Anatoly pushes his dick to your lips. "Don''t shy baby, lick it with your tongue."'
@@ -291,7 +297,7 @@ if $ARGS[0] = 'dishes':
 													gs 'arousal', 'end'
 													gs 'stat'
 
-													act 'Out of the car':gt 'city_residential'
+													act 'Out of the car':gt 'city_center'
 												end
 											end
 										end
@@ -303,14 +309,14 @@ if $ARGS[0] = 'dishes':
 
 					gs 'willpower', 'bj', 'resist', 'medium'
 					if will_cost <= pcs_willpwr:
-						act 'Thank you very much. (Deny) (<<will_cost>> Willpower)':
+						act 'Laugh at him (<<will_cost>> Willpower)':
 							*clr & cla
 							gs 'willpower', 'pay', 'resist'
 							gs 'stat'
 							'You grin and say, "Thank you very much." Anatoly flushes and says emphatically, "You know what I mean." He unbuttons his pants and pulls out his hard member.'
 							'You laugh, "Oh yes, I understand perfectly. You can wear this dress yourself, if you think I''m spreading my legs for every fat cat, who fancies himself the king of the world. So don''t insult my intelligence and put your ugly dick back in your pants. If you think I am going to suck you off for buying me a dress you are a bigger idiot than I thought. Wo do you think you are? Casanova? Are you fucking serious?"'
 							'Antaloy''s face turns red with anger and begins to threaten you, "Yes I am, I''ll fire you!"'
-							'You laugh in his face, "Oh I''m scared. Alright fire me and then use this dress as a rag to wash the dishes."'
+							'You laugh in his face, "Oh I''m scared. Alright fire me and then use this dress as a rag to wash the dishes. I''ll tell you what, you hire me as your secretary and I won''t tell your wife about this."'
 							'Anatoly pale, flushed and hissing angrily jumps out of the fitting followed by your loud laughter.'
 
 							act 'Leave':
@@ -319,7 +325,7 @@ if $ARGS[0] = 'dishes':
 							end
 						end
 					else
-						act 'Thank you very much. (Deny) (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+						act 'Laugh at him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 					end	
 				end
 			end
@@ -813,12 +819,13 @@ if $ARGS[0] = 'boss':
 			end
 		end
 
-	elseif BurgerQW['BossSlut'] = 2 and BurgerQW['BossSlutLastServed'] = daystart:
+	elseif BurgerQW['BossSlut'] >= 2 and BurgerQW['BossSlut'] < 10 and BurgerQW['BossSlutLastServed'] = daystart:
 		'Knocking you walk into the office to Anatoly Borisovich. He looks at you angrily, "I said, get out of here."'
 
 		act 'Leave':gt 'burger', 'start'
 
-	elseif BurgerQW['BossSlut'] = 2 and BurgerQW['BossSlutLastServed'] ! daystart:
+	elseif BurgerQW['BossSlut'] >= 2 and BurgerQW['BossSlut'] < 10 and BurgerQW['BossSlutLastServed'] ! daystart:
+    if BurgerQW['BossSlut'] < 10: BurgerQW['BossSlut'] += 1
 		BurgerQW['BossSlutLastServed'] = daystart
 		'Knocking you walk into the office to Anatoly Borisovich. He looked at you grimly and pulls out 300 <b>₽</b>, "Get down on your knees and get to work, slut."'
 		gs 'willpower', 'bj', 'resist', 'medium'

locations/burgerWork.qsrc

@@ -36,7 +36,7 @@ if $ARGS[0] = 'start':
 				'Anatoly Borisovich thanks you for delivering the documents to the bank.'
 			end
 
-			if BurgerQW['SaunaWhoreKnown'] = 1 or BurgerQW['IlyQWBlackmail'] = 1:
+			if (BurgerQW['SaunaWhoreKnown'] = 1 or BurgerQW['IlyQWBlackmail'] = 1) and BurgerQW['PleadJob'] = 0:
 				'Anatoly Borisovich comes into your office and puts the paper in front of you with a pen. "Write up your resignation. I don''t need a secretary with a past like yours."'
 
 				act 'Write a statement of resignation':
@@ -52,6 +52,26 @@ if $ARGS[0] = 'start':
 					act 'Leave':gt 'city_center'
 				end
 
+				act 'Plead for job':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/characters/city/anatoly/sex/bossex1.jpg"></center>'
+					'Kneeling before Anatoly, you begin to deftly undo his pants. He stares down at you silently, as work to get access to the bulge in his briefs.'
+			
+					BurgerQW['PleadJob'] = 1
+
+					act 'Caress his cock through his briefs':
+						*clr & cla
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/characters/city/anatoly/sex/bossbj.jpg"></center>'
+						'When his pants are around his ankles, you kiss and rub your hands along the fabric covering his bulge. Eventually you see the tip of his penis poking out his briefs, and can''t take it anymore. Playfully, you remove his underwear with your teeth.'
+
+						gs 'arousal', 'foreplay', 5, 'sub'
+						gs 'stat'
+						
+						act 'Suck his dick': gt 'BurgerTip', 'bj'
+					end
+				end
+
 				exit
 			end
 
@@ -75,13 +95,14 @@ if $ARGS[0] = 'work2':
 		kobl2 = 2
 	elseif BurgerQW['IlyQWBlackmail'] >= 6 and BurgerQW['IlyQWBJFilmed'] = 0:
 		kobl = 0
-		kobl2 = 2
+		kobl2 = 10
 	elseif BurgerQW['IlyQWBlackmail'] < 6:
 		kobl = 0
 		kobl2 = 1
 	end
 
 	komblrand = rand(kobl, kobl2)
+	if komblrand > 2 or BurgerQW['IlyQWBlackmail'] < 2: gt 'burger', 'start'
 
 	if BurgerQW['IlyQWBlackmail'] >= 2:
 		if komblrand = 0:
@@ -212,11 +233,183 @@ if $ARGS[0] = 'work2':
 				act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end	
 		end
-
-		exit
 	end
 
-	gt 'burger', 'start'
+	if BurgerQW['IlyQWBlackmail'] > 15:
+		gs 'stat'
+		'"I''ll stop black-mailing you if you complete a simple task for me."'
+		'"Here are the keys to the Anatoly Borisovich''s office. Take them with you when you go home. Go to his office, open the safe and take the envelope in there. Do not forget to close the safe afterwards. Bring the envelope to me. Did you understand everything? Then go!"'
+
+		act 'No':
+			*clr & cla
+			gs 'stat'
+			'You refuse Ily''s offer and notice a flash of annoyance on his face. Disappointed he says to you. "Well, the offer stands."'
+
+			act 'Leave':gt 'burger', 'start'
+		end
+
+		act 'Take the key and go into Anatoly Borisovich''s office':
+			BurgerQW['IlyQWBlackmail'] = -1
+			*clr & cla
+			gs 'stat'
+			'Taking key from Ily you go to the office of the owner. You open the door, enter the office and go to the safe. When you open the safe you see some documents and a thick envelope.'
+
+			act 'Look in the envelope':
+				*clr & cla
+				$BurgerQW['IlySecurityCamDesc']= 'You look into the envelope. Then you close the safe and head to the exit.'
+				gs 'stat'
+				'You look into the envelope and see a thick wad of money. You guess, that it amounts to about half a million. A surprised whistle escapes your mouth.'
+
+				act 'Take the envelope to Ily':
+					*clr & cla
+					BurgerQW['IlyQWDay'] = daystart
+					BurgerQW['IlyQW'] = 1
+					gs 'stat'
+					'Coming out of the office, you see Ily standing in the corridor at the cooler talking on the cell phone. Seeing you, he waves you over. You come up and give the envelope to Ily. He quickly picks it up and puts it in his jacket pocket. After that, he nods. You can go. You want to give him the keys to the office, but Ily shakes his head and closing his hand tells you. "Take them home with you. Come back tomorrow, we shall discuss the details of your new appointment."'
+
+					act 'Leave':gt 'burger', 'start'
+				end
+			end
+
+			act 'Take the envelope to Ily':
+				*clr & cla
+				$BurgerQW['IlySecurityCamDesc']= 'You take the envelope, close the safe and head out.'
+				BurgerQW['IlyQWDay'] = daystart
+				BurgerQW['IlyQW'] = 1
+				gs 'stat'
+				'Coming out of the office, you see Ily standing in the corridor at the cooler talking on the cell phone. Seeing you, he waves you over. You come up and give the envelope to Ily. He quickly picks it up and puts it in his jacket pocket. After that, he nods. You can go. You want to give him the keys to the office, but Ily shakes his head and closing his hand tells you. "Take them home with you. Come back tomorrow, we shall discuss the details of your new appointment."'
+
+				act 'Leave':gt 'burger', 'start'
+			end
+		end
+	elseif komblrand = 0:
+		'After work, you are about to leave the bistro, but Ily stops you. "Where are you going, baby? You need to suck my dick."'
+
+		act 'Agree':
+			*clr & cla
+			gs 'boyStat', 'A76'
+			gs 'cum_call', 'mouth_swallow', 'A76', 1
+			BurgerQW['IlyQWBlackmail'] += 1
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/city/ily/sex/ilybj.jpg"></center>'
+			'Ily takes you around the corner to a dirty alley behind the bistro. It smells like urine. He pulls his member out of his pants. "Put it in your mouth and show me what you can do." You squat in front of Ily and take his penis in your mouth. It tastes salty and unwashed. You start to suck actively trying to make Ily finish as quickly as possible. Finally Ily lets out a moan starts to cum in your mouth. You quickly swallow while looking around, hoping no one saw you. Once you swallowed his cum, Ily puts his cleaned up dick in his pants "That was average. You can do better. Now get out of here!"'
+
+			gs 'arousal', 'bj', 5, 'sub'
+			gs 'arousal', 'end'
+			gs 'stat'
+	
+			act 'Leave':gt 'city_center'
+		end
+		gs 'willpower', 'bj', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'BurgerTip', 'work4'
+			end
+		else
+			act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end	
+	elseif komblrand = 1:
+		'After work, you are about to leave the bistro, but Ily stops you. "Where are you going, baby? I need you to suck my dick."'
+
+		act 'Agree':
+			*clr & cla
+			gs 'boyStat', 'A76'
+			gs 'cum_call', 'mouth_swallow', 'A76', 1
+			BurgerQW['IlyQWBlackmail'] += 1
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/city/ily/sex/ilybjcar.jpg"></center>'
+			'Ily takes you to his car standing in the alley. He gets behind the wheel and you sit next to him. Ily gets his dick out of his pants and grabs you by the hair pulling your face to his groin until his cock is buried in your <<$liptalk3>>. You open your mouth and allow the member to enter between your lips. You are trying to suck hard, using your <<$liptalk3>> on the penis so Ily would be finished quickly. Ily''s body finally jerks and he finishes in your mouth. You continue to suck his dick swallowing the sperm without spilling a drop. Ily tucks his dick back in his pants and says, "Okay cocksucker, get out."'
+
+			gs 'arousal', 'bj', 5, 'sub'
+			gs 'arousal', 'end'
+			gs 'stat'
+			
+			act 'Leave':gt 'city_center'
+		end
+		gs 'willpower', 'bj', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'BurgerTip', 'work4'
+			end
+		else
+			act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end	
+	elseif komblrand = 2:
+		'After work, you are about to leave the bistro, but Ily stops you. "Where are you going, baby? My dick needs to be sucked."'
+
+		act 'Agree':
+			*clr & cla
+			BurgerQW['IlyQWBlackmail'] += 1
+			minut += 5
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/city/shared/car.jpg"></center>'
+			'Ily takes you to his car standing in the alley. He gets behind the wheel and you sit next to him. Ily starts the car and drives you to the city industrial region. "Don''t forget baby. As long as you continue to serve me you have a job and prospects, but if you piss me off, I will take everything from you." As soon as you come to a new building, Ily parks his car in a free space. You get out and go with Ily to a staircase. The lift takes you up to Ily''s apartment and he opens the door for you. Without hesitation Ily takes you by the hand and leads you to his bedroom. He sits down on the bed and takes out a camera. Ily gets his dick out of his pants and says, "Now suck it baby. And give it your all, I don''t want the video to be bad."'
+			act 'Suck':
+				*clr & cla
+				BurgerQW['IlyQWBJFilmed'] += 1
+				
+				gs 'arousal', 'bj', 5, 'sub'
+				gs 'stat'
+				
+				'<center><img <<$set_imgh>> src="images/characters/city/ily/sex/ilybjfilm.jpg"></center>'
+				'You get down on your knees in front of Ily and clasp his member with your <<$liptalk3>>. Ily films you using his camera to get a closeup of you sucking his cock. After a while he lies you down on his couch and sits on your chest to make sure his cock is right in front of your face.'
+
+				act 'Suck':
+					*clr & cla
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/characters/city/ily/sex/ilybjfilm2.jpg"></center>'
+					'Sitting on top of you Ily starts to fuck your mouth sticking is member in your throat as far as possible. You suck diligently trying not to choke as Ily is filming you the whole time. Finally he takes his dick out of your mouth.'
+
+					gs 'arousal', 'bj', 5, 'sub'
+					gs 'stat'
+			
+					act 'Open your mouth':
+						*clr & cla
+						minut += 5
+						facial += 1
+						gs 'boyStat', 'A76'
+						gs 'cum_call', 'face', 'A76', 1
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/characters/city/ily/sex/ilybjfilm3.jpg"></center>'
+						'Ily begins to finish on your <<$liptalk3>>. Cum drips from your lips on your chin and chest. Ily finally turns the camera off and puts it away in a drawer. "Not bad. You did what you were required. Wash up and then get out."'
+
+						gs 'arousal', 'end'
+						gs 'stat'
+						
+						act 'Leave':cumspclnt = 12 & gs 'cum_cleanup' & gt 'city_center'
+					end
+				end
+			end
+			gs 'willpower', 'bj', 'resist', 'medium'
+			if will_cost <= pcs_willpwr:
+				act 'Refuse (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					gt 'BurgerTip', 'work4'
+				end
+			else
+				act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end	
+		end
+		gs 'willpower', 'bj', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'BurgerTip', 'work4'
+			end
+		else
+			act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end	
+	end
 end
 
 if $ARGS[0] = 'work3':

locations/ilyroom.qsrc

@@ -23,7 +23,7 @@ if $start_type[1] ! 'nomagic':
 
 		act 'Come on we''ll get this monster':
 			cls
-			BurgerQW['IlyushkinQWTatianaHelp'] = 0
+			BurgerQW['IlyQWTatianaHelp'] = 0
 			poverKAR = 2
 			minut += 15
 			gs 'stat'
@@ -172,7 +172,6 @@ if $start_type[1] ! 'nomagic':
 
 												act '69 Tatiana':
 													cls
-													pcs_vag += 1
 													gs 'stat'
 													'<center><img <<$set_imgh>> src="images/locations/city/industrial/aptmanagers/sex/threesome5.jpg"></center>'
 													'You lower your face to Tatiana''s pussy and begin licking her as her tongue licks furiously at your clit. You''re extremely turned on when Ilyushkin''s hard cock parts the folds of your pussy and fills you up from behind, the feeling of being penetrated as your clit is worked out from below overwhelming you. You give your all to Tatiana, licking her pussy fast and hard as Ilyushkin pounds into you. In no time, you begin to shudder with convulsions as a huge orgasm spikes through your body. You hear Tatiana cry out with you as she hugs your body close, her own orgasm roaring through her. The two of you feel as one being, and you''re both moaning loudly. With that, Ilyushkin roars and buries himself deep inside you, shooting his hot semen into your quivering pussy. For one moment, the three of you spasm together, then Ilyushkin pulls out of you and slides his dick into Tatiana''s mouth, shooting the last bit of his sperm into her. As he falls away, you feel Tatiana licking the sperm from your pussy.'
@@ -195,7 +194,7 @@ if $start_type[1] ! 'nomagic':
 														act 'Interrogate Ilyushkin':
 															cls
 															softKAR = 10
-															BurgerQW['IlyushkinQWEvidence'] = 1
+															BurgerQW['IlyQWEvidence'] = 1
 															photoskl_exp += 2
 															cumface = 0
 															gs 'stat'
@@ -314,7 +313,6 @@ else
 												gs 'stat'
 												act '69 Tanya':
 													cls
-													pcs_vag += 1
 													gs 'stat'
 													'<center><img <<$set_imgh>> src="images/locations/city/industrial/aptmanagers/sex/threesome5.jpg"></center>'
 													'You lower your face to Tanya''s pussy and begin licking her as her tongue licks furiously at your clit. You''re extremely turned on when a hard cock parts the folds of your pussy and fills you up from behind, the feeling of being penetrated as your clit is worked out from below overwhelming you. You give your all to Tanya, licking her pussy fast and hard as Ilyushkin pounds into you from behind.  In no time, you begin to shudder with convulsions as a huge orgasm spikes through your body. You hear Tanya cry out with you as she hugs your body close, her own orgasm roaring through her. The two of you feel as one being, and you''re both moaning loudly. With that, Ilyushkin roars and buries himself deep inside you, shooting his hot semen into your quivering pussy. For one moment, the three of you spasm together, then Ilyushkin pulls out of you and slides his dick into Tanya''s mouth, shooting the last bit of his sperm into her. As he falls away, you feel Tanya licking the sperm from your pussy.'
@@ -334,7 +332,7 @@ else
 														act 'Interrogate Ilyushkin':
 															cls
 															softKAR = 10
-															BurgerQW['IlyushkinQWEvidence'] = 1
+															BurgerQW['IlyQWEvidence'] = 1
 															cumface = 0
 															gs 'stat'
 															'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'

locations/korr.qsrc

@@ -128,68 +128,17 @@ if hour >= 9 and hour <= 20 and santehnikDolg > 0 and money >= santehnikDolg:
 	end
 end
 
-if BurgerQW['IlyQW']  = 3 and hour >= 9 and hour <= 20:
+if BurgerQW['IlyQW'] = 3 and hour >= 9 and hour <= 20:
 	*clr & cla
-	BurgerQW['IlyQW']  = 4
-
-	if DolgRS <= moneySUM:
-		money = moneySUM - 650000
+	'The police arrive and take you to court.'
+	act 'Settle debt': 
+		'<b>[Not yet implemented]</b>'
+		BurgerQW['IlyQW']  = 4
 		karta = 0
 		stolmoney = 0
 		minut += 120
-		'The police arrive and take you to court. You manage to pay off your debts and are released.'
-
 		act 'Leave the courthouse':gt 'city_center'
-	else
-		DolgRS = 650000 - moneySUM - 60000
-		money = 0
-		karta = 0
-		stolmoney = 0
-		vidage += 7
-		year += 5
-		age = year - ((pcs_dob - (pcs_dob mod 10000)) / 10000)
-		money = 2000
-		'The police arrive and take you to court. After standing trial, you are given five years of jail time and are required to pay your debt of <<DolgRS>>.'
-
-		act 'Serve your time':
-			*clr & cla
-			srok_kolvo = 1
-			srok_otsidki += 5
-			salo = 10
-			fat = 10
-			if defcurly = 0:
-				curly = 0
-			else
-				curly = 2147483647
-			end
-			straight = 0
-			pcs_makeup = 1
-			pcs_skin = 0
-			pcs_tan = 0
-			pcs_leghair = 12
-			pcs_pubes = 30
-			bfa = 0
-			narkoman = 0
-			nark = 0
-			SLomka = 0
-			work = 0
-			workKafe = 0
-			workhosp =0
-			worksalon =0
-			tanwork =0
-			workSec =0
-			preg = 0
-			young_shop_work = 0
-			gs 'uniutil', 'student', 'unenroll'
-			gs 'stat'
-
-			'Time drags on slowly. Your life and work are tedious and monotonous. You''ve been sewing for five years, having meals in the dining room and going to sleep surrounded by other female inmates. 1,000 <b>₽</b> of your 2,000 <b>₽</b> per month salary goes towards your debt repayment.' 
-			'As slow as it seems, time doesn''t stand still and your torment finally comes to an end. You are released and given 2,000 <b>₽</b>. You board the train and return to the city.'
-
-			act 'Get off the train': gt 'city_industrial_train', 'outside'
-		end
 	end
-	exit
 end
 
 if BurgerQW['IlyQWDay'] ! daystart and BurgerQW['IlyQW']  = 1 and hour >= 8 and hour <= 20:
@@ -517,8 +466,8 @@ $polidin = {
 	cla
 	*clr
 	minut += 15
-	callrand = rand(1, 3)
-	'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/housecall.jpg"></center>'
+	callrand = rand(0, 2)
+	'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/housecall<<callrand>>.jpg"></center>'
 	'You dial the number of the clinic several times, but it''s always busy.'
 
 	act 'Keep trying':

locations/korr2x.qsrc

@@ -104,64 +104,17 @@ else
 	end
 end
 
-if BurgerQW['IlyQW']  = 3 and hour >= 9 and hour <= 20:
-	cls
-	BurgerQW['IlyQW']  = 4
-
-	if DolgRS <= moneySUM:
-		money = moneySUM-650000
+if BurgerQW['IlyQW'] = 3 and hour >= 9 and hour <= 20:
+	*clr & cla
+	'The police arrive and take you to court.'
+	act 'Settle debt': 
+		'<b>[Not yet implemented]</b>'
+		BurgerQW['IlyQW']  = 4
 		karta = 0
 		stolmoney = 0
 		minut += 120
-		'The police arrive and take you to court. You manage to pay off your debts and are released.'
-		act 'Leave the courthouse':gt'city_center'
-	elseif DolgRS > moneySUM:
-		DolgRS = 650000-moneySUM-60000
-		money = 0
-		karta = 0
-		stolmoney = 0
-		vidage += 7
-		year += 5
-		age = year - ((pcs_dob - (pcs_dob mod 10000)) / 10000)
-		money = 2000
-		'The police arrive and take you to court. After standing trial, you are given five years of jail time and are required to pay your debt of <<DolgRS>>.'
-		act 'Serve your time':
-			cls
-			srok_kolvo = 1
-			srok_otsidki += 5
-			salo = 10
-			fat = 10
-			if defcurly = 0:
-				curly = 0
-			else
-				curly = 2147483647
-			end
-			straight = 0
-			pcs_makeup = 1
-			pcs_skin = 0
-			pcs_tan = 0
-			pcs_leghair = 12
-			pcs_pubes = 30
-			bfa = 0
-			narkoman = 0
-			nark = 0
-			SLomka = 0
-			work = 0
-			workKafe = 0
-			workhosp = 0
-			worksalon = 0
-			tanwork = 0
-			workSec = 0
-			preg = 0
-			young_shop_work = 0
-			gs 'uniutil', 'student', 'unenroll'
-			gs'stat'
-			'Time drags on slowly. Your life and work are tedious and monotonous. You''ve been sewing for five years, having meals in the dining room and going to sleep surrounded by other female inmates. 1,000 <b>₽</b> of your 2,000 <b>₽</b> per month salary goes towards your debt repayment.' 
-			'As slow as it seems, time doesn''t stand still and your torment finally comes to an end. You are released and given 2,000 <b>₽</b>. You board the train and return to the city.'
-			act 'Get off the train': gt 'city_industrial_train', 'outside'
-		end
+		act 'Leave the courthouse':gt 'city_center'
 	end
-	exit
 end
 if BurgerQW['IlyQWDay'] ! daystart and BurgerQW['IlyQW']  = 1 and hour >= 8 and hour <= 20:
 	'<b><font color = red>The doorbell rings</font></b>'