JulioHerrlein Posted March 24, 2021 Share Posted March 24, 2021 Dear all Is there some way to make a processing of accidentals in the make-omn expression or even later, in the PS expression ? Something like: bar #1 all sharps bar#2 all flats etc. I noticed that after many sucessive list processing, my original notes were altered. Thanks ! Best ! Julio Quote Link to comment Share on other sites More sharing options...
JulioHerrlein Posted April 11, 2021 Author Share Posted April 11, 2021 Maybe this could be implemented inside the "omn-dictum" function, since it have the "per bar" processing. Quote Link to comment Share on other sites More sharing options...
opmo Posted April 11, 2021 Share Posted April 11, 2021 After any pitch processing (conversion to numbers) the system will use the default accidentals: c cs4 d eb e f fs g gs a bb b Quote Link to comment Share on other sites More sharing options...
JulioHerrlein Posted April 11, 2021 Author Share Posted April 11, 2021 Yes, But the purpose of omn-dictum, according to the documentation is to provide the possibiliry of revisions : "The dictum arguments can be seen as maps, rules or handwritten corrections to a final score." So, this kind of revision is typical. Maybe keywords like :flats and :sharps Something like: (omn-dictum '((e stacc 1) (:sharps 2) (3q leg 2)) omn2) Best ! Julio Quote Link to comment Share on other sites More sharing options...
opmo Posted April 11, 2021 Share Posted April 11, 2021 This could be done. Stephane Boussuge and JulioHerrlein 1 1 Quote Link to comment Share on other sites More sharing options...
opmo Posted April 12, 2021 Share Posted April 12, 2021 Done. (omn-dictum '((e stacc 1) (:all :sharp 2) (3q leg 2)) omn2) (omn-dictum '((e stacc 1) (bb4 :sharp) (3q leg 2)) omn2) (omn-dictum '((:all :sharp 1) (:all :flat 2)) '((q bb4 leg a4 mp leg gs4 a4 f) (q bb4 leg a4 mp leg gs4 a4 f))) Stephane Boussuge 1 Quote Link to comment Share on other sites More sharing options...
opmo Posted April 12, 2021 Share Posted April 12, 2021 REWRITE-ACCIDENTALS - in forthcoming release. (setf sequence '((q d4 pp s eb4 leg g4 p leg bb4 leg a4) (q. cs5 mf -e 3q gs5 leg fs5 leg c5 b4 ff leg f4 leg e4))) (rewrite-accidentals sequence :map :chromatic) => ((q d4 pp s ds4 leg g4 p leg bb4 leg a4) (q. cs5 mf -e 3q ab5 leg gb5 leg c5 b4 ff leg f4 leg e4)) (rewrite-accidentals sequence :map :sharp) => ((q d4 pp s ds4 leg g4 p leg as4 leg a4) (q. cs5 mf -e 3q gs5 leg fs5 leg c5 b4 ff leg f4 leg e4)) (rewrite-accidentals sequence :map :flat) => ((q d4 pp s eb4 leg g4 p leg bb4 leg a4) (q. db5 mf -e 3q ab5 leg gb5 leg c5 b4 ff leg f4 leg e4)) Quote Link to comment Share on other sites More sharing options...
JulioHerrlein Posted April 12, 2021 Author Share Posted April 12, 2021 Thank you, Janusz ! Great !! Best ! Julio Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.