!7

concept Dialog {
  new L<Entry> entries;
}

concept Entry {
  S text;
  S ip;
}

p { db(); }

html {
  S text = mapGet text(params);
  if (nempty(text)) {
    text= 
    Dialog dialog = cnew(Dialog);
    dialog.entries.add(cnew(Entry, ip := subBot_clientIP(), +text));
    dialog.change();
    nu(Entry);
  }
  ret hhtml_head_title_body("Talk",
    hfullcenter(hform(htextfield('text, autofocus := true, style := "width: 400px; text-align: center")))
  );
}