Hai provato ad eseguirlo in modalità debug e vedere cosa fa il codice?
Dovresti provare assegnando a "s" una stringa di almeno 51 caratteri.
Metti un breakpoint alla riga dell'"if" ed esamina il valore di s(r), s(r+1), ...
L'operatore & esegue un "logical AND" tra i valori ...
Il codice, in pratica, ricerca una sequenza di 5 caratteri uguali in una stringa.