[fixed] Underwear state was not being maintained after sex with Nat and Kat

locations/katja_sex.qsrc

@@ -565,6 +565,10 @@ if $ARGS[0] = 'katnatsex1':
 	'You grab Katja''s hand and exit the shop, followed by a meekly Natasha. The journey back seems to take an eternity as the two girls eye one another silently, but finally, you enter Katjas''s room, quickly undress and jump onto the bed.'
 	'"So girls, how do we begin?"'
 	'The girls strip slower than you, and you can see Katja ogling a blushing (but not embarrassed) Natasha. They then jumps on the bed and looks at you expectantly.'
+	$lastwornpantytype['event'] = $pantyworntype
+	lastwornpantynumber['event'] = pantywornnumber
+	$lastwornbratype['event'] = $braworntype
+	lastwornbranumber['event'] = brawornnumber
 	gs 'clothing', 'strip_all'
 
 	act 'Katja':
@@ -836,7 +840,13 @@ if $ARGS[0] = 'katnatsex2':
 	'"Hm?! What? <<$pcs_nickname>>? Huff! I''m wasted! That was nice... Hm? Where is Natasha?"'
 	'Kissing her, you explain to the redhead that Natasha has just left and then you snuggle against Katja, enjoying her company until you think it''s time to redress.'
 
-	act 'Redress and leave': gs 'clothing', 'wear_last_worn' & gs 'underwear', 'wear' & minut += 20 & gt 'pav_residential'
+	act 'Redress and leave':
+		minut += 20
+		gs 'clothing', 'wear_last_worn'
+		gs 'panties', 'wear', $lastwornpantytype['event'], lastwornpantynumber['event']
+		gs 'bras', 'wear', $lastwornbratype['event'], lastwornbranumber['event']
+		gt 'pav_residential'
+	end
 end
 
 if $ARGS[0] = 'katnatsex3':
@@ -859,7 +869,13 @@ if $ARGS[0] = 'katnatsex3':
 	'You turn surprised towards the redhead... Shit! Before you can retort, a horny and frustrated Natasha gets up and begins to redress, giving you a nice glance of her body, but before she leaves, Katja grabs her hand and kisses the nerd''s mouth. After a few moments, she releases Natasha, who remains by the bedside a moment, before quickly exiting the room.'
 	'Katja is silent for a while, caressing your belly before sighing and redressing. She doesn''t say anything, but you doubt she is happy.'
 
-	act 'Redress and leave': gs 'clothing', 'wear_last_worn' & gs 'underwear', 'wear' & minut += 20 & gt 'pav_residential'
+	act 'Redress and leave':
+		minut += 20
+		gs 'clothing', 'wear_last_worn'
+		gs 'panties', 'wear', $lastwornpantytype['event'], lastwornpantynumber['event']
+		gs 'bras', 'wear', $lastwornbratype['event'], lastwornbranumber['event']
+		gt 'pav_residential'
+	end
 end
 
 if $ARGS[0] = 'first_fisting':