// This script file is licensed under a Creative Commons
// Attribution 4.0 International License (cc by 4.0):
// http://creativecommons.org/licenses/by/4.0/
// You may adapt and/or share this script file for any purpose,
// provided you give credit to http://bridgecomposer.com
//
//  This script removes all the Auction and Play "notes" from all boards in a PBN file.
//  Caution: There is no undo (unless you call this from the BC Script menu).
//
//  $Id: NotesClear.wsf 140 2023-07-10 01:29:24Z Ray $
<job>
<script language="JScript" src="BCConst.js" />
<script language="JScript">
var nMod = 0;

function ClearRefs(bd, tag)
{
  var strSection = bd.TagSection(tag);
  var strReplace = strSection.replace(/ =\d+=/g, '');
  if (strReplace != strSection) {
    bd.TagSection(tag) = strReplace;
    ++nMod;
  }
}

function ClearDefs(notes)
{
  if (notes.Count) {
    notes.RemoveAll();
    ++nMod;
  }
}

(function ()
{
  var bc = WScript.CreateObject('BridgeComposer.Object');
  if (WScript.Arguments.length > 0) {
    bc.Open(WScript.Arguments(0));
  } else {
    if (!bc.Open()) WScript.Quit();
  }
  var bds = bc.Boards;
  while (bds.MoveNext()) {
    var bd = bds.Current;
    ClearRefs(bd, 'Auction');
    ClearDefs(bd.AuctionNotes);
    ClearRefs(bd, 'Play');
    ClearDefs(bd.PlayNotes);
  }
  
  if (nMod)
  {
    bc.Save();
  }
})();
</script>
</job>