通达信主力换手率主图指标公式源码

主力换手率:=O;
游资换手率:=C;
龙头突破:=(3*C+H+L+O)/6;
换手率寻龙1:=(8*龙头突破+7*REF(龙头突破,1)+6*REF(龙头突破,2)+5*REF(龙头突破,3)+4*REF(龙头突破,4)+3*REF(龙头突破,5)+2*REF(龙头突破,6)+REF(龙头突破,8))/36,COLORFF7700;
换手率寻龙2:=(HHV(换手率寻龙1,5)+HHV(换手率寻龙1,10)+HHV(换手率寻龙1,20))/3;
换手率寻龙3:=(LLV(换手率寻龙1,5)+LLV(换手率寻龙1,10)+LLV(换手率寻龙1,20))/3;
换手率寻龙4:=(HHV(换手率寻龙2,5)+HHV(换手率寻龙2,10)+HHV(换手率寻龙2,20))/3;
换手率寻龙5:=(LLV(换手率寻龙3,5)+LLV(换手率寻龙3,10)+LLV(换手率寻龙3,20))/3;
换手率寻龙6:=(LLV(换手率寻龙1,2)+LLV(换手率寻龙1,4)+LLV(换手率寻龙1,6))/3;
{长期趋势线}
{长期趋势线:(MA(C,188)),COLORGREEN,LINETHICK2;
LC:=REF(游资换手率,1);
RS1:=SMA(MAX(游资换手率-LC,0),12,1)/SMA(Abs(游资换手率-LC),12,1)*100;
起步:IF((RS1 >58),长期趋势线,DRAWNULL),,COLORRED,LINETHICK2;
DRAWTEXT(ISLASTBAR,长期趋势线,' 长期')COLORYELLOW;}
{红}
STICKLINE(游资换手率>主力换手率,游资换手率,主力换手率,3,0),COLOR000099;
STICKLINE(游资换手率>主力换手率,游资换手率,主力换手率,2.2,0),COLOR0000CC;
STICKLINE(游资换手率>主力换手率,游资换手率,主力换手率,1.5,0),COLOR0000FF;
STICKLINE(游资换手率>主力换手率,游资换手率,主力换手率,0.5,0),COLORCC66FF;
DRAWBAND(换手率寻龙1,RGB(155,50,50),换手率寻龙6,RGB(250,250,0));
DRAWKLINE(HIGH,主力换手率,LOW,游资换手率);
短线趋势线:换手率寻龙1,COLORWHITE;
中线趋势线:换手率寻龙6,COLORYELLOW,LINETHICK3;
下跌:IF(换手率寻龙1=换手率寻龙6,换手率寻龙6,DRAWNULL),COLORFF5500,LINETHICK4;
bias13:=MA((游资换手率-MA(游资换手率,13))/MA(游资换手率,13),3)*100,COLORFF5500,LINETHICK4;
XG2:=DRAWICON(crOSS(BIAS13,REF(BIAS13,1)),BIAS13,1);
DRAWTEXT(FILTER(XG2=1,5),LOW-0.03,'↖换手龙头'),COLORYELLOW;
STICKLINE(XG2,O,C,2,0),COLOR00FFFF;
{牛熊}
NX:=MA(C,100);
牛熊:NX,COLORFFFFFF,LINETHICK1;
DRAWTEXT(ISLASTBAR,NX,' 牛熊')COLORFFFFFF;
短趋势:EMA(EMA(EMA(EMA(EMA(游资换手率,60),2),2),2),2),LINETHICK1,COLORRED;
DRAWTEXT(ISLASTBAR,短趋势,' 短期')COLORRED;
{下面表述的所属行业、地域、板块}
DRAWTEXT_FIX(ISLASTBAR,0.00,0.0,0,DYBLOCK),COLORRED;{地域}
DRAWTEXT_FIX(ISLASTBAR,0.07,0.00,01,HYBLOCK),COLORYELLOW;{产业}
DRAWTEXT_FIX(1,0.09,0.00,0,EXTERNSTR(0,1))COLORGREEN;{详细业务}
DRAWTEXT_FIX(1,0.00,0.04,0,'主题概念：')COLORFF00FF;
DRAWTEXT_FIX(1,0.04,0.04,0,EXTERNSTR(0,2))COLORFF00FF;
DRAWTEXT_FIX(1,0.00,0.08,0,'公司亮点：')COLOR00FF00;
DRAWTEXT_FIX(1,0.04,0.08,0,EXTERNSTR(0,3))COLOR00FF00;
{显示年月日}
N11:=STRCAT(CON2STR(YEAR,0),' 年 ');
Y:=STRCAT(CON2STR(MONTH,0),' 月 ');
R:=STRCAT(CON2STR(DAY,0),' 日 ');
SJ:=STRCAT(STRCAT(N11,Y), R);
DRAWTEXT_FIX(C>0,0.78,0.01,0,SJ);
DRAWTEXT_FIX(1,0.01,1,0,'~★~换手龙头~★~'),COLORRED;
{波段操作解盘原码}
{STICKLINE(游资换手率> REF(游资换手率,1) ,HIGH,LOW,0,0),COLOR8080FF;
STICKLINE(游资换手率> REF(游资换手率,1) ,主力换手率,游资换手率,3.1,0),COLOR000033;
STICKLINE(游资换手率> REF(游资换手率,1) ,主力换手率,游资换手率,2.1,0),COLORRED;
STICKLINE(游资换手率> REF(游资换手率,1) ,主力换手率,游资换手率,1.5,0),COLOR0000CC;
STICKLINE(游资换手率> REF(游资换手率,1) ,主力换手率,游资换手率,0.3,0),COLORCC66FF;{立体红颜色};
{STICKLINE(游资换手率< REF(游资换手率,1) ,HIGH,LOW,0,0 ),COLORFFFF00;
STICKLINE(游资换手率< REF(游资换手率,1) ,主力换手率,游资换手率,3.1,0 ),COLOR000000;
STICKLINE(游资换手率< REF(游资换手率,1) ,主力换手率,游资换手率,2.1,0),COLORFF6600;
STICKLINE(游资换手率< REF(游资换手率,1) ,主力换手率,游资换手率,1.5,0 ),COLORDDDD00;
STICKLINE(游资换手率< REF(游资换手率,1) ,主力换手率,游资换手率,0.3,0),COLORFFFF00;{立体青色};
均价:=(3*C+H+L+O)/6;
换手率寻龙1A:=(8*均价+7*REF(均价,1)+6*REF(均价,2)+5*REF(均价,3)+4*REF(均价,4)+3*REF(均价,5)+2*REF(均价,6)+REF(均价,8))/36;
换手率寻龙2A:=(LLV(换手率寻龙1A,2)+LLV(换手率寻龙1A,4)+LLV(换手率寻龙1A,6))/3;
SZ1:=REF(换手率寻龙1A,1)=REF(换手率寻龙2A,1) AND 换手率寻龙1A>换手率寻龙2A AND 游资换手率>换手率寻龙1A;
SZ2:=换手率寻龙1A>换手率寻龙2A AND 换手率寻龙1A>REF(换手率寻龙1A,1) AND 换手率寻龙2A>REF(换手率寻龙2A,1) AND H/换手率寻龙1A<1.1 AND L>换手率寻龙2A AND 游资换手率>换手率寻龙1A;
SZ3:=换手率寻龙1A>换手率寻龙2A AND 换手率寻龙1A>REF(换手率寻龙1A,1) AND 换手率寻龙2A>=REF(换手率寻龙2A,1) AND H/换手率寻龙1A>1.1;
SZ4:=换手率寻龙1A>换手率寻龙2A AND 换手率寻龙1A>REF(换手率寻龙1A,1) AND 换手率寻龙2A>REF(换手率寻龙2A,1) AND 游资换手率>换手率寻龙2A AND 游资换手率<换手率寻龙1A;
SZ5:=(换手率寻龙1A>换手率寻龙2A AND 换手率寻龙2A>REF(换手率寻龙2A,1) AND 换手率寻龙1A<>REF(换手率寻龙1A,1) AND 游资换手率<换手率寻龙2A) OR (换手率寻龙1>换手率寻龙2A AND 换手率寻龙1A<REF(换手率寻龙1A,1) AND 换手率寻龙2A<REF(换手率寻龙2A,1) AND 游资换手率<换手率寻龙2A);
SZ6:=REF(换手率寻龙1A,1)>REF(换手率寻龙2A,1) AND 换手率寻龙1A=换手率寻龙2A AND 游资换手率<换手率寻龙2A;
XD1:=换手率寻龙1=换手率寻龙2A AND 游资换手率<换手率寻龙2A OR (换手率寻龙1A<REF(换手率寻龙1A,1) AND 换手率寻龙2A<REF(换手率寻龙2A,1) AND REF(换手率寻龙1A,1)=REF(换手率寻龙2A,1) AND 游资换手率<换手率寻龙2A);
XD2:=换手率寻龙1=换手率寻龙2A AND 游资换手率>换手率寻龙1A;
{SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));}
{量能饱和度:=IF(SAT>1,1,SAT)*100;}
DRAWTEXT_FIX(BARSTATUS=2 AND SZ1,0.65,0.05,0,''),COLORFF00FF;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ2,0.65,0.05,0,''),COLORRED;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ3,0.65,0.05,0,''),COLOR00FFFF;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ4,0.65,0.05,0,''),COLORFFFFFF;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ5,0.65,0.05,0,''),COLORFF9933;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ6,0.65,0.05,0,''),COLORFFFF00;
DRAWTEXT_FIX(BARSTATUS=2 AND XD1,0.72,0.05,0,''),COLOR00FF00;
DRAWTEXT_FIX(BARSTATUS=2 AND XD2,0.65,0.05,0,''),COLORYELLOW;
{DRAWTEXT_FIX(1,0.00,0.15,0,EXTERNSTR(0,1)),COLORFFFFFF; }
DRAWTEXT_FIX(1,0.48,0.05,0,'红带持股-----蓝线持币')COLORRED,LINETHICK2;
DRAWTEXT_FIX(1,0.1,1,0,'守则：1、跟踪红彩带、牛熊线走平及向上股！2、在牛熊线走平或上翘时要关注。3、下跌蓝线时不要买股！')COLORYELLOW; {0.5=X坐标；0.06=Y坐标};
{逃顶}
LCC:=REF(游资换手率,1);
rsiC:=SMA(MAX(游资换手率-LCC,0),6,1)/SMA(ABS(游资换手率-LCC),6,1)*100;
DRAWTEXT(CROSS(84,RSIC) , HIGH*0.99,' '),COLORGREEN;
{绝顶逃}
日:=150;
昨前:=3;
高1:=REF(HHV(H,日),昨前);
天顶:REFDATE(高1,DATE)NODRAW,COLORCYAN;
顶:=REFDATE(高1,DATE);
极顶:=REFDATE(顶,DATE);
跑:=极顶=H AND ((C-L)<(O-C) OR (O-L)<(C-O));
STICKLINE(跑,C,O,3,0),COLORGREEN;
STICKLINE(跑,L,H,0.1,0),COLORGREEN;
DRAWTEXT(跑,H*0.96,'---')COLORGREEN;
{涨跌停}
C3:=REF(C,1);
涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0);
STICKLINE(涨停,主力换手率,游资换手率,2,0),COLORMAGENTA;
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);
STICKLINE(跌停,主力换手率,游资换手率,2,0),COLORWHITE;
{顶底背离，无未来}
TC1:=IF(H=HHV(H,48),H,DRAWNULL);
TC2:=CONST(BARSLAST(TC1=H))+1;
UPPER1:=CONST(IF(TC2=1,H,REF(H,TC2-1)));
BC1:=IF(L=LLV(L,48),L,DRAWNULL);
BC2:=CONST(BARSLAST(BC1=L))+1;
LOWER1:=CONST(IF(BC2=1,L,REF(L,BC2-1)));
LP:=CURRBARSCOUNT<=BC2 AND L=LOWER1;{低点定位}
HP:=CURRBARSCOUNT<=TC2 AND H=UPPER1;{高点定位}
DRAWTEXT(LP,L*1,'底背'),COLORYELLOW;{波段底文字提示，黄色}
DRAWTEXT(HP,H*0.98,' '),COLOR00FF00;{波段顶文字提示，绿色};