Stripped clothing fix and cut some duplication.

locations/lug

@@ -142,56 +142,37 @@ if $ARGS[0] = 'prut2':
 	end
 
 	if temper >= 15 and month >= 5 and month <= 9:
-		if pcs_exhibition > 30 and pcs_horny >= 80:
+		if pcs_exhibition > 30:
 			act 'Strip off and skinny dip (1:00)':
 				cla
 				*clr
 				cumspclnt = 4
 				gs 'cum_cleanup'
-				minut = minut + 60
+				minut += 60
 				pcs_sweat = 10 + rand(0,4)
 				pcs_mood += 5
-				pcs_willpwr = pcs_willpwr + 5
 				if pcs_stren < 30: stren_exp += 1
+				exhibition_exp += 4
 				gs 'clothing', 'strip'
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/self/wetpussypants3.jpg"></center>'
-				'You strip off. A couple of passing men do a double-take and pause a moment to look at your sopping wet panties, probably thinking about what is making you so excited. You don''t care about what they might say or think of you.'
-				'You play around and have fun in the pond, enjoying the feel of the warm water on your naked body. The clean pond water refreshes and invigorates you.'
-				act'Get out and dress':gt 'lug', 'prut2'
-			end
-		elseif pcs_exhibition >= 40:
-			act 'Strip off and skinny dip (1:00)':
-				cla
-				*clr
-				cumspclnt = 4
-				gs 'cum_cleanup'
-				minut = minut + 60
-				pcs_sweat = 10 + rand(0,4)
-				pcs_mood += 5
-				pcs_willpwr = pcs_willpwr + 5
-				if pcs_stren < 30: stren_exp += 1
-				gs 'clothing', 'strip'
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/dress/undressnudebeach.jpg"></center>'
-				'Not caring if anyone is looking at you, you slowly take off your clothes.  You peel off each item like a stripper. You feel so naughty. Soon, you completely naked.'
-				'You play around and have fun in the pond, enjoying the feel of the warm water on your naked body. The clean pond water refreshes and invigorates you.'
-				act'Get out and dress':gt 'lug', 'prut2'
-			end
-		elseif pcs_exhibition > 30:
-			act 'Strip off and skinny dip (1:00)':
-				cla
-				*clr
-				cumspclnt = 4
-				gs 'cum_cleanup'
-				minut = minut + 60
-				pcs_sweat = 10 + rand(0,4)
-				pcs_mood += 5
-				pcs_willpwr = pcs_willpwr + 5
-				if pcs_stren < 30: stren_exp += 1
-				gs 'clothing', 'strip'
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/dress/undressnudebeach.jpg"></center>'
-				'You quickly check to see if anyone is watching, and when you''re satisfied no one is paying you undue attention, you take off your clothes.'
-				'You play around and have fun in the pond, enjoying the feel of the warm water on your naked body. The clean pond water refreshes and invigorates you.'
-				act'Get out and dress':gt 'lug', 'prut2'
+				gs 'underwear', 'remove'
+				if pcs_horny >= 80:
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/self/wetpussypants3.jpg"></center>'
+					'AS you strip off. A couple of passing men do a double-take and pause a moment to look at your sopping wet panties, probably thinking about what is making you so excited. You don''t care about what they might say or think of you and carry on stripping.'
+					'Once you are naked you play around and have fun in the pond, enjoying the feel of the warm water on your body. The clean pond water refreshes and invigorates you.'
+				elseif pcs_exhibition >= 40:
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/dress/undressnudebeach.jpg"></center>'
+					'Not caring if anyone is looking at you, you slowly take off your clothes.  You peel off each item like a stripper. You feel so naughty. Soon, you completely naked.'
+					'You play around and have fun in the pond, enjoying the feel of the warm water on your naked body. The clean pond water refreshes and invigorates you.'
+				else
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/dress/undressnudebeach.jpg"></center>'
+					'You quickly check to see if anyone is watching, and when you''re satisfied no one is paying you undue attention, you take off your clothes.'
+					'You play around and have fun in the pond, enjoying the feel of the warm water on your naked body. The clean pond water refreshes and invigorates you.'
+				end
+				act'Get out and dressed':
+					gs 'underwear', 'wear'
+					gs 'clothing', 'wear_last_worn'
+					gt 'lug', 'prut2'
+				end
 			end
 		else
 			'It would be a good place for skinny dipping but you''re too worry about what people would think to do such a thing.'