glife/locations/arturRinok.qsrc

# arturRinok
if $ARGS[0] = 'start':
	menu_off = 1
	if arturKnow = 0:
		*clr & cla
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/artur.jpg"></center>'
		'The handsome Armenian man smiles while handing you a plump tangerine.'

		act 'Take a tangerine':
			*clr & cla
			minut += 2
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/artur.jpg"></center>'
			'You take the delicious looking fruit and return his smile with one of your own. The man grins and says in a thick accent "You are so beautiful girl! Come to my place and eat barbecue, I have Chacha brandy for us to enjoy together, it will be wonderful time."'
			
			gs 'willpower', 'drink', 'resist'
			if will_cost <= pcs_willpwr:
				act 'Refuse (<<will_cost>> Willpower)':
					*clr & cla
					minut += 2

					if bag = 0:$arturgift = 'handbag'
					if bag > 0:$arturgift = 'cosmetics'
					gs 'willpower', 'drink', 'resist'
					gs 'willpower', 'pay', 'resist'
					gs 'stat'
					
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/artur.jpg"></center>'
					'Sensing the man has "other" intentions, you start to refuse and back away from the Armenian. He puts his hand out to stop your retreat and says "Hey, I mean no offense. Perhaps my Russian is no good. Nothing bad will happen I swear! I''ll even give you <<$arturgift>> if you come and spend some time with me."'
					
					gs 'willpower', 'drink', 'resist'
					if will_cost <= pcs_willpwr:
						act 'Leave (<<will_cost>> Willpower)':
							gs 'willpower', 'drink', 'resist'
							gs 'willpower', 'pay', 'resist'
							gs 'stat'
							gt 'pav_train_market', 'start'
						end
					else
						act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
					end
					act 'Show interest':
						*clr & cla
						minut += 2
						gs 'stat'
						
						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/artur.jpg"></center>'
						'You can''t help but show interested in the gift the unfamiliar Armenian is offering. Suddenly another Armenian comes up to you and leans in with an equally friendly smile. "Do not fear girl, Uncle Arturik does not bite. He is good man." The second stranger insists.'
						
						gs 'willpower', 'drink', 'resist', 'hard'
						if will_cost <= pcs_willpwr:
							act 'Leave (<<will_cost>> Willpower)':
								gs 'willpower', 'drink', 'resist', 'hard'
								gs 'willpower', 'pay', 'resist'
								gs 'stat'
								gt 'pav_train_market', 'start'
							end
						else
							act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
						end
						act 'Go with Arthur':gt 'arturHome'
					end
				end
			else
				act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
			act 'Go with Arthur':gt 'arturHome'
		end
	else
		if arturday ! daystart:
			gt 'arturQW', 'arturQW_1'
		elseif arturday = daystart:
			*clr & cla
			minut += 5
			gs 'stat'

			if arturblowday ! daystart:
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/artur.jpg"></center>'
				'Arthur smiles kindly and hands you a particularly juicy looking tangerine. "Sorry, girl, but I have work to do. Unless we make it quick."'
				
				gs 'willpower', 'bj', 'resist', 'hard'
				if will_cost <= pcs_willpwr:
					act 'Leave (<<will_cost>> Willpower)':
						gs 'willpower', 'bj', 'resist', 'hard'
						gs 'willpower', 'pay', 'resist'
						gs 'stat'
						gt 'pav_train_market', 'start'
					end
				else
					act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
				end
				act 'Go with Arthur':gt 'arturkiosk'
			elseif arturblowday = daystart:
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/artur.jpg"></center>'
				'Arthur smiles kindly at you. "There is much work to do, I''m sorry."'

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

!!	gs 'willpower', 'bj', 'resist', 'hard'
!!	if will_cost <= pcs_willpwr:
		act 'Leave':
!!			gs 'willpower', 'bj', 'resist', 'hard'
!!			gs 'willpower', 'pay', 'resist'
!!			gs 'stat'
			gt 'pav_train_market', 'start'
		end
!!	else
!!		act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
!!	end
end

if $ARGS[0] = 'work_1':
	*clr & cla
	menu_off = 1
	gs 'stat'

	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/artur.jpg"></center>'
	'"Good job <<$pcs_nickname>>, but time has come to get to work darling."'

	act 'Trade':
		*clr & cla
		hour = 18
		arturDaysWorked1 += 1
		gs 'stat'

		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/artur.jpg"></center>'
		'You work until the evening at the counter, selling fresh fruit. It was a rough day as you quarreled with several customers over prices and you find yourself very tired.'

		if arturDaysWorked1 >= 10:
			gt 'arturQW', 'arturQW_2'
		else
			act 'Go with Arthur':
				*clr & cla
				minut += 5
				money += 5000
				gs 'stat'

				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/arturqw_4.jpg"></center>'
				'Arthur comes up behind you and firmly grabs a handful of your ass. "<<$pcs_nickname>>, here you go, you earned this." He hands you 5000 <b>₽</b>.'
				'"I like helping you very much, thank you very much Arturik." You look at him with grateful eyes and take the money.'
				'"Well, you know, the sight of your beautiful eyes nearly overwhelm me every time I see them. So does your tight ass." He says, smiling lecherously at you'
				'You turn and give him a quick shake of your rump before departing.'

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

if $ARGS[0] = 'work_2':
	*clr & cla
	menu_off = 1
	gs 'stat'

	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/artur.jpg"></center>'

	if arturDaysWorked2 = 0:'"I see my new, super sexy secretary came." Arthur smiles while eyeing you lustfully.'

	'You quickly get to work. "We''ve got the usual paperwork to complete." Arthur instructs you as you begin.'

	act 'Work':
		*clr & cla
		hour = 17
		arturDaysWorked2 += 1
		gs 'stat'

		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/arturqw_6.jpg"></center>'
		'You work at the computer for hours, checking inventory, buying and selling, calculating daily expenses and income. The work is complicated and time consuming, but you feel satisfied in the end.'

		act 'Go with Arthur':
			*clr & cla
			minut += 5
			money += 10000
			gs 'stat'

			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/arturqw_7.jpg"></center>'
			'"<<$pcs_nickname>> that looks perfect! Now that the accounts are taken care of, I can relax." Arthur says, leaning back in his chair in a relaxed pose.'
			'"Yes, but you''ve still got a lot I haven''t finished yet. There is far more to do." You say, concerned.'
			'"Oh well, we will have time to figure it all out. Some other night, perhaps." He says nonchalantly.'
			'"Now let''s go eat barbecue and drink Chacha brandy. Then I can grab you by that fine ass of yours." Arthur suggests as he walks over and begins roughly palming your ass.'
			
			gs 'willpower', 'sex', 'resist', 'hard'
			if will_cost <= pcs_willpwr:
				act 'Leave (<<will_cost>> Willpower)':
					gs 'willpower', 'sex', 'resist', 'hard'
					gs 'willpower', 'pay', 'resist'
					gs 'stat'
					gt 'pav_train_market', 'start'
				end
			else
				act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
			act 'Go with Arthur':gt 'arturHome'
		end
	end
end

--- arturRinok ---------------------------------