n,k=gets.split.map(&:to_i)
s,p,r=gets.split.map(&:to_i)
t=gets.chomp
cs=t.count("s")
cp=t.count("p")
cr=t.count("r")
k.times do |i|
  j=i+k
  while j<n
    if t[j]==t[j-k]
      if t[j]=="s"
        cs-=1
      elsif t[j]=="p"
        cp-=1
      else
        cr-=1
      end
      t[j]="q"
    end
    j+=k
  end
end
puts cs*s+cp*p+cr*r
