# shop_coco_carmen
if $ARGS[0] = 'start':
$loc_arg = $ARGS[0]
$loc = 'shop_coco_carmen'
$location_type = 'public_indoors'
$menu_loc = 'shop_coco_carmen'
$menu_arg = 'start'
menu_off = 0
*clr & cla
mag = 1
gs 'stat'
gs 'themes', 'indoors'
'
Coco Carmen'
'> src="images/locations/pavlovsk/coco/shop.jpg">'
*nl
'If you are happy to push through the tourists Coco has everything a young adult might like to wear. It''s a step up from G&M and unless you can afford the boutiques in Old Town you''ll be spending some time buying outfits here.'
act 'Leave the coco': minut += 3 & gt 'pav_commercial'
act 'View dresses': minut += 5 & gt 'shop_coco_carmen', 'dress'
act 'View other outfits': minut += 5 & gt 'shop_coco_carmen', 'outfits'
act 'View purses': minut += 5 & gt 'shop_coco_carmen', 'purses'
end
if $ARGS[0] = 'dress':
$loc_arg = 'dress'
$loc = 'shop_coco_carmen'
$menu_loc = 'shop_coco_carmen'
$menu_arg = 'dress'
menu_off = 0
*clr & cla
gs'stat'
'Viewing Coco Carmen dresses'
*nl
gs 'clothing_QV', 'shop_header'
act 'Return': minut += 1 & gt 'shop_coco_carmen', 'start'
clothingfilter['qualitycheck'] = 7
:loopquality_dress
if Clothingstock > 11:
i = 1
else
i = 2
end
:loopcoco_dress
if coco_dress[i] = 0:
gs 'clothing_attributes', 'coco_dress', i
gs 'clothing_QV', 'shop_filter'
if clothingfilter['quality'] = 0 or clothingfilter['qualitycheck'] = CloQuality:
if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p ''
end
end
i += 2
if i <= 100:jump 'loopcoco_dress'
if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality_dress'
end
if $ARGS[0] = 'coco_dress':
cla
menu_off = 1
if coco_dress[i] ! 0:
msg 'You already own this dress.'
gt 'shop_coco_carmen', 'dress'
end
gt 'clothing', 'view_clothing_item', 'shop', 'coco_dress',i, 3000
end
if $ARGS[0] = 'outfits':
$loc_arg = 'outfits'
$loc = 'shop_coco_carmen'
$menu_loc = 'shop_coco_carmen'
$menu_arg = 'outfits'
menu_off = 0
*clr & cla
gs'stat'
'Viewing Coco Carmen outfits'
*nl
gs 'clothing_QV', 'shop_header'
act 'Return': minut += 1 & gt 'shop_coco_carmen', 'start'
clothingfilter['qualitycheck'] = 7
:loopquality_outfits
if Clothingstock > 11:
i = 1
else
i = 2
end
:loopcoco_outfits
if coco_outfits[i] = 0:
gs 'clothing_attributes', 'coco_outfits', i
gs 'clothing_QV', 'shop_filter'
if clothingfilter['quality'] = 0 or clothingfilter['qualitycheck'] = CloQuality:
if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p ''
end
end
i += 2
if i <= 90:jump 'loopcoco_outfits'
if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality_outfits'
end
if $ARGS[0] = 'coco_outfits':
cla
menu_off = 1
if coco_outfits[i] ! 0:
msg 'You already own this outfit.'
gt 'shop_coco_carmen', 'outfits'
end
gt 'clothing', 'view_clothing_item', 'shop', 'coco_outfits',i, 3000
end
if $ARGS[0] = 'shoes':
$loc_arg = $ARGS[0]
$loc = 'shop_coco_carmen'
$menu_loc = 'shop_coco_carmen'
$menu_arg = 'shoes'
menu_off = 0
*clr & cla
gs'stat'
act 'Return': minut += 1 & gt 'shop_coco_carmen', 'start'
if Clothingstock > 11:
i = 1
else
i = 2
end
:loopcoco_shoes
if scoco[i] = 0:*p ''
i += 2
if i <= 37:jump 'loopcoco_shoes'
end
if $ARGS[0] = 'purses':
$loc_arg = 'purses'
$loc = 'shop_coco_carmen'
$menu_loc = 'shop_coco_carmen'
$menu_arg = 'purses'
menu_off = 0
*clr & cla
gs'stat'
act 'Return': minut += 1 & gt 'shop_coco_carmen', 'start'
i = 1
:loopcoco_purses
if coco_purses[i] = 0:*p ' '
i += 1
if i <= 20:jump 'loopcoco_purses'
end
if $ARGS[0] = 'purses2': gt 'purses', 'view_purse_item', 'shop', 'coco',i, 2000
--- shop_coco_carmen ---------------------------------