73
凯恩斯攻略,凯恩斯位置,凯恩斯工资,凯恩斯赚钱指标公式_技术分享交流论坛股票软件指标公式技术理想股票技术论坛
春节期间、各大论坛都在讨论一个不能使用的【凯恩斯工作线】，本论坛也有此类帖。千钧经过对源码的认真研究及分析，感觉凯恩斯先生的操作思路与千钧有相同之处，此工作 ...指标公式_技术分享交流论坛股票软件指标公式技术
春节期间、各大论坛都在讨论一个不能使用的【凯恩斯工作线】，本论坛也有此类帖。千钧经过对源码的认真研究及分析，感觉凯恩斯先生的操作思路与千钧有相同之处，此工作线注重波段操作、未提倡短线搏杀。因此，引起了千钧对他的工作线进行优化的兴趣。
但凯恩斯本人并没有给出【CPZB】DLL文件、这就使得这个指标基本等于无效的废品指标、与其它类似的指标没什么两样！
千钧通过对源码的认真解读、在不违背原创作者的创作意图的前提下、写了一个DLL文件、引用到指标中发现可以基本满足原创作者想要表达的意图，并对源码做了优化。既是工作线，就应当突出三条主要操作线的含义。
所以、去除了与源码思路不大相干的东西、简化了源码、使其更加直观、实用。
为便于大部分朋友都能使用、千钧将DLL文件转化成为引用公式、便于不会使用DLL文件的朋友、也能使用该指标。
为对原创作者凯恩斯先生的劳动成果予以充分的尊重！引用公式是完全加密的。无时限。
注意！
你必须首先导入引用公式、然后才能导入公式源码。否则、无法导入源码！
图示：
引用公式：
CPZB.ALG
(445 Bytes, 下载次数: 29)
2008-2-12 09:16 上传
点击文件名下载附件
【凯恩斯工作线】一发千钧优化版！
DRAWTEXTEX(c,1,4,0,'流通A股:'+NUMTOSTR(FINANCE(7),0)+'万'+' 市净率:'+NUMTOSTR((C/FINANCE(31)),2)+' 昨:'+NUMTOSTR(DYNAINFO(3),2)+' 开:'+NUMTOSTR(DYNAINFO(4),2)+' 高:'+NUMTOSTR(DYNAINFO(5),2)+' 低:'+NUMTOSTR(DYNAINFO(6),2)+' 收:'+NUMTOSTR(DYNAINFO(7),2)),colorWhite;
DRAWTEXTEX(c,1,4,80,''+'涨幅:'+NUMTOSTR((DYNAINFO(14) * 100),2)+'%'+' 振幅:'+NUMTOSTR((DYNAINFO(13) * 100),2)+'%'+' 换手率:'+NUMTOSTR((DYNAINFO(37) * 100),2)+'%'),color00FFFF;
DRAWTEXTEX(c,1,630,80,'凯恩斯工作线 | 一发千钧优化'),color00FFFF;
DRAWTEXTEX(c,1,4,160,'黄点工作线 '),colorYellow;
DRAWTEXTEX(c,1,4,560,'粉色K线 | 大量放出'),colorMagenta;
DRAWTEXTEX(c,1,4,640,'多空止赢 | 停损线'),colorMagenta;
DRAWTEXTEX(c,1,4,240,'线上:工作 | 线下:休息'),color00FFFF;
DRAWTEXTEX(c,1,120,160,' | 最低点靠近工作线低吸'),colorYellow;
DRAWTEXTEX(c,1,420,80,STKLABEL+' '+STKNAME),Color00FFFF;
DRAWTEXTEX(c,1,4,480,'空心:阳线 | 实体:阴线'),color0000FF;
DRAWTEXTEX(c,1,4,320,'线上阴线买 | 买错也要买'),color00FFFF;
DRAWTEXTEX(c,1,4,400,'线下阳线卖 | 卖错也要卖'),color00FFFF;
七天线:MA(C,7),ColorFFFFFF;
工作线:(EMA(C,14)),POINTDOT,linethick4,coloryellow;
生命线:(MA(C,25)),linethick2,colorFF00FF;
长线启动点:(MA(C,99)),CIRCLEDOT,ColorEEBBEE;
A0:="cpzb.zp";
A1:="cpzb.cp";
A2:="cpzb.DP";
STICKLINE((A2>=2.1),H,L,0.8,1),colorGreen;
STICKLINE(((A2>=2.1) AND (C>REF(C,1))),O,C,8,1),colorGreen;
STICKLINE(((A2>=2.1) AND (C<REF(C,1))),C,O,8,0),colorGreen;
STICKLINE(((A2>0) AND (A2<5)),H,L,0.8,1),colorRed;
STICKLINE((((A2>0) AND (A2<5)) AND (C>REF(C,1))),O,C,8,0),colorRed;
STICKLINE((((A2>0) AND (A2<5)) AND (C<REF(C,1))),C,O,8,1),colorRed;
STICKLINE(((C>=工作线) AND (C>REF(C,1))),H,L,0.5,1),colorRed;
STICKLINE(((C>=工作线) AND (C>REF(C,1))),O,C,8,1),colorRed;
STICKLINE(((C>=工作线) AND (C<REF(C,1))),H,L,0.5,0),colorRed;
STICKLINE(((C>=工作线) AND (C<REF(C,1))),O,C,8,0),colorRed;
STICKLINE(((C<工作线) AND (C>REF(C,1))),H,L,0.5,1),colorGreen;
STICKLINE(((C<工作线) AND (C>REF(C,1))),O,C,8,1),colorGreen;
STICKLINE(((C<工作线) AND (C<REF(C,1))),H,L,0.5,0),colorGreen;
STICKLINE(((C<工作线) AND (C<REF(C,1))),O,C,8,0),colorGreen;
DRAWTEXT(A0,L,'￣￣'),linethick2,ALIGN1,ColorFFFFFF;
DRAWTEXT(A0,L*0.98,' B-B'),linethick5,ALIGN1,colorFFFFFF;
DRAWTEXT(A1,H,'￣￣'),linethick2,ALIGN1,colorcyan;
DRAWTEXT(A1,H*1.03,' S-S'),linethick5,colorcyan;
STICKLINE(A1,C,O,8,0),colorFFFF00;
STICKLINE(A1,H,L,1,0),colorFFFF00;
STICKLINE(A0,C,O,8,0),ColorFFFFFF;
STICKLINE(A0,H,L,1,0),ColorFFFFFF;
STICKLINE((A2>=10 and A2<30),C,O,0,0),ColorFFBBFF;
STICKLINE((A2>=10 and A2<30),C,O,8,0),colorMagenta;
STICKLINE((A2>=10 and A2<30),C,O,7,0),ColorFF22FF;
STICKLINE((A2>=10 and A2<30),C,O,6,0),ColorFF44FF;
STICKLINE((A2>=10 and A2<30),C,O,5,0),ColorFF66FF;
STICKLINE((A2>=10 and A2<30),C,O,4,0),ColorFF88FF;
STICKLINE((A2>=10 and A2<30),C,O,3,0),ColorFF99FF;
STICKLINE((A2>=10 and A2<30),C,O,2,0),ColorFFAAFF;
STICKLINE((A2>=10 and A2<30),C,O,1,0),ColorFFBBFF;
A3:=EMA((((SLOPE(C,21)) * 20) + C),68);
A4:=EMA(C,10);
A5:=REF(C,2);
A6:=((SMA((MAX((C - A5),0)),6,1)) / (SMA(ABS((C - A5)),6,1))) * 100;
A7:=IF(((A6 < (REF(A6,1))) AND (A6 > 79)),A6,0);
DRAWTEXT((CROSS(A4,A3)),L,'△'),linethick2,ALIGN1,colorYellow;
DRAWTEXT(A7,H,'○'),linethick3,colorGreen;
A8:=LLV(L,21);
A9:=HHV(H,21);
A10:=EMA((((CLOSE - A8) / (A9 - A8)) * 100),5);
A11:=EMA((((CLOSE - A8) / (A9 - A8)) * 50),13);
A12:=EMA(((0.667 * (REF(A10,1))) + (0.333 * A10)),2);
A13:=LLV(L,55);
A14:=HHV(H,34);
A15:=EMA((((C - A13) / (A14 - A13)) * 100),3);
A16:=(A11 + A15) / 2;
A17:=EMA(((0.667 * (REF(A15,1))) + (0.333 * A10)),2);
A18:=EMA(A16,5);
A19:=EMA(((0.667 * (REF(A18,1))) + (0.333 * A18)),2);
A20:=CROSS(A10,A11);
A21:=(CROSS(A10,A19)) AND (A19 < 30);
A22:=A21 * 0.6;
DRAWTEXT((A22 = 0.6),L,'◇'),ALIGN1,colorYellow;
DRAWTEXT((A20 = 1),L,'◇'),ALIGN1,colorWhite;
朋友们要的选股公式：
股价站上工作线，MACD地位金叉选股：
工作线:=EMA(C,14);
qj2:="macd.diff";
qj3:="macd.dea";
C>工作线 and CROSS(qj2,qj3) and qj3<0
[ 本帖最后由 一发千钧 于 2008-2-19 00:52 编辑 ]
