var
	res:string;
	i:byte;
	osX,osY,prX,prY:integer;
begin
	res:='';
	osX:=round(intpower(2,GetZ-1)) div 2;
	osY:=round(intpower(2,GetZ-1)) div 2;
	prX:=osX; prY:=osY;
	for i:=2 to GetZ do
		begin
		prX:=prX div 2;
		prY:=prY div 2;
		if GetX<osX then begin
			osX:=osX-prX;
			if GetY<osY then begin
				osY:=osY-prY;
				res:=res+'0';
			end else begin
				osY:=osY+prY;
				res:=res+'2';
				end;
			end
		else begin
			osX:=osX+prX;
			if Gety<osy then begin
				osY:=osY-prY;
				res:=res+'1';
			end else begin
				osY:=osY+prY;
				res:=res+'3';
			end;
		end;
	end;

	ResultURL:=GetURLBase+res+'.png';
	RequestHead:='Referer: https://connect.garmin.com/ru-RU/start/quickdraw' + #13#10;
end.