[fixed] Wrong arousal call used for sex act

locations/succubus.qsrc

@@ -500,7 +500,8 @@ if $ARGS[0] = 'training3sex':
 		suclezsex = lesbian
 		if tatianaSex = 0: tatianaSex = 1 & girl += 1
 		$orgasm_or = 'no'
-		gs 'arousal', 'vaginal', 15 * rand(1,8), 'dom'
+		gs 'arousal', 'cuni', 15 * rand(1,8), 'dom'
+		gs 'arousal', 'cuni_give', -15, 'dom'
 		gs 'arousal', 'end'
 		tatisucsex += 1
 		if tatisucsex = 0: tatisucsex = 1