s,m,t,u,f,d:longint;

ch:char;

begin

readln(t,m,u,f,d);s:=0;

while t>0 do begin

readln(ch);

if ch='f' then t:=t-f-f

else t:=t-u-d;

inc(s);end;

write(s-1);

end.