glife/locations/phone_selfies.qsrc

# phone_selfies
!2021/05/02
!{ HOW TO USE:
- UNLOCKING A PICTURE:
	There are different types of pictures that can be viewed with the phone. These need to be unlocked for them to become viewable.
	This is done by setting the correct variable to 1 INSIDE the event itself.
	<<npcname>> should be replaced by the name of the npc for who you want to unlock something.	
	- Pictures Sveta gets sent by an npc:
		<<npcname>>[i] = 1
	- Pictures Sveta takes herself with an npc:
		<<npcname>>sveta[i] = 1
	- Explicit pictures from an npc (could include Sveta):
		<<npcname>>sex[i] = 1
	- Pictures Sveta takes of an npc:
		<<npcname>>photo[i] = 1
	- Pictures Sveta takes of herself:
		Here the code is run through the camera option on the phone and it will automatically unlock the correct picture.
- INCREASE THE PICTURE COUNTER IN THIS FILE:
	NPC Pictures:
		As pictures are added the number in 'listretrieve2' inside this file needs to be increased by the amount of pictures you are adding.
		- loopmax:
			For selfies sent by an npc
		- loopmaxsveta:
			For selfies with an npc taken on Sveta''s phone
		- loopmaxsex:
			For explicit selfies
		- loopmaxev:
			For pictures Sveta takes of an npc
	SVETA SELFIES:
		The total amounts are kept in 'phone_selfies', 'Phone_selfie_totals'.
		Increase the correct variable in there to have it added to the phone.
}


! For setting the selfies
if $ARGS[0] = 'Phone_selfie_totals':

	$selfieLoc[0] = 'misc'
	$selfieLocDesc[0] = 'Me'
	$selfieFilePrefix[0] = 'phone_selfie'
	selfieClotot[0] = 2
	selfieUndtot[0] = 0
	selfieNudtot[0] = 0
	selfieTitflash[0] = 0
	selfieAssflash[0] = 0
	selfiePussyflash[0] = 0
	selfieBathtot[0] = 0
	selfieShowertot[0] = 0
	selfieSwimtot[0] = 0

	$selfieLoc[1] = 'bathroom'
	$selfieLocDesc[1] = 'Bathroom'
	$selfieFilePrefix[1] = ''
	selfieClotot[1] = 30
	selfieUndtot[1] = 23
	selfieNudtot[1] = 30
	selfieTitflash[1] = 30
	selfieAssflash[1] = 5
	selfiePussyflash[1] = 22
	selfieBathtot[1] = 30
	selfieShowertot[1] = 27
	selfieSwimtot[1] = 0

	$selfieLoc[2] = 'bedroom'
	$selfieLocDesc[2] = 'Bedroom'
	$selfieFilePrefix[2] = ''
	selfieClotot[2] = 30
	selfieUndtot[2] = 22
	selfieNudtot[2] = 30
	selfieTitflash[2] = 30
	selfieAssflash[2] = 26
	selfiePussyflash[2] = 25
	selfieBathtot[2] = 0
	selfieShowertot[2] = 0
	selfieSwimtot[2] = 0
	
	$selfieLoc[3] = 'kitchen'
	$selfieLocDesc[3] = 'Kitchen'
	$selfieFilePrefix[3] = ''
	selfieClotot[3] = 27
	selfieUndtot[3] = 23
	selfieNudtot[3] = 23
	selfieTitflash[3] = 21
	selfieAssflash[3] = 1
	selfiePussyflash[3] = 10
	selfieBathtot[3] = 0
	selfieShowertot[3] = 0
	selfieSwimtot[3] = 0
	
	$selfieLoc[4] = 'livingroom'
	$selfieLocDesc[4] = 'Livingroom'
	$selfieFilePrefix[4] = ''
	selfieClotot[4] = 30
	selfieUndtot[4] = 27
	selfieNudtot[4] = 30
	selfieTitflash[4] = 30
	selfieAssflash[4] = 5
	selfiePussyflash[4] = 20
	selfieBathtot[4] = 0
	selfieShowertot[4] = 0
	selfieSwimtot[4] = 0
	
	$selfieLoc[5] = 'changingroom'
	$selfieLocDesc[5] = 'Changingroom'
	$selfieFilePrefix[5] = ''
	selfieClotot[5] = 30
	selfieUndtot[5] = 30
	selfieNudtot[5] = 30
	selfieTitflash[5] = 30
	selfieAssflash[5] = 20
	selfiePussyflash[5] = 28
	selfieBathtot[5] = 0
	selfieShowertot[5] = 0
	selfieSwimtot[5] = 0
	
	$selfieLoc[6] = 'park'
	$selfieLocDesc[6] = 'Park'
	$selfieFilePrefix[6] = ''
	selfieClotot[6] = 30
	selfieUndtot[6] = 4
	selfieNudtot[6] = 17
	selfieTitflash[6] = 26
	selfieAssflash[6] = 2
	selfiePussyflash[6] = 8
	selfieBathtot[6] = 0
	selfieShowertot[6] = 0
	selfieSwimtot[6] = 0
	
	$selfieLoc[7] = 'locker'
	$selfieLocDesc[7] = 'locker'
	$selfieFilePrefix[7] = ''
	selfieClotot[7] = 26
	selfieUndtot[7] = 21
	selfieNudtot[7] = 13
	selfieTitflash[7] = 13
	selfieAssflash[7] = 2
	selfiePussyflash[7] = 3
	selfieBathtot[7] = 0
	selfieShowertot[7] = 0
	selfieSwimtot[7] = 0
	
	$selfieLoc[8] = 'beach'
	$selfieLocDesc[8] = 'Beach'
	$selfieFilePrefix[8] = ''
	selfieClotot[8] = 0
	selfieUndtot[8] = 0
	selfieNudtot[8] = 20
	selfieTitflash[8] = 17
	selfieAssflash[8] = 3
	selfiePussyflash[8] = 4
	selfieBathtot[8] = 0
	selfieShowertot[8] = 0
	selfieSwimtot[8] = 21
	
	$selfieLoc[9] = 'school_classroom'
	$selfieLocDesc[9] = 'School Classroom'
	$selfieFilePrefix[9] = ''
	selfieClotot[9] = 11
	selfieUndtot[9] = 2
	selfieNudtot[9] = 0
	selfieTitflash[9] = 3
	selfieAssflash[9] = 0
	selfiePussyflash[9] = 3
	selfieBathtot[9] = 0
	selfieShowertot[9] = 0
	selfieSwimtot[9] = 0
	
	$selfieLoc[10] = 'school_bathroom'
	$selfieLocDesc[10] = 'School Bathroom'
	$selfieFilePrefix[10] = ''
	selfieClotot[10] = 28
	selfieUndtot[10] = 12
	selfieNudtot[10] = 0
	selfieTitflash[10] = 8
	selfieAssflash[10] = 1
	selfiePussyflash[10] = 7
	selfieBathtot[10] = 0
	selfieShowertot[10] = 0
	selfieSwimtot[10] = 0
	
	$selfieLoc[11] = 'restroom'
	$selfieLocDesc[11] = 'Restroom'
	$selfieFilePrefix[11] = ''
	selfieClotot[11] = 30
	selfieUndtot[11] = 25
	selfieNudtot[11] = 3
	selfieTitflash[11] = 30
	selfieAssflash[11] = 13
	selfiePussyflash[11] = 21
	selfieBathtot[11] = 0
	selfieShowertot[11] = 0
	selfieSwimtot[11] = 0
