GLifeHornguy/locations/clener.qsrc

# clener
if $ARGS[0] = 'start':
	cla
	*clr
	CLOSE ALL
	if sound = 0 and hour >= 8 and hour < 17:PLAY 'sound/office.mp3',30 & PLAY 'sound/office2.mp3',30
	clr
	gs 'stat'
	if night_mode = 1:
		fcolor = rgb(255, 255, 255)
		bcolor = rgb(0, 0, 0)
		lcolor = rgb(106, 90, 205)
	elseif night_mode = 2:
		fcolor = rgb(255, 255, 255)
		bcolor = rgb(20, 20, 20)
		lcolor = rgb(106, 90, 205)
	else
		fcolor = rgb(0, 0, 0)
		bcolor = rgb(255, 255, 255)
		lcolor = rgb(106, 90, 205)
	end
	'<center><b><font color="maroon">Office building</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener.jpg"></center>'
	'You notice several ads on one of the walls. As you look through them you see a notice that someone is searching for cleaners.'

	if svQW >= 1:
		if hour >= 8 and hour <= 16 and week < 6:
			'The door to the<a href="exec:gt ''torgpred''">Trade Mission</a> is open.'
		else
			'The door of the trade mission is closed. There''s a note on the door, Open hours: Saturday and Sunday 8:00--16:00'
		end
	end

	if jouryQwNo = 1 and hour = 17:
		'You see Yuri walking down the corridor, you remember him making a move on you but you refused him. He looks at you, smiles and approaches you.'

		act 'Talk to Yuri':
			cla
			minut += 15
			gs 'stat'
			'Still smiling he says, "<<$pcs_nickname>>, want to grab a cup of coffee?"'

			act 'Decline':jouryQwNo = 1 & gt 'clener', 'start'

			act 'Accept':
				cls
				minut += 30
				gs 'stat'
				'You nod and the two of you head off to the café, where Yuri orders coffee. You sit down at the table and begin to sip on your coffee. Yuri is painfully quiet, he has no sense of humor and is very stiff.'
				'It''s pretty clear that he likes you, but he does not know how to put a move on you. As you finish the coffee Yuri finally suggests if you want to follow him to his home.'

				act 'No':jouryQwNo = 1 & gt 'clener', 'start'

				act 'Go with Yuri':gt 'youry', 'quest'
			end
		end
	end

	if borodachQW > 0 and borodachSex = 0 and hour >= 19:'The security guard, Sasha, greets you.'
	if borodachQW > 0 and borodachSex > 0 and hour >= 19:'The security guard, Sasha, smiles and says, "Hi <<$pcs_nickname>>!"'

	if borodachQW > 0 and hour >= 19:
		act 'Approach Sasha':
			cls
			minut += 5
			gs 'stat'

			if borodachSexDay = daystart:'You approach the security guard and greet him. You chat with him for a while. After some time Sasha tells you that he has to go on patrol and hurries off.'

			if borodachSexDay ! daystart:
				'You approach the security guard and greet him. He winks at you, "I stashed a bottle here, I''m sure we''ve both earnt a little break."'

				act 'Join him':
					cla
					minut += 5
					gs 'stat'
					'Sasha takes you to his cubbyhole and pulls out a bottle of vodka from under the table. He then reaches into a drawer and pulls out a piece of liver sausage and some cheese. He pours some of the vodka out into two glasses.'

					act 'Have a drink':
						cla
						if pcs_hydra >= 100:
							pcs_hydra -= 5
						else
							pcs_hydra -= 10
						end
						'You drink the shitty vodka and it burns your throat. Your throat is on fire and you quickly grab some cheese to help soothe it. Sasha casually downs the glass and doesn''t even blink. "Ah, good one."'
						'While you are leaning over to eat the sausage, you feel a light touch as the guard pats you on the buttocks.'

						act 'Smile':
							cla
							minut += 15
							pcs_horny += 10
							if pcs_hydra >= 100:
								pcs_hydra -= 5
							else
								pcs_hydra -= 10
							end
							gs 'stat'
							'You smile and Sasha pours more vodka, not stopping his caressing of your buttocks.'

							if pcs_horny < 50:dynamic $borodachNo2

							dynamic $borodachDrink
						end

						act 'Put your hand on his pants':
							cls
							borodachTimes += 1
							gs 'stat'

							picrand = rand(0, 2)

							if picrand = 0:'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/hj.jpg"></center>'
							if picrand = 1:'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/hj1.jpg"></center>'
							if picrand = 2:'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/hj2.jpg"></center>'

							'You put your hand on his crotch and feel his erection harden. Your thin fingers slide over his hardon and find the zipper. You unzip him and get his cock out of his pants. Sasha relaxes on the couch waiting for you to continue what you started.'
							
							gs 'arousal', 'foreplay', 15
							gs 'stat'
							
							
							dynamic $ohrhj
							dynamic $ohrbj
						end
					end
				end
			end

			gs 'arousal', 'end'
			gs 'stat'
							
			act 'Leave':gt 'clener', 'start'
		end
	end

	if clenerT >= 3 and borodachQW = 0 and hour >= 19:
		'You see a crossword placed on a chair in front of the guard as he''s deeply sighs. He looks up to you and asks, "I''m looking for another word for pleasure, the second letter is u."'

		act 'Reply':
			cls
			borodachQW = 1
			'"Fulfilment?" you reply.'
			'The guard smiles, "You''re right, the only word that came up in my head was fucking."'

			act 'Leave':gt 'clener', 'start'

			act 'Laugh out loud':
				cla
				borodachQW = 2
				'You laugh at him, he smiles and puts aside the crossword. "You must be new, I haven''t seen you before. Are you the new cleaning lady?"'
				'You nod, "Yes, the pay is pretty bad but I need the job..."'
				'"By the way, I''m Sasha, and you''re?"'
				'"<<$pcs_nickname>>." you politely answer.'
				'"Nice name... I was just thinking about heading on a break, would you like to join me?"'

				act 'Sorry, I have to go':gt 'clener', 'start'

				act 'Why not':
					cla
					minut += 5
					gs 'stat'
					'Sasha takes you into his cubbyhole and takes out a bottle of vodka from under the table, at the same he reaches into the drawer and pulls out a piece of liver sausage and some cheese. He pours some of the vodka out into two glasses.'

					act 'Have a drink':
						cla
						if pcs_hydra >= 100:
							pcs_hydra -= 5
						else
							pcs_hydra -= 10
						end
						'You drink the shitty vodka and it burns your throat. Your throat is on fire and you quickly grab some cheese to help soothe it. Sasha casually downs the glass and doesn''t even blink. "Ah, good one."'
						'While you are leaning over to eat the sausage, you feel a light touch as the guard pats you on the buttocks.'

						act 'React':
							cla
							minut += 15
							pcs_horny += 10
							gs 'stat'
							'"Hey! What are you doing?" you ask.'
							'"Relax, it was merely an accident." Sasha starts muttering as he pours another shot, "Let''s have a drink."'

							if pcs_horny < 50:dynamic $borodachNo

							dynamic $borodachDrink
						end

						act 'Pretend not to notice':
							cla
							if pcs_hydra >= 100:
								pcs_hydra -= 5
							else
								pcs_hydra -= 10
							end
							minut += 15
							pcs_horny += 15 + SUB
							gs 'stat'
							'You continue on as usual, trying not to pay attention to it, since it was only a casual touch. Sasha pours more vodka and says, "The second shot always tastes better." as he takes another quaff.'
							if pcs_horny < 50:dynamic $borodachNo
							dynamic $borodachDrink
						end
					end
				end
			end
		end
	end

	if clener >= 10 and clenerT = 0:
		act 'Ask for more work':
			cla
			'You ask Boris Ivanovich whether he has more work for you. He says that he needs a cleaner to clean the toilets. You''ll be almost able to work every day. Cleaning toilets for an hour earns you 65 <b>₽</b> upfront.'

			act 'Refuse and leave': minut += 5 & gt 'street'

			act 'Accept':
				cla
				clenerT = 1
				'You agree to work as a cleaner.'

				act 'Leave':gt 'clener', 'start'
			end
		end
	end

	if clener = 1:
		act 'Ask about available jobs':
			cla
			'You head into the office that advertised the job. You see a large man in a jacket sitting there. He tells you can clean the Office for 65 <b>₽</b> per hour, payed upfront.'

			act 'Refuse and leave': minut += 5 & gt 'street'

			act 'Accept':
				cla
				clener = 2
				'You agree to work as a cleaner.'

				act 'Leave':gt 'clener', 'start'
			end
		end
	end

	if clener > 1 and clenday ! daystart:
		act 'Mop the floor in the office for 65 <b>₽</b> (1:00)':
			cla
			*clr
			clenday = daystart
			minut += 60
			clener += 1
			pcs_mood -= 15
			money += 65
			pcs_sweat += 20
			'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener1.jpg"></center>'

			if clener < 5:
				if hour >= 9 and hour <= 16:'You fill a bucket of water and head over to the office with a mop. The office staff keeps out of the way while you clean the floor.'
			elseif clener >= 5 and clener < 10:
				if hour >= 9 and hour <= 16:
					jouryQw += 1
					'You fill a bucket of water and head over to the office with a mop. The office staff keeps out of the way while you clean the floor. One of the office workers, a man with blond hair and a red face looks at you and tries to hide it, but you can feel his burning gaze.'
				end
			elseif clener >= 10:
				if hour >= 9 and hour <= 16 and jouryQw < 7:
					jouryQw += 1
					'You fill a bucket of water and head over  to the office with a mop. The office staff keeps out of the way while you clean the floor. One of the office workers, a man with blond hair and a red face looks at you and tries to hide it, but you can feel his burning gaze.'
				elseif jouryQw = 7 and hour >= 9 and hour <= 16:
					cls
					gs 'stat'
					jouryQw += 1
					'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener1.jpg"></center>'
					'You fill a bucket of water and head over to the office with a mop. All the staff are out of the office, except for a red faced blond man. He walks up to you visibly nervous and quietly says, "Hi. My name Yuri. And I think I''m in love with you... Can we meet and do something after work?"'

					act 'No':
						cla
						jouryQwNo = 1
						'You look angerly at him, "No, I don''t mix business with pleasure..." Yuri looks dejected as he moves away from you.'
						'As you''ve finished, you head over to Boris Ivanovich''s office. He gives you 65 <b>₽</b> for the work.'

						act 'Leave':gt 'clener', 'start'
					end

					act 'Yes':
						cla
						minut += 15
						gs 'stat'
						'You smile and nod. Yuri says that he''s just about to finish and will meet you at the entrance of the building.'
						'As you''ve finished, you head over to Boris Ivanovich''s office. He gives you 65 <b>₽</b> for the work.'
						'As you leave, you notice Yuri awiting you. He''s pretty nervous and it seems as if he doesn''t know what to do. Not knowing what to say, he blurts out, "How about we head over to my place, watch some movies, drink champagne and talk."'

						act 'No':jouryQwNo = 1 & gt 'clener', 'start'

						act 'Go with Yuri':gt 'youry', 'quest'
					end

					exit
				end

				if jouryQw > 7 and hour >= 9 and hour <= 16 and jourySex = 0:'You fill a bucket of water and head over to the office with a mop. The office staff keeps out of the way while you clean the floor. Yuri looks at you studying every inch of your figure.'
				if jouryQw > 7 and hour >= 9 and hour <= 16 and jourySex > 0:'You fill a bucket of water and head over to the office with a mop. The office staff keeps out of the way while you clean the floor. Yuri pretends not to notice you in the office.'
			end

			if hour < 9 or hour > 16:'The office is empty of people, you quietly wash the floor and wipe the floor in the office.'

			'As you''ve finished, you head over to Boris Ivanovich''s office. He gives you 65 <b>₽</b> for the work.'

			act 'Leave':gt 'clener', 'start'
		end
	end

	if clenerT >= 1 and clendayT ! daystart:
		act 'Clean toilets for 65 <b>₽</b> (1:00)':
			cla
			*clr
			clendayT = daystart
			minut += 60
			clenerT += 1
			pcs_mood -= 25
			money += 65
			pcs_sweat += 30
			'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener2.jpg"></center>'

			if jouryQw > 7 and hour >= 9 and hour <= 16 and jourySex > 0 and jouryResult = 0:
				'You enter a booth and begin scrubbing the toilet bowl. The toilet door slams as somebody comes in, you turn around and see Yuri standing there. He, quickly comes over to you, "<<$pcs_nickname>>, don''t approach me at the office, well, you know, I don''t want the rest of the office to gossip about me seeing the cleaner."'

				act 'You''re ashamed of me?':
					cla
					'You let go off your cleaning stuff and look straight into Yuri''s eyes, asking him, "Are you ashamed of me?"'
					'Yuri stammers, "I-I''m not embarrassed by you being a cleaner, but you must understand, I''m a manager, and you''re the cleaning lady. We must not be seen together. But I want you to keep seeing you. You know where I live, come by my place after 16:00."'

					act 'Fuck you':
						cla
						pcs_dom += 1
						jouryResult = 1
						'You''re offended by his behaviour and without any hesitation you tell Yuri to go to hell. He quickly turns and walks away.'
						'You continue on by mopping the floor and polish the toilets and urinals. You are given 65 <b>₽</b> for your work.'

						act 'Leave':gt 'clener', 'start'
					end

					act 'Okay.':
						cla
						sub += 1
						jouryResult = 10
						'Yuri only sees you as a simple fuck whore. But you''re willing to put up with it and agree to visit him afterwards. Yuri nods in satisfaction and leaves the toilet.'
						'You continue on by mopping the floor and polish the toilets and urinals. You are given 65 <b>₽</b> for your work.'

						act 'Leave':gt 'clener', 'start'
					end
				end

				exit
			end

			if StasikValera > 0 and SVqw = 0:
				'You clean the toilet and all of a sudden you hear the toilet door as someone walks in, as you turn around you see a man. To your surprise, it is Stasik, with him is his friend Valera that you''ve met at the beach. Stasik also apparently recognizes you, walking up to you, "Hi <<$pcs_nickname>>, you work here as a cleaner?"'

				act 'Explain':
					cls
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener2.jpg"></center>'
					'Shrugging, you say, "I need the money. So I''ll do whatever it takes."'
					'Stasik smiles, "Well, an attractive girl as you shouldn''t work a job like this, I can find a decent part-time job instead."'

					act 'Further':
						cls
						SVqw = 1
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener2.jpg"></center>'
						'You ask him about the details. Stasik tells you, "It''s very simple. In the northern, central and residential areas there are supermarkets. You come to our office to find out what your assignment is, then you visit all the three stores and arrange our products there, making changes according to the assignment. At the checkout you take a receipt confirming that you''ve been to work."' 
						'"Afterwards, you head back to our office and we will pay you. How does 500 <b>₽</b> sound for a few hours work? No hard labour, what do you say?"'

						act 'Not interested':gt 'clener', 'start'

						act 'Accept':
							cls
							SVqw = 2
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener2.jpg"></center>'
							'You grin and nod acceptingly, Stas nods confirming the deal, and after that walks out of the toilet.'

							act 'Leave':gt 'clener', 'start'
						end
					end
				end

				exit
			end

			'You wash the floor and polish all the booths and urinals. You are given 65 <b>₽</b> for your work.'

			act 'Leave':gt 'clener', 'start'
		end
	end

	act 'Leave': minut += 5 & gt 'street'
end

--- clener ---------------------------------