通达信一目了然主图选股指标公式源码

通达信一目了然主图选股指标公式源码

源码正文：

MID:=(3*CLOSE+LOW+OPEN+HIGH)/6{XG51};
牛线:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14
*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8
*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)
+2*REF(MID,18)+REF(MID,20))/210,COLORWHITE{XG51};
马线:ma(牛线,6),COLORCYAN{XG51};
VAR0:=SMA(MAX(CLOSE-REF(C,1),0),12,1)/SMA(Abs(CLOSE-REF(C,1)),15,1)*100{XG51};
DRAWTEXT(crOSS(82,VAR0),H*1.04,'快卖'),COLORRED{XG51};
S:=C-REF(C,1){XG51};
DX:=100*ema(EMA(S,6),6)/EMA(EMA(ABS(S),6),6){XG51};
买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0){XG51};
DRAWTEXT(FILTER(买=1,5),L*0.96,'拉升'),COLORFFDE00{XG51};
DA:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,4))/4{XG51};
DB:=(EMA(C,10)+EMA(C,20)+EMA(C,40)+EMA(C,80))/4{XG51};
DRAWICON(CROSS(DA-DB,0),L*0.98,7){XG51};
JH:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100{XG51};
DRAWICON(CROSS(84,JH),H*1.04,8){XG51};
字:=stRCAT(STRCAT(STRCAT(STRCAT('名称: ',STKNAME),' 代码: '),CODE),' ' ){XG51};
板块:=STRCAT('概念板块: ',GNBLOCK){XG51};
DRAWTEXT_FIX(ISLASTBAR,0.2,0,0,STRCAT(字,板块)),COLORBLUE{XG51};
YC:=REF(CLOSE,1){XG51};
止损价位:=(YC*1.0035*97+0.2)/99.65{XG51};
DRAWTEXT_FIX(C!=0,0.02,0.05,0,'★ =================='),COLORWHITE{XG51};
DRAWTEXT_FIX(C!=0,0.02,0.1,0,'操 '),COLORWHITE{XG51};
DRAWTEXT_FIX(C!=0,0.02,0.15,0,'盘 '),COLORWHITE{XG51};
DRAWTEXT_FIX(C!=0,0.02,0.2,0,'铁 '),COLORWHITE{XG51};
DRAWTEXT_FIX(C!=0,0.02,0.25,0,'律 '),COLORWHITE{XG51};
DRAWTEXT_FIX(C!=0,0.02,0.3,0,'★ =================='),COLORWHITE{XG51};
DRAWTEXT_FIX(C!=0,0.04,0.1,0,'买入条件 E13 cci'),COLORBLUE{XG51};
DRAWTEXT_FIX(C!=0,0.04,0.15,0,'买入条件 2:30以后'),COLORBLUE{XG51};
DRAWTEXT_FIX(C!=0,0.04,0.2,0,STRCAT('止损价位 ',STRCAT(CON2STR(止损价位,2),' 元'))),COLORBLUE{XG51};
DRAWTEXT_FIX(C!=0,0.04,0.25,0,'线上:工作 线下:休息'),COLORBLUE{XG51};
E:=(HIGH+LOW+OPEN+2*CLOSE)/5{XG51};
明日阻力:=2*E-LOW{XG51};
明日支撑:=2*E-HIGH{XG51};
明日突破:=E+(HIGH-LOW){XG51};
明日反转:=E-(HIGH-LOW){XG51};
今日阻力:=REF(明日阻力 , 1){XG51};
今日支撑:=REF(明日支撑 , 1){XG51};
DRAWTEXT_FIX(C!=0,0.2,0.05,0,STRCAT('今日阻力： ',STRCAT(CON2STR(今日阻力,2),' 元'))),COLORFFFF00{XG51};
DRAWTEXT_FIX(C!=0,0.2,0.1,0,STRCAT('今日支撑： ',STRCAT(CON2STR(今日支撑,2),' 元'))),COLORWHITE{XG51};
DRAWTEXT_FIX(C!=0,0.2,0.15,0,STRCAT('明日突破： ',STRCAT(CON2STR(明日突破,2),' 元'))),COLORFF00FF{XG51};
DRAWTEXT_FIX(C!=0,0.2,0.2,0,STRCAT('明日阻力： ',STRCAT(CON2STR(明日阻力,2),' 元'))),COLORFFFF00{XG51};
DRAWTEXT_FIX(C!=0,0.2,0.25,0,STRCAT('明日支撑： ',STRCAT(CON2STR(明日支撑,2),' 元'))),COLORWHITE{XG51};
DRAWTEXT_FIX(C!=0,0.2,0.3,0,STRCAT('明日反转： ',STRCAT(CON2STR(明日反转,2),' 元'))),COLORBLUE{XG51};
A:=HHV(HIGH,13)=HIGH AND HIGH>REF(HIGH,1){XG51};
A1:=FILTER(A,12){XG51};
B:=LLV(LOW,13)=LOW AND LOW<REF(LOW,1){XG51};
B1:=FILTER(B,12){XG51};
TS1:=BArslAST(A1){XG51};
箱顶:REF(HIGH,TS1),COLORFF00FF,NODRAW{XG51};
STICKLINE(1,箱顶,箱顶,1.5,0),COLORFF00FF{XG51};
TS2:=BARSLAST(B1){XG51};
箱底:REF(LOW,TS2),COLORFFBB80,NODRAW{XG51};
STICKLINE(1,箱底,箱底,1.5,0),COLORFFBB80{XG51};
箱高:100*(箱顶-箱底)/箱底,NODRAW{XG51};
均价:=(3*C+H+L+O)/6{XG51};
VAR1:=(8*均价+7*REF(均价,1)+6*REF(均价,2)+5*REF(均价,3)+
4*REF(均价,4)+3*REF(均价,5)+2*REF(均价,6)+REF(均价,8))/36{XG51};
VAR2:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3{XG51};
SZ1:=REF(VAR1,1)=REF(VAR2,1) AND VAR1>VAR2 AND CLOSE>VAR1{XG51};
SZ2:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1)
AND H/VAR1<1.1 AND L>VAR2 AND CLOSE>VAR1{XG51};
SZ3:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>=REF(VAR2,1) AND H/VAR1>1.1{XG51};
SZ4:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1)
AND CLOSE>VAR2 AND CLOSE<VAR1{XG51};
SZ5:=(VAR1>VAR2 AND VAR2>REF(VAR2,1) AND VAR1<>REF(VAR1,1)
AND CLOSE<VAR2) OR (VAR1>VAR2 AND VAR1<REF(VAR1,1)
AND VAR2<REF(VAR2,1) AND CLOSE<VAR2){XG51};
SZ6:=REF(VAR1,1)>REF(VAR2,1) AND VAR1=VAR2 AND CLOSE<VAR2{XG51};
XD1:=VAR1=VAR2 AND CLOSE<VAR2 OR (VAR1<REF(VAR1,1) AND VAR2<REF(VAR2,1)
AND REF(VAR1,1)=REF(VAR2,1) AND CLOSE<VAR2){XG51};
XD2:=VAR1=VAR2 AND CLOSE>VAR1{XG51};
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20)){XG51};
量能饱和度:=IF(SAT>1,1,SAT)*100{XG51};
DRAWTEXT_FIX(BARSTATUS=2 AND SZ1,0.8,0.05,0,'调整结束短线介入'),COLORWHITE{XG51};
DRAWTEXT_FIX(BARSTATUS=2 AND SZ2,0.8,0.05,0,'上升通道走势良好'),COLORWHITE{XG51};
DRAWTEXT_FIX(BARSTATUS=2 AND SZ3,0.8,0.05,0,'股价偏离注意调整'),COLORWHITE{XG51};
DRAWTEXT_FIX(BARSTATUS=2 AND SZ4,0.8,0.05,0,'上升通道调整洗盘'),COLORCYAN{XG51};
DRAWTEXT_FIX(BARSTATUS=2 AND SZ5,0.8,0.05,0,'转向特征注意离场'),COLORCYAN{XG51};
DRAWTEXT_FIX(BARSTATUS=2 AND SZ6,0.8,0.05,0,'通道改变坚决离场'),COLORCYAN{XG51};
DRAWTEXT_FIX(BARSTATUS=2 AND XD1,0.8,0.05,0,'下跌通道只宜观望'),COLORCYAN{XG51};
DRAWTEXT_FIX(BARSTATUS=2 AND XD2,0.8,0.05,0,'短期底部准备进入'),COLORBLUE{XG51};
STICKLINE(CLOSE>OPEN,OPEN,LOW,0,0 ),COLOR0000FF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0,0 ),COLOR0000FF{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0,0 ),COLOR00FF00{XG51};
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0,0 ),COLOR00FF00{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3,0 ),COLORFF5500{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.8,0 ),COLORFF8800{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2,3 ),COLORFFBB00{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5,0 ),COLORFFDD00{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0.5,0 ),COLORFFFF00{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),COLOR000055{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.8,0),COLOR000077{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,3),COLOR000099{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.5,0),COLOR0000BB{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.5,0),COLOR0000DD{XG51};
VAR9Q:=C= HHV(C,4)AND (REF(C,1)>=REF(C,2) OR REF(C,1)>=REF(C,3)) OR REF(C,1)=HHV(C,4)
AND CLOSE>=REF(C,2) OR REF(C,2)=HHV(C,4) AND REF(C,3)=LLV(C,4) AND C>=REF(C,1)
OR REF(C,3)=HHV(C,4) AND C>=REF(C,1) AND C>=REF(C,2){XG51};
STICKLINE(VAR9Q,C,(O+C)/2,3,0),COLOR000055{XG51};
STICKLINE(VAR9Q,C,(O+C)/2,2.8,0),COLOR000077{XG51};
STICKLINE(VAR9Q,C,(O+C)/2,2,3),COLOR000099{XG51};
STICKLINE(VAR9Q,C,(O+C)/2,1.5,0),COLOR0000DD{XG51};
STICKLINE(VAR9Q,C,(O+C)/2,0.5,0),COLOR0000FF{XG51};
VARAQ:=C=HHV(C,4) AND REF(C,1)=LLV(C,4){XG51};
STICKLINE(VARAQ,C,(O+C)/2,3,0),COLORFF11FF{XG51};
STICKLINE(VARAQ,C,(O+C)/2,2.8,0),COLORFF33FF{XG51};
STICKLINE(VARAQ,C,(O+C)/2,2,5),COLORFF66FF{XG51};
STICKLINE(VARAQ,C,(O+C)/2,1.5,0),COLORFF99FF{XG51};
STICKLINE(VARAQ,C,(O+C)/2,0.5,0),COLORFFddfF{XG51};
VARBQ:=C=LLV(C,4) AND (REF(C,1)<REF(C,2) OR REF(C,1)<REF(C,3))
OR REF(C,1)=LLV(C,4) AND C<REF(C,2) OR REF(C,2)=LLV(C,4)
AND REF(C,1)<>HHV(C,4) AND C<REF(C,1) OR REF(C,3)=LLV(C,4)
AND C<REF(C,1) AND C<REF(C,2){XG51};
STICKLINE(VARBQ,C,(O+C)/2,3,0),COLOR333333{XG51};
STICKLINE(VARBQ,C,(O+C)/2,2.8,0),COLOR666666{XG51};
STICKLINE(VARBQ,C,(O+C)/2,2,5),COLORAAAAAA{XG51};
STICKLINE(VARBQ,C,(O+C)/2,1.5,0),COLORDDDDDD{XG51};
STICKLINE(VARBQ,C,(O+C)/2,0.5,0),COLORFFFFFF{XG51};
VARCQ:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4)
AND REF(C,1)<=REF(C,3) AND REF(C,2)<REF(C,4) AND C>=REF(C,1){XG51};
STICKLINE(VARCQ,O,(O+C)/2,3,0),COLOR008800{X*G-5*1*C*N*{};