end

if $ARGS[0] = 'send_selfie_handler':
	$temp_ssh_ret_loc = $ARGS[1]
	$temp_ssh_ret_arg = $ARGS[2]
	temp_suppress_other_selfies = 1

	gt 'phone_selfies', 'selfies'
end

if $ARGS[0] = 'selfies':
	menu_off = 0

	gs 'phone_selfies', 'Phone_selfie_totals'
	gs 'phone_selfies', 'set_selfie_layout'

	gs 'phone_selfies', 'act_exit'
end

if $ARGS[0] = 'act_exit':
	act 'Stop watching selfies':
		if temp_suppress_other_selfies = 0:
			gt $menu_loc, $menu_arg
		else
			killvar 'temp_suppress_other_selfies'
			gt $temp_ssh_ret_loc, $temp_ssh_ret_arg
		end
	end
end


if $ARGS[0] = 'set_selfie_layout':
	*clr & cla
	'<center><h4><font color="maroon">Photo library</font></h4></center>'
	*nl
	'Selfies'

	temp_locationCnt = 0
	:LocationLoop
		'<a href="exec:gt ''phone_selfies'', ''showlocation'', <<temp_locationCnt>>"><<$selfieLocDesc[temp_locationCnt]>> selfies</a>'
		temp_locationCnt += 1
	if temp_locationCnt < arrsize('$selfieLoc'): jump 'LocationLoop'

	if temp_suppress_other_selfies = 0:
		*nl
		'Family and friends'
		'<a href="exec:gt ''phone_selfies'', ''family''">Family</a>'
		'<a href="exec:gt ''phone_selfies'', ''school''">School friends</a>'
		'<a href="exec:gt ''phone_selfies'', ''teacher''">Teachers</a>'
		'<a href="exec:gt ''phone_selfies'', ''pavlovsk''">Pavlovsk friends</a>'
		'<a href="exec:gt ''phone_selfies'', ''city''">City friends</a>'
	end
end

! ARGS[1] is the index of the location in $selfieLoc[]
if $ARGS[0] = 'showlocation':
	'<center><h4><font color="maroon"><<$selfieLocDesc[ARGS[1]]>> selfies</font></h4></center>'
	*nl
	gs 'phone_selfies', 'listretrieve', ARGS[1], $selfieLoc[ARGS[1]]
	
	act 'Back': gt 'phone_selfies', 'selfies'
	gs 'phone_selfies', 'act_exit'
end


!  ARGS[1] is the index of the location in $selfieLoc[]
! $ARGS[2] is the selfie location (park, home, etc)
if $ARGS[0] = 'listretrieve':
	gs 'phone_selfies', 'retrieve_clothed_selfies',		ARGS[1], $ARGS[2]
	gs 'phone_selfies', 'retrieve_swim_selfies',		ARGS[1], $ARGS[2]
	gs 'phone_selfies', 'retrieve_underwear_selfies',	ARGS[1], $ARGS[2]
	gs 'phone_selfies', 'retrieve_nude_selfies',		ARGS[1], $ARGS[2]
	gs 'phone_selfies', 'retrieve_bath_selfies',		ARGS[1], $ARGS[2]
	gs 'phone_selfies', 'retrieve_shower_selfies',		ARGS[1], $ARGS[2]
	gs 'phone_selfies', 'retrieve_titflash_selfies',	ARGS[1], $ARGS[2]
	gs 'phone_selfies', 'retrieve_assflash_selfies',	ARGS[1], $ARGS[2]
	gs 'phone_selfies', 'retrieve_pussyflash_selfies',	ARGS[1], $ARGS[2]
