[fixed] Starting purse and clothing bugs spotted by DeusExLibris and gave Goth better undies and coat while I was there

locations/preCUST.qsrc

@@ -371,7 +371,7 @@ if $ARGS[0] = 'Done':
 
 !! Adding underwear and default shoes and assigning them
 
-	if $ARGS[1] ! 'CSB':
+	if $ARGS[1] ! 'CSB' and goth_clothing ! 1:
 		cheap_panties[37] = 1
 		cheap_bras[11] = 1
 		$pantyworntype = 'cheap'
@@ -400,9 +400,14 @@ if $ARGS[0] = 'Done':
 		sportsclothingnumber = 29
 		gs 'clothing', 'wear', 'cheap', 370
 	elseif goth_clothing = 1:
-		killvar 'goth_clothing'
-		exercise[4] = 1
-		exerciseH[4] = 100
+		kats_panties[44] = 1
+		kats_bras[28] = 1
+		$pantyworntype = 'kats'
+		pantywornnumber = 44
+		$braworntype = 'kats'
+		brawornnumber = 28
+		exercise[45] = 1
+		exerciseH[45] = 100
 		strainers[21] = 1
 		sgandm[43] = 1
 		shoewornnumber = 43
@@ -561,9 +566,6 @@ if $ARGS[0] = 'Done':
 		sportsclothingnumber = 58
 		gs 'clothing', 'wear', 'cheap', 118
 	end
-	coat[5] = 1
-	coatH[5] = 200
-	defaultcoat = 5
 	if swim_start = 58:
 		swimwear[58] = 1
 		swimwearH[58] = 60
@@ -578,18 +580,33 @@ if $ARGS[0] = 'Done':
 		swimwearB[69] = pcs_hips
 	end
 	
-!!setting default exercise outfit
-	if $ARGS[1] ! 'CSB':
-		sportspantynumber = 37
-		sportsbranumber = 11
+!!setting default exercise outfit and setting coats
+	if goth_clothing = 1:
+		killvar 'goth_clothing'
+		sportspantynumber = 44
+		sportsbranumber = 28
+		$sportsbratype = 'kats'
+		$sportspantytype = 'kats'
+		coat[14] = 1
+		coatH[14] = 200
+		defaultcoat = 14
+		sportscoat = 14
 	else
-		sportspantynumber = 5
-		sportsbranumber = 12
+		if $ARGS[1] ! 'CSB':
+			sportspantynumber = 37
+			sportsbranumber = 11
+		else
+			sportspantynumber = 5
+			sportsbranumber = 12
+		end
+		$sportsbratype = 'cheap'
+		$sportspantytype = 'cheap'
+		coat[5] = 1
+		coatH[5] = 200
+		defaultcoat = 5
+		sportscoat = 5	
 	end
-	$sportsbratype = 'cheap'
-	$sportspantytype = 'cheap'
 	sportsshoenumber = 21
-	sportscoat = 5	
 	$sportspursetype = $currentpursetype
 	sportspursenumber = currentpursenumber
 	$sports_clothing_name = 'default sports outfit'

locations/preSYS.qsrc

@@ -617,7 +617,7 @@ if $ARGS[0] = 'nerdqueen':
 		pcs_heels = 10
 		pirsC = 2
 		PirsC2_owned = 1
-		$currentpursetype = 'cheap'
+		$currentpursetype = 'fashionista'
 		currentpursenumber = 13
 		fashionista_purses[13] = 1
 		bag = 1
@@ -737,7 +737,7 @@ if $ARGS[0] = 'jock':
 	swim_start = 69
 	pirsC = 1
 	PirsC1_owned = 1
-	$currentpursetype = 'cheap'
+	$currentpursetype = 'fashionista'
 	currentpursenumber = 11
 	fashionista_purses[11] = 1
 	bag = 1
@@ -865,7 +865,7 @@ if $ARGS[0] = 'football':
 		npc_rel['A34'] += 10
 		grupvalue[2] = 65
 		willpowermax = 140
-		$currentpursetype = 'cheap'
+		$currentpursetype = 'fashionista'
 		currentpursenumber = 11
 		fashionista_purses[11] = 1
 		bag = 1
@@ -953,7 +953,7 @@ if $ARGS[0] = 'beautiful':
 			pcs_lip = 3
 			pcs_lashes = 2
 		end
-		pcs_skin = 25
+		pcs_skin = 100
 		pcs_tan = 50
 		genbsize = 37
 		pcs_inhib = 25