# mod_wlife_iosif

if $ARGS[0] = 'first_meet_forced':
	*clr & cla
	minut += 2
	gs 'stat'
	'<center><img <<$set_imgh>> src="mod/wlife/images/locations/warehouse/street_'+iif(daystage = 5, 'night', 'day')+'.jpg"></center>'		
	'You see Shura getting up from his old armchair before you have a chance to talk to him. He clearly doesn''t see you approach and heads inside the warehouse before you have a chance to talk to him.'
	
	act 'Leave': gt 'mod_wlife_warehouse', 'street'
	act 'Follow him inside': gt 'mod_wlife_iosif', 'first_meet'
end

if $ARGS[0] = 'first_meet':
	*clr & cla
	minut += 2
	wl_iosif['status'] = 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="mod/wlife/images/characters/iosif_orlov.jpg"></center>'
	'The noise inside the warehouse is deafening. Metal screeches over metal and several guys are shouting at each other as they break down cars for spare parts. Another group of men are leaning against the cars, beer in hand and chatting loudly about football. Something about a crushing victory of Zenit Saint Petersburg over Lokomotiv Moscow. They mostly ignore you except for one of them who frowns and stares at you with a menacing look.'
	*nl
	'You''re sure you have met him before or, to be specific, he fucked you before. What was his name again? Something starting with an ''I'', but you can''t remember. You are only sure of one thing, he doesn''t seem happy about you being here.'
	
	act 'Turn around and leave':
		*clr & cla
		minut += 1
		gs 'stat'
		'<center><img <<$set_imgh>> src="mod/wlife/images/player/warehouse_guys.jpg"></center>'
		'"Wait," a harsh voice shouts through the warehouse and you''re quickly surrounded by a group of slightly intoxicated men. One of them steps close to you. It''s the one which name you can''t remember. "What are you doing here? You whores aren''t suppose to be here except when you have to check in with Georgiy."'
		
		act 'Answer submissively':
			*clr & cla
			minut += 2
			wl_stats['respect'] -= 2
			wl_stats['loyalty'] += 1
			gs 'pain', 4, 'armL', 'twist'
			gs 'pain', 4, 'armR', 'stretch'
			gs 'pain', 6, 'legR', 'slam'
			gs 'pain', 2, 'handL', 'slam'
			gs 'pain', 2, 'handR', 'slam'
			gs 'pain', 10, 'hair', 'stretch'
			gs 'stat'
			'<center><img <<$set_imgh>> src="mod/wlife/images/characters/georgiy_bely_angry.jpg"></center>'
			'You look down to your feet. "I''m sorry, I didn''t know that," you say meekly.'
			'A strong hand grabs your left arm. "Do you think that''s enough?"'
			'"Nobody told me that I can''t be here," you say hastily. "I''m sorry, it won''t happen again. I promise."'
			'He twists your arm behind your back and pulls you really close to him. "Ok, go, but next time I won''t be so nice," he whispers into your ear before pushing you towards the door. You stumble and fall hitting your right knee on the concrete floor. A sharp pain shoots up your leg and you let out a cry of pain.'
			'The man grabs your right arm with one hand and your hair with the other before you have the chance to react. A loud scream escapes your throat and reverberates through the hall when he pulls you the last meters towards the door. "And now piss off whore."'
								
			act 'Continue': gt 'mod_wlife_warehouse', 'street'
		end
								
		gs 'willpower', 'misc', 'self', 'hard'
		if will_cost <= pcs_willpwr:	
			act 'Answer confidently (<<will_cost>> Willpower)':
				*clr & cla
				minut += 2
				wl_stats['respect'] += 2
				wl_stats['loyalty'] -= 4
				gs 'pain', 6, 'head', 'slap'
				gs 'pain', 4, 'armR', 'stretch'
				gs 'pain', 6, 'legR', 'slam'
				gs 'pain', 10, 'hair', 'stretch'
				gs 'willpower', 'pay', 'self'
				gs 'stat'
				'<center><img <<$set_imgh>> src="mod/wlife/images/characters/georgiy_bely_angry.jpg"></center>'
				'"Maybe next time tell me the rules before I break them," you reply snippy while you look confidently into his eyes. Anger flares up inside them as he steps right in front of you. He doesn''t say anything instead he only stares into your eyes. Several seconds pass, but you don''t budge and keep your eyes fixated on his.'
				'Suddenly he lifts his hand and slaps you without holding back. You fall to the ground, hitting your right knee on the concrete floor. A sharp pain shoots up your leg and you let out a cry of pain. "Don''t tell me what to do. Maybe I should teach you some respect," he screams, grabs your right arm with one hand and your hair with the other before you have the chance to react. A loud scream escapes your throat and reverberates through the hall when he pulls you towards the door. "And now piss off whore."'
										
				act 'Continue': gt 'mod_wlife_warehouse', 'street'
			end
		else
			act 'Answer confidently (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	end
end

if $ARGS[0] = 'first_call':
	*clr & cla
	minut += 1
	wl_iosif['timer'] = 1
	wl_iosif['timer_call'] = daystart
	gs 'stat'
	'<center><img <<$set_imgh>> src="mod/wlife/images/characters/iosif_orlov.jpg"></center>'
	'"Hi," you say unsure what to expect.'
	'"<<$pcs_nickname>>, I need to see you tonight." The voice sounds rough and familiar. "Iosif?" You ask hoping you''re wrong.'
	'"Good, so I didn''t fuck your brains out completely and you remember more than my cock," he says coldly.'
	'Nice, you think and roll your eyes. How charming. "We have to remedy that. Come to the warehouse, 23:00!" He commands and ends the call before you have a chance to reply.'
	
	act 'Put your phone away': gt $loc, $metka
