glife/locations/kafe

# kafe
if $ARGS[0] = 'start':
	$metkaM = $ARGS[0]
	$locM = $CURLOC
    $location_type = 'public_indoors'
	CLOSE ALL
	if sound = 0:PLAY 'sound/cafe.mp3',30
	cla
	*clr
	minut += 1
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	clr
	gs 'stat'
	gs 'kit_din'
	'<center><b><font color="maroon">Cafe</font></b></center>'
	'<center><img src="images/etogame/kafe.jpg"></center>'
	'You see <a href="exec:gt ''kafe'', ''vlad''">the owner of the cafe</a> dealing with paperwork.'
	'Lunch - 100 <b>₽</b>'

	if QWdogReiq = 3 and week = 7 and hour >= 12:
		act 'Sit down at the table and wait for a Margarita':gt 'kafe2', 'margo'
	end

	!!act 'Agree':gt 'cafe3', 'wc'

	if money >= 100:
		act 'Eat (100 <b>₽</b>)':
			money -= 100
			gs 'food', 'dyn_meal'

			razvrand = rand(1, 10)

			if razvrand > 5:
				gs 'boy'
				'A man comes over to your table <<$boybody>> <<$boybod>> <<$boyface>> introducing himself as <<$boydesc>>.'
				xgt 'kafe', 'razvod'
			end

			act 'Get up from the table':gt 'kafe', 'start'
		end
	end

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'vlad':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><b><font color="maroon">Cafe</font></b></center>'
	'<center><img src="images/etogame/kafe.jpg"></center>'

	if givi = 0:'At the end of the counter sits a short, but very broad caucasian, he''s writing something.'
	if givi > 0:'At the end of the counter sits the owner of the cafe, Givi K. He''s writing something.'

	if workKafe = 0:
		if GiviSex >= 2 and Givisexday < 1 and Venera < 4:
			act 'Have some fun with Givi':
				cla
				*clr
				Givisexday = 1
				GiviSex += 1
				'<center><img src="images/etogame/kafe.jpg"></center>'
				'You go behind the counter to Givi and tell him you want to do something.'
				'"Wow, <<$pcs_nickname>> you must be so bored!" says Givi K. unbuttoning his pants.'

				act 'To kneel':
					cla
					*clr
					stat['bj'] += 1
					harakBoy = 2
					minut += 30
					gs 'boyStat', 41
					SUB += 1
					'<center><img src="images/picva/barbj.jpg"></center>'
					'You bend down so the customers can''t see you behind the bar and kneel before Givi, as he takes out his member.'
					gs 'oral', 'start'
					'Givis grabs you by the hair and pulls your mouth deeply on to his cock.'

					act 'Continue to suck.':
						cla
						*clr
						swallow += 1
						spafinloc = 12
						gs 'cum_manage'
						money += 500
						'<center><img src="images/picv/swallow1.jpg"></center>'
						'A hot jet of sperm hits the back of your throat. You start to swallow his cum, and <<$boydesc>> continues to cum in your mouth. Finally the flow of hot, pungent liquid stops.'
						'"Best waitress, ever!" Says Givi as he gives you 500 <b>₽</b>.'

						act 'Leave':gt 'kafe', 'start'
					end
				end
			end
		end
	else
		if GiviSex >= 2 and Givisexday < 1 and Venera < 4:
			act 'Have some fun with Givi':
				cla
				*clr
				Givisexday = 1
				GiviSex += 1
				'<center><img src="images/etogame/kafe.jpg"></center>'
				'You go behind the counter to Givi and tell him his paperwork will be much easier after taking a break.'
				'"Have I got something you want?" asks K. Givi not interested in your answer. He takes you by the hand.'

				act 'Kneel':
					cla
					*clr
					smenaKafe += 1
					stat['bj'] += 1
					harakBoy = 2
					minut += 30
					gs 'boyStat', 41
					SUB += 1
					'<center><img src="images/picva/barbj.jpg"></center>'
					'You bend down so the customers can''t see you behind the bar and kneel before Givi, as he takes out his member'
					gs 'oral', 'start'
					'Givis grabs you by the hair and pulls your mouth deeply on to his cock.'

					act 'Continue to suck.':
						cla
						*clr
						swallow += 1
						spafinloc = 12
