!7

sS botID = #1008316; // #1008533;

sclass Msg {

  long time;

  bool fromUser;

  S text;

  *() {}

  *(bool *fromUser, S *text) { time = now(); }

}

concept Conversation {

  S cookie;

  long dialogID;

  new L<Msg> msgs;

  void add(Msg m) {

    msgs.add(m);

    change();

  }

}

p {

  S html = loadPage("http://ai1.lol/" + psI(botID) + "/raw/logs");

  for (L<S> li : html_contentsOfLIs(html)) {

    S dialogID = assertInteger(first(li));

    print("\nDialog " + dialogID);

    new Conversation conv;

    conv.dialogID = parseLong(dialogID);

    for (L<S> li2 : html_contentsOfLIs(li)) {

      S msg = htmldecode(join(li2));

      new Msg m;

      if (msg.startsWith(">")) m.fromUser = true;

      else if (!msg.startsWith("<")) {

        warn("Unknown line: " + msg);

        continue;

      }

      m.text = trim(substring(msg, 1));

      conv.add(m);

      printStruct(m);

    }

  }

}