強拋板塊

zflmxd 2011-02-06

展開全文

強拋板塊（飛狐）
VAR1:=("399139$CLOSE"); VAR2:=("399190$CLOSE"); VAR3:=("399132$CLOSE"); VAR4:=("399150$CLOSE");
VAR5:=("399138$CLOSE"); VAR6:=("399200$CLOSE"); VAR7:=("399110$CLOSE"); VAR8:=("399136$CLOSE");
VAR9:=("399135$CLOSE"); VAR10:=("399130$CLOSE"); VAR11:=("399160$CLOSE"); VAR12:=("999999$CLOSE");
VAR13:=("399137$CLOSE");
醫(yī)藥1:(VAR1-REF(VAR1,1))/REF(VAR1,1)*100;
金融1:(VAR2-REF(VAR2,1))/REF(VAR2,1)*100;
紡織1:(VAR3-REF(VAR3,1))/REF(VAR3,1)*100;
建筑1:(VAR4-REF(VAR4,1))/REF(VAR4,1)*100;
機械1:(VAR5-REF(VAR5,1))/REF(VAR5,1)*100;
地產(chǎn)1:(VAR6-REF(VAR6,1))/REF(VAR6,1)*100;
農(nóng)林1:(VAR7-REF(VAR7,1))/REF(VAR7,1)*100;
電子1:(VAR8-REF(VAR8,1))/REF(VAR8,1)*100;
石化1:(VAR9-REF(VAR9,1))/REF(VAR9,1)*100;
制造1:(VAR10-REF(VAR10,1))/REF(VAR10,1)*100;
運輸1:(VAR11-REF(VAR11,1))/REF(VAR11,1)*100;
上證1:(VAR12-REF(VAR12,1))/REF(VAR12,1)*100;
金屬1:(VAR13-REF(VAR13,1))/REF(VAR13,1)*100;
MAX1:=MAX(醫(yī)藥1,金融1);
MAX2:=MAX(紡織1,MAX1);
MAX3:=MAX(建筑1,MAX2);
MAX4:=MAX(機械1,MAX3);
MAX5:=MAX(地產(chǎn)1,MAX4);
MAX6:=MAX(農(nóng)林1,MAX5);
MAX7:=MAX(電子1,MAX6);
MAX8:=MAX(石化1,MAX7);
MAX9:=MAX(制造1,MAX8);
MAX10:=MAX(運輸1,MAX9);
MAX11:=MAX(金屬1,MAX10);
上證:上證1,COLORRED;
醫(yī)藥:PARTLINE(醫(yī)藥1>上證 AND 醫(yī)藥1>0,醫(yī)藥1);
金融:PARTLINE(金融1>上證 AND 金融1>0,金融1);
紡織:PARTLINE(紡織1>上證 AND 紡織1>0,紡織1);
建筑:PARTLINE(建筑1>上證 AND 建筑1>0,建筑1);
機械:PARTLINE(機械1>上證 AND 機械1>0,機械1);
地產(chǎn):PARTLINE(地產(chǎn)1>上證 AND 地產(chǎn)1>0,地產(chǎn)1);
農(nóng)林:PARTLINE(農(nóng)林1>上證 AND 農(nóng)林1>0,農(nóng)林1);
電子:PARTLINE(電子1>上證 AND 電子1>0,電子1);
石化:PARTLINE(石化1>上證 AND 石化1>0,石化1);
制造:PARTLINE(制造1>上證 AND 制造1>0,制造1);
運輸:PARTLINE(運輸1>上證 AND 運輸1>0,運輸1);
金屬:PARTLINE(金屬1>上證 AND 金屬1>0,金屬1);
STICKLINE(醫(yī)藥1=MAX11 AND 醫(yī)藥1>0,0,醫(yī)藥1,2,0),COLORYELLOW;
DRAWTEXT(醫(yī)藥1=MAX11 AND 醫(yī)藥1>0,0-2,'醫(yī)藥'),COLORYELLOW;
STICKLINE(金融1=MAX11 AND 金融1>0,0,金融1,2,0),COLORGREEN;
DRAWTEXT(金融1=MAX11 AND 金融1>0,0-2,'金融'),COLORGREEN;
STICKLINE(紡織1=MAX11 AND 紡織1>0,0,紡織1,2,0),COLORBLUE;
DRAWTEXT(紡織1=MAX11 AND 紡織1>0,0-2,'紡織'),COLORBLUE;
STICKLINE(機械1=MAX11 AND 機械1>0,0,機械1,2,0),COLORRED;
DRAWTEXT(機械1=MAX11 AND 機械1>0,0-2,'機械'),COLORRED;
STICKLINE(建筑1=MAX11 AND 建筑1>0,0,建筑1,2,0),COLORWHITE;
DRAWTEXT(建筑1=MAX11 AND 建筑1>0,0-2,'建筑'),COLORWHITE;
STICKLINE(地產(chǎn)1=MAX11 AND 地產(chǎn)1>0,0,地產(chǎn)1,2,0),COLORGREEN;
DRAWTEXT(地產(chǎn)1=MAX11 AND 地產(chǎn)1>0,0-2,'地產(chǎn)'),COLORGREEN;
STICKLINE(農(nóng)林1=MAX11 AND 農(nóng)林1>0,0,農(nóng)林1,2,0),COLORCYAN;
DRAWTEXT(農(nóng)林1=MAX11 AND 農(nóng)林1>0,0-2,'農(nóng)林'),COLORCYAN;
STICKLINE(電子1=MAX11 AND 電子1>0,0,電子1,2,0),COLORBROWN;
DRAWTEXT(電子1=MAX11 AND 電子1>0,0-2,'電子'),COLORBROWN;
STICKLINE(石化1=MAX11 AND 石化1>0,0,石化1,2,0),COLORMAGENTA;
DRAWTEXT(石化1=MAX11 AND 石化1>0,0-2,'石化'),COLORMAGENTA;
STICKLINE(制造1=MAX11 AND 制造1>0,0,制造1,2,0),COLORGRAY;
DRAWTEXT(制造1=MAX11 AND 制造1>0,0-2,'制造'),COLORGRAY;
STICKLINE(運輸1=MAX11 AND 運輸1>0,0,運輸1,2,0),COLORCYAN;
DRAWTEXT(運輸1=MAX11 AND 運輸1>0,0-2,'運輸'),COLORCYAN;
STICKLINE(金屬1=MAX11 AND 金屬1>0,0,金屬1,2,0),COLORBLUE;
DRAWTEXT(金屬1=MAX11 AND 金屬1>0,0-2,'金屬'),COLORBLUE;