end


!  ARGS[1] is the index of the location in $selfieLoc[]
! $ARGS[2] is the selfie location
if $ARGS[0] = 'retrieve_clothed_selfies':
	!!Loop for clothed selfies, dynamics set variables as mixing them in loop instructions is bad
	if selfieClotot[ARGS[1]] > 0:
		'<center><b>Clothed selfies</b></center>'
		*nl
		temp_clocnt = 1
		:temp_loop
			!!setting value to unmixed variable so it can be checked in the if below
			dynamic 'phone_locval = <<$ARGS[2]>>_closelfie[<<temp_clocnt>>]'
			if phone_locval = 1: *p func('phone_selfies_popup', 'set_selfie', $ARGS[2], 'clothed', ARGS[1], temp_clocnt)
			temp_clocnt += 1
		if temp_clocnt <= selfieClotot[ARGS[1]]: jump 'temp_loop'
		killvar 'temp_clocnt'
	end

elseif $ARGS[0] = 'retrieve_swim_selfies':
	if selfieSwimtot[ARGS[1]] > 0:
		'<center><b>Swimwear selfies</b></center>'
		*nl
		temp_swicnt = 1
		:temp_loop1
			!!setting value to unmixed variable so it can be checked in the if below
			dynamic 'phone_locval = <<$ARGS[2]>>_swim[<<temp_swicnt>>]'
			if phone_locval = 1: *p func('phone_selfies_popup', 'set_selfie', $ARGS[2], 'bikini', ARGS[1], temp_swicnt)
			temp_swicnt += 1
		if temp_swicnt <= selfieSwimtot[ARGS[1]]: jump 'temp_loop1'
		killvar 'temp_swicnt'
	end

elseif $ARGS[0] = 'retrieve_underwear_selfies':
	if selfieUndtot[ARGS[1]] > 0:
		'<center><b>Underwear selfies</b></center>'
		*nl
		temp_undcnt = 1
		:temp_loop2
			dynamic 'phone_locval = <<$ARGS[2]>>_undselfie[<<temp_undcnt>>]'
			if phone_locval = 1: *p func('phone_selfies_popup', 'set_selfie', $ARGS[2], 'underwear', ARGS[1], temp_undcnt)
			temp_undcnt += 1
		if temp_undcnt <= selfieUndtot[ARGS[1]]: jump 'temp_loop2'
		killvar 'temp_undcnt'
	end

elseif $ARGS[0] = 'retrieve_nude_selfies':
	if selfieNudtot[ARGS[1]] > 0:
		'<center><b>Nude selfies</b></center>'
		*nl
		temp_nudcnt = 1
		:temp_loop3
			dynamic 'phone_locval = <<$ARGS[2]>>_nudselfie[<<temp_nudcnt>>]'
			if phone_locval = 1: *p func('phone_selfies_popup', 'set_selfie', $ARGS[2], 'nude', ARGS[1], temp_nudcnt)
			temp_nudcnt += 1
		if temp_nudcnt <= selfieNudtot[ARGS[1]]: jump 'temp_loop3'
		killvar 'temp_nudcnt'
	end

elseif $ARGS[0] = 'retrieve_bath_selfies':
	!!loop for bath selfies
	if selfieBathtot[ARGS[1]] > 0:
		'<center><b>Bath selfies</b></center>'
		*nl
		temp_bathcnt = 1
		:temp_loop4
			dynamic 'phone_locval = <<$ARGS[2]>>_bathselfie[<<temp_bathcnt>>]'
			if phone_locval = 1: *p func('phone_selfies_popup', 'set_selfie', $ARGS[2], 'bath', ARGS[1], temp_bathcnt)
			temp_bathcnt += 1
		if temp_bathcnt <= selfieBathtot[ARGS[1]]: jump 'temp_loop4'
		killvar 'temp_bathcnt'
	end

elseif $ARGS[0] = 'retrieve_shower_selfies':
	!!loop for shower selfies
	if selfieShowertot[ARGS[1]] > 0:
		'<center><b>Shower selfies</b></center>'
		*nl
		temp_showercnt = 1
		:temp_loop5
			dynamic 'phone_locval = <<$ARGS[2]>>_showerselfie[<<temp_showercnt>>]'
			if phone_locval = 1: *p func('phone_selfies_popup', 'set_selfie', $ARGS[2], 'shower', ARGS[1], temp_showercnt)
			temp_showercnt += 1
		if temp_showercnt <= selfieShowertot[ARGS[1]]: jump 'temp_loop5'
		killvar 'temp_showercnt'
	end

elseif $ARGS[0] = 'retrieve_titflash_selfies':
	!!loop for flashing tits selfies
	if selfieTitflash[ARGS[1]] > 0:
		'<center><b>Flashing tits selfies</b></center>'
		*nl
		temp_flashtitscnt = 1
		:temp_loop6
			dynamic 'phone_locval = <<$ARGS[2]>>_titflash[<<temp_flashtitscnt>>]'
			if phone_locval = 1: *p func('phone_selfies_popup', 'set_selfie', $ARGS[2], 'titflash', ARGS[1], temp_flashtitscnt)
			temp_flashtitscnt += 1
		if temp_flashtitscnt <= selfieTitflash[ARGS[1]]: jump 'temp_loop6'
		killvar 'temp_flashtitscnt'
	end

