# sportShop
if $ARGS[0] = 'start':
$location_type = 'public_indoors'
cls
menu_off = 1
gs 'stat'
gs 'themes', 'indoors'
'
Danilovich sporting goods'
''
*nl
'As soon as you enter, a high energy song with a thumping baseline fills your eardrums, making you feeling pumped and awake. The store is sleek and professional, the walls and floors advertising all different kinds of sporting equipment and attire. The room is filled with beautifully fit people shopping, their bodies varying from big and muscular to lean and trim. If they don''t inspire you to want to work out, the posters advertising past and present famous athletes is motivating as hell.'
*nl
if refillable_bottle = 0 and money >= 1000 and bag > 0:
'You could buy a high-quality water bottle (1000 ₽) that you can carry around in your purse.'
elseif refillable_bottle = 0 and (money < 1000 or bag = 0):
'The shop sells high-quality water bottles for 1,000 ₽. You could carry one around in '+iif(bag > 0, 'your', 'a')+' purse.'
end
act 'Leave':
cla
minut += 3
gt 'torgcentr'
end
act 'View sports clothing':
cla
minut += 5
gt 'sportshop', 'clo'
end
act 'View sports panties':
cla
minut += 5
gt 'sportshop', 'panties'
end
act 'View sports bras':
cla
minut += 5
gt 'sportshop', 'bras'
end
act 'View exercise shoes':
minut += 5
gt 'sportshop', 'trainers'
end
act 'View swimwear':
cla
minut += 5
gt 'sportshop', 'swim'
end
if skak = 0 and money >= 500:
act 'Buy a skipping rope (500 ₽)':
cla
minut += 5
money -= 500
skak = 1
act 'Pick up a package':gt 'sportshop', 'start'
end
elseif skak = 0:
act 'Buy a skipping rope (500 ₽)': '
You don''t have enough money to buy that.'
end
if obruch = 0 and money >= 1500:
act 'Buy a hula hoop (1,500 ₽)':
cla
minut += 5
money -= 1500
obruch = 1
act 'Pick up a package':gt 'sportshop', 'start'
end
elseif obruch = 0:
act 'Buy a hula hoop (1500 ₽)': '
You don''t have enough money to buy that.'
end
if bookYog = 0 and money >= 1500:
act 'Buy "Benefits of yoga" (1,500 ₽)':
cla
minut += 5
money -= 1500
bookYog = 1
act 'Pick up a package':gt 'sportshop', 'start'
end
elseif bookYog = 0:
act 'Buy "Benefits of yoga" (1500 ₽)': '
You don''t have enough money to buy that.'
end
if konki = 0 and money >= 3000:
act 'Buy some ice skates (3000 ₽)':
cla
minut += 5
money -= 3000
konki = 1
act 'Pick up a package':gt 'sportshop', 'start'
end
elseif konki = 0:
act 'Buy some ice skates (3000 ₽)': '
You don''t have enough money to buy that.'
end
end
if $ARGS[0] = 'clo':
$loc_arg = 'clo'
$loc = 'sportShop'
cls
gs'stat'
'Sportswear - one size fits all'
*nl
gs 'clothing_QV', 'shop_header'
act 'Return':
cla
minut += 1
gt 'sportshop', 'start'
end
clothingfilter['qualitycheck'] = 7
:loopquality2
if Clothingstock > 16:
i = 1
elseif Clothingstock > 8:
i = 2
else
i = 3
end
:loopexercise
if exercise[i] = 0:
gs 'clothing_attributes', 'exercise', 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 += 3
if i <= 145:jump 'loopexercise'
if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality2'
end
if $ARGS[0] = 'exercise': gt 'clothing', 'view_clothing_item', 'shop', 'exercise',i, 2000
if $ARGS[0] = 'trainers':
$loc_arg = 'trainers'
$loc = 'sportShop'
cls
gs'stat'
act 'Return':
cla
minut += 1
gt 'sportShop', 'start'
end
i = 1
:looptrainers_shoes
if strainers[i] = 0:*p ''
i += 1
if i <= 30:jump 'looptrainers_shoes'
end
if $ARGS[0] = 'training_shoes': gt 'shoes', 'view_shoe_item', 'shop', 'trainers',i, 1500
if $ARGS[0] = 'swim':
$loc_arg = 'swim'
$loc = 'sportShop'
cls
gs'stat'
'Swimwear - one size fits all'
*nl
gs 'clothing_QV', 'shop_header'
act 'Return':
cla
minut += 1
gt 'sportshop', 'start'
end
clothingfilter['qualitycheck'] = 7
:loopquality
!!4 is in he supermarket, so skipped
if Clothingstock > 18:
i = 1
elseif Clothingstock > 12:
i = 2
elseif Clothingstock > 6:
i = 3
else
i = 8
end
:loopswim
if swimwear[i] = 0:
gs 'clothing_attributes', 'swimwear', 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 += 4
if i <= 213:jump 'loopswim'
if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality'
end
if $ARGS[0] = 'swim1': gt 'clothing', 'view_clothing_item', 'shop', 'swimwear',i, 1750
if $ARGS[0] = 'panties':
$loc_arg = 'panties'
$loc = 'sportShop'
cls
gs'stat'
act 'Return':
cla
minut += 1
gt 'sportShop', 'start'
end
i = 1
:loopsport_panties
if sport_panties[i] = 0:*p ' '
i += 1
if i <= 8:jump 'loopsport_panties'
end
if $ARGS[0] = 'panties2':
cla
if sport_panties[i] ! 0:
msg 'You already own these panties.'
gt 'sportShop', 'panties'
end
gt 'panties', 'view_panty_item', 'shop', 'sport',i, 1000
end
if $ARGS[0] = 'bras':
$loc_arg = 'bras'
$loc = 'sportShop'
cls
gs'stat'
act 'Return':
cla
minut += 1
gt 'sportShop', 'start'
end
i = 1
:loopsport_bras
if sport_bras[i] = 0:*p ' '
i += 1
if i <= 8:jump 'loopsport_bras'
end
if $ARGS[0] = 'bras2':
cla
if sport_bras[i] ! 0:
msg 'You already own this bra.'
gt 'sportShop', 'bras'
end
gt 'bras', 'view_bra_item', 'shop', 'sport',i, 1000
end
--- sportShop ---------------------------------