My Pascal version of ImageCloud is coming along decently. I couldn’t return an StrArray for some reason (fpc kept failing to compile) so rather than figure out the problem, I used a pointer instead. Seemed simpler.
program ImageCloud( input, output, TagDB );
uses
DOS; {to enable findfirst and findnext}
const
MAXDBSIZE = 224; {max number of [...]