飞狐飘零先机副图指标 EA-万能指标公式

飞狐飘零先机副图指标

源码

{飘零先机（副图）}

long:=26;short:=12;m:=9;
rnDIF:EMA(CLOSE,SHORT) – EMA(CLOSE,LONG);
rnDEA:EMA(DIF,M),COLORBLUE,LINETHICK3;
rnMACD:2*(DIF-DEA),COLORSTICK;

A4:=BARSLAST(REF(CROSS(DIF,DEA),1));
rnB1:=REF(C,A4+1)>C AND REF(DIF,A4+1)<DIF AND CROSS(DIF,DEA);
rnDRAWTEXT(FILTER(B1>0,5),DIF+0.2,’背离’),COLORYELLOW;
rn操盘:STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,2,0),COLORRED{COLOR6058FF};
rn减仓:STICKLINE(MACD>=0 AND MACD< REF(MACD,1),0,MACD,2,0),COLORFF9900{COLOR6058FF};
rn反弹:STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,2,0),COLORYELLOW{COLORFFFF00};
rn寻底:STICKLINE(MACD<0 AND MACD< REF(MACD,1),0,MACD,2,0),COLORFFFF00;
rn空仓:0,COLORWHITE;
rnIF(DIF<0,DIF,0),COLORYELLOW,LINETHICK1;
rnIF(DIF<0,0,DIF),COLORRED,LINETHICK1;
rnIF(DIF<DEA,DIF,DEA),COLORWHITE,LINETHICK1;
rnIF(DIF>DEA,DEA,DEA),COLORGREEN{COLORFF00FF},LINETHICK1;
rnRSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
rnK:=SMA(RSV,3,1);
rnD:=SMA(K,3,1);
rnJ:=3*K-2*D;

周Ｋ:=MA("KDJ.K#WEEK"(9,3,3) ,5);
rn周Ｄ:=MA("KDJ.D#WEEK"(9,3,3) ,5);
rn周Ｊ:=MA("KDJ.J#WEEK"(9,3,3) ,5);
rnDRAWICON(K<20 AND CROSS(K,D),MACD,1),ALIGN2;
rn周金:DRAWTEXT(CROSS("KDJ.K#WEEK"(9,3,3),"KDJ.D#WEEK"(9,3,3)) ,MACD,’▲’),ALIGN2,COLORRED;
rn周死:DRAWTEXT(CROSS("KDJ.D#WEEK"(9,3,3),"KDJ.K#WEEK"(9,3,3)) ,MACD*1.5,’▼’),ALIGN2,COLORGREEN;
rn月金:DRAWTEXT(CROSS("KDJ.K#MONTH"(9,3,3),"KDJ.D#MONTH"(9,3,3)) ,MACD,’▲’),ALIGN2,COLORMAGENTA;
rn月死:DRAWTEXT(CROSS("KDJ.D#MONTH"(9,3,3),"KDJ.K#MONTH"(9,3,3)) ,MACD*1.5,’▼’),ALIGN2,COLORYELLOW;

VAR1C:=(HIGH – MIN(OPEN,CLOSE));
rnVAR2C:=(CLOSE – OPEN);
rnVAR3C:=(MIN(OPEN,CLOSE) – LOW);
rnVAR4C:=(HIGH – LOW);
rnVAR5C:=((VOL * VAR1C) / VAR4C);
rnVAR6C:=((VOL * VAR2C) / VAR4C);
rnVAR7C:=((VOL * VAR3C) / VAR4C);
rnVAR8C:=((VAR5C – VAR6C) – VAR7C);

VAR4:=MA(CLOSE,5);
rnVAR5:=MA(CLOSE,10);
rnVAR6:=MA(CLOSE,30);
rnVAR7:=MA(CLOSE,60);
rnVAR8:=EMA(COST(85),7);
rnVAR9:=EMA(COST(15),7);
rnVARA:=(SUM(((CLOSE * VOL) * 10),4) / SUM((VOL * 200),4));
rnVARB:=(INTPART((VARA * 10)) / 10);
rnVARC:=(SUM(((CLOSE * VOL) * 10),7) / SUM((VOL * 200),7));
rnVARD:=(INTPART((VARC * 10)) / 10);
rnVARE:=(SUM(((CLOSE * VOL) * 10),28) / SUM((VOL * 200),28));
rnVARF:=(INTPART((VARE * 10)) / 10);
rn短线趋势:(EMA(CLOSE,5) – EMA(CLOSE,10)),COLORMAGENTA,LINETHICK2;
rn中线趋势:EMA(短线趋势,9),COLORMAGENTA,LINETHICK3;
rnVAR10:=((0 – ((10 * (HHV(CLOSE,5) – CLOSE)) / (HHV(CLOSE,5) – LLV(LOW,5)))) + 10);
rnVAR11:=((0 – ((10 * (HHV(CLOSE,10) – CLOSE)) / (HHV(CLOSE,10) – LLV(LOW,10)))) + 10);
rnVAR12:=((0 – ((10 * (HHV(CLOSE,20) – CLOSE)) / (HHV(CLOSE,20) – LLV(LOW,20)))) + 10);
rnVAR13:=((0 – ((10 * (HHV(CLOSE,30) – CLOSE)) / (HHV(CLOSE,30) – LLV(LOW,30)))) + 10);
rnVAR14:=REF(中线趋势,1);
rnVAR15:=中线趋势;
rnVAR16:=(VAR15 – VAR14);
rnVAR17:=REF(短线趋势,1);
rnVAR18:=短线趋势;
rnVAR19:=(VAR18 – VAR17);
rnVAR1A:=OPEN;
rnVAR1B:=CLOSE;
rn庄家吸筹:IF((((((((VAR1A <= VAR4) AND (VAR1A <= VAR5)) AND (VAR1A <= VAR6)) AND (VAR1B >= VAR4)) AND (VAR1B >= VARF)) AND (VAR16 > 0)) AND (VAR19 > 0)),0.5,0),LINETHICK2,COLOR66FF00;
rn短线指标:IF(((((CROSS(短线趋势,中线趋势) AND (短线趋势 < 0)) AND (中线趋势 < (0 – 0.2))) AND (VAR11 > 45)) AND (VAR16 > 0)),0.3,0.1),COLOR66FF00;