|
通达信超级看盘主图公式
MA5:MA(CLOSE,5);
MA10:MA(CLOSE,10);
MA20:MA(CLOSE,20);
MA30:MA(CLOSE,30);
MA60:MA(CLOSE,60);
MA120:MA(CLOSE,120);
MA250:MA(CLOSE,250);
AA10:=MA(CLOSE,8);
VAR1:=((((OPEN+LOW)+HIGH)+CLOSE)/4);
短底:=EMA(VAR1,5);
支撑:=HHV(短底,60);
压力1:=HHV(LOW,20),COLORFAABEC;
VAR2:=(POW(MA(CLOSE,5),2)+MA(CLOSE,5));
VAR3:=(POW(MA(LOW,5),2)+MA(LOW,5));
VAR4:=(POW(MA(HIGH,5),2)+MA(HIGH,5));
VAR5:=(((((VAR2-LLV(VAR3,64))/(HHV(VAR4,64)-LLV(VAR3,64)))*150)+65)-10);
VAR6:=((SMA(VAR5,3,1)*1.5)-100);
VAR7:=SMA(VAR6,3,1);
VAR8:=((3*VAR6)-(2*VAR7));
VAR9:=(((HIGH+LOW)+(CLOSE*2))/4);
VAR10:=EMA(VAR9,13);
VAR11:=STD(VAR9,13);
VAR12:=(((VAR9-VAR10)*100)/VAR11);
VAR13:=EMA(VAR12,5);
VAR14:=EMA(VAR13,13);
VAR15:=((EMA(VAR13,13)+200)-100);
短期底部:=(LLV(HIGH,30)*0.93);
MA80:=LLV(HIGH,30);
短期底部2:=SMA(CLOSE,2,1);
MAN:=(SMA(HIGH,21,2)*1.05);
下档线:=(((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13)))*100);
RSV:=SMA(下档线,3,1);
K:=SMA(RSV,3,1);
D:=((3*RSV)-(2*K));
J12:=(((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55)))*100);
RSV24:=SMA(J12,3,1);
K24:=SMA(RSV24,3,1);
D24:=((3*RSV24)-(2*K24));
J24:=IF(CROSS(D,D24),LOW,REF(LOW,BARSLAST(CROSS(D,D24))));
压力位:=IF(CROSS(D24,D),HIGH,REF(HIGH,BARSLAST(CROSS(D24,D))));
U2L:=IF((CLOSE>=MA(CLOSE,20)),50,20);
RH5:=IF(((D>U2L) AND (REF(D,1)<=U2L)),LLV(REF(LOW,1),(BARSLAST(((D<=U2L) AND (REF(D,1)>U2L)))-1)),REF(LLV(REF(LOW,1),(BARSLAST(((D<=U2L) AND (REF(D,1)>U2L)))-1)),BARSLAST(((D>U2L) AND REF(D,1)))));
RL1:=IF((LOW<RH5),HIGH,REF(HIGH,BARSLAST((LOW<RH5))));
RL4:=IF((LOW<RH5),D,REF(D,BARSLAST((LOW<RH5))));
RL42:=IF((((LOW<RL1) AND (D>RL4)) AND (D>D24)),LOW,REF(LOW,BARSLAST((((LOW<RL1) AND (D > RL4)) AND (D > D24)))));
长期底部:=LLV(HIGH,30),COLORFF0000;
{DRAWTEXT(FILTER(((((RL42=J24) AND (CLOSE>OPEN)) AND (CLOSE>长期底部))
AND (LOW=J24)),20),(LOW-0.12),'▲底成'),COLOR0EABFF;}
上:=(SMA(LOW,5,2)*0.96);
中:=(((((3*CLOSE)+HIGH)+LOW)+OPEN)/6);
X1:=EMA(中,10);
X2:=REF(X1,1);
X9:=MA(CLOSE,115);
VAR001:=EMA(CLOSE,8);
飞龙顶底线:=EMA(VAR001,20);
VAR002:=CROSS(VAR001,飞龙顶底线);
VAR003:=(VAR001 < MA(CLOSE,20));
低买:=(VAR002 AND VAR003);
DRAWTEXT((((((低买>0) AND ((X1-REF(X1,1))>0)) AND
(HIGH<压力位)) AND (HIGH<X9)) AND ((X2-REF(X2,1))>0)),LOW,'▲黑马'),COLORRED;
{DRAWTEXT(((((LOW<=上) AND (HIGH>=短期底部)) AND (CLOSE>=长期底部))
AND ((CLOSE/OPEN)>1.03)),(LOW-0.08),'★抄底'),COLOR0000FF;
DRAWTEXT(FILTER((((((((MA20-REF(MA20,1))>0) AND (HIGH<支撑)) AND
((AA10-REF(AA10,1))>0)) AND (HIGH<压力1)) AND (VOL>=REF(VOL,1)))
AND CROSS(CLOSE,MA20)),57),LOW,'突破生命线'),COLOR0000FF;
DRAWTEXT(FILTER(((((LOW<=MA80) AND (CLOSE>MA80)) AND (CLOSE>OPEN))
AND (短期底部2<=MA80)),8),LOW,'▲底'),COLORFFFF00;}
DRAWTEXT(((CROSS(MA20,压力位) AND (LOW <= MA20)) AND ((MA20-REF(MA20,1))
>0.02)),(LOW-0.03),'●绝佳买点'),COLORAFA0AF;
DRAWTEXT((((((((CROSS(CLOSE,MA20) AND (HIGH<压力位)) AND (OPEN<MA20))
AND (HIGH<支撑)) AND ((MAN-REF(MAN,1))>0)) AND ((X1-REF(X1,1)) >
0)) AND (D<63)) AND ((MA20-REF(MA20,1))>0)),(LOW-0.05),'●大牛浮水'),COLORBLUE;
{DRAWTEXT(CROSS(MA(CLOSE,13),C) AND INDEXC>MA(INDEXC,13) AND MA(CLOSE,13)>
REF(MA(CLOSE,13),1) AND V<REF(V,1) AND MA(CLOSE,13)>MA(CLOSE,55),L*0.9,'买'),COLORRED,LINETHICK2;}
VAR011:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100)/3;
DRAWTEXT(FILTER(VAR011<-9 AND VAR011>REF(VAR011,1),18),L*0.9,'←反弹♂'),COLORRED,LINETHICK2;
{DRAWICON(FILTER(VAR011<-9 AND VAR011>REF(VAR011,1),18),L*0.9,1);
DRAWTEXT(VAR011<-20 AND INDEXC<MA(INDEXC,13) AND FILTER(VAR011>
REF(VAR011,1),5),L*0.93,'▲抄底'),COLORYELLOW,LINETHICK2;}
{B36:=MA(CLOSE,3)-MA(CLOSE,6);
B612:=MA(CLOSE,6)-MA(CLOSE,12);
W:=((B36)/(CLOSE))*(10);
J1:=((B612)/(CLOSE))*(10);
DRAWTEXT((W<(-0.2)) AND (J1<(-0.2)) AND CROSS(W,J1),(LOW)*0.93,'♂庄影'),COLORBROWN;}
{EMA13:=EMA(C,13);
EMA34:=EMA(C,34);
EMA55:=EMA(C,55);
AR1:=EMA55>EMA34 AND EMA34>EMA13;
AR2:=BARSLAST((C-EMA13)/EMA13*100<-6);
AR3:=EMA13>=REF(EMA13,2);
AR4:=COUNT(CROSS(C,EMA13),AR2)=1;
AR5:=AR1 AND AR2 AND AR3 AND AR4;
AR6:=AR5 AND FILTER(AR5,10);
A1AA:=9;
A2AA:=(REF(CLOSE,A1AA+1)<CLOSE);
DRAWTEXT(FILTER((A2AA>-0.5),84),(HIGH)*(1.04),'←变'),COLORGREEN;
DRAWICON(FILTER((A2AA>-0.5),84),(HIGH)*(1.04),2);
DRAWTEXT(AR6,L-0.25,'杏'),COLOR00CCFF;
量价背离:=VAR14*40,STICK,COLORF5CCEB,LINETHICK2;
DRAWTEXT(量价背离,HIGH*1.02,'离'),COLORYELLOW;}
VAR60:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR61:=VAR8<REF(VAR60,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
大资金:=(VAR61 AND COUNT(VAR61,30)=1);
DRAWTEXT(大资金,LOW*0.88,'▲大资金');
{做空}
{RSV11:=(C-LLV(LOW,27))/(HHV(HIGH,3)-LLV(LOW,27))*100;
F:= SMA(RSV11, 3, 1);
K11 := SMA(F,3, 1);
D11 := SMA(K11,3, 1);
WAV:=3*K11-2*D11;
A41:=IF(1,C,IF(C<REF(O,1) AND L<REF(L,1),L,C));
A42:=IF(C<REF(L,1),L,A41);
A43:=IF(H<REF(O,1),L,A42);
A44:=IF(O<=REF(C,1) AND C<REF(O,1),L,A43);
A:=IF(C<O AND O<REF(O,1) AND L<REF(L,1),L,A44);
AJ1:=ATAN((A/REF(A,1)-1)*100)*180/3.1416;
LJIAO:=ATAN((VOL/REF(VOL,1)-1)*100)*180/3.1416;
DSLJ:=LJIAO>0 AND ABS(LJIAO-AJ1)<30;
JIA5:=WAV-REF(WAV,4)>50;
DSALE:=DSLJ AND (JIA5 OR WAV>90);
涨幅:=(C-LLV(C,10))/LLV(C,10)*100;
DING2:=涨幅>20;
DING:=DSALE OR DING2;
QSA:=(MA(C,60)-REF(MA(C,60),10))/REF(MA(C,60),10)*100;
QS:=SMA(QSA,10,1);
DS:=QS<-3 OR MA(C,60)<REF(MA(C,60),1);
QC:=DS AND DING AND DING!=REF(DING,1);
DRAWTEXT(QC,H*1.08,'◇做空'),COLORRED;}
{抢钱买入}
RSV1:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K1:=SMA(RSV1,3,1);
D1:=SMA(K1,3,1);
J11:=3*K1-2*D1;
X:=LLV(J11,2)=LLV(J11,8);
DRAWTEXT(CROSS(J11,REF(J11+0.01,1)) AND X AND J11<20,LOW*0.95,'←抢钱￥'),COLORRED;
DRAWICON(CROSS(J11,REF(J11+0.01,1)) AND X AND J11<20,LOW*0.95,1);
{加仓}
BB05:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416;
速度5:=SMA(EMA((MA5-REF(MA5,1))/REF(MA5,1),3)*100,3,1);
加速度5:=EMA((速度5-REF(速度5,1)),3);
SSR:=(C-MA30)/MA30*100,NODRAW;
加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND MA5>REF(MA5,1) AND SSR>REF(SSR,1) AND MA10>REF(MA10,1) AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) ;
DRAWTEXT(加仓 ,LOW*0.98,'◆加仓'),COLORYELLOW;
{时间窗,变盘}
AA:=BARSCOUNT(C);
AH:=HHV(H,200);
AL:=LLV(L,200);
A0:=(AH-AL)/40;
B11:=L-A0;
STICKLINE((AA+0)/34=FLOOR((AA+0)/34),B11,B11-1.5*A0,2,0),COLORF00FF0;
DRAWTEXT((AA+0)/34=FLOOR((AA+0)/34),B11-1*A0,'时窗,变盘'),COLORF00FF0;
{出货}
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.04),'←跑'),COLORBROWN;
DRAWICON(CROSS(88,RSI),(HIGH * 1.04),2);
VARE1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VAR121:=(HIGH+LOW+CLOSE)/3;
VAR131:=(VAR121-MA(VAR121,14))/(0.015*AVEDEV(VAR121,14));
VAR141:=(VAR121-MA(VAR121,70))/(0.015*AVEDEV(VAR121,70));
VAR171:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VAR181:=100-ABS(VAR171);
VAR191:=IF(VAR181<90,VAR181,100);
VAR1A1:=IF(VARE1>0,VARE1,0);
VAR1B1:=IF(VAR141>=200 AND VAR131>=150,15,IF(VAR141<=-200 AND VAR131<=-150,-15,VAR15))+60;
VAR1C1:=VAR1A1>48 AND VAR1B1>60 AND VAR191<100;
DRAWTEXT(VAR1C1 AND COUNT(VAR1C1,30)=1,HIGH*1.02,'大笔出货'),LINETHICK1,COLORFFCC66;
XXS:=MA(HIGH,5)*(1+5/100);
DRAWTEXT(CROSS(XXS,C),H,'←砸'),COLORLIGREEN;
DRAWICON(CROSS(XXS,C),H,2);
{VARP1:=LLV(LOW,10);
VARP2:=HHV(HIGH,25);
VARP3:=100*EMA((CLOSE-VARP1)/(VARP2-VARP1),4);
DRAWTEXT(CROSS(VARP3,87.5),HIGH*1.02,'收手'),COLORYELLOW;};
RSV2:=(CLOSE - LLV(LOW,18))/(HHV(HIGH,18) - LLV(LOW,18))*100;
K2:=EMA(RSV2,3);
D2:=EMA(K2,3);
J2:=(3*K2-2*D2);
KDJ2:=REF(COUNT(J2<REF(J2,1),5)>=3,1) AND REF(J2,1)<20;
KDJ3:=J2>REF(J2,1);
反转:=IF(FILTER(KDJ2 AND KDJ3,3),50,0),COLORRED;
买:=IF(CROSS(J11,2),50,0);
VAR22:=REF(LOW,1);
VAR33:=SMA(ABS(LOW-VAR22),3,1)/SMA(MAX(LOW-VAR22,0),3,1)*100;
VAR44:=EMA(IF(CLOSE*1.3,VAR33*10,VAR33/10),3);
VAR55:=LLV(LOW,13);
VAR66:=HHV(VAR44,13);
VAR77:=IF(MA(CLOSE,34),1,0);
VAR888:=EMA(IF(LOW<=VAR55,(VAR44+VAR66*2)/2,0),3)/618*VAR77;
VAR999:=IF(VAR888>100,100,VAR888);
吸筹:=VAR999,LINETHICK1,COLORCD7F32 ;
HH:=CONST(HHV(C,120))*1;{取现价的N日最大值}
LL:=CONST(LLV(C,120))*1;{取现价的N日最小值}
HL:=CONST(IF(CONST((HH+LL)/2)<CONST(C),LL-(HH-LL)*0.4,HH+(HH-LL)*0.4));
{取叠加副图自动转换高低值，当现价小于中间值时以LL-(HH-LL)*0.2为副图自动转换高低值，反之以HH+(HH-LL)*0.2为副图自动转换高低值}
HH1:=IF(CONST((HH+LL)/2)>CONST(C),HH,HL);{当现价小于中间值时以最大值为最高点，反之以HL为最高点}
LL1:=IF(CONST((HH+LL)/2)<CONST(C),LL,HL);{当现价小于中间值时以最小值为最低点，反之以HL为最低点}
HLMAX:=MAX(HH1,LL1);{设定所要叠加副图比例的最大值}
HLMIN:=MIN(HH1,LL1);{设定所以叠加副图比例的最小值}
HLMN1:=(HLMAX+HLMIN)/2;{取设定所要叠加副图比例的最大最小值的中间值}
HLMN2:=HLMAX-HLMIN;{取设定所要叠加副图比例的最大最小值的差值}
HLMN3:=(100-0)/2;
HLMN4:=100-0;
{(50-50)*HLMN2/100+HLMN1,COLOR555555;
(20-50)*HLMN2/100+HLMN1,COLOR555555;
(80-50)*HLMN2/100+HLMN1,COLOR555555;}
(100-50)*HLMN2/100+HLMN1,COLOR555555;
{以上定义叠加副图坐标}
STICKLINE(吸筹,(0-50)*HLMN2/100+HLMN1,(VAR999-50)*HLMN2/100+HLMN1,2,10),COLORFF00FF;
STICKLINE(J11<=0,(90-50)*HLMN2/100+HLMN1,(100-50)*HLMN2/100+HLMN1,4,0),COLORYELLOW;
IF(反转=50,(50-50)*HLMN2/100+HLMN1,(0-50)*HLMN2/100+HLMN1),COLORRED;
IF(买=50,(50-50)*HLMN2/100+HLMN1,(0-50)*HLMN2/100+HLMN1),COLORYELLOW,LINETHICK1.5;
{以上标出信号}
{KZ:(K-50)*HLMN2/100+HLMN1,COLORFFFFFF;
DZ:(D-50)*HLMN2/100+HLMN1,COLOR00FFFF;
JZ:(J11-50)*HLMN2/100+HLMN1,COLORMAGENTA;}
{以上输出KDJ线};
2120488633.png
|
