|
@@ -195,7 +195,13 @@ if $ARGS[0] = 'view_clothing_list':
|
|
|
end
|
|
|
|
|
|
if $ARGS[2] = '':
|
|
|
- '<center><a href="exec:$ward_list_store = ''gm'' & gt ''clothing'', ''view_clothing_list'', ''<<$ARGS[1]>>'', ''gm''"><img src="images/locations/city/citycenter/mall/gm.png"></a></center>'
|
|
|
+ if ARRSIZE('gm_outfits') > 0 or ARRSIZE('gm_dress') > 0:'<center><a href="exec:$ward_list_store = ''gm'' & gt ''clothing'', ''view_clothing_list'', ''<<$ARGS[1]>>'', ''gm''"><img src="images/locations/city/citycenter/mall/gm.png"></a></center>'
|
|
|
+
|
|
|
+ if ARRSIZE('gm_school') > 0:'<center><a href="exec:$ward_list_store = ''gm_school'' & gt ''clothing'', ''view_clothing_list'', ''<<$ward_list_page>>'', ''gm_school''"><img src="images/pc/items/gm/school.png"></a></center>'
|
|
|
+
|
|
|
+ if ARRSIZE('gm_office') > 0:'<center><a href="exec:$ward_list_store = ''gm_office'' & gt ''clothing'', ''view_clothing_list'', ''<<$ward_list_page>>'', ''gm_office''"><img src="images/pc/items/gm/officewear.png"></a></center>'
|
|
|
+
|
|
|
+ if ARRSIZE('gm_uniform') > 0:'<center><a href="exec:$ward_list_store = ''gm_uniform'' & gt ''clothing'', ''view_clothing_list'', ''<<$ward_list_page>>'', ''gm_uniform''"><img src="images/pc/items/gm/uniforms.png"></a></center>'
|
|
|
|
|
|
if ARRSIZE('misc_outfits') > 0:'<center><a href="exec:$ward_list_store = ''misc'' & gt ''clothing'', ''view_clothing_list'', ''<<$ward_list_page>>'', ''misc''"><img src="images/pc/items/misc/misc.png"></a></center>'
|
|
|
|
|
@@ -217,7 +223,7 @@ if $ARGS[0] = 'view_clothing_list':
|
|
|
|
|
|
if ARRSIZE('fancy_burlesque') > 0:'<center><a href="exec:$ward_list_store = ''fancypancy'' & gt ''clothing'', ''view_clothing_list'', ''<<$ward_list_page>>'', ''fancypancy''"><img src="images/locations/oldtown/fancypancy/shop_name.png"></a></center>'
|
|
|
|
|
|
- if ARRSIZE('fetish') > 0:'<center><a href="exec:$ward_list_store = ''sexshop'' & gt ''clothing'', ''view_clothing_list'', ''<<$ward_list_page>>'', ''sexshop''"><img src="images/locations/city/citycenter/sexshop/shop_name.png"></a></center>'
|
|
|
+ if ARRSIZE('eroto_dress') > 0 or ARRSIZE('eroto_outfits') > 0 or ARRSIZE('eroto_strip') > 0:'<center><a href="exec:$ward_list_store = ''sexshop'' & gt ''clothing'', ''view_clothing_list'', ''<<$ward_list_page>>'', ''sexshop''"><img src="images/locations/city/citycenter/sexshop/shop_name.png"></a></center>'
|
|
|
|
|
|
if ARRSIZE('exhibit') > 0:'<center><a href="exec:$ward_list_store = ''exhibitshop'' & gt ''clothing'', ''view_clothing_list'', ''<<$ward_list_page>>'', ''exhibitshop''"><img src="images/locations/oldtown/exhibitshop/shop_name.png"></a></center>'
|
|
|
|
|
@@ -248,20 +254,6 @@ if $ARGS[0] = 'view_clothing_list':
|
|
|
end
|
|
|
|
|
|
if $ARGS[2] = 'gm':
|
|
|
- if ARRSIZE('gm_outfits') > 0:'<center><a href="exec:$ward_list_store = ''gm_outfits'' & gt ''clothing'', ''view_clothing_list'', ''<<$ward_list_page>>'', ''gm_outfits''">G&M Outfits</a></center>'
|
|
|
-
|
|
|
- if ARRSIZE('gm_dress') > 0:'<center><a href="exec:$ward_list_store = ''gm_dress'' & gt ''clothing'', ''view_clothing_list'', ''<<$ward_list_page>>'', ''gm_dress''">G&M Dresses</a></center>'
|
|
|
-
|
|
|
- if ARRSIZE('gm_office') > 0:'<center><a href="exec:$ward_list_store = ''gm_office'' & gt ''clothing'', ''view_clothing_list'', ''<<$ward_list_page>>'', ''gm_office''">Office wear</a></center>'
|
|
|
-
|
|
|
- if ARRSIZE('gm_school') > 0:'<center><a href="exec:$ward_list_store = ''gm_school'' & gt ''clothing'', ''view_clothing_list'', ''<<$ward_list_page>>'', ''gm_school''">School uniforms</a></center>'
|
|
|
-
|
|
|
- if ARRSIZE('gm_uniform') > 0:'<center><a href="exec:$ward_list_store = ''gm_uniform'' & gt ''clothing'', ''view_clothing_list'', ''<<$ward_list_page>>'', ''gm_uniform''">Work uniforms</a></center>'
|
|
|
-
|
|
|
- act 'Return': killvar '$ward_list_store' & gt 'clothing', 'view_clothing_list', '<<$ward_list_page>>'
|
|
|
- end
|
|
|
-
|
|
|
- if $ARGS[2] = 'gm_outfits':
|
|
|
$ward_list_store = $ARGS[2]
|
|
|
i = 1
|
|
|
:loopgm_outfits
|
|
@@ -269,11 +261,6 @@ if $ARGS[0] = 'view_clothing_list':
|
|
|
i += 1
|
|
|
if i <= ARRSIZE('gm_outfits'):jump 'loopgm_outfits'
|
|
|
|
|
|
- act 'Return': killvar '$ward_list_store' & gt 'clothing', 'view_clothing_list', '<<$ward_list_page>>'
|
|
|
- gs 'clothing', 'clothwidth'
|
|
|
- end
|
|
|
-
|
|
|
- if $ARGS[2] = 'gm_dress':
|
|
|
$ward_list_store = $ARGS[2]
|
|
|
i = 1
|
|
|
:loopgm_dress
|
|
@@ -423,9 +410,6 @@ if $ARGS[0] = 'view_clothing_list':
|
|
|
i += 1
|
|
|
if i <= ARRSIZE('scandalicious_dress'):jump 'loopscandalicious_dress'
|
|
|
|
|
|
- act 'Return': killvar '$ward_list_store' & gt 'clothing', 'view_clothing_list', '<<$ward_list_page>>'
|
|
|
- gs 'clothing', 'clothwidth'
|
|
|
-
|
|
|
$ward_list_store = $ARGS[2]
|
|
|
i = 1
|
|
|
:loopscandalicious_outfits
|
|
@@ -445,9 +429,6 @@ if $ARGS[0] = 'view_clothing_list':
|
|
|
i += 1
|
|
|
if i <= ARRSIZE('scandalicious_bikinis'):jump 'loopscandalicious_bikinis'
|
|
|
|
|
|
- act 'Return': killvar '$ward_list_store' & gt 'clothing', 'view_clothing_list', '<<$ward_list_page>>'
|
|
|
- gs 'clothing', 'clothwidth'
|
|
|
-
|
|
|
$ward_list_store = $ARGS[2]
|
|
|
i = 1
|
|
|
:loopscandalicious_swimsuit
|
|
@@ -467,9 +448,6 @@ if $ARGS[0] = 'view_clothing_list':
|
|
|
i += 1
|
|
|
if i <= ARRSIZE('allure_bikinis'):jump 'loopallure_bikinis'
|
|
|
|
|
|
- act 'Return': killvar '$ward_list_store' & gt 'clothing', 'view_clothing_list', '<<$ward_list_page>>'
|
|
|
- gs 'clothing', 'clothwidth'
|
|
|
-
|
|
|
$ward_list_store = $ARGS[2]
|
|
|
i = 1
|
|
|
:loopallure_swimsuit
|
|
@@ -484,10 +462,30 @@ if $ARGS[0] = 'view_clothing_list':
|
|
|
if $ARGS[2] = 'sexshop':
|
|
|
$ward_list_store = $ARGS[2]
|
|
|
i = 1
|
|
|
- :loopfetish
|
|
|
- if fetish[i] = 1 and fetish_s[i] = cloc and ($clothingworntype ! 'fetish' or clothingwornnumber ! i):*P dyneval($clothing_list_line, $ARGS[1], 'fetish', i)
|
|
|
+ :looperoto_dress
|
|
|
+ if eroto_dress[i] = 1 and eroto_dress_s[i] = cloc and ($clothingworntype ! 'eroto_dress' or clothingwornnumber ! i):*P dyneval($clothing_list_line, $ARGS[1], 'eroto_dress', i)
|
|
|
i += 1
|
|
|
- if i <= ARRSIZE('fetish'):jump 'loopfetish'
|
|
|
+ if i <= ARRSIZE('eroto_dress'):jump 'looperoto_dress'
|
|
|
+
|
|
|
+ act 'Return': killvar '$ward_list_store' & gt 'clothing', 'view_clothing_list', '<<$ward_list_page>>'
|
|
|
+ gs 'clothing', 'clothwidth'
|
|
|
+
|
|
|
+ $ward_list_store = $ARGS[2]
|
|
|
+ i = 1
|
|
|
+ :looperoto_outfits
|
|
|
+ if eroto_outfits[i] = 1 and eroto_outfits_s[i] = cloc and ($clothingworntype ! 'eroto_outfits' or clothingwornnumber ! i):*P dyneval($clothing_list_line, $ARGS[1], 'eroto_outfits', i)
|
|
|
+ i += 1
|
|
|
+ if i <= ARRSIZE('eroto_outfits'):jump 'looperoto_outfits'
|
|
|
+
|
|
|
+ act 'Return': killvar '$ward_list_store' & gt 'clothing', 'view_clothing_list', '<<$ward_list_page>>'
|
|
|
+ gs 'clothing', 'clothwidth'
|
|
|
+
|
|
|
+ $ward_list_store = $ARGS[2]
|
|
|
+ i = 1
|
|
|
+ :looperoto_strip
|
|
|
+ if eroto_strip[i] = 1 and eroto_strip_s[i] = cloc and ($clothingworntype ! 'eroto_strip' or clothingwornnumber ! i):*P dyneval($clothing_list_line, $ARGS[1], 'eroto_strip', i)
|
|
|
+ i += 1
|
|
|
+ if i <= ARRSIZE('eroto_strip'):jump 'looperoto_strip'
|
|
|
|
|
|
act 'Return': killvar '$ward_list_store' & gt 'clothing', 'view_clothing_list', '<<$ward_list_page>>'
|
|
|
gs 'clothing', 'clothwidth'
|
|
@@ -700,28 +698,7 @@ if $ARGS[0] = 'view_clothing_item':
|
|
|
if CloStyle = 5:h = 20
|
|
|
h += (3 * CloQuality)
|
|
|
money -= price
|
|
|
- dynamic $ARGS[2] + '[<<ARGS[3]>>] = 1'
|
|
|
- if $ARGS[2] = 'gm_outfits' or $ARGS[2] = 'gm_dress' or $ARGS[2] = 'gm_office':
|
|
|
- dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 70 + <<h>>'
|
|
|
- elseif $ARGS[2] = 'cats_dress' or $ARGS[2] = 'cats_outfits' or $ARGS[2] = 'flamingos_dress' or $ARGS[2] = 'flamingos_outfits' or $ARGS[2] = 'coco_dress' or $ARGS[2] = 'coco_outfits':
|
|
|
- dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 90 + <<h>>'
|
|
|
- elseif $ARGS[2] = 'moncheri':
|
|
|
- dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 15 + <<h>>'
|
|
|
- elseif $ARGS[2] = 'fetish' or $ARGS[2] = 'exhibit' or $ARGS[2] = 'fancy_burlesque':
|
|
|
- dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 35 + <<h>>'
|
|
|
- elseif $ARGS[2] = 'gm_school' or $ARGS[2] = 'gm_uniform':
|
|
|
- dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 120 + <<h>>'
|
|
|
- elseif $ARGS[2] = 'exercise':
|
|
|
- dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 100 + <<h>>'
|
|
|
- elseif $ARGS[2] = 'coat':
|
|
|
- dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 250 + <<h>>'
|
|
|
- else
|
|
|
- dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 60 + <<h>>'
|
|
|
- end
|
|
|
- dynamic $ARGS[2] + '_b[<<ARGS[3]>>] = pcs_hips'
|
|
|
- dynamic $ARGS[2] + '_s[<<ARGS[3]>>] = 0'
|
|
|
- gs 'stat'
|
|
|
- gt $loc, $loc_arg
|
|
|
+ gs 'clothing', 'view_clothing_item_buy', $ARGS[1], $ARGS[2], ARGS[3], ARGS[4]
|
|
|
end
|
|
|
end
|
|
|
if karta + bankDebtLimit >= Price:
|
|
@@ -731,30 +708,7 @@ if $ARGS[0] = 'view_clothing_item':
|
|
|
if CloStyle = 5:h = 20
|
|
|
h += (3 * CloQuality)
|
|
|
karta -= price
|
|
|
- dynamic $ARGS[2] + '[<<ARGS[3]>>] = 1'
|
|
|
- if $ARGS[2] = 'gm_outfits' or $ARGS[2] = 'gm_dress' or $ARGS[2] = 'gm_office':
|
|
|
- dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 70 + <<h>>'
|
|
|
- elseif $ARGS[2] = 'cats_dress' or $ARGS[2] = 'cats_outfits' or $ARGS[2] = 'flamingos_dress' or $ARGS[2] = 'flamingos_outfits' or $ARGS[2] = 'coco_dress' or $ARGS[2] = 'coco_outfits':
|
|
|
- dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 90 + <<h>>'
|
|
|
- elseif $ARGS[2] = 'moncheri':
|
|
|
- dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 15 + <<h>>'
|
|
|
- elseif $ARGS[2] = 'market':
|
|
|
- dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 10 + <<h>>'
|
|
|
- elseif $ARGS[2] = 'fetish' or $ARGS[2] = 'exhibit' or $ARGS[2] = 'fancy_burlesque':
|
|
|
- dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 35 + <<h>>'
|
|
|
- elseif $ARGS[2] = 'gm_school' or $ARGS[2] = 'gm_uniform':
|
|
|
- dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 120 + <<h>>'
|
|
|
- elseif $ARGS[2] = 'exercise':
|
|
|
- dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 100 + <<h>>'
|
|
|
- elseif $ARGS[2] = 'coat':
|
|
|
- dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 250 + <<h>>'
|
|
|
- else
|
|
|
- dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 60 + <<h>>'
|
|
|
- end
|
|
|
- dynamic $ARGS[2] + '_b[<<ARGS[3]>>] = pcs_hips'
|
|
|
- dynamic $ARGS[2] + '_s[<<ARGS[3]>>] = 0'
|
|
|
- gs 'stat'
|
|
|
- gt $loc, $loc_arg
|
|
|
+ gs 'clothing', 'view_clothing_item_buy', $ARGS[1], $ARGS[2], ARGS[3], ARGS[4]
|
|
|
end
|
|
|
end
|
|
|
end
|
|
@@ -914,6 +868,31 @@ if $ARGS[0] = 'view_clothing_item':
|
|
|
end
|
|
|
end
|
|
|
|
|
|
+if $ARGS[0] = 'view_clothing_item_buy':
|
|
|
+ dynamic $ARGS[2] + '[<<ARGS[3]>>] = 1'
|
|
|
+ if $ARGS[2] = 'gm_outfits' or $ARGS[2] = 'gm_dress' or $ARGS[2] = 'gm_office':
|
|
|
+ dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 70 + <<h>>'
|
|
|
+ elseif $ARGS[2] = 'cats_dress' or $ARGS[2] = 'cats_outfits' or $ARGS[2] = 'flamingos_dress' or $ARGS[2] = 'flamingos_outfits' or $ARGS[2] = 'coco_dress' or $ARGS[2] = 'coco_outfits':
|
|
|
+ dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 90 + <<h>>'
|
|
|
+ elseif $ARGS[2] = 'moncheri':
|
|
|
+ dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 15 + <<h>>'
|
|
|
+ elseif $ARGS[2] = 'eroto_dress' or $ARGS[2] = 'eroto_outfits' or $ARGS[2] = 'eroto_strip' or $ARGS[2] = 'exhibit' or $ARGS[2] = 'fancy_burlesque':
|
|
|
+ dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 35 + <<h>>'
|
|
|
+ elseif $ARGS[2] = 'gm_school' or $ARGS[2] = 'gm_uniform':
|
|
|
+ dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 120 + <<h>>'
|
|
|
+ elseif $ARGS[2] = 'exercise':
|
|
|
+ dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 100 + <<h>>'
|
|
|
+ elseif $ARGS[2] = 'coat':
|
|
|
+ dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 250 + <<h>>'
|
|
|
+ else
|
|
|
+ dynamic $ARGS[2] + '_h[<<ARGS[3]>>] = 60 + <<h>>'
|
|
|
+ end
|
|
|
+ dynamic $ARGS[2] + '_b[<<ARGS[3]>>] = pcs_hips'
|
|
|
+ dynamic $ARGS[2] + '_s[<<ARGS[3]>>] = 0'
|
|
|
+ gs 'stat'
|
|
|
+ gt $loc, $loc_arg
|
|
|
+end
|
|
|
+
|
|
|
if $ARGS[0] = 'strip':
|
|
|
!$ARGS[1] = location when stripping outdoors
|
|
|
if $clothingworntype = 'nude': exit
|