for i:=0 to CardCount do begin
  page:=HTTPGet('https://cheetos.ru/api/game/card_get?number=0', CheCookie).page;
  if Pars('"finish":', page, ',')='true' then begin
    writeln('GAME WINNER');
    writeln(Pars('"score":', page, '}'));
  end;
  sleep(500);
end;