把板块风神榜改为同花顺的_股票知识

VAR1:=MEMA(("399190$C"),3);

VAR2:=MEMA(("399200$C"),3);

VAR3:=MEMA(("399137$C"),3);

VAR4:=MEMA(("399139$C"),3);

VAR5:=MEMA(("399136$C"),3);

VAR6:=MEMA(("399110$C"),3);

VAR7:=MEMA(("399135$C"),3);

金融:SUM((VAR1/REF(VAR1,1)-1)*100,0),COLORRED;

地产:SUM((VAR2/REF(VAR2,1)-1)*100,0),COLORMAGENTA;

金属:SUM((VAR3/REF(VAR3,1)-1)*100,0),COLORLIRED;

医药:SUM((VAR4/REF(VAR4,1)-1)*100,0),COLORWHITE;

电子:SUM((VAR5/REF(VAR5,1)-1)*100,0),COLORCYAN;

农林:SUM((VAR6/REF(VAR6,1)-1)*100,0),COLORGREEN;

石化:SUM((VAR7/REF(VAR7,1)-1)*100,0),COLORYELLOW;

P1:=IF(BARSLAST(CURRBARSCOUNT=10),10,0);

P2:=IF(BARSLAST(CURRBARSCOUNT=7),10,0);

P3:=IF(BARSLAST(CURRBARSCOUNT=4),10,0);

DRAWTEXT((P3>=10 AND REF(P3,1)<=0),金融,'金融'),COLORRED;

DRAWTEXT((P2>=10 AND REF(P2,1)<=0),地产,'地产'),COLORMAGENTA;

DRAWTEXT((P1>=10 AND REF(P1,1)<=0),金属,'金属'),COLORLIRED;

DRAWTEXT((P3>=10 AND REF(P3,1)<=0),医药,'医药'),COLORWHITE;

DRAWTEXT((P2>=10 AND REF(P2,1)<=0),电子,'电子'),COLORCYAN;

DRAWTEXT((P1>=10 AND REF(P1,1)<=0),农林,'农林'),COLORGREEN;

DRAWTEXT((P3>=10 AND REF(P3,1)<=0),石化,'石化'),COLORYELLOW;

解答如下：

VAR1:=EMA(INDEXDATA("399190",&CLOSE),3);

VAR2:=EMA(INDEXDATA("399200",&CLOSE),3);

VAR3:=EMA(INDEXDATA("399137",&CLOSE),3);

VAR4:=EMA(INDEXDATA("399139",&CLOSE),3);

VAR5:=EMA(INDEXDATA("399136",&CLOSE),3);

VAR6:=EMA(INDEXDATA("399110",&CLOSE),3);

VAR7:=EMA(INDEXDATA("399135",&CLOSE),3);

金融:SUM((VAR1/REF(VAR1,1)-1)*100,0),colorred;

地产:SUM((VAR2/REF(VAR2,1)-1)*100,0),colormagenta;

金属:SUM((VAR3/REF(VAR3,1)-1)*100,0),COLORLIRED;

医药:SUM((VAR4/REF(VAR4,1)-1)*100,0),colorwhite;

电子:SUM((VAR5/REF(VAR5,1)-1)*100,0),colorcyan;

农林:SUM((VAR6/REF(VAR6,1)-1)*100,0),colorgreen;

石化:SUM((VAR7/REF(VAR7,1)-1)*100,0),coloryellow;

DRAWTEXT(CROSS(ISNULL(REFX(&CLOSE,3)),0.5),金融,'金融'),colorred;

DRAWTEXT(CROSS(ISNULL(REFX(&CLOSE,4)),0.5),地产,'地产'),colormagenta;

DRAWTEXT(CROSS(ISNULL(REFX(&CLOSE,5)),0.5),金属,'金属'),COLOR009fff;

DRAWTEXT(CROSS(ISNULL(REFX(&CLOSE,6)),0.5),医药,'医药'),colorwhite;

DRAWTEXT(CROSS(ISNULL(REFX(&CLOSE,7)),0.5),电子,'电子'),colorcyan;

DRAWTEXT(CROSS(ISNULL(REFX(&CLOSE,8)),0.5),农林,'农林'),colorgreen;

DRAWTEXT(CROSS(ISNULL(REFX(&CLOSE,9)),0.5),石化,'石化'),coloryellow;