gs 'cum_manage'
						'<center><img src="images/picv/swallow1.jpg"></center>'
						'A hot jet of sperm hits the back of your throat. You start to swallow cum, and <<$boydesc>> continues to cum in your mouth. Finally the flow of hot, pungent liquid stops.'

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

		act 'Resign':
			cla
			work = 0
			workKafe = 0
			pay = smenaKafe * 600
			money += pay
			smenaKafe = 0
			'Givi Karapetovich sadly shakes his head, "Okay, here''s your <<pay>> <b>₽</b> and employment history. Go."'

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

	if workKafe > 0 and week > 1 and week < 5:'Hi, <<$pcs_nickname>>. Skipping work?'
	if workKafe > 0 and week > 4:'Well, hello <<$pcs_nickname>>!'
	if givi = 1 and workKafe < 1:'He looks up waiting for you to speak.'

	if givi = 0:
		givi = 1
		'Hello! I''m Givi Karapetovich, owner of the cafe. What do you want?'
	end

	if (work = 0 and workKafe = 0 and cheatWork = 0) or (workKafe = 0 and cheatWork = 1):
		act 'Apply for a job at the cafe.':
			cla
			'<br>You ask if Givi has any job openings at the cafe.'

			if hotcat < 1:'No no no, you would scare all the customers away. You need to improve your appearance, try better clothing, use makeup, brush your hair. You look just terrible.'

			if hotcat >= 1:
				'<br>Givi K. examines you from head to toe. "Okay, these are the working conditions."'
				'<br>"The cafe is open from 12 to 22 every day, except Monday. You work on Tuesdays, Wednesdays and Thursdays. Come to the café between 11 to 12, before opening. If you do not come to work, that day will not count towards your salary. Salary is paid on the 25th of each month and for each shift you earn 600 <b>₽</b>. Plus whatever you can get as tips, that depends on you. Also you''ll get free meals."'
				'<br>"Oh, and I''ll take your work book, you can not apply for another job while working here. Well? Interested?"'

				act 'Take the job':
					cla
					work = 1
					workKafe = 1
					smenaKafe = 0
					'<br>You give Givi your work book. He takes it and reminds you. "Come to work every Tuesday, Wednesday and Thursday, somewhere between 11 to 12."'

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

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

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

if $ARGS[0] = 'work':
    $location_type = 'event'
	cla
	*clr
	minut += 5
	gs 'stat'
	smenaKafe += 1
	'<center><b><font color="maroon">Cafe</font></b></center>'
	'<center><img src="images/etogame/kafe.jpg"></center>'
	'You have arrived for work at the cafe, Givi K. writes in a book that you came to work on time and stands behind the bar. The kitchen cook is a sturdy young caucasian, Ashot. Another waitress Irina is preparing for work. Tamara the dishwasher is cleaning the sink.'

	act 'Start work':
		cla
		minut = 0
		hour = 12
		Givi += rand(5, 10)
		gt 'kafe', 'workPred'
	end

	act 'Resign':
		cla
		work = 0
		workKafe = 0
		pay = smenaKafe * 600
		money += pay
		smenaKafe = 0
		'Givi Karapetovich sadly shakes his head, "Okay, here''s your <<pay>> <b>₽</b> and employment history. Go."'

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

