!7

module KeyLogger > DynPrintLog {
  bool verbose;
  
  S switchableFields() { ret 'verbose; }
  
  start {
    ownResource(onGlobalKeyPress(voidfunc(NativeKeyEvent e) {
      if (verbose)
        print("Key down: " + e.getKeyCode() + ", mod=" + e.getModifiers()
          + ", raw=" + e.getRawCode() + ", char=" + e.getKeyChar()
          + ", loc=" + e.getKeyLocation());
      vmBus_send('keyDown, e.getKeyCode(), e.getModifiers());
    }));
  }
}