# sell_young_clothes
set mag = 1
$metka = $ARGS[0]
$loc = $CURLOC
$metkaM = $ARGS[0]
$locM = $CURLOC
'
Women´s Clothing'
*nl
act 'Go':
minut += 1
gt 'young_shop'
end
if odekis[1] = 0:
act 'See the first variant of clothes':set numdres = 1 & payclo = 10000 & gt 'loker', 'odekis'
end
if odekis[2] = 0:
act 'Display a second embodiment of clothing':set numdres = 2 & payclo = 10000 & gt 'loker', 'odekis'
end
if odekis[3] = 0:
act 'See the third variant of clothes':set numdres = 3 & payclo = 10000 & gt 'loker', 'odekis'
end
if odekis[4] = 0:
act 'See the fourth variant of clothes':set numdres = 4 & payclo = 10000 & gt 'loker', 'odekis'
end
if odekis[5] = 0:
act 'See the fifth variant of clothes':set numdres = 5 & payclo = 10000 & gt 'loker', 'odekis'
end
if odekis[6] = 0:
act 'See the sixth variant of clothes':set numdres = 6 & payclo = 10000 & gt 'loker', 'odekis'
end
if odekis[7] = 0:
act 'See the seventh variant of clothes':set numdres = 7 & payclo = 10000 & gt 'loker', 'odekis'
end
if odekis[8] = 0:
act 'See the eighth embodiment of clothing':set numdres = 8 & payclo = 10000 & gt 'loker', 'odekis'
end
if odekis[9] = 0:
act 'See the ninth variant of clothes':set numdres = 9 & payclo = 10000 & gt 'loker', 'odekis'
end
if odekis[10] = 0:
act 'See a tenth embodiment of clothing':set numdres = 10 & payclo = 10000 & gt 'loker', 'odekis'
end
--- sell_young_clothes ---------------------------------