a few more clothing fix related to "_s"

locations/clothing.qsrc

@@ -947,7 +947,7 @@ if $ARGS[0] = 'wear':
 
 	gs 'clothing_attributes', $ARGS[1], ARGS[2]
 
-	dynamic '<<$ARGS[1]>>S[<<ARGS[2]>>] = 0'
+	dynamic '<<$ARGS[1]>>_s[<<ARGS[2]>>] = 0'
 
 	if CloStyle2 = 4:
 		$schbrand = $clothingworntype

locations/pav_train.qsrc

@@ -226,8 +226,8 @@ if kidalob = 0:
 				*clr & cla
 				!! ths will either add the sundress or simply set it to a certain damage level
 				dynamic '<<$clothingworntype>>[<<clothingwornnumber>>] = 0'
-				dynamic '<<$clothingworntype>>H[<<clothingwornnumber>>] = 0'
-				dynamic '<<$clothingworntype>>S[<<clothingwornnumber>>] = 0'
+				dynamic '<<$clothingworntype>>_h[<<clothingwornnumber>>] = 0'
+				dynamic '<<$clothingworntype>>_s[<<clothingwornnumber>>] = 0'
 				gm_dress[52] = 1
 				gm_dress_h[52] = 20
 				gm_dress_b[52] = pcs_hips

locations/portnoi.qsrc

@@ -5,27 +5,27 @@ $batch_sell = {
 	dynamic 'RESULT = <<$ARGS[0]>>H[<<ARGS[1]>>]'
 	if RESULT > 100:
 		dynamic '<<$ARGS[0]>>[<<ARGS[1]>>] = 0'
-		dynamic '<<$ARGS[0]>>S[<<ARGS[1]>>] = 0'
+		dynamic '<<$ARGS[0]>>_s[<<ARGS[1]>>] = 0'
 		money += 750
 		selltot += 750
 	elseif RESULT > 45:
 		dynamic '<<$ARGS[0]>>[<<ARGS[1]>>] = 0'
-		dynamic '<<$ARGS[0]>>S[<<ARGS[1]>>] = 0'
+		dynamic '<<$ARGS[0]>>_s[<<ARGS[1]>>] = 0'
 		money += 500
 		selltot += 500
 	elseif RESULT > 30:
 		dynamic '<<$ARGS[0]>>[<<ARGS[1]>>] = 0'
-		dynamic '<<$ARGS[0]>>S[<<ARGS[1]>>] = 0'
+		dynamic '<<$ARGS[0]>>_s[<<ARGS[1]>>] = 0'
 		money += 300
 		selltot += 300
 	elseif RESULT > 0:
 		dynamic '<<$ARGS[0]>>[<<ARGS[1]>>] = 0'
-		dynamic '<<$ARGS[0]>>S[<<ARGS[1]>>] = 0'
+		dynamic '<<$ARGS[0]>>_s[<<ARGS[1]>>] = 0'
 		money += 100
 		selltot += 100
 	else
 		dynamic '<<$ARGS[0]>>[<<ARGS[1]>>] = 0'
-		dynamic '<<$ARGS[0]>>S[<<ARGS[1]>>] = 0'
+		dynamic '<<$ARGS[0]>>_s[<<ARGS[1]>>] = 0'
 	end
 }