迎中秋,庆祖国60华诞,一组指标组合作为礼物(一发千钧)
- 
                        
相关简介:09年在指标区的各位版主辛勤劳动和积极配合下,在指标区所有会员的大力支持和积极配合下,在专家、指导、优秀会员的努力下,理想指标区取得了骄人的成绩。 1、流量、在线会员数量已稳稳站在全网同类版区之首。 2、发帖量、回复率已经连续14个月占据全网同类版区之首。 3、技术含量、专家队伍成为全网公式区最豪华,最有影响力、凝聚力的。 4、我们拥有一个独一无二的公式指导团队。 5、管理团队是全网公式区最有开拓精神、最团结、最有奉献精神、最具有管理能力的团队。 取得这些成绩离不开所有会员的支持! 取得这些成绩
 - 
                        
文章来源:择股网作者:股海网发布时间:2009-09-29浏览次数:
 
                    09年在指标区的各位版主辛勤劳动和积极配合下,在指标区所有会员的大力支持和积极配合下,在专家、指导、优秀会员的努力下,理想指标区取得了骄人的成绩。
1、流量、在线会员数量已稳稳站在全网同类版区之首。
2、发帖量、回复率已经连续14个月占据全网同类版区之首。
3、技术含量、专家队伍成为全网公式区最豪华,最有影响力、凝聚力的。
4、我们拥有一个独一无二的公式指导团队。
5、管理团队是全网公式区最有开拓精神、最团结、最有奉献精神、最具有管理能力的团队。
取得这些成绩离不开所有会员的支持!
取得这些成绩离不开专家、指导团队的辛勤奉献!
取得这些成绩离不开论坛管理高层的信任和支持!
取得这些成绩离不开版主团队的艰苦努力和无私心的配合!
我们知道:
革命尚未成功,同志仍需努力。
我们会继续吸收、学习所有论坛的先进管理经验、继续开拓我们自己的优秀管理措施,百尺竿头更进一步。
祝理想指标区所有会员,国庆快乐!
祝理想指标区所有会员,中秋快乐!
主图指标‘五线谱操作法’。
这个指标是在原有的‘10日均线操作法’的基础上优化而成。
源码很简单,一看就知道用法,所以、用法就不再叙述。
副图‘历史仓位’
这是在茶舍与朋友们聊天时,偶然突发奇想做的。
其目的是想通过图表量化,能尽可能的观察全年每个时期的交易情况。
该指标属于探索型的东西,因为在不使用扩展数据的情况下,怎样能尽可能地贴近市场,怎样能尽可能地把主力仓位、动向表达出来?这目前还是个课题。
目前千钧暂且把三日均价线作为分水岭,是不是能体现了真实?还有待于大家一同研究开发,总结、优化。

