# shop_allure
if $ARGS[0] = 'start':
$loc = 'shop_allure'
$loc_arg = 'start'
$location_type = 'public_indoors'
cls
CLOSE ALL
menu_off = 0
gs 'stat'
gs 'themes', 'indoors'
'
shop_allure'
if allure_pos = 1:
''
else
''
end
*nl
'This shop has the feel of a summer at the beach, which you''d expect seeing as it sells swimwear.'
*nl
act 'Leave':
cla
minut += 3
if allure_pos = 1:
minut += 3
gt 'pav_commercial'
else
gt 'city_lake', 'start'
end
end
act 'View swimsuits':
cla
minut += 5
gt 'shop_allure', 'swim'
end
act 'View bikinis':
cla
minut += 5
gt 'shop_allure', 'bikinis'
end
end
if $ARGS[0] = 'swim':
$loc_arg = 'swim'
$loc = 'shop_allure'
cls
gs'stat'
'Swimsuits - one size fits all'
*nl
gs 'clothing_QV', 'shop_header'
act 'Return':
cla
minut += 1
gt 'shop_allure', 'start'
end
clothingfilter['qualitycheck'] = 7
:loopquality2
i = 1
:loopallure_swimsuit
if allure_swimsuit[i] = 0:
gs 'clothing_attributes', 'allure_swimsuit', 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 += 1
if i <= 100:jump 'loopallure_swimsuit'
if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality2'
end
if $ARGS[0] = 'swim1': gt 'clothing', 'view_clothing_item', 'shop', 'allure_swimsuit',i, 1750
if $ARGS[0] = 'bikinis':
$loc_arg = 'bikinis'
$loc = 'shop_allure'
cls
gs'stat'
'Bikinis - one size fits all'
*nl
gs 'clothing_QV', 'shop_header'
act 'Return':
cla
minut += 1
gt 'shop_allure', 'start'
end
clothingfilter['qualitycheck'] = 7
:loopquality3
i = 1
:loopallure_bikinis
if allure_bikinis[i] = 0:
gs 'clothing_attributes', 'allure_bikinis', 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 += 1
if i <= 140:jump 'loopallure_bikinis'
if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality3'
end
if $ARGS[0] = 'bikini1': gt 'clothing', 'view_clothing_item', 'shop', 'allure_bikinis',i, 1750
--- shop_allure ---------------------------------