glife/locations/torgpred.qsrc

# torgpred
$menu_loc = 'torgpred'
$menu_arg = ''
menu_off = 0
gs 'stat'
'<center><b><font color="maroon">Trade Representative</font></b></center>'
'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener.jpg"></center>'
'You walk down the hall to the office at the end. You read Director written on the door, you knock on the door and enter. Sitting behind the desk is Stas while Vitali sits in a large comfortable chair and in the third chair you see a woman.'

act 'Leave': gt 'clener', 'start'

if svQW = 2:
	if TorgPredDay ! daystart:
		if TorgPredZ = 0 and TorgPredZV = 0:
			act 'Take the job':
				cls
				TorgPredZ = 3
				minut += 5
				TorgPredDay = daystart
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/stasoffice.jpg"></center>'
				'You tell Stas you want the job. He smiles and hands you a paper, "Don''t forget, you need to promote all three items at all the supermarkets."'

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

	if TorgPredZ = 0 and TorgPredZV = 3:
		act 'Get paid':
			cls
			TorgPredZV = 0
			minut += 5
			money += 500
			TPworkTimes += 1
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/stasoffice.jpg"></center>'
			'You head into the office to get paid, Stat is pleased with your work and hands 500 <b>₽</b> over to you.'

			if npc_sex['A50'] = 0:
				if TPworkTimes >= 3 and TPmainQW = 0 and mesec = 0:
					if PCloSkirt > 0:
						'Stas asks, "How do you like it so far, do you enjoy working for me?"'

						act 'I like it':
							cls
							TPmainQW = 1
							minut += 5
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/stas.jpg"></center>'
							'You think about it for a moment, "It''s pretty great I love my job, thank you again for hiring me." Stas nods and smiles, "Our company is still expanding and for a bright young thing like you, there will be lots of opportunities. Why don''t you come to the cafe with me and we can discuss about it."'

							act 'Agree':
								cls
								minut += 15
								gs 'stat'
								'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/stas.jpg"></center>'
								'You happily accept, "That sounds wonderful." You know your new job and any future prospects depends completely on his opinion, and you would like to keep him on his good side.'
								'Stas is delighted and takes you to the cafe, on the way there you get to talk about work. Once at the cafe Stas pulls a chair out for you.'

								act 'Take a seat': gt 'StasQW'
							end
						end

						act 'It''s okay':
							cls
							TPmainQW = 1
							minut += 5
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/stas.jpg"></center>'
							'You tell Stas how it is, "The work is ok, it is nice having steady work." Stas grins, "Our company is still expanding and for a bright young thing like you, there will be lots of opportunities. Why don''t you come to the cafe with me and we can discuss about it."'

							act 'Agree':
								cls
								minut += 15
								gs 'stat'
								'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/stas.jpg"></center>'
								'You happily accept, "That sounds wonderful." You know your new job and any future prospects depends completely on his opinion, and you would like to keep him on his good side.'
								'Stas is delighted and takes you to the cafe, on the way there you get to talk about work. Once at the cafe Stas pulls a chair out for you.'

								act 'Take': gt 'StasQW'
							end
						end
					end

					exit
				end
			end

			if TPmainQW = 1:
				if npc_sex['A50'] > 0 and StVaGang = 0:'' & !!Sveta gave Stas, he did not consider her a whore, and wants to continue the relationship
				if npc_sex['A50'] = 0:'' & !!Sveta gave Stas, he did not consider her a whore, and wants to continue the relationship
			end

			if StVaGang > 0:'' & !!Stas and Valera believe whore Sveta

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

	if TPmainQW = 1 and npc_sex['A50'] > 0 and StVaGang = 0:
		'As Stas notices you, he smiles broadly and is obviously pleased to see you. He leans in close and whispers, as not to be overheard, "I really like you and I want us to start dating."'

		if bfa >= 1:
			'You''re not that sure your current boyfriend would be pleased if you accepted this offer. Stas, of course, is very nice and kind, but you need to first figure out what to do with your current relationship.'
		elseif bfa < 1:
			act 'Agree':
				'You smile, "I would love to start dating you." He jumps for joy and promises to call you soon to set up a date.'
				TPmainQW = 2
				gs 'boyStat', 'A50'
				boybodyrand = 1
				$boybody = 'high'
				boybodrand = 1
				$boybod = 'thin'
				boyfacerand = 3
				$boyface = 'blond'
				harakBoy = 1
				finance = 1
				vneshBoy = 1
				$boyClo = 'dressed in jeans and a sweater.'
				figurBoy = rand(0, 2)
				titBoy = rand(0, 2)
				hairBoy = rand(0, 3)
				izvrat = 0
				gs 'boyfrend', 'start'
				stopboy = 0
				bfa = 70
				boyonceA = 1
				cla
				gs 'stat'

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

		act 'I need to think about it':
			cla
			'You frown a little, "I am very flattered but I need to think about this, it''s a big step. Just give me a little time to think it over ok?" Stas frowns a bit but finally nods.'

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

		gs 'willpower', 'misc', 'self', 'easy'
		if will_cost <= pcs_willpwr:
			act 'Tell him no (<<will_cost>> Willpower)':
				cla
				gs 'willpower', 'pay', 'self'
				TPmainQW = 2
				gs 'stat'
				'You shake your head, "You''re a nice guy Stas but I just don''t feel that way towards you, I''m sorry." Stas seems a bit offended by that, "I thought, we had something, more than just a fling."'

				act 'Leave': gt 'clener', 'start'
			end
		else
			act 'Tell him no (<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

--- torgpred ---------------------------------