- 一,主图指标‘五线谱操作法’
 - 源码
 - a0:=BARSCOUNT(c);a3:=SYSPARAM(3);a2:=SYSPARAM(2);a4:=SYSPARAM(4);
 - a5:=SYSPARAM(5);a6:=SYSPARAM(1);n0:=a3-a2;nn:=a0-a2;h1:=(a4-a5)/8;
 - h2:=h1/4;l1:=llv(l,n0);ll2:=l1[a3];
 - y0:=a0>=a2;vv:=if(y0=1 and a6>=a0,v,0);
 - c1:=if(BETWEEN(c,a4-0*h1,a4-1*h1),vv,0);
 - c2:=if(BETWEEN(c,a4-1*h1,a4-2*h1),vv,0);
 - c3:=if(BETWEEN(c,a4-2*h1,a4-3*h1),vv,0);
 - c4:=if(BETWEEN(c,a4-3*h1,a4-4*h1),vv,0);
 - c5:=if(BETWEEN(c,a4-4*h1,a4-5*h1),vv,0);
 - c6:=if(BETWEEN(c,a4-5*h1,a4-6*h1),vv,0);
 - c7:=if(BETWEEN(c,a4-6*h1,a4-7*h1),vv,0);
 - c8:=if(BETWEEN(c,a4-7*h1,a4-8*h1),vv,0);
 - c9:=if(BETWEEN(c,a4-8*h1,a4-9*h1),vv,0);
 - c10:=if(BETWEEN(c,a4-9*h1,a4-10*h1),vv,0);
 - v1:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c1,n0),0),2));
 - v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,n0),0),2));
 - v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,n0),0),2));
 - v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,n0),0),2));
 - v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,n0),0),2));
 - v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,n0),0),2));
 - v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,n0),0),2));
 - v8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,n0),0),2));
 - v9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,n0),0),2));
 - v10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,n0),0),2));
 - av0:=max(v1,max(v2,max(v3,max(v4,max(v5,max(v6,max(v7,max(v8,max(v9,v10)))))))));
 - x1:=v1/av0>=nn/n0 and nn>=0;x2:=v2/av0>=nn/n0 and nn>=0;
 - x3:=v3/av0>=nn/n0 and nn>=0;x4:=v4/av0>=nn/n0 and nn>=0;
 - x5:=v5/av0>=nn/n0 and nn>=0;x6:=v6/av0>=nn/n0 and nn>=0;
 - x7:=v7/av0>=nn/n0 and nn>=0;x8:=v8/av0>=nn/n0 and nn>=0;
 - MA1:=if(DATATYPE=7,ma("ma.m1#WEEK",3),if(DATATYPE=8,wma("ma.m1#MONTH",2),wma("ma.m1#DAY",10)));
 - jx1:=IF(CAPITAL=0,if(DATATYPE=7,1.11,if(DATATYPE=8,1.30,1.06)),if(DATATYPE=7,1.20,if(DATATYPE=8,1.38,1.14)));
 - jx2:=IF(CAPITAL=0,if(DATATYPE=7,1.09,if(DATATYPE=8,1.25,1.05)),if(DATATYPE=7,1.15,if(DATATYPE=8,1.33,1.11)));
 - jx3:=IF(CAPITAL=0,if(DATATYPE=7,0.985,if(DATATYPE=8,1.01,0.985)),if(DATATYPE=7,0.99,1.01));
 - jx4:=IF(CAPITAL=0,if(DATATYPE=7,0.88,if(DATATYPE=8,0.75,0.93)),if(DATATYPE=7,0.85,if(DATATYPE=8,0.75,0.90)));
 - jx5:=IF(CAPITAL=0,if(DATATYPE=7,0.85,if(DATATYPE=8,0.70,0.92)),if(DATATYPE=7,0.80,if(DATATYPE=8,0.70,0.86)));
 - FILLRGN(v1/av0>=nn/n0 and nn>=0,a4-0*h1,a4-1*h1+h1*0.5),Color002288;
 - FILLRGN(v2/av0>=nn/n0 and nn>=0,a4-1*h1,a4-2*h1+h1*0.5),Color806000;
 - FILLRGN(v3/av0>=nn/n0 and nn>=0,a4-2*h1,a4-3*h1+h1*0.5),Color808300;
 - FILLRGN(v4/av0>=nn/n0 and nn>=0,a4-3*h1,a4-4*h1+h1*0.5),Color883D88;
 - FILLRGN(v5/av0>=nn/n0 and nn>=0,a4-4*h1,a4-5*h1+h1*0.5),Color006868;
 - FILLRGN(v6/av0>=nn/n0 and nn>=0,a4-5*h1,a4-6*h1+h1*0.5),color777700;
 - FILLRGN(v7/av0>=nn/n0 and nn>=0,a4-6*h1,a4-7*h1+h1*0.5),color804000;
 - FILLRGN(v8/av0>=nn/n0 and nn>=0,a4-7*h1,a4-8*h1+h1*0.5),color003377;
 - DRAWNUMBER(FILTER(refx(x1<ref(x1,1),6) and v1>0,10),a4,a4-0*h1,2),COLOR00FF00;
 - DRAWNUMBER(FILTER(refx(x2<ref(x2,1),6) and v2>0,10),(a4-1*h1),a4-1*h1,2),COLOR00FF00;
 - DRAWNUMBER(FILTER(refx(x3<ref(x3,1),6) and v3>0,10),(a4-2.7*3*h2),a4-2*h1,2),COLOR00FF00;
 - DRAWNUMBER(FILTER(refx(x4<ref(x4,1),6) and v4>0,10),(a4-12*h2),a4-3*h1,2),COLOR00FF00;
 - DRAWNUMBER(FILTER(refx(x5<ref(x5,1),6) and v5>0,10),(a4-16*h2),a4-4*h1,2),COLOR00FF00;
 - DRAWNUMBER(FILTER(refx(x6<ref(x6,1),6) and v6>0,10),(a4-20*h2),a4-5*h1,2),COLOR00FF00;
 - DRAWNUMBER(FILTER(refx(x7<ref(x7,1),6) and v7>0,10),(a4-24*h2),a4-6*h1,2),COLOR00FF00;
 - DRAWNUMBER(FILTER(refx(x8<ref(x8,1) and v8>0,5),10),ll2+1*4*h2,a4-7*h1,2),COLOR00FF00;
 - STICKLINE(C>REF(C,1),h,l,0,0),COLORRED;STICKLINE(C>REF(C,1),c,o,6,0),COLORRED;
 - STICKLINE(C<REF(C,1),h,l,0,0),COLORFFEE00;STICKLINE(C<REF(C,1),c,o,6,0),COLORFFEE00;
 - 疯狂:ma1*jx1,COLOR0000DD,LINETHICK2;超买:ma1*jx2,COLOR00DDDD,LINETHICK2;轴心:ma1*jx3,COLOR0000FF;
 - PARTLINE(轴心<ref(轴心,1),轴心),COLOR00FF00;超卖:ma1*jx4,COLOR00DDDD,LINETHICK2;恐慌:ma1*jx5,COLOREEDD00,LINETHICK2;
 - fd:=(h/疯狂-1)*100;bl:=(h/c-1)*100;fk:=if(CAPITAL=0,count(h>疯狂,3)=3,count(h>疯狂,3)>=2 and fd>8 and bl<-4);
 - DRAWICON(cross(h,超买) or cross(c,超买),h*1.02,5);DRAWICON(l<超卖 and c>=超卖,l*0.99,4);DRAWICON(fk,h*1.01,11);
 - //
 
