投资者咨询：[求助]通达信翻译文华 (文华财经WH6赢顺V6.7)
来源:文华财经 日期:2018-6-25 11:49
BFW:=(O+C)/2;
STICKLINE(C,BFW,BFW,7,0),COLORYELLOW,LINETHICK6;
R2:=MA(CLOSE,5);
R3:=MA(CLOSE,21);
DRAWTEXT((R2 > R3),R3,'+'),COLORRED;
DRAWTEXT((R2 <= R3),R3,'-'),COLOR00FF00;
R2:=MA(CLOSE,5);
R3:=MA(CLOSE,21);
DRAWTEXT((R2 > R3),R3,'+'),COLORRED;
DRAWTEXT((R2 <= R3),R3,'-'),COLOR00FF00;
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
K:=EMA(R,3);
D:=EMA(K,3);
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
N:=IF((陡峭度 > 0.35),6,65);
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));
获利盘:=(WINNER(CLOSE))*(100);
获利线:=FORCAST(获利盘,7);
线:=(FORCAST(VAR1A,7))*((DATE < 20070110));
满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(获利盘 < 60),(获利盘 < 40)) and (COUNT((获利线 > 20),20) > 0));
DRAWTEXT(满仓,LOW*0.9998,'满仓'),ColorRED;
轻仓:=IF((获利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);
DRAWTEXT(轻仓,LOW*0.9999,'轻仓'),ColorYELLOW;
出击:=CROSS(线,20) and IF((COUNT(CROSS(K,D),3) = 1) and (D < 40),1,(线 > D) or (K > D) and (D < 60)) and IF((N = 6),(获利盘 < 70),(获利盘 < 40)) and (COUNT((获利线 > 20),20) > 0);
DRAWTEXT(出击,LOW*0.9996,'出击'),colorMAGENTA;
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
进二:=CROSS(线,获利线) and (D > 30) and (获利线 > 25) and (D > REF(D,1));
低进:=IF(进一 and (D > 获利线),进二,进一);
DRAWTEXT(低进,LOW*0.9998,'低进'),ColorRED;
DRAWTEXT(进二,LOW*0.9998,'高进'),ColorGRAY;
狂喜:=(CROSS(VAR1,(-2)));
DRAWTEXT(狂喜,(LOW*0.9997),'要涨停'),coloryellow;
狂喜过望:=((VAR1 = 0));
恐慌:=(VAR1 < -94);
{DRAWTEXT(恐慌,(LOW*0.9999),'恐慌'),ColorGREEN;
极度恐慌:=(-40)*(VAR1 = (-100));
DRAWTEXT(极度恐慌,(LOW*0.9997),'极度恐慌'),ColorWHITE}
半仓:=(CROSS(VAR1,(-94)) and (COUNT(恐慌,5) > 0) and (N = REF(N,1)) and IF((N = 6),(获利盘 < 60),(获利盘 < 40)) and (COUNT((获利线 > 20),20) > 0));
DRAWTEXT(半仓,LOW*0.999,'半仓'),ColorWHITE;
加仓:=(CROSS(K,20) and (COUNT(半仓,5) > 0));
DRAWTEXT(加仓,LOW*0.999,'加仓'),ColorRED;
{背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));
DRAWICON(背离,HIGH*1.02,1),ColorGRAY;
[飞狐]此段可以源码引入}
MA1:=(LOW+HIGH+CLOSE)/3;
MA2:= MA(MA1,2);
箱顶:HHV(MA2,25),coloryellow,LINETHICK2;
箱底:LLV(MA2,25),colorwhite,LINETHICK2;
{一品主力}
N1:=6;N2:=12;N3:=26;
MA5:=MA(CLOSE,5),colorfffacd,linethick2;
MA10:=MA(CLOSE,10),colorff3399,linethick2;
MA20:=MA(CLOSE,20),colorff00ff;
MA60:=MA(CLOSE,60),colorf0f000;
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,N1),N1)/EMA(EMA(ABS(MTM),N1),N1);
ZX:=100*EMA(EMA(MTM,N2),N2)/EMA(EMA(ABS(MTM),N2),N2);
CX:=100*EMA(EMA(MTM,N3),N3)/EMA(EMA(ABS(MTM),N3),N3);
DXGD:=LLV(DX,2)=LLV(DX,5) AND CROSS(DX,MA(DX,2));
ZXGD:=LLV(ZX,2)=LLV(ZX,5) AND CROSS(ZX,MA(ZX,2)) AND DX>ZX;
短买:=IF(DXGD AND BETWEEN(DX,0,60) AND ZX>0,1,0),COLORFFFFFF,POINTDOT;
中买:=IF(ZXGD AND BETWEEN(DX,0,50) AND BETWEEN(CX,0,50),1,0),COLOR00FFFF,POINTDOT;
DTPL:=DX>ZX AND ZX>CX AND CX>0;
QSXS:=DX>REF(DX,1) AND ZX>REF(ZX,1);
TSJC:=CROSS(DX,CX) AND CROSS(ZX,CX);
优选:=IF(CROSS(DTPL,0.8) AND (TSJC OR COUNT(QSXS,3)=3) AND CX<40,1,0),COLOR0000FF,POINTDOT;
短卖:=IF(CROSS(ZX,DX),1,0),colorffff00;
中卖:=IF(CROSS(CX,ZX) AND DX<ZX,1,0),colorff6600;
买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0),COLORRED;
卖:=IF(HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX),1,0),COLOR00FF00;
DRAWTEXT(中买,low*0.9998,'★
中
买'),COLOR00FFFF,align0;
DRAWTEXT(filter(买=1,5),low*0.9998,'�
买'),COLORRED,align0;
DRAWTEXT(filter(卖=1,5),high*1.0002,'卖'),COLOR00FF00,align0;
M1:=3;M2:=6;M3:=12;M4:=24;
BBI:(MA(CLOSE,M1)+MA(CLOSE,M2)+MA(CLOSE,M3)+MA(CLOSE,M4))/4,COLORyellow,linethick2;
A:=EMA((EMA(CLOSE,50)+EMA(CLOSE,52)+EMA(CLOSE,54))/3,3),COLORYELLOW;
B:=REF(A,1);
STICKLINE(A>B,A,B,9,0),COLORFF00FF;
STICKLINE(A<=B,A,B,9,1),COLORFF0000;
M1:=3;M2:=6;M3:=12;M4:=24;
M:=10;
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
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,colorgreen;
MADKX:MA(DKX,M);
DRAWICON(Cross(BBI,DKX),DKX,4);
DRAWICON(Cross(DKX,BBI),DKX,5);
{萃富网-股票公式网站 www.cuiv.com}
关注: DRAWICON(CROSS(DKX,MADKX),MADKX-0.08,11),COLORRED;
KK:EMA(C,25600);
IF(DKX<=C,DKX,KK),COLOR0000FF,LINETHICK2;
IF(DKX>=C,DKX,KK),COLORFF0000,LINETHICK2;
IF(MADKX<=C,MADKX,KK),COLOR0000FF,LINETHICK1;
IF(MADKX>=C,MADKX,KK),COLORFF0000,LINETHICK1;
技术人员回复
日期:2018-6-25 13:05
不同软件函数机制不同，加载效果可能略有差异，参考：
BFW:=(O+C)/2;
STICKLINE1(C,BFW,BFW,7,0),COLORYELLOW,LINETHICK6;
R2:=MA(CLOSE,5);
R3:=MA(CLOSE,21);
DRAWTEXT((R2 > R3),R3,'+'),COLORRED;
DRAWTEXT((R2 <= R3),R3,'-'),COLOR00FF00;
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
K:=EMA(R,3);
D:=EMA(K,3);
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
N:=IF((陡峭度 > 0.35),6,65);
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 070110));
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 070110));
获利盘:=(WINNER(CLOSE))*(100);
获利线:=FORCAST(获利盘,7);
线:=(FORCAST(VAR1A,7))*((DATE < 070110));
满仓:=((线 > REF(线,1)) AND (线 < 25) AND (COUNT((线 > REF(线,1)),5) = 1) AND IF((N = 6),(获利盘 < 60),(获利盘 < 40)) AND (COUNT((获利线 > 20),20) > 0));
DRAWTEXT(满仓,LOW*0.9998,'满仓'),COLORRED;
轻仓:=IF((获利盘 >= 60) AND (线 > REF(线,1)) AND (REF(线,1) < 20) AND (线 < 40) AND (COUNT((线 > REF(线,1)),5) = 1) AND (REF(N,1) = 6),1,0);
DRAWTEXT(轻仓,LOW*0.9999,'轻仓'),COLORYELLOW;
出击:=CROSS(线,20) AND IF((COUNT(CROSS(K,D),3) = 1) AND (D < 40),1,(线 > D) OR (K > D) AND (D < 60)) AND IF((N = 6),(获利盘 < 70),(获利盘 < 40)) AND (COUNT((获利线 > 20),20) > 0);
DRAWTEXT(出击,LOW*0.9996,'出击'),COLORMAGENTA;
进一:=CROSS(线,D) AND (D > 30) AND (D > REF(D,1)) AND (D < 80);
进二:=CROSS(线,获利线) AND (D > 30) AND (获利线 > 25) AND (D > REF(D,1));
低进:=IF(进一 AND (D > 获利线),进二,进一);
DRAWTEXT(低进,LOW*0.9998,'低进'),COLORRED;
DRAWTEXT(进二,LOW*0.9998,'高进'),COLORGRAY;
狂喜:=(CROSS(VAR1,(-2)));
DRAWTEXT(狂喜,(LOW*0.9997),'要涨停'),COLORYELLOW;
狂喜过望:=((VAR1 = 0));
恐慌:=(VAR1 < -94);
MA1:=(LOW+HIGH+CLOSE)/3;
MA2:= MA(MA1,2);
箱顶:HHV(MA2,25),COLORYELLOW,LINETHICK2;
箱底:LLV(MA2,25),COLORWHITE,LINETHICK2;
N1:=6;
N2:=12;
N3:=26;
MA5:=MA(CLOSE,5),COLORFFFACD,LINETHICK2;
MA10:=MA(CLOSE,10),COLORFF3399,LINETHICK2;
MA20:=MA(CLOSE,20),COLORFF00FF;
MA60:=MA(CLOSE,60),COLORF0F000;
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,N1),N1)/EMA(EMA(ABS(MTM),N1),N1);
ZX:=100*EMA(EMA(MTM,N2),N2)/EMA(EMA(ABS(MTM),N2),N2);
CX:=100*EMA(EMA(MTM,N3),N3)/EMA(EMA(ABS(MTM),N3),N3);
DXGD:=LLV(DX,2)=LLV(DX,5) AND CROSS(DX,MA(DX,2));
ZXGD:=LLV(ZX,2)=LLV(ZX,5) AND CROSS(ZX,MA(ZX,2)) AND DX>ZX;
短买:=IF(DXGD AND BETWEEN(DX,0,60) AND ZX>0,1,0),COLORFFFFFF,POINTDOT;
中买:=IF(ZXGD AND BETWEEN(DX,0,50) AND BETWEEN(CX,0,50),1,0),COLOR00FFFF,POINTDOT;
DTPL:=DX>ZX AND ZX>CX AND CX>0;
QSXS:=DX>REF(DX,1) AND ZX>REF(ZX,1);
TSJC:=CROSS(DX,CX) AND CROSS(ZX,CX);
优选:=IF(CROSS(DTPL,0.8) AND (TSJC OR COUNT(QSXS,3)=3) AND CX<40,1,0),COLOR0000FF,POINTDOT;
短卖:=IF(CROSS(ZX,DX),1,0),COLORFFFF00;
中卖:=IF(CROSS(CX,ZX) AND DX<ZX,1,0),COLORFF6600;
买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0),COLORRED;
卖:=IF(HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX),1,0),COLOR00FF00;
DRAWTEXT(中买,LOW*0.9998,'★N中N买'),COLOR00FFFF,ALIGN0;
DRAWTEXT(FILTER(买=1,5),LOW*0.9998,'�N买'),COLORRED,ALIGN0;
M1:=3;
M2:=6;
M3:=12;
M4:=24;
BBI:(MA(CLOSE,M1)+MA(CLOSE,M2)+MA(CLOSE,M3)+MA(CLOSE,M4))/4,COLORYELLOW,LINETHICK2;
A:=EMA((EMA(CLOSE,50)+EMA(CLOSE,52)+EMA(CLOSE,54))/3,3),COLORYELLOW;
B:=REF(A,1);
STICKLINE1(A>B,A,B,9,0),COLORFF00FF;
STICKLINE1(A<=B,A,B,9,1),COLORFF0000;
M:=10;
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
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,COLORGREEN;
MADKX:MA(DKX,M);
DRAWICON(CROSS(BBI,DKX),DKX,4);
DRAWICON(CROSS(DKX,BBI),DKX,5);
DRAWICON(CROSS(DKX,MADKX),MADKX-0.08,11),COLORRED; //关注:
KK:EMA(C,25600);
IF(DKX<=C,DKX,KK),COLOR0000FF,LINETHICK2;
IF(DKX>=C,DKX,KK),COLORFF0000,LINETHICK2;
IF(MADKX<=C,MADKX,KK),COLOR0000FF,LINETHICK1;
IF(MADKX>=C,MADKX,KK),COLORFF0000,LINETHICK1;
