!7

svoid _onLoad {
  onTranspilerDirty(r dm_refreshTranspiler);
}

module StefansAssistant > DynPrintLog {
  transient JTextField tfInput;

  start {
    JComponent trayIcon = jimage(#1101420);
    onClick(trayIcon, rThread addStdFunctionWithAnimation);
    componentPopupMenuItem(trayIcon, "Stefan's Assistant", r dm_showModule);
    dm_setTrayIcon(trayIcon);
  }
  
  visualize {
    ret centerAndSouthWithMargins(super.visualize(),
      centerAndEastWithSpacing(onEnter(tfInput = jtextfield("sf"), rThread go), jbutton("Go", rThread go)));
  }
  
  void go {
    print(stefansAssistant_answer(getText(tfInput)));
  }
}