glife/locations/qwBarPolet

# qwBarPolet

minut += 5
gs 'stat'
if night_mode = 1:
	fcolor = rgb(255, 255, 255)
	bcolor = rgb(0, 0, 0)
	lcolor = rgb(106, 90, 205)
else
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
end

if $ARGS[0] = '':
	if MartinTalkDaystart ! daystart:
		MartinTalkDaystart = daystart
		MartinTalkDay = 0
	end

	'<center><b><font color="maroon">Bar "Rabotnik"</font></b></center>'

!!	if hour >= 10:
!!		'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/bar.jpg"></center>'
!!		'As you enter, you see that about a dozen regular tables and stools take up most of the room. A bar counter, right in front of you, dominates the center of the establishment. At the far end of it, near a door leading to the toilet, the obligatory pool table rounds off the furniture.'
!!		'This place has a rowdy air about itself: The smell of spilled beer, schnaps, and a hint of vomit and blood are hard to miss, and some of the stools and billiard cues look like they''ve been used in fights before. It is obviously a worker pub and not trying to be anything fancier than that, but that gives it an odd charm and coziness of its own.'
!!		*nl
!!		'Even at this early hour, a few patrons are sitting at the bar, drowning their sorrows, indulging in their alcohol addiction, or nursing a hangover with the very thing that caused it in the first place.' 
!!		'The bartender, a burly man with a scarred face and more tattoos than you can count, doesn''t look particularly sympathetic at first glance, but he seems to be talking to some of the guys and only begrudgingly fills their glasses back up again.'
!!		'He looks up when he hears you open the door and gives you a look somewhere between surprise, curiosity and intimidation, but then continues talking to a drunk guy who just started sobbing.'
!!		'It takes you only a moment to realize that women probably don''t come here often.'
	if hour >= 16:
		'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/bar.jpg"></center>'
		'As you enter, you see that about a dozen regular tables and stools take up most of the room. A bar counter, right in front of you, dominates the center of the establishment. At the far end of it, near a door leading to the toilet, the obligatory pool table rounds off the furniture.'
		'This place has a rowdy air about itself: The smell of spilled beer, schnaps, and a hint of vomit and blood are hard to miss, and some of the stools and billiard cues look like they''ve been used in fights before. It is obviously a worker pub and not trying to be anything fancier than that, but that gives it an odd charm and coziness of its own.'
		*nl
		'The bar is filling rapidly as people get off work in the surrounding factories, looking to get a beer with their friends before heading home or to get piss drunk to get their mind off their problems.'
		'The bartender, a burly man with a scarred face and more tattoos than you can count, greets most of the men by name as they come in and prepares their drinks before they have even reached reached the counter.'
		if knowMartin = 0:
			'He, along with some of the regulars, shoot you a quick glance and you realize that young women are probably a rare sight around here. You spot a handful of women, spread out over all the occupied tables, but judging by how they are treated, most of the men they''re with seem to see them as "one of the guys".'
		end

	elseif hour >= 21:
		'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/bar.jpg"></center>'
		'As you enter, you see that about a dozen regular tables and stools take up most of the room. A bar counter, right in front of you, dominates the center of the establishment. At the far end of it, near a door leading to the toilet, the obligatory pool table rounds off the furniture.'
		'This place has a rowdy air about itself: The smell of spilled beer, schnaps, and a hint of vomit and blood are hard to miss, and some of the stools and billiard cues look like they''ve been used in fights before. It is obviously a worker pub and not trying to be anything fancier than that, but that gives it an odd charm and coziness of its own.'
		*nl
		'Even though there aren''t too many people here, the place is fairly loud, most of the noise being produced by the two groups of young guys playing billiard; most of the men at the bar are quietly drinking though, talking among themselves.'
		'The bartender, a burly man with a scarred face and more tattoos than you can count, pays little attention to you, absorbed in a conversation with two of his regulars.'
		if knowMartin = 0:
			'He, along with some of the regulars, shoot you a quick glance and you realize that young women are probably a rare sight around here. You spot a handful of women, spread out over all the occupied tables, but judging by how they are treated, most of the men they''re with seem to see them as "one of the guys".'
		end
	elseif hour >= 0: 
		'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/bar.jpg"></center>'
		'The bar is quickly emptying as its owner is telling the patrons that he''s closing for the night. After a while, only those who are too drunk to wake up on their own remain as the bartender starts closing up shop. Guess you had better head out, too.'
	end

	if hour >= 16:
		if money >= 5:
			act 'Order a beer (5 <b>₽</b>)':
				cla
				*clr
				'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/bar.jpg"></center>'
				'You go to the counter, sit down on one of the stools and, when the bartender notices you, ask: "Hey, could you bring me a beer?"'
				if knowMartin = 1:
					money -= 5
					minut += 15
					alko += 2
					MartinRand = RAND(1,7)
					
					if alko >= 6:
						*nl
						'Martin musters you. "I think you''ve had enough."'
						'"I''m fine", you slur, "just gimme one."'
						'"You can barely stand-up straight, <<$pcs_firstname>>. And I sure as hell don''t want a young woman like yourself to pass out in my bar. Go home, or at least sober up a bit."'
						'With that, he turns and walks off to serve somebody else. Looks like he won''t let you drink yourself into a coma.'
						act 'Give up for now': gt 'qwBarPolet'
					
					!![if alko >= 7, Martin will not give you another drink (unless somebody else is ordering it?)]

					elseif MartinTalkDay = 0 and MartinTalkVar < 7:
						MartinTalkDay = 1
						MartinRel += 1
						!Replace MartinRel with npc_rel[] format?
						gt 'qwBarPolet', 'MartinTalk'
					
					elseif MartinRand <= 2:
						gt 'qwBarPolet', 'RandomDrinkEvents'

					elseif MartinRand <= 4:
						if alko <= 5:
							gt 'qwBarPolet', 'SoberEncounters'
						else
							gt 'qwBarPolet', 'DrunkEncounters'
						end
					else
						*nl
						'"Sure, <<$pcs_firstname>>, coming right up", Martin says, draws a beer for you and hands it to you.'
						'"Thanks, Martin", you say and give him a friendly smile before he returns to what he was doing.'
						'You spend the next 15 minutes drinking your beer in peace as you reflect the events of the day, think about your life and the people in it... until you finish your beverage with one last gulp.'
						act 'Finish your beer': gt 'qwBarPolet'
						![RANDOM EVENTS (Friendly strangers or friends/acquaintances inviting Sveta to have beer or something else with them)?]
				
					end
					
				elseif fakepassport = 1 or age >= 18:
					knowMartin = 1
					money -= 5
					minut += 15
					alko += 2
					*nl
					'The bartender comes over and musters you. "Sure. If you are old enough."'
					'You are surprised that someone in a bar like this seems interested in that, and it must have shown in your face, because he adds: "I have enough things to worry about as is. I don''t need somebody spreading the word that I''m selling alcohol to kids."'
					'Nodding, you take out your ID and show it to him. He eyes it suspiciously and gives you a stern look... but then nods, hands it back to you and draws a cold beer which he places in front of you.'
					'"What''s your name, girl?", he asks.'
					'"<<$pcs_firstname>>", you reply truthfully, taking a small sip from your beverage.'
					'"Okay, <<$pcs_firstname>>. My name is Martin. This is my bar, and I don''t want any trouble here." You notice a faint accent you cannot quite place - maybe Spanish? "I know most people who come here by name, and most of them are good men, but we are a rowdy bunch and we tend to act more stupid than usual when women are around."'
					'"So... you don''t want me to come here again?", you ask carefully.'
					'"No, it means that, if you want to spend time here, I don''t want you doing anything stupid so I don''t have to step in." His words and look almost make you feel like a daughter being scolded by her father, but his voice softens a little as he continues: "But if any of the guys gives you trouble, you just let me know. Got it?"'
					'You nod, and he gives you a hint of smile - it amazes you how that gruff face lights up as he does - before Martin returns to the regulars he had been talking to.'
					'You spend the next 15 minutes pondering his words and the impression he has left on you, absentmindedly nursing on your beer until you notice that your glass is empty.'
					act 'Finish your beer': gt 'qwBarPolet'
				
				else
					*nl
					'The bartender comes over and musters you. "Sure. If you are old enough."'
					'You are surprised that someone in a bar like this seems interested in that, and it must have shown in your face, because he adds: "I have enough things to worry about as is. I don''t need somebody spreading the word that I sell alcohol to kids."'
					'"Um...", you try to maintain eye contact with him but eventually look down, "I, uh, must have forgotten my ID at home. Couldn''t you-"'
					'"No, I can''t", he cuts you off. "No ID, no alcohol."'
					act 'Nod and give up': gt 'qwBarPolet'
					![RANDOM EVENTS (Strangers inviting her to have beer or something else with them, but overall friendly/consensual tone)?]
				end
			end
		end

		if money >= 5:
			act 'Order a shot of vodka (5 <b>₽</b>)':
				cla
				*clr
				'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/bar.jpg"></center>'
				'You go to the counter, sit down on one of the stools and, when the bartender notices you, ask: "Can I have a shot of vodka?"'
				if knowMartin = 1:
					money -= 5
					minut += 5
					alko += 2
					MartinRand = RAND(1,7)
					
					if alko >= 6:
						*nl
						'Martin musters you. "I think you''ve had enough."'
						'"I''m fine", you slur, "just gimme one."'
						'"You can barely stand-up straight, <<$pcs_firstname>>. And I sure as hell don''t want a young woman like yourself to pass out in my bar. Go home, or at least sober up a bit."'
						'With that, he turns and walks off to serve somebody else. Looks like he won''t let you drink yourself into a coma.'
						act 'Give up for now': gt 'qwBarPolet'
					
					![if alko >= 7, Martin will not give you another drink (unless somebody else is ordering it?)]

					elseif MartinTalkDay = 0 and MartinTalkVar < 7:
						MartinTalkDay = 1
						MartinRel += 1
						!Replace MartinRel with npc_rel[] format?
						gt 'qwBarPolet', 'MartinTalk'
					
					elseif MartinRand <= 2:
						gt 'qwBarPolet', 'RandomDrinkEvents'

					elseif MartinRand <= 4:
						if alko <= 5:
							gt 'qwBarPolet', 'SoberEncounters'
						else
							gt 'qwBarPolet', 'DrunkEncounters'
						end
					else
						*nl
						'"Sure, <<$pcs_firstname>>, coming right up", Martin says, pours a shot and hands it to you.'
						'"Thanks, Martin", you say and give him a friendly smile before he returns to what he was doing.'
						'You slam back the vodka, enjoying the burning sensation it leaves in your throat, and spend a few minutes looking around the bar and letting your mind drift aimlessly as the alcohol takes effect.'
						act 'Finish up': gt 'qwBarPolet'
								
					end
					
				elseif fakepassport = 1 or age >= 18:
					knowMartin = 1
					money -= 5
					minut += 5
					alko += 2
					*nl
					'The bartender comes over and musters you. "Sure. If you are old enough."'
					'You are surprised that someone in a bar like this seems interested in that, and it must have shown in your face, because he adds: "I have enough things to worry about as is. I don''t need somebody spreading the word that I''m selling alcohol to kids."'
					'Nodding, you take out your ID and show it to him. He eyes it suspiciously and gives you a stern look... but then nods, hands it back to you, takes an ice-cold bottle of vodka out of the fridge and pours you a shot.'
					'"What''s your name, girl?", he asks.'
					'"<<$pcs_firstname>>", you reply truthfully, taking the small glass into your hand.'
					'"Okay, <<$pcs_firstname>>. My name is Martin. This is my bar, and I don''t want any trouble here." You notice a faint accent you cannot quite place - maybe Spanish? "I know most people who come here by name, and most of them are good men, but we are a rowdy bunch and we tend to act more stupid than usual when women are around."'
					'"So... you don''t want me to come here again?", you ask carefully.'
					'"No, it means that, if you want to spend time here, I don''t want you doing anything stupid so I don''t have to step in." His words and look almost make you feel like a daughter being scolded by her father, but his voice softens a little as he continues: "But if any of the guys gives you trouble, you just let me know. Got it?"'
					'You nod, and he gives you a hint of smile - it amazes you how that gruff face lights up as he does - before Martin returns to the regulars he had been talking to.'
					'You spend the next 5 minutes pondering his words and the impression he has left on you - you are so caught up in your thoughts that you almost forgot the alcohol in your glass, so you slam it back in one gulp, feeling the cold liquid run down your throat, leaving only a burning sensation in your throat.'
					act 'Finish up': gt 'qwBarPolet'
				
				else
					*nl
					'The bartender comes over and musters you. "Sure. If you are old enough."'
					'You are surprised that someone in a bar like this seems interested in that, and it must have shown in your face, because he adds: "I have enough things to worry about as is. I don''t need somebody spreading the word that I sell alcohol to kids."'
					'"Um...", you try to maintain eye contact with him but eventually look down, "I, uh, must have forgotten my ID at home. Couldn''t you-"'
					'"No, I can''t", he cuts you off. "No ID, no alcohol."'
					act 'Nod and give up': gt 'qwBarPolet'
					![Events where Sveta interacts with random guys, resulting in drunk sex, groping etc. when drinking vodka?]
				end
			end
		end

		act 'Go to the toilet': gt 'qwBarPoletToilet'
	end
