glife/locations/Gnpc

# Gnpc
!!Guys
GvstreBoyAfter[numnpc] = 0
GvstreBoy = 0
boyvstre[numnpc] += 1
gs 'stat'
'<center><b><font color="maroon"><<$nameBoyfrend[numnpc]>></font></b></center>'
!!'<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
'<<$nameBoyfrend[numnpc]>> your boyfriend.'

if otnBoyFrend[numnpc] < 20:'You have a bad attitude.'
if otnBoyFrend[numnpc] >= 20 and otnBoyFrend[numnpc] < 40:'You tensions.'
if otnBoyFrend[numnpc] >= 40 and otnBoyFrend[numnpc] < 60:'You have a normal relationship.'
if otnBoyFrend[numnpc] >= 60 and otnBoyFrend[numnpc] < 80:'You have a good relationship.'
if otnBoyFrend[numnpc] >= 80:'You have a great relationship.'

''
''

if preg = 1 and pregtime <= 80 and pregTalk[numnpc] = 0 and gnpcSex[numnpc] = 1 and knowpreg = 1:
	if $father ! $nameBoyfrend[numnpc]:
		$pregLie = '(Lie to him)'
	else
		$pregLie = ''
	end
	act 'Tell the guy he knocked you up <<$pregLie>>':
		cls
		gs'stat'
		'You tell the guy you are pregnant by him. His eyes nearly pop out of their sockets.'

		if $father ! $nameBoyfrend[numnpc]: pregLieRand = rand(1,5)
		if $father = $nameBoyfrend[numnpc] or ($father ! $nameBoyfrend[numnpc] and pregLieRand >= 4):
			'The guy thought. "Listen, I''m not ready to be a father, and even marry you." He handed you 5five thousand. "money, and let us part."'

			act 'Throw a guy and take the money':
				cls
				dom += 5
				pregTalk[numnpc] = 1
				otnBoyFrend[numnpc] = 0
				money += 5000
				gs 'stat'
				'You covered the rage and you sent the guy on the dick. At still snatched the bill from him and left.'

				act 'Leave':gt $loc, $metka
			end

			act 'Throw a guy throwing him the money in the face':
				cls
				dom += 10
				pregTalk[numnpc] = 1
				otnBoyFrend[numnpc] = 0
				gs 'stat'
				'You covered the rage and you sent the guy on the dick and tossed him the money in the face. And then went.'

				act 'Leave':gt $loc, $metka
			end

		else
			'The guy was troubled "Yes you ohuel slut! Someone held up her pussy, and now will be with me grandmother swing? Fuck you on the dick!"'

			act 'quit Man':
				cls
				dom += 10
				pregTalk[numnpc] = 1
				otnBoyFrend[numnpc] = 0
				gs 'stat'
				'You covered the rage and you sent the guy on the dick. And then went.'

				act 'Leave':gt $loc, $metka
			end
		end
	end
end

if GboyBalabol[numnpc] = 1:
	act 'Blame the guy that he yap':
		cls
		gs 'stat'
		'You accused guy that he blabbed about your relationship now and all surrounding believe that you <<$gnikname>>'
		reaktrand = rand(0, 2)

		if reaktrand = 0:
			'<<$nameBoyfrend[numnpc]>> it began to apologize, he accidentally drunk one friend said, and he blabbed all bitch. <<$nameBoyfrend[numnpc]>> vowed that more of this does not happen again.'
		elseif reaktrand = 1:
			'<<$nameBoyfrend[numnpc]>> began to soothe you, say nothing terrible happened, chat and forget.'
		elseif reaktrand = 2:
			'<<$nameBoyfrend[numnpc]>> said with a grin. Yes Relax, you is the real <<$gnikname>>, that this fact?'
		end

		act 'quit Man':
			cls
			dom += 10
			GboyBalabol[numnpc] = 2
			otnBoyFrend[numnpc] = 0
			gs 'stat'
			'You covered a rage and you sent the guy on the dick. And then left.'

			act 'Leave':gt $loc, $metka
		end

		act 'just a guy':
			cls
			sub += 10
			GboyBalabol[numnpc] = 2
			gs 'stat'
			'You thought a little and decided to forgive the guy.'

			act 'Leave':gt $loc, $metka
		end
	end
end

