股民大家庭

标题: 【趋势为先、资金为王】双向版 [打印本页]

作者: 好好学习 时间: 2008-4-13 15:23
标题: 【趋势为先、资金为王】双向版
趋势为先、资金为王，是在新浪的有关指标的启发下、诞生的。
这个指标表达的是一种中长期趋势、并非是指导买卖的指标。
在这个指标中、千钧把自己的“指标是参考、决策在人脑”的理念，贯穿始终。
希望朋友们在使用中，能充分发挥、并加以利用。
当然、发扬光大，是千钧梦寐以求的。
流通:FINANCE( 7)/10000,LINETHICK,PRECISION2;
市值:FINANCE( 7)*C/10000,LINETHICK,PRECISION2;
DT:=CURRENTDATE;
AA:=REF(DATE,BARSLAST(SYSPARAM(1)=BARPOS));
BB:=IF(AA=DT,1,0);
CC:=BB[SYSPARAM(3)];
if CC=1 then
DD:=ISLASTBAR;
else
DD:=BARPOS=ISLASTBAR;
qj:=DD;
机:=IF(qj,STKINDI('','机构.机构',0,0),EXTDATA(9));
券:=IF(qj,STKINDI('','券商.券商',0,0),EXTDATA(10));
大:=IF(qj,STKINDI('','大户.大户',0,0),EXTDATA(11));
中:=IF(qj,STKINDI('','中户.中户',0,0),EXTDATA(12));
散:=IF(qj,STKINDI('','散户.散户',0,0),EXTDATA(13));
沪:=IF(qj,STKINDI('','沪机构.机构',0,0),EXTDATA(6));
沪1:=IF(qj,STKINDI('','沪大户.大户',0,0),EXTDATA(7));
沪2:=IF(qj,STKINDI('','沪散户.散户',0,0),EXTDATA(8));
AA:=SUM(REF(机,1),90)+机;
AA1:=SUM(REF(沪,1),90)+沪;
BB:=SUM(REF(券,1),90)+券;
BB1:=SUM(REF(沪1,1),90)+沪1;
CC:=SUM(REF(大,1),90)+大;
A:=IF(C>1000,REF(AA1+BB1,1)+AA1,(AA+BB));
AA2:=IF(C>1000,AA1+BB1,AA);
DD:=SUM(REF(中,1),90)+中;
FF:=SUM(REF(散,1),90)+散;
FF1:=SUM(REF(沪2,1),90)+沪2;
FF2:=IF(C>1000,FF1,FF+DD);
CC2:=IF(C>1000,(FF1+BB1)/2,CC);
B:=IF(C>1000,REF(FF1,1)+FF1,(DD+FF));
机构:IF(C>1000,AA1/SUM(VOL,90),AA/FINANCE( 7)),COLOR00FFFF,PRECISION2,LINETHICK;
券商:BB/FINANCE( 7),ColorFE00EF,PRECISION2,LINETHICK;
大户:IF(C>1000,BB1/SUM(VOL,90),CC/FINANCE( 7)),Color0000FF,PRECISION2,LINETHICK;
中户D/FINANCE( 7),COLORGREEN,PRECISION2,LINETHICK;
散户:IF(C>1000,FF1/SUM(VOL,90),FF/FINANCE( 7)),COLORFFFF00,PRECISION2,LINETHICK;
P:=SYSPARAM(1);
{画柱线}
STICKLINE(FF2>=0,0,FF2,1,0),COLORFF4400;
STICKLINE(FF2>0,0,FF2,0,0),COLORFF00FF;
STICKLINE(FF2>0,0,FF2,8,0),COLORFF4400;
STICKLINE(FF2>0,0,FF2,7,0),COLORFF6600;
STICKLINE(FF2>0,0,FF2,6,0),COLORFF7700;
STICKLINE(FF2>0,0,FF2,5,0),COLORFF8800;
STICKLINE(FF2>0,0,FF2,4,0),COLORFF9900;
STICKLINE(FF2>0,0,FF2,3,0),COLORFFAA00;
STICKLINE(FF2>0,0,FF2,2,0),COLORFFBB00;
STICKLINE(FF2>0,0,FF2,1,0),COLORFFCC00;
STICKLINE(FF2<0,0,FF2,8,0),COLORFF4400;
STICKLINE(FF2<0,0,FF2,7,0),COLORFF6600;
STICKLINE(FF2<0,0,FF2,6,0),COLORFF7700;
STICKLINE(FF2<0,0,FF2,5,0),COLORFF8800;
STICKLINE(FF2<0,0,FF2,4,0),COLORFF9900;
STICKLINE(FF2<0,0,FF2,3,0),COLORFFAA00;
STICKLINE(FF2<0,0,FF2,2,0),COLORFFBB00;
STICKLINE(FF2<0,0,FF2,1,0),COLORFFCC00;
STICKLINE(BB>=0,0,BB,8,0),ColorA9009A;
STICKLINE(BB>0,0,BB,7,0),ColorA8008A;
STICKLINE(BB>0,0,BB,5,0),Color4A007A;
STICKLINE(BB>0,0,BB,3,0),ColorB00AA9;
STICKLINE(BB>0,0,BB,1,0),ColorDE00D6;
STICKLINE(BB<0,0,BB,8,0),ColorA9009A;
STICKLINE(BB<0,0,BB,7,0),ColorA8008A;
STICKLINE(BB<0,0,BB,5,0),Color4A007A;
STICKLINE(BB<0,0,BB,3.1,0),ColorB00AA9;
STICKLINE(BB<0,0,BB,1,0),ColorDE00D6;
STICKLINE(AA2>=0,0,AA2,1,0),COLOR00FFFF;
STICKLINE(AA2>0,0,AA2,0,0),COLOR33FFDD;
STICKLINE(AA2>0,0,AA2,8,0),COLOR3380FF;
STICKLINE(AA2>0,0,AA2,7,0),COLOR339FDD;
STICKLINE(AA2>0,0,AA2,6,0),COLOR33AFDD;
STICKLINE(AA2>0,0,AA2,5,0),COLOR33BFDD;
STICKLINE(AA2>0,0,AA2,4,0),COLOR33CFDD;
STICKLINE(AA2>0,0,AA2,3,0),COLOR33DFDD;
STICKLINE(AA2>0,0,AA2,2,0),COLOR33EFDD;
STICKLINE(AA2>0,0,AA2,1,0),COLOR33DDFF;
STICKLINE(AA2<0,0,AA2,8,0),COLOR3380FF;
STICKLINE(AA2<0,0,AA2,7,0),COLOR339FDD;
STICKLINE(AA2<0,0,AA2,6,0),COLOR33AFDD;
STICKLINE(AA2<0,0,AA2,5,0),COLOR33BFDD;
STICKLINE(AA2<0,0,AA2,4,0),COLOR33CFDD;
STICKLINE(AA2<0,0,AA2,3,0),COLOR33DFDD;
STICKLINE(AA2<0,0,AA2,2,0),COLOR33EFDD;
STICKLINE(AA2<0,0,AA2,1,0),COLOR33DDFF;
STICKLINE(DD>=0,0,DD,8,0),COLOR006600;
STICKLINE(DD>0,0,DD,0,0),COLOR006600;
STICKLINE(DD>0,0,DD,5.5,0),COLOR009900;
STICKLINE(DD>0,0,DD,3.1,0),COLOR00CC00;
STICKLINE(DD>0,0,DD,1,0),COLORGREEN;
STICKLINE(DD<0,0,DD,8,0),COLOR006600;
STICKLINE(DD<0,0,DD,5.5,0),COLOR009900;
STICKLINE(DD<0,0,DD,3.1,0),COLOR00CC00;
STICKLINE(DD<0,0,DD,1,0),COLORGREEN;
STICKLINE(CC2>=0,0,CC2,8,0),COLOR0000FF;
STICKLINE(CC2>0,0,CC2,5.5,0),COLOR0000EE;
STICKLINE(CC2>0,0,CC2,3.1,0),COLOR0000DD;
STICKLINE(CC2>0,0,CC2,1,0),COLOR0099FF;
STICKLINE(CC2<0,0,CC2,8,0),COLOR0000FF;
STICKLINE(CC2<0,0,CC2,5.5,0),COLOR0000EE;
STICKLINE(CC2<0,0,CC2,3.1,0),COLOR0000DD;
STICKLINE(CC2<0,0,CC2,1,0),COLOR0099FF;
0,Color7D7B7F,LINETHICK2;
DRAWTEXTEX(C,1,0,0,STKLABEL+' '+STKNAME+''),Color00FF00;
DRAWTEXTEX(c,1,240,0,'同比主力增减:'+NUMTOSTR(IF(C>1000,a[P]/SUM(vol,120),a[P]/FINANCE(7)),2)+' %'),Color00FF00;
DRAWTEXTEX(c,1,480,0,'同比大户增减:'+NUMTOSTR(IF(C>1000,BB1[P]/SUM(vol,120),CC[P]/FINANCE(7)),2)+' %'),Color00FF00;
DRAWTEXTEX(c,1,740,0,'同比散户增减:'+NUMTOSTR(IF(C>1000,b[P]/SUM(vol,120),b[P]/FINANCE(7)),2)+' %'),Color00FF00;

欢迎光临股民大家庭 (https://gupiao168.com/)