n,k=gets.split(" ").map(&:to_i)
r,s,pa=gets.split(" ").map(&:to_i)
t=gets.chomp.to_s
te=[]
scr=0

(0..k-1).each do |x|
    if t[x]=="r"
        scr+=pa
        te[x]=pa
    elsif t[x]=="s"
        scr+=r
        te[x]=r
    else
        scr+=s
        te[x]=s
    end
end

(k..n-1).each do |x|
    if t[x]=="r"
        if t[x-k]=="r"
            if te[x-k]<pa
                scr+=(pa-te[x-k])
                te[x]=pa
            else
                te[x]=0
            end
        else
            scr+=pa
            te[x]=pa
        end
    elsif t[x]=="s"
        if t[x-k]=="s"
            if te[x-k]<r
                scr+=(r-te[x-k])
                te[x]=r
            else
                te[x]=0
            end
        else
            scr+=r
            te[x]=r
        end
    else
        if t[x-k]=="p"
            if te[x-k]<s
                scr+=(s-te[x-k])
                te[x]=s
            else
                te[x]=0
            end
        else
            scr+=s
            te[x]=s
        end
    end
end
p scr