AddedFlavour/locations/mod_addedflavour_A32_Functions.qsrc

# mod_addedflavour_A32_Functions
	if $ARGS[0] = 'config':
		$npc_usedname['A32'] = 'Grandpa'
		$npc_fontcolor['A32'] = 'Olive'
		!Realising there is a Voyeur
		modVar_AF_EventGates['A32-BathroomSexEv-1'] = 8
		!Embracing you are being watched
		modVar_AF_EventGates['A32-BathroomSexEv-2'] = 16
		!Putting on a show to draw them in
		modVar_AF_EventGates['A32-BathroomSexEv-3'] = 20
		!Becoming Aroused at being touched
		modVar_AF_EventGates['A32-BathroomSexEv-4'] = 24
		!Getting Cuni
		modVar_AF_EventGates['A32-BathroomSexEv-5'] = 28
		!Giving Oral
		modVar_AF_EventGates['A32-BathroomSexEv-6'] = 32
		!Having Sex
		modVar_AF_EventGates['A32-BathroomSexEv-7'] = 36
	end
	
	if $ARGS[0] = 'AddProgress' and $ARGS[1] = 'A32-BathroomSexEv':
		if modVar_AF_EventProgress['A32-BathroomSexEv'] < ARGS[3]:
			modVar_AF_EventProgress['A32-BathroomSexEv'] += ARGS[2]
			if modVar_AF_EventProgress['A32-BathroomSexEv'] > ARGS[3] : modVar_AF_EventProgress['A32-BathroomSexEv'] = ARGS[3]
		end
	end
	
	if $ARGS[0] = 'RemoveProgress' and $ARGS[1] = 'A32-BathroomSexEv':
		modVar_AF_EventProgress['A32-BathroomSexEv'] -= ARGS[2]
		if modVar_AF_EventProgress['A32-BathroomSexEv'] < ARGS[3] : modVar_AF_EventProgress['A32-BathroomSexEv'] = ARGS[3]
	end

--- mod_addedflavour_A32_Functions ---------------------------------