# phone_selfies_popup

!! This is used to create a popup that shows the enlarged selfie


!!	$ARGS[1] = Location where the selfie is taken
!!	$ARGS[2] = State of dress in the selfie
!!	 ARGS[3] = is the index of the location in $selfieLoc[] and $selfieFilePrefix
!!	 ARGS[4] = the selfie number

if $ARGS[0] = 'set_selfie':
	$result = '<a href="exec: gs ''phone_selfies_popup'', ''show'', ''<<$ARGS[1]>>'', ''<<$ARGS[2]>>'', <<ARGS[3]>>, <<ARGS[4]>>"><img src="images/pc/activities/phone/selfies/<<$ARGS[1]>>/<<$ARGS[2]>>/<<$selfieFilePrefix[ARGS[3]]>><<ARGS[4]>>.jpg" style="horizontal-align:center; max-height:90%; max-width:90%"/></a>'
end

if $ARGS[0] = 'show':
	if temp_suppress_other_selfies = 0:
		if usePopUps = 1:
			msg '<img src="images/pc/activities/phone/selfies/<<$ARGS[1]>>/<<$ARGS[2]>>/<<$selfieFilePrefix[ARGS[3]]>><<ARGS[4]>>.jpg">'
		else
			view 'images/pc/activities/phone/selfies/<<$ARGS[1]>>/<<$ARGS[2]>>/<<$selfieFilePrefix[ARGS[3]]>><<ARGS[4]>>.jpg'
		end

	else
		killvar 'temp_suppres_other_selfies'
		$selfie_last_chosen['location'] = $ARGS[1]
		$selfie_last_chosen['type']     = $ARGS[2]
		killvar 'temp_suppress_other_selfies'
		gt $temp_ssh_ret_loc, $temp_ssh_ret_arg, 'images/pc/activities/phone/selfies/<<$ARGS[1]>>/<<$ARGS[2]>>/<<$selfieFilePrefix[ARGS[3]]>><<ARGS[4]>>.jpg', $ARGS[1], $ARGS[2], ARGS[3], ARGS[4]
	end
end


if $ARGS[0] = 'set_selfie2':
	$result = '<a href="exec: gs ''phone_selfies_popup'', ''show2'', ''<<$ARGS[1]>>'', ARGS[2]"><img src="<$ARGS[1]>><<ARGS[2]>>.jpg" height="150" /></a>'
end

if $ARGS[0] = 'show2':
	if usePopUps = 1:
		msg '<img src="<$ARGS[1]>><<ARGS[2]>>.jpg">'
	else
		view '<$ARGS[1]>><<ARGS[2]>>.jpg'
	end
end




!!	$ARGS[1] = Location where the selfie is taken
!!	$ARGS[2] = State of dress in the selfie
!!	 ARGS[3] = is the index of the location in $selfieLoc[] and $selfieFilePrefix
!!	 ARGS[4] = the selfie number
if $ARGS[0] = 'SMS_set_selfie':
	$temp_imloc = func('phone_selfies_popup', 'SMS_get_imloc', $ARGS[1], $ARGS[2], ARGS[3], ARGS[4])
	$result = '<a href="exec: gs <<$SMSSelfieVars[''return_string'']>>, <<SMSSelfieVars[''SMSid'']>>, ''<<$temp_imloc>>'', ''<<$ARGS[1]>>'', ''<<$ARGS[2]>>'', <<ARGS[3]>>, <<ARGS[4]>>"><img src="<<$temp_imloc>>" style="horizontal-align:center; max-height:90%; max-width:90%"></a>'
	killvar '$temp_imloc'
end

if $ARGS[0] = 'SMS_get_imloc':
	$result = 'images/pc/activities/phone/selfies/<<$ARGS[1]>>/<<$ARGS[2]>>/<<$selfieFilePrefix[ARGS[3]]>><<ARGS[4]>>.jpg'
end


--- phone_selfies_popup ---------------------------------