通达信展翅高飞及选股公式源码

　　MAC5:=(ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*180/3.14115926);

　　M5:=MA(MAC5,5);

　　AA:=PLOYLINE(CROSS(MAC5,M5),M5);

　　AAB:=PLOYLINE(CROSS(M5,MAC5),MAC5);

　　W:COUNT(CROSS(MAC5,M5),AAREF(AAB,5));

　　STICKLINE(IF(W,-120,0),+1,0,4,0),COLOR000088;

　　STICKLINE(IF(W,-120,0),+1,0,3,0),COLOR0000AA;

　　STICKLINE(IF(W,-120,0),+1,0,2,0),COLOR0000CC;

　　STICKLINE(IF(W,-120,0),+1,0,1.4,0),COLOR0000EE;

　　STICKLINE(IF(W,-120,0),+1,0,0.9,0),COLOR0000EE;

　　STICKLINE(IF(W,-120,0),+1,0,0.3,0),COLORLIMAGENTA;

　　STICKLINE(IF(W,-120,0),+0.9,0,7,0),COLOR770077;

　　STICKLINE(IF(W,-120,0),+0.9,0,6,0),COLOR990099;

　　STICKLINE(IF(W,-120,0),+0.9,0,5,0),COLORBB00BB;

　　STICKLINE(IF(W,-120,0),+0.9,0,4,0),COLORDD00DD;

　　STICKLINE(IF(W,-120,0),+0.9,0,3,0),COLORFF00FF;

　　STICKLINE(IF(W,-120,0),+0.9,0,2,0),COLORDD00DD;

　　STICKLINE(IF(W,-120,0),+0.6,0,7,0),COLOR003300;

　　STICKLINE(IF(W,-120,0),+0.6,0,6,0),COLOR005500;

　　STICKLINE(IF(W,-120,0),+0.6,0,5,0),COLOR007700;

　　STICKLINE(IF(W,-120,0),+0.6,0,3.5,0),COLOR009900;

　　STICKLINE(IF(W,-120,0),+0.6,0,2,0),COLOR00CC00;

　　STICKLINE(IF(W,-120,0),+0.3,0,7,0),COLOR666666;

　　STICKLINE(IF(W,-120,0),+0.3,0,6,0),COLOR777777;

　　STICKLINE(IF(W,-120,0),+0.3,0,5,0),COLOR888888;

　　STICKLINE(IF(W,-120,0),+0.3,0,4,0),COLOR999999;

　　STICKLINE(IF(W,-120,0),+0.3,0,3,0),COLORDDDDDD;

　　STICKLINE(IF(W,-120,0),+0.3,0,2,0),COLORFFFFFF;

　　DRAWTEXT(W,0.9,"展"),COLORYELLOW;

　　DRAWTEXT(W,0.75,"翅"),COLORYELLOW;

　　DRAWTEXT(W,0.45,"高"),COLORRED;

　　DRAWTEXT(W,0.15,"飞"),COLORRED;

　　{

　　选股公式:

　　MAC5:=(ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*180/3.14115926);

　　M5:=MA(MAC5,5);

　　AA:=PLOYLINE(CROSS(MAC5,M5),M5);

　　AAB:=PLOYLINE(CROSS(M5,MAC5),MAC5);

　　展翅高飞:COUNT(CROSS(MAC5,M5),AAREF(AAB,5));

　　}