银行 发表于 2009-12-27 10:50

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;A:=CURRBARSCOUNT;<BR>A1:=DAY!=REF(DAY,1);<BR>A2:=BARSLAST(A1)+1;<BR>A3:=MA(C,A2);<BR>A4:=SUM(AMO,A2)/SUM(VOL,A2)/100;<BR>A5:=IF(CAPITAL&gt;0,A4,A3);<BR>均价线:=IF(A&lt;=CONST(A2),A5,DRAWNULL);<BR>分钟有效周期:=IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,240,DRAWNULL))));<BR>分时价:=TFILT(CLOSE,CURRBARSCOUNT,00,CURRBARSCOUNT,00);<BR>分时判断:=IF(分时价=DRAWNULL,1,IF(分钟有效周期=DRAWNULL,DRAWNULL,1));<BR>{-----------------------------由MACD定位顶底-------------------------------}<BR>DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);<BR>DEA:=EMA(DIFF,9);<BR>MACD:=2*(DIFF-DEA);<BR>KX:=BARSSINCE(CLOSE);{←首次开盘价距金的天数}<BR>HHN:=CONST(HHV(DIFF,KX));<BR>HLN:=CONST(LLV(DEA,KX));<BR>RC1:=CONST((HHN+HLN)/2);<BR>SS:=((HHN-HLN)/200);<BR>MACD底部:=(-100*SS+RC1)+-(-100*SS+RC1),COLOR669999; <BR>MACD顶部:=(100*SS+RC1)+-(-100*SS+RC1),COLORFF0033;<BR>MACD中轴:=0+-(-100*SS+RC1);<BR>DIFF修正:=DIFF+-(-100*SS+RC1),COLOR008080;<BR>DEA修正:=DEA+-(-100*SS+RC1),COLOR00FF00;<BR>MACD修正:=2*(DIFF修正-DEA修正)+MACD中轴,COLOR0000BB,NODRAW;<BR>MACD超跌:=CONST(LLV(MACD修正,KX));<BR>MACD超跌线:=IF(MACD超跌&lt;MACD底部,MACD超跌,MACD底部);<BR>{----------------------利用MACD趋势进行精确顶底判断------------------------}<BR>顶部:=MACD顶部+-MACD超跌线;<BR>天际:=顶部*0.809;<BR>中轴:=MACD中轴+-MACD超跌线;<BR>海面:=顶部*0.191;<BR>底部:=MACD底部;<BR>{------------------------传统KDJ指标结合MACD优化---------------------------}<BR>RSVA:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*顶部;{采用21日月线优化}<BR>K:SMA(RSVA,3,1),COLORFFFFFF,NODRAW;<BR>D:SMA(K,3,1),COLOR00FFFF,NODRAW;<BR>原J值参数:=3*K-2*D;<BR>JD:=IF(原J值参数&lt;底部,底部,原J值参数);{J值底部钝化处理}<BR>J:IF(JD&gt;顶部,顶部,JD),COLORFF00FF,NODRAW;{底部钝化处理后再进行顶部钝化处理}<BR>{---------------------------MACD多空量能判断-------------------------------}<BR>MACD多头:DIFF修正+-MACD超跌线,COLOR339999;<BR>空头:DEA修正+-MACD超跌线,COLOR00FF00;<BR>量能柱:2*(MACD多头-空头)+中轴,COLOR0000BB,NODRAW;<BR>超前DEA:=(EMA(MACD多头,7));<BR>超前MACD:=2*(MACD多头-超前DEA)+中轴;<BR>{-----------------------------------大盘动向-------------------------------}<BR>VAR1大盘:=LLV(LOW,13);<BR>VAR2大盘:=HHV(HIGH,13);<BR>VAR3大盘:=(SMA((CLOSE-VAR1大盘)/(VAR2大盘-VAR1大盘)*顶部,5,1))-顶部/2;<BR>VAR4大盘:=SMA((VAR2大盘-CLOSE)/(VAR2大盘-VAR1大盘)*顶部,5,1)-顶部/2;<BR>大盘散户:=IF(VAR4大盘&lt;底部,底部,VAR4大盘),COLOR408000;<BR>大盘主力:=IF(VAR3大盘&lt;底部,底部,VAR3大盘),COLOR330088;<BR>{---------------------------------密集成本突破-----------------------------}<BR>最高获利参数:=顶部/100;<BR>VAR1C:=(COST(89)-COST(11))*最高获利参数;<BR>VAR2C:=(COST(99.9)-COST(1))*最高获利参数;<BR>单峰:=((1-VAR1C/VAR2C))*顶部;<BR>低密:=((COST(90)-COST(60))/VAR2C)*顶部;<BR>高密:=((COST(40)-COST(1))/VAR2C)*顶部;<BR>赢利:= (SMA(WINNER(AMOUNT/VOL/99),2,1))*顶部;<BR>活跃度:顶部-顶部/(1+EXPMA(HSL,21)),COLOR774455;{←CYF公众追涨热情指标}<BR>70%成本集中度:=IF(VAR1C&gt;顶部,顶部,VAR1C),COLORFFFFFF;<BR>90%成本集中度:=IF(VAR2C&gt;顶部,顶部,VAR2C),COLORFF0000;<BR>套牢筹码上升:=IF((单峰-赢利)&gt;底部,(单峰-赢利),底部);<BR>个股散户:=IF(套牢筹码上升&gt;顶部,顶部,套牢筹码上升),COLOR408000;<BR>散户:IF(个股散户=DRAWNULL,DRAWNULL,个股散户),COLOR408000;<BR>获利筹码上升:=IF((赢利-单峰)&gt;底部,(赢利-单峰),底部);<BR>个股主力:=IF(获利筹码上升&gt;顶部,顶部,获利筹码上升),COLOR330088;<BR>主力:IF(个股主力=DRAWNULL,DRAWNULL,个股主力),COLOR330088;<BR>{--------------------换手率,五日换手率辅助判断个股活跃度-------------------}<BR>换手:SUM(VOL,1)/CAPITAL*100,COLOR666666,NODRAW;<BR>⑤日换:SUM(VOL,5)/CAPITAL*100,COLOR999999,NODRAW;<BR>{----------------------密集成本突破指标筹码峰画线--------------------------}<BR>金色背景修边1:STICKLINE(C&gt;0 AND CURRBARSCOUNT&gt;=2,顶部,底部,3.05,0),COLOR003333;<BR>金色背景修边2:STICKLINE(C&gt;0 AND CURRBARSCOUNT&gt;=2,顶部,中轴,3.05,0),COLOR003333;<BR>金色背景补充:DRAWBAND(顶部,RGB(51,51,0),中轴,RGB(51,51,0));<BR>金色背景:DRAWBAND(顶部,RGB(51,51,0),底部,RGB(128,128,128));<BR>追涨热度峰紫色:DRAWBAND(活跃度,RGB(66,52,81),底部,RGB(204,0,0));<BR>高密峰墨蓝色:=DRAWBAND(高密,RGB(0,0,51),底部,RGB(0,0,255));<BR>低密峰纯蓝色:=DRAWBAND(低密,RGB(0,0,102),底部,RGB(0,0,255));<BR>90%成本峰:DRAWBAND(90%成本集中度,RGB(0,0,153),底部,RGB(0,0,153));<BR>70%成本峰:DRAWBAND(70%成本集中度,RGB(0,128,0),底部,RGB(255,255,255));<BR>散户峰绿色:DRAWBAND(散户,RGB(0,64,0),底部,RGB(204,0,0));<BR>主力峰红色:DRAWBAND(主力,RGB(102,26,51),底部,RGB(0,0,255));<BR>MACD多空趋势:DRAWBAND(MACD多头,RGB(204,51,51),空头,RGB(0,179,0));<BR>MACD多头重画:DRAWBAND(MACD多头,RGB(153,153,51),MACD多头,RGB(153,153,51));<BR>MACD空头重画:DRAWBAND(空头,RGB(0,204,0),空头,RGB(0,204,0));<BR>{--------创幻论坛‘131488’会员提供的通达信■新宝塔线■-----原码-----------}<BR>VAR1:=CLOSE&gt;REF(CLOSE,1) AND CLOSE&gt;REF(CLOSE,2);<BR>VAR2:=REF(VAR1,1) AND CLOSE&lt;=REF(CLOSE,1) AND CLOSE&gt;=REF(CLOSE,2);<BR>VAR3:=REF(VAR2,1) AND CLOSE&gt;=REF(CLOSE,1) AND CLOSE&lt;=REF(CLOSE,2);<BR>VAR4:=REF(VAR3,1) AND CLOSE&lt;=REF(CLOSE,1) AND CLOSE&gt;=REF(CLOSE,2);<BR>VAR5:=REF(VAR4,1) AND CLOSE&gt;=REF(CLOSE,1) AND CLOSE&lt;=REF(CLOSE,2);<BR>VAR6:=REF(VAR5,1) AND CLOSE&lt;=REF(CLOSE,1) AND CLOSE&gt;=REF(CLOSE,2);<BR>VAR7:=REF(VAR6,1) AND CLOSE&gt;=REF(CLOSE,1) AND CLOSE&lt;=REF(CLOSE,2);<BR>VAR8:=REF(VAR7,1) AND CLOSE&lt;=REF(CLOSE,1) AND CLOSE&gt;=REF(CLOSE,2);<BR>VAR9:=REF(VAR8,1) AND CLOSE&gt;=REF(CLOSE,1) AND CLOSE&lt;=REF(CLOSE,2);<BR>VARD:=CLOSE&lt;REF(CLOSE,1) AND CLOSE&lt;REF(CLOSE,2);<BR>VARE:=REF(VARD,1) AND CLOSE&gt;=REF(CLOSE,1) AND CLOSE&lt;=REF(CLOSE,2);<BR>VARF:=REF(VARE,1) AND CLOSE&lt;=REF(CLOSE,1) AND CLOSE&gt;=REF(CLOSE,2);<BR>VAR10:=REF(VARF,1) AND CLOSE&gt;=REF(CLOSE,1) AND CLOSE&lt;=REF(CLOSE,2);<BR>VAR11:=REF(VAR10,1) AND CLOSE&lt;=REF(CLOSE,1) AND CLOSE&gt;=REF(CLOSE,2);<BR>VAR12:=REF(VAR11,1) AND CLOSE&gt;=REF(CLOSE,1) AND CLOSE&lt;=REF(CLOSE,2);<BR>VAR13:=REF(VAR12,1) AND CLOSE&lt;=REF(CLOSE,1) AND CLOSE&gt;=REF(CLOSE,2);<BR>VAR14:=REF(VAR13,1) AND CLOSE&gt;=REF(CLOSE,1) AND CLOSE&lt;=REF(CLOSE,2);<BR>VAR15:=REF(VAR14,1) AND CLOSE&lt;=REF(CLOSE,1) AND CLOSE&gt;=REF(CLOSE,2);<BR>VAR16:=REF(VAR15,1) AND CLOSE&gt;=REF(CLOSE,1) AND CLOSE&lt;=REF(CLOSE,2);<BR>VAR17:=REF(VAR16,1) AND CLOSE&lt;=REF(CLOSE,1) AND CLOSE&gt;=REF(CLOSE,2);<BR>VAR18:=REF(VAR17,1) AND CLOSE&gt;=REF(CLOSE,1) AND CLOSE&lt;=REF(CLOSE,2);<BR>三平底翻金:=(REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1))<BR>&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;AND VAR1;<BR>主力启动线:=MA(V,5),COLORFFFFFF;<BR>主力洗盘线:=MA(V,35),COLOR00FFFF;<BR>资金异动线:=MA(V,135),COLORFF0000;<BR>{----------------------------买卖参考--------------------------------------}<BR>出击:=(CROSS(主力启动线,资金异动线) OR ((主力洗盘线 &gt; 资金异动线) AND CROSS(主力启动线,主力洗盘线))),COLORYELLOW;<BR>启动:=(主力启动线&gt;REF(主力启动线,1) AND (CROSS(VOL,主力启动线) AND (REF(VOL,1)&lt;REF(资金异动线,1) OR REF(VOL,2)&lt;REF(资金异动线,2)))),COLOR45AAEE;<BR>成立:=三平底翻金 AND (出击 OR 启动);<BR>买入提示:=IF(成立=1,海面*0.5,0) AND 分时判断=1;<BR>{------------------------顶部线,天际线,海面线,底部线重画-------------------}<BR>顶部线:DRAWBAND(顶部,RGB(51,0,255),顶部,RGB(51,0,255));<BR>天际线:DRAWBAND(天际,RGB(128,64,64),天际,RGB(128,64,64));<BR>海面线:DRAWBAND(海面,RGB(0,153,153),海面,RGB(0,153,153));<BR>底部线:DRAWBAND(0,RGB(153,153,102),买入提示,RGB(153,153,102));<BR>{------------------------超前MACD多空量能柱--------------------------------}<BR>超前MACD红柱1:STICKLINE(超前MACD&gt;=中轴,超前MACD,中轴,1.50,0),COLOR226688;<BR>超前MACD红柱2:STICKLINE(超前MACD&gt;=中轴,超前MACD,中轴,0.95,0),COLOR4488BB;<BR>超前MACD红柱3:STICKLINE(超前MACD&gt;=中轴,超前MACD,中轴,0.31,0),COLOR55AADD;<BR>超前MACD兰柱1:STICKLINE(超前MACD&lt;=中轴,超前MACD,中轴,1.50,0),COLOR006600;<BR>超前MACD兰柱2:STICKLINE(超前MACD&lt;=中轴,超前MACD,中轴,0.95,0),COLOR007700;<BR>超前MACD兰柱3:STICKLINE(超前MACD&lt;=中轴,超前MACD,中轴,0.31,0),COLOR008800;<BR>{--------------------------MACD多空量能柱----------------------------------}<BR>MACD红柱1:STICKLINE(量能柱&gt;=中轴,量能柱,中轴,1.5,0),COLOR000077;<BR>MACD红柱2:STICKLINE(量能柱&gt;=中轴,量能柱,中轴,1.1,0),COLOR000088;<BR>MACD红柱3:STICKLINE(量能柱&gt;=中轴,量能柱,中轴,0.6,0),COLOR000099;<BR>MACD红柱4:STICKLINE(量能柱&gt;=中轴,量能柱,中轴,0.15,0),COLOR0000AA;<BR>MACD兰柱1:STICKLINE(量能柱&lt;=中轴,量能柱,中轴,1.5,0),COLORAA6633;<BR>MACD兰柱2:STICKLINE(量能柱&lt;=中轴,量能柱,中轴,1.1,0),COLORBB7744;<BR>MACD兰柱3:STICKLINE(量能柱&lt;=中轴,量能柱,中轴,0.6,0),COLORCC8855;<BR>MACD兰柱4:STICKLINE(量能柱&lt;=中轴,量能柱,中轴,0.15,0),COLORDD9966;<BR>{---------中轴线重画及顶部线,天际线,海面线,底部线,多空线文字说明-----------}<BR>中轴线:DRAWBAND(中轴,RGB(128,128,255),中轴,RGB(128,128,255));<BR>顶部线文字:DRAWTEXT(CURRBARSCOUNT=1,顶部*0.98,''&nbsp;&nbsp;顶部线''),COLORFF0033;<BR>天际线文字:DRAWTEXT(CURRBARSCOUNT=1,天际*0.98,''&nbsp;&nbsp;天际线''),COLOR404080;<BR>海面线文字:DRAWTEXT(CURRBARSCOUNT=1,海面,''&nbsp;&nbsp;海面线''),COLOR999900;<BR>底部线文字:DRAWTEXT(CURRBARSCOUNT=1,底部,''&nbsp;&nbsp;底部线''),COLOR669999;<BR>中轴线文字:DRAWTEXT(CURRBARSCOUNT=1,中轴,''&nbsp;&nbsp;多空线''),COLORFF8080;<BR>{-------------------------------传统KDJ指标线重画--------------------------}<BR>D线重画:DRAWBAND(D,RGB(255,255,0),D*0.998,RGB(255,255,0));<BR>K线重画:DRAWBAND(K,RGB(255,255,255),K,RGB(255,255,255));<BR>J线重画:DRAWBAND(J,RGB(255,0,255),J,RGB(25

珊子 发表于 2012-5-19 10:06


错误句 : {底部钝化处理后再进行顶部钝化处理}
{---------------------------MACD多空量能判断-------------------------------}
MACD多头IFF修正+-MACD超跌线,COLOR339999
详细信息 : 未知字符串 MACD多头IFF修正
错误起始位置 : 1723 ; 长度: 15

公式用不了,不知道错误.怎么搞得好
页: [1]
查看完整版本: 通达信公式