!! 'Look around the bar' action to find people to interact with/who will invite her to a drink?

!!Extra act and events for post office personnel?

!!Run-in with Martin at the gym?
					
	!Replace MartinRel with npc_rel[] format?		
	!if MartinRel > threshold (10? 20? 30?)
	![Relationship stat for Martin - advances as Sveta converses with him and he saves her from people who want to rape her; once it reaches a threshold (10? 20?), sexual events with him become available]
	if hour < 16 and MartinRel > 7:
		'With the bar closed, Martin is cleaning up, taking stock and doing whatever else he has to do to keep the place running smoothly. Since you are more or less alone with him, now might be the perfect time to talk to him in private...'
	end
		
	act 'Leave':gt 'nord'
end

if $ARGS[0] = 'RandomDrinkEvents':
	*nl
	
	!DrinkingRand ALWAYS NEEDS TO BE ADJUSTED FOR NEW EVENTS!!!
	
	!Pictures for these events?
	
	DrinkingRand = RAND(1,9)
	
	if DrinkingRand = 1:
		'Martin nods and prepares your beverage. While he does, you hear voices swell behind you and turn to find their source. It would seem that two other patrons - workmates, if their identical, dusty work overalls are any indication - have had a little too much too drink and are now arguing loudly over who has been bumming more cigarettes off whom.'
		'They get on their feet, apparently looking to settle the matter their alcohol-addled brains brought up once and for all, just as Martin puts the glass with your beverage down in front of you.'
		'He seems completely unfazed by this disruption of the bar''s peace as he steps out from behind the counter, his burly, muscular build more impressive out in the open room, and you don''t seem to be alone with that assessment: The few whose attention hadn''t been captured by the loud voices now cease whatever they are doing, the room eerily silent except for Martin''s voice: "Artur, Grisha," he calls the two.'
		'They slowly turn their heads toward him and it seems to dawn on them who is speaking to them. It''s astonishing, really: One moment, they are pumped up and ready to go at each other, and the next, they seem to physically deflate.'
		'Martin doesn''t utter another word at them - he doesn''t have to. The two slowly sit back down, careful to avoid the bartender''s gaze as much as each other''s.'
		'Satisfied with this outcome, Martin nods. "No more drinks for the two of you tonight," he declares before turning around to resume his post.'
		'Within seconds, the bar''s volume is back to its normal level, laughter and smutty jokes filling the air.'
		'While you enjoy your drink, you briefly wonder why Martin didn''t just throw them out, but then you notice that the Artur and Grigori are talking to each other again and then burst into laughter. Looks like the bartender knows his regulars.'
		act 'Finish your drink': gt 'qwBarPolet'
	
	elseif DrinkingRand = 2:
		'Martin nods and prepares your beverage, then places it in front of you.'
		'"Thank you," you smile at him and earn a half-smile in return before he leaves you to yourself.'
		*nl
		'With nobody to talk to, your eyes drift around the bar until they come to rest on a nearby table where the patrons are playing poker. More specifically, you are looking right into the hand of one of the players, and he seems to have four jacks.'
		'Curious as to how this turns out (or maybe just for lack of better entertainment), you watch as one of the other players folds while the remaining three raise each other until their pot contains some 50 rubles.'
		'The other two look confident. One reveals three queens... and curses loudly when the second puts down a full house, a smug grin on his face. You don''t know what expression ''your'' guy had when he placed his four jacks on the table, but seeing the grin wiped off the second player''s face almost makes it feel like you sat at the table with them.'
		'Feeling victorious (and a little lonely), you focus your attention on your beverage again while the card players sets up their next round.'
		act 'Finish your drink': gt 'qwBarPolet'
	
	elseif DrinkingRand = 3:
		'"Sure," Martin nods and a few seconds later, your beverage sits in front of you. You give him a grateful smile as he directs his attention at the other patrons and, since you lack a partner to converse with, focus on your drink and let your mind wander.'
		'A movement at the edge of your sight catches your eye; at first, you think your bored mind conjured up sexy images to distract you, but no, even while you''re consciously looking at it, the scene doesn''t vanish: In a corner of the bar, a woman is on her knees in front of some guy and giving him a blowjob.'
		*nl
		'The boldness of this display causes you to give Martin a quick glance - he''d probably throw them out if he noticed - but he seems occupied with one of his regulars, and it works in the couple''s favor that they''re getting busy in a dead angle of the room, which means that Martin can''t readily see them... but everybody else can.'
		'And sure enough, as the probably drunk girl fellates her obviously drunk partner, some of the guys around them get restless. One or two even pull out their own dicks, but their advances are quickly shot down by both lovebirds.'
		'They don''t seem to mind the attention, though: He makes a point of grabbing her head and driving his dick deep down this pretty woman''s throat while giving the bystanders superior looks; and she seems to be getting off on the exposure and his displays of dominance, since the hand under her skirt is just as busy as the one she''s stroking his shaft with.'
		*nl
		'Either you missed most of it or he doesn''t last very long, but before you know it, the bobs of her head and work of her tongue cause him to tense up and shiver, suppressed groans reaching your ear as he blasts hot cum into her waiting mouth, causing the hand on her cunt to go crazy. She releases him and gulps visibly - cheer breaks out among the people around them. The two of them smile at their audience without even a hint of embarrassment.'
		'The woman''s smile is quickly replaced by lust and determination, though, and as soon as she''s back on her feet, she grabs her man''s hand and drags him out of the bar, probably off to get hers.'
		act 'Finish your drink': gt 'qwBarPolet'
		
	elseif DrinkingRand = 4:
		'"Coming right up." Only seconds later, Martin puts down a full glass in front of you before directing his attention elsewhere.'
		'As you forlornly muster the liquid, one of the many conversations in the bar piques your interest.'
		*nl
		'"-and then the guy just straight-up fingered that women, right there in the metro," one man narrates.'
		'His friend seems more than a little sceptical. "You''re fucking with me!"'
		'"No, and they didn''t fuck either, but the guy <i>did</i> push her down on her knees and got her to blow him."'
		'"Come on, shit like that doesn''t really happen here."'
		'"Oh no, it does," a third one confirms. "The metro''s full of perverts these days. And so are the trains: I caught a glimpse of a couple fucking in one of the compartments."'
		'"Damn... I wish my girl would let me do something like that with her."'
		'"Yeah, mine doesn''t want to, either," the first one laughs, "but at least this way the sluts around town are making my way home more interesting."'
		'The third one raises his glass. "To sluts!" The other two join in, down their drinks and order another round while the first describes another public exposure he has witnessed.'
		act 'Finish your drink': gt 'qwBarPolet'
	
	elseif DrinkingRand = 5:
		if pcs_horny < 90: pcs_horny += 10
		'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/event1.jpg"></center>'
		'"Coming right up." Only seconds later, Martin puts down a full glass in front of you before directing his attention elsewhere.'
		*nl
		'While sitting at the bar drinking, you notice a couple getting hot and heavy near you, whispering and fondling with little concern for possible onlookers; another girl seems to notice as well.'
		'After observing the couple for only a few moments, you watch wih arousal as the man shoves his hand down the pants of the woman, obviously stroking her pussy or finger-banging her - you can''t tell which one but the circumstances make it exciting nonetheless. Meanwhile, she is all smiles and coos, and melts into him as he plays with her, enjoying the explicit PDA. You might have thought she''d forgotten all about where she was if she hadn''t, at one point, met your eyes and subsequently bucked against her man''s hand as her lust spiked.'
		'But as time went by, more and more patrons noticed the couple and it bordered on a miracle that Martin hadn''t seen them yet, so after a while, she whispers something into his ear - something that puts a shit-eating grin on his face - and they both hurry to the restroom...'
		act 'Finish your drink': gt 'qwBarPolet'
	
	elseif DrinkingRand = 6:	
		if pcs_horny < 90: pcs_horny += 10
		'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/event2.jpg"></center>'
		'Martin nods and prepares your beverage, then places it in front of you.'
		'"Thank you," you smile at him and earn a half-smile in return before he leaves you to yourself.'
		*nl
		'While sitting at the bar drinking, you notice a woman flirting with three men. She is obviously fairly drunk but loving the attention she is getting... and getting bold, too: As you watch, she flashes her tits to them, then breaks into a giggle. Not a minute later, she flashes them again, reveling in the hungry looks they are giving her. After flashing them a few more times, they seem to have reached the limit of their self-control and are pawing at her, pulling her clothes aside to show everything she has to the world - neither she, nor the other patrons seem to have a problem with that.' 
		'Not long after, the four of them leave together. That woman has a long night ahead of her, you''d wager.'
		act 'Finish your drink': gt 'qwBarPolet'
		
	elseif DrinkingRand = 7:	
		pcs_mood -= 10
		'"Sure," Martin nods and a few seconds later, your beverage sits in front of you. You give him a grateful smile as he directs his attention at the other patrons and, since you lack a partner to converse with, focus on your drink and let your mind wander.'
		*nl
		'You are shaken from your reverie when an older man sits down next to you. "Drunk" isn''t quite strong enough to describe the state he''s in - it looks like he has to actively keep himself from falling asleep right there and then - and you expect him to start hitting on you, but he doesn''t. Instead, he starts telling you a tale of woe: His "bitch wife" finally left him last week, his "ungrateful kids" refuse to talk to him anymore and he just lost his job today "because of that fuckin'' asshole of a boss"; he slurring most of it but the curses are clearly articulated.' 
		'He talks about how the world has gone to shit and how a man can no longer be a man without someone stepping on him... then starts over, apparently not remembering that he already told you about his "bitch wife". You are genuinely feeling some sympathy for him, but you are also quite happy when he falls unconscious and starts drooling on the counter, right in the middle of the sentence.'
		act 'Finish your drink': gt 'qwBarPolet'
		
	elseif DrinkingRand = 8:	
		'Martin nods and prepares your beverage. While he does, you hear voices swell behind you and turn to find their source.'
		'A group of drunk men sitting at one of the nearby tables are joking loudly and discussing this and that at the top of their voices. Just then, a pretty woman walks by the table and one of the men grabs her and pulls her into his lap. His friends laugh as she struggles to get free.' 
		'"Finally found a woman that''s less ugly than your wife, Egor?"' 
		'Eventually, she slaps him which gets his friends laughing even more: "Haha, and she likes you about as much, too!"' 
		'Egor doesn''t seem to be in a joking mood, though - he raises his hand to slap her back, but before he can, Martin, appearing seemingly out of nowhere, has his wrist is a vice grip and twists the drunk''s arm until he lets the woman go, who quickly hurries away. Egor''s friends start to get up, but one hard look from Martin causes them to reconsider their intentions.' 
		'"Do you want to walk out", he asks menacingly, "or be thrown out?"' 
		'You''re not entirely sure if they are scared of him - though he is undoubtedly very scary - or if they are sober enough to realize that half the men in the bar would rush to his aid if he needed it; whichever it is, they wisely choose to walk out while they still can.' 
		'Shortly after, the bar returns to normal and Martin brings you that drink you''d all but forgotten about.'
		act 'Finish your drink': gt 'qwBarPolet'
		
	elseif DrinkingRand = 9:
		'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/event3.jpg"></center>'
		'"Sure," Martin nods and a few seconds later, your beverage sits in front of you. You give him a grateful smile as he directs his attention at the other patrons and, since you lack a partner to converse with, focus on your drink and let your mind and your eyes wander.'
		*nl
		'You notice an older woman - well, older than you, she''s probably only in her early thirties - who keeps flashing her tits to Martin whenever he looks her way. But other than the occasional smile, he gives no hint of even being aware of her antics. She does catch the attention of several other men, though, and they move over to talk to her.' 
		'She evidently has no interest in them but they don''t take the hint until Martin gives them one of his hard looks. When he does, they suddenly all kinds of important business they immediately have to take care of elsewhere and leave the woman alone.' 
		'Of course, this only encourages her to redouble her efforts in flirting with Martin.'
		act 'Finish your drink': gt 'qwBarPolet'
		
		

