[fixed] Had the stripping to clear underwear directly after the bit where you wear it. Doh!

locations/bras.qsrc

@@ -451,9 +451,6 @@ if $ARGS[0] = 'wear2':
 	!! ARGS 1 - bras type name
 	!! ARGS 2 - bras index
 
-	$braworntype = $ARGS[1]
-	brawornnumber = ARGS[2]
-
 !! removing bra or bodysuit if worn
 	if underwear['type'] = 0:
 		gs 'bras', 'remove'
@@ -462,6 +459,9 @@ if $ARGS[0] = 'wear2':
 	end
 	underwear['type'] = 0
 
+	$braworntype = $ARGS[1]
+	brawornnumber = ARGS[2]
+
 	dynamic $ARGS[1] + '_w[<<ARGS[2]>>] = 1'
 
 	gs 'underwear_attributes', $ARGS[1], ARGS[2]

locations/panties.qsrc

@@ -462,9 +462,6 @@ if $ARGS[0] = 'wear2':
 	!! ARGS 1 - panties type name
 	!! ARGS 2 - panties index
 
-	$pantyworntype = $ARGS[1]
-	pantywornnumber = ARGS[2]
-
 !! removing panties or bodysuit if worn
 	if underwear['type'] = 0:
 		gs 'panties', 'remove'
@@ -473,6 +470,9 @@ if $ARGS[0] = 'wear2':
 	end
 	underwear['type'] = 0
 
+	$pantyworntype = $ARGS[1]
+	pantywornnumber = ARGS[2]
+
 	dynamic $ARGS[1] + '_w[<<ARGS[2]>>] = 1'
 
 	gs 'underwear_attributes', $ARGS[1], ARGS[2]

locations/underwear_bodysuits.qsrc

@@ -261,12 +261,6 @@ if $ARGS[0] = 'wear2':
 	!! ARGS 1 - bodysuits type name
 	!! ARGS 2 - bodysuits index
 
-
-	$bodysuitworntype = $ARGS[1]
-	bodysuitwornnumber = ARGS[2]
-	$pantyworntype = 'bodysuit'
-	$braworntype = 'bodysuit'
-
 !! removing bra and panties or bodysuit if worn
 	if underwear['type'] = 0:
 		gs 'panties', 'remove'
@@ -276,6 +270,11 @@ if $ARGS[0] = 'wear2':
 	end
 	underwear['type'] = 2
 
+	$bodysuitworntype = $ARGS[1]
+	bodysuitwornnumber = ARGS[2]
+	$pantyworntype = 'bodysuit'
+	$braworntype = 'bodysuit'
+
 	dynamic $ARGS[1] + '_w[<<ARGS[2]>>] = 1'
 
 	gs 'underwear_attributes', $ARGS[1], ARGS[2]