John, I'd hoped to ftp my butchering that seems to cure the accidental problem to the zip file I'd linked to before above but ftp keeps cutting out on me. Maybe tommorrow I can give you something to look at.

A little more info re the program in case you want to fix yourself. When "$ProcessNow=Yes" the next step is essentially this:

@note{join('.',$abcline,$abcnote)} = $CurrentNote;
@lnth{join('.',$abcline,$abcnote)} = $Lnth;
@Grace{join('.',$abcline,$abcnote)} = $Gracing;
@accd{join('.',$abcline,$abcnote)} = $Accidental;
@octv{join('.',$abcline,$abcnote)} = $Octave;
@Ending{join('.',$abcline,$abcnote)} = $EndingNo;

I really don't understand it but would guess it's sort of a series of arrays, one for the note value, one for note length, etc.

Hope that helps a little.

Jon