Counting the Number of Consecutive Ranges
 

I need to create a formla that counts the number of times certain text will appear in a row. For example in cells A1 - J1 there could be following:
A1 = S, B1 = W,C1 = S, D1 = S, E1 = S , F1= W, G1= W, H1=S, I1 = S, J1 = S

S S W S S S W W S S

I need to know how many consecutive ranges there are of S - the answer here is (obviously) 3 - as there are 3 distinct ranges of S.

Can anyone help?