[fixed] added worn out block for prostitute and sport outfits

locations/prostitution_functions.qsrc

@@ -482,6 +482,10 @@ end
 
 
 if $ARGS[0] = 'change_into_prostitute_outfit':
+	if dyneval('RESULT = <<$prostitute["clothingworntype"]>>_h[<<prostitute["clothingwornnumber"]>>]') <= 0:
+		msg '<font color="red">Unavailable as outfit is worn out!</font>'
+		exit
+	end
 	!! if last outfit is sport outfit
 	gs 'wardrobe', 'is_sport'
 	gs 'wardrobe', 'back_to_regular_clothes'

locations/wardrobe.qsrc

@@ -927,7 +927,7 @@ if $ARGS[0] = 'default_sport_options':
 	else
 		gs 'wardrobe', 'is_sport'
 		!! check to see if sports outfit is worn out
-		if dyneval('RESULT = <<$defclothingtype[default_sport_number]>>_h[<<defclothingnumber[default_sport_number]>>]') = 0:
+		if dyneval('RESULT = <<$defclothingtype[default_sport_number]>>_h[<<defclothingnumber[default_sport_number]>>]') <= 0:
 			act 'Put on your sports clothes': msg '<font color="red">Unavailable as outfit is worn out!</font>'
 		!! check to see that player is not wearing default sports outfit
 		elseif default_sport_number[2] ! 5: