static int dm_placeModuleUnderAIBar_expiry = 4000;

// return true if we are first

sbool dm_placeModuleUnderAIBar(O moduleOrID, fS query) {

  fO module = dm_getModule(moduleOrID);

  fS moduleID = dm_moduleID(moduleOrID);

  dm_showModule_noFocus(module);

  ret swing(func -> bool {

    JTextComponent aiBar = cast getCreatorOpt('tfTopInput);

    Rect mr = dm_getBounds(module);

    if (aiBar == null || mr == null) false;

    Rectangle r = getBounds(aiBar);

    // height / query / timestamp

    T3<Int, S, Long> p = optCast(T3, quickImport(dm_generalMap_get('modulesUnderAIBar_y)));

    bool first = !(p != null && eq(p.b, query)

      && sysNow() <= p.c+dm_placeModuleUnderAIBar_expiry

      /*&& p.a != mr.y2()*/);

    int y = first ? 0 : p.a;

    // place on top if there is space (doesn't work like this)

    //if (y >= mr.h) y = 0;

    if (first) dm_generalMap_put('modulesUnderAIBar_firstModule, moduleID);

    //print("dm_place: " + p + " / " + y);

    dm_setBounds(module, r.x, y, r.width, mr.h);

    int yOut = y+mr.h;

    if (!first && p != null) yOut = max(yOut, p.a);

    dm_generalMap_put('modulesUnderAIBar_y, t3(yOut, query, y == 0 ? sysNow() : p.c));

    if (first)

      vmBus_send('placedModuleUnderAIBar, module);

    ret first;

  });

}