elseif $ARGS[0] = 'retrieve_assflash_selfies':
	!!loop for flashing ass selfies
	if selfieAssflash[ARGS[1]] > 0:
		'<center><b>Flashing ass selfies</b></center>'
		*nl
		temp_flashasscnt = 1
		:temp_loop7
			dynamic 'phone_locval = <<$ARGS[2]>>_assflash[<<temp_flashasscnt>>]'
			if phone_locval = 1: *p func('phone_selfies_popup', 'set_selfie', $ARGS[2], 'assflash', ARGS[1], temp_flashasscnt)
			temp_flashasscnt += 1
		if temp_flashasscnt <= selfieAssflash[ARGS[1]]: jump 'temp_loop7'
		killvar 'temp_flashasscnt'
	end

elseif $ARGS[0] = 'retrieve_pussyflash_selfies':
	!!loop for flashing pussy selfies
	if selfiePussyflash[ARGS[1]] > 0:
		'<center><b>Flashing pussy selfies</b></center>'
		*nl
		temp_flashpussycnt = 1
		:temp_loop8
			dynamic 'phone_locval = <<$ARGS[2]>>_pussyflash[<<temp_flashpussycnt>>]'
			if phone_locval = 1: *p func('phone_selfies_popup', 'set_selfie', $ARGS[2], 'pussyflash', ARGS[1], temp_flashpussycnt)
			temp_flashpussycnt += 1
		if temp_flashpussycnt <= selfiePussyflash[ARGS[1]]: jump 'temp_loop8'
		killvar 'temp_flashpussycnt'
	end
end




!! Sets up a list of selfies taken by category
!! loops through the arrays of selfie flags (1 means that se;lfie has been taken by the player)
!! adds the image path for each taken selfie to the relevant array
!! So to check if any nude selfies are on the phone we can do   if arrsize('$selfieTakenNud') > 0:
!! then we can get the image paths for the elements of that array to get the pictures taken
!!	$selfieTakenClo[]
!!	$selfieTakenUnd[]
!!	$selfieTakenNud[]
!!	$selfieTakenTitflash[]
!!	$selfieTakenAssflash[]
!!	$selfieTakenPussyflash[]
!!	$selfieTakenBath[]
!!	$selfieTakenShower[]
!!	$selfieTakenSwim[]
if $ARGS[0] = 'PopulateSelfiesList':
	killvar '$selfieTakenClo'
	killvar '$selfieTakenUnd'
	killvar '$selfieTakenNud'
	killvar '$selfieTakenTitflash'
	killvar '$selfieTakenAssflash'
	killvar '$selfieTakenPussyflash'
	killvar '$selfieTakenBath'
	killvar '$selfieTakenShower'
	killvar '$selfieTakenSwim'

	temp_locationCnt = 1
	:LocationTakenLoop
		CloMaxSize = selfieClotot[temp_locationCnt]
		if CloMaxSize > 0:
			gs 'phone_selfies', 'populateClothesType', 'closelfie', '$selfieTakenClo', 'clothed', CloMaxSize
		end

		CloMaxSize = selfieSwimtot[temp_locationCnt]
		if CloMaxSize > 0:
			gs 'phone_selfies', 'populateClothesType', 'swim', '$selfieTakenSwim', 'bikini', CloMaxSize
		end

		CloMaxSize = selfieUndtot[temp_locationCnt]
		if CloMaxSize > 0:
			gs 'phone_selfies', 'populateClothesType', 'undselfie', '$selfieTakenUnd', 'underwear', CloMaxSize
		end

		CloMaxSize = selfieNudtot[temp_locationCnt]
		if CloMaxSize > 0:
			gs 'phone_selfies', 'populateClothesType', 'nudselfie', '$selfieTakenNud', 'nude', CloMaxSize
		end

		CloMaxSize = selfieBathtot[temp_locationCnt]
		if CloMaxSize > 0:
			gs 'phone_selfies', 'populateClothesType', 'bathselfie', '$selfieTakenBath', 'bath', CloMaxSize
		end

		CloMaxSize = selfieShowertot[temp_locationCnt]
		if CloMaxSize > 0:
			gs 'phone_selfies', 'populateClothesType', 'showerselfie', '$selfieTakenShower', 'shower', CloMaxSize
		end

		CloMaxSize = selfieTitflash[temp_locationCnt]
		if CloMaxSize > 0:
			gs 'phone_selfies', 'populateClothesType', 'titflash', '$selfieTakenTitflash', 'titflash', CloMaxSize
		end

		CloMaxSize = selfieAssflash[temp_locationCnt]
		if CloMaxSize > 0:
			gs 'phone_selfies', 'populateClothesType', 'assflash', '$selfieTakenAssflash', 'assflash', CloMaxSize
		end

		CloMaxSize = selfiePussyflash[temp_locationCnt]
		if CloMaxSize > 0:
			gs 'phone_selfies', 'populateClothesType', 'pussyflash', '$selfieTakenPussyflash', 'pussyflash', CloMaxSize
		end

		temp_locationCnt += 1
	if temp_locationCnt < arrsize('$selfieLoc'): jump 'LocationTakenLoop'
end


