-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathmandarinbass.sco
287 lines (272 loc) · 5.14 KB
/
mandarinbass.sco
1
t 0 60i 100 0 100#define ZANGESOTOR(I#T)#i $I $T 1 [1] 0i $I + 4 [27/22] 1i $I + 1 [1] 0i $I + 4 [4/3] 1i $I + 1 [1] 0i $I + 4 [27/22] 1i $I + 1 [1] 0i $I + 4 [3/2] 1i $I + 1 [1] 0i $I + 4 [4/3] 1i $I + 1 [1] 0i $I + 4 [27/22] 1i $I + 1 [1] 0i $I + 4 [162/98] 1i $I + 1 [1] 0i $I + 4 [3/2] 1i $I + 1 [1] 0i $I + 4 [4/3] 1i $I + 1 [1] 0i $I + 4 [27/22] 1##define MUYEBASIS(I#T)#i $I $T 2 [27/22] 0i $I + 1 [4/3] 0i $I + 2 [3/2] 0i $I + 2 [162/98] 0i $I + 2 [9/5] 0i $I + 1 [2] 0i $I + 2 [9/5] 0i $I + 2 [162/98] 0i $I + 2 [3/2] 0i $I + 1 [4/3] 0i $I + 2 [27/22] 0##define HESARBASIS(I#T)#i $I $T 1 [7/5] 0i $I + 2 [3/2] 0i $I + 2 [5/3] 0i $I + 2 [49/27] 0i $I + 2 [2] 0i $I + 1 [9/4] 0i $I + 1 [27/11] 0i $I + 1 [9/4] 0i $I + 2 [2] 0i $I + 2 [49/27] 0i $I + 2 [5/3] 0i $I + 2 [3/2] 0i $I $T 1 [7/5] 0##define MOXALEFBASIS(I#T)#i $I $T 2 [3/2] 0i $I + 2 [162/98] 0i $I + 2 [49/27] 0i $I + 2 [2] 0i $I + 2 [9/4] 0i $I + 1 [12/5] 0i $I + 2 [9/4] 0i $I + 2 [2] 0i $I + 2 [49/27] 0i $I + 2 [162/98] 0i $I + 2 [3/2] 0##define MAQLUBBASIS(I#T)#i $I $T 1 [3/2] 0i $I + 1 [162/98] 0i $I + 2 [49/27] 0i $I + 2 [2] 0i $I + 2 [9/4] 0i $I + 2 [12/5] 0i $I + 2 [8/3] 0i $I + 2 [12/5] 0i $I + 2 [9/4] 0i $I + 2 [2] 0i $I + 2 [49/27] 0i $I + 1 [162/98] 0i $I + 1 [3/2] 0##define DARAMADS(I#T)#i $I $T 2 [27/22] 0i $I + .25 [1] 0i $I + .5 [27/22] 1i $I + .25 [1] 0i $I + .75 [27/22] 1i $I + 2 [27/22] 0i $I + .75 [4/3] 0i $I + .25 [27/22] 1i $I + .75 [4/3] 0i $I + .25 [27/22] 1i $I + .25 [4/3] 0i $I + .25 [3/2] 1i $I + .25 [3/2] 1i $I + .25 [4/3] 1i $I + 2 [3/2] 0i $I + .75 [4/3] 0i $I + .25 [27/22] 1i $I + .5 [4/3] 0i $I + .5 [3/2] 0i $I + .25 [4/3] 0i $I + .25 [4/3] 1i $I + .25 [27/22] 1i $I + 2 [27/22] 0i $I + .25 [1] 0i $I + .5 [27/22] 0i $I + 2 [27/22] 0##define ZABOL(I#T)#i $I $T .5 [27/22] 0i $I + .5 [4/3] 0i $I + 2 [3/2] 0i $I + .25 [4/3] 0i $I + .75 [3/2] 0i $I + .25 [162/98] 0i $I + .25 [3/2] 1i $I + .25 [162/98] 1i $I + .25 [3/2] 1i $I + 2 [162/98] 1i $I + 2 [3/2] 0i $I + .25 [162/98] 0i $I + .25 [3/2] 1i $I + .25 [4/3] 1i $I + .25 [27/22] 1i $I + .25 [4/3] 0i $I + .25 [3/2] 1i $I + .25 [3/2] 0i $I + .25 [4/3] 0i $I + 1.75 [3/2] 1i $I + .25 [162/98] 0i $I + .25 [3/2] 1i $I + .25 [4/3] 1i $I + 2 [27/22] 1##define MUYE(I#T)#i $I $T .25 [3/2] 0i $I + .25 [162/98] 1i $I + .25 [9/5] 1i $I + .5 [162/98] 0i $I + .5 [9/5] 0i $I + 1.5 [162/98] 0i $I + .5 [3/2] 1i $I + .25 [162/98] 0i $I + 1.75 [9/5] 0i $I + 1.5 [162/98] 0i $I + .25 [3/2] 1i $I + .25 [9/5] 0i $I + .25 [162/98] 1i $I + .25 [3/2] 0i $I + .25 [162/98] 0i $I + .25 [3/2] 0i $I + .25 [162/98] 0i $I + .25 [3/2] 0i $I + .25 [162/98] 0i $I + .25 [3/2] 0i $I + .25 [162/98] 0i $I + .5 [162/98] 0i $I + 2.5 [3/2] 1i $I + .25 [3/2] 0i $I + .25 [162/98] 1i $I + .25 [9/5] 0i $I + .5 [162/98] 1i $I + .25 [3/2] 1i $I + .25 [162/98] 0i $I + 1.75 [9/5] 0i $I + .25 [162/98] 0i $I + .25 [3/2] 1i $I + .25 [4/3] 1i $I + .25 [27/22] 1##define HESAR(I#T)#i $I $T .25 [3/2] 0i $I + .25 [5/3] 1i $I + .25 [49/27] 1i $I + .25 [2] 0i $I + .25 [49/27] 1i $I + .25 [5/3] 1i $I + .25 [49/27] 0i $I + .25 [2] 1i $I + .25 [49/27] 1i $I + .5 [2] 0i $I + 2 [49/27] 0 i $I + .1 [2] 0i $I + .65 [49/27] 1 i $I + .25 [2] 1i $I + .125 [49/27] 0 i $I + .125 [2] 0 i $I + .125 [49/27] 0 i $I + .125 [2] 0 i $I + .125 [49/27] 0 i $I + .125 [2] 0 i $I + .125 [49/27] 0i $I + .125 [2] 0i $I + .0625 [49/27] 0 i $I + .0625 [2] 0 i $I + .0625 [49/27] 0 i $I + .0625 [2] 0 i $I + .0625 [49/27] 0 i $I + .0625 [2] 0 i $I + .0625 [49/27] 0i $I + .0625 [2] 0i $I + .0625 [49/27] 0 i $I + .0625 [2] 0 i $I + .0625 [49/27] 0 i $I + .0625 [2] 0 i $I + .0625 [49/27] 0 i $I + .0625 [2] 0 i $I + .0625 [49/27] 0i $I + .0625 [2] 0i $I + 2 [2] 0 i $I + .25 [49/27] 0i $I + .25 [5/3] 1i $I + .25 [49/27] 1i $I + .25 [5/3] 1i $I + 2 [49/27] 1i $I + .5 [2] 0i $I + .5 [49/27] 0i $I + .25 [9/4] 0i $I + .5 [2] 1i $I + .25 [49/27] 1i $I + 1.5 [2] 0i $I + .5 [9/4] 1i $I + .25 [2] 0 i $I + .25 [49/27] 1i $I + .25 [5/3] 1 i $I + 2.5 [3/2] 1 i $I + 1 [2] 0i $I + 1 [49/27] 0i $I + .25 [3/2] 0i $I + .5 [49/27] 0 i $I + 2 [49/27] 0##define FORUD(I#T)#i $I $T 1 [27/22] 0i $I + .25 [4/3] 0 i $I + .375 [3/2] 0 i $I + .125 [4/3] 1 i $I + .75 [3/2] 0 i $I + .25 [162/98] 1i $I + .25 [3/2] 0 i $I + .25 [4/3] 1i $I + .25 [27/22] 0 i $I + .25 [4/3] 1i $I + .25 [27/22] 1 i $I + .25 [4/3] 1i $I + .25 [27/22] 1 i $I + .25 [4/3] 1 i $I + .25 [27/22] 0 i $I + .375 [4/3] 0 i $I + .125 [27/22] 1 i $I + .25 [3/2] 0 i $I + .375 [4/3] 0 i $I + .125 [27/22] 1 i $I + 2 [27/22] 0 i $I + 1 [1] 0 i $I + 1 [27/22] 0 i $I + .25 [1] 0i $I + .5 [27/22] 0 i $I + 2 [27/22] 0##define MOXALEF(I#T)#i $I $T .25 [3/2] 0i $I + .25 [3/2] 0i $I + .5 [3/2] 0i $I + .5 [162/98] 0 i $I + .5 [49/27] 0 i $I + 1 [2] 0 i $I + .25 [9/5] 0 i $I + .75 [2] 0 i $I + .25 [49/27] 0 i $I + .25 [2] 1 i $I + .25 [9/4] 1 i $I + .5 [2] 0 i $I + .5 [9/4] 0 i $I + .75 [2] 0 i $I + .25 [49/27] 1 i $I + 2 [9/4] 0 i $I + .1 [12/5] 1i $I + .4 [9/4] 0 i $I + .5 [2] 0 i $I + .5 [49/27] 0 i $I + 2 [2] 0#