[fixed] was returning negative bonus for underwear in appearance if not wearing any

locations/AppearanceSystem.qsrc

@@ -188,24 +188,33 @@ if $ARGS[0] = 'CalcAccessoriesBonus':
 	shoesQualityBonus = ARGS[2] & !! PShoQuality
 
 	!!bonuses for certain underwear
-	if PanQuality = 6:
-		pantyBonus = 4
-	elseif PanQuality = 5:
-		pantyBonus = 3
-	elseif PanQuality >= 3:
-		pantyBonus = 2
+	if $pantyworntype = 'none':
+		pantyBonus = 0:
 	else
-		pantyBonus = PanQuality - 1
+		if PanQuality = 6:
+			pantyBonus = 4
+		elseif PanQuality = 5:
+			pantyBonus = 3
+		elseif PanQuality >= 3:
+			pantyBonus = 2
+		else
+			pantyBonus = PanQuality - 1
+		end
 	end
 
-	if BraQuality = 6:
-		braBonus = 4
-	elseif BraQuality = 5:
-		braBonus = 3
-	elseif BraQuality >= 3:
-		braBonus = 2
+
+	if $braworntype = 'none':
+		braBonus = 0:
 	else
-		braBonus = BraQuality - 1
+		if BraQuality = 6:
+			braBonus = 4
+		elseif BraQuality = 5:
+			braBonus = 3
+		elseif BraQuality >= 3:
+			braBonus = 2
+		else
+			braBonus = BraQuality - 1
+		end
 	end
 
 	result = coatQualityBonus + shoesQualityBonus + pantyBonus + braBonus