[added] Payment type for auto buying outfits

locations/clothing.qsrc

@@ -1934,6 +1934,7 @@ end
 !! ARGS[1] = store price
 !! $ARGS[2] = item_type
 !! ARGS[3] = item number
+!! $ARGS[4] = 'money' or 'karta' for payment type
 if ARGS[0] = 'quick_buy':
 	price = ('<<ARGS[1]>>' * ((5 * CloQuality) + 100) / 100) * 1000 / (1250 - Clothingstock[ARGS[3]]) * 3 / 2
 	price = price / 50 * 50
@@ -1941,7 +1942,7 @@ if ARGS[0] = 'quick_buy':
 	if CloStyle = 2:h = 10
 	if CloStyle = 5:h = 20
 	h += (3 * CloQuality)
-	money -= price
+	dynamic '<<$ARGS[4]>> -= price'
 	gs 'clothing', 'view_clothing_item_buy', 'skip', $ARGS[2], ARGS[3], ARGS[1]
 end