if $ARGS[0] = 'workPred':
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	$metka = $ARGS[0]
	$loc = $CURLOC
    $location_type = 'event'
	cls
	gs 'kit_din'
	gs 'stat'
	'<center><b><font color="maroon">Cafe</font></b></center>'
	'<center><img src="images/etogame/kafe.jpg"></center>'
	'You''re at work in the café, the cook <a href="exec:gt ''kafe2'', ''ashot''">Ashot</a> is busy in the kitchen. Your fellow server <a href="exec:gt ''kafe2'', ''ira''">Ira</a> waits tables with customers. The owner <a href="exec:gt ''kafe2'', ''givi''">Givi K.</a> is standing behind the bar.'
	'A small door leads to the <a href="exec:gt ''kafe2'', ''toilet''">toilets</a>.'

	if Givi > 100:Givi = 100
	if Givi > 90 and GiviSex = 0:Givi = 90

	if IrinaSlut = 1 and hour = 22:
		cls
		IrinaSlut = 2
		gs 'stat'
		'<center><b><font color="maroon">Cafe</font></b></center>'
		'<center><img src="images/etogame/kafe.jpg"></center>'
		'Your shift has finished and Ira has disappeared somewhere. Looking around you see that Givi is nowhere to be seen. Tamara has slipped out the door, and Ashot is putting the dishes away.'

		act 'Search for missing Ira':
			cls
			pcs_horny += 10
			gs 'stat'
			'<center><img src="images/pickav/irinaslut.jpg"></center>'
			'You walk to the back room from as a pleased looking Givi emerges, fastening his belt. He smiles at you and says, "What a good whore you found me. Help cleaning her up. After what she has done this guy does not have anything left."'
			'You go into the back room and see Irina there bent over. Sperm is sprayed all over her naked butt. Ira blissfully moans "Such a thrill, I'' ve never done something this naughty before."'

			act 'Clean Ira and take her home':
				cla
				minut += 15
				gs 'stat'
				'Taking a napkin you wipe the cum from her ass, help her to feet and sort her out. Ira, regaining her senses, looks at you with a beatific smile "That Givi is chock-bellied ugly, but he fucked me like I''ve never been fucked before. I even lost consciousness from an orgasm."'
				'Ira is still floating in ecstasy, so you decide to walk her home. At her front door, she kisses you on the lips and leaves.'

				act 'Go home':gt 'street'
			end

			if pcs_horny >= 50:
				act 'Lick off her "problem"':
					cls
					pcs_horny += 10
					minut += 15
					spafinloc = 12
					gs 'cum_manage'
					gs 'stat'
					'<center><img src="images/pickav/irinaslut2.jpg"></center>'
					'You kneel behind Ira, her reddening holes telling you she has just been fucked in her pussy and ass. You begin to lick up the sperm.'
					'Ira moans, "Oh, it''s so nice, why was I afraid of this before?"'

					act 'Swallow sperm and take Ira home':
						cla
						minut += 15
						sub += 1
						swallow += 1
						gs 'stat'
						'You swallow the sperm, help her to her feet and sort her out. Ira, regaining her senses, looks to you with a beatific smile "That Givi is chock-bellied ugly, but he fucked me like I''ve never been fucked before. I even lost consciousness from an orgasm."'
						'Ira is still floating in ecstasy, so you decide to walk her home. At her front door, she kisses you on the lips and leaves.'

						act 'Go home':gt 'street'
					end

					act 'Spit sperm into her mouth':
						cls
						minut += 5
						pcs_dom += 1
						gs 'stat'
						'<center><img src="images/pickav/irinaslut3.jpg"></center>'
						'You take Iras head in your hands and lift her face to yours. She readily opens her mouth and you spit the sperm into it.'

						act 'Kiss':
							cls
							sub += 1
							gs 'stat'
							'<center><img src="images/pickav/irinaslut4.jpg"></center>'
							'You move your lips to Ira and start kissing her exchanging the sperm between your mouths. Finally you both swallow some of the semen.'

							act 'Take Ira home':
								cla
								minut += 15
								gs 'stat'
								'You wipe the remaining sperm off your face, help her to her feet and sort her out. Ira,regaining her senses, looks to you with a beatific smile "That Givi is chock-bellied ugly, but he fucked me like I''ve never been fucked before. I even lost consciousness from an orgasm."'
								'Ira is still floating in ecstasy, so you decide to walk her home. At her front door, she kisses you on the lips and leaves.'

								act 'Go home':gt 'street'
							end
						end

						act 'Take Ira home':
							cla
							minut += 15
							pcs_dom += 1
							swallow += 1
							gs 'stat'
							'You wiped the remnants of sperm off your face, help her to feet and sort her out. Ira, regaining her senses, looks to you with a beatific smile "That Givi is chock-bellied ugly, but he fucked me like I''ve never been fucked before. I even lost consciousness from an orgasm."'
							'Ira is still floating in ecstasy, so you decide to walk her home. At her front door, she kisses you on the lips and leaves.'

							act 'Go home':gt 'street'
						end
					end
				end
			end
		end

		exit
	end

	if hour < 22:
		act 'Serve tables':
			cls
			minut += 30
			pcs_mood -= 5
			znarand = rand(0, 1200)
			chai = rand(0, pcs_apprnc/4 + pcs_servng/2)

			if pcs_servng < 100:servng_exp += 1
			if pcs_vital < 30:vital_exp += 1 + (steroid_dose - rand(0,steroid_dose)) & gs 'obj_din', 'steroids'

			money += chai

			if chai = 0:pcs_willpwr -= 5 & pcs_mood -= 15

			pcs_mood -= 5
			gs 'stat'
			'<center><img src="images/pickav/waitress_client.jpg"></center>'
			'You serve customers at a table and receive <<chai>> <b>₽</b> as tip.'

			act 'Move away':gt 'kafe', 'workPred'

			if znarand > pcs_apprnc or bfA > 0:
				kaferand = rand(0, 100)

				if kaferand = 0:
					cls
					gs 'stat'
					'<center><img src="images/img/spaln/kafe1.jpg"></center>'
					'Serving a table at one of the private booths you see two men seducing a pretty drunk girl. Pretty soon she is on her knees sucking on both of their cocks. One of the men is looking at you with a clear invitation to join them.'

					act 'Leave':gt 'kafe', 'workPred'

					if daystart > 10 and stat['vaginal'] > 0:
						act 'Join them':
							kafesexrand = 1
							picrand = 13
							guy += 2
							girl += 1
							gang += 1
							xgt 'sexdvanadva', 'var'
						end
					end
				elseif kaferand = 1:
					cls
					gs 'stat'
					gs 'npcgeneratec', 0, 'Customer', rand(18,40)
					gs 'boyStat', $npclastgenerated
					$boy[0] = $boy
					gs 'npcgeneratec', 0, 'Customer', rand(18,40)
					$boy[1] = $npclastgenerated
					'<center><img src="images/img/spaln/kafe2.jpg"></center>'
					'You serve a table in the attic, with two men. Each time you come by they try to pinch or slap your butt, or run their hands under your skirt.'

					act 'Leave':gt 'kafe', 'workPred'

					if daystart > 10 and stat['vaginal'] > 0:
						act 'Succumb':
							kafesexrand = 1
							picrand = 17
							guy += 2
							xgt 'sexdvoe', 'var'
						end
					end
				elseif kaferand = 2 and pcs_apprnc > 60:
					cls
					'<center><img src="images/pickav/waitress_client.jpg"></center>'
					'At the table in a separate room sits a man. He looks at you appreciatively and says, "Girl, want to keep me company?" You notice the bulge in his trousers, he''s obviously aroused.'

					act 'Leave':gt 'kafe', 'workPred'

					act 'Sit down next to him':
						cls
						'You sit down next to the client. And look at him waiting for what he would do. He takes your hand and puts it on his crotch.'

						act 'Leave':gt 'kafe', 'workPred'

						if pcs_horny >= 50 or stat['bj'] > 0:
							act 'Unbutton his pants':
								cls
								dick = rand(12, 21)
								gs 'stat'
								'<center><img src="images/pickav/waitress_work_2.jpg"></center>'
								'You undo his pants and hold the warm and hard <<dick>> cm cock, covered with veins and a small drop of crimson on the head.'

								act 'Masturbate him':
									cls
									boy += 1
									stat['hj'] += 1
									money += 500
									gs 'stat'
									'<center><img src="images/pickav/waitress_work_hj.jpg"></center>'
									'Clasping your fingers around his member you start to masturbate him, the man fairly quickly groans and discharges on your hand. Then you wipe his penis with a tissue and he gives you 500 <b>₽</b> for your work.'

									act 'Leave':gt 'kafe', 'workPred'
								end

								act 'Suck his dick':
									cls
									boy += 1
									stat['bj'] += 1
									gs 'stat'
									'<center><img src="images/pickav/waitress_work_bj.jpg"></center>'
									dynamic $dinrandbj

									act 'Take the sperm in your mouth':
										cls
										spafinloc = 12
										gs 'cum_manage'
										money += 700
										gs 'stat'
										'<center><img src="images/pickav/waitress_work_bj2.jpg"></center>'
										dynamic $dinrandswallow

										act 'Leave':gt 'kafe', 'workPred'
									end
								end
							end
						end
					end
				elseif kaferand = 3 and pcs_apprnc > 60:
					cls
					'<center><img src="images/pickav/waitress_client.jpg"></center>'
					'At the table in a separate room sits a man. He looked appreciatively at you and says, "Girl, can you help? I have prepared a great tip for you, but accidentally dropped it under the table. And I myself have eaten too much so that I can no longer bend down..." you notice he is undoing the fly on his trousers, his intention is obvious.'
					act 'Leave':gt 'kafe', 'workPred'

					act 'Crawl under the table':
						cls
						gs 'stat'
						'<center><img src="images/pickav/waitress_work_3_1.jpg"></center>'
						'"Well, now." You reply.'
						'You could do with the tip and getting onto all fours, you climb under the table. You do find a 500 ruble note there, but when you reach for it, the mans shoe lowers onto the edge of it. He unzips his pants, pulls out his penis and points at it.'

						act 'Leave':gt 'kafe', 'workPred'

						if pcs_horny >= 50 or stat['bj'] > 0:
							act 'Suck':
								cls
								stat['bj'] += 1
								guy += 1
								gs 'stat'
								'<center><img src="images/pickav/waitress_work_3_2.jpg"></center>'
								'You knew there was no such thing as a free lunch.'
								'Still, you need these five hundred <b>₽</b>, so you take his cock in your hand and guide it straight into your mouth. The next five minutes, you carefully lick and suck it. Finally, the customer makes several short jerky movements with his hips and starts to pour hot cum into your mouth.'

								act '....':
									cls
									spafinloc = 12