!Template for infos	the NPCs give on events, stories and other points of interest in the game
!		'"Coming right up." Only seconds later, Martin puts down a full glass in front of you before directing his attention elsewhere.'
!		'As you forlornly muster the liquid, one of the many conversations in the bar piques your interest.'
!		*nl
!		'BLA BLA BLA'
!		act 'Finish your drink': gt 'qwBarPolet'
	
	
	!Ideas for other random events:
	!-A couple disappearing in the bathroom and coming out disheveled
	!-Martin talking to somebody (and comforting them)
	!-A group talking about work
	!-Talk about prominent npcs 
	!-Talk about ingame locations
	!-Discussing ingame politics (law that you can only have one car, for example) - "I can''t even afford ONE!"
	
	end
end


if $ARGS[0] = 'MartinTalk':
	
	*clr
	cla
	'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/bar.jpg"></center>'
	!!! ALWAYS ADJUST MartinTalkVar THRESHOLD THROUGHOUT LOCATION SO CONVERSATIONS CAN SHOW UP !!!
		
	if MartinTalkVar = 0:
		MartinTalkVar = 1
		'"Sure, <<$pcs_firstname>>, coming right up", Martin says and pours you your drink.'
		'"Thanks, Martin", you say and give him a friendly smile. "Do you mind if I ask you a question?"'
		'He raises an eyebrow but shrugs. "Shoot."'
		'"You''re not originally from Russia, are you?"'
		'A grin cracks the rough surface of his face and lights it up in a way you would have thought impossible. "What gave me away? My skin color? My accent?"'
		'You shake your head apologetically. "Sorry, it was a dumb question."'
		'"Maybe", he agrees, "but you could always try making it less dumb."'
		'"Okay, uh... Where are you from?"'
		'"Ever heard of a place called ''Colombia''?"'
		'"Um... Maybe?" You''ve seen it written on a map somewhere, but your face gives away that, beyond knowing it''s a country, you have no idea.'
		'"Well, let''s just say that it''s not a very nice country to live in, unless you are willing to sell your soul."'
		'"Did you?"'
		'"Did I what?"'
		'"Did you sell your soul?"'
		'Martin is taken aback by your question at first, making you cringe in fear that you might have gone too far... but then he bursts into laughter. "That, mi amor, is a story for another day. Enjoy your drink before it gets warm."'
		'With that, he directs his attention at another visitor of the bar. You notice that you''ve been holding your breath and release it now, glad you didn''t piss him off. Watching Martin from afar, you nurse on your beverage until you find it empty.'
		
		act 'Finish your drink': gt 'qwBarPolet'
	
	elseif MartinTalkVar = 1:
		MartinTalkVar = 2
		'"Of course, <<$pcs_firstname>>," Martin says and hands you your poison of choice.'
		'"Thanks, Martin", you say with a smile. You hesitate for just a moment, then say what''s on your mind, "can I ask you something?"'
		'"You wanna know why I''m here in Russia, don''t you?"'
		'You blush slightly. "Is it that obvious?"'
		'"Yes, it is, but I''m in no mood to tell a girl who practically just walked into my bar about my entire life." Martin''s words and tone may be harsh, but his eyes don''t quite match that. You decide to drop the subject for now, though, in the hopes of satisfying your curiosity at a later date.'
		'"Okay, uh... What do you think about Russia?"'
		'"Your politicians are corrupt, your booze is cheap, your girls are as pretty as they are easy...", he gives you a sleazy grin, "so, it feels just like home."'
		'"I''m not easy", you protest quietly, more to yourself than to Martin.'
		'"Then why are you in a rowdy bar like this?", he counters.'
		'"Maybe I like the atmosphere?"'
		'"Girl, I have built this place from nothing with my own two hands, and I know some of my regulars better than my brothers, love them like brothers too - but nobody comes here for the ''atmosphere''. Not even me."'
		'"They come here to relax after a hard day."'
		'"Yeah."'
		'"To enjoy a drink and maybe to talk a bit."'
		'"I guess," he agrees, unsure where you''re going with this.'
		'"Well, maybe you are part of the atmosphere and don''t give yourself enough credit."'
		'Martin opens his mouth to reply but then musters you quietly for a while. You hold eye contact until you have to blink. A soft smile plays around the edges of his mouth.'
		'"You''re a sly one, aren''t you?"'
		'"I thought I was ''easy''?"'
		'He bursts into laughter. "Maybe you are, maybe you aren''t; but you are alright either way, corazón."'
		'With that, he leaves you to your drink. Minutes pass as you enjoy your beverage, only stopping when you find your glass empty.'
		
		act 'Finish your drink': gt 'qwBarPolet'
		
	elseif MartinTalkVar = 2:
		MartinTalkVar = 3
		'Martin nods and a few seconds later, a drink sits in front of you.'
		'"Thank you."'
		'A few moments pass in silence as he looks at you and you look back. You turn your head here and there but Martin keeps looking at you as if he was waiting for something.'
		'"What?" You break the silence. "What''s wrong?"'
		'"No pestering today? No questions that make me reveal me deepest, darkest secrets?"'
		'"Is that what you were waiting for?" You ask in surprise.'
		'"Yes, actually."'
		'"Uh, okay..." You weren''t prepared for that. "Why ar-," you stop, "Wait, would you actually <b>answer</b> them?"'
		'"Oh no, of course not," he shakes his head with a sly grin, "we barely know each other."'
		'""Then why-," you start but his laughter drowns out the rest of the thought and, you can''t help it, you join him. As gruff and menacing as Martin looks and acts sometimes, it''s good to know that he will your leg and laugh about just like anybody else. His shell may be hard but there''s definitely more to him than that.'
		'And armed with that knowledge, you chat and joke with Martin a while longer before another patron demands attention.'
		
		act 'Finish your drink': gt 'qwBarPolet'
				
	elseif MartinTalkVar = 3:
		MartinTalkVar = 4
		'Martin wordlessly puts your usual drink in front of you, then examines you like he was seeing you for the first time.'
		'"You''re skinny."'
		'"Excuse me?" You are perplexed by his statement.'
		'"Are you eating right, <<$pcs_firstname>>?" He inquires, completely ignoring your visibly confusion.'
		'"Uh... I guess. Wait, you didn''t, by any chance, talk to my mother, did you?"'
		'"Your mother? No no no, mi amor, but I can see that you could use a good meal every now and then - good meat, not the filth they sell you everywhere."'
		'He snorts indignantly and beckons you to lean in closer, lowering his voice conspiratorially.'
		'"Do you know the barbecue here, in the industrial area?"'
		'You try to think of a specific one, but given that there are at least two barbecues in this street alone... "There are many barbecues in the area."'
		'"The one by the lake, I mean. The one that''s a little out of the way."'
		'"I guess?" You''re not sure where he''s going with this.'
		'"That''s the one you should go to. The owners, Eugene and Angela, they are good people. Honest people. Give their place a visit sometime, you won''t regret it."'
		'"Suuure," you say and watch Martin walk off. Do you really look <b>that</b> skinny to him?'
		
		act 'Finish your drink': gt 'qwBarPolet'
	
	elseif MartinTalkVar = 4:
		MartinTalkVar = 5
		'"Sure, <<$pcs_firstname>>." Martin prepares a drink for you and puts it down in front of you.'
		'You smile gratefully and take a gulp. Seeing that Martin sizing you up again, you decide to take the initiative before he starts a conversation as awkward as the last one: "So, uh... Are women in Colombia usually... thickset?"'
		'"Thickset?"'
		'"Yeah, you know... You said I was skinny, so I thought, maybe you are used to women having a lot of... curves."'
		'"Oh," he says, "Yes, women in Colombia tend to have strong hips. Well, most women I know from home are also fairly large in every other respect." He laughs.'
		'"And do you like that?"'
		'"What? When women are fat?"'
		'"... I was going to say ''large'', but... yeah. Do you find that attractive?"'
		'"Not really. I was always more of fan of women who stay in shape."'
		'"Wait, what?" You ask, confused. "But you told me that I was ''skinny'' and that I should ''eat right''."'
		'"Eating right and overeating are two entirely different things, corazón. And I didn''t mean that you were skinny as in ''too thin'', but that you could use a little more mass to work with."'
		'"Are you my bartender or my personal trainer?"'
		'"I can be both," he grins.'
		'"And do you find me attractive?" You ask innocently.'
		'"That''s for me to know and for you to find out, <<$pcs_nickname>>." With that, he turns and leaves you to your drink and thoughts.'
		
		act 'Finish your drink': gt 'qwBarPolet'
	
	elseif MartinTalkVar = 5:
		MartinTalkVar = 6
		'"Of course, <<$pcs_firstname>>," Martin says and prepares your poison of choice. "Here you go."'
		'You give him a friendly smile. "Thanks."'
		'"Just doing my job. Literally," he quips.'
		'"You know... I''ve been wondering: What <b>do</b> you do when you during the day?"'
		'"Would you believe me if I said that I just sit here, behind the bar, until I can open it up again?"'
		'"No, of course not..." You respond a little too quickly.'
		'He gives you a long look. "That''s exactly what you were thinking, wasn''t it?"'
		'"... Maybe."'
		'"I can assure you, I do leave this place every now and then. And no, I don''t just do it to buy more booze."'
		'"Okay, but what do you do?"'
		'"Well, there is this book club I''ve been going to, and I feed the homeless every Thursday." As he speaks, he props his massive, muscular arms up on the counter. "And, oh yeah, I collect flowers in the meadow," he finishes, his sarcasm now unmistakeable. "What do you think?"'
		'"I think that you are pulling my leg."'
		'He recoils in mock-shock. "That you would even <b>suggest</b> that! The insolence!"'
		'You grin at his antics, but your question is still to the point: "Do you do anything besides working out?"'
		'"This and that," he replies, now more serious. "I don''t know what you want to hear, <<$pcs_firstname>>. I don''t run a drug ring or strip club on the side, if that''s what you want to know. Days pass pretty quickly, even when all you do is sleep, work out and go for a walk every now and then."'
		'"You should share that thought at the next book club meeting," you comment dryly.'
		'"I''d rather not. It would only disturb the other housewives," Martin retorts.'
		'You chuckle - it''s strange how these conversations with Martin always take the most extraordinary turns. You know that he doesn''t talk to his other regulars like this. Actually, from what you can tell, it seems like he''s acting different with every one of them, adapting to their character, maybe even to their needs. You suggested it before to him, but now you are really starting to understand why they keep coming here, what they see in this place and its scary-looking owner.' 
		'That thought is what makes you say: "If it''s any consolation: I didn''t think you were running anything bad. I think you''d rather feed the homeless than sell them heroin."'
		'"Maybe I''m just a good actor," he suggests.'
		'"Maybe," you concede, "or maybe there''s actually a nice guy hiding under those muscles and tattoos."'
		'For a fraction of a second, it looks like he is going to say something, but instead he just gives you a warm smile and you respond in kind.'
		
		act 'Finish your drink': gt 'qwBarPolet'
	
	elseif MartinTalkVar = 6:
		MartinTalkVar = 7
		'Martin gives you a nod and before you know it, your beverage sits in front of you. As you grab hold of the glass, the bartender gives you a long look. "So..."'
		'"So...?"'
		'"You''ve been drilling me with questions about my private life," he observes, "and yet you have revealed very little about yourself to me. So, this time, I will be doing a little pestering."'
		'"Oh," you make. It''s not like you were hiding anything from him - you just never really gave him a chance to get a question in, you realize. "Sure, pester away."'
		'"Let''s start with what you asked me last time, then: What do you do when you are not sitting here, drinking my booze and enjoying my company?"'
		if pcs_stren > 60 or pcs_agil > 60:
			'"I enjoy working out," you say with a grin and flex some muscles. "Doesn''t it show?"'
			'Martin laughs. "Oh no, it does. You are a woman after my own heart."'
			'"That''s good to know," you smile.'
		elseif albinaQWdance > 0:
			'"I''m with a dance troupe. We do some shows every now and then, but it''s not that big of a deal."'
			'"Sounds like a lot of work."'
			'"It is," you agree, "but it''s really fulfilling to go on stage, do a routine and earn people''s applause."'
		elseif volleysostav > 0:
			'"I play volleyball in a team. It''s not that big of a deal but it''s a lot of fun."'
			'"Volleyball? I thought that was only played on beaches, on holidays."'
			'"Oh no, it''s actually kind of a big deal here. Well, when you do it professionally, anyway."'
		elseif swinbeggor > 0:
			'"I do some track and field. Something about running just speaks to me, I guess."'
			'"I know what you mean. I used to do some athletics too, when I was young. We used to call it ''running away'' back then," he quips.'
			'"Riiight, thank you for your support."'
		else
			'"Oh, you know, a little bit of everything. Sometimes I work out, sometimes I do some dancing or running or play football, but there''s nothing that I pursue zealously enough to call it a hobby."'
			'"Can''t decide which one suits you best?"'
			'"I guess? Maybe everything suits me just fine. Or perhaps I''m just not interested in one thing in particular, I don''t know."'
			'Martin shakes his head slightly. "I have to say, though, I am somewhat disappointed."'
			'You raise an eyebrow. "Why? Because I don''t have any dark secrets to share?"'
			'"Ah ah ah," Martin admonishes, "just because you didn''t share them, corazón, doesn''t mean you don''t have any."'
			'"Of course, <b>I</b> am the one who has been selling drugs to the homeless all along," you say dramatically.'
			'"Wouldn''t that make for a much better twist than me doing it?"'
			'"Well," you size him up and nod, "yeah, if this was a movie, making you the culprit would be a little too obvious."'
			'The bartender smiles at that, but it doesn''t seem as genuine as before.'
		end

		act 'Finish your drink': gt 'qwBarPolet'
	
	!elseif MartinTalkVar = 7:
	!	MartinTalkVar = 8
	!	'???'
	!	act 'Finish your drink': gt 'qwBarPolet'
	
		!Other conversation topics:
		!-Sveta's job
		!-Something about Colombian culture
		!-More on Martin's hobbies
		!-Sex?
		!-The Reason why Martin lives in Russia (on the run from a Cartel?)
	end
