Dice = Struct.new "Dice", :top, :back, :right, :left, :front, :bottom

x = readline.split " "
dice = Dice.new x[0], x[1], x[2], x[3], x[4], x[5]

def n d
  return Dice.new d.back, d.bottom, d.right, d.left, d.top, d.front
end

def w d
  return Dice.new d.right, d.back, d.bottom, d.top, d.front, d.left
end

def s d
  return Dice.new d.front, d.top, d.right, d.left, d.bottom, d.back
end

def e d
  return Dice.new d.left, d.back, d.top, d.bottom, d.front, d.right
end

c = readline.split ""

c.each do |c|
  case c
  when "W"
    dice = w dice
  when "E"
    dice = e dice
  when "S"
    dice = s dice
  when "N"
    dice = n dice
  end
end

puts dice.top
