glife-fork/locations/portnoi2.qsrc

# portnoi2
poshvalldrop = 0

i = 1
:ycheapmet
	if cheap[i] = 1 and ((cheapB[i] > pcs_hips + 8) or (cheapB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
if i <= ARRSIZE('cheap'):jump 'ycheapmet'

i = 1
:ycats_dressmet
	if cats_dress[i] = 1 and ((cats_dressB[i] > pcs_hips + 8) or (cats_dressB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
if i <= ARRSIZE('cats_dress'):jump 'ycats_dressmet'

i = 1
:ycats_outfitmet
	if cats_outfit[i] = 1 and ((cats_outfitB[i] > pcs_hips + 8) or (cats_outfitB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
if i <= ARRSIZE('cats_outfit'):jump 'ycats_outfitmet'

i = 1
:ycoco_dressmet
	if coco_dress[i] = 1 and ((coco_dressB[i] > pcs_hips + 8) or (coco_dressB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
if i <= ARRSIZE('coco_dress'):jump 'ycoco_dressmet'

i = 1
:ycoco_outfitmet
	if coco_outfit[i] = 1 and ((coco_outfitB[i] > pcs_hips + 8) or (coco_outfitB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
if i <= ARRSIZE('coco_outfit'):jump 'ycoco_outfitmet'

i = 1
:yflamingos_dressmet
	if flamingos_dress[i] = 1 and ((flamingos_dressB[i] > pcs_hips + 8) or (flamingos_dressB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
if i <= ARRSIZE('flamingos_dress'):jump 'yflamingos_dressmet'

i = 1
:yflamingos_outfitmet
	if flamingos_outfit[i] = 1 and ((flamingos_outfitB[i] > pcs_hips + 8) or (flamingos_outfitB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
if i <= ARRSIZE('flamingos_outfit'):jump 'yflamingos_outfitmet'

i = 1
:yexpensivemet
	if expensive[i] = 1 and ((expensiveB[i] > pcs_hips + 8) or (expensiveB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
if i <= ARRSIZE('expensive'):jump 'yexpensivemet'

i = 1
:yformalmet
	if formal[i] = 1 and ((formalB[i] > pcs_hips + 8) or (formalB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
if i <= ARRSIZE('formal'):jump 'yformalmet'

i = 1
:yofficemet
	if office[i] = 1 and ((officeB[i] > pcs_hips + 8) or (officeB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
if i <= ARRSIZE('office'):jump 'yofficemet'

i = 1
:yschoolmet
	if school[i] = 1 and ((schoolB[i] > pcs_hips + 8) or (schoolB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
	if i = 6: i = 7
if i <= ARRSIZE('school'):jump 'yschoolmet'

i = 1
:yfetishmet
	if fetish[i] = 1 and ((fetishB[i] > pcs_hips + 8) or (fetishB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
if i <= ARRSIZE('fetish'):jump 'yfetishmet'

i = 1
:yexhibitmet
	if exhibit[i] = 1 and ((exhibitB[i] > pcs_hips + 8) or (exhibitB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
if i <= ARRSIZE('exhibit'):jump 'yexhibitmet'

i = 1
:yuniformmet
	if uniform[i] = 1 and ((uniformB[i] > pcs_hips + 8) or (uniformB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
if i <= ARRSIZE('uniform'):jump 'yuniformmet'

i = 1
:yswimwearmet
	if swimwear[i] = 1 and ((swimwearB[i] > pcs_hips + 8) or (swimwearB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
if i <= ARRSIZE('swimwear'):jump 'yswimwearmet'

i = 1
:ybeachmet
	if beach[i] = 1 and ((beachB[i] > pcs_hips + 8) or (beachB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
if i <= ARRSIZE('beach'):jump 'ybeachmet'

i = 1
:yfancy_burlesquemet
	if fancy_burlesque[i] = 1 and ((fancy_burlesqueB[i] > pcs_hips + 8) or (fancy_burlesqueB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
if i <= ARRSIZE('fancy_burlesque'):jump 'yfancy_burlesquemet'

i = 1
:ydolls_outfitmet
	if dolls_outfit[i] = 1 and ((dolls_outfitB[i] > pcs_hips + 8) or (dolls_outfitB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
if i <= ARRSIZE('dolls_outfit'):jump 'ydolls_outfitmet'

i = 1
:ydolls_dressmet
	if dolls_dress[i] = 1 and ((dolls_dressB[i] > pcs_hips + 8) or (dolls_dressB[i] < pcs_hips - 8)):poshvalldrop += 1
	i += 1
if i <= ARRSIZE('dolls_dress'):jump 'ydolls_dressmet'

poshvalldrop = 500 * poshvalldrop

if money < poshvalldrop:
	'You do not have enough money to resize all of your clothing. The total cost would be <<poshvalldrop>> <b>₽</b>.'
elseif poshvalldrop = 0:
	'You do not have any clothes that need tailoring currently,'
elseif money >= poshvalldrop:
	money -= poshvalldrop

	i = 1
	:xcheapmet
		if cheap[i] = 1 and ((cheapB[i] > pcs_hips + 8) or (cheapB[i] < pcs_hips - 8)):cheapB[i] = pcs_hips
		i += 1
	if i <= ARRSIZE('cheap'):jump 'xcheapmet'

	i = 1
	:xcats_dressmet
		if cats_dress[i] = 1 and ((cats_dressB[i] > pcs_hips + 8) or (cats_dressB[i] < pcs_hips - 8)):cats_dressB[i] = pcs_hips
		i += 1
	if i <= ARRSIZE('cats_dress'):jump 'xcats_dressmet'

	i = 1
	:xcats_outfitmet
		if cats_outfit[i] = 1 and ((cats_outfitB[i] > pcs_hips + 8) or (cats_outfitB[i] < pcs_hips - 8)):cats_outfitB[i] = pcs_hips
		i += 1
	if i <= ARRSIZE('cats_outfit'):jump 'xcats_outfitmet'

	i = 1
	:xcoco_dressmet
		if coco_dress[i] = 1 and ((coco_dressB[i] > pcs_hips + 8) or (coco_dressB[i] < pcs_hips - 8)):coco_dressB[i] = pcs_hips
		i += 1
	if i <= ARRSIZE('coco_dress'):jump 'xcoco_dressmet'

	i = 1
	:xcoco_outfitmet
		if coco_outfit[i] = 1 and ((coco_outfitB[i] > pcs_hips + 8) or (coco_outfitB[i] < pcs_hips - 8)):coco_outfitB[i] = pcs_hips
		i += 1
	if i <= ARRSIZE('coco_outfit'):jump 'xcoco_outfitmet'

	i = 1
	:xflamingos_dressmet
		if flamingos_dress[i] = 1 and ((flamingos_dressB[i] > pcs_hips + 8) or (flamingos_dressB[i] < pcs_hips - 8)):flamingos_dressB[i] = pcs_hips
		i += 1
	if i <= ARRSIZE('flamingos_dress'):jump 'xflamingos_dressmet'

	i = 1
	:xflamingos_outfitmet
		if flamingos_outfit[i] = 1 and ((flamingos_outfitB[i] > pcs_hips + 8) or (flamingos_outfitB[i] < pcs_hips - 8)):flamingos_outfitB[i] = pcs_hips
		i += 1
	if i <= ARRSIZE('flamingos_outfit'):jump 'xflamingos_outfitmet'

	i = 1
	:xexpensivemet
		if expensive[i] = 1 and ((expensiveB[i] > pcs_hips + 8) or (expensiveB[i] < pcs_hips - 8)):expensiveB[i] = pcs_hips
		i += 1
	if i <= ARRSIZE('expensive'):jump 'xexpensivemet'

	i = 1
	:xformalmet
		if formal[i] = 1 and ((formalB[i] > pcs_hips + 8) or (formalB[i] < pcs_hips - 8)):formalB[i] = pcs_hips
		i += 1
	if i <= ARRSIZE('formal'):jump 'xformalmet'

	i = 1
	:xofficemet
		if office[i] = 1 and ((officeB[i] > pcs_hips + 8) or (officeB[i] < pcs_hips - 8)):officeB[i] = pcs_hips
		i += 1
	if i <= ARRSIZE('office'):jump 'xofficemet'

	i = 1
	:xschoolmet
		if school[i] = 1 and ((schoolB[i] > pcs_hips + 8) or (schoolB[i] < pcs_hips - 8)):schoolB[i] = pcs_hips
		i += 1
		if i = 6: i = 7
	if i <= ARRSIZE('school'):jump 'xschoolmet'

	i = 1
	:xfetishmet
		if fetish[i] = 1 and ((fetishB[i] > pcs_hips + 8) or (fetishB[i] < pcs_hips - 8)):fetishB[i] = pcs_hips
		i += 1
	if i <= ARRSIZE('fetish'):jump 'xfetishmet'

	i = 1
	:xexhibitmet
		if exhibit[i] = 1 and ((exhibitB[i] > pcs_hips + 8) or (exhibitB[i] < pcs_hips - 8)):exhibitB[i] = pcs_hips
		i += 1
	if i <= ARRSIZE('exhibit'):jump 'xexhibitmet'

	i = 1
	:xuniformmet
		if uniform[i] = 1 and ((uniformB[i] > pcs_hips + 8) or (uniformB[i] < pcs_hips - 8)):uniformB[i] = pcs_hips
		i += 1
	if i <= ARRSIZE('uniform'):jump 'xuniformmet'

	i = 1
	:xswimwearmet
		if swimwear[i] = 1 and ((swimwearB[i] > pcs_hips + 8) or (swimwearB[i] < pcs_hips - 8)):swimwearB[i] = pcs_hips
		i += 1
	if i <= ARRSIZE('swimwear'):jump 'xswimwearmet'

	i = 1
	:xbeachmet
		if beach[i] = 1 and ((beachB[i] > pcs_hips + 8) or (beachB[i] < pcs_hips - 8)):beachB[i] = pcs_hips
		i += 1
	if i <= ARRSIZE('beach'):jump 'xbeachmet'

	i = 1
	:xfancy_burlesquemet
		if fancy_burlesque[i] = 1 and ((fancy_burlesqueB[i] > pcs_hips + 8) or (fancy_burlesqueB[i] < pcs_hips - 8)):fancy_burlesqueB[i] = pcs_hips
		i += 1
	if i <= ARRSIZE('fancy_burlesque'):jump 'xfancy_burlesquemet'

	i = 1
	:xdolls_outfitmet
		if dolls_outfit[i] = 1 and ((dolls_outfitB[i] > pcs_hips + 8) or (dolls_outfitB[i] < pcs_hips - 8)):dolls_outfitB[i] = pcs_hips
		i += 1
	if i <= ARRSIZE('dolls_outfit'):jump 'xdolls_outfitmet'

	i = 1
	:xdolls_dressmet
		if dolls_dress[i] = 1 and ((dolls_dressB[i] > pcs_hips + 8) or (dolls_dressB[i] < pcs_hips - 8)):dolls_dressB[i] = pcs_hips
		i += 1
	if i <= ARRSIZE('dolls_dress'):jump 'xdolls_dressmet'

	'You resize all clothing for <<poshvalldrop>> <b>₽</b>.'
end

if $loc = 'pav_factory':
	act 'Leave': gt 'pav_industrial'
else
	act 'Leave' :gt 'city_market', 'tailor'
end

--- portnoi2 ---------------------------------