echo [Start Spinning Bottle]
@create bottle=10=bottle
@desc $bottle=/\\ Spinning Bottle: Used {prop:verify/{ref:here},$spinner} times in {name:here}.\r\\/ The last person to spin this was {prop:lastspinner,$spinner}.  It pointed at {prop:lastspun,$spinner}.
@action spin=$bottle=spinner
@link $spinner=$nothing
@osucc $spinner=spins the bottle and it points to {prop:lastspun}! [{prop:verify/{ref:here}}]
@succ $spinner=[{store:{add:1,{prop:verify/{ref:here}}},verify/{ref:here}}] You spin the bottle and it points at {with:c,{lremove:{parse:b,{filter:a,{contents:here,Player},{and:{awake:{&a}},{gt:{prop:idletimeout},{idle:{&a}}}}},{name:{&b}}},{mklist:{name:me},{prop:lastspun},{prop:lastspinner}}},{store:{if:{&c},{lrand:{&c}},no one},lastspun}}!{null:{store:{name:me},lastspinner}}
@set $spinner=idletimeout:1800
echo [End Spinning Bottle]