软件名称:[B]当日强势板块(通达信版本)[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/
软件语言:简体中文
授权方式:解密版
软件大小:5.00 KB
官方主页:Home Page
更新时间:2009-07-15 22:38:23
软件简介:
强抛板块(飞狐)
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");
医药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;
地产1:(VAR6-REF(VAR6,1))/REF(VAR6,1)*100;
农林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(医药1,金融1);
MAX2:=MAX(纺织1,MAX1);
MAX3:=MAX(建筑1,MAX2);
MAX4:=MAX(机械1,MAX3);
MAX5:=MAX(地产1,MAX4);
MAX6:=MAX(农林1,MAX5);
MAX7:=MAX(电子1,MAX6);
MAX8:=MAX(石化1,MAX7);
MAX9:=MAX(制造1,MAX8);
MAX10:=MAX(运输1,MAX9);
MAX11:=MAX(金属1,MAX10);
上证:上证1,COLORRED;
医药: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);
地产: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);
运输:PARTLINE(运输1>上证 AND 运输1>0,运输1);
金属:PARTLINE(金属1>上证 AND 金属1>0,金属1);
STICKLINE(医药1=MAX11 AND 医药1>0,0,医药1,2,0),COLORYELLOW;
DRAWTEXT(医药1=MAX11 AND 医药1>0,0-2,'医药'),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(地产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),COLORCYAN;
DRAWTEXT(农林1=MAX11 AND 农林1>0,0-2,'农林'),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");
医药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;
地产1:=(VAR6-REF(VAR6,1))/REF(VAR6,1)*100;
农林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(医药1,金融1);
MAX2:=MAX(纺织1,MAX1);
MAX3:=MAX(建筑1,MAX2);
MAX4:=MAX(机械1,MAX3);
MAX5:=MAX(地产1,MAX4);
MAX6:=MAX(农林1,MAX5);
MAX7:=MAX(电子1,MAX6);
MAX8:=MAX(石化1,MAX7);
MAX9:=MAX(制造1,MAX8);
MAX10:=MAX(运输1,MAX9);
MAX11:=MAX(金属1,MAX10);
上证:上证1,COLORRED;
医药: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);
地产: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);
运输:IF(运输1>上证 AND 运输1>0,运输1,DRAWNULL);
金属:IF(金属1>上证 AND 金属1>0,金属1,DRAWNULL);
STICKLINE(医药1=MAX11 AND 医药1>0,0,医药1,2,0),COLORYELLOW;
DRAWTEXT(医药1=MAX11 AND 医药1>0,0-2,'医药'),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(地产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),COLORCYAN;
DRAWTEXT(农林1=MAX11 AND 农林1>0,0-2,'农林'),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;
[url=http://www.70822.com/soft/sort013/sort05/down-10848.html]当日强势板块(通达信版本)[/url]