end


if $ARGS[0] = 'SoberEncounters':

!Sober_Enc_Rand ALWAYS NEEDS TO BE ADJUSTED FOR NEW EVENTS!!!

	Sober_Enc_Rand = RAND(1,1)
	
	if Sober_Enc_Rand = 1 and Jaska_Ev = 0:
		*clr
		cla
		'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/Billiard 1.png"></center>'
		minut += 5
		'While you''re sitting idly at the counter, drink in hand, you take a look around the room. After a moment, your attention is pulled to three guys playing pool. Two of them look to be in their mid to late 30s, while the third looks to be in his early 20s. They''re all dressed casually albeit a bit rough looking.'
		*nl
		'With not much else to do, you settle on watching them play, only mildly interested until you see the younger guy pull out a small wad of cash and reluctantly hand it over to the other two.'
		'It looks like they''re playing for money. Maybe they''ll let you join them?'
		
		act 'On second thought...':
			'After a moment, you decide not to join them, and instead go back to your drink. At least that way you can''t lose any money, right?'
			act 'Finish your drink': gt 'qwBarPolet'
		end

		act 'Ask them if you can play':
			*clr
			cla
			'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/Jaska.jpg"></center>'
			'You make your way over to the three of them just as they''re setting up for another round. "Are you guys playing for money?" you ask.'
			'"Not anymore." One of the older guys laughs, flaunting the wad of cash. "We''re done with this dumbass."'
			'The second one chimes in, "I thought you said you got better, Jaska! You still play like shit, and now you''re broke!" He smirks before looking to you. "You''re late, girl. We cleaned him out," he says with a laugh.'
			'Jaska shakes his head and points his pool cue at them. "Yeah yeah, just fuck off already. Go blow your money on cheap whores and booze, like you always do."'
			*nl
			'You watch in silence as the three of them exchange a few more insults before the two older guys gather their things and finally leave. Jaska grabs his glass and finishes off the last bit of alcohol before making his way over to you. He leans against the pool table and looks you up and down. He''s close enough that you can smell a mixture of alcohol, cigarette and a hint of musk.'
			'"I don''t think I''ve seen you around here before," he says after a moment, "What''s your name?"'
			'"<<$pcs_nickname>>," you tell him.'
			'"Right. Well, I''m Jaska, if you didn''t already know." He laughs ruefully, "So, you ever play pool?" You shake your head and Jaska''s face lights up a bit. "Then how about I teach you," he suggests, not really asking as much as telling you.'

			if pcs_billiard < 10:
				act '"Sounds fun"':
					cla
					*nl
					minut += 60
					gs 'stat'
					Jaska_Ev = 1
					'Jaska smiles and hands you his pool cue. You watch him gather the balls into the triangle and set them up in the middle before grabbing another pool cue off the wall. "Alright, since it''s your first time, I won''t bore you with the technical shit, and keep it simple." He says as he moves behind you, his hand on the small of your back as he gently pushes you closer to the table.'
					'"Like this?" You ask, following his lead. You lean down low to the table and allow yourself to be moved this way and that way by Jaska. Before you know it, an hour has passed and he tells you that you''ve got the basics down, even going as far as to say you could probably beat some of the regulars.'
					*nl
					'"Well, that''s all I got time to teach you," Jaska says, glancing down at his watch. He grabs his worn-out leather jacket and slips it on. "Next time, we''ll play for real!" He says before pausing, "There will be a next, right?"'
					'"Of course. Just make sure you have your wallet ready,” you tease. He laughs before saying one last goodbye and walking out the door.'
					act 'Return to the bar': gt 'qwBarPolet'
				end
			else
				act 'I already know how to play':
					cla
					*nl
					Jaska_Ev = 1
					minut += 60
					gs 'stat'
					'"I already know to how play," you say with a smile.'
					'Jaska looks a bit surprised, "Oh yeah? Then what are we waiting for, lets play." He says, handing you a pool cue. The two of you spend an hour playing together, and you find that you really enjoy his company, even though he''s absolutely terrible at pool.'
					*nl
					'"No wonder you lost all your money," you tease as you clear the table and beat him again. "How many times have I won now?"'
					'"Don''t get cocky." He says as he playfully pushes you aside so he can set up again. "I''m just going easy on you." He starts to set up, but pauses when he looks at his watch. "Damn."'
					'"What''s wrong?" You ask.'
					'Jaska sighs, "Well, as much as I like being beaten by you, I''ve gotta go." He sets down the pool cue and slips on his worn-out leather jacket. "How about we play again some other time?"'
					'"Just make sure you have your wallet ready," you tease. Jaska laughs before saying one last goodbye and leaving.'
					act 'Return to the bar': gt 'qwBarPolet'
				end
			end
		end
		
	!elseif Sober_Enc_Rand = 1:
	
	else
		cla
		*nl
		minut += 5
		'While you are sitting at the bar and having your drink, a guy who''s slightly older than you - in his mid- or maybe late twenties - sits down next to you and orders himself a drink. After a few minutes of silently nursing on your respective drinks, he starts chatting you up and offers to buy you a drink.'
		act 'Decline':
			cla
			*nl
			'You shake your head no and decline the offered drink, letting him know you can buy your own. "But thanks anyways."' 
			'He doesn''t seem too disappointed, though. He remains polite and chats with you for a few more minutes before getting up and leaving you to yourself.'
			
			act 'Finish your drink': gt 'qwBarPolet'
		end
			
		act 'Accept':
			cla
			*nl
			alko += 2
			minut += 5
			'You smile at him and accept his offer. He buys you another drink and as you drink it, the two of you chat some more about everything and nothing. Eventually he asks you if you would like to go play pool with him.'
			act 'Decline':
				cla
				*nl
				minut += 30
				'You decline the offer with a laugh.' 
				'"After the drinks I''ve had, you''d have it too easy", you joke, to which he responds with a broad laughter.' 
				'But the two of you sit and talk for another half a hour before he says needs to get going.'
				'"I wouldn''t mind seeing you again, though," he smiles before leaving.'
				
				act 'Finish your drink': gt 'qwBarPolet'
			end
				
			act 'Challange accepted':
				cls
				'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/pool/pool1.jpg"></center>'
				minut += 30
				gs 'stat'
				pcs_billiard += rand(1,3)
				'You agree to go play pool with him and he leads you to the side area where the lone pool table sits, deserted and in sore need of use.' 
				'Your new acquaintance racks them up and lets you go first. It is a very close game: You both start off slow; he takes the lead for most of the game, seemingly effortlessly pocketing one ball after the other, but then towards the end he seems to be having trouble even hitting the ones he was aiming for and more than once accidentally sets up easy shots for you. You catch up, take the lead and, with a final good shot, you beat him.' 
				'He curses his luck and points out that he "almost had you."' 
				'"Well, it''s not really worth much when you ''almost'' win the lottery or ''almost'' had an orgasm," you say with a grin.'
				'"True," he laughs. "How about you give me a chance to actually win? A rematch? And now that we know what we''re up against, we could make it more interesting by playing for money."'
				'"How much?", you ask.'
				'"I don''t know... 5,000 rubels?"'
				
				act 'Decline':
					cla
					*nl
					'You shake you head no.'
					'"That''s a lot of money for a friendly match, so I think I''m gonna pass. I should get going soon anyway."'
					'He seems slightly disappointed but quickly recovers: "Well, it was fun while it lasted."'
					'"Yeah, it was," you agree, "thank you for the game and the drink."'
					'"See you around," he says, and you return to the main room.'
					
					act 'Return to the bar': gt 'qwBarPolet'
				end
				
				if money > 5000:
					act 'Accept':
						cla
						*nl
						'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/pool/pool2.jpg"></center>'
						billard_ev_var = 1
						'"Alright, let''s play."'
						'You open your purse and pull out enough money to lay it down on the table. He grins, racks up the balls and lets you break again as he lays his money down on top of yours.'
						gt 'qwBarPolet', 'billiard'
					end
				end
				
				if money < 5000 or pcs_int >= 60 or pcs_persuas >=60:
					act 'Tell him you don''t have that kind of money':
						cla
						*nl
						'You shrug slightly and tell him you don''t have that much money on you. He nods in understanding, then looks around a bit before leaning in close. "We can play for something else, you know..."'
						'You look at him suspiciously. "Like what?"'
						'He gives you a relaxed, friendly smile. "If you win, you get the money. And if I win, you give me a blow job. Sound fair?"'
					
						if city_slut < 75 and (pcs_dom >= 20 or (pcs_exhibition < 20 and alko < 5) or pcs_horny < 30):
							act 'Not that kind of girl':
								cla
								*nl
								pcs_dom += 1
								'You shake your head and glare at him.'
								'"Do I look like some sort of cheap whore to you?"'
								'You don''t even give him time to respond - you simply turn on your heel and walk back to the main room.'
							
								act 'Return to the bar': gt 'qwBarPolet'
							end
						end
					
						act 'I don''t think so':
							cla
							*nl
							'The thought of making a wager that might end up with you sucking some random guy''s cock doesn''t really bother you in and of itself, but you are not really interest in it either.' 
							'Deciding against it, you tell him: "I think I''ll pass today. Thank you for the drink, though."' 
							'He seems to notice that you don''t seem angry or even put off, so he smiles and simply says, "See you around," before you leave.'
						
							act 'Return to the bar': gt 'qwBarPolet'
						end
						
						act 'You''re on':
							cla
							*nl
							'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/pool/pool2.jpg"></center>'
							billard_ev_var = 2
							'<i>I can take him</i>, you think to yourself, <i>and even if I can''t, it''s just a blow job.</i>' 
							'With that in mind, you nod your head and tell him he''s on.'
							gt 'qwBarPolet', 'billiard'
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'DrunkEncounters':