gs 'cum_manage'
									spafinloc = 11
gs 'cum_manage'
									money += 500
									gs 'stat'
									'<center><img src="images/pickav/waitress_work_3_3.jpg"></center>'
									'Filling your mouth to the brim, he takes his foot off the cash and you are finally able to pick it up.'

									act 'Leave':gt 'kafe', 'workPred'
								end
							end
						end
					end
				elseif kaferand = 4:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand.jpg"></center>'
					'Going into one of the booths you see a girl leaning over a guy sucking him.'

					act 'Tactfully leave':
						cls
						money += 300
						gs 'stat'
						'You tactfully leave the booth, and after a couple of minutes they leave you a 300 <b>₽</b> tip.'

						act 'Leave':gt 'kafe', 'workPred'
					end

					act 'Break it up':
						cls
						gs 'stat'
						'You indignantly declare that the cafe is not a brothel and people are trying to eat in here.'
						iverand = rand(0, 2)

						if iverand = 0:'The guy calls you a bitch and he and his girlfriend quickly leave the cafe without leaving a tip.'
						if iverand = 1:'The guy says you are a fucking whore and calls you frigid, finishes in his girlfriends mouth and leaves without leaving a tip.'

						if iverand = 2:
							'The guy gets out a 500 ruble bill, "For your discretion."'

							act 'Expel them':gt 'kafe', 'workPred'

							act 'Discreetly leave':
								cls
								money += 500
								gs 'stat'
								'You take the money and leave the couple to their own devices.'

								act 'Leave':gt 'kafe', 'workPred'
							end
						end

						act 'Leave':gt 'kafe', 'workPred'
					end

					if stat['bj'] > 10 and swallow > 5 and pcs_horny >= 50:
						act 'Giggle flirtatiously':
							cls
							gs 'stat'
							'The girl looks up from the penis and waves her hand inviting you to join.'

							act 'Tactfully leave':
								cls
								money += 300
								gs 'stat'
								'You tactfully leave the booth, and after a couple of minutes they leave you a 300 <b>₽</b> tip.'

								act 'Leave':gt 'kafe', 'workPred'
							end

							act 'Kneel before the guy':
								cls
								stat['bj'] += 1

								if SergeaAndKatjaSex = 0:SergeaAndKatjaSex = 1 & guy += 1

								gs 'stat'
								'<center><img src="images/pickav/ivrandbj.jpg"></center>'
								'You kneel down and start to suck his dick. You and the girl both work enthusiastically on his erect cock, kissing each other in the process.'

								act '....':
									cls
									spafinloc = 12
									gs 'cum_manage'
									spafinloc = 11
									gs 'cum_manage'
									gs 'stat'
									'<center><img src="images/pickav/ivrandcum.jpg"></center>'
									'Finally the stimulation is too much for the guy. Hot sperm gets into your mouth and a little on your face. You and the Girl lick the dick until it''s nice and clean.'

									if SergeaAndKatjaQW = 0:
										SergeaAndKatjaQW = 1
										'After the blowjob the guy introduces himself, "I am Sergei and this is Katja. I didn''t know such a hot waitresses worked here."'
									end

									act 'Leave':gt 'kafe', 'workPred'
								end
							end
						end
					end
				elseif kaferand = 5:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand.jpg"></center>'
					'Serving tables you accidentally notice as a girl is leaning over and blowing her boyfriend.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 6:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand3.jpg"></center>'
					'Going into one of the stalls you see a couple of girls sitting there. One of them is on her knees licking the others vagina.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 7:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand4.jpg"></center>'
					'Passing the dance floor where teens mess around you see one drunken girl sitting on her haunches sucking cock.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 8:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand5.jpg"></center>'
					'Walking past the bar you see a girl squatting down, sucking some guys dick as he drinks beer ..'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 9:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand6.jpg"></center>'
					'Going into one of the stalls you see that there is a cheerful company of young people and one of the beautiful girls is being fucked doggy style right in front of the table.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 10:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand7.jpg"></center>'
					'On the dance floor girls are dancing and having fun.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 11:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand8.jpg"></center>'
					'You see how the two drunken girls unashamedly kiss each other passionately.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 12:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand9.jpg"></center>'
					'You see a drunk girl crawl under the table like she has lost something. As she hikes up her skirt you can see she is not wearing panties. Almost all of the cafe can see everything.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 13:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand10.jpg"></center>'
					'You see as a drunken couple playing with each other. The girl licks his cock and the guy is pouring champagne into her mouth.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 14:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand11.jpg"></center>'
					'You happen to notice that a couple of fun chatting girls are not only chatting, but one of the girls put her hand into her friends panties and caresses her girlfriend there.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 15:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand12.jpg"></center>'
					'You see a girl on the dance floor dancing and being groped. Her skirt is slowly being lifted, but the girl apparently does not mind.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 16:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand13.jpg"></center>'
					'Going into one of the stalls you see guys playing cards with some girls. It looks like they are losing at strip-poker sitting in their underwear.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 17:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand14.jpg"></center>'
					'You see two guys dancing with a girl touching her everywhere and lifting her skirt. The girl reacts by laughing without even trying to cover up how much the rest of the customers are staring.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 18:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand15.jpg"></center>'
					'You see how a guy on the dance floor kisses a girl and runs his hand under her skirt practically fucking her with his fingers through her panties.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 19:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand16.jpg"></center>'
					'You see a drunk girl, legs spread, skirt hitched and no panties as a cheerful young man fucks her pussy with his fingers.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 20:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand17.jpg"></center>'
					'You see a guy hugging a drunken girl. He takes a mouthful of beer and pours it into her mouth with a kiss as a second guy massages her boobs.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 21:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand18.jpg"></center>'
					'Going into the attic you see two guys on either end of a girl who sucks cock as her bare ass wiggles with the second man fucking her as deeply as possible.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 22:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand19.jpg"></center>'
					'You see a young girl on the dance floor practically dancing in her underwear with a young guy groping her.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 23:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand20.jpg"></center>'
					'You see two young guys bending a girl over and miming sex with her, all laughing hysterically.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 24:
					cls
					pcs_horny += 5
					gs 'stat'
					'<center><img src="images/pickav/ivrand21.jpg"></center>'
					'Going into one of the stalls you see a man licking a girl''s pussy in front of some other guy as she is lying on her back and catching a buzz from smoking a cigarette.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand >= 90 and (opusk > 0 or gnewQW = 5) and pirsA = 0:
					cls
					pirsA = 1
					! WD: Unused ~ 'pirsday'
					! pirsday = day
					'<center><img src="images/pc/body/piercings/pirsa.jpg"></center>'
					'You are called to one of the clients, you go to the table and notice that in front of you are the real criminals.'
					'When you get to the table, the leader tells you to come closer to him. As soon as you do, you are grabbed very hard and painfully by the neck.'
					'The leader tells you, "Bitch, open your mouth." You obediently open your mouth, he looks back at you and slaps you very hard. "I do not see a pierced tongue. Whores should wear piercings so that a decent person can immediately understand what they are."'
					'The leader turns to his mobsters and tells them it is necessary to fix you. At the same moment you are grabbed and strong arms carry you out of the cafe, you are thrown into the back seat of the jeep and it drives off.'
					'The drive is not very long, riding up to what looks like a jail, the jeep honks and gates open soundlessly. The jeep pulls up by the territory cottages. A strong man drags you out of the car and into the basement.'
					'The basement has all the tools set out ready. You sit on a chair and a heavily tattooed orangutan comes up to you with a clip and a pair of scissors, he pull your tongue out of your mouth and pierces it with lightning speed. Into the bleeding wound in your tonuge he attaches a small bar.'
					'Damn, it''s very painful. You moan with your tongue hanging out, the bandits laughing at your pain. Finally your tongue is freed. Tears roll down your cheeks as the bandits escort you out of the cottages.'

					act 'Go home':gt 'street'
				elseif kaferand > 25 and (opusk > 0 or gnewQW = 5) and pirsA ! 0 and hour >= 12 and hour <= 19:
					cls
					'The Mob boss beckons you to his table. You approached him with trembling knees.''He looks at you like a boa constrictor at a rabbit and says, "Whore, open your mouth." You open your mouth obediently and quickly stick out your tongue.'
					if pirsA = 2:
						pirsA = 1
						'The leader asks you where your tongue piercing is. You produce it from your pocket and shakily manage to fit it and screw it tight.'
					end
					'The leader takes you by the face and you freeze under his piercing gaze. "All the same, good job guys. Okay whore, get under the table and entertain me."'

					act 'Get under the table':
						cla

						if glavar = 0:glavar = 1 & guy += 1

						stat['bj'] += 1
						spafinloc = 11
						gs 'cum_manage'
						'<center><img src="images/pics/glavarbj.jpg"></center>'
						'You obediently crawl under the table and pull out the leader''s penis from his pants. Dutifully you caress it with your tongue and start sucking.'
						'The ringleader, as if made of stone, did not flinch a muscle as he empties his his balls into your mouth.'
						horand = rand(1, 100)

						if horand > pcs_horny:pcs_horny += 10 & 'You were not satisfied'
						if horand <= pcs_horny:pcs_horny = 0 & orgasm += 1 & 'You orgasm'

						'You swallow all his sperm and suck him dry.'

						act 'return to work':gt 'kafe', 'workPred'
					end
				end
			elseif znarand <= pcs_apprnc and bfA <= 0:
				cls
				gs 'boy'
				'<center><img src="images/pickav/waitress_client.jpg"></center>'
				'At the table sits a <<$boybody>> <<$boybod>> <<$boyface>> guy. He is <<$boyClo>>'
				'You take his order, and when you bring him the bill, he asks if he could meet you.'

				act 'No':
					cla
					money += 10
					'The man is angry he leaves you a 10 <b>₽</b> tip and goes.'

					act 'Move away':gt 'kafe', 'workPred'
				end

				if bfA <= 0 or bfB = 0 or bfC = 0:
					act 'Yes':
						cla
						money += 100
						gs 'boyfrend', 'start'
						stopboy = 0
						'The man is glad that you do not mind dating him. He introduces himself as <<$boydesc>> and asks for your phone number, promising to call you back tomorrow.'
						'Then he leaves you a hundred <b>₽</b> tip and goes.'

						act 'Move away':gt 'kafe', 'workPred'
					end
				end
			end
		end
	end

	if hour >= 22:
		act 'Finish shift and go home':
			cla

			if GiviSex = 0 and Givi < 90 or pcs_apprnc < 0:
				'Givi nods his head at you, "Goodbye, <<$pcs_nickname>>."'

				act 'Leave':
					cla
					minut += 5
					gt 'kafeend'
				end
			else
				gt 'kafe2', 'givipredlog'
			end
		end
	end
