九毛八公式指标
公式模块：
请老师把{龙飞凤舞}改为大智慧版本，谢谢!!
DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
macd:=1000* (2*(DIFF-DEA))/EMA(C,30);
VARA:=EMA(REF(CLOSE,1),4);
VAR1:=(SMA(MAX(CLOSE-VARA,0),6,1)/SMA(ABS(CLOSE-VARA),6,1)*100);
准备:IF(VAR1<3.5,15,0),COLORCYAN,LINETHICK2;
DRAWTEXT(准备,10,'准备'),COLORCYAN;
VAR3:=FILTER(MacD<0 AND MACD>REF(MACD,1) AND VAR1<20,5);
钱进:IF(VAR3,0,-20),COLORBROWN,LINETHICK3;
DRAWTEXT(VAR3,-10,'Ψ向“钱”进'), COLORBROWN;
VAR4:=crOSS(VAR1,90);
DRAWTEXT(VAR4,70,'凤舞ラ小心'),COLORCYAN;
RSV:=(CLOSE-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100;
FASTK:=SMA(RSV,3,1);
龙Ｋ:=SMA(FASTK,2,1);
龙Ｄ:=SMA(龙Ｋ,5,1);
VAR5:=LLV(LOW,10);
VAR6:=HHV(H,25);
VAR7:=EMA((C-VAR5)/(VAR6-VAR5)*4,4);
DRAWTEXT(CROSS(3.5,VAR7),110,'急卖');
恭喜:STICKLINE(CROSS(VAR7,0.3),-50,-30,3,0), COLOR00AAFF,LINETHICK1;
STICKLINE(CROSS(VAR7,0.3),-40,-30,3,0),COLORRED,LINETHICK1;
DRAWTEXT(CROSS(VAR7,0.3),-20,'恭喜'),COLORMAGENTA;
发财:STICKLINE(CROSS(3.5,VAR7),100,120,2,0), COLORRED,LINETHICK2;
STICKLINE(CROSS(3.5,VAR7),110,120,2,0),COLORYELLOW,LINETHICK2;
DRAWTEXT(CROSS(3.5,VAR7),90,'发财'),COLORYELLOW;
龙行凤影:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)
-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)
-LLV(LOW,27))*100,5,1),3,1);
龙飞凤舞:IF(龙行凤影<=10,-20,-40),COLOR0000FF,LINETHICK2;
DRAWTEXT(龙行凤影<=10,-25,'双'),COLORYELLOW;
DRAWTEXT(龙行凤影<=10,-35,'飞'),COLORYELLOW;
DD:=IF(MACD>=0,MACD,DRAWNULL);
LL:=IF(MACD<0,-MACD,DRAWNULL);
DRAWTEXT(CROSS( 0,MACD)AND VAR1>75,110,'☆高空'),COLORFFFFFF;
红红的天:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)
-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)
-LLV(LOW,27))*100,5,1),3,1);
花开:IF(CROSS(红红的天,2),70,-50),COLORLIMAGENTA;
DRAWTEXT(CROSS(红红的天,2),75,'花开了'),COLORMAGENTA;
IF(CROSS(红红的天,2),70,DRAWNULL),CROSSDOT,LINETHICK6,COLORFF77FF;
IF(CROSS(红红的天,2),70,DRAWNULL),POINTDOT,LINETHICK4,COLOR00CCFF;
{明天涨}
L1:=(CLOSE-LLV(LOW,11))/(HHV(HIGH,11)-LLV(LOW,11))*200-60;
凤Ｋ:SMA(L1,3,1),COLORYELLOW;
凤Ｄ:SMA(凤Ｋ,3,1),COLORRED;
DRAWTEXT(CROSS(凤Ｄ,凤Ｋ)AND 凤Ｋ>78,100,'快卖');
RSV9:=(((CLOSE - LLV(LOW,29)) / (HHV(HIGH,29) - LLV(LOW,29))) * 100);
KK9:=MA(RSV9,5);
D9:=MA(KK9,2);
J9:=((3 * KK9) - (2 * D9));
明天涨:IF((J9 < 5),50,0),COLORMAGENTA;
DRAWTEXT((J9 < 5),53,'明天涨'),COLORMAGENTA;
{rsi选股}
R:=RSI;
MAR:=MA(R,3);
F:=100*(C-REF(C,1))/REF(C,1);
HHH:=EMA(R,25)+6,COLORBLUE;
GaoDIAN:=REF(R,1)>REF(R,2) AND REF(R,1)>R;
DIDIAN:=(REF(R,1)<REF(R,2) AND REF(R,1)<R) OR (REF(R,1)=REF(R,2) AND REF(R,1)<R AND REF(R,2)<REF(R,3));
BIAOJI:=CROSS(HHH,R);
JIN:STICKLINE(REF(R,2)>REF(R,3) AND REF(R,2)>REF(R,1) AND R>REF(R,1)
AND MAR>REF(MAR,1)+1 AND REF(MAR,2)-REF(MAR,1)>-1
AND REF(R,1)<REF(MAR,1) AND REF(R,2)-REF(MAR,2)>-3
AND REF(R,1)<38 AND R<HHH AND F<8,10,50,1,0),COLORBROWN;
DRAWTEXT(JIN,50,'RSI'),COLORBROWN;
{地量}
volUME:=VOL/10000,VOLSTICK;
MAVOL1:=MA(VOLUME,5)/10000;
MAVOL2:=MA(VOLUME,35)/10000;
MAVOL3:=MA(VOLUME,135)/10000;
地量:IF(CROSS(0.9,1/VOL*1000>0.01 AND "kdj.J"<0),-25,-50),COLORYELLOW,LINETHICK2;
DRAWTEXT(CROSS(0.9,1/VOL*1000>0.01 AND "kdJ.J"<0),-25,' 地量'),COLORBROWN;
DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=1000* (2*(DIFF-DEA))/EMA(C,30);
VARA:=EMA(REF(CLOSE,1),4);
VAR1:=(SMA(MAX(CLOSE-VARA,0),6,1)/SMA(ABS(CLOSE-VARA),6,1)*100);
准备:IF(VAR1<3.5,15,0),COLORCYAN,LINETHICK2;
DRAWTEXT(准备,10,'准备'),COLORCYAN;
VAR3:=FILTER(MACD<0 AND MACD>REF(MACD,1) AND VAR1<20,5);
钱进:IF(VAR3,0,-20),COLORBROWN,LINETHICK3;
DRAWTEXT(VAR3,-10,'Ψ向“钱”进'), COLORBROWN;
VAR4:=CROSS(VAR1,90);
DRAWTEXT(VAR4,70,'凤舞ラ小心'),COLORCYAN;
RSV:=(CLOSE-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100;
FASTK:=SMA(RSV,3,1);
龙Ｋ:=SMA(FASTK,2,1);
龙Ｄ:=SMA(龙Ｋ,5,1);
VAR5:=LLV(LOW,10);
VAR6:=HHV(H,25);
VAR7:=EMA((C-VAR5)/(VAR6-VAR5)*4,4);
DRAWTEXT(CROSS(3.5,VAR7),110,'急卖');
恭喜:STICKLINE(CROSS(VAR7,0.3),-50,-30,3,0), COLOR00AAFF,LINETHICK1;
STICKLINE(CROSS(VAR7,0.3),-40,-30,3,0),COLORRED,LINETHICK1;
DRAWTEXT(CROSS(VAR7,0.3),-20,'恭喜'),COLORMAGENTA;
发财:STICKLINE(CROSS(3.5,VAR7),100,120,2,0), COLORRED,LINETHICK2;
STICKLINE(CROSS(3.5,VAR7),110,120,2,0),COLORYELLOW,LINETHICK2;
DRAWTEXT(CROSS(3.5,VAR7),90,'发财'),COLORYELLOW;
龙行凤影:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)
-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)
-LLV(LOW,27))*100,5,1),3,1);
龙飞凤舞:IF(龙行凤影<=10,-20,-40),COLOR0000FF,LINETHICK2;
DRAWTEXT(龙行凤影<=10,-25,'双'),COLORYELLOW;
DRAWTEXT(龙行凤影<=10,-35,'飞'),COLORYELLOW;
DD:=IF(MACD>=0,MACD,0);
LL:=IF(MACD<0,-MACD,0);
DRAWTEXT(CROSS( 0,MACD)AND VAR1>75,110,'☆高空'),COLORFFFFFF;
红红的天:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)
-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)
-LLV(LOW,27))*100,5,1),3,1);
花开:IF(CROSS(红红的天,2),70,-50),COLOR8977FF;
DRAWTEXT(CROSS(红红的天,2),75,'花开了'),COLORMAGENTA;
PARTLINE(70,CROSS(红红的天,2),RGB(100,0,50)),CROSSDOT,LINETHICK6;
{明天涨}
L1:=(CLOSE-LLV(LOW,11))/(HHV(HIGH,11)-LLV(LOW,11))*200-60;
凤Ｋ:SMA(L1,3,1),COLORYELLOW;
凤Ｄ:SMA(凤Ｋ,3,1),COLORRED;
DRAWTEXT(CROSS(凤Ｄ,凤Ｋ)AND 凤Ｋ>78,100,'快卖');
RSV9:=(((CLOSE - LLV(LOW,29)) / (HHV(HIGH,29) - LLV(LOW,29))) * 100);
KK9:=MA(RSV9,5);
D9:=MA(KK9,2);
J9:=((3 * KK9) - (2 * D9));
明天涨:IF((J9 < 5),50,0),COLORMAGENTA;
DRAWTEXT((J9 < 5),53,'明天涨'),COLORMAGENTA;
{RSI选股}
R:="RSI.RSI1";
MAR:=MA(R,3);
F:=100*(C-REF(C,1))/REF(C,1);
HHH:EMA(R,25)+6,COLORBLUE;
GAODIAN:=REF(R,1)>REF(R,2) AND REF(R,1)>R;
DIDIAN:=(REF(R,1)<REF(R,2) AND REF(R,1)<R) OR (REF(R,1)=REF(R,2) AND REF(R,1)<R AND REF(R,2)<REF(R,3));
BIAOJI:=CROSS(HHH,R);
JIN:STICKLINE(REF(R,2)>REF(R,3) AND REF(R,2)>REF(R,1) AND R>REF(R,1)
AND MAR>REF(MAR,1)+1 AND REF(MAR,2)-REF(MAR,1)>-1
AND REF(R,1)<REF(MAR,1) AND REF(R,2)-REF(MAR,2)>-3
AND REF(R,1)<38 AND R<HHH AND F<8,10,50,1,0),COLORBROWN;
DRAWTEXT(JIN,50,'RSI'),COLORBROWN;
{地量}
VOLUME:VOL/10000,VOLSTICK;
MAVOL1:MA(VOLUME,5)/10000;
MAVOL2:MA(VOLUME,35)/10000;
MAVOL3:MA(VOLUME,135)/10000;
地量:IF(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),-25,-50),COLORYELLOW,LINETHICK2;
DRAWTEXT(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),-25,' 地量'),COLORBROWN;