!Drunk_Enc_Rand ALWAYS NEEDS TO BE ADJUSTED FOR NEW EVENTS!!!

	Drunk_Enc_Rand = RAND(1,1)
	
	if Drunk_Enc_Rand = 1:
		cls
		gs 'stat'
		gs 'npcgeneratec', 0, 'stranger', rand(18,35)
		gs 'boyStat', $npclastgenerated
		
		'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/bargrind1.jpg"></center>'
		'Martin nods and prepares your beverage, then places it in front of you.'
		'"Thank you," you smile at him and earn a half-smile in return before he leaves you to yourself.'
		*nl
		'Truth is, you''re drinking more than you can really handle and at this point, you are starting to feel pretty drunk. As you lean against the bar, you feel someone grinding their crotch against your ass; you barely notice that at first, but when he grabs you by the hip with one hand to pull you back against him, it becomes pretty hard to ignore, and just then, he grabs you by your hair and tilts you forward a bit more.'
	
		act 'Tell him to get lost':
			cla
			*nl
			MartinRel += 1
			'At first you just try to pull away, then, when that fails, you try to shove him off, but the guy hangs onto you, his grip tight and insistent. Just as you are about to say something, Martin comes over.' 
			'"Is there a problem here?"' 
			'You nod and try to speak, but the man talks over you, "She likes it, you can tell..."'
			'Martin silences him with a glare so you can speak, and you do: "This asshole won''t let go of me. I want him to leave me alone."' 
			'As soon as Martin hears this, he turns and looks at the guy. "I suggest you let her go before I make you let go."' 
			'The man may be horny, but he isn''t stupid enough to risk butting heads with Martin, so he quickly lets go and disappears. You turn to the bartender with a grateful smile. "Thank you, Martin."' 
			'He just nods, "My pleasure, but I think you''ve had enough for the night."'
			
			act 'Finish up': gt 'qwBarPolet'
		end
		
		if pcs_horny >= 50 or sub >= 20:
			act 'Grind back against him.':
				cla
				*clr
				'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/bargrind2.gif"></center>'
				gs 'boyStat', $npclastgenerated
				'You grind your butt back against him and that is all the incentive he needs: After a little more grinding, he reaches around and worms his fingers into your bottoms. You are shocked and want to say something but just when you open your mouth, he finds your clit and your protest turns into a soft moan. You can feel his erection growing against your butt and the whole situation is getting you really excited.'
				gs 'arousal', 'vaginal_finger', 5, 'sub', 'exhibitionism'
				gs 'stat'
				
				act 'Let him guide you':
					cla
					*clr
					'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/bargrinds1.gif"></center>'
					gs 'boyStat', $npclastgenerated
					'He works your clit with his fingers for a bit, clearly knowing what he''s doing and getting you hot and bothered before he pulls his hand free. He turns you around so your back is against the bar and then pushes down on your shoulders until you are squatted down in front of him and hidden from most views.' 
					'The strangers pulls out his cock and shoves it in your open mouth - you already knew what to expect and at this point, you are eager to suck his cock. He leans in close and starts fucking your mouth, and you are reveling in it, masturbating as he shoves his <<dick>>cm <<$dick_girth>> cock down your throat again and again. You don''t know if anybody''s watching and you are too drunk to feel anything but excitement at the prospect.'
					gs 'arousal', 'bj', 5, 'sub', 'exhibitionism', 'deepthroat', 'rough'
					gs 'arousal', 'masturbate', 5, 'sub', 'exhibitionism'
					minut -= 5
					pcs_dom -= 2
					gs 'stat'
					$orgasm_txt = 'Your fingers on your needy cunt and the sensation of blowing a stranger in the middle of a bar prove too much to you, and you cum, shaking all over, your moans muffled by his <<$dick_girth>> cock.'
					
					act 'Finish him':
						cla
						*clr
						'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/bargrinds2.jpg"></center>'
						gs 'boyStat', $npclastgenerated
						'You are not quite sure for how long you are squatting there while he fucks your mouth, but at some point, he picks up the pace and starts to groan, then suddenly pulls his cock out of your mouth and the first hot jet of sperm hits your face, then another shoots into your mouth. Several more follow and cover your lips, chin and tongue with cum.' 
						'Once the last spurt is out, he wipes the tip of dick against your lips to get the last drops off cum off. Then he tucks his cock back in his pants, orders another drink for each of you and, before you''re even fully back on your feet, takes his drink and walks off.'
						gs 'arousal', 'end'
						spafinloc = 11
						gs 'cum_manage'
						spafinloc = 12
						gs 'cum_manage'
						gs 'fame', 'city', 'sex', 1
						gs 'stat'
												
						act 'Finish up': gt 'qwBarPolet'
					end
				end
					
				if pcs_dom > 20:
					act 'Take charge':
						cla
						*clr
						'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/bargrindd1.jpg"></center>'
						gs 'boyStat', $npclastgenerated
						'Once you are good and wet, you pull his hands away, sit down on a bar stool, move your clothes out of the way enough to reveal your pussy and spread your legs as you pull him close. You gently push down on his shoulders and he gets the idea, smiles and goes down to his knees to lick your pussy.' 
						'He laps at your cunt without a hint of reservation. One of his hands is squeezing your tits through your clothes while the other joins his mouth, his fingers inside you adding to the overwhelming sensations you are feeling. You notice some people watching but not as many as you expected; you don''t care though, this simply feels too great to think about consequences, and your guy friend seems unconcerned with the looks of other patrons too, maybe even enjoying the fact that he can show off his conquest right here.' 
						'He keep going, working your sex tirelessly until an orgasm rocks your body and you have to bite down on your lip to keep yourself from moaning out loud. As the shuddering subsides, he stands up with a shit-eating grin and his hands move to unbutton his pants.'
						gs 'arousal', 'cuni', 5, 'dom', 'exhibitionism'
						$orgasm_or = 'yes'
						pcs_dom += 1
						gs 'stat'

						act 'Got to leave':
							cla
							*nl
							pcs_dom += 2
							'You put your hands on his and stop him from undoing his pants further. You lean in to kiss his cheek, then whisper. "Thank you for this... but I gotta go. Have a nice evening."' 
							'Then, before he has even had time to process what you just said, you pull away and walk off. You can hear him calling you a "bitch" among other things, but you don''t care - you got yours, and that puts a spring in your step as you leave the bar.'
							gs 'arousal', 'end'
							act 'Leave':gt 'nord'
						end
													
						act 'Return the favor':
							cla
							*clr
							'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/bargrinds1.gif"></center>'
							gs 'boyStat', $npclastgenerated
							'Seeing as he got down on you right then and there, it seems only fair for you to do the same for him, so you get down on your knees, squatted down in front of him with your back against the counter, hidden from most views.'
							'The strangers pulls out his cock and shoves it in your open mouth - you already knew what to expect and at this point, you are eager to suck his cock. He leans in close and starts fucking your mouth, and you are reveling in it, masturbating as he shoves his <<dick>>cm <<$dick_girth>> cock down your throat again and again. You don''t know if anybody''s watching and you are too drunk to feel anything but excitement at the prospect.'
							gs 'arousal', 'bj', 5, 'sub', 'exhibitionism', 'deepthroat', 'rough'
							gs 'arousal', 'masturbate', 5, 'sub', 'exhibitionism'
							minut -= 5
							pcs_dom -= 1
							gs 'stat'
							$orgasm_txt = 'Your fingers on your needy cunt and the sensation of blowing a stranger in the middle of a bar prove too much to you, and you cum, shaking all over, your moans muffled by his <<$dick_girth>> cock.'
					
							act 'Finish him':
								cla
								*clr
								'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/bargrinds2.jpg"></center>'
								gs 'boyStat', $npclastgenerated
								'You are not quite sure for how long you are squatting there while he fucks your mouth, but at some point, he picks up the pace and starts to groan, then suddenly pulls his cock out of your mouth and the first hot jet of sperm hits your face, then another shoots into your mouth. Several more follow and cover your lips, chin and tongue with cum.' 
								'Once the last spurt is out, he wipes the tip of dick against your lips to get the last drops off cum off. Then he tucks his cock back in his pants, orders another drink for each of you and, before you''re even fully back on your feet, takes his drink and walks off.'
								gs 'arousal', 'end'
								spafinloc = 11
								gs 'cum_manage'
								spafinloc = 12
								gs 'cum_manage'
								gs 'fame', 'city', 'sex', 1
								gs 'stat'
												
								act 'Finish up': gt 'qwBarPolet'

							end
						end
					end
				end
			end
		end
	
	!elseif Drunk_Enc_Rand = 2:
	
	end
