!7

p-noconsole {
  chatLinesAsWeb_addIP = true;
  Web web = lastChatLinesAsWeb(5);
  for (WebNode node : web_nodesStartingWith(web, "Text ")) pcall {
    S text = web_unquoteLastToken(node);
    L<S> categories = ai_categoriesForChatLine(text);
    for (S c : categories) {
      WebNode catNode = web_findOrMakeForwardRelated(node, "is a");
      web_setPosition(catNode, node.x+0.2, node.y-0.1);
      web_addLabel(catNode, c);
    }
  }
  web_addBaseCategories(web);
  showWeb_noAutoLayout(web, 1000, 600);
}