end

if $ARGS[0] = 'regular_call':
	*clr & cla
	minut += 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="mod/wlife/images/characters/iosif_orlov.jpg"></center>'
	if wl_iosif['timer'] = 0:
		'"Hi Iosif," you say trying to sound friendly.'
		'"<<$pcs_nickname>>, I need to see you again. Come to the warehouse tonight, 23:00!"'
		
		gs 'willpower', 'prostitution', 'resist', 'hard'
		if will_cost <= pcs_willpwr:
			act 'Not today (<<will_cost>> Willpower)':
				cla & *nl
				wl_iosif['timer'] = 2
				wl_iosif['timer_whore'] = daystart + rand(2,6)
				gs 'willpower', 'pay', 'resist'
				gs 'stat'
				'"I can''t today. I''m sorry Iosif, can we meet on another day?" You inquire.'
				'You can hear an annoyed sigh coming from him. "Fine, but the next time I call you better be ready." He tells you before ending the call.'
				
				act 'Put your phone away': gt $loc, $metka
			end
		else
			act 'Not today (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	else
		'"Hi Iosif," you say trying to sound friendly.'
		'"Today is the day, bitch. Come to the warehouse, 23:00! And no excuses today."'
	end
	
	act 'OK': 
		cla & *nl
		wl_iosif['timer'] = 1
		wl_iosif['timer_call'] = daystart
		'"Ok, I''ll be there," you agree.'
		'"Perfect, can''t wait to fuck you again," he says and ends the call.'
		
		act 'Put your phone away': gt $loc, $metka
	end
end

if $ARGS[0] = 'warehouse_prostitution':
	*clr & cla
	menu_off = 1
	wl_iosif['timer'] = 0
	wl_iosif['call_missed'] = 0
	wl_iosif['call_avoid'] = 0
	wl_iosif['timer_whore'] = daystart + rand(4,12)
	minut += 2
	gs 'stat'	
	if rand (0,1) = 0 or wl_iosif['status'] = 3:
		if wl_iosif['status'] < 4: wl_iosif['status'] = 4
		gs 'pain', 2, 'asscheeks', 'slap'
		gs 'stat'
		'<center><img <<$set_imgh>> src="mod/wlife/images/player/warehouse_guys.jpg"></center>'
		'A guy whistles when you enter the warehouse and several more look at you with hungry eyes.'
		'"<<$pcs_nickname>>, come with me," Iosif shouts from the other end of the warehouse and vanishes in the corridor that leads to the adjacent house.'
		'You have to go through the group of guys to follow him. Left and right the guys offer lewd comments about you, your clothes and why you''re here. One of them even slaps your ass hard when you walk by him, but nobody tries to stop you.'
		
		act 'Follow Iosif': gt 'mod_wlife_iosif', 'couch'
	else
		'<center><img <<$set_imgh>> src="mod/wlife/images/characters/iosif_orlov.jpg"></center>'
		'The warehouse is empty except for one guy sitting near the entrance keeping a watchful eye at the door. "Are you Iosif girl?" He asks when you enter. You nod. "He''s in the back." He tells you and points towards the corridor that leads to the adjacent house.'
		
		act 'Go to Iosif': gt 'mod_wlife_iosif', 'couch'
	end
end

if $ARGS[0] = 'couch':
	*clr & cla
	'<center><img <<$set_imgh>> src="mod/wlife/images/locations/warehouse/couch.jpg"></center>'
	'"Damn, you look nice in that outfit.'+iif(PCloStyle = 4, ' Really brings out your inner whore."', 'A little bit to conservative for my taste, why don''t you wear something more slutty next time?"')+' He says while his eyes devour every inch of your body. "I was really looking forward to this," he adds and hands you your money.'
	
	act 'Take the money': money += wl_iosif['payment'] & gt 'mod_wlife_iosif_sex', 'warehouse_start'
	
	gs 'willpower', 'misc', 'force', 'hard'
	if wl_iosif['haggle'] = 0 and will_cost <= pcs_willpwr:
		act 'Demand more money (<<will_cost>> Willpower)':
			cla & *nl
			wl_iosif['haggle'] = 1
			wl_iosif['payment'] += 300
			gs 'willpower', 'pay', 'force'
			gs 'stat'
			'You take a deep breath and collect every ounce of courage you can find. "I need more than that!" You demand and cross your arms in front of you. "I''m worth more than this."'
			'"Are you?" He asks and the smile he shows is dangerous, but you nod and hold your ground. "I am and you know it."'
			'He stares at you menacingly until he shrugs and hands you 300 <b>₽</b> more. "Fine, here take it."'
			
			act 'Take the money': money += wl_iosif['payment'] & gt 'mod_wlife_iosif_sex', 'warehouse_start'
		end
	elseif wl_iosif['haggle'] = 0 and will_cost > pcs_willpwr:
		act 'Demand more money (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end
end

--- mod_wlife_iosif ---------------------------------