通達信
VAR1:=("399139$C"); VAR2:=("399190$C"); VAR3:=("399132$C"); VAR4:=("399150$C");
VAR5:=("399138$C"); VAR6:=("399200$C"); VAR7:=("399110$C"); VAR8:=("399136$C");
VAR9:=("399135$C"); VAR10:=("399130$C"); VAR11:=("399160$C"); VAR12:=("999999$C");
VAR13:=("399137$C");
醫(yī)藥1:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*100;
金融1:=(VAR2-REF(VAR2,1))/REF(VAR2,1)*100;
紡織1:=(VAR3-REF(VAR3,1))/REF(VAR3,1)*100;
建筑1:=(VAR4-REF(VAR4,1))/REF(VAR4,1)*100;
機械1:=(VAR5-REF(VAR5,1))/REF(VAR5,1)*100;
地產(chǎn)1:=(VAR6-REF(VAR6,1))/REF(VAR6,1)*100;
農(nóng)林1:=(VAR7-REF(VAR7,1))/REF(VAR7,1)*100;
電子1:=(VAR8-REF(VAR8,1))/REF(VAR8,1)*100;
石化1:=(VAR9-REF(VAR9,1))/REF(VAR9,1)*100;
制造1:=(VAR10-REF(VAR10,1))/REF(VAR10,1)*100;
運輸1:=(VAR11-REF(VAR11,1))/REF(VAR11,1)*100;
上證1:=(VAR12-REF(VAR12,1))/REF(VAR12,1)*100;
金屬1:=(VAR13-REF(VAR13,1))/REF(VAR13,1)*100;
MAX1:=MAX(醫(yī)藥1,金融1);
MAX2:=MAX(紡織1,MAX1);
MAX3:=MAX(建筑1,MAX2);
MAX4:=MAX(機械1,MAX3);
MAX5:=MAX(地產(chǎn)1,MAX4);
MAX6:=MAX(農(nóng)林1,MAX5);
MAX7:=MAX(電子1,MAX6);
MAX8:=MAX(石化1,MAX7);
MAX9:=MAX(制造1,MAX8);
MAX10:=MAX(運輸1,MAX9);
MAX11:=MAX(金屬1,MAX10);
上證:上證1,COLORRED;
醫(yī)藥:IF(醫(yī)藥1>上證 AND 醫(yī)藥1>0,醫(yī)藥1,DRAWNULL);
金融:IF(金融1>上證 AND 金融1>0,金融1,DRAWNULL);
紡織:IF(紡織1>上證 AND 紡織1>0,紡織1,DRAWNULL);
建筑:IF(建筑1>上證 AND 建筑1>0,建筑1,DRAWNULL);
機械:IF(機械1>上證 AND 機械1>0,機械1,DRAWNULL);
地產(chǎn):IF(地產(chǎn)1>上證 AND 地產(chǎn)1>0,地產(chǎn)1,DRAWNULL);
農(nóng)林:IF(農(nóng)林1>上證 AND 農(nóng)林1>0,農(nóng)林1,DRAWNULL);
電子:IF(電子1>上證 AND 電子1>0,電子1,DRAWNULL);
石化:IF(石化1>上證 AND 石化1>0,石化1,DRAWNULL);
制造:IF(制造1>上證 AND 制造1>0,制造1,DRAWNULL);
運輸:IF(運輸1>上證 AND 運輸1>0,運輸1,DRAWNULL);
金屬:IF(金屬1>上證 AND 金屬1>0,金屬1,DRAWNULL);
STICKLINE(醫(yī)藥1=MAX11 AND 醫(yī)藥1>0,0,醫(yī)藥1,2,0),COLORYELLOW;
DRAWTEXT(醫(yī)藥1=MAX11 AND 醫(yī)藥1>0,0-2,'醫(yī)藥'),COLORYELLOW;
STICKLINE(金融1=MAX11 AND 金融1>0,0,金融1,2,0),COLORLIGREEN;
DRAWTEXT(金融1=MAX11 AND 金融1>0,0-2,'金融'),COLORLIGREEN;
STICKLINE(紡織1=MAX11 AND 紡織1>0,0,紡織1,2,0),COLORBLUE;
DRAWTEXT(紡織1=MAX11 AND 紡織1>0,0-2,'紡織'),COLORBLUE;
STICKLINE(機械1=MAX11 AND 機械1>0,0,機械1,2,0),COLORRED;
DRAWTEXT(機械1=MAX11 AND 機械1>0,0-2,'機械'),COLORRED;
STICKLINE(建筑1=MAX11 AND 建筑1>0,0,建筑1,2,0),COLORWHITE;
DRAWTEXT(建筑1=MAX11 AND 建筑1>0,0-2,'建筑'),COLORWHITE;
STICKLINE(地產(chǎn)1=MAX11 AND 地產(chǎn)1>0,0,地產(chǎn)1,2,0),COLORGREEN;
DRAWTEXT(地產(chǎn)1=MAX11 AND 地產(chǎn)1>0,0-2,'地產(chǎn)'),COLORGREEN;
STICKLINE(農(nóng)林1=MAX11 AND 農(nóng)林1>0,0,農(nóng)林1,2,0),COLORCYAN;
DRAWTEXT(農(nóng)林1=MAX11 AND 農(nóng)林1>0,0-2,'農(nóng)林'),COLORCYAN;
STICKLINE(電子1=MAX11 AND 電子1>0,0,電子1,2,0),COLORBROWN;
DRAWTEXT(電子1=MAX11 AND 電子1>0,0-2,'電子'),COLORBROWN;
STICKLINE(石化1=MAX11 AND 石化1>0,0,石化1,2,0),COLORMAGENTA;
DRAWTEXT(石化1=MAX11 AND 石化1>0,0-2,'石化'),COLORMAGENTA;
STICKLINE(制造1=MAX11 AND 制造1>0,0,制造1,2,0),COLORLIGRAY;
DRAWTEXT(制造1=MAX11 AND 制造1>0,0-2,'制造'),COLORLIGRAY;
STICKLINE(運輸1=MAX11 AND 運輸1>0,0,運輸1,2,0),COLORLICYAN;
DRAWTEXT(運輸1=MAX11 AND 運輸1>0,0-2,'運輸'),COLORLICYAN;
STICKLINE(金屬1=MAX11 AND 金屬1>0,0,金屬1,2,0),COLORLIBLUE;
DRAWTEXT(金屬1=MAX11 AND 金屬1>0,0-2,'金屬'),COLORLIBLUE;