二,副图指标‘历史仓位’

- zz:=(hhv(h,3)+llv(l,3))/2;a:=if(c>zz,vol,0);b:=if(c<zz,vol,0);bb:=a-b;
 - 总0:bb;昨:ref(bb,1);
 - //
 
- 副图源码
 - input:W(9,1,12),N(2008,1990,2050), M(2009,1990,2050);
 - P:=SYSPARAM(1);GG:="千钧引用.总0#MONTH";SJ:=YEAR>n and YEAR<=m;
 - yf:=MONTH;KK:=YEAR=n and yf=12;Zjj:=(hhv(h,5)+llv(l,5))/2;Yjj:=(hhv(h,23)+llv(l,23))/2;Njj:=(hhv(h,244)+llv(l,244))/2;
 - Zjl:=SUM(v,5);Yjl:=GG;Njl:=SUM(GG,12);周成本:=(zjj*zjl*每手股数)/zjl/100;月成本:=(yjj*yjl*每手股数)/yjl/100;年成本:=(njj*njl*每手股数)/njl/100;
 - 一月:=REF(GG,BARSLAST(SJ and yf=1));二月:=REF(GG,BARSLAST(SJ and yf>1 and yf=2));
 - 三月:=REF(GG,BARSLAST(SJ and yf>2 and yf=3));四月:=REF(GG,BARSLAST(SJ and yf>3 and yf=4));
 - 五月:=REF(GG,BARSLAST(SJ and yf>4 and yf=5));六月:=REF(GG,BARSLAST(SJ and yf>5 and yf=6));
 - 七月:=REF(GG,BARSLAST(SJ and yf>6 and yf=7));八月:=REF(GG,BARSLAST(SJ and yf>7 and yf=8));
 - 九月:=REF(GG,BARSLAST(SJ and yf>8 and yf=9));十月:=REF(GG,BARSLAST(SJ and yf>9 and yf=10));
 - 十一:=REF(GG,BARSLAST(SJ and yf>10 and yf=11));十二:=REF(GG,BARSLAST(SJ and yf>11 and yf=12));
 - Z:=IF(yf=1,1,IF(yf=2,2,IF(yf=3,3,IF(yf=4,4,IF(yf=5,5,IF(yf=6,6,IF(yf=7,7,IF(yf=8,8,IF(yf=9,9,IF(yf=10,10,IF(yf=11,11,IF(yf=12,12,0))))))))))));
 - 上周:="千钧引用.昨#WEEK";
 - 本月:REF(gg,BARSLAST(MONTH=w)),PRECISION0,LINETHICK,ColorFFFFFF;
 - 上月:REF(GG,BARSLAST(MONTH>(w-2) and MONTH<=w-1)),Color00FFFF,PRECISION0,LINETHICK;
 - 年累计:=SUM(GG,z);上年:=ref("千钧引用.总0#YEAR",BARSLAST(YEAR=n));
 - DRAWGBK(年累计>上年,COLORRGB(200,50,0), COLORRGB(250,250,0),0);
 - DRAWGBK(年累计<上年,COLORRGB(0,100,10), COLORRGB(250,250,0),0);
 - 月趋势:=COUNT(本月>上月,3);年趋势:=年累计>上年;
 - STICKLINE(BARPOS=SYSPARAM(2)+4 and 上年[P]>0,0,上年[P]/2,60,0),COLOR0000FF;
 - STICKLINE(BARPOS=SYSPARAM(2)+4 and 上年[P]<0,0,-(上年[P])/2,60,0),COLORFF5500;
 - STICKLINE(BARPOS=SYSPARAM(2)+12 and 年累计[P]>0,0,年累计[P]/2,60,0),COLOR0000FF;
 - STICKLINE(BARPOS=SYSPARAM(2)+12 and 年累计[P]<0,0,-(年累计[P])/2,60,0),COLORFF5500;
 - STICKLINE(BARPOS=SYSPARAM(2)+38 and 一月[P]>0,0,一月[P],50,0),COLOR0000FF;
 - STICKLINE(BARPOS=SYSPARAM(2)+38 and 一月[P]<0,0,-(一月[P]),50,0),COLORFF5500;
 - STICKLINE(BARPOS=SYSPARAM(2)+46 and 二月[P]>0,0,二月[P],50,0),COLOR0000FF;
 - STICKLINE(BARPOS=SYSPARAM(2)+46 and 二月[P]<0,0,-(二月[P]),50,0),COLORFF5500;
 - STICKLINE(BARPOS=SYSPARAM(2)+54 and 三月[P]>0,0,三月[P],50,0),COLOR0000FF;
 - STICKLINE(BARPOS=SYSPARAM(2)+54 and 三月[P]<0,0,-(三月[P]),50,0),COLORFF5500;
 - STICKLINE(BARPOS=SYSPARAM(2)+62 and 四月[P]>0,0,四月[P],50,0),COLOR0000FF;
 - STICKLINE(BARPOS=SYSPARAM(2)+62 and 四月[P]<0,0,-(四月[P]),50,0),COLORFF5500;
 - STICKLINE(BARPOS=SYSPARAM(2)+70 and 五月[P]>0,0,五月[P],50,0),COLOR0000FF;
 - STICKLINE(BARPOS=SYSPARAM(2)+70 and 五月[P]<0,0,-(五月[P]),50,0),COLORFF5500;
 - STICKLINE(BARPOS=SYSPARAM(2)+78 and 六月[P]>0,0,六月[P],50,0),COLOR0000FF;
 - STICKLINE(BARPOS=SYSPARAM(2)+78 and 六月[P]<0,0,-(六月[P]),50,0),COLORFF5500;
 - STICKLINE(BARPOS=SYSPARAM(2)+86 and 七月[P]>0,0,七月[P],50,0),COLOR0000FF;
 - STICKLINE(BARPOS=SYSPARAM(2)+86 and 七月[P]<0,0,-(七月[P]),50,0),COLORFF5500;
 - STICKLINE(BARPOS=SYSPARAM(2)+94 and 八月[P]>0,0,八月[P],50,0),COLOR0000FF;
 - STICKLINE(BARPOS=SYSPARAM(2)+94 and 八月[P]<0,0,-(八月[P]),50,0),COLORFF5500;
 - STICKLINE(BARPOS=SYSPARAM(2)+102 and 九月[P]>0,0,九月[P],50,0),COLOR0000FF;
 - STICKLINE(BARPOS=SYSPARAM(2)+102 and 九月[P]<0,0,-(九月[P]),50,0),COLORFF5500;
 - STICKLINE(BARPOS=SYSPARAM(2)+110 and 十月[P]>0,0,十月[P],50,0),COLOR0000FF;
 - STICKLINE(BARPOS=SYSPARAM(2)+110 and 十月[P]<0,0,-(十月[P]),50,0),COLORFF5500;
 - STICKLINE(BARPOS=SYSPARAM(2)+118 and 十一>0,0,十一[P],50,0),COLOR0000FF;
 - STICKLINE(BARPOS=SYSPARAM(2)+118 and 十一<0,0,-(十一[P]),50,0),COLORFF5500;
 - STICKLINE(BARPOS=SYSPARAM(2)+126 and 十二>0,0,十二[P],50,0),COLOR0000FF;
 - STICKLINE(BARPOS=SYSPARAM(2)+126 and 十二<0,0,-(十二[P]),50,0),COLORFF5500;
 - {显示}
 - DRAWTEXT(BARPOS=SYSPARAM(2),0,'上年'),PXUP18,ALIGN5,COLORFFFFFF;
 - DRAWTEXT(BARPOS=SYSPARAM(2)+8,0,' 本年'),PXUP18,ALIGN5,COLORFFFFFF;
 - DRAWTEXT(BARPOS=SYSPARAM(2)+34,0,' 1 月'),ALIGN5,PXUP18,COLORFFFFFF;
 - DRAWTEXT(BARPOS=SYSPARAM(2)+42,0,' 2 月'),ALIGN5,PXUP18,COLORFFFFFF;
 - DRAWTEXT(BARPOS=SYSPARAM(2)+50,0,' 3 月'),ALIGN5,PXUP18,COLORFFFFFF;
 - DRAWTEXT(BARPOS=SYSPARAM(2)+58,0,' 4 月'),ALIGN5,PXUP18,COLORFFFFFF;
 - DRAWTEXT(BARPOS=SYSPARAM(2)+66,0,' 5 月'),ALIGN5,PXUP18,COLORFFFFFF;
 - DRAWTEXT(BARPOS=SYSPARAM(2)+74,0,' 6 月'),ALIGN5,PXUP18,COLORFFFFFF;
 - DRAWTEXT(BARPOS=SYSPARAM(2)+82,0,' 7 月'),ALIGN5,PXUP18,COLORFFFFFF;
 - DRAWTEXT(BARPOS=SYSPARAM(2)+90,0,' 8 月'),ALIGN5,PXUP18,COLORFFFFFF;
 - DRAWTEXT(BARPOS=SYSPARAM(2)+98,0,' 9 月'),ALIGN5,PXUP18,COLORFFFFFF;
 - DRAWTEXT(BARPOS=SYSPARAM(2)+106,0,' 10月'),ALIGN5,PXUP18,COLORFFFFFF;
 - DRAWTEXT(BARPOS=SYSPARAM(2)+114,0,' 11月'),ALIGN5,PXUP18,COLORFFFFFF;
 - DRAWTEXT(BARPOS=SYSPARAM(2)+122,0,' 12月'),ALIGN5,PXUP18,COLORFFFFFF;
 - DRAWTEXTEX(c,1,5,0,STKLABEL+' '+STKNAME+''),ColorFFFF00;
 - DRAWTEXTEX(C,1,800,300,'周成本:'+NUMTOSTR(周成本,2)+IF(CAPITAL=0,'点',' 元')),ColorAE088A;
 - DRAWTEXTEX(C,1,800,450,'月成本:'+NUMTOSTR(月成本,2)+IF(CAPITAL=0,'点',' 元')),ColorAE088A;
 - DRAWTEXTEX(C,1,800,600,'年成本:'+NUMTOSTR(年成本,2)+IF(CAPITAL=0,'点',' 元')),ColorAE088A;
 - DRAWTEXTEX(C and 月趋势>=2,1,0,450,'月仓位趋势:'+' ↑'),Color00EEFF;
 - DRAWTEXTEX(C and 月趋势>=1 and 月趋势<2,1,0,450,'月仓位趋势:==='),ColorFF00FF;
 - DRAWTEXTEX(C and 月趋势<1,1,0,450,'月仓位趋势:'+' ↓'),Color00FF00;
 - DRAWTEXTEX(C and 年趋势=1,1,0,600,'年仓位趋势:'+' ↑'),Color00EEFF;
 - DRAWTEXTEX(C and 年趋势<1,1,0,600,'年仓位趋势:'+' ↓'),Color00FF00;
 
懒人请下载源码文件
                                
  | 
                        
                
                
                


                            
 现在就去充值积分
加入VIP可下载100以下的所有资源