begin
  if (GetX mod 2 <> 0) or (GetY mod 2 <> 0) or (GetZ > 21) then exit;
 
  ResultURL := GetURLBase + IntTostr(GetZ-2) + '/' + inttostr(GetX/2) + '/' + inttostr(GetY/2)+'.jpg';
    
  RequestHead := 
	'accept: image/webp,image/apng,image/*,*/*;q=0.8' + #13#10 +
	'accept-encoding: gzip, deflate, br' + #13#10 +
	'accept-language: ru-RU,ru;q=0.9,en-US;q=0.8,en;q=0.7,pt;q=0.6,uk;q=0.5,cs;q=0.4' + #13#10 +
	RequestHead + #13#10 +
	'dnt: 1' + #13#10 +
	'referer: https://rgis.mosreg.ru/v3/' + #13#10 +
	'sec-fetch-mode: no-cors' + #13#10 +
	'sec-fetch-site: same-origin' + #13#10 +
	'user-agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/76.0.3809.87 Safari/537.36';


end.