if $ARGS[0] = 'populateClothesType':
	$CloTypePrefix = $ARGS[1]
	$CloArraySize = 'arrsize(''<<$ARGS[2]>>'')'
	$CloFolder = $ARGS[3]
	$CloVar = '<<$ARGS[2]>>[tmpIndex]'
	CloMaxSize = ARGS[4]

	temp_clocnt = 0
	:tempCloTakenLoop
		dynamic 'phone_locval = <<$selfieLoc[temp_locationCnt]>>_<<$CloTypePrefix>>[<<temp_clocnt>>]'
		if phone_locval = 1:
			dynamic 'tmpIndex = <<$CloArraySize>>'
			dynamic "<<$CloVar>> = 'images/pc/activities/phone/selfies/<<$selfieLoc[temp_locationCnt]>>/<<$CloFolder>>/<<$selfieFilePrefix[temp_locationCnt]>><<temp_clocnt>>.jpg'"
		end

		temp_clocnt += 1
	if temp_clocnt <= CloMaxSize: jump 'tempCloTakenLoop'
end



if $ARGS[0] = 'listretrieve2':
	if numnpc = 1:
		'<center><h4><font color="maroon">Dimka pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/dimka/'
		$imgloc = 'images/characters/pavlovsk/school/boy/dimka/selfies/'
		$selfienpc = 'dimka'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 2:
		'<center><h4><font color="maroon">Artem pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/artem/'
		$imgloc = 'images/characters/pavlovsk/school/boy/artem/selfies/'
		$selfienpc = 'artem'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 3:
		'<center><h4><font color="maroon">Ivan pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/ivan/'
		$imgloc = 'images/characters/pavlovsk/school/boy/ivan/selfies/'
		$selfienpc = 'ivan'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 4:
		'<center><h4><font color="maroon">Igor pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/igor/'
		$imgloc = 'images/characters/pavlovsk/school/boy/igor/selfies/'
		$selfienpc = 'igor'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 5:
		'<center><h4><font color="maroon">Fedor pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/fedor/'
		$imgloc = 'images/characters/pavlovsk/school/boy/fedor/selfies/'
		$selfienpc = 'fedor'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 6:
		'<center><h4><font color="maroon">Petka pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/petka/'
		$imgloc = 'images/characters/pavlovsk/school/boy/petka/selfies/'
		$selfienpc = 'petka'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 7:
		'<center><h4><font color="maroon">Lesco pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/lesco/'
		$imgloc = 'images/characters/pavlovsk/school/boy/lesco/selfies/'
		$selfienpc = 'lesco'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 8:
		'<center><h4><font color="maroon">Svyatoslav pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/svyatoslav/'
		$imgloc = 'images/characters/pavlovsk/school/boy/svyatoslav/selfies/'
		$selfienpc = 'svyatoslav'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 9:
		'<center><h4><font color="maroon">Vitek pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/vitek/'
		$imgloc = 'images/characters/pavlovsk/school/boy/vitek/selfies/'
		$selfienpc = 'vitek'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 10:
		'<center><h4><font color="maroon">Dan pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/dan/'
		$imgloc = 'images/characters/pavlovsk/school/boy/dan/selfies/'
		$selfienpc = 'dan'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 11:
		'<center><h4><font color="maroon">Vasily pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/vasily/'
		$imgloc = 'images/characters/pavlovsk/school/boy/vasily/selfies/'
		$selfienpc = 'vasily'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 12:
		'<center><h4><font color="maroon">Julia pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/julia/'
		$imgloc = 'images/characters/pavlovsk/school/boy/julia/selfies/'
		$selfienpc = 'julia'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 13:
		'<center><h4><font color="maroon">Lariska pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/lariska/'
		$imgloc = 'images/characters/pavlovsk/school/boy/lariska/selfies/'
		$selfienpc = 'lariska'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 14:
		'<center><h4><font color="maroon">Katja pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/katja/'
		$imgloc = 'images/characters/pavlovsk/school/boy/katja/selfies/'
		$selfienpc = 'katja'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 15:
		'<center><h4><font color="maroon">Vicky pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/vicky/'
		$imgloc = 'images/characters/pavlovsk/school/boy/vicky/selfies/'
		$selfienpc = 'vicky'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 16:
		'<center><h4><font color="maroon">Natasha pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/natasha/'
		$imgloc = 'images/characters/pavlovsk/school/boy/natasha/selfies/'
		$selfienpc = 'natasha'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 17:
		'<center><h4><font color="maroon">Inna pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/inna/'
		$imgloc = 'images/characters/pavlovsk/school/boy/inna/selfies/'
		$selfienpc = 'inna'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 18:
		'<center><h4><font color="maroon">Christina pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/christina/'
		$imgloc = 'images/characters/pavlovsk/school/boy/christina/selfies/'
		$selfienpc = 'christina'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 19:
		'<center><h4><font color="maroon">Lina pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/lina/'
		$imgloc = 'images/characters/pavlovsk/school/boy/lina/selfies/'
		$selfienpc = 'lina'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 20:
		'<center><h4><font color="maroon">Lena pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/lena/'
		$imgloc = 'images/characters/pavlovsk/school/boy/lena/selfies/'
		$selfienpc = 'lena'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 21:
		'<center><h4><font color="maroon">Lera pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/lera/'
		$imgloc = 'images/characters/pavlovsk/school/boy/lera/selfies/'
		$selfienpc = 'lera'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 22:
		'<center><h4><font color="maroon">Bella pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/bella/'
		$imgloc = 'images/characters/pavlovsk/school/boy/bella/selfies/'
		$selfienpc = 'bella'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 23:
		'<center><h4><font color="maroon">Albina pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/albina/'
		$imgloc = 'images/characters/pavlovsk/school/boy/albina/selfies/'
		$selfienpc = 'albina'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 24:
		'<center><h4><font color="maroon">Pauline pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/pauline/'
		$imgloc = 'images/characters/pavlovsk/school/boy/pauline/selfies/'
		$selfienpc = 'pauline'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 25:
		'<center><h4><font color="maroon">Sonia pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/sonia/'
		$imgloc = 'images/characters/pavlovsk/school/girl/sonia/selfies/'
		$selfienpc = 'sonia'
		loopmaxev = 0
		loopmax = 45
		loopmaxsveta = 25
		loopmaxsex = 9
	elseif numnpc = 26:
		'<center><h4><font color="maroon">Anatoly pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/anatoly/'
		$imgloc = 'images/characters/pavlovsk/school/teacher/anatoly/selfies/'
		$selfienpc = 'anatoly'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 28:
		'<center><h4><font color="maroon">Stepfather pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/vladimir/'
		$imgloc = 'images/characters/pavlovsk/resident/vladimir/selfies/'
		$selfienpc = 'vladimir'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 29:
		'<center><h4><font color="maroon">Mother pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/mom/'
		$imgloc = 'images/characters/pavlovsk/resident/mom/selfies/'
		$selfienpc = 'mom'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 33:
		'<center><h4><font color="maroon">Anya pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/anya/'
		$imgloc = 'images/characters/pavlovsk/resident/anya/selfies/'
		$selfienpc = 'anya'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 34:
		'<center><h4><font color="maroon">Kolka pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/kolka/'
		$imgloc = 'images/characters/pavlovsk/resident/kolka/selfies/'
		$selfienpc = 'kolka'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 35:
		'<center><h4><font color="maroon">Father pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/???/'