end



if $ARGS[0] = 'billiard':
	
	pcs_billiard = billiardnav

!From location 'billiard' (replace billiardnav there?)	
	if pcs_billiard < 10:billwin = rand(0, 10)
	if pcs_billiard >= 10 and pcs_billiard < 20:billwin = rand(0, 12)
	if pcs_billiard >= 20 and pcs_billiard < 30:billwin = rand(0, 14)
	if pcs_billiard >= 30 and pcs_billiard < 40:billwin = rand(0, 16)
	if pcs_billiard >= 40 and pcs_billiard < 50:billwin = rand(0, 18)
	if pcs_billiard >= 50 and pcs_billiard < 60:billwin = rand(0, 20)
	if pcs_billiard >= 60 and pcs_billiard < 70:billwin = rand(0, 22)
	if pcs_billiard >= 70 and pcs_billiard < 80:billwin = rand(0, 24)
	if pcs_billiard >= 80 and pcs_billiard < 90:billwin = rand(0, 26)
	if pcs_billiard >= 90:billwin = rand(0, 28)

	if billwin > 16 and billard_ev_var = 1:
		act 'Win':
			cls
			'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/pool/poolw.jpg"></center>'
			pcs_billiard += rand(1,3)
			money += 5000
			billard_ev_var = 0
			minut += 30
			gs 'stat'
			'He comes out strong and it is a hard game, but you still manage to win by a hair.' 
			'He seems completely surprised by the fact that you beat him but still congratulates you.' 
			'"How about a rematch?" You tease, to which he laughs and shakes his head: "Nah, I think I''ve lost enough money for one day."'
			'You collect your winnings, chat with him for a few more minutes and then part ways.'
			
			act 'Return to the bar': gt 'qwBarPolet'
		end

	elseif billard_ev_var = 1:
		act 'Lose':
			cla
			*nl
			pcs_billiard += rand(1,3)
			money -= 5000
			billard_ev_var = 0
			minut += 30
			gs 'stat'
			'He had a strong start, but you caught back up to him, matching him ball for a ball for a while. Towards the end, however, he ran the table with precise shots, not only pocketing his balls but also setting them up in ways that blocked yours. You lost, utterly and completely.'
			'He laughs and says you almost had him, pointing out how lucky he got there at the end to beat you, though you''re not quite sure it was as close as he makes it sound.' 
			'Still, he offers to play you again for the same amount, so you get a chance to "win your money back."'
			
			if money > 5000:
				act 'Play again':
					cla
					*nl
					billard_ev_var = 1
					'"Alright, let''s play."'
					'You open your purse and pull out enough money to lay it down on the table. He grins, racks up the balls and lets you break again as he lays his money down on top of yours.'
					gt 'qwBarPolet', 'billiard'
				end
			end
			
			act 'Tell him you don''t have that kind of money':
				cla
				*nl
				'You shrug slightly and tell him you don''t have that much money on you. He nods in understanding, then looks around a bit before leaning in close. "We can play for something else, you know..."'
				'You look at him suspiciously. "Like what?"'
				'He gives you a relaxed, friendly smile. "If you win, you get the money. And if I win, you give me a blow job. Sound fair?"'
				
				if city_slut < 75 and (pcs_dom >= 20 or (pcs_exhibition < 20 and alko < 5) or pcs_horny < 30):
					act 'Not that kind of girl':
						cla
						*nl
						pcs_dom += 1
						'You shake your head and glare at him.'
						'"Do I look like some sort of cheap whore to you?"'
						'You don''t even give him time to respond - you simply turn on your heel and walk back to the main room.'
					
						act 'Return to the bar': gt 'qwBarPolet'
					end
				end

				act 'I don''t think so':
					cla
					*nl
					'The thought of making a wager that might end up with you sucking some random guy''s cock doesn''t really bother you in and of itself, but you are not really interest in it either.' 
					'Deciding against it, you tell him: "I think I''ll pass today. Thank you for the drink, though."' 
					'He seems to notice that you don''t seem angry or even put off, so he smiles and simply says, "See you around," before you leave.'
					
					act 'Return to the bar': gt 'qwBarPolet'
				end
					
				act 'You''re on':
					cla
					*nl
					'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/pool/pool2.jpg"></center>'
					billard_ev_var = 2
					'<i>I can take him</i>, you think to yourself, <i>and even if I can''t, it''s just a blow job.</i>' 
					'With that in mind, you nod your head and tell him he''s on.'
					gt 'qwBarPolet', 'billiard'
				end
			end
					
			act 'You''ve played enough': 
				cla
				*nl
				'You shake your head no.'
				'"I think I''ve lost enough money, and I should probably get going anyway."'
				'"Sounds reasonable," he concurs, "but remember, luck is fickle: My luck can run out any moment."'
				'"Then maybe it''ll run out next time. Thank you for the drink and the... expensive company." With that, you return to the main room.'
				
				act 'Return to the bar': gt 'qwBarPolet'
		
			end
		end

			
	elseif billwin > 16 and billard_ev_var = 2:
		act 'Win':
			cls
			pcs_billiard += rand(1,3)
			money += 5000
			billard_ev_var = 0
			minut += 30
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/pool/poolw.jpg"></center>'
			'He comes out strong and it is a hard game, but you still manage to win by a hair.' 
			'He seems completely surprised by the fact that you beat him but still congratulates you.' 
			'"How about a rematch?" You tease, to which he laughs and shakes his head: "Nah, I think I''ve lost enough money for one day."'
			'You collect your winnings, chat with him for a few more minutes and then part ways.'
			
			act 'Return to the bar': gt 'qwBarPolet'
		end
		
	elseif billard_ev_var = 2:
		act 'Lose':
			cls
			pcs_billiard += rand(1,3)
			billard_ev_var = 0
			minut += 30
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/pool/pool2.jpg"></center>'
			'He is good - really good. In fact, you think he has been holding back a bit until now: He rarely misses a shot, sets up obstacles for you, and before long, he has won the game.' 
			'"Guess I''m getting that blowjob," he says with a smug smile.'
			'You made that bet willingly, but you are getting the distinct feeling that he hustled you...'
			
			act 'Refuse':
				cla
				*nl
				'You shake your head. "I''m not sucking your dick. You scammed me."'
				'You turn to walk off, but his eyes flash with anger and he grabs your arm. "You''re not going anywhere. You made a bet, sweetheart, and you lost, so pay up."' 
				'"Let me go!" You try and jerk free but you can''t, he is much stronger than he looks. Things get a little heated and you both get louder, but before things can escalate, Martin, with his uncanny ability to appear wherever he''s needed, walks in.'
				'"You two need to calm down. What''s going on?" He asks, his tone calm but abrasive.'
				'The guy speaks quickly before you can even get a word in: "We made a bet and now she is refusing to pay up."'
				'Martin nods and then looks to you, letting you have your say, so you tell him: "He hustled me and now he wants me to give him a blowjob for losing."'
				'The guy snorts indignantly and almost yells: "That''s what you bet! You sure as hell would have taken my money if I had lost!"'
				'Before the two of you can get shouting at each other again, the bartender raises his hands to silence the both of you, then turns towards you and asks, "Is it true? Did you bet a blowjob against his money?"'
				'You lower your head to avoid his gaze - not because he would have glared at you but because there was a hint of disappointment in it that you really didn''t want to see.'
				'"Yeah, I did," you confess quietly.'
				'"Alright." Martin pauses for a second. "Leave."'
				
				if MartinRel < 5:
					cla
					*nl
					MartinRel -= 1
					'You look up and see Martin''s eyes rest on you. "Leave, now."'
					'"But-"'
					'"What about my payout?" The guy protests, but Martin doesn''t turn to him. That doesn''t diminish his threat any, though:'
					'"You shut your mouth or I swear I will stuff it with those pool balls! <<$pcs_firstname>>, go."'
					'Not wanting to make him say it once more, you quickly turn and walk towards the exit. Something about the disappointment you saw in Martin''s eyes doesn''t sit well with you, though, and while you got out of giving that blowjob, you''re half-wondering if it hadn''t been better to give so you didn''t have to admit to Martin that you had taken that bet.'
						
					act 'Leave the bar': gt 'nord'
				
				else
					cla
					*nl
					MartinRel += 1
					'You look up and expect to see Martin''s face, but instead all you see is his shoulder - his eyes are resting on your pool partner who looks back and forth between the two of you incredulously.'
					'"You''ve gotta be kidding me."'
					'"I''m not. Get out of my bar," Martin insists.'
					'"I''m the one who''s getting screwed here!" The guy yells.'
					'"Oh please, do you really think I don''t notice how you chat up anybody who looks like they might not know how to play? Your con may not be the kind the militia would go for but you are lucky I even let you back in here to begin with."'
					'The guy seems to want to retort, but Martin cuts him off: "So unless you want to find another place to hang out, I suggest you get lost. Now."'
					'He glares at Martin, then at you, but then angrily grabs his money from the pool table and walks out.'
					'"Thank you, Mart-"'
					'"<<$pcs_firstname>>," he cuts you off, "why the fuck would you offer a blowjob as a wager?"'
					'"I didn''t! He... suggested it."'
					'"And you went for it. You took him up on his offer, for what? For some money?"'
					'"I-"'
					'"If I offered you money right now," he cuts you off again, "would you get down on your knees and blow me? Huh?!"'
					'His words hit you surprisingly hard. You''re not sure if you want to slap him, walk off, or break into tears. Before you can decide, you feel his calloused hand at your chin, forcing you to raise your head and meet his eyes.'
					'"There are things you shouldn''t do for money. You''re not easy, corazón, so don''t make yourself cheap."'
					'And with that, Martin walks off, leaving you to contemplate his words and his concern for you.'
					
					act 'Return to the bar': gt 'qwBarPolet'
				end
			end
				
			act 'Pay up':
				cla
				*clr
				'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/pool/poold1.jpg"></center>'
				gs 'npcgeneratec', 0, 'stranger', rand(18,35)
				gs 'boyStat', $npclastgenerated
				'Well, a bet is a bet. If you weren''t willing to do it, you shouldn''t have made the bet. At least that''s what''s going through your head as you get down on your knees in front of him.' 
				'He has them unbuttoned in two seconds and out comes his cock, standing at attention already and revealing his eagerness and anticipation. You quickly take it into your mouth and start sucking it for all you are worth, looking to get this over with as quickly as you can. You use your hands to caress his shaft and fondle his balls as you suck his dick, and while could imagine yourself doing more pleasant things, the fact that you are blowing a stranger in public does have a slight effect on you.'
				gs 'arousal', 'bj', 5, 'sub', 'exhibitionism'
				gs 'stat'
				
				act 'Payoff':
					cls
					'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/pool/poold2.jpg"></center>'
					'It feels like you''ve only just started when you hear him give a suppressed grunt. You barely manage to open your mouth and pull away as he shoots his load of cum all over your face and into your mouth. He looks down at you as he tucks his dick away.' 
					'"Pleasure doing business with you sweetheart, maybe we can do it again sometime. And I hope you enjoy your... consolation price." With a fat grin on his face, he walks off, whistling and very pleased with himself, leaving you to clean yourself up.'
					'Maybe billiards just isn''t for you.'
					gs 'arousal', 'end'
					spafinloc = 11
					gs 'cum_manage'
					spafinloc = 12
					gs 'cum_manage'
					gs 'stat'	
					
					act 'Return to the bar': gt 'qwBarPolet'
					
				end
			end
		end
		
	
!!	elseif billwin > 10:
		
!!		pcs_billiard += rand(1,3)
		
			
!!	else
		
!!		pcs_billiard += rand(1,3)
		
	end
end




--- qwBarPolet ---------------------------------