…html % by Paul Morris % tonic-num: number of the tonic note 0-6, C=0, B=6 % acc-type: the … …flat, otherwise a pair % maj-num: number of the tonic note 0-6, if the key sig were major % … …grob))) (let* ((context (ly:translator-context engraver)) (tonic-pitch (ly:context-property context 'tonic)) (tonic-num (ly:pitch-notename tonic-pitch)) (acc-list (ly:grob-property grob 'alteration-alist)) (acc-type (…