begin
 ResultURL:=GetUrlBase+inttostr(GetX)+'&y='+inttostr(GetY)+'&z='+inttostr(18-GetZ);
end.