Aufeinanderfolgende gleiche Datensätze zählen

DELIMITER //
CREATE PROCEDURE `getMaxKopfOderZahl`(OUT maxKopf INT UNSIGNED, OUT maxZahl INT UNSIGNED)
BEGIN
  DECLARE sCache VARCHAR(255) DEFAULT '';  
  DECLARE sKoZ CHAR(1);
  DECLARE sKoZ_last CHAR(1) DEFAULT 'x';  
  DECLARE bDone INT DEFAULT 0;

  DECLARE cCursor CURSOR FOR SELECT `kopf_oder_zahl` FROM `kopf_oder_zahl`;
  DECLARE CONTINUE HANDLER FOR SQLSTATE '02000' SET bDone = 1;  

  OPEN cCursor;
  SET maxKopf = 0;
  SET maxZahl = 0;
  REPEAT
    FETCH cCursor INTO sKoZ;
    IF sKoZ_last <> sKoZ THEN
      CASE sKoZ_last
        WHEN 'k' THEN IF (CHAR_LENGTH(sCache) > maxKopf) THEN SET maxKopf = CHAR_LENGTH(sCache); END IF;  
        WHEN 'z' THEN IF (CHAR_LENGTH(sCache) > maxZahl) THEN SET maxZahl = CHAR_LENGTH(sCache); END IF;  
        ELSE BEGIN END;
      END CASE;
      SET sCache = '';  
      SET sKoZ_last = sKoZ;
    END IF;
    SET sCache = CONCAT(sCache, sKoZ);
  UNTIL bDone END REPEAT;
  CLOSE cCursor;
END //
DELIMITER ;

CALL getMaxKopfOderZahl(@k, @z);
SELECT @k AS `Kopf`, @z AS `Zahl`;

SET @iCount = 0;
SET @sLast = 'x';  
SELECT `kopf_oder_zahl`, COUNT(`KoZ_Group`) AS `Anzahl`
FROM (
  SELECT
    @sLast AS `sLast`,
    @iCount:=IF(@sLast<>`kopf_oder_zahl`,@iCount+1,@iCount) AS `KoZ_Group`,
    @sLast:=`kopf_oder_zahl` AS `kopf_oder_zahl`
  FROM `kopf_oder_zahl`
) _tmp
GROUP BY `KoZ_Group`
ORDER BY `Anzahl` DESC
LIMIT 1;

Select 'k' as [Kopf/Zahl],  Max(Iif(Isnull(bisZ), (select max(durchgang) from Münzwurf), bisZ) - dk+1) as MaxLängeSeq from (   
  SELECT Mk.Durchgang as Dk , 
 (select min(  Mz.Durchgang) from Münzwurf mz where Kopfzahl='z' and durchgang >=mk.durchgang) as bisZ  
  FROM Münzwurf mk where Kopfzahl ='k'  
)
Union
Select 'z' , Max(Iif(Isnull(bisk),(select max(durchgang) from Münzwurf), bisk) - dz+1) as MaxLängeSeq from (   
  SELECT Mz.Durchgang as Dz , 
  (select min(  Mk.Durchgang) from Münzwurf mk where Kopfzahl='k' and durchgang >=mz.durchgang) as bisk  
  FROM Münzwurf mz where Kopfzahl ='z'  
)