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);
VAR8:=MEMA(("999999$C"),3);
VAR9:=MEMA(("
399329$C"),3);
VAR10:=MEMA(("
399131$C"),3);
VAR11:=MEMA(("
399140$C"),3);
VAR12:=MEMA(("
000005$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,LINETHICK2;
医药: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;
上证:SUM((VAR8/REF(VAR8,1)-1)*100,0),COLORYELLOW,POINTDOT,LINETHICK4;
中小板:SUM((VAR9/REF(VAR9,1)-1)*100,0),COLORBLUE,LINETHICK2;
食品:SUM((VAR10/REF(VAR10,1)-1)*100,0),COLORYELLOW;
水电:SUM((VAR11/REF(VAR11,1)-1)*100,0),COLORMAGENTA,LINETHICK2;
商业:SUM((VAR12/REF(VAR12,1)-1)*100,0),COLORGRAY;
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),上证,'上证'),COLORYELLOW;
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; };
DRAWTEXT((P2>=10 AND
REF(P2,1)<=0),中小板,'中小板'),COLORBLUE,LINETHICK2;
DRAWTEXT((P3>=10 AND
REF(P3,1)<=0),食品,'食品'),COLORYELLOW;
DRAWTEXT((P2>=10 AND
REF(P2,1)<=0),水电,'水电'),COLORMAGENTA,LINETHICK2;
DRAWTEXT((P1>=10 AND
REF(P1,1)<=0),商业,'商业'),COLORGRAY;