!! Where are these located?
		$imgloc = 'images/characters/pavlovsk/resident/???/selfies/'
		$selfienpc = 'father'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 54:
		'<center><h4><font color="maroon">Uncle Misha pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/misha/'
		$imgloc = 'images/characters/pavlovsk/resident/misha/selfies/'
		$selfienpc = 'misha'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 56:
		'<center><h4><font color="maroon">Roma pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/roma/'
		$imgloc = 'images/characters/pavlovsk/resident/roma/selfies/'
		$selfienpc = 'roma'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 57:
		'<center><h4><font color="maroon">Rex pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/rex/'
		$imgloc = 'images/characters/pavlovsk/resident/rex/selfies/'
		$selfienpc = 'rex'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 69:
		'<center><h4><font color="maroon">Mikhail pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/mikhail/'
		$imgloc = 'images/characters/pavlovsk/school/teacher/mikhail/selfies/'
		$selfienpc = 'coachmikhail'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 54:
		'<center><h4><font color="maroon">Sergey pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/sergey/'
		$imgloc = 'images/characters/pavlovsk/resident/sergey/selfies/'
		$selfienpc = 'sergey'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 128:
		'<center><h4><font color="maroon">Makar pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/makar/'
		$imgloc = 'images/characters/pavlovsk/school/teacher/makar/selfies/'
		$selfienpc = 'makar'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 129:
		'<center><h4><font color="maroon">Serafim pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/serafim/'
		$imgloc = 'images/characters/pavlovsk/school/teacher/serafim/selfies/'
		$selfienpc = 'serafim'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 130:
		'<center><h4><font color="maroon">Ilya pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/ilya/'
		$imgloc = 'images/characters/pavlovsk/school/teacher/ilya/selfies/'
		$selfienpc = 'ilya'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 131:
		'<center><h4><font color="maroon">Viktor pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/viktor/'
		$imgloc = 'images/characters/pavlovsk/school/teacher/viktor/selfies/'
		$selfienpc = 'viktor'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 132:
		'<center><h4><font color="maroon">Ruslan pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/ruslan/'
		$imgloc = 'images/characters/pavlovsk/school/teacher/ruslan/selfies/'
		$selfienpc = 'ruslan'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 133:
		'<center><h4><font color="maroon">Rolan pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/rolan/'
		$imgloc = 'images/characters/pavlovsk/school/teacher/rolan/selfies/'
		$selfienpc = 'rolan'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 134:
		'<center><h4><font color="maroon">Aleksandrina pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/aleksandrina/'
		$imgloc = 'images/characters/pavlovsk/school/teacher/aleksandrina/selfies/'
		$selfienpc = 'aleksandrina'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 135:
		'<center><h4><font color="maroon">Yeva pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/yeva/'
		$imgloc = 'images/characters/pavlovsk/school/teacher/yeva/selfies/'
		$selfienpc = 'yeva'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 136:
		'<center><h4><font color="maroon">Olga pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/olga/'
		$imgloc = 'images/characters/pavlovsk/school/teacher/olga/selfies/'
		$selfienpc = 'olga'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 137:
		'<center><h4><font color="maroon">Raven pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/raven/'
		$imgloc = 'images/characters/pavlovsk/school/teacher/raven/selfies/'
		$selfienpc = 'raven'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 138:
		'<center><h4><font color="maroon">Arina pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/arina/'
		$imgloc = 'images/characters/pavlovsk/school/teacher/arina/selfies/'
		$selfienpc = 'arina'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 139:
		'<center><h4><font color="maroon">Stasya pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/stasya/'
		$imgloc = 'images/characters/pavlovsk/school/boy/stasya/selfies/'
		$selfienpc = 'stasya'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 140:
		'<center><h4><font color="maroon">Lizaveta pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/lizaveta/'
		$imgloc = 'images/characters/pavlovsk/school/boy/lizaveta/selfies/'
		$selfienpc = 'lizaveta'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 141:
		'<center><h4><font color="maroon">Veronika pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/veronika/'
		$imgloc = 'images/characters/pavlovsk/school/boy/veronika/selfies/'
		$selfienpc = 'veronika'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 142:
		'<center><h4><font color="maroon">Zinaida pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/zinaida/'
		$imgloc = 'images/characters/pavlovsk/school/boy/zinaida/selfies/'
		$selfienpc = 'zinaida'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 143:
		'<center><h4><font color="maroon">Alyona pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/alyona/'
		$imgloc = 'images/characters/pavlovsk/school/boy/alyona/selfies/'
		$selfienpc = 'alyona'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 144:
		'<center><h4><font color="maroon">Anushka pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/anushka/'
		$imgloc = 'images/characters/pavlovsk/school/girl/anushka/selfies/'
		$selfienpc = 'anushka'
		loopmaxev = 6
		loopmax = 22
		loopmaxsveta = 2
		loopmaxsex = 7
	elseif numnpc = 145:
		'<center><h4><font color="maroon">Ekaterina pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/ekaterina/'
		$imgloc = 'images/characters/pavlovsk/school/boy/ekaterina/selfies/'
		$selfienpc = 'ekaterina'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 146:
		'<center><h4><font color="maroon">Marcus pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/marcus/'
		$imgloc = 'images/characters/pavlovsk/school/boy/marcus/selfies/'
		$selfienpc = 'marcus'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 147:
		'<center><h4><font color="maroon">Andrey pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/andrey/'
		$imgloc = 'images/characters/pavlovsk/school/boy/andrey/selfies/'
		$selfienpc = 'andrey'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 148:
		'<center><h4><font color="maroon">Mefodiy pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/mefodiy/'
		$imgloc = 'images/characters/pavlovsk/school/boy/mefodiy/selfies/'
		$selfienpc = 'mefodiy'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 149:
		'<center><h4><font color="maroon">Lazar pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/lazar/'
		$imgloc = 'images/characters/pavlovsk/school/boy/lazar/selfies/'
		$selfienpc = 'lazar'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 150:
		'<center><h4><font color="maroon">Erast pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/erast/'
		$imgloc = 'images/characters/pavlovsk/school/boy/erast/selfies/'
		$selfienpc = 'erast'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 151:
		'<center><h4><font color="maroon">Evgeny pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/evgeny/'
		$imgloc = 'images/characters/pavlovsk/school/boy/evgeny/selfies/'
		$selfienpc = 'evgeny'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 152:
		'<center><h4><font color="maroon">Feofan pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/feofan/'
		$imgloc = 'images/characters/pavlovsk/school/boy/feofan/selfies/'
		$selfienpc = 'feofan'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 153:
		'<center><h4><font color="maroon">Gerasim pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/gerasim/'
		$imgloc = 'images/characters/pavlovsk/school/boy/gerasim/selfies/'
		$selfienpc = 'gerasim'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 154:
		'<center><h4><font color="maroon">Radomir pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/radomir/'
		$imgloc = 'images/characters/pavlovsk/school/boy/radomir/selfies/'
		$selfienpc = 'radomir'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 155:
		'<center><h4><font color="maroon">Lavrenti pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/lavrenti/'
		$imgloc = 'images/characters/pavlovsk/school/boy/lavrenti/selfies/'
		$selfienpc = 'lavrenti'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 156:
		'<center><h4><font color="maroon">Arkadi pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/arkadi/'
		$imgloc = 'images/characters/pavlovsk/school/boy/arkadi/selfies/'
		$selfienpc = 'arkadi'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 157:
		'<center><h4><font color="maroon">Roman pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/roman/'
		$imgloc = 'images/characters/pavlovsk/school/boy/roman/selfies/'
		$selfienpc = 'roman'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 158:
		'<center><h4><font color="maroon">Valentin pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/valentin/'
		$imgloc = 'images/characters/pavlovsk/school/boy/valentin/selfies/'
		$selfienpc = 'valentin'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 159:
		'<center><h4><font color="maroon">Petia pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/petia/'
		$imgloc = 'images/characters/pavlovsk/school/boy/petia/selfies/'
		$selfienpc = 'petia'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 165:
		'<center><h4><font color="maroon">Vanya pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/vanya/'
		$imgloc = 'images/characters/pavlovsk/school/boy/vanya/selfies/'
		$selfienpc = 'vanya'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	elseif numnpc = 189:
		'<center><h4><font color="maroon">Nikolai pictures</font></h4></center>'
		$photoloc = 'images/pc/pictures/nikolai/'
		$imgloc = 'images/characters/pavlovsk/school/boy/nikolai/selfies/'
		$selfienpc = 'nikolai'
		loopmaxev = 0
		loopmax = 0
		loopmaxsveta = 0
		loopmaxsex = 0
	else
		!! New npcs with selfies should be included above
	end

	if loopmaxev > 0:
		*nl
		'<center><b>Pictures</b></center>'
		*nl

		i = 1
		:temp_loopev
			dynamic '$selfie = <<$selfienpc>>photo[<<i>>]'
			if $selfie = 1: *p func('phone_selfies_popup', 'set_selfie2', $photoloc, i)
			i += 1
		if i <= loopmax: jump 'temp_loopev'
	end

	if loopmax > 0:
		*nl
		'<center><b>Regular selfies</b></center>'
		*nl
		
		i = 1
		:temp_loopselfies
			dynamic '$selfie = <<$selfienpc>>[<<i>>]'
			if $selfie = 1: *p func('phone_selfies_popup', 'set_selfie2', $imgloc, i)
			i += 1
		if i <= loopmax: jump 'temp_loopselfies'
	end

	if loopmaxsveta > 0:
		*nl
		'<center><b>Selfies with me</b></center>'
		*nl
		
		i = 1
		:temp_loopselfiessveta
			dynamic '$selfie = <<$selfienpc>>sveta[<<i>>]'
			if $selfie = 1: *p func('phone_selfies_popup', 'set_selfie2', '<<$imgloc>>sveta/', i)
			i += 1
		if i <= loopmaxsveta: jump 'temp_loopselfiessveta'
	end

	if loopmaxsex > 0:
		*nl
		'<center><b>Sex selfies</b></center>'
		*nl
		
		i = 1
		:temp_loopselfiessex
			dynamic '$selfie = <<$selfienpc>>sex[<<i>>]'
			if $selfie = 1: *p func('phone_selfies_popup', 'set_selfie2', '<<$imgloc>>sex/', i)
			i += 1
		if i <= loopmaxsex: jump 'temp_loopselfiessex'
	end

	act 'Back': gt 'phone_selfies', 'selfies'
	gs 'phone_selfies', 'act_exit'
