#ifdef _CP15_D # include "comp15.h" # include "cp15_ini.mml" CTRL(1) = t240 # include "synth1.ini" # include "rguitar.ini" . meas CTRL(1) = $TEMPO() #define _CP15_LAST #endif /*------------------------------------------------------------------------ System(1) = $_PR_D() #$A l8{!15d!13e!14f}4/3 g!12a& ab- g!14b- RGuitarA(21)= $RGuitarA() $A() !14c4&c4 ef !12c!17c!15d}4/4 r2 RGuitarB(21)= $RGuitarB() $A() !14c4 {r!17c!15d}4/4 ef !12c c1 #$A d1 e1 Synth1A(21) = $Synth1A() v'-8 $A() Synth1B(21) = $Synth1B() v'-8 $A() #$A v'-8 g1 c1 #$B v'-8 d1 BGuitarA(21)= $BGuitarA() $A() BGuitarA(22)= $BGuitarA() $B() BGuitarB(21)= $BGuitarB() $A() BGuitarB(22)= $BGuitarB() $B() #$A l16 >!14$slide(d64,u,4,&,x,-700,0)!17b-d!17g!16d!18b-!14$slide(e64,u,4,&,x,-700,0)cc>!17cgce>!17cc16 !13f+4 !14ag!12!15a4 #$B {!15de!13f&}4/3 f4 {!14gfgc}4/4 {!15dgg}4/4 RGuitarA(21)= $A() $B() RGuitarB(21)= $A() $B() CodeA(21) = f+1 g1 /* D7 Gm7 */ CodeA(22) = d1 f1 CodeA(23) = c1 d1 CodeA(24) = #$A f+1 g1 Synth1A(21) = $A() Synth1B(21) = $A() #$A d1 g1 #$B d1 BGuitarA(21)= $A() BGuitarA(22)= $B() BGuitarB(21)= $A() BGuitarB(22)= $B() #$A l16 >!13$slide(d64,u,4,&,x,-700,0)!17ad!16f+!18d!16a!14$slide(f64,u,4,&,x,-700,0)/4!17b-d!17g!18d!16b-cd>!14d< !12gdc !14gab-d&de !14gefd& db-ag >!16c c1 CodeA(24) = r1 r1 #$A d1 e1 Synth1A(21) = $A() Synth1B(21) = $A() #$A g1 c1 #$B d1 BGuitarA(21)= $A() BGuitarA(22)= $B() BGuitarB(21)= $A() BGuitarB(22)= $B() #$A l16 >!14$slide(d64,u,4,&,x,-700,0)!17b-dg!16d!18b-!14$slide(e64,u,4,&,x,-700,0)cc>!18c!17g!16c!14e>!19c!13d!15f+!15f+!16a< d>>!14d<!12a #$B !15 g1& $slide(g64,x,16,&,x,127,40) #$C r1 l16m4rm8rm16rm24r $slide(r64,m,48,,x^2,32,120) RGuitarA(21)= $A() $B() RGuitarB(21)= $A() $B() RGuitarA(11)= $C() RGuitarB(11)= $C() CodeA(21) = f+1 g1 /* D7 Gm7 */ CodeA(22) = d1 f1 CodeA(23) = c1 d1 CodeA(24) = #$A f+1 g1 Synth1A(21) = $A() Synth1B(21) = $A() #$A d1 g1 #$B d1 BGuitarA(21)= $A() BGuitarA(22)= $B() BGuitarB(21)= $A() BGuitarB(22)= $B() #$A l16 >!15$slide(d64,u,4,&,x,-700,0)!18ad!16f+!18d!17a!15$slide(f64,u,4,&,x,-700,0)/4!17b-!12d!17g!18d!16b-!14$slide(d64,u,4,&,x,-700,0)!15b-d!16g!16d!18b-!14$slide(e64,u,4,&,x,-700,0)cc>!17c!15gce>!17c