{
   "code" : "////////////////  Chopin Prelude in Em OP.28,No.4   ///////////////// \r\n\r\n(\r\n SynthDef(\\mdapiano, { |out=0, freq=440, gate=1,\r\n\t                        vel= 100, decay= 0.8, release= 0.8, hard= 0.8,\r\n\t\t                    velhard= 0.8, muffle= 0.8, velmuff= 0.8, velcurve= 0.8, stereo= 0.5,\r\n\t\t                    tune= 0.5, random= 0.1, stret= 0.1, sus= 0|\r\n\r\n   var son = MdaPiano.ar(freq, gate, vel,  decay, release, hard,\r\n\t\t                        velhard, muffle, velmuff, velcurve, stereo,\r\n\t\t                        tune, random, stret, sus);\r\n\tFreeSelf(1-gate);\r\n    Out.ar(out, son );\r\n}).add;\r\n)\r\n\r\n\r\n\r\n(  //                 1      2      3     4      5      6      7         8\r\nvar tNotes = [ 59,71, 71,72, 71,72, 71,72, 71,70, 69,71, 69,71, 69,71,69, 69,68,\r\n  //          9                     10     11        12\r\n\t          67,69,71,74,72,64,69, 66,69, 66,71,69, 67,66,60,59,63,66,74,72,71,\r\n //           13     14     15     16                             17\r\n\t          71,72, 71,72, 71,72, 71,70,70,71,70,69,70,79,78,76, 76,75,84,75,75,76,79,71,\r\n //\t          18                    19        20     21     22     23\r\n\t          74,72,76,64,69,66,69, 66,71,69, 66,64, 64,66, 64,66, 64,\\r,\r\n //           24                           25\r\n\t          [52,54,59,64],[51,54,59,63], [52,55,59,64],\r\n             ];\r\n //                     1    2    3    4    5    6    7          8\r\nvar tDur   = [ 3/4,1/4, 3,1, 3,1, 3,1, 3,1, 3,1, 3,1, 3,3/4,1/4, 3,1,\r\n //            9                          10   11         12\r\n               1,1/2,1/2,1/2,1/2,1/2,1/2, 3,1, 3,1/2,1/2, 1/2,1/2,1/2,1/2,1/2,1/2,1/3,1/3,1/3,\r\n //            13   14   15   16                                     17\r\n\t           3,1, 3,1, 3,1, 3/4,1/4,1/2,1/8,1/8,1/8,1/8,1,3/4,1/4,  1/2,1/2,1/2,1/2,1/2,1/2,1/2,1/2,\r\n //            18                           19         20        21   22   23\r\n               1/2,1/2,1/3,1/3,1/3,3/2,1/2, 3,1/2,1/2, 15/4,1/4, 3,1, 3,1, 2,2,\r\n//             24   25\r\n\t           2,2, 4,\r\n\t         ];\r\n\r\n//                 1                     2\r\nvar bNotes = [ \\r, Pseq([[55,59,64]],8), Pseq([[54,57,64]],4),Pseq([[54,57,63]],4),\r\n//            3\r\n\t          Pseq([[53,57,63]],4),Pseq([[53,57,62]],2),Pseq([[53,56,62]],2),\r\n//            4\r\n\t          Pseq([[52,56,62]],4),Pseq([[52,55,62]],2),Pseq([[52,55,61]],2),\r\n//            5                                          6\r\n\t          Pseq([[52,55,60]],4),Pseq([[52,54,60]],4), Pseq([[52,54,60]],4),Pseq([[51,54,60]],4),\r\n//            7                     8\r\n\t          Pseq([[50,54,60]],8), Pseq([[50,53,60]],4),Pseq([[50,53,59]],4), // bar 7,8\r\n//            9                                          10\r\n\t          Pseq([[48,52,59]],2),Pseq([[48,52,57]],6), Pseq([[47,52,57]],2),Pseq([[47,51,57]],2),Pseq([[48,52,57]],4),\r\n//            11                                         12\r\n\t          Pseq([[47,51,57]],4),Pseq([[48,52,57]],4), Pseq([[47,51,57]],2),Pseq( [\\r], 6),\r\n//            13                    14\r\n\t          Pseq([[55,59,64]],8), Pseq([[54,57,64]],4),Pseq([[53,57,63]],4),  // bar 13, 14\r\n//            15\r\n\t          Pseq([[53,56,63]],2),Pseq([[53,56,62]],2),Pseq([[52,56,62]],4),\r\n//            16\r\n\t          Pseq([[52,55,62]],2),Pseq([[52,55,61]],2),Pseq([[49,52,58]],2),Pseq([[48,52,57]],2),\r\n//            17\r\n\t\t      [23,47],Pseq([[57,60,66,69]],3),[55,59,63,66],Pseq([[55,59,64]],3),\r\n//            18\r\n\t          Pseq([[57,60,64]],2),45,[52,54,60],Pseq([[47,52,59]],2),Pseq([[48,52,57]],2),\r\n//            19\r\n\t          Pseq([[47,52,59]],4),Pseq([[48,52,57]],4),\r\n//            20\r\n\t          Pseq([[47,52,59]],4),Pseq([[47,51,59]],2),Pseq([[47,51,57]],2),\r\n//            21\r\n      \t      Pseq([[48,55]],4), Pseq([[48,58]],2),Pseq([[48, 52, 57]],2),\r\n//            22\r\n              Pseq([[47,52,57]],2), Pseq([[47,52,56]],2),Pseq([[47,52,55]],4),\r\n//            23             24                  25\r\n\t          [46,48,55],\\r, [35,47],[35,42,47], [30,42]\r\n             ];\r\n\r\n//               1-22               23   24   25\r\nvar bDur   = [1, Pseq([1/2], 22*8), 2,2, 2,2, 4];\r\n\r\nvar instr = \\mdapiano;\r\n\r\nvar bA = Pbind(\\instrument, instr ,\\midinote, Pseq(bNotes), \\dur, Pseq(bDur),\r\n\t \\legato, 0.8, \\vel, 60, \\random, 0.0, \\stret, 0.0);\r\n\r\nvar tA = Pbind(\\instrument, instr ,\\midinote, Pseq(tNotes), \\dur, Pseq(tDur),\r\n\t\\legato, 0.8, \\vel, 90, \\random, 0.0, \\stret, 0.0);\r\n\r\n~score = Ppar([bA,tA]);\r\n~score.play(TempoClock(50/60));\r\n)\r\n\r\n//////////////////////////\r\n\r\nHere is my problem. In piano music, \r\na chord is held down simultaneously.  But then\r\nsome voices can move while other notes are still held down.\r\ni.e the chord notes have different durations? Does anyone\r\nknow an elegant way to deal with this?\r\n\r\nthanks, Stewart",
   "id" : "1-5fK",
   "is_private" : null,
   "labels" : [],
   "description" : "Hello Everyone. This is my first post.\r\n\r\nI'm trying to transcribe classical piano music to SuperCollider.\r\n\r\nHere is my problem. In piano music, \r\na chord is held down simultaneously.  But then\r\nsome voices can move while other notes are still held down.\r\ni.e the chord notes have different durations? Does anyone\r\nknow an elegant way to deal with this?\r\n\r\nthanks, Stewart",
   "ancestor_list" : [],
   "name" : "classical piano music in SC",
   "author" : "stewartmandell"
}