九毛八公式指标
公式模块:
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;