# Gadsarai $metkaM = $ARGS[0] $locM = $CURLOC $metka = $ARGS[0] $loc = $CURLOC '

cottage

' '
' 'Old barn that holds tools. Sitting near the barn dog named Pirate' clr gs'stat' gs'time' act'Go outside':minut+=5>'Gaddvor' act'Picking in the barn': cls minut+=15 gs'stat' poiskrand=rand(0,5) if card>0 and poiskrand=0 or poiskrand>0: 'In the locker old magazines Health, Equipment Youth and dusty yellowed books.' end if card=0 and poiskrand=0: card=1 '"Hmm, what`s this?" think you`ve found a deck of cards.' end act'Put in place':gt $curloc end if card>0: act 'Take a deck of cards': gt'card' end end if horny>=50: act 'mastrubirovat': gt'selfplay' end end --- Gadsarai ---------------------------------