AddedFlavour/locations/mod_addedflavour_A77_Functions.qsrc

# mod_addedflavour_A77_Functions
	if $ARGS[0] = 'config':
		$npc_fontcolor['A77'] = 'Blue'
	end
	
	if $ARGS[0] = 'TalkEvents':
		if sosed >= 7 and modVar_AF_EventOpen['A77-AptInvEv'] = 0:
			menu_off = 0
			gt 'mod_addedflavour_A77_Events' , 'A77-AptInvEv-X1'
		end
		!---
		modVar_AF_EventOpen['A77-AptInvEv-InviteFriend'] = 0
		if modVar_AF_EventProgress['A77-AptInvEv'] > 4:
			if modVar_AF_EventProgress['A77-AptInvEv'] = modVar_AF_EventGates['A77-AptInvEv-3'] and rand(1,3) = 1:
				modVar_AF_EventOpen['A77-AptInvEv-InviteFriend'] = 1
			elseif modVar_AF_EventOpen['A77-AptInvEv'] = 1 and rand(1,6) = 1:
				modVar_AF_EventOpen['A77-AptInvEv-InviteFriend'] = 1
			end
		end
		if modVar_AF_EventOpen['A77-AptInvEv-InviteFriend'] = 1:
			*nl
			'Timothy mentions that he was thinking of meeting a friend of his in the Building prompting you to consider inviting both of them into the Apartment.'
			act 'Invite them both in' : gt 'mod_addedflavour_A77_Events' , 'A77-AptInvEv-1'
		end
		if modVar_AF_EventOpen['A77-AptInvEv'] = 1 and (home_owned[1] = 1 or home_owned[1] = 2):
			act 'Invite Timothy in' : modVar_AF_EventOpen['A77-AptInvEv-InviteFriend'] = 0 & gt 'mod_addedflavour_A77_Events' , 'A77-AptInvEv-1'
		end
	end
	
	if $ARGS[0] = 'AddProgress' and $ARGS[1] = 'A77-AptInvEv':
		if modVar_AF_EventProgress['A77-AptInvEv'] < ARGS[3]:
			modVar_AF_EventProgress['A77-AptInvEv'] += ARGS[2]
			if modVar_AF_EventProgress['A77-AptInvEv'] > ARGS[3] : modVar_AF_EventProgress['A77-AptInvEv'] = ARGS[3]
		end
	end
	
	if $ARGS[0] = 'A77-AptInvThreesomeEv-OrgasmTracking':
		*nl
		if modVar_AF_OrgasmTracking['NPC-1'] >= 100:
			'<center><font color="red">Timothy''s Orgasm - CUMMING!!!</font></center>'
		elseif modVar_AF_OrgasmTracking['NPC-1'] >= 75:
			'<center><font color="red">Timothy''s Orgasm - <<modVar_AF_OrgasmTracking[''NPC-1'']>>%</font></center>'
		elseif modVar_AF_OrgasmTracking['NPC-1'] >= 25:
			'<center><font color="orange">Timothy''s Orgasm - <<modVar_AF_OrgasmTracking[''NPC-1'']>>%</font></center>'
		else
			'<center><font color="green">Timothy''s Orgasm - <<modVar_AF_OrgasmTracking[''NPC-1'']>>%</font></center>'
		end
		*nl
		if modVar_AF_OrgasmTracking['NPC-2'] >= 100:
			'<center><font color="red">Timothy''s Friend''s Orgasm - CUMMING!!!</font></center>'
		elseif modVar_AF_OrgasmTracking['NPC-2'] >= 75:
			'<center><font color="red">Timothy''s Friend''s Orgasm - <<modVar_AF_OrgasmTracking[''NPC-2'']>>%</font></center>'
		elseif modVar_AF_OrgasmTracking['NPC-2'] >= 25:
			'<center><font color="orange">Timothy''s Friend''s Orgasm - <<modVar_AF_OrgasmTracking[''NPC-2'']>>%</font></center>'
		else
			'<center><font color="green">Timothy''s Friend''s Orgasm - <<modVar_AF_OrgasmTracking[''NPC-2'']>>%</font></center>'
		end
	end

--- mod_addedflavour_A77_Functions ---------------------------------