# torgpred
gs 'stat'
'
Trade Representative'
'
'
'Not a big cabinet in which are office desks and office equipment. In the office there is a door that says "Director"'
'One of the tables sits Stas, after another Vitali, for the third table sits a woman chief accountant.'
act 'Leave':gt 'clener', 'start'
if svQW = 2:
if TorgPredDay ! day:
if TorgPredZ = 0 and TorgPredZV = 0:
act 'Take the job':
cls
TorgPredZ = 3
minut += 5
TorgPredDay = day
gs 'stat'
'
'
'You came to Stas for the job. He smiled and handed you the paper. "Do not forget. Supermarkets three pieces. You need to arrange the items in all the supermarkets."'
act 'Leave':gt 'clener', 'start'
end
end
end
if TorgPredZ = 0 and TorgPredZV = 3:
act 'Get Money':
cls
TorgPredZV = 0
minut += 5
money += 500
TPworkTimes += 1
gs 'stat'
'
'
'You came to Stas for money. He smiled and handed you 500 rubles'
if StasikSex = 0:
if TPworkTimes >= 3 and TPmainQW = 0 and mesec = 0:
if ski > 0 or glamur > 0:
'Stas interest asks "Well, how do you work?"'
act 'Excellent!':
cls
TPmainQW = 1
minut += 5
gs 'stat'
'
'
'You answered Stas that everything is fine and he smiled. "Our company is developing, and intelligent man there will be a place better. Way, let''s go to the cafe, you have not stamped for work."'
act 'Agree':
cls
minut += 15
gs 'stat'
'
'
'You had to agree, as all your new job and prospects depend on Stas. Stas was delighted and made you in a cafe on the way talking about work. Café Stas gallantly pulled chair for you.'
act 'Take':gt 'StasQW'
end
end
act 'So-so.':
cls
TPmainQW = 1
minut += 5
gs 'stat'
'
'
'You answered that Stas so-so and he grinned. "Our company is developing, and intelligent man there will be a place better. Way, let''s go to the cafe, you have not stamped for work."'
act 'Agree':
cls
minut += 15
gs 'stat'
'
'
'You had to agree, as all your new job and prospects depend on Stas. Stas was delighted and made you in a cafe on the way talking about work. Café Stas gallantly pulled chair for you.'
act 'Take':gt 'StasQW'
end
end
end
exit
end
end
if TPmainQW = 1:
if StasikSex > 0 and StVaGang = 0:'' !!Light gave Stas, he did not consider her a whore, and wants to continue the relationship
if StasikSex = 0:'' !!Light gave Stas, he did not consider her a whore, and wants to continue the relationship
end
if StVaGang > 0:'' !!Stas and Valera believe whore Light
act 'Leave':gt 'clener', 'start'
end
end
if TPmainQW = 1 and StasikSex > 0 and StVaGang = 0:
'In view of Stas clearly glimpsed joy, when he sees you. in_a_low_voice, to not hear his colleagues are busy, it offers you to continue your relationship and start dating.'
if bfa >= 1:
'You think, that your current boyfriend is unlikely to please, you accept this offer. Stas, of_course, very nice, but you first need to understand their current relationship.'
elseif bfa < 1:
act 'agree':
'You answered Stas consent, to which he beamed and promised to call you back shortly.'
TPmainQW = 2
$boy = 'Stas'
boybodyrand = 1
$boybody = 'high'
boybodrand = 1
$boybod = 'thin'
boyfacerand = 3
$boyface = 'blond'
dick = 15
silavag = 1
harakBoy = 1
finance = 1
vneshBoy = 1
$boyClo = 'dressed in jeans and a sweater.'
figurBoy = rand(0, 2)
titBoy = rand(0, 2)
haerBoy = 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':
cla
'You answered Stas, you will find it very much, but you are not ready to give an answer, and ask him a little-just wait. Stas frowns, but accepts your answer.'
act 'Leave':gt 'clener', 'start'
end
act 'Contribute':
TPmainQW = 2
cla
gs 'stat'
'You quite sharply denied Stas, what he is offended: "Oh well! I-thought, we have that-something more, than an occasional census."'
act 'Leave':gt 'clener', 'start'
end
end
end
--- torgpred ---------------------------------