[changed] Streamlining of Fashionista changing rooms to make it a lot less button clicky

locations/shop_fashionista.qsrc

@@ -19,6 +19,7 @@ if $ARGS[0] = 'start':
 	'<center><b><font color="maroon">Fashionista</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/fashionista/fashionista.jpg"</center>'
 	'This shop features many big name brands and designer clothing. Even their bags look cool.'
+	'You can try on outfits via the changing room.'
 	
 	act 'Leave':
 		minut += 3
@@ -28,7 +29,21 @@ if $ARGS[0] = 'start':
 
 	act 'View purses': minut += 5 & gt 'shop_fashionista', 'purses'
 	
-	act 'Try on some clothes': gt 'shop_fashionista', 'changingroom'
+	if $pantyworntype ! 'none':
+		act 'Enter changing room (strip to underwear)':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/fashionista/underwear.jpg"</center>'
+			gs 'clothing', 'strip'
+			gs 'shop_fashionista', 'changingroom', 1
+		end
+	end
+
+	act 'Enter changing room (strip naked)':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/fashionista/nude.jpg"</center>'
+		gs 'clothing', 'strip_all'
+		gs 'shop_fashionista', 'changingroom', 1
+	end
 end
 
 if $ARGS[0] = 'changingroom':
@@ -40,9 +55,13 @@ if $ARGS[0] = 'changingroom':
 	gs 'stat'
 	menu_off = 0
 	
-	*clr & cla
-	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/fashionista/changingroom.jpg"</center>'
-	'As you walk through the store you notice that there''s nobody in the changing rooms. Feeling a bit bored, you go look at some clothes and grab several items to try on before heading into one of the changing rooms.'
+	if $ARGS[1] = '':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/fashionista/changingroom.jpg"</center>'
+		'You are in the changing rooms in Fashionista with several outfits available to try on.'
+	else
+		'As you walk through the store you notice that there''s nobody in the changing rooms. Feeling a bit bored, you go look at some clothes and grab several items to try on before heading into one of the changing rooms.'
+	end
 	*nl
 	gs 'shortgs', 'clothing_state'
 	
@@ -78,47 +97,19 @@ if $ARGS[0] = 'changingroom':
 		end
 		act 'Try on panties': gt 'shop_fashionista', 'dressingpanties'
 	end
-	if $clothingworntype = 'nude':
-		act 'Put on clothes':
-			*clr & cla
-			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/fashionista/dressed.jpg"</center>'
-			gs 'clothing', 'wear_last_worn'
-			act 'Stay in the changing room': gt 'shop_fashionista', 'changingroom'
-			act 'Get dressed and go back to the store': gt 'shop_fashionista', 'changingend'
-		end
-	end
-	if $clothingworntype ! 'nude' and $pantyworntype ! 'none':
-		act 'Strip to your underwear':
-			*clr & cla
-			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/fashionista/underwear.jpg"</center>'
-			gs 'clothing', 'strip'
-			act 'Stay in the changing room': gt 'shop_fashionista', 'changingroom'
-			act 'Get dressed and go back to the store': gt 'shop_fashionista', 'changingend'
-		end
-	end
-	if $clothingworntype = 'nude' and $pantyworntype = 'none':
+	if $pantyworntype = 'none':
 		act 'Put on underwear':
-			*clr & cla
-			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/fashionista/underwear.jpg"</center>'
 			gs 'underwear', 'wear'
-			act 'Stay in the changing room': gt 'shop_fashionista', 'changingroom'
-			act 'Get dressed and go back to the store': gt 'shop_fashionista', 'changingend'
+			gt 'shop_fashionista', 'changingroom'
 		end
 	end
-	if $clothingworntype ! 'nude' or $pantyworntype ! 'none':
+	if $pantyworntype ! 'none':
 		act 'Get naked':
-			*clr & cla
-			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/fashionista/nude.jpg"</center>'
 			gs 'clothing', 'strip_all'
-			act 'Stay in the changing room': gt 'shop_fashionista', 'changingroom'
-			act 'Get dressed and go back to the store': gt 'shop_fashionista', 'changingend'
+			gt 'shop_fashionista', 'changingroom'
 		end
 	end
-	if $clothingworntype = 'nude':
-		act 'Get dressed and go back to the store': gt 'shop_fashionista', 'changingend'
-	else
-		act 'Go back to the store': gt 'shop_fashionista', 'changingend'
-	end
+	act 'Get dressed and go back to the store': gt 'shop_fashionista', 'changingend'
 end
 
 if $ARGS[0] = 'dressingclothes':