end

if $ARGS[0] = 'razvod':
    $location_type = 'event'
	cla
	!!*clr
	!!act 'Get up from the table':gt 'kafe', 'start'
	deyst = rand(0, 3)

	if deyst = 0:
		'<<$boydesc>> invites you to dance.'

		act 'Dance':gt 'cafe2', 'dance'

		if pcs_horny < 75:
			act 'Leave':gt 'street'
		end
	elseif deyst = 1:
		'<<$boydesc>> asks permission to sit down at the same table as you.'

		act 'Drink':gt 'cafe2', 'booze'

		if pcs_horny < 75:
			act 'Leave':gt 'street'
		end
	elseif deyst = 2:
		'<<$boydesc>> invites you to a nearby party which he is going to.'
		act 'Agree':gt 'cafe2', 'kompashka'

		if pcs_horny < 75:
			act 'Leave':gt 'street'
		end
	elseif deyst = 3:
		'<<$boydesc>> is incredibly drunk and you feel tipsy just from the smell of booze on him. "Hey baby, got some spare time? Come have fun in the outhouse."'

		act 'Agree':gt 'cafe3', 'toilet'

		if pcs_horny < 95:
			act 'Leave':
				cla
				derand = rand(0, 400)

				if derand < pcs_apprnc:
					'"Come on, baby, I will give you two thousand <b>₽</b>. Daddy wants to have fun."'

					act 'Agree':
						money += 2000
						gt 'cafe3', 'toilet'
					end
				else
					'"Well, okay, get out of here, you are ugly anyway."'
				end

				act 'Fuck you':gt 'street'
			end
		end
	end
end

--- kafe ---------------------------------