gets
~/ /
a=eval$'
r=gets[a-1]
c=1
c+=r==$_[~-a+=81-r.ord*2]?1:-1while c>0;p a