!7

module TransmitAudio > DynPrintLog {
  S sendTo;
  bool enabled;
  transient Q q;
  
  start {
    q = dm_startQ();
    dm_addAudioListener(voidfunc(short[] data) {
      if (!enabled || !possibleComputerID(sendTo)) ret;
      final byte[] bytes = byteArrayFromShorts_littleEndian(data);
      q.add(r {
        dm_privateChat_send(sendTo, "audio:" + base64(bytes));
      });
    });
  }
  
  visualize {
    ret centerAndSouthWithMargins(super.visualize(),
      centerAndEast(withLabel("Send to:", dm_fieldTextField('sendTo)),
        dm_fieldCheckBox('enabled)));
  }
}