end




if $ARGS[0] = 'family':
	'<center><h4><font color="maroon">Family members</font></h4></center>'
	$textgrup = ''
	count1 = 0
	i = 1
	'<center><table cellspacing="3">'
	:familygruploop
		if npc_selfieon['A<<i>>'] = 1 and npc_grupTipe['A<<i>>'] = 7:
			count1 += 1
			$textgrup += '' + '<td bgcolor=<<$theme[''table_bg_alt'']>> align="center"><img  height="100" src="images/characters/shared/headshots_main/<<i>>.jpg"><br>' + $npc_selfie['A<<i>>'] + '</td>'

			if count1 = 6:
				$textgrup +='</tr><tr>'
				count1 = 0
			end
		end

		i += 1
	if i <= aarraynumber: jump 'familygruploop'

	'<<$textgrup>>'

	act 'Back': gt 'phone_selfies', 'selfies'
	gs 'phone_selfies', 'act_exit'
end

if $ARGS[0] = 'school':
	'<center><h4><font color="maroon">School friends</font></h4></center>'
	$textgrup = ''
	count1 = 0
	i = 1
	'<center><table cellspacing="3">'
	:schoolgruploop	
		if npc_selfieon['A<<i>>'] = 1 and (npc_grupTipe['A<<i>>'] = 1 or npc_grupTipe['A<<i>>'] = 2 or npc_grupTipe['A<<i>>'] = 3 or npc_grupTipe['A<<i>>'] = 4 or npc_grupTipe['A<<i>>'] = 5):
			count1 += 1
			$textgrup += '' + '<td bgcolor=<<$theme[''table_bg_alt'']>> align="center"><img  height="100" src="images/characters/shared/headshots_main/<<i>>.jpg"><br>' + $npc_selfie['A<<i>>'] + '</td>'

			if count1 = 6:
				$textgrup +='</tr><tr>'
				count1 = 0
			end
		end

		i += 1
	if i <= aarraynumber: jump 'schoolgruploop'

	'<<$textgrup>>'

	act 'Back': gt 'phone_selfies', 'selfies'
	gs 'phone_selfies', 'act_exit'
