同花顺的花神指标 转换为 大智慧公式，分享 {花神主图}
花:=EMA(C,3);{COLORRED;}
女:=EMA(C,7);{COLORBLUE;}
DRAWTEXT(COUNT (花<女,5)=4 AND 花>=女,C*0.95,'B'), COLORRED;
DRAWTEXT(COUNT (花>=女,5)=4 AND 花<女,C*1.08,'S'), COLORYELLOW;
STICKLINE(花>= 女 ,CLOSE,OPEN,8,0) ,COLOR000077;
STICKLINE(花>= 女 ,CLOSE,OPEN,7,0) ,COLOR000099;
STICKLINE(花>= 女 ,CLOSE,OPEN,6,0) ,COLOR0000BB;
STICKLINE(花>= 女 ,CLOSE,OPEN,5,0) ,COLOR0000CC;
STICKLINE(花>= 女 ,CLOSE,OPEN,4,0) ,COLOR0000DD;
STICKLINE(花>= 女 ,CLOSE,OPEN,3,0) ,COLOR0000EE;
STICKLINE(花>= 女 ,CLOSE,OPEN,2,0) ,COLOR0000FF;
STICKLINE(花>= 女 ,CLOSE,CLOSE/1.006,1,0),COLOR0000FF;
STICKLINE(花>= 女,CLOSE,CLOSE/1.005,2,0),COLOR0000EE;
STICKLINE(花>= 女 ,CLOSE,CLOSE/1.004,3,0),COLOR0000DD;
STICKLINE(花>= 女 ,CLOSE,CLOSE/1.003,4,0),COLOR0000CC;
STICKLINE(花>= 女 ,CLOSE,CLOSE/1.002,5,0),COLOR0000BB;
STICKLINE(花>= 女 ,CLOSE,CLOSE/1.001,6,0),COLOR000099;
STICKLINE(花>= 女 ,OPEN,OPEN*1.006,1,0),COLOR0000FF;
STICKLINE(花>= 女 ,OPEN,OPEN*1.005,2,0),COLOR0000EE;
STICKLINE(花>= 女 ,OPEN,OPEN*1.004,3,0),COLOR0000DD;
STICKLINE(花>= 女 ,OPEN,OPEN*1.003,4,0),COLOR0000CC;
STICKLINE(花>= 女 ,OPEN,OPEN*1.002,5,0),COLOR0000BB;
STICKLINE(花>= 女 ,OPEN,OPEN*1.001,6,0),COLOR000099;
STICKLINE(花<= 女 ,CLOSE,OPEN/1.006,9,0),COLORFF0000;
STICKLINE(花<= 女 ,CLOSE,OPEN/1.005,8,0),COLORFF0000;
STICKLINE(花<= 女 ,CLOSE,OPEN/1.004,7,0),COLORFF3300;
STICKLINE(花<= 女 ,CLOSE,OPEN/1.003,3,0),COLORFFDD00;
STICKLINE(花<= 女 ,CLOSE,OPEN/1.002,2,0),COLORFFFF00;
{DRAWGBKLAST(CLOSE>OPEN,STRIP(RGB(55,50,0),RGB(0,25,1000),1));//填充背景语句，没有意义
DRAWGBKLAST(CLOSE<OPEN,STRIP(RGB(80,0,0),RGB(100,20,1000),1));}
{分析家公式网www.fxjgsw.com}
{★花神★:STRLEFT('★',38),COLORYELLOW;字符获取函数，没意义}
EMA13:=EMA(C,20);
EMA34:=EMA(C,60);
EMA55:=EMA(C,80);
YZ1:=C/O>1.02 AND H/C>1.02 AND O/L<1.02;
YZ2:=REF(C,1)>REF(O,1) AND O>MA(C,11);
Y:=(MA(C,13)-MA(C,55))/MA(C,13)*100;
YZ:=YZ1 AND YZ2 AND Y>10;
X11:DRAWTEXT(YZ,HIGH+0.2,'减仓'),COLORF00FF0;
GR1:=BARSLAST(BETWEEN("BIAS.BIAS2"(6,13,24),0,5) );
GR2:=EMA13>EMA34 AND EMA34>EMA55 AND EMA13>REF(EMA13,1);
GR3:=COUNT("BIAS.BIAS2"(6,13,24)>10 AND H=HHV(H,GR1),GR1);
GR4:=H=HHV(H,GR1);
GR5:="MACD.MACD"(12,26,9)<REF("MACD.MACD"(12,26,9),1);
GR6:=GR2 AND GR3 AND GR4;
GR7:=GR2 AND GR3 AND GR4 AND GR5;
DRAWTEXT(GR6 AND GR7,H+0.13,'保存利润'),COLOR00FF00;
A1:EMA(C,14),COLORWHITE,LINETHICK1;
A1X:=(A1-REF(A1,1))/REF(A1,1)*100;
支撑线:=REF(EMA(C,14),BARSLAST(CROSS(A1X,0))+1);
阻力线:=REF(EMA(C,14),BARSLAST(CROSS(0,A1X))+1);
PARTLINE(支撑线,A1X>=0),colorred,LINETHICK1;
partline(阻力线,A1X<0),COLORGREEN,LINETHICK1;
{IF(,DRAWNULL),COLORRED,LINETHICK1;
IF(DRAWNULL),COLORGREEN,LINETHICK1;}
{分析家公式网www.fxjgsw.com}
STICKLINE(CROSS(A1X,0),C,O,2,0),COLORYELLOW;
STICKLINE(CROSS(0,A1X),C,O,2,0),COLORGREEN;
DRAWICON(CROSS(花,女) AND CLOSE/REF(CLOSE,1)>1.03,LOW/1.06,25);
花2:=EMA(SLOPE(1,1)+C,3);
女2:=EMA(SLOPE(1,1)+C,7);
花1:=MA(CLOSE, 5);
女1:=MA(CLOSE, 60);
花仙:=CROSS(花2,女2) AND 花1>女1;
仙女:=CROSS(女2,花2) AND 花1>女1 AND COUNT(CROSS(花,女) AND 花1>女1 ,30);
DRAWTEXT(花仙,LOW/1.03,'↖买'),COLORWHITE;
DRAWTEXT(仙女,HIGH*1.06,'卖'),COLORYELLOW;
STICKLINE(花仙,CLOSE,O,2,0),COLORYELLOW;
STICKLINE(仙女,CLOSE,O,7,0),COLOR555500;
STICKLINE(仙女,CLOSE,O,6,0),COLOR888800;
STICKLINE(仙女,CLOSE,O,5,0),COLORAAAA00;
STICKLINE(仙女,CLOSE,O,4,0),COLORCCCC00;
STICKLINE(仙女,CLOSE,O,3,0),COLOREEEE00;
STICKLINE(仙女,CLOSE,O,2,0),COLORWHITE;
STICKLINE(花仙,CLOSE,O,4,0),COLOR0000AA;
STICKLINE(花仙,CLOSE,O,3,0),COLOR0000CC;
STICKLINE(花仙,CLOSE,O,2,0),COLOR0000EE;
买入条件:=花仙;
卖出条件:=仙女;
D1:=BARSLAST(买入条件);
D2:=FLOOR(((C-REF(C,D1))/REF(C,D1))*100); |
