tzwxlj1 2007-12-1 13:55
系列DDX
DDX除散
说明:本公式系建立在一发千钧老师扩展数据的基础上,故需老师的扩展数据公式支持.系
[[i] 本帖最后由 tzwxlj1 于 2007-12-2 09:07 编辑 [/i]]
tzwxlj1 2007-12-1 13:55
简明, 趋势一看就明了.:plain:
tzwxlj1 2007-12-1 15:05
DDX散户
DDX散户
tzwxlj1 2007-12-1 19:34
二合图效果
二合图
tzwxlj1 2007-12-1 19:35
DDX总A
DDX总A
tzwxlj1 2007-12-1 19:40
【飞狐交易师】财务除权数据下载-【更新至2007年12月07日】
[[i] 本帖最后由 tzwxlj1 于 2007-12-2 09:15 编辑 [/i]]
tzwxlj1 2007-12-2 09:09
三合图效果
tzwxlj1 2007-12-2 09:14
找一下我的公式专集中有.12月1日刚做.
[url]http://bbs.fjfox.com/thread-42415-1-1.html[/url]
tzwxlj1 2007-12-2 09:24
DDX机
tzwxlj1 2007-12-2 09:25
DDX机券(主力)
tzwxlj1 2007-12-2 09:26
DDX机券大(主流)
tzwxlj1 2007-12-2 09:27
DDX券
tzwxlj1 2007-12-2 09:56
●阻击精灵●修改
tzwxlj1 2007-12-2 10:06
最新扩展数据见创幻论坛(创幻--【赢富-指标】第一版!即千钧仿-【赢富-指标】第六版!)
[url]http://www.chcj.net/thread-919473-1-1.html[/url]
tzwxlj1 2007-12-2 12:51
到这看下有装的过程。。。
[url]http://www.chcj.net/thread-903034-1-1.html[/url]
chenjiaq 2007-12-2 14:59
谢谢提供分享
tzwxlj1 2007-12-3 08:52
证券K线** B指*
证券K线** B指*
观察大盘有一定的帮助, 起风向标的作用.
引用公式KXSJ
tzwxlj1 2007-12-4 10:55
●阻击精灵●修改
{●短线精灵●}
EXPLAINICON((C>0),'zwbsdnjp')ALIGN1;
EXPLAINICON((C>0),'sfcb')ALIGN1;
EXPLAINICON((C>0),'dpjsbj')ALIGN1;
qqq:=(indexh+indexl)/2;
dd:=FFT(qqq,26);{*}
ddd:=FFT((h+l)/2,26);{*}
explain(dd>=ref(dd,1),'解盘:大盘多头攻击,获利机会出现,寻机买进!'),colorred;
explain(dd<=ref(dd,1),'解盘:大盘空头攻击,无明显操作机会,坚决出局!'),colorgreen;
VK:=VOL/CAPITAL*100;
STICKLINE(C>=O,H,L,0,0),COLOR00FF00FF;
STICKLINE(C>=O,C,O,VK+3,1),COLOR00FF00FF;
STICKLINE(C< O,H,L,0,1),COLORGREEN;
STICKLINE(C< O,C,O,VK+3,0),COLORGREEN;
PARTLINE(ddd>REF(ddd,1),ddd),colorred,linethick1;
PARTLINE(ddd<REF(ddd,1),ddd),color00ffff60,linethick1;
bj:=c/INDEXC*1000;
qs:=bj>ref(bj,1);
rs:=bj<=ref(bj,1);
EXPLAIN(qs,'解盘:个股走势:强于大盘'),colorred;
EXPLAIN(rs,'解盘:个股走势:弱于大盘'),colorgreen;
EXPLAINICON((C>O),'ggjszt')ALIGN1;
日K:="KDJ.K#DAY"(20,5,5);
日D:="KDJ.D#DAY"(20,5,5);
周K:="KDJ.K#WEEK"(9,3,3);
周D:="KDJ.D#WEEK"(9,3,3);
EXPLAINEX((日K>0),'解盘:日K=',日K,2,0),colorblue;
EXPLAIN((日K<=20),'解盘:日线KD指标位置: 低位'),colorred;
EXPLAIN((日K>20 AND 日K<50),'解盘: 日线KD指标位置: 中低'),colorred;
EXPLAIN((日K>50 AND 日K<80),'解盘: 日线KD指标位置: 中高'),colorgreen;
EXPLAIN((日K>=80),'解盘: 日线KD指标位置: 高位'),colorgreen;
EXPLAINEX((周K>0),'解盘: 周K=',周K,2,0),colorred;
EXPLAIN((周K<=20),'解盘: 周线KD指标位置: 低位'),colorred;
EXPLAIN((周K>20 AND 周K<50),'解盘: 周线KD指标位置: 中低'),colorred;
EXPLAIN((周K>50 AND 周K<80),'解盘: 周线KD指标位置: 中高'),colorgreen;
EXPLAIN((周K>=80),'解盘:周线KD指标位置: 高位');
EXPLAIN((CROSS(日K,日D)),'解盘: 日K与日D今曰金叉'),colorred;
EXPLAIN((CROSS(日D,日K)),'解盘: 日K与日D今曰死叉'),colorgreen;
EXPLAIN((CROSS(周K,周D)),'解盘: 周K与周D今曰金叉'),colorred;
EXPLAIN((CROSS(周D,周K)),'解盘: 周K与周D今曰死叉'),colorgreen;
EXPLAINICON((C>O),'szczzy')ALIGN1;
R:=REF(C,1)/C;
QY:=VOL;
QTT:=QY*R;
tl:=filter(v=hhv(v,20),20);
dl:=filter(v=llv(v,20),20);
xd:=filter(l=llv(l,20),20);
xg:=filter(h=hhv(h,20),20);
AQ标准攻击量:=QTT*1.15;
HQ危险成交量:=QTT*1.5;
LQ防守量:=QTT*0.75;
AHQ平均高量:=(AQ标准攻击量+HQ危险成交量)/2;
ALQ平均低量:=(AQ标准攻击量+LQ防守量)/2;
市场实际量能:=QY,colorff00ff;
EXPLAINEX(HQ危险成交量, '解盘: 次日攻击危险量=',HQ危险成交量,0,0),colorred;
EXPLAINEX(AQ标准攻击量, '解盘: 次日攻击标准量=',AQ标准攻击量,0,0),colorblue;
EXPLAINEX(LQ防守量, '解盘: 次日攻击防守量=',LQ防守量,0,0),colorgreen;
EXPLAINEX(tl, '解盘: 今日为20日最大量=',v,0,0),colorred;
EXPLAINEX(dl, '解盘: 今日为20日最小量=',v,0,0),colorgreen;
EXPLAINEX(xd, '解盘: 今日为20日最低价格=',l,2,0),colorgreen;
EXPLAINEX(xg, '解盘: 今日为20日最高价格=',l,2,0),colorred;
PT:=REF(H,1)-REF(L,1);
CDP:=(H+L+2*C)/4;
AH:=CDP+PT;
AL:=CDP-PT;
NH敏感阻力:=2*CDP-L;
NL:=2*CDP-H;
EXPLAINEX(AH, '解盘: 次日重大阻力价位=',AH,2,0),colorgreen;
EXPLAINEX(NH敏感阻力, '解盘: 次日敏感阻力区域=',NH敏感阻力,2,0),colorYELLOW;
EXPLAINEX(CDP, '解盘: 次日关键均衡价位=',CDP,2,0),colorwhite;
EXPLAINEX(NL, '解盘: 次日重要支撑区域=',NL,2,0),colorblue;
EXPLAINEX(AL, '解盘: 次日关键支撑价位=',AL,2,0),colorred;
EXPLAINICON((C>O),'szczxh')ALIGN1;
var0:=ref(c,1)-ref(o,1);
var1:=ref(o,1);
var2:=c>=var1*1.05;
var3:=c>=2*var0/3+var1 and c<=var1*1.05;
var4:=c<var0*2/3+var1;
explainex(var2,'解盘: 个股目前态势: 超级强势. 涨幅%f%',(c-ref(c,1))/ref(c,1)*100,1,0),color00ff00ff;
explainex(var3,'解盘: 个股目前态势: 强势. 涨幅%f%',(c-ref(c,1))/ref(c,1)*100,1,0),colorred;
explainex(var4,'解盘: 个股目前态势: 弱势. 涨幅%f%',(c-ref(c,1))/ref(c,1)*100,1,0),colorgreen;
B1:=(C-MA(C,30))/MA(C,30)*100<-12;
B3:=(C-MA(C,30))/MA(C,30)*100>15;
B:=(C-MA(C,30))/MA(C,30)*100;
EXPLAINEX(b<-18 and c/o>1.06,'解盘:抢反弹!负乖离偏大,小单进场.此刻30日乖离率=',B,2,1),colorred;
EXPLAINEX(b>40 and c/ref(c,1)<1.08,'解盘:高抛!正乖离偏大,按照短线技术系统高抛:',B,2,0),colorgreen;
EXPLAINEX(not(b<-18 and c/o>1.06) or not(b>40 and c/ref(c,1)<1.08),'解盘:此刻30日乖离率=',B,2,0),coloryellow;
{●致命阻击●}
input:m(88,1,200),n(6,1,200);
V1:=EMA(AMOUNT/VOL/100,3);
控盘成本:EMA(V1,M);
低吸伏击:EMA(V1,M)*0.85,color00ffff00,linethick2;
走势铁底:低吸伏击*0.87,color00ff00ff,linethick3;
V2:=L<=走势铁底 AND C>REF(C,1)*1.02;
控盘成本,linethick2,color000000ff;
partline(控盘成本<ref(控盘成本,1),控盘成本),colorgreen,linethick2;
DRAWICON(FILTER(V2,N),L,1);
F:=100*(C-REF(C,1))/REF(C,1);
{涨跌幅}
今小昨:=IF(C<REF(O,1) AND f<0,1,0);
p1:=今小昨;
今小前:=IF(C<REF(O,2) AND f<0,1,0);
p2:=今小前;
stickline(P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1,open,CLOSE,4,0),{colormagenta}color00bbff;{K线为紫阳线!}
stickline(P1=1 AND REF(P1,1)=0 AND P2=1 AND REF(P2,1)=0,open,CLOSE,3,0),colorAAAAAA;
买入参考0:=P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1;
买入参考:=REF(ddd,3)>REF(ddd,2) AND REF(ddd,2)>REF(ddd,1) AND REF(ddd,1)<ddd;;
drawicon(买入参考,ddd*0.98,6);
买出参考:=REF(ddd,3)<REF(ddd,2) AND REF(ddd,2)<REF(ddd,1) AND REF(ddd,1)>ddd;;
drawicon(买出参考,ddd*0.98,7);
DRAWTEXT(sysparam(2)=BARPOS,c,
'收益:'+ NUMTOSTR(FINANCE(33),2)+'\n'
+'净资:'+NUMTOSTR(FINANCE(34),2 )+'\n'
+'流通:'+ NUMTOSTR(FINANCE(7)/10000,2)+'亿'+'\n'
+'流通:'+NUMTOSTR(FINANCE(7)/FINANCE(1)*100 ,0)+' %'+'\n'
+'权益:'+NUMTOSTR(FINANCE(36),0 )+' %'+'\n'
+'主营:'+NUMTOSTR(FINANCE(53),0 )+' %'+'\n'
+'利润:'+NUMTOSTR(FINANCE(54),0 )+' %'+'\n'
+'主营:'+NUMTOSTR(FINANCE(20)/10000,1 )+'亿'+'\n'),COLORccffcc,ALIGN4;
//
tzwxlj1 2007-12-4 11:08
最新扩展数据见创幻论坛(创幻--【赢富-指标】第一版!即千钧仿-【赢富-指标】第六版!)
http://www./thread-919473-1-1.html
tzwxlj1 2007-12-4 18:00
DDX散户A
tzwxlj1 2007-12-4 18:01
DDX主流A
tzwxlj1 2007-12-4 18:02
DDX主流AB 二合一
tzwxlj1 2007-12-4 23:02
主力持筹第二版
tzwxlj1 2007-12-5 10:23
DDX主流AB 二合一
直接导入飞狐4.9, 飞狐其它版本自己试一试可否使用. 需一发千钧的扩展数据公式和扩展数椐支持.
用法:
底部青柱缩短或青色线变橙色是买入时机
[[i] 本帖最后由 tzwxlj1 于 2007-12-5 10:24 编辑 [/i]]
tzwxlj1 2007-12-6 14:36
N天仓量增减第三版
tzwxlj1 2007-12-6 21:31
仓量饱和
tzwxlj1 2007-12-10 12:39
新扩展数据去创幻论坛下载:
http://www./thread-925774-1-1.html
tzwxlj1 2007-12-10 14:05
千均赢富指标语音安装视频教程!
[url]http://www.chcj.net/viewthread.php?tid=925774&extra=page%3D1&page=32[/url]
tzwxlj1 2007-12-10 18:53
主力持筹第三版
主力持筹第三版
tzwxlj1 2007-12-11 14:15
主力持筹第四版
tzwxlj1 2007-12-11 14:15
主力持筹第四版
用法:
1.黄色彩带收敛,向0轴靠拢就可关注.
2.同时K线至少走平.
3.量由收敛到逐步放量.
[[i] 本帖最后由 tzwxlj1 于 2007-12-11 14:17 编辑 [/i]]
tzwxlj1 2007-12-13 14:02
主力持筹第三版原码公布
{主力持筹第三版}
variable:wday[7]='星期六';
wday[1]:='星期日';
wday[2]:='星期一';
wday[3]:='星期二';
wday[4]:='星期三';
wday[5]:='星期四';
wday[6]:='星期五';
fy:=YEAR;
fm:=MONTH;
fd:=DAY;
wd:=WEEKDAY;
p:=SYSPARAM(1);
str1:=' '+' 今日: '+NUMTOSTR(fy[p],0)+'年'+NUMTOSTR(fm[p],0)+'月'+NUMTOSTR(fd[p],0)+'日 '+wday[wd[p]+1];
DRAWTEXT(barpos=p,H,str1),PXDN43,ALIGN4,COLORFFEEAA;
str1:='╭☆╯大均习作╰☆╮';
DRAWTEXT(barpos=p,H,str1),PXDN43,ALIGN4,COLOR0088FF;
DRAWTEXT(barpos=p,H,str1),PXDN41,ALIGN4,COLOR0088FF;
大买:=EXTDATA(1),PRECISION;
大卖:=EXTDATA(2),PRECISION;
当天增减:(大买-大卖),LINETHICK0,PRECISION2,COLOR0000ff;
主力仓量:sum(大买-大卖,0),LINEDOT,PRECISION2,COLORffff00;
总:=大买;
三天前仓:=ref(主力仓量,3);
五天前仓:=ref(主力仓量,5);
十天前仓:=ref(主力仓量,10);
三天增减:=主力仓量-三天前仓,PRECISION2;
五天增减:=主力仓量-五天前仓,PRECISION2;
十天增减:=主力仓量-十天前仓,PRECISION2;
AA0:=当天增减/CAPITAL*100,PRECISION2;
AA3:=三天增减/CAPITAL*100,PRECISION2;
AA5:=五天增减/CAPITAL*100,PRECISION2;
AA10:=十天增减/CAPITAL*100,PRECISION2;
FILLRGN(五天增减>0,五天增减,0),ColorFF00DD;
FILLRGN(五天增减<0,五天增减,0),Color00DDDD;
STICKLINE(当天增减>0,当天增减,0,6,0),COLOR0000ff;
STICKLINE(当天增减<0,当天增减,0,6,0),color00ff00;
ma30:=MA(主力仓量,30);
ma50:=MA(主力仓量,50);
主力增减:当天增减/FINANCE(7),PRECISION2;
PARTLINE(ma50<ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),ma50),color0000ff,CIRCLEDOT;
PARTLINE(ma50<ma30 and (ma50<ref(ma50,1) or ma30<ref(ma30,1)),ma50),color00ffff,CIRCLEDOT;
PARTLINE(ma50>ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),ma50),colorff00ff,CIRCLEDOT;
PARTLINE(ma50>ma30 and (ma50<ref(ma50,1) or ma30<ref(ma30,1)),ma50),colorff0000;
仓量斜率三:ma(主力仓量-ref(主力仓量,1),3)/FINANCE(7),linethick0;
仓量斜率五:ma(主力仓量-ref(主力仓量,1),5)/FINANCE(7),linethick0;
仓量斜率十:ma(主力仓量-ref(主力仓量,1),10)/FINANCE(7),linethick0;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'★代码:'+STKLABEL+' ★名称:'+STKNAME+' ★流通盘:'+NUMTOSTR(FINANCE(1)/10000,4)+'(亿股)'),PXDN8,align4,COLORFFDD00;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],' \n \n \n★当天增减比率:'+NUMTOSTR(AA0[p],2)),PXDN6,align4,COLORRED;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],' \n \n \n \n●三天增减比率:'+NUMTOSTR(AA3[p],2)),PXDN12,align4,COLORYELLOW;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],' \n \n \n \n \n◆五天增减比率:'+NUMTOSTR(AA5[p],2)),PXDN18,align4,COLORFFAA00;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],' \n \n \n \n \n \n▼十天增减比率:'+NUMTOSTR(AA10[p],2)),PXDN24,align4,COLOR00FF00;
//
tzwxlj1 2007-12-23 14:22
主力持筹第四版原码公布
{主力持筹第四版}
variable:wday[7]='星期六';
wday[1]:='星期日';
wday[2]:='星期一';
wday[3]:='星期二';
wday[4]:='星期三';
wday[5]:='星期四';
wday[6]:='星期五';
fy:=YEAR;
fm:=MONTH;
fd:=DAY;
wd:=WEEKDAY;
p:=SYSPARAM(1);
str1:=' 今日: '+NUMTOSTR(fy[p],0)+'年'+NUMTOSTR(fm[p],0)+'月'+NUMTOSTR(fd[p],0)+'日 '+wday[wd[p]+1];
DRAWTEXT(barpos=p,H,str1),PXUP10,ALIGN5,COLORFFEEAA;
str1:='╭☆╯大均习作╰☆╮';
DRAWTEXT(barpos=p,H,str1),PXDN43,ALIGN4,COLOR0088FF;
DRAWTEXT(barpos=p,H,str1),PXDN41,ALIGN4,COLOR0088FF;
净买:=EXTDATA(9)+EXTDATA(10)+EXTDATA(11)/2,PRECISION2;
当天增减:=净买,LINETHICK0,PRECISION2,COLOR0000ff;
主力增减:=当天增减/FINANCE(7),PRECISION2;
主力仓量:=sum(净买,0),LINEDOT,LINETHICK0,PRECISION2,COLORffff00;
总:=净买;
三天前仓:=ref(主力仓量,3);
五天前仓:=ref(主力仓量,5);
十天前仓:=ref(主力仓量,10);
三天增减:=主力仓量-三天前仓,PRECISION2;
五天增减:=主力仓量-五天前仓,PRECISION2;
十天增减:=主力仓量-十天前仓,PRECISION2;
AA0:=当天增减/CAPITAL*100,PRECISION2;
AA3:=三天增减/CAPITAL*100,PRECISION2;
AA5:=五天增减/CAPITAL*100,PRECISION2;
AA10:=十天增减/CAPITAL*100,PRECISION2;
FILLRGN(五天增减>0,五天增减,0),ColorFF00DD;
FILLRGN(五天增减<0,五天增减,0),Color00DDDD;
STICKLINE(当天增减>0,当天增减,0,6,0),COLOR0000ff;
STICKLINE(当天增减<0,当天增减,0,6,0),color00ff00;
ma30:=MA(主力仓量,30);
ma50:=MA(主力仓量,50);
主力增减:当天增减/FINANCE(7),PRECISION2;
仓量斜率三:ma(主力仓量-ref(主力仓量,1),3)/FINANCE(7),linethick0;
仓量斜率五:ma(主力仓量-ref(主力仓量,1),5)/FINANCE(7),linethick0;
仓量斜率十:ma(主力仓量-ref(主力仓量,1),10)/FINANCE(7),linethick0;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'★代码:'+STKLABEL+' ★名称:'+STKNAME+' ★流通盘:'+NUMTOSTR(FINANCE(1)/10000,4)+'(亿股)'),PXDN8,align4,COLORFFDD00;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],' \n \n \n★当天增减比率:'+NUMTOSTR(AA0[p],2)),PXDN6,align4,COLORRED;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],' \n \n \n \n●三天增减比率:'+NUMTOSTR(AA3[p],2)),PXDN12,align4,COLORYELLOW;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],' \n \n \n \n \n◆五天增减比率:'+NUMTOSTR(AA5[p],2)),PXDN18,align4,COLORFFAA00;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],' \n \n \n \n \n \n▼十天增减比率:'+NUMTOSTR(AA10[p],2)),PXDN24,align4,COLOR00FF00;
{柱线}
STICKLINE(BARPOS=DATACOUNT-66,0,三天增减[p],18,0),COLOR009900;
STICKLINE(BARPOS=DATACOUNT-66,0,三天增减[p],15,0),COLOR00AA00;
STICKLINE(BARPOS=DATACOUNT-66,0,三天增减[p],10,0),COLOR00BB00;
STICKLINE(BARPOS=DATACOUNT-66,0,三天增减[p], 8,0),COLOR00CC00;
STICKLINE(BARPOS=DATACOUNT-66,0,三天增减[p], 5,0),COLOR00DD00;
STICKLINE(BARPOS=DATACOUNT-66,0,三天增减[p], 2,0),COLORGREEN;
STICKLINE(BARPOS=DATACOUNT-63,1,五天增减[p],18,0),COLOR000099;
STICKLINE(BARPOS=DATACOUNT-63,1,五天增减[p],15,0),COLOR0000AA;
STICKLINE(BARPOS=DATACOUNT-63,1,五天增减[p],10,0),COLOR0000BB;
STICKLINE(BARPOS=DATACOUNT-63,1,五天增减[p], 8,0),COLOR0000CC;
STICKLINE(BARPOS=DATACOUNT-63,1,五天增减[p], 5,0),COLOR0000DD;
STICKLINE(BARPOS=DATACOUNT-63,1,五天增减[p], 2,0),COLORRED;
STICKLINE(BARPOS=DATACOUNT-60,0,十天增减[p],18,0),COLOR0099FF;
STICKLINE(BARPOS=DATACOUNT-60,0,十天增减[p],15,0),COLOR00AAFF;
STICKLINE(BARPOS=DATACOUNT-60,0,十天增减[p],10,0),COLOR00BBFF;
STICKLINE(BARPOS=DATACOUNT-60,0,十天增减[p], 8,0),COLOR00CCFF;
STICKLINE(BARPOS=DATACOUNT-60,0,十天增减[p], 5,0),COLOR00DDFF;
STICKLINE(BARPOS=DATACOUNT-60,0,十天增减[p], 2,0),Coloryellow;
DRAWTEXT(BARPOS=DATACOUNT-67 ,三天增减[p],'三\n天\n增\n减'),PXUP82,align5,COLORRED;
DRAWTEXT(BARPOS=DATACOUNT-64 ,五天增减[p],'五\n天\n增\n减'),PXUP82,align5,ColorFFFFFF;
DRAWTEXT(BARPOS=DATACOUNT-61 ,十天增减[p],'十\n天\n增\n减'),PXUP82,align5,Color00FF00;
//
tzwxlj1 2007-12-23 14:23
主力持筹第四版A用千钧扩展公式
tzwxlj1 2007-12-25 11:41
扩展数据序号1-6的数据
[url]http://bbs.fjfox.com/thread-42673-1-1.ht[/url]
tzwxlj1 2008-1-3 10:42
主力持筹第五版A用千钧扩展 原码公布
主力持筹第五版A用千钧扩展
DRAWGBK(C>0, COLORRGB(0,30,100),COLORRGB(50,80,30),1);
{主力持筹}
换手率:v/FINANCE(7),PRECISION2;
净买:=EXTDATA(9)+EXTDATA(10)+EXTDATA(11)/2,PRECISION2;
当天增减:=净买,LINETHICK0,PRECISION2,COLOR0000ff;
主力增减:=当天增减/FINANCE(7),PRECISION2;
主力仓量:=sum(净买,0),LINEDOT,LINETHICK0,PRECISION2,COLORffff00;
三天前仓:=ref(主力仓量,3);
五天前仓:=ref(主力仓量,5);
十天前仓:=ref(主力仓量,10);
三天增减:主力仓量-三天前仓,LINETHICK0,PRECISION2,color003399;
五天增减:主力仓量-五天前仓,LINETHICK0,PRECISION2,color0055ff;
十天增减:主力仓量-十天前仓,LINETHICK0,PRECISION2,color00aaff;
FILLRGN(五天增减>0,五天增减,0),ColorFF00DD;
FILLRGN(五天增减<0,五天增减,0),Color00DDDD;
p:=SYSPARAM(1);
{柱线}
STICKLINE(BARPOS=DATACOUNT-36,0,三天增减[p],18,0),COLOR009900;
STICKLINE(BARPOS=DATACOUNT-36,0,三天增减[p],15,0),COLOR00AA00;
STICKLINE(BARPOS=DATACOUNT-36,0,三天增减[p],10,0),COLOR00BB00;
STICKLINE(BARPOS=DATACOUNT-36,0,三天增减[p], 8,0),COLOR00CC00;
STICKLINE(BARPOS=DATACOUNT-36,0,三天增减[p], 5,0),COLOR00DD00;
STICKLINE(BARPOS=DATACOUNT-36,0,三天增减[p], 2,0),COLORGREEN;
STICKLINE(BARPOS=DATACOUNT-33,1,五天增减[p],18,0),COLOR000099;
STICKLINE(BARPOS=DATACOUNT-33,1,五天增减[p],15,0),COLOR0000AA;
STICKLINE(BARPOS=DATACOUNT-33,1,五天增减[p],10,0),COLOR0000BB;
STICKLINE(BARPOS=DATACOUNT-33,1,五天增减[p], 8,0),COLOR0000CC;
STICKLINE(BARPOS=DATACOUNT-33,1,五天增减[p], 5,0),COLOR0000DD;
STICKLINE(BARPOS=DATACOUNT-33,1,五天增减[p], 2,0),COLORRED;
STICKLINE(BARPOS=DATACOUNT-30,0,十天增减[p],18,0),COLOR0099FF;
STICKLINE(BARPOS=DATACOUNT-30,0,十天增减[p],15,0),COLOR00AAFF;
STICKLINE(BARPOS=DATACOUNT-30,0,十天增减[p],10,0),COLOR00BBFF;
STICKLINE(BARPOS=DATACOUNT-30,0,十天增减[p], 8,0),COLOR00CCFF;
STICKLINE(BARPOS=DATACOUNT-30,0,十天增减[p], 5,0),COLOR00DDFF;
STICKLINE(BARPOS=DATACOUNT-30,0,十天增减[p], 2,0),Coloryellow;
DRAWTEXT(BARPOS=DATACOUNT-37 ,三天增减[p],'三\n天\n增\n减'),PXUP82,align5,COLORRED;
DRAWTEXT(BARPOS=DATACOUNT-34 ,五天增减[p],'五\n天\n增\n减'),PXUP82,align5,ColorFFFFFF;
DRAWTEXT(BARPOS=DATACOUNT-31 ,十天增减[p],'十\n天\n增\n减'),PXUP82,align5,Color00FF00;
机构线:MA((EXTDATA(9)+EXTDATA(10)+EXTDATA(11)/2),13)*10,PRECISION2,COLORRED,LINETHICK2;
散户线:MA((EXTDATA(12)+EXTDATA(13)+EXTDATA(11)/2),13)*10,PRECISION2,COLORGREEN,LINETHICK2;
str2:='╭☆╯大均习作╰☆╮';
DRAWTEXT(barpos=p,H,str2),ALIGN2,COLOR0088FF,PXUP63;
DRAWTEXT(barpos=p,H,str2),ALIGN2,COLOR0088FF,PXUP65;
//
tzwxlj1 2008-1-4 16:08
主力持筹第七版
tzwxlj1 2008-1-4 16:09
主力持筹第七版A 千扩
tzwxlj1 2008-1-13 14:26
主力持筹第六版A原码公布
DRAWGBK(C>0, COLORRGB(0,30,100),COLORRGB(50,80,30),1);
{主力持筹}
换手率:=v/FINANCE(7),PRECISION2;
净买:=EXTDATA(9)+EXTDATA(10)+EXTDATA(11)/2,PRECISION2;
当天增减:=净买,LINETHICK0,PRECISION2,COLOR0000ff;
主力增减:=当天增减/FINANCE(7),PRECISION2;
主力仓量:=sum(净买,0),LINEDOT,LINETHICK0,PRECISION2,COLORffff00;
三天前仓:=ref(主力仓量,3);
五天前仓:=ref(主力仓量,5);
十天前仓:=ref(主力仓量,10);
廿天前仓:=ref(主力仓量,20);
三天增减:=主力仓量-三天前仓,LINETHICK0,PRECISION2,color003399;
五天增减:=主力仓量-五天前仓,LINETHICK0,PRECISION2,color0055ff;
十天增减:=主力仓量-十天前仓,LINETHICK0,PRECISION2,color00aaff;
廿天增减:=主力仓量-廿天前仓,LINETHICK0,PRECISION2,COLOR00FF00;
FILLRGN(五天增减>0,五天增减,0),Color000099;
FILLRGN(五天增减<0,五天增减,0),Color009900;
p:=SYSPARAM(1);
DRAWTEXT(BARPOS=SYSPARAM(2),净买[p],'★代码:'+STKLABEL+' ★名称:'+STKNAME+' ★流通盘:'+NUMTOSTR(FINANCE(1)/10000,4)+'(亿股)'),PXDN8,align4,COLORFFDD00;
DRAWTEXT(BARPOS=SYSPARAM(2),净买[p],' \n \n \n★三天增减:'+NUMTOSTR(三天增减[p],2)),PXDN6,align4,COLORRED;
DRAWTEXT(BARPOS=SYSPARAM(2),净买[p],' \n \n \n \n●五天增减:'+NUMTOSTR(五天增减[p],2)),PXDN12,align4,COLORYELLOW;
DRAWTEXT(BARPOS=SYSPARAM(2),净买[p],' \n \n \n \n \n◆十天增减:'+NUMTOSTR(十天增减[p],2)),PXDN18,align4,COLORFFAA00;
DRAWTEXT(BARPOS=SYSPARAM(2),净买[p],' \n \n \n \n \n \n▼廿天增减:'+NUMTOSTR(廿天增减[p],2)),PXDN24,align4,COLOR00FF00;
{柱线}
STICKLINE(BARPOS=DATACOUNT-36,0,三天增减[p],18,0),COLOR009900;
STICKLINE(BARPOS=DATACOUNT-36,0,三天增减[p],15,0),COLOR00AA00;
STICKLINE(BARPOS=DATACOUNT-36,0,三天增减[p],10,0),COLOR00BB00;
STICKLINE(BARPOS=DATACOUNT-36,0,三天增减[p], 8,0),COLOR00CC00;
STICKLINE(BARPOS=DATACOUNT-36,0,三天增减[p], 5,0),COLOR00DD00;
STICKLINE(BARPOS=DATACOUNT-36,0,三天增减[p], 2,0),COLORGREEN;
STICKLINE(BARPOS=DATACOUNT-33,1,五天增减[p],18,0),COLOR000099;
STICKLINE(BARPOS=DATACOUNT-33,1,五天增减[p],15,0),COLOR0000AA;
STICKLINE(BARPOS=DATACOUNT-33,1,五天增减[p],10,0),COLOR0000BB;
STICKLINE(BARPOS=DATACOUNT-33,1,五天增减[p], 8,0),COLOR0000CC;
STICKLINE(BARPOS=DATACOUNT-33,1,五天增减[p], 5,0),COLOR0000DD;
STICKLINE(BARPOS=DATACOUNT-33,1,五天增减[p], 2,0),COLORRED;
STICKLINE(BARPOS=DATACOUNT-30,0,十天增减[p],18,0),COLOR0099FF;
STICKLINE(BARPOS=DATACOUNT-30,0,十天增减[p],15,0),COLOR00AAFF;
STICKLINE(BARPOS=DATACOUNT-30,0,十天增减[p],10,0),COLOR00BBFF;
STICKLINE(BARPOS=DATACOUNT-30,0,十天增减[p], 8,0),COLOR00CCFF;
STICKLINE(BARPOS=DATACOUNT-30,0,十天增减[p], 5,0),COLOR00DDFF;
STICKLINE(BARPOS=DATACOUNT-30,0,十天增减[p], 2,0),Coloryellow;
DRAWTEXT(BARPOS=DATACOUNT-37 ,三天增减[p],'三\n天\n增\n减'),PXUP82,align5,COLORRED;
DRAWTEXT(BARPOS=DATACOUNT-34 ,五天增减[p],'五\n天\n增\n减'),PXUP82,align5,ColorFFFFFF;
DRAWTEXT(BARPOS=DATACOUNT-31 ,十天增减[p],'十\n天\n增\n减'),PXUP82,align5,Color00FF00;
机构线a:=MA((EXTDATA(9)+EXTDATA(10)+EXTDATA(11)/2),5)*5,PRECISION2;
散户线a:=MA((EXTDATA(12)+EXTDATA(13)+EXTDATA(11)/2),5)*5,PRECISION2;
机构线:FORCAST(机构线a,5),COLORRED,LINETHICK2;
散户线:FORCAST(散户线a,5),COLORGREEN,LINETHICK2;
//
wdl888 2008-1-15 03:47
:smokin:
wuzlye 2008-1-15 14:25
谢谢楼主!
tzwxlj1 2008-2-16 22:56
〖主力持筹〗新版I可选千扩(开放更多)
tzwxlj1 2008-2-16 22:57
〖主力持筹〗新二版II
cyzpp 2008-2-20 13:03
太感谢楼主了,不错继续进行:): :):
leevor 2008-3-8 15:55
太感谢楼主了:clap: :clap:
qzy812 2008-3-25 11:21
谢谢分享!!!!!!!!!!!!!!