glife/locations/sportShop.qsrc

# sportShop
!2022/06/20
if $ARGS[0] = 'start' or $ARGS[0] = '':
	killvar 'clothingfilter'
    $location_type = 'public_indoors'
	cls
	menu_off = 1
	gs 'stat'
	gs 'themes', 'indoors'
	'<center><b><font color="maroon">Danilovich sporting goods</font></b></center>'
	'<center><img src="images/locations/city/citycenter/mall/sportshop/sportshop.jpg"></center>'
	*nl
	'As soon as you enter, a high energy song with a thumping baseline fills your eardrums, making you feel 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 are motivating as hell.'
	*nl
	if refillable_bottle = 0 and money >= 1000 and bag > 0: 
		'You could buy a high-quality <a href="exec:minut += 5 & money -= 1000 & refillable_bottle = 1 & gt ''sportShop'', ''start''">water bottle (1000 <b>₽</b>)</a> 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 <b>₽</b>. You could carry one around in '+iif(bag > 0, 'your', 'a')+' purse.'
	end
	
	act 'Leave':minut += 3 & gt 'torgcentr'

	act 'View sports clothing':minut += 5 & gt 'sportshop', 'clo'

	act 'View sports bras':minut += 5 & gt 'sportshop', 'bras'
	
	act 'View sports panties':minut += 5 & gt 'sportshop', 'panties'
	
	act 'View exercise shoes':minut += 5 & gt 'sportshop', 'shoes'

	act 'View swimwear':minut += 5 & gt 'sportshop', 'swim'

	act 'View purses': minut += 5 & gt 'sportshop', 'purses'

	act 'View coats': minut += 5 & gt 'sportshop', 'coats'
		!! output from purchase
	if $message ! '':
		$message
		killvar '$message'
	else
		'A tall muscular man stands next to the counter, showing a perfect smile. "Welcome, do you need any assistance in selecting equipment or tips how to improve your workout?"'
	end

	*pl '<center><table align="center" width=80%>'
	if skak = 0 and money >= 500:
		*p func ('$single_stock_item', 1, 'Skipping Rope', 500, 'skak', 'sportshop', 'start')
	end
	if obruch = 0 and money >= 1500:
		*p func ('$single_stock_item', 1, 'Hula Hoop', 1500, 'obruch', 'sportshop', 'start')
	end
	if bookYog = 0 and money >= 1500:
		*P func ('$single_stock_item', 1, 'Book on Yoga', 1500, 'bookyog', 'sportshop', 'start')
	end
	if konki = 0 and money >= 3000:
		*p func ('$single_stock_item', 1, 'Ice Skates', 3000, 'konki', 'sportshop', 'start')
	end
	if refillable_bottle = 0 and money >= 1000 and bag > 0: 
		*p func ('$single_stock_item', 1, 'Refillable Water Bottle', 1000, 'refillable_bottle', 'sportshop', 'start')		
	end
	*p '</table></center>'
end

if $ARGS[0] = 'clo':
	$loc_arg = 'clo'
	$loc = 'sportShop'
	cls
	gs'stat'
	'<center><b><font color="maroon">Sportswear - one size fits all</font></b></center>'
	*nl

	gs 'clothing_QV', 'shop_filter_header'

	act 'Return':
		cla
		minut += 1
		gt 'sportshop', 'start'
	end

	!!To filter just this set
	clo_i = 0
	:loopdanilovich_outfits_filter

		if Clothingstock > 16:
			i = 1
		elseif Clothingstock > 8:
			i = 2
		else
			i = 3
		end

		:loopdanilovich_outfits
			if danilovich_outfits[i] = 0:
				gs 'clothing_attributes', 'danilovich_outfits', i
				gs 'clothing_QV', 'shop_filter'

				!!sort by filter
				if (clothingfilter['quality'] = 0 and CloQuality = clo_i) or (clothingfilter['inhibition'] = 0 and CloInhibit = clo_i) or clothingfilter['number'] = 0:
					if clothingfilter['inc'] = 1 and clothingfilter['only'] = 1: *p '<a href="exec: i = <<i>> & gt ''sportshop'', ''danilovich''"><img src="images/pc/items/danilovich/outfits/<<i>>.jpg" 	height="250" /></a>'
				end
			end
			i += 3
		if i <= 160:jump 'loopdanilovich_outfits'

	clo_i += 1
	if clothingfilter['quality'] = 0 and clo_i <= 7:
		jump 'loopdanilovich_outfits_filter'
	elseif clothingfilter['inhibition'] = 0 and clo_i <= 40:
		jump 'loopdanilovich_outfits_filter'
	end
