乐于分享
好东西不私藏

通达信【筹码锁定】副图选股源码分享

通达信【筹码锁定】副图选股源码分享

副图指标:

GHCZS1:=COST(80)-COST(20);

GHCZS2:=COST(90)-COST(5);

GHCZS3:=GHCZS2/COST(5);

GHCZS4:=GHCZS1/COST(20)< 0.2 AND GHCZS2/COST(5)<0.28;

GHCZS5:=C/REF(C,1)>1.03 AND VOL>REF(VOL,1) AND WINNER(C)>0.8;

GHCZS6:=GHCZS4 OR REF(GHCZS4,1) AND GHCZS5 AND CLOSE/REF(COST(80),2)< 1.1;

GHCZS7:=GHCZS6 AND FILTER(GHCZS6=1,15);

GHCZS8:=MA(CLOSE,5);

GHCZS9:=ATAN((GHCZS8/REF(GHCZS8,1)-1)*100)*180/3.1416;

DRAWTEXT_FIX(1,0,0.07,0,'微信公众号:辰风指标'),COLORMAGENTA,LINETHICK4;

GHCZS10:=MA(C,10);

GHCZS11:=MA(CLOSE,20);

GHCZS12:=ATAN((GHCZS10/REF(GHCZS10,1)-1)*100)*180/3.1416;

GHCZS13:=MA(C,30);

GHCZS14:=ATAN((GHCZS13/REF(GHCZS13,1)-1)*100)*180/3.1416;

GHCZS15:=FILTER(GHCZS14>30 AND GHCZS12>45 AND CROSS(GHCZS9,60),10);

GHCZS16:=VOL/((H-L)*2-ABS(C-O));

GHCZS17:=IF(CLOSE>OPEN,GHCZS16*(H-L),IF(CLOSE< OPEN,GHCZS16*(H-O+(C-LOW)),VOL/2));

GHCZS18:=IF(C>OPEN,0-GHCZS16*(H-CLOSE+(O-LOW)),IF(C<OPEN,0-GHCZS16*(HIGH-LOW),0-VOL/2));

GHCZS19:=GHCZS17+GHCZS18;

GHCZS20:=SUM(GHCZS19,5)/10000;

GHCZS21:=GHCZS15=1;

GHCZS22:=GHCZS15=1 AND GHCZS7>0;

GHCZS23:=GHCZS15=1 AND GHCZS20>0;

GHCZS24:=GHCZS15=1 AND GHCZS20>0 AND GHCZS7>0;

GHCZS25:=GHCZS21 OR GHCZS22 OR GHCZS23 OR GHCZS24;

STICKLINE(GHCZS25,10,0,3,0),COLOR33FFFF;

STICKLINE(GHCZS25,10,0,2,0),COLOR66FFFF;

STICKLINE(GHCZS25,10,0,1,0),COLORFF80FF;

STICKLINE(GHCZS25,10,0,0.5,0),COLORC080FF;

 选股指标:

XG1:=COST(80)-COST(20);

XG2:=COST(90)-COST(5);

XG3:=XG2/COST(5);

XG4:=XG1/COST(20)< 0.2 AND XG2/COST(5)< 0.28;

XG5:=C/REF(C,1)>1.03 AND V>REF(V,1) AND WINNER(C)>0.8;

XG6:=XG4 OR REF(XG4,1) AND XG5 AND C/REF(COST(80),2)< 1.1;

XG7:=XG6 AND FILTER(XG6=1,15);

XG8:=MA(C,5);

XG9:=ATAN((XG8/REF(XG8,1)-1)*100)*180/3.1416;

XG10:=MA(C,10);

XG11:=MA(C,20);

XG12:=ATAN((XG10/REF(XG10,1)-1)*100)*180/3.1416;

XG13:=MA(C,30);

XG14:=ATAN((XG13/REF(XG13,1)-1)*100)*180/3.1416;

XG15:=FILTER(XG14>30 AND XG12>45 AND CROSS(XG9,60),10);

XG16:=VOL/((HIGH-L)*2-ABS(C-O));

XG17:=IF(C>O,XG16*(HIGH-L),IF(C<O,XG16*(HIGH-O+(C-L)),VOL/2));

XG18:=IF(C>O,0-XG16*(HIGH-C+(O-L)),IF(C< O,0-XG16*(HIGH-L),0-VOL/2));

XG19:=XG17+XG18;

XG20:=SUM(XG19,5)/10000;

XG21:=XG15=1;

XG22:=XG15=1 AND XG7>0;

XG23:=XG15=1 AND XG20>0;

XG24:=XG15=1 AND XG20>0 AND XG7>0;

筹码锁定X:XG21 OR XG22 OR XG23 OR XG24;