通达信半仓操作主图未加密选股指标公式源码

通达信半仓操作主图未加密选股指标公式源码

源码正文：

M:=6{XG51};
买线:=ema(C,2);
卖线:=Ema(SLOPE(C,13)*21+C,49);
预测:IF(买线<卖线,REFDATE(HHV(H,34),DATE)-(REFDATE(HHV(H,34),DATE)-REFDATE(LLV(L,34),DATE))*(1-0.236),REFDATE(LLV(L,34),DATE)+(REFDATE(HHV(H,34),DATE)-REFDATE(LLV(L,34),DATE))*(1-0.236)),COLORBLUE,NODRAW{XG51};
HUGO:=IF(买线>卖线,REFDATE(LLV(L,34),DATE)+(REFDATE(HHV(H,34),DATE)-REFDATE(LLV(L,34),DATE))*(1-0.236),DRAWNULL),COLORWHITE{XG51};
D顶:REFDATE(HHV(H,34),DATE),COLORLIMAGENTA{XG51};
D底:REFDATE(LLV(L,34),DATE),COLORLIGREEN{XG51};
机构买入:=L2_AMO(0,2)/100000000.0,NODRAW{XG51};
机构卖出:=-L2_AMO(0,3)/100000000.0,NODRAW{XG51};
机构净买:=机构买入+机构卖出,NODRAW{XG51};
累计:=EMA(机构净买,50)*60,NODRAW{XG51};
均值:=EMA(累计,MIN(10,10)),NODRAW{XG51};
stICKLINE(累计>0,D顶,D底,6,0),COLOR1B0E8B{XG51};
STICKLINE(累计<0,D顶,D底,6,0),COLOR6B6B12{XG51};
DRAWBAND(MA(dkx,M),RGB(10,100,10),DKX,RGB(180,10,10)){XG51};
持股:IF(DKX>=MA(DKX,M),1,DRAWNULL),COLORWHITE,NODRAW{XG51};
持币:IF(DKX<MA(DKX,M),1,DRAWNULL),COLOR00FF00,NODRAW{XG51};
阻二:(D顶+(D顶+(D顶+D底)/2)/2)/2,COLOR00BB00,DOTLINE{XG51};
阻一:(D顶+(D顶+D底)/2)/2,COLOR00BB00,DOTLINE{XG51};
中线:(D顶+D底)/2,COLORDD99DD,DOTLINE{XG51};
撑一:(D底+中线)/2,COLOR00BB00,DOTLINE{XG51};
撑二:(D底+撑一)/2,COLOR33BB33,DOTLINE{XG51};
均价1:=(3*C+H+L+O)/6{XG51};
VAR1AA:=(8*均价1+7*REF(均价1,1)+6*REF(均价1,2)+5*REF(均价1,3)+4*REF(均价1,4)+3*REF(均价1,5)+2*REF(均价1,6)+REF(均价1,8))/36{XG51};
VAR2A:=(LLV(VAR1AA,2)+LLV(VAR1AA,4)+LLV(VAR1AA,6))/3{XG51};
TJ1:=vol=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND C>VAR1AA{XG51};
立桩量:=FILTER(TJ1,5){XG51};
TJ2:=IF(BArslAST(立桩量)=1 AND C>REF(H,1),1,IF(BARSLAST(立桩量)=2 AND C>REF(H,2),1,IF(BARSLAST(立桩量)=3 AND C>REF(H,3),1,0))){XG51};
突破:=TJ2=1{XG51};
TJ3:=IF(BARSLAST(立桩量)=1 AND C>REF(L,1),1,IF(BARSLAST(立桩量)=2 AND C>REF(L,2),1,IF(BARSLAST(立桩量)=3 AND C>REF(L,3),1,0))){XG51};
三天法则:=TJ3=1{XG51};
成立:=三天法则 AND 突破{XG51};
条件成立:=FILTER(成立,3),COLORF0099F,NODRAW{XG51};
STICKLINE(立桩量>=1,L,H,8,0),COLORF0099F{XG51};
STICKLINE(C,REF(H,BARSLAST(立桩量)),REF(H,BARSLAST(立桩量)),3,-1),COLORGREEN{XG51};
STICKLINE(C,REF(L,BARSLAST(立桩量)),REF(L,BARSLAST(立桩量)),3,-1),COLORBLUE{XG51};
DRAWTEXT(条件成立,L*0.995,'成立'),COLORLIMAGENTA{XG51};
A101:=EMA(CLOSE,5)>EMA(CLOSE,6) AND EMA(CLOSE,6)>EMA(CLOSE,7) AND EMA(CLOSE,7)>EMA(CLOSE,8) AND EMA(CLOSE,8)>EMA(CLOSE,9)
AND EMA(CLOSE,9)>EMA(CLOSE,10) AND EMA(CLOSE,10)>EMA(CLOSE,11) AND EMA(CLOSE,11)>EMA(CLOSE,12)
AND EMA(CLOSE,12)>EMA(CLOSE,13) {XG51};
A102:=EMA(CLOSE,15)>EMA(CLOSE,21) AND EMA(CLOSE,21)>EMA(CLOSE,34) AND EMA(CLOSE,34)>EMA(CLOSE,55) AND EMA(CLOSE,55)>EMA(CLOSE,89)
AND EMA(CLOSE,89)>EMA(CLOSE,144) AND EMA(CLOSE,144)>EMA(CLOSE,233){XG51};
A1:= A101 AND A102{XG51};
短升:IF(A101,1,DRAWNULL),COLORFF00FF,NODRAW{XG51};
中升:IF(A1,1,DRAWNULL),COLORWHITE,NODRAW{XG51};
STICKLINE(A101,L,H,6,0),COLOR006666{XG51};
STICKLINE(A101 AND A102,L,H,4,0),COLOR660066{XG51};
DRAWKLINE(H,O,L,C){XG51};
T1:=CONST(HHVBARS(V,30)){XG51};
量30:IF(CURRBARSCOUNT<=30+7,CONST(IF(T1=0,C,REF(C,T1))),DRAWNULL),COLORBLUE;
MA5:MA(C,5),COLORFFFFFF,LINETHICK2{XG51};
MA13:=MA(C,13),COLORRED,LINETHICK1{XG51};
MA21:=MA(C,21),COLOREE00EE,LINETHICK2{XG51};
MA34:=MA(C,34),COLOR00DDDD,LINETHICK1{XG51};
MA55:=MA(C,55),COLOR00FFFF,LINETHICK2{XG51};
操盘:DKX,COLOR00FF00,LINETHICK3{XG51};
IF(MA5>=REF(MA5,1),MA5,DRAWNULL),COLORFF00FF,LINETHICK2{XG51};
IF(DKX>REF(DKX,1),DKX,DRAWNULL),COLORFF00FF,LINETHICK3{XG51};
VAR1:=((CLOSE > REF(CLOSE,1)) AND (CLOSE > REF(CLOSE,2))){XG51};
VAR2:=((REF(VAR1,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR3:=((REF(VAR2,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR4:=((REF(VAR3,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR5:=((REF(VAR4,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR6:=((REF(VAR5,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR7:=((REF(VAR6,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR8:=((REF(VAR7,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR9:=((REF(VAR8,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VARA:=((REF(VAR9,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VARB:=((REF(VARA,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VARC:=((REF(VARB,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
多:=(((((((((((VAR1 OR VAR2) OR VAR3) OR VAR4) OR VAR5) OR VAR6) OR VAR7) OR VAR8) OR VAR9) OR VARA) OR VARB) OR VARC){XG51};
STICKLINE(多,L,H,0,0),COLOR0000FF{XG51};
STICKLINE(多 AND C>=O,C,O,3,1),COLOR0000FF{XG51};
STICKLINE(多 AND C<O,C,O,3,0),COLOR0000FF{XG51};
VARD:=((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,2))){XG51};
VARE:=((REF(VARD,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VARF:=((REF(VARE,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR10:=((REF(VARF,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR11:=((REF(VAR10,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR12:=((REF(VAR11,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR13:=((REF(VAR12,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR14:=((REF(VAR13,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR15:=((REF(VAR14,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR16:=((REF(VAR15,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR17:=((REF(VAR16,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR18:=((REF(VAR17,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
空:=(((((((((((VARD OR VARE) OR VARF) OR VAR10) OR VAR11) OR VAR12) OR VAR13) OR VAR14) OR VAR15) OR VAR16) OR VAR17) OR VAR18){XG51};
STICKLINE(空,H,L,0 ,0 ),COLOR00FF00{XG51};
STICKLINE(空 AND C>=O,C,O,3,1),COLOR00FF00{XG51};
STICKLINE(空 AND C<O,C,O,3,0),COLOR00FF00{XG51};
VAR19:=(REF((((((((((((VARD OR VARE) OR VARF) OR VAR10) OR VAR11) OR VAR12) OR VAR13) OR VAR14) OR VAR15) OR VAR16) OR VAR17) OR VAR18),1) AND VAR1){XG51};
VAR1A:=(REF((((((((((((VAR1 OR VAR2) OR VAR3) OR VAR4) OR VAR5) OR VAR6) OR VAR7) OR VAR8) OR VAR9) OR VARA) OR VARB) OR VARC),1) AND VARD){XG51};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3,0 ),COLORDDDDDD{XG51};
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),COLORFF8800;
DRAWICON(VAR19,L*0.995,1){XG51};
DRAWICON(VAR1A,H*1.005,2){XG51};
STICKLINE(CURRBARSCOUNT=1,预测,预测,100,-1),COLOR00FFFF{XG51};
STICKLINE(CURRBARSCOUNT=1,HUGO,HUGO,100,-1),COLORFF00FF{XG51};
DRAWTEXT(ISLASTBAR,预测,' 【预测关键位】'),COLORFFFFFF,LINETHICK1{XG51};
DRAWTEXT((A101=1 AND REF(A101,1)=0),O,'短主升'),COLOR00FFFF{XG51};
DRAWTEXT((A1=1 AND REF(A1,1)=0),O*0.985,'中长升'),COLOR00FFFF{XG51};
IF(CURRBARSCOUNT=T1+1,量30,DRAWNULL),CIRCLEDOT,COLORDD00FF,LINETHICK3{XG51};
DRAWTEXT(ISLASTBAR,量30,' 30量能平台'){XG51};
DRAWTEXT(ISLASTBAR,中线,' 中线'),COLORDD99DD{XG51};
DRAWTEXT(ISLASTBAR,阻一,' 阻一'),COLOR00BB00{XG51};
DRAWTEXT(ISLASTBAR,阻二,' 阻二'),COLOR00BB00{XG51};
DRAWTEXT(ISLASTBAR,撑一,' 撑一'),COLOR00BB00{XG51};
DRAWTEXT(ISLASTBAR,撑二,' 撑二'),COLOR33BB33{XG51};
{XG51};
T6:=IF(FINDSTR(EXTERNSTR(0,1),'，'),STRCAT('千股千评：',EXTERNSTR(0,1)),''){XG51};
NNN:=IF(TOTALBARSCOUNT>=120,120,TOTALBARSCOUNT){XG51};
HH0:=HHV(H,NNN){XG51};
LL0:=LLV(L,NNN){XG51};
MM0:=CONST((HH0+LL0)*0.5){XG51};
S01:=CONST(IF(REF(C,NNN-15)>MM0,1.00,-0.08)){XG51};
S02:=CONST(IF(REF(C,NNN-15)>MM0,-1,1)){XG51};
S6:=IF(FINDSTR(EXTERNSTR(0,1),'，'),S01+(0.08*S02),S01){XG51};
DRAWTEXT_FIX(1,0,S6,0,T6)COLOR0000FF{X=G!5*1=C=N={};

通达信红圆圈趋势能量未加密选股指标公式源码

源码正文：

difF:ema(CLOSE,6) - Ema(CLOSE,13),LINEstICK,COLORBLUE{XG51};
IF(DIFF>=REF(DIFF,1),DIFF,DRAWNULL),COLORWHITE,LINETHICK3{XG51};
DEA:EMA(DIFF,5){XG51};
macd:=2*(DIFF-DEA){XG51};
A:=MacD{XG51};
G:=MA(MACD,2){XG51};
J:=MA(MACD,3){XG51};
J1:=MA(MACD,5){XG51};
STICKLINE(crOSS(MA(A,1),G),0.05,0,4,1),COLORBLUE,LINETHICK2{XG51};
STICKLINE(CROSS(MA(A,1),G),0.07,0,2,0),COLORMAGENTA,LINETHICK2{XG51};
STICKLINE(CROSS(MA(A,1),G),0.09,0,1,0),COLORBLUE{XG51};
VAR13:=IF(YEAR>=2018 AND MONTH>=11 AND DAY>=1,0,1){XG51};
AA:=(MA(C,1)+MA(C,3)+MA(C,5)+MA(C,7)+MA(C,9))/5{XG51};
BB:=(MA(C,2)+MA(C,4)+MA(C,6)+MA(C,8)+MA(C,10))/5{XG51};
CC:=EMA(AA,2){XG51};
DD:=EMA(BB,5){XG51};
VAR14:=MAX(EMA(AA,2)-EMA(BB,5),0)*1.2{XG51};
VAR15:=EMA(VAR14,5){XG51};
SS:=EMA(VAR15,2){XG51};
风险系数:=(VAR15-SS)/10*VAR13{XG51};
波浪系数:VAR15*VAR13,STICK,COLORFF00FF{XG51};
A10:=波浪系数,LINETHICK1 {XG51};
B:MA(A10,3),COLORBLUE,LINETHICK2{XG51};
B2:=MA(B,2)*2-B{XG51};
STICKLINE(B>B2,1.5*B,B2,3,0),COLOR0000FF{XG51};
STICKLINE(B<B2,1.5*B,B2,3,0),COLORYELLOW{XG51};
STICKLINE(VAR15>REF(VAR15,1) AND VAR13,VAR15,0,2,0),COLOR0099FF{XG51};
STICKLINE(VAR15>REF(VAR15,1) AND VAR13,VAR15,SS,3.5,0),COLORBLUE{XG51};
STICKLINE(VAR15<REF(VAR15,1) AND VAR13,0,VAR15,2,0),COLORCYAN{XG51};
STICKLINE(VAR15<REF(VAR15,1) AND VAR13,VAR15,SS,3.5,0),COLORFFCC33{XG51};
WB:=CROSS(DIFF,DEA){XG51};
WS:=CROSS(DEA,DIFF){XG51};
DRAWICON(WB,(DEA * 1.02),23){XG51};
DRAWICON(WS,(DEA * 1.01),17){X_G~5_1_C_N_{};