end

if $ARGS[0] = 'danilovich': gt 'clothing', 'view_clothing_item', 'danilovich_outfits',i, 2000, 'shop'

if $ARGS[0] = 'shoes':
	$loc_arg = 'shoes'
	$loc = 'sportShop'
	cls
	gs'stat'

	act 'Return':
		cla
		minut += 1
		gt 'sportShop', 'start'
	end

	i = 1
	:loopdanilovich_shoes
		if danilovich_shoe[i] = 0:*p '<a href="exec: i = <<i>> & gt ''sportShop'', ''training_shoes''"><img src="images/pc/items/danilovich/shoes/<<i>>.jpg" height="250" /></a>'
		i += 1
	if i <= 40:jump 'loopdanilovich_shoes'
end

if $ARGS[0] = 'training_shoes': gt 'shoes', 'view_shoe_item', 'shop', 'danilovich',i, 1500

if $ARGS[0] = 'swim':
	$loc_arg = 'swim'
	$loc = 'sportShop'
	cls
	gs'stat'
	'<center><b><font color="maroon">Swimwear - one size fits all</font></b></center>'
	*nl

	gs 'clothing_QV', 'shop_filter_header'

	act 'Return':
		cla
		minut += 1
		gt 'sportshop', 'start'
	end

	!!To filter just this set
	clo_i = 0
	:loopswim_filter

	!!4 is in he supermarket, so skipped

		if Clothingstock > 11:
			i = 1
		else
			i = 2
		end


		:loopswim
			if danilovich_swimsuit[i] = 0:
				gs 'clothing_attributes', 'danilovich_swimsuit', i
				gs 'clothing_QV', 'shop_filter'

				!!sort by filter
				if (clothingfilter['quality'] = 0 and CloQuality = clo_i) or (clothingfilter['inhibition'] = 0 and CloInhibit = clo_i) or clothingfilter['number'] = 0:
					if clothingfilter['inc'] = 1 and clothingfilter['only'] = 1: *p '<a href="exec: i = <<i>> & gt ''sportshop'', ''swim1''"><img src="images/pc/items/danilovich/swimwear/<<i>>.jpg" 	height="250" /></a>'
				end
			end
			i += 3
			if i = 4: i += 2
		if i <= 30:jump 'loopswim'

	clo_i += 1
	if clothingfilter['quality'] = 0 and clo_i <= 7:
		jump 'loopswim_filter'
	elseif clothingfilter['inhibition'] = 0 and clo_i <= 40:
		jump 'loopswim_filter'
	end
end

if $ARGS[0] = 'swim1': gt 'clothing', 'view_clothing_item', 'danilovich_swimsuit',i, 1750, 'shop'

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 '<a href="exec: i = <<i>> & gt ''sportShop'', ''panties2''"><img src="images/pc/panties/sport/<<i>>.jpg" 	height="150" /></a> '
		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 '<a href="exec: i = <<i>> & gt ''sportShop'', ''bras2''"><img src="images/pc/bras/sport/<<i>>.jpg" 	height="150" /></a> '
		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

if $ARGS[0] = 'purses':
	$loc_arg = 'purses'
	$loc = 'sportShop'
	menu_off = 1
	*clr & cla
	gs'stat'

	act 'Return':
		cla
		minut += 1
		gt 'sportShop', 'start'
	end

	i = 1

	:loopdanilovich_purses
		if danilovich_purses[i] = 0:*p '<a href="exec: i = <<i>> & gt ''sportShop'', ''purses2''"><img src="images/pc/items/danilovich/purses/<<i>>.jpg" 	height="150" /></a> '
		i += 1
	if i <= 60:jump 'loopdanilovich_purses'
end

if $ARGS[0] = 'purses2': gt 'purses', 'view_purse_item', 'shop', 'danilovich',i, 1500

if $ARGS[0] = 'coats':
	$loc_arg = 'coats'
	$loc = 'sportShop'
	menu_off = 1
	*clr & cla
	gs'stat'

	act 'Return':
		cla
		minut += 1
		gt 'sportShop', 'start'
	end

	i = 1

	:loopdanilovich_coats
		if danilovich_coats[i] = 0:*p '<a href="exec: i = <<i>> & gt ''sportShop'', ''coats2''"><img src="images/pc/items/danilovich/coats/<<i>>.jpg" 	height="150" /></a> '
		i += 1
	if i <= 20:jump 'loopdanilovich_coats'
end

if $ARGS[0] = 'coats2': gt 'coats', 'view_coat_item', 'shop', 'danilovich',i, 1500

--- sportShop ---------------------------------