glife/locations/burgerWork.qsrc

# burgerWork

!!Anatoly Borisovich Director
!!smart girl HR Manager, personnel department
!!manager Ivan, player, ILO and brave guy
!!Deputy manager, pimply boy, son of the owner bystroezhki


if $ARGS[0] = 'start':
	if hour < 10:hour = 10 & minut = 0 & PersSecWorkTimes += 1

	gs 'BurgerTip'
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/work.jpg"></center>'
	'You sit in front of Anatoly Borisovich''s office.'

	if hour < 17:
		act 'Work before lunch':
			cls
			PSBBtimes = 1
			minut += 60 * 2
			!!gs 'BurgerTip'
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/work.jpg"></center>'
			'You sit at the table and begin to prepare the agreement on the computer.'

			if TerminalPapper = 1:
				TerminalPapper = 0
				kosiakBU += 1
				'Anatoly Borisovich scolds you for not getting documents to the storage terminal, disrupting supplies.'
			elseif TerminalPapper = 2:
				TerminalPapper = 0
				'Anatoly Borisovich thanks you for delivering the documents to the storage terminal.'
			end
			if BankPapper = 1:
				BankPapper = 0
				kosiakBU += 1
				'Anatoly Borisovich chastises you for not taking the documents to the bank.'
			elseif BankPapper = 2:
				BankPapper = 0
				'Anatoly Borisovich thanks you for delivering the documents to the bank.'
			end

			if BuSWworkEnd = 1 or kompromatBlackMail = 1:
				'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':
					cls
					work = 0
					PersSecWork = 2
					Pay = PersSecWorkTimes * 1250
					PersSecWorkTimes = 0
					money += Pay
					gs 'stat'
					'You write a statement of resignation and quickly get it signed by your boss. He writes out a paycheck of <<pay>> <b>₽</b> to you says, "It''s over <<$pcs_nickname>>, get out of here."'

					act 'Leave':gt 'down'
				end

				exit
			end

			gs 'BurgerTip', 'work'
			act 'Lunch':gt 'burgerWork', 'work'
		end
	end
end

if $ARGS[0] = 'work':
	gs 'food', 'f_food'
	act 'Work':gt 'burgerWork', 'work3'
end

if $ARGS[0] = 'work2':
	cls
	gs 'stat'

	if kompromatBlackMail >= 6 and ivanFilmBJ > 0:
		kobl = 0
		kobl2 = 2
	elseif kompromatBlackMail >= 6 and ivanFilmBJ = 0:
		kobl = 0
		kobl2 = 2
	elseif kompromatBlackMail < 6:
		kobl = 0
		kobl2 = 1
	end

	komblrand = rand(kobl, kobl2)

	if kompromatBlackMail >= 2:
		if komblrand = 0:
			'After work, you are about to leave the bistro, but Ivan stops you. "Where are you going, baby? Want to suck my dick?"'

			act 'Agree':
				cls
				gs 'boyStat', 'A76'
				sexpartkno = 1
				spafinloc = 12
				gs 'cum_manage'
				swallow += 1
				kompromatBlackMail += 1
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/city/ivan/sex/ivanbj.jpg"></center>'
				'Ivan 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 Ivan and take his penis in your mouth. It tastes salty and unwashed. You start to suck actively trying to make Ivan finish as quickly as possible. Finally Ivan 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, Ivan 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 'down'
			end

			act 'Refuse':gt 'BurgerTip', 'work4'
		elseif komblrand = 1:
			'After work, you are about to leave the bistro, but Ivan stops you. "Where are you going, baby? Want to suck my dick?"'

			act 'Agree':
				cls
				gs 'boyStat', 'A76'
				sexpartkno = 1
				spafinloc = 12
				gs 'cum_manage'
				swallow += 1
				kompromatBlackMail += 1
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/city/ivan/sex/ivanbjcar.jpg"></center>'
				'Ivan takes you to his car standing in the alley. He gets behind the wheel and you sit next to him. Ivan 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 Ivan would be finished quickly. Ivan''s body finally jerks and he finishes in your mouth. You continue to suck his dick swallowing the sperm without spilling a drop. Ivan 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 'down'
			end

			act 'Refuse':gt 'BurgerTip', 'work4'
		elseif komblrand = 2:
			'After work, you are about to leave the bistro, but Ivan stops you. "Where are you going, baby? Want to suck my dick?"'

			act 'Agree':
				cls
				kompromatBlackMail += 1
				minut += 5
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/city/shared/car.jpg"></center>'
				'Ivan takes you to his car standing in the alley. He gets behind the wheel and you sit next to him. Ivan 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, Ivan parks his car in a free space. You get out and go with Ivan to a staircase. The lift takes you up to Ivan''s apartment and he opens the door for you. Without hesitation Ivan takes you by the hand and leads you to his bedroom. He sits down on the bed and takes out a camera. Ivan 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':
					cls
					ivanFilmBJ += 1
					
					gs 'arousal', 'bj', 5, 'sub'
					gs 'stat'
					
					'<center><img <<$set_imgh>> src="images/characters/city/ivan/sex/ivanbjfilm.jpg"></center>'
					'You get down on your knees in front of Ivan and clasp his member with your <<$liptalk3>>. Ivan 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':
						cls
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/characters/city/ivan/sex/ivanbjfilm2.jpg"></center>'
						'Sitting on top of you Ivan starts to fuck your mouth sticking is member in your throat as far as possible. You suck diligently trying not to choke as Ivan 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':
							cls
							minut += 5
							facial += 1
							gs 'boyStat', 'A76'
							sexpartkno = 1
							spafinloc = 11
							gs 'cum_manage'
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/characters/city/ivan/sex/ivanbjfilm3.jpg"></center>'
							'Ivan begins to finish on your <<$liptalk3>>. Cum drips from your lips on your chin and chest. Ivan 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 'nord'
						end
					end
				end

				act 'Refuse':gt 'BurgerTip', 'work4'
			end

			act 'Refuse':gt 'BurgerTip', 'work4'
		end

		!!if komblrand = 3:''

		exit
	end

	gt 'burger', 'start'
end

if $ARGS[0] = 'work3':
	cls
	PSBBtimes = 2
	minut += 30
	minut += 60 * 3
	!!gs 'BurgerTip'
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/work.jpg"></center>'

	'You sit down and start preparing the contract on the computer.'
	gs 'BurgerTip', 'work'
	act 'Leave work':gt 'burgerWork', 'work2'
end

--- burgerWork ---------------------------------