end

if $ARGS[0] = 'teacher':
	'<center><h4><font color="maroon">Teachers</font></h4></center>'
	$textgrup = ''
	count1 = 0
	i = 1
	'<center><table cellspacing="3">'
	:teachergruploop
		if npc_selfieon['A<<i>>'] = 1 and npc_grupTipe['A<<i>>'] = 6:
			count1 += 1
			$textgrup += '' + '<td bgcolor=<<$theme[''table_bg_alt'']>> align="center"><img  height="100" src="images/characters/shared/headshots_main/<<i>>.jpg"><br>' + $npc_selfie['A<<i>>'] + '</td>'

			if count1 = 6:
				$textgrup +='</tr><tr>'
				count1 = 0
			end
		end

		i += 1
	if i <= aarraynumber: jump 'teachergruploop'

	'<<$textgrup>>'

	act 'Back': gt 'phone_selfies', 'selfies'
	gs 'phone_selfies', 'act_exit'
end

if $ARGS[0] = 'pavlovsk':
	'<center><h4><font color="maroon">Pavlovsk friends</font></h4></center>'
	$textgrup = ''
	count1 = 0
	i = 1
	'<center><table cellspacing="3">'
	:pavgruploop
		if npc_grupTipe['A<<i>>'] = 8 and npc_selfieon['A<<i>>'] = 1:
			count1 += 1
			$textgrup += '' + '<td bgcolor=<<$theme[''table_bg_alt'']>> align="center"><img  height="100" src="images/characters/shared/headshots_main/<<i>>.jpg"><br>' + $npc_selfie['A<<i>>'] + '</td>'

			if count1 = 6:
				$textgrup +='</tr><tr>'
				count1 = 0
			end
		end
		i += 1
	if i <= aarraynumber: jump 'pavgruploop'

	'<<$textgrup>>'

	act 'Back': gt 'phone_selfies', 'selfies'
	gs 'phone_selfies', 'act_exit'
end

if $ARGS[0] = 'city':
	'<center><h4><font color="maroon">City friends</font></h4></center>'

	act 'Back': gt 'phone_selfies', 'selfies'
	gs 'phone_selfies', 'act_exit'
end

--- phone_selfies ---------------------------------