:: gtelefon
<<set $here = 'gtelefon'>>
<<set $ARGS = $location_var[$here]>>
<<set $menu_off = 1>>
<<setinit $boyinday[$numnpcboy] = $time.daystart>>
<<set $Gcall = 0>>
<<set $time.minutes += 3>>
<p>You pick up the phone, "Hello?"</p>
<<if getvar("$boyvstre["+$numnpcboy+"]") > 0>>
	<p>A male voice on the phone says "Hi $pc.name_nick! It's me, $nameBoyfrend[$numnpcboy]. Let's go for a walk somewhere."</p>
<<else>>
	<p>Through the phone, a male voice says "Hello, I'm looking for $pc.name_nick?"</p>
	<p>You answer the caller that you are $pc.name_nick. The stranger sounds delighted. "Hi! I'm $nameBoyfrend[$numnpcboy], we met the other day. Remember? Let's go for a walk."</p>
<</if>>
<<actCLA 'Tell him you have no time today'>>
	<<set $time.minutes += 3>>
	<<if getvar("$boyvstre["+$numnpcboy+"]") == 0>>
		<<setinit $otnBoyFrend[$numnpcboy] -= 10>>

	<</if>>
	<<if getvar("$boyvstre["+$numnpcboy+"]") > 0>>
		<<setinit $otnBoyFrend[$numnpcboy] -= 5>>

	<</if>>
	<p></p>
	<<if getvar("$otnBoyFrend["+$numnpcboy+"]") > 20>>
		<!-- !!otnBoyFrend[$numnpcboy] = 0-->
		<p>$nameBoyfrend[$numnpcboy] sounds upset. "I see. Well, maybe next time then."</p>
	<<else>>
		<<setinit $otnBoyFrend[$numnpcboy] = 0>>
		<p>$nameBoyfrend[$numnpcboy] sounds angry. "Whatever, screw you!" he said, and hung up immediately after. You don't think you'll hear from him again.</p>
	<</if>>
	<<act 'Hang up'>>
		<<gt 'korrPar'>>
	<</act>>
<</actCLA>>
<<if getvar("$GvstreBoy") == 0>>
	<<actCLA 'Meet me in the park'>>
		<<set $time.minutes += 3>>
		<<set $GvstreBoy = 1>>
		<<setinit $GvstreBoyAfter[$numnpcboy] = 1>>
		<<set $SkverBoy = $numnpcboy>>
		You agree to meet him in the park.
		<<act 'Hang up'>>
			<<gt 'korrPar'>>
		<</act>>
	<</actCLA>>
<</if>>
