(龙行凤影)指标 求改成大智慧L2能用的

编写要求：

股票网解答：

网友求助：

{STICKLINE(C>0,0,120,15,0),COLORBLUE;}
RSV:=(CLOSE-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100;
FASTK:=SMA(RSV,3,1);
龙:SMA(FASTK,2,1);
龙Ｄ:=SMA(龙,5,1);
DRAWBAND(龙Ｄ,RGB(0,104,154),龙,RGB(255,0,0));
STICKLINE(龙>=龙Ｄ,龙Ｄ,龙,3,0),COLOR000085;
STICKLINE(龙<龙Ｄ,龙Ｄ,龙,3,0),COLOR324800;
DRAWTEXT(CROSS(龙Ｄ,龙) AND 龙>70,50,'卖'),COLORGREEN;
L1:=(CLOSE-LLV(LOW,11))/(HHV(HIGH,11)-LLV(LOW,11))*200-60;
凤:SMA(L1,3,1),COLORYELLOW;
凤Ｄ:=SMA(凤,3,1),COLORRED;
DRAWBAND(凤Ｄ,RGB(0,128,0),凤,RGB(255,97,0));
DRAWTEXT(CROSS(凤Ｄ,凤)AND 凤>78,凤,'←快卖');
DIFF:= EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=1000* (2*(DIFF-DEA))/EMA(C,30);
VARYA:=EMA(REF(CLOSE,1),4);
VARY1:=(SMA(MAX(CLOSE-VARYA,0),6,1)/SMA(ABS(CLOSE-VARYA),6,1)*100);
VARY2:=FILTER(MACD<0 AND MACD>REF(MACD,1) AND VARY1<20,5);
VARY3:=CROSS(VARY1,90);
准备:IF(VARY1<3.5,15,0),COLORCYAN,LINETHICK2;
DRAWTEXT(VARY1<3.5,7,'准备'),COLORCYAN;
钱进:IF(VARY2,20,0),COLORMAGENTA,LINETHICK3;
DRAWTEXT(VARY2,10,'"钱"进'),COLORRED;
DRAWTEXT(VARY3,70,'凤舞ラ小心'),COLORCYAN;
VARY4:=LLV(LOW,10);
VARY5:=HHV(H,25);
VARY6:=EMA((C-VARY4)/(VARY5-VARY4)*4,4);
DRAWTEXT(CROSS(3.5,VARY6),110,'急卖');
恭喜:STICKLINE(CROSS(VARY6,0.3),-50,-30,3,0), COLOR00AAFF,LINETHICK1;
STICKLINE(CROSS(VARY6,0.3),-40,-30,3,0),COLORRED,LINETHICK1;
DRAWTEXT(CROSS(VARY6,0.3),-45,'恭喜'),COLORMAGENTA;
发财:STICKLINE(CROSS(3.5,VARY6),100,120,2,0), COLORRED,LINETHICK2;
STICKLINE(CROSS(3.5,VARY6),110,120,2,0),COLORYELLOW,LINETHICK2;
DRAWTEXT(CROSS(3.5,VARY6),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,'龙飞'),COLORLIRED;
DRAWTEXT(CROSS( 0,MACD)AND VARY1>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,LINETHICK2;
DRAWTEXT(CROSS(红红的天,2),75,'花开了'),COLORMAGENTA;
IF(CROSS(红红的天,2),70,DRAWNULL),CROSSDOT,LINETHICK6,COLORFF77FF;
IF(CROSS(红红的天,2),70,DRAWNULL),POINTDOT,LINETHICK4,COLOR00CCFF;
RSV1:=(((CLOSE-LLV(LOW,29)) / (HHV(HIGH,29)-LLV(LOW,29))) * 100);
K1:=MA(RSV1,5);
D1:=MA(K1,2);
J1:=((3 * K1)-(2 * D1));
明天涨:IF((J1 < 5),25,0),COLORRED,LINETHICK2;
DRAWTEXT((J1 < 5),30,'明天涨'),COLORYELLOW;
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,100,120,2,0),COLORRED;
DRAWTEXT(JIN,110,'RSI买'),COLORYELLOW;
VARY7:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
VARY8:=EMA(VARY7,5), LINETHICK2,COLOR6600FF;
VARY9:=100*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60)),LINETHICK2;
STICKLINE(CROSS(VARY8,VARY9-28),0,20,2,0);
DRAWTEXT(CROSS(VARY8,VARY9-28),20,'追涨');
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),COLORMAGENTA,LINETHICK3;
DRAWTEXT(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),-29,' 地量'),COLORRED;
DRAWTEXT(LAST(MA(C,5)<MA(C,10),5,0) AND "CCI.CCI">REF("CCI.CCI",1) AND CROSS("CCI.CCI",-100),-45,'↑CCI买点'),COLORYELLOW;
A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);
LC:=REF(CLOSE,1);
RSI2:=((SMA(MAX((CLOSE-LC),0),3,1)/SMA(ABS((CLOSE-LC)),3,1))*100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
出局:IF(CROSS(88,RSI2),100,120),COLORLIGREEN,LINETHICK3;
DRAWTEXT(CROSS(88,RSI2),100,'虎'),COLORGREEN;
RSV3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
KY:=SMA(RSV3,3,1);
DY:=SMA(KY,3,1);
JY:=3*KY-2*DY;
XY:=LLV(JY,2)=LLV(JY,8);
进场:IF(CROSS(JY,REF(JY+0.01,1)) AND XY AND JY<20,0,-20),COLORYELLOW,LINETHICK2;
DRAWTEXT(CROSS(JY,REF(JY+0.01,1)) AND XY AND JY<20,-10,'龙'),COLORYELLOW;
WZ:=100=CURRBARSCOUNT;
DRAWTEXT(WZ=1,-30,''),COLORYELLOW;
 

 

解答如下：

RSV:=(CLOSE-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100;
FASTK:=SMA(RSV,3,1);
龙:SMA(FASTK,2,1);
龙Ｄ:=SMA(龙,5,1);
FILLRGN(龙Ｄ,龙,龙Ｄ<龙,RGB(255,0,0),龙Ｄ>龙,RGB(0,104,154));
STICKLINE(龙>=龙Ｄ,龙Ｄ,龙,8,0),COLOR000085;
STICKLINE(龙<龙Ｄ,龙Ｄ,龙,8,0),COLOR324800;
DRAWTEXT(CROSS(龙Ｄ,龙) AND 龙>70,50,'卖'),COLORGREEN;
L1:=(CLOSE-LLV(LOW,11))/(HHV(HIGH,11)-LLV(LOW,11))*200-60;
凤:SMA(L1,3,1),COLORYELLOW;
凤Ｄ:SMA(凤,3,1),COLORRED;
FILLRGN(凤Ｄ,凤,凤Ｄ<凤,RGB(255,97,0),凤Ｄ>凤,RGB(0,128,0));
DRAWTEXT(CROSS(凤Ｄ,凤)AND 凤>78,凤,'←快卖');
DIFF:= EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=1000* (2*(DIFF-DEA))/EMA(C,30);
VARYA:=EMA(REF(CLOSE,1),4);
VARY1:=(SMA(MAX(CLOSE-VARYA,0),6,1)/SMA(ABS(CLOSE-VARYA),6,1)*100);
VARY2:=FILTER(MACD<0 AND MACD>REF(MACD,1) AND VARY1<20,5);
VARY3:=CROSS(VARY1,90);
准备:IF(VARY1<3.5,15,0),COLORCYAN,LINETHICK2;
DRAWTEXT(VARY1<3.5,7,'准备'),COLORCYAN;
钱进:IF(VARY2,20,0),COLORMAGENTA,LINETHICK3;
DRAWTEXT(VARY2,10,'"钱"进'),COLORRED;
DRAWTEXT(VARY3,70,'凤舞ラ小心'),COLORCYAN;
VARY4:=LLV(LOW,10);
VARY5:=HHV(H,25);
VARY6:=EMA((C-VARY4)/(VARY5-VARY4)*4,4);
DRAWTEXT(CROSS(3.5,VARY6),110,'急卖');
恭喜:STICKLINE(CROSS(VARY6,0.3),-50,-30,8,0), COLOR00AAFF,LINETHICK1;
STICKLINE(CROSS(VARY6,0.3),-40,-30,8,0),COLORRED,LINETHICK1;
DRAWTEXT(CROSS(VARY6,0.3),-45,'恭喜'),COLORMAGENTA;
发财:STICKLINE(CROSS(3.5,VARY6),100,120,8,0), COLORRED,LINETHICK2;
STICKLINE(CROSS(3.5,VARY6),110,120,8,0),COLORYELLOW,LINETHICK2;
DRAWTEXT(CROSS(3.5,VARY6),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,'龙飞'),COLOR8977FF;
DRAWTEXT(CROSS( 0,MACD)AND VARY1>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),COLORFFAAFF,LINETHICK2;
DRAWTEXT(CROSS(红红的天,2),75,'花开了'),COLORMAGENTA;
IF(CROSS(红红的天,2),70,0),CROSSDOT,LINETHICK6,COLORFF77FF;
IF(CROSS(红红的天,2),70,0),POINTDOT,LINETHICK4,COLOR00CCFF;
RSV1:=(((CLOSE-LLV(LOW,29)) / (HHV(HIGH,29)-LLV(LOW,29))) * 100);
K1:=MA(RSV1,5);
D1:=MA(K1,2);
J1:=((3 * K1)-(2 * D1));
明天涨:IF((J1 < 5),25,0),COLORRED,LINETHICK2;
DRAWTEXT((J1 < 5),30,'明天涨'),COLORYELLOW;
LC:=REF(CLOSE,1);
RSI:SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100,LINETHICK0;
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,100,120,2,0),COLORRED;
DRAWTEXT(JIN,110,'RSI买'),COLORYELLOW;
VARY7:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
VARY8:EMA(VARY7,5), LINETHICK2,COLOR6600FF;
VARY9:100*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60)),LINETHICK2;
STICKLINE(CROSS(VARY8,VARY9-28),0,20,8,0);
DRAWTEXT(CROSS(VARY8,VARY9-28),20,'追涨');
地量:CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),COLORMAGENTA,LINETHICK3;
DRAWTEXT(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),-29,' 地量'),COLORRED;
TYP := (HIGH + LOW + CLOSE)/3;
CCI:(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
DRAWTEXT(BARSLAST(MA(C,5)>=MA(C,10))>=6 AND CCI>REF(CCI,1) AND CROSS(CCI,-100),-45,'↑CCI买点'),COLORYELLOW;
A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);
LC:=REF(CLOSE,1);
RSI2:=((SMA(MAX((CLOSE-LC),0),3,1)/SMA(ABS((CLOSE-LC)),3,1))*100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
出局:IF(CROSS(88,RSI2),20,120),COLOR00AA00,LINETHICK3;
DRAWTEXT(CROSS(88,RSI2),20,'虎'),COLORGREEN;
RSV3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
KY:=SMA(RSV3,3,1);
DY:=SMA(KY,3,1);
JY:=3*KY-2*DY;
XY:=LLV(JY,2)=LLV(JY,8);
进场:IF(CROSS(JY,REF(JY+0.01,1)) AND XY AND JY<20,0,-20),COLORYELLOW,LINETHICK2;
DRAWTEXT(CROSS(JY,REF(JY+0.01,1)) AND XY AND JY<20,-10,'龙'),COLORYELLOW;
WZ:=100=BARSTATUS;
DRAWTEXT(WZ=1,-30,''),COLORYELLOW;

>