通达信AI控盘主图未加密选股指标公式源码

通达信AI控盘主图未加密选股指标公式源码

源码正文：

通达信公式:=SMA(H,11,1);N:=13{XG51};
CX:=IF(通达信公式>REF(通达信公式,1),通达信公式,HHV(通达信公式,63)){XG51};
GGG:=Sma(L,11,1){XG51};
DD:=IF(GGG<REF(GGG,1),GGG,LLV(GGG,63)){XG51};
股源码:IF(C>=CX,CX,DRAWNULL),LINETHICK2,COLORBLUE{XG51};
得道:DD,COLORLIGREEN{XG51};
TY:=C{XG51};
A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BacKSET(B1,10+1); HD:=FILTER(C1,10){XG51};
A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10){XG51};
A:=REF(C,BArslAst(HD)); B:=REF(C,BARSLAST(LD)){XG51};
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) {XG51};
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD){XG51};
波峰:IF(N>=1 AND T1,A,DRAWNULL),COLORBLUE,POINTDOT,LINETHICK4{XG51};
STICKLINE(T1,A,A,9,0),COLORFF00FF{XG51};
波谷:IF(N>=1 AND T2,B,DRAWNULL),COLORLIBLUE,POINTDOT,LINETHICK4{XG51};
R:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1){XG51};
XQ:=IF(MA(CLOSE,17)<R,R,MA(CLOSE,17)){XG51};
下就上:XQ-(ema(CLOSE,3)-XQ),COLORFF8080,LINETHICK2{XG51};
MX:=EMA(C,2);
XM:=EMA(SLOPE(C,21)*20+C,42);
BU:=crOSS(MX,XM);
SEL:=CROSS(XM,MX);
DRAWICON(BU,0.96*L,7){XG51};
DFQS:=7*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1)-3*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1)-SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1),2,1){XG51};
TX:=78.89{XG51};
STICKLINE(CROSS(TX,DFQS),H*1.02,H*1.00,3,0),COLOR00FF00{XG51};
DRAWTEXT(FILTER(CROSS(TX,DFQS),10),H*1.04,'逃顶'),COLORFF6699{XG51};
ZLKZ:=N{XG51};
A0:=LLV(INDEXC,24)*1.056{XG51};
X:=REF(CLOSE,1)<REF(CLOSE,2) AND REF(vol,1)>MAX(REF(MA(VOL,5),1),MAX(REF(MA(VOL,10),1),REF(MA(VOL,20),1))) AND REF(VOL,1)>REF(MA(VOL,20),1)*1.1{XG51};
Y:=IF(X,MIN(REF(LOW,1),LOW),0){XG51};
Z1:=REF(Y,BARSLAST(X)),LINETHICK2,COLORFFFF00{XG51};
上栅栏:IF(ZLKZ=3,Z1,DRAWNULL),COLORFFFF00,LINETHICK2{XG51};
X1:=REF(CLOSE,1)<REF(OPEN,1) AND REF(VOL,1)>MAX(REF(MA(VOL,5),1),MAX(REF(MA(VOL,10),1),REF(MA(VOL,20),1))) AND REF(AMOUNT,1)=REF(HHV(AMOUNT,20),1) OR REF(CLOSE,1)<REF(OPEN,1) AND REF(AMOUNT,1)=REF(HHV(AMOUNT,20),1){XG51};
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6{XG51};
dkx:=(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{XG51};
ZL1:=MA(DKX,3){XG51};
ZL2:=MA(DKX,5){XG51};
ZL3:=MA(DKX,21){XG51};
ZL4:=MA(DKX,34){XG51};
Y1:=IF(X1,REF(CLOSE,1),0){XG51};
Z2:=REF(Y1,BARSLAST(X1)),COLORWHITE,LINETHICK2{XG51};
下栅栏:IF(ZLKZ=3,Z2,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
STICKLINE(N>=2 AND CLOSE>0 AND (MAX(Z1,Z2)-MIN(Z1,Z2))/MIN(Z1,Z2)*100<3
AND MAX(ZL1,ZL2)>MIN(ZL3,ZL4),Z1,Z2,5,0),COLORCYAN;

{X_G~5-1_C_N_{}

通达信非常不错的主图未加密选股指标公式源码

源码正文：

ma05:MA(C,5)LINETHICK3,COLOR00CCFF{XG51};
MA10:=MA(C,10){XG51};
MA20:=MA(C,20){XG51};
MA30:=MA(C,30){XG51};
VAR1:=MA(CLOSE,5),COLOR00FFFF{XG51};
VAR6:=MA(CLOSE,54),COLORFF9900{XG51};
VAR8:= dma(ema(CLOSE,12),SUM(vol/CAPITAL,5)/3),LINETHICK2{XG51};
VARA:=REF(CLOSE,1){XG51};
VARE:=SMA(MAX(CLOSE-VARA,0),6,1)/SMA(Abs(CLOSE-VARA),6,1)*100{XG51};
DRAWTEXT(DATE>700101 AND crOSS(84,VARE),HIGH,'注意'),COLORCYAN{XG51};
VARF:=(2*CLOSE+HIGH+LOW)/4{XG51};
VAR10:=LLV(LOW,23){XG51};
VAR11:=HHV(HIGH,23){XG51};
VAR12:=EMA((VARF-VAR10)/(VAR11-VAR10)*100,6){XG51};
VAR13:=EMA(0.667*REF(VAR12,1)+0.333*VAR12,4){XG51};
DRAWTEXT(IF(COUNT(CLOSE<REF(CLOSE,1),8)/8>0.3 AND COUNT(VAR12>VAR13,3) AND REF(LOW,1)=LLV(LOW,120) AND CLOSE>OPEN,1,0),LOW,'注意'),COLORBLUE{XG51};
RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:=3*K-2*D{XG51};
RSV24:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100{XG51};
K24:=SMA(RSV24,3,1){XG51};
D24:=SMA(K24,3,1){XG51};
J24:=3*K24-2*D24{XG51};
压力位:IF(CROSS(J24,J),H,REF(H,BArslAst(CROSS(J24,J)))),COLOR00FFFF,LINETHICK1{XG51};
支撑位:IF(CROSS(J,J24),L,REF(L,BARSLAST(CROSS(J,J24)))),COLORFFFF00,LINETHICK1{XG51};
支撑价:LLV(LOW,34) ,COLORFF00FF,LINETHICK3{XG51};
阻力价:HHV(HIGH,19),COLORFF9900, LINETHICK3{XG51};
十日均价:MA(C,5),COLOR00FFFF,LINETHICK2{XG51};
涨:IF(MA(CLOSE,5)>REF(MA(CLOSE,5),1),MA(CLOSE,5),DRAWNULL),COLORWHITE,LINETHICK2{XG51};
平:IF(MA(CLOSE,5)=REF(MA(CLOSE,5),1),MA(CLOSE,5),DRAWNULL),COLOR00FFFF,LINETHICK3{XG51};
跌:IF(MA(CLOSE,5)<REF(MA(CLOSE,5),1),MA(CLOSE,5),DRAWNULL),COLORCYAN,LINETHICK2{XG51};
DRAWTEXT(REF(C,BARSLAST(REF(CROSS("macd.dif","MacD.DEA"),1))+1)>C AND REF("MACD.DIF",BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1))+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA")>0,L-0.02,'★M底背'),COLOR00FFFF{XG51};
DRAWTEXT(REF(C,BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1))+1)<C AND REF("MACD.DIF",BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1))+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF")>0,H+0.16,'★M顶背'),COLOR00FF00;{XG51};
五日乖离率:=(C-MA05)/MA05*100{XG51};
BB05:=ATAN((MA05/REF(MA05,1)-1)*100)*180/3.1416{XG51};
速度5:=SMA(EMA((MA05-REF(MA05,1))/REF(MA05,1),3)*100,3,1){XG51};
加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW{XG51};
BB10:=ATAN((MA10/REF(MA10,1)-1)*100)*180/3.1416{XG51};
三拾日乖离率:=(C-MA30)/MA30*100,NODRAW{XG51};
VAR2:=(MA30-MA20)<REF((MA30-MA20),1) AND MA20<REF(MA20,1) AND MA30<REF(MA30,1){XG51};
BB30:=ATAN((MA30/REF(MA30,1)-1)*100)*180/3.1416{XG51};
强势狙击:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10){XG51};
加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND MA05>REF(MA05,1) AND 三拾日乖离率>REF(三拾日乖离率,1) AND MA10>REF(MA10,1)
AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) {XG51};
清仓:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND (C>MA30 OR O>MA30) AND MA05<REF(MA05,1) AND 三拾日乖离率<REF(三拾日乖离率,1) AND MA10<REF(MA10,1),10){XG51};
DRAWTEXT(加仓 ,LOW*0.98,'←加仓'),COLORWHITE{XG51};
JC:=CROSS(0,五日乖离率) AND 三拾日乖离率<REF(三拾日乖离率,1) AND MA10>REF(MA10,1) {XG51};
减仓:=FILTER(JC,10){XG51};
MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND MA05>REF(MA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<MA30{XG51};
买入:=FILTER(MR,10){XG51};
DRAWTEXT(减仓,HIGH*1.02,'←风险'),COLORGREEN{XG51};
DRAWTEXT(买入,LOW*0.98,'←买底'),COLORBLUE{XG51};
DRAWTEXT(清仓 ,HIGH*1.02,'←清仓'),COLORCYAN{XG51};
DRAWTEXT(强势狙击,LOW*0.98,'←强势狙击'),COLORBLUE{XG51};
VAR21:=MAX(ABS(HIGH-AMOUNT/VOL/100),ABS(AMOUNT/VOL/100-LOW)){XG51};
VAR3:=ABS((OPEN+CLOSE)/2-AMOUNT/VOL/100){XG51};
MV:=(VAR21+VAR3)/AMOUNT*VOL*100*50{XG51};
LC:=REF(CLOSE,1){XG51};
rsi:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100){XG51};
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.01),'R背'),COLOR00FF00{XG51};
X1:=(C+L+H)/3{XG51};
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10{XG51};
上:=EMA(C,3),COLORYELLOW,LINETHICK1{XG51};
中:=EMA(C,5),COLORRED,LINETHICK1{XG51};
下:=EMA(中,5),COLOR00FF00,LINETHICK1{XG51};
QQ:= C<中{XG51};
MM:=上>REF(上,1) AND REF(上,1)<REF(上,2) {XG51};
V1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20){XG51};
V2:=(1-7/100)*(DMA(CLOSE,V1)){XG51};
V3:=(1+7/100)*(DMA(CLOSE,V1)){XG51};
V5:=MA((LOW+HIGH+CLOSE)/3,5){XG51};
VAR03:=CLOSE=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};
VAR04:=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};
VAR05:=REF(C,1)=HHV(C,4) AND C<REF(C,2) OR (REF(C,2)=HHV(C,4) AND
REF(C,1)>REF(C,3) OR REF(C,3)=HHV(C,4) AND REF(C,1)>REF(C,2)) AND
REF(C,2)>=REF(C,4) AND C<REF(C,1){XG51};
VAR06:=V5>REF(V5,1) AND REF(V5,1)<REF(V5,2){XG51};
VAR07:=LOW<HHV(V5,13) AND HIGH>HHV(V5,13) AND CLOSE>REF(C,1) AND CLOSE>OPEN{XG51};
VAR08:=VAR07 AND COUNT(VAR06,2){XG51};
VAR09:=100*EMA(EMA(C-REF(C,1),6),6)/EMA(EMA(ABS(C-REF(C,1)),6),6){XG51};
STICKLINE(CLOSE>REF(CLOSE,1)*1.0985 AND CLOSE=HIGH,CLOSE,OPEN,4,-1),
COLOR00FFFF{XG51};
STICKLINE(CLOSE<REF(CLOSE,1)*0.9015 AND CLOSE=LOW,CLOSE,OPEN,4,-1),
COLORCYAN{XG51};
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1{XG51};
立桩量:=FILTER(TJ1,5){XG51};
TJ2:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(HIGH,3),1,0))){XG51};
突破:=TJ2=1{XG51};
TJ3:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(LOW,3),1,0))){XG51};
三天法则:=TJ3=1{XG51};
成立:=三天法则 AND 突破{XG51};
条件成立:=FILTER(成立,3){XG51};
DRAWTEXT(条件成立,L*0.99,'成立'),COLOR00FFFF{XG51};
DRAWTEXT(立桩量,L*0.99,'桩量'),COLOR0000FF{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3.0,0),COLOR00CC00{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.7,0),COLOR003300{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.1,0),COLOR006600{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5,0),COLOR009900{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0.9,0),COLOR00CC00{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0.3,0),COLOR00FF00{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.1,0),COLOR0000FF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3.0,0),COLOR0000FF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.7,0),COLOR000077{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.1,0),COLOR000099{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.5,0),COLOR0000BB{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.9,0),COLOR0000DD{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.3,0),COLOR0000FF{XG51};
STICKLINE(VAR03,OPEN,(OPEN+CLOSE)/2,3.0,0),COLORFFFF33{XG51};
STICKLINE(VAR03,OPEN,(OPEN+CLOSE)/2,2.7,0),COLORFF3333{XG51};
STICKLINE(VAR03,OPEN,(OPEN+CLOSE)/2,2.1,0),COLORFF6633{XG51};
STICKLINE(VAR03,OPEN,(OPEN+CLOSE)/2,1.5,0),COLORFF9933{XG51};
STICKLINE(VAR03,OPEN,(OPEN+CLOSE)/2,0.9,0),COLORFFCC33{XG51};
STICKLINE(VAR03,OPEN,(OPEN+CLOSE)/2,0.3,0),COLORFFFF33{XG51};
STICKLINE(VAR04 AND MM,OPEN,(OPEN+CLOSE)/2,3.0,0),COLOR00FFFF{XG51};
STICKLINE(VAR04 AND MM,OPEN,(OPEN+CLOSE)/2,2.7,0),COLOR0033FF{XG51};
STICKLINE(VAR04 AND MM,OPEN,(OPEN+CLOSE)/2,2.1,0),COLOR0066FF{XG51};
STICKLINE(VAR04 AND MM,OPEN,(OPEN+CLOSE)/2,1.5,0),COLOR0099FF{XG51};
STICKLINE(VAR04 AND MM,OPEN,(OPEN+CLOSE)/2,0.9,0),COLOR00CCFF{XG51};
STICKLINE(VAR04 AND MM,OPEN,(OPEN+CLOSE)/2,0.3,0),COLOR00FFFF;

{X~G^5-1~C~N~{}