folder="C:\\drorbn\\Album\\2025.07.19_Bruce_Hike_39-_The_Beaver_River_Valley_(Heading_North)";
SetDirectory[folder];

nbd=Select[FileNames["*","C:\\drorbn\\Album"], FileType[#]==Directory&];
len=Length[nbd]
loc=Position[nbd,folder][[1,1]];
DeleteFile[nbd[[Mod[#,len,1]]]<>"\\index.html"]& /@ (loc+{1,-1});

AllTracks=Get["../Summaries/AllTracks.m"];

fs=Echo@Take[FileNames["*.gpx"],All];
data=DeleteCases[
Union@Table["Geometry"/.Import[f,"Data"],{f,fs}],
GeoPosition[{_,None}], ∞
];
map0=GeoGraphics[{Red,data},GeoScaleBar->"Kilometers"];
Rasterize[
map=GeoGraphics[{Blue, AllTracks,Thick, Red,data},
GeoScaleBar->"Kilometers",
GeoRange->(GeoRange/.Options[map0])
]
]
Export["Path%.png",map]

path3D=Echo@ResourceFunction["GeoElevationGraphics3D"][
{Blue, AllTracks,Thick, Red,data},
GeoRange->(GeoRange/.Options[map0]),
GeoGridRangePadding->0,
GeoScaleBar->"Kilometers",
ViewPoint->{0.03392552524370772`,-1.9374148986729356`,2.774035430404068`},ViewVertical->{-0.014353130476599685`,0.8196768842397942`,0.5726463071464487`}
];
Export["Path3D.png",path3D]

PathLocation=Module[{R=3000,r=8,n=6,res=600},
ImageAssemble[
Partition[#,3]&@Table[
Rasterize[
GeoGraphics[{Blue, Thickness[(2n-k)/4000],AllTracks, Red,Thickness[(2n-k)/1000],data},
GeoCenter->Mean@Cases[data,GeoPosition[l_List]:>Mean[l],∞] ,
GeoRange->Quantity[R(((r/R))^((k-1)/(n-1))),"Kilometers"],
GeoScaleBar->"Kilometers",
ImageSize->res
],
RasterSize->res
],
{k,n}],
"Fit",Background -> White]
]
Export["PathLocation.png",PathLocation]

ResetDirectory[]

folder="C:\\drorbn\\Album\\2025.07.19_Bruce_Hike_39-_The_Beaver_River_Valley_(Heading_North)";
SetDirectory[folder];
If[Head[PensieveDirectives]===List, ImageComments="ImageComments"/.PensieveDirectives,ImageComments={}];
(Interpretation[ImageResize[Import@#,400],#]->(#/.ImageComments/.(#->"")))&/@FileNames["*.jpg"|"*.jpeg"|"*.png"|"*.mp4"]

12.6 hiking with Itai, and then 10.8km biking back to bring the car. My first hike after a long break due to a case of <a class=external href=https://en.wikipedia.org/wiki/Plantar_fasciitis>plantar fasciitis</a> which isn’t quite over yet, so I had to keep it limited. I forgot how pretty Ontario can be in the green season!

{
"TitleNotes" ->"12.6 hiking with Itai, and then 10.8km biking back to bring the car. My first hike after a long break due to a case of <a class=external href=https://en.wikipedia.org/wiki/Plantar_fasciitis>plantar fasciitis</a> which isn't quite over yet, so I had to keep it limited. I forgot how pretty Ontario can be in the green season!",
"ImageComments" -> {}
}