# 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 ---------------------------------