# NewCloShop $shmotmag = { !WD: Allow view even if has no funds cla if newclo[i] ! 0: MSG 'You already own these clothes.' GOTO $loc, $metka end VIEW 'images\clothes\newclo\<>.jpg' act 'Return item': VIEW GOTO $loc, $metka end if money >= 3000: act 'Buy': money -= 3000 newclo[i] = 1 newcloH[i] = 60 newcloB[i] = bedra VIEW GOTO $loc, $metka end end act 'Leave': mag = 0 minut += 15 VIEW gt 'down' end } $metka = $ARGS[0] $loc = $CURLOC $metkaM = $ARGS[0] $locM = $CURLOC mag = 1 '