act 'Walking through the square':
	cls

	if hapri = 0:otnBoyFrend[numnpc] -= 5
	if hapri = 1:otnBoyFrend[numnpc] += 1
	if mop = 2:otnBoyFrend[numnpc] += 1
	if mop = 3:otnBoyFrend[numnpc] += 2
	if mop = 4:otnBoyFrend[numnpc] -= 5
	if sweat > 0:otnBoyFrend[numnpc] -= 5
	if PCloSkirt > 2:otnBoyFrend[numnpc] += 3
	if PCloPants > 3:otnBoyFrend[numnpc] += 2

	minut += 15
	boytimes[numnpc] += 1
	gs 'stat'
	'You walk through the square with a guy and fun to hang out.'

	if kotovLoveQW > 0:
		otnBoyFrend[numnpc] = 0
		'Suddenly you see is what you go to a meeting Witek Kotov he comes to the guy and silently slap in his face. <<$nameBoyfrend[numnpc]>> falls to the ground. Witek naklonyaetsya over him "Hey you fucker, it''s my girls, see you again with her, living in the woods to bury you understand?" The guy nods his head and says that he understood.'

		act 'Leave':gt $loc, $metka

		exit
	end

	gboyrand = rand(0, 1)

	if gboyrand = 0:
		'<<$nameBoyfrend[numnpc]>> offered to go to the movies.'

		act 'Apologize and leave':otnBoyFrend[numnpc] -= 5 & gt $loc, $metka

		act 'Going to the cinema':
			cls
			minut += 15
			gs 'stat'
			'You went with a guy in a movie theater located in the park. <<$nameBoyfrend[numnpc]>> bought movie tickets. You came together in a small movie theater and found their seats.'

			act 'Watch a movie':
				cls
				manna += 100
				minut += 100
				otnBoyFrend[numnpc] += 5
				gs 'stat'
				'You got a guy on the chair placed in the back row. Soon the lights dimmed and the movie started on the screen.'

				if otnBoyFrend[numnpc] < 80:
					'You watched the movie a couple of hours sitting in a chair next to the guy.'

					act 'Go to the exit':gt 'Gnpc2'
				elseif otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] = 0:
					'You have been watching a movie and suddenly felt a hand on my knee Man.'

					act 'Remove his hands':
						cls
						dom += 1
						otnBoyFrend[numnpc] -= 20
						gs 'stat'
						'You have removed palm guy with his knees and continued to watch the movie. Movie finally ended. In the hall lights went on and the screen went titles.'

						act 'Go to the exit':gt 'Gnpc2'
					end

					act 'Ignore':
						cls
						otnBoyFrend[numnpc] += 5
						gs 'stat'
						'You pretended that nothing happens and the guy started more actively stroking your leg. Movie finally ended. In the hall lights went on and the screen went titles.'

						act 'Go to the exit':gt 'Gnpc2'
					end
				elseif otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] > 0:
					'You have been watching the movies, and <<$nameBoyfrend[numnpc]>> put his hand on your foot and began to stroke your knee. Movie finally ended. In the hall lights went on and the screen went titles.'

					act 'Go to the exit':gt 'Gnpc2'
				end
			end
		end
	elseif gboyrand = 1:
		'<<$nameBoyfrend[numnpc]>> suggested to drink beer in the park.'

		act 'Apologize and leave':otnBoyFrend[numnpc] -= 5 & gt $loc, $metka

		act 'Go for a beer':
			cls
			manna += 100
			minut += 15
			gs 'stat'
			'You went with a guy to the nearest kiosk. <<$nameBoyfrend[numnpc]>> bought a beer and a snack. Then you went on the bench in the far corner of the square.'

			act 'Drink':
				cls
				manna += 100
				minut += 30
				alko += 2
				cumspclnt = 2
				gs 'cum_cleanup'
				fbreath = 0
				otnBoyFrend[numnpc] += 5
				gs 'stat'
				'<<$nameBoyfrend[numnpc]>> beer poured into glasses and you have been drinking beer. <<$nameBoyfrend[numnpc]>> tell different funny stories.'

				if otnBoyFrend[numnpc] < 80:
					'You drank beer with a guy, and plenty of fun.'

					act 'Further':gt 'Gnpc2'
				elseif otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] = 0:
					'You drank beer with a guy, and plenty of fun.'

					act 'Further':gt 'Gnpc2'
				elseif otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] > 0:
					'You drank beer with a guy, and plenty of fun.'

					act 'Further':gt 'Gnpc2'
				end
			end
		end
	end
end

act 'Apologize and leave':otnBoyFrend[numnpc] -= 5 & gt $loc, $metka

--- Gnpc ---------------------------------