sS quickVisualize_nsfw_progID = #1007145;
static Lock quickVisualize_nsfw_lock = lock();

static bool quickVisualize_nsfw_hasCached(S query) {
  ret quickVisualize_nsfw_imageFile(query).length() != 0;
}

static BufferedImage quickVisualize_nsfw_fromCache(S query) {
  File f = quickVisualize_nsfw_imageFile(query);
  if (f.length() != 0) pcall { ret loadPNG(f); }
  null;
}

static S quickVisualize_nsfw_preprocess(S query) {
  ret toUpper(shorten(trim(query), 200));
}

static BufferedImage quickVisualize_nsfw(S query) {
  query = quickVisualize_nsfw_preprocess(query);
  if (empty(query)) null;
  BufferedImage img = quickVisualize_nsfw_fromCache(query);
  if (img != null) ret img;
  File f = quickVisualize_nsfw_imageFile(query);
  /*L<S> urls = googleImageSearch_multi(query);
  saveTextFile(quickVisualize_nsfw_urlsFile(query), joinLines(urls));
  if (empty(urls)) null;
  img = loadBufferedImage(first(urls));*/
  lock quickVisualize_nsfw_lock;
  temp tempSetTL(googleImageSearch_new_nsfw, true);
  img = googleImageSearch_new(query);
  if (img == null) null;
  savePNG(f, img);
  ret img;
}

static S quickVisualize_nsfw_imagePath(S query) {
  query = quickVisualize_nsfw_preprocess(query);
  ret fsI(quickVisualize_nsfw_progID) + "/nsfw/" + urlencode(query) + ".png";
}

static File quickVisualize_nsfw_imageFile(S query) {
  query = quickVisualize_nsfw_preprocess(query);
  ret prepareProgramFile(quickVisualize_nsfw_progID, "nsfw/" + urlencode(query) + ".png");
}

static File quickVisualize_nsfw_urlsFile(S query) {
  query = quickVisualize_nsfw_preprocess(query);
  ret prepareProgramFile(quickVisualize_nsfw_progID, "urls-" + urlencode(query) + ".txt");
}

Began life as a copy of #1007145