以下是通达信顶底超强组合指标公式源码
通达信顶底超强组合指标公式源码：
VAR2:=(HIGH+LOW+CLOSE*2)/4;
VAR3:=EMA(VAR2,21);
VAR4:=STD(VAR2,21);
VAR5:=((VAR2-VAR3)/VAR4*100+200)/4;
VAR6:=(EMA(VAR5,5)-25)*1.56;
{AK:EMA(VAR6,2)*1.22;
AD1:EMA(AK,2);
AJ:3*AK-2*AD1;
DRAWTEXT(CROSS(AK,AD1),AK,’*’),COLORRED;
DRAWTEXT(CROSS(AD1,AK),AK,’*’),COLORWHITE;}
{金手指}
RA:=LLV(LOW,35);
RB:=HHV(HIGH,30);
RC:=EMA((CLOSE-RA)/(RB-RA)*4,4)*19;
近日均价:=MA(CLOSE,5),COLORYELLOW,LINETHICK2;
DRAWICON(RC<6AND100*(HHV(HIGH,19)-CLOSE)/(HHV(HIGH,19)-LLV(LOW,19))>97,100,11);
LC:=REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
ZL:=EMA((CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*480,2)*5;
SH:=EMA((CLOSE-MA(CLOSE,11))/MA(CLOSE,11)*480,7)*5;
BT1:=CROSS(RSI1,25);
BT2:=CROSS(ZL,SH)ANDZL<-10;
BT:=FILTER(COUNT(BT1ORBT2,3)>=2,3);
BIAS:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
VARC:=LOW;
VARD:=REF(LOW,1);
VARE:=SMA(ABS(VARC-VARD),3,1)/SMA(MAX(VARC-VARD,0),3,1)*100;
VARF:=MA(VARE/10,3);
VAR10:=LLV(LOW,30);
VAR11:=HHV(VARF,30);
MA(IF(LOW<=VAR10,(VARF+VAR11*2)/5,0),3);
VAR1B:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
VAR2B:=SMA(ABS(LOW-VAR1B),13,1)/SMA(MAX(LOW-VAR1B,0),10,1);
VAR3B:=EMA(VAR2B,10);
VAR4B:=LLV(LOW,33);
VAR5B:=EMA(IF(LOW<=VAR4B,VAR3B,0),3);
{主力进场:IF(VAR5B>REF(VAR5B,1),VAR5B,0),COLORRED;}
STICKLINE(VAR5B>REF(VAR5B,1),0,VAR5B*2,2,0),COLORYELLOW;
洗盘:IF(VAR5B<REF(VAR5B,1),VAR5B,0),COLORLIGREEN;
VARR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
VARR2:=SMA(ABS(LOW-VARR1),13,1)/SMA(MAX(LOW-VARR1,0),10,1);
VARR3:=EMA(VARR2,10);
VARR4:=LLV(LOW,33);
VARR5:=EMA(IF(LOW<=VARR4,VARR3,0),3);
STICKLINE(VARR5>REF(VARR5,1),0,VARR5,2,0),COLORGREEN;
STICKLINE(VARR5<REF(VARR5,1),0,VARR5*2,2,0),COLORRED;
找主力吸筹提款:VARR5>REF(VARR5,4){ANDC>REF(C,1)},COLORMAGENTA;
VAR2C:=(HIGH+LOW+CLOSE*2)/4;
VAR3C:=EMA(VAR2C,7);
VAR4C:=STD(VAR2C,7);
VAR5C:=(VAR2C-VAR3C)*100/VAR4;
VAR6C:=EMA(VAR5C,3);
{WW:(EMA(VAR6C,5)+100)/2-3,COLORFF00FF;
MM:HHV(WW,3),COLORFF3333;}
AAA:=AMOUNT/VOL/100;
主力进场:IF(VAR5B>REF(VAR5B,1),VAR5B*1.5,0),COLORRED,LINETHICK2;
{吸筹}
VAR2Q:=REF(LOW,1);
VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
VAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);
VAR5Q:=LLV(LOW,30);
VAR6Q:=HHV(VAR4Q,30);
VAR7Q:=IF(MA(CLOSE,58),1,0);
VAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/618*VAR7Q;
VAR9Q:=IF(VAR8Q>100,100,VAR8Q);
吸筹:STICKLINE(VAR9Q>-120,0,VAR9Q,6,1),COLORRED;
VARY2:=REF(LOW,1);
VARY3:=SMA(ABS(LOW-VARY2),3,1)/SMA(MAX(LOW-VARY2,0),3,1)*100;
VARY4:=EMA(IF(CLOSE*1.3,VARY3*10,VARY3/10),3);
VARY5:=LLV(LOW,30);
VARY6:=HHV(VARY4,30);
VARY7:=IF(MA(CLOSE,58),1,0);
VARY8:=EMA(IF(LOW<=VARY5,(VARY4+VARY6*2)/2,0),3)/618*VARY7;
VARY9:=IF(VARY8>100,100,VARY8);
吸筹2:STICKLINE(VARY9>-120,0,VARY9/3,2,1),COLORMAGENTA;
LCC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LCC,0),4.1,1)/SMA(ABS(CLOSE-LCC),4.1,1)*100,COLORYELLOW,LINETHICK1;
黄买:FILTER((REF(CLOSE,2)<CLOSEANDRSI<25),7),COLORYELLOW;
STICKLINE(黄买,0,-40,10,1),COLORYELLOW;
黄卖:=FILTER((REF(CLOSE,2)>CLOSEANDRSI>80),7);
STICKLINE(黄卖,100,82,10,0),COLORBLUE;
红买:FILTER(CROSS(RSI,11),7),COLORRED;
STICKLINE(红买,0,-30,6,0),COLORRED;
红卖:=FILTER(CROSS(89,RSI),7);
STICKLINE(红卖,100,88,8,0),COLORCYAN;
绿买:FILTER(CROSS(RSI,20),7),COLOR00FF00;
STICKLINE(绿买,0,-20,6,0),COLORMAGENTA;
绿卖:=FILTER(CROSS(80,RSI),7);
STICKLINE(绿卖,100,94,6,0),COLOR00FF00;
★遵守纪律★:100,COLORRED;
★交易之魂★:100,COLORRED;
ZLC:=EMA((WINNER(CLOSE)*70),3);
SHC:=EMA(((WINNER((CLOSE*1.1))-WINNER((CLOSE*0.9)))*80),3);
主力控盘:((ZLC/(ZLC+SHC))*100),COLOR00FFFF,LINETHICK2;
上限:HHV(主力控盘,20),COLORGREEN,LINETHICK2;
下限:LLV(主力控盘,20),COLORRED,LINETHICK2;
中线:(上限+下限)/2,COLORYELLOW,POINTDOT,LINETHICK2;
{60,LINETHICK4,POINTDOT,COLORYELLOW;}
{10,LINETHICK4,POINTDOT,COLORFF00FF;}
VAR200:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
VAR300:=SMA(SMA(VAR200,3,1),3,1)/28.57;
VAR400:=EMA(VAR300,5);
操盘:=3*VAR300-2*VAR400;
A1:=CROSS(操盘,VAR300)ANDVAR300<2.1ANDC>O;
STICKLINE(A1,30,0,4,0),COLOR770077;
STICKLINE(A1,30,0,3,0),COLOR990099;
STICKLINE(A1,30,0,2,0),COLORBB00BB;
STICKLINE(A1,30,0,1,0),COLORWHITE;
STICKLINE(A1,30,0,0.3,0),COLORFF00FF;
DRAWTEXT(A1,36,’满仓’),COLORRED;
DRAWTEXT(A1,36,’满仓’),COLORRED;
AK:EMA(VAR6,2)*1.22;
AD1:EMA(AK,2);
AJ:3*AK-2*AD1;
DRAWTEXT(CROSS(AK,AD1),AK,’*’),COLORRED;
DRAWTEXT(CROSS(AD1,AK),AK,’*’),COLORWHITE;
WW:(EMA(VAR6C,5)+100)/2-3,COLORFF00FF;
MM:HHV(WW,3),COLORFF3333;
DRAWTEXT(BT1,0,’□’),COLORYELLOW;
DRAWTEXT(BT,0,’■’),COLORYELLOW;
DRAWICON(CROSS(85,RSI1),102,15);{饭跑跑}
DRAWICON(CROSS(RSI1,25),10,26);{金钻}
DRAWICON(CROSS(ZL,SH)ANDZL<-10,20,24);{蓝钻}
DRAWICON(CROSS(BIAS,-12),-10,13);{BIAS买点};
DIF1:=Ema(CLOSE,12)-EMA(CLOSE,26);
DEA1:=EMA(DIF1,9);
macd1:=2*(DIF1-DEA1),stICK;
MacD2:=EMA(MACD1,3);
STICKLINE(MACD1>MACD2ANDMACD1>0,0,MACD1,3.2,0),COLOR000055;
STICKLINE(MACD1>MACD2ANDMACD1>0,0,MACD1,2.7,0),COLOR000077;
STICKLINE(MACD1>MACD2ANDMACD1>0,0,MACD1,2.1,0),COLOR000099;
STICKLINE(MACD1>MACD2ANDMACD1>0,0,MACD1,1.5,0),COLOR0000BB;
STICKLINE(MACD1>MACD2ANDMACD1>0,0,MACD1,0.9,0),COLOR0000DD;
STICKLINE(MACD1>MACD2ANDMACD1>0,0,MACD1,0.3,0),COLOR0000FF;
STICKLINE(MACD1>MACD2ANDMACD1<0,0,MACD1,3.2,0),COLOR555555;
STICKLINE(MACD1>MACD2ANDMACD1<0,0,MACD1,2.7,0),COLOR777777;
STICKLINE(MACD1>MACD2ANDMACD1<0,0,MACD1,2.1,0),COLOR999999;
STICKLINE(MACD1>MACD2ANDMACD1<0,0,MACD1,1.5,0),COLORBBBBBB;
STICKLINE(MACD1>MACD2ANDMACD1<0,0,MACD1,0.9,0),COLORDDDDDD;
STICKLINE(MACD1>MACD2ANDMACD1<0,0,MACD1,0.3,0),COLORFFFFFF;
STICKLINE(MACD1<MACD2,0,MACD1,3.2,0),COLORB20000;
STICKLINE(MACD1<MACD2,0,MACD1,2.7,0),COLOREC0000;
STICKLINE(MACD1<MACD2,0,MACD1,2.1,0),COLORFF4600;
STICKLINE(MACD1<MACD2,0,MACD1,1.5,0),COLORFF6300;
STICKLINE(MACD1<MACD2,0,MACD1,0.9,0),COLORFF8B00;
STICKLINE(MACD1<MACD2,0,MACD1,0.3,0),COLORFFAB00;
STICKLINE(MACD1>=0ORMACD1<=0,0,0,50,1),COLORWHITE;
DIF:DIF1,COLOR33FF33;
DEA:DEA1,COLORYELLOW;
MACD:MACD1,NODRAW,COLORMAGENTA;
强度:IF(DIF1>=DEA1,DIF1,DRAWNULL),COLORRED,LINETHICK1;
抄底:IF((TROUGHBARS(3,15,1)=0)AND(HIGH>LOW+0.01),0.2,(-0)),COLORGREEN,LINETHICK2;
SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);
AA10:MA(CLOSE,8),COLOR0000FF;AA12:MA(CLOSE,12),COLOR0000FF;BB10:=((ATAN((AA10-REF(AA10,1)))*3.1416)*10);
BB12:=((ATAN((AA12-REF(AA12,1)))*3.1416)*10);MA13:=MA(CLOSE,13);
STICKLINE((((AA12<=AA10)AND(BB12>=1))AND(BB10>=1)),AA10,AA12,4,0),COLOR0080FF;
STICKLINE((((AA12>=AA10)AND(BB10<=1))AND(BB10<=1)),AA10,AA12,4,0),COLOR00FF00;
X1:=(C+L+H)/3;BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);DRAWTEXT(FILTER(BB13>1ANDEMA(X1,13)>REF(EMA(X1,8),1),10),
EMA8,’∠45上升’),COLORWHITE;压力:MA(REF(HHV(C,30),1),2),COLOR9DFFFF;
支撑:MA(REF(LLV(C,30),1),2),COLORABFF46;AA1:=AMOUNT/V;BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;EE1:=V<MA(V,5)*1.5;
FF1:=BB1ANDCC1ANDDD1ANDEE1;DRAWTEXT(FF1,(LOW*0.99),’老鼠仓’),COLOR4080FF;
A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);
黑马线:=EMA(A51,5);A54:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
趋势线:=(MA(3*SMA(A54,6,1)-2*SMA(SMA(A54,5,1),5,1),2));
DRAWTEXT(CROSS(趋势线,0)AND黑马线<40,(HIGH*0.97),’▲大黑马’),COLORYELLOW;
LC:=REF(CLOSE,1);RSI:=((SMA(MAX((CLOSE-LC),0),3,1)/SMA(ABS((CLOSE-LC)),3,1))*100);
FF:=EMA(CLOSE,3);MA15:=EMA(CLOSE,21);DRAWTEXT(CROSS(FF,MA15),(LOW*0.99),’底背离‘),COLORA6E500;
DRAWTEXT(CROSS(88,RSI),(HIGH*1.02),’顶背离’),COLOR1880FF;
VAR2:=LLV(LOW,27);VAR3:=HHV(HIGH,34);VAR4:=EMA((CLOSE-VAR2)/(VAR3-VAR2)*4,4)*25;
注意买:=IF((VAR4<10),80,100);RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;超跌:=IF(J<0,10,0);BDDD:=LLV(J,2)=LLV(J,8);
买入:=IF(CROSS(J,REF(J+0.01,1))ANDBDDDANDJ<20,30,0);
DRAWTEXT(买入AND注意买=100AND超跌=0,LOW,’短线‘),COLOR8000FF;
MTM:=C-REF(C,1);DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
买:=IF(LLV(DX,2)=LLV(DX,7)ANDCOUNT(DX<0,2)ANDCROSS(DX,MA(DX,2)),1,0);
通达信顶底超强组合指标公式截图
评论(0)