大智慧转通达信之万法归一公式

[复制链接]
查看381 | 回复0 | 2022-6-28 06:49:55 | 显示全部楼层 |阅读模式

{INPUT: N(3,1,10),N2(6,1,10),N3(-23,-50,0),N4(75,50,100),P1(19,1,100),P2(118,1,250),N1(9,1,100); }
VAR2:=(C-REF(C,1))/REF(C,1)*100;
VAR3:=(C-LLV(L,18))/(HHV(H,18)-LLV(L,18))*100;
VAR4:=SMA(VAR3,9,1);
VAR5:=SMA(VAR4,3,1);
J:3*VAR4-2*VAR5,COLOR00FFFF;
VAR6:=J>1*REF(J,1);
VAR7:=LLVBARS(L,50);
VAR8:=SUM(V,VAR7);
VAR9:=HHVBARS(H,50);
VAR10:=SUM(V,VAR9);
VAR11:=(C-REF(O,VAR9))/REF(O,VAR9)*100;
VAR12:=VAR10/CAPITAL*100;
VAR13:=(C-REF(O,VAR7))/REF(O,VAR7)*100;
VAR14:=VAR8/CAPITAL*100;
VAR15:=MA(WINNER(C),N)*100;
VAR16:=EMA(VAR4,N);
A2:EMA(VAR4,N),COLORFFDDCC;
A3:=EMA(A2,N);
A4:=EMA(A3,N);
A5:=EMA(A4,N);
A6:=EMA(A5,N);
A7:=EMA(A6,N);
VAR17:=EMA(A7,N);
VAR18:=EMA(VAR17,N);
VAR19:=EMA(VAR18,N);
AA:=EMA(A5,N2);
中期大底:LLV(J,AA),LINETHICK2,COLOR0000FF;
上:=IF(MA(H,3)*1.05,30,0)*10-AA;
下:=IF(MA(L,3)*0.96,30,0)*2/中期大底;
中:=IF(MA(H,3)*1.05,30,0);
电:=J;
DRAWTEXT(CROSS(A4,AA) AND VAR11<N3,AA,'●底'),COLORFFFF00;
DRAWTEXT(CROSS(A2,J) AND A2>N4,A2+4.22,'●峰'),COLOR00FFFF;
DRAWTEXT(CROSS(J,A2) AND VAR6 AND A2<20 AND VAR2>9 OR A2>1*REF(A2,1) AND VAR2>4 AND
A2<60,A2,'●拉升'),COLORFFFFCC;
STICKLINE(J>=A2,A2,J,1.5,0),COLOR0000FF;
STICKLINE(J<=A2,J,A2,1.5,0),COLOR00FF00;
压力:HHV(J,60),COLOR00FFFF;
支撑:=LLV(AA,13);
STICKLINE(J<=中期大底 AND 中-REF(中,1)>0 AND C>=O*0.99,1,88,3,0),COLOR0000FF;
DRAWICON(J<=中期大底 AND 中-REF(中,1)>0 AND C>=O*0.99,88,1),COLOR00FF00;
DRAWTEXT(J<=中期大底 AND 中-REF(中,1)>0 AND C>=O*0.99,85,'-绝对底部'),COLOR00FF00;
STICKLINE(FILTER(CROSS(上,中期大底) AND 中-REF(中,1)>=0,3),中期大底,70,3,0),COLOR00FF00;
DRAWICON(FILTER(CROSS(上,中期大底) AND 中-REF(中,1)>=0,3),70,1);
DRAWTEXT(FILTER(CROSS(上,中期大底) AND 中-REF(中,1)>=0,3),64,'-买了不输'),COLORFFFFFF;
STICKLINE(CROSS(上,下) AND C>=O,中期大底,60,2,0),COLORFF0000;
DRAWICON(CROSS(上,下) AND C>=O,60,1),COLORFF00FF;
DRAWTEXT(CROSS(上,下) AND C>=O,55,'-短线'),COLORFF00FF;
DRAWTEXT(J>=压力 AND 压力-REF(压力,6)>25 AND C<O,压力+4.22,'●头部'),COLOR008000;
MA1:=MA(C,P1);
MA2:=MA(C,P2);
N15HIGH:=REF(H,15);
N1LOW:=REF(L,1);
FF:=(N15HIGH-N1LOW)/N1LOW>0.15;
STICKLINE(CROSS(MA(C,P1),MA(C,P2))>0 AND (N15HIGH-N1LOW)/N1LOW<0.15 AND L<=MA(C,P1) AND C>=MA(C,P1) AND C>=O,中期大底,60,0,1),LINETHICK3,COLOR0000FF;
DRAWICON(CROSS(MA(C,P1),MA(C,P2))>0 AND (N15HIGH-N1LOW)/N1LOW<0.15 AND C>=MA(C,P1) AND L<=MA(C,P1) AND C>=O,60,1);
DRAWTEXT(CROSS(MA(C,P1),MA(C,P2))>0 AND (N15HIGH-N1LOW)/N1LOW<0.15 AND C>=MA(C,P1) AND L<=MA(C,P1) AND C>=O,60,'★^回头望月'),COLORFF0000;
X:=C-REF(MA(C,20),11);
LGL:=IF(EMA(C,5)/EMA(EMA(C,9),16)<=0.85 AND C/REF(C,1)>0.905 AND C/REF(C,1)<1.05 AND V/CAPITAL*100<5,50,0);
WR1:=-(100*(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34)))+100*X;
WR2:=-(100*(HHV(H,50)-C)/(HHV(H,50)-LLV(L,50)))+100;
WR3:=-(100*(HHV(H,70)-C)/(HHV(H,70)-LLV(L,70)))+100*X;
BIAS1:=((C-MA(C,34))/MA(C,34)*100+10)*5;
BIAS2:=((C-MA(C,50))/MA(C,50)*100+10)*5;
BIAS3:=((C-MA(C,70))/MA(C,70)*100+10)*5;
S1:=(WR1+WR2+WR3+BIAS1+BIAS2+BIAS3)/6*X;
S2:=EMA(S1,3);
S3:=ABS(BIAS1-BIAS3);
SX:=(S1+S3)/2;
XC1:=(-1)*(EMA(100*(1-WINNER(C)),1)-50)+50;
CCC:=XC1+SX;
ZJZ:=IF(LGL>0 AND CCC<0,200,0)*X;
LXL:=IF(SX<0 AND C=LLV(C,5) AND C/REF(C,1)>0.905 AND C/REF(C,1)<1.05 AND V/CAPITAL*100<5,-50,0);
JBJ:=IF(CCC<0 AND LXL=-50,100,0)*X;
MA3:=MA(C,3);
C0:=REF(C,2)*0.865;
C1:=REF(C,13)*0.772;
BOT:=MIN(C0,C1);
HSL:=100*V/CAPITAL*X;
MA13:=MA(C,13)*X;
CXC:=IF((C-BOT)/C<3/100 AND SUM(HSL,5)/5<1.8,1,0);
VMC:=IF(CXC>0 AND (LXL<0 OR LGL>0),10,0);
满仓:IF(VMC>0,60,中期大底),COLOR0000FF;
DRAWTEXT(满仓>=60,59,'满仓'),COLOR0000FF;
半仓:IF(ZJZ>0 AND JBJ>0 AND SUM(V/CAPITAL*100,5)/5<1 OR CXC>0 AND REF(C,1)/REF(C,2)>0.902 OR (ZJZ>0 AND JBJ>0 AND SUM(V/CAPITAL*100,5)/5<1 OR CXC>0) AND (LXL<0 OR LGL>0) AND VMC<10,50,中期大底),COLORCC99FF;
DRAWTEXT(半仓>=50,49,'半仓'),COLORCC99FF;
B0:=MA(C,3);
B01:=MA(C,4);
B1:=(H+L+C)/3;
B2:=HHV(B1,15);
B3:=LLV(B1,15);
B4:=B2-B3;
B5:MA((B1-B3)/B4,2)*100,COLORFF00FF;
B6:=HHV(B1,4*15);
B7:=LLV(B1,4*15);
B8:=B6-B7;
B9:MA((B1-B7)/B8,2)*100,COLORFFCD00;
BA:=HHV(B1,16*15);
BB:=LLV(B1,16*15);
BC:=BA-BB;
BD:MA((B1-BB)/BC,2)*100,COLORFFEEFF;
顶线:98,COLORFFFFFF;
底线:1,COLORFFFF00;
STICKLINE(CROSS(B5,底线) AND B0-REF(B0,1)>0 AND J-REF(J,1)>0 AND C>=O,中期大底,50,2,0),COLOR0000FF;
DRAWICON(CROSS(B5,底线) AND B0-REF(B0,1)>0 AND J-REF(J,1)>0 AND C>=O,50,1);
DRAWTEXT(CROSS(B5,底线) AND B0-REF(B0,1)>0 AND J-REF(J,1)>0 AND C>=O,45,'开花一'),COLORCC99FF;
STICKLINE(CROSS(B5,底线) AND CROSS(B9,底线) AND B01-REF(B01,1)>0,中期大底,64,2,0),COLOR0000FF;
DRAWICON(CROSS(B5,底线) AND CROSS(B9,底线) AND B01-REF(B01,1)>0,64,1);
DRAWTEXT(CROSS(B5,底线) AND CROSS(B9,底线) AND B01-REF(B01,1)>0,58,'开花二'),COLORFF00FF;
DRAWTEXT(CROSS(98,B5) AND C<H/1.03,98,'↑出局'),COLOR00FF00;
STICKLINE(CROSS(BD,1) AND 中-REF(中,1)>0 AND B5-REF(B5,2)>0,1,80,3,0);
DRAWICON(CROSS(BD,1) AND 中-REF(中,1)>0 AND B5-REF(B5,2)>0,80,1);
DRAWTEXT(CROSS(BD,1) AND 中-REF(中,1)>0 AND B5-REF(B5,2)>0,73,'开花三'),COLOR00FFFF;
STICKLINE(CROSS(J,AA) AND A2>=A3 AND 中-REF(中,1)>0 AND C>=O AND A3>=A4,中期大底,60,2,0),COLORFFFFFF;
DRAWTEXT(CROSS(J,AA) AND A2>=A3 AND 中-REF(中,1)>0 AND C>=O AND A3>=A4,60,'●买'),COLOR00FFFF;
均线:=MA(C,5);
DRAWTEXT(CROSS(B5,A2)>0  AND 均线-REF(均线,1)>0,98,'↑关注'),COLOR0000FF;
VARW2:=(C-MA(C,6))/MA(C,6)*100 AND 中-REF(中,1)>0;
VARW3:=(C-MA(C,12))/MA(C,12)*100 AND 中-REF(中,1)>0;
VARW4:=(C-MA(C,24))/MA(C,24)*100;
VARW5:=(VARW2+2*VARW3+3*VARW4)/6;
VARW6:=MA(VARW5,3);
犀牛王:=70*VARW6<=-8;
 

201212622203665491.png

201212622203665491.png

201212622213643785.png

201212622213643785.png

201212622215927954.png

201212622215927954.png

20121262222581594.rar

6.27 KB, 下载次数: 0

售价: 2 金钱  [记录]  [购买]

20121262222581594.rar

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则