# gtelefon
boyinday[numnpcboy] = day
Gcall = 0
minut += 3
gs 'stat'
'You take the phone, "Hello."'

if boyvstre[numnpcboy] > 0:
	'Male voice on the phone says "Hello <<$name>> is I <<$nameBoyfrend[numnpcboy]>>, let''s go to somewhere to walk."'
else
	'In the tube, a male voice says "Hello Can <<$name>>?"'
	'You answer the caller that you are the <<$name>>. Stranger delighted "I <<$nameBoyfrend[numnpcboy]>>, we''re met at a disco. Remember? Let''s go for a walk."'
end

act 'I''m busy today':
	cls
	minut += 3

	if boyvstre[numnpcboy] = 0:otnBoyFrend[numnpcboy] -= 10
	if boyvstre[numnpcboy] > 0:otnBoyFrend[numnpcboy] -= 5

	gs 'stat'
	''

	if otnBoyFrend[numnpcboy] > 20:
		!!otnBoyFrend[numnpcboy] = 0
		'<<$nameBoyfrend[numnpcboy]>> upset. "Well, then, as something next time."'
	else
		otnBoyFrend[numnpcboy] = 0
		'<<$nameBoyfrend[numnpcboy]>> angry. "Well, if you went to the dick." And hung up.'
	end

	act 'Hangup':gt 'korrPar'
end

if GvstreBoy = 0:
	act 'Meet me in the park':
		cls
		minut += 3
		GvstreBoy = 1
		GvstreBoyAfter[numnpcboy] = 1
		SkverBoy = numnpcboy
		gs 'stat'
		'You are invited to meet in the park.'

		act 'Hangup':gt 'korrPar'
	end
end

--- gtelefon ---------------------------------