当前位置:→ 公式网通达信公式 → 正文
  • 通达信自用集粹主图源码

  • 相关简介:{双线持币,单线持股} 双线持币:HHV(MA(HIGH,(3)),2),LINETHICK2,COLOR00FF00; 单线持股:LLV(MA(HIGH,(3)),1),LINETHICK2,COLOR0000FF; {乖离率} 六日乖离:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100; 乖离率:六日乖离,NODRAW; {多空线} MID:=(3*C+L+O+H)/6; DKX:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(M

  • 文章来源:公式网 发布时间:2016-08-29浏览次数:下载次数:0

通达信自用集粹主图源码

{双线持币,单线持股}
双线持币:HHV(MA(HIGH,(3)),2),LINETHICK2,COLOR00FF00;
单线持股:LLV(MA(HIGH,(3)),1),LINETHICK2,COLOR0000FF;

{乖离率}
六日乖离:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
乖离率:六日乖离,NODRAW;

{多空线}
MID:=(3*C+L+O+H)/6;
 DKX:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+
 16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+
 13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+
 10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+
 7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+
 4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED;
 MADKX:MA(DKX,5),COLORGREEN; {原指标为10}

多空:IF(DKX>MADKX,1,0),COLORYELLOW,NODRAW;

{波峰波谷}
A1:=REF(C,10)=HHV(C,2*10+1);
 B1:=FILTER(A1,10);
 C1:=BACKSET(B1,10+1);
 HD:=FILTER(C1,10);
 A2:=REF(C,10)=LLV(C,2*10+1);
 B2:=FILTER(A2,10);
 C2:=BACKSET(B2,10+1);
 LD:=FILTER(C2,10);
 A:=REF(C,BARSLAST(HD));
 B:=REF(C,BARSLAST(LD));
 TTT1:=BARSLAST(HD)  TTT2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
波峰:IF(TTT1,A,A),COLORFF00FF,POINTDOT;
 STICKLINE(TTT1,A,A,9,0),COLORFF00FF;
波谷:IF(TTT2,B,B),COLOR80FF00,POINTDOT;
 STICKLINE(TTT2,B,B,9,0),COLOR80FF00;

{买卖点}
AA05:=MA(C,5),COLOR0099CC;
五日乖离率:=(C-AA05)/AA05*100;
 BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;
速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);
加速度5:=EMA((速度5-REF(速度5,1)),3),LINETHICK0;
 AA10:=MA(C,10);
 AA20:=MA(C,20);
 BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;
 AA30:=MA(C,30);
三拾日乖离率:=(C-AA30)/AA30*100,LINETHICK0;
 VAR1:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1);
 VAR2:=(AA30-AA20)  BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416;

强势狙击:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10);
加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND AA05>REF(AA05,1) AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA10>REF(AA10,1)
 AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) ;
清仓:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND (C>AA30 OR O>AA30) AND AA05  DRAWTEXT(加仓 ,LOW*0.98,'←加仓'),COLORRED;
 JC:=CROSS(0,五日乖离率) AND 三拾日乖离率REF(AA10,1) ;
减仓:=FILTER(JC,10);
 MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA05>REF(AA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1) 买入:=FILTER(MR,10);
 DRAWTEXT(减仓,HIGH*1.02,'←减仓'),COLORCYAN;
 DRAWTEXT(买入,LOW*0.98,'←买入'),COLORYELLOW;
 DRAWTEXT(清仓 ,HIGH*1.02,'←清仓'),COLORGREEN;
 DRAWTEXT(强势狙击,LOW*0.98,'←强势狙击'),COLORYELLOW;

VAR21:=MAX(ABS(HIGH-AMOUNT/VOL/100),ABS(AMOUNT/VOL/100-LOW));
 VAR3:=ABS((OPEN+CLOSE)/2-AMOUNT/VOL/100);
 MV:=(VAR21+VAR3)/AMOUNT*VOL*100*50;
 DRAWTEXT(MV>6 AND L<=LLV(L,10),L*0.95,'←异动'),COLORCYAN;

{K线文字解盘1,可以删去}
A74:=MA(CLOSE,20);
 A75:=(CLOSE > MA(CLOSE,5));
 A76:=(MA(CLOSE,5) > MA(CLOSE,10));
 A77:=(CLOSE > MA(CLOSE,10));
 A78:=(MA(CLOSE,5) > MA(CLOSE,20));
 A79:=(CLOSE > MA(CLOSE,20));
 A710:=REF(A74,1);
 A711:=(A74 > A710);
 AVX:=(((((IF(A75,10,(0 - 10)) + IF(A76,10,(0 - 10))) + IF(A77,10,(0 - 10)))
 + IF(A78,10,(0 - 10))) + IF(A79,10,(0 - 10))) + IF(A711,10,(0 - 10)));
 DSLX:=(CLOSE / INDEXC);
 DSLX1:=MA(DSLX,5);
 DSLX2:=MA(DSLX,10);
 V1:=MA(VOL,5);
 V2:=MA(VOL,10);
 TT1:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
 TT2:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
 TT3:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)),1,0));
 TT4:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)),1,0));
 TT5:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
 TT6:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
 TT7:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));
 TT8:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));
 TT9:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
 TT10:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
 TT11:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));
 TT12:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));
 TT13:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
 TT14:=CONST(IF( C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
 TT15:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));
 TT16:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));
 TT17:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0));
 TT18:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0));
 TT19:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 < V2)),1,0));
 TT20:=CONST(IF(C>200 AND (CROSS(1,AVX) AND (V1 >= V2)),1,0));
 TT21:=CONST(IF(C>200 AND (CROSS(1,AVX) AND (V1 < V2)),1,0));
 TT22:=CONST(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)),1,0));
 TT23:=CONST(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)),1,0));
 TT24:=CONST(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)),1,0));
 TT25:=CONST(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)),1,0));

DRAWTEXT_FIX(TT1=1,0.4,0.9,0,'量能理想,明显走强,中线参与,仓位在2/3左右。') COLORFFFFFF;

DRAWTEXT_FIX(TT2=1,0.4,0.9,0,'走势趋强,还显不足,短线进场,仓位在1/2左右。') COLORFFFFFF;

DRAWTEXT_FIX(TT3=1,0.4,0.9,0,'量价良好,没有明显走强,短线进场,仓位1/2左右。') COLORFFFFFF;

DRAWTEXT_FIX(TT4=1,0.4,0.9,0,'形态尚可,量能不足,未完全走强,短线参与,仓位1/3左右。') COLORFFFFFF;

DRAWTEXT_FIX(TT5=1,0.4,0.9,0,'形态变坏,重仓者减持大半,清仓者观望。') COLORFFFFFF;

DRAWTEXT_FIX(TT6=1,0.4,0.9,0,'随大盘一起下跌,明显缩量走势,考虑到风险,减持或清仓。') COLORFFFFFF;

DRAWTEXT_FIX(TT7=1,0.4,0.9,0,'该股放量下跌,走势明显偏弱,离场观望。') COLORFFFFFF;

DRAWTEXT_FIX(TT8=1,0.4,0.9,0,'该股缩量下跌,走势偏弱,离场观望。') COLORFFFFFF;

DRAWTEXT_FIX(TT9=1,0.4,0.9,0,'该股形态良好,强势明显,量能充足,可以继续持有。') COLORFFFFFF;

DRAWTEXT_FIX(TT10=1,0.4,0.9,0,'上行趋势不变,强势依然,量能开始转弱,注意风险。') COLORFFFFFF;

DRAWTEXT_FIX(TT11=1,0.4,0.9,0,'该股仍然具备上涨潜力,但股性偏弱,可考虑减仓。') COLORFFFFFF;

DRAWTEXT_FIX(TT12=1,0.4,0.9,0,'该股走势趋弱,量能不足,减持大部分筹码。') COLORFFFFFF;

DRAWTEXT_FIX(TT13=1,0.4,0.9,0,'该股形态不佳,注意成交量的变化,目前不适合参与。') COLORFFFFFF;

DRAWTEXT_FIX(TT14=1,0.4,0.9,0,'趋势不明,股价偏弱,注意量能变化,目前不宜参与。') COLORFFFFFF;

DRAWTEXT_FIX(TT15=1,0.4,0.9,0,'有走强迹象,但量能不足,趋势不明,不适合操作。') COLORFFFFFF;

DRAWTEXT_FIX(TT16=1,0.4,0.9,0,'该股走势太弱,没有参与价值。') COLORFFFFFF;

DRAWTEXT_FIX(TT17=1,0.4,0.9,0,'大盘理想,有明显走强迹象,中线参与,仓位在2/3左右。') COLORFFFFFF;

DRAWTEXT_FIX(TT18=1,0.4,0.9,0,'如前期经过一轮下跌,最佳买点,前期有过一段涨幅需谨慎。') COLORFFFFFF;

DRAWTEXT_FIX(TT19=1,0.4,0.9,0,'考虑短线进场,仓位在1/2左右,一旦量能放大,加仓买入。') COLORFFFFFF;

DRAWTEXT_FIX(TT20=1,0.4,0.9,0,'大盘形态走坏,重仓者可以减去大部分仓位。') COLORFFFFFF;

DRAWTEXT_FIX(TT21=1,0.4,0.9,0,'大盘缩量调整,注意风险,短线清仓观望。') COLORFFFFFF;

DRAWTEXT_FIX(TT22=1,0.4,0.9,0,'大盘走势良好,量能理想,可以继续持有强势股。') COLORFFFFFF;

DRAWTEXT_FIX(TT23=1,0.4,0.9,0,'大盘形态良好,但量能稍显不足,随时准备减仓。') COLORFFFFFF;

DRAWTEXT_FIX(TT24=1,0.4,0.9,0,'大盘趋势不明,注意成交量变化,目前不适宜进场。') COLORFFFFFF;

DRAWTEXT_FIX(TT25=1,0.4,0.9,0,'大盘趋势向下,量能萎缩,不适合进场。') COLORFFFFFF;

{K线文字解盘2,可以删去}
TT:=240/FROMOPEN;
比:=TT;
 J12:=(HIGH - ((HIGH - LOW) / 3));
 J23:=(LOW + ((HIGH - LOW) / 3));
 AAA:=CONST(HHV(H,190));
 BBB:=CONST(LLV(L,180));
 DRAWKLINE(H,O,L,C);
 T1{早晨之星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1)
 < REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.03 AND
 CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2)),1,0));
 T2{黄昏之星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) > 1.03 AND REF(OPEN,1)
 > REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.02
 AND CLOSE/OPEN<0.97 AND CLOSE  T3{长十字}:=CONST(IF((CLOSE=OPEN AND HIGH/LOW >1.03),1,0));
 T4{垂死十字}:=CONST(IF((CLOSE=OPEN AND CLOSE=LOW AND CLOSE!=HIGH),1,0));
 T5{早晨十字星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1)
 < REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND
 CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2)),1,0));
 T6{黄昏十字星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) > 1.05 AND REF(OPEN,1)
 > REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND
 CLOSE/OPEN<0.95 AND CLOSE  T7{射击之星}:=CONST(IF((MIN(OPEN,CLOSE)=LOW AND HIGH-LOW >
 3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE > MA(CLOSE,5)),1,0));
 T8{倒转锤头}:=CONST(IF((MIN(OPEN,CLOSE)=LOW AND HIGH-LOW >
 3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE < MA(CLOSE,5)),1,0));
 T9{锤头}:=CONST(IF((HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW >
 3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE < MA(CLOSE,5)),1,0));
 T10{吊颈}:=CONST(IF((HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW >
 3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE>MA(CLOSE,5)),1,0));
 T11{穿头破脚}:=CONST(IF(((REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.96
 AND CLOSE  AND OPEN>REF(CLOSE,1))OR (REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.04
 AND CLOSE>REF(OPEN,1) AND OPEN  T12{乌云盖顶}:=CONST(IF((REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.97
 AND OPEN>REF(CLOSE,1) AND CLOSE  T13{曙光初现}:=CONST(IF((REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.03
 AND OPENREF(CLOSE,1)),1,0));
 T14{身怀六甲}:=CONST(IF((ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04
 AND ABS(CLOSE-OPEN)/CLOSE<0.005 AND
 MAX(CLOSE,OPEN) < MAX(REF(CLOSE,1),REF(OPEN,1)) AND MIN(CLOSE,OPEN)
 > MIN(REF(CLOSE,1),REF(OPEN,1))),1,0));
 T15{十字胎}:=CONST(IF((ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04
 AND CLOSE=OPEN AND
 CLOSE < MAX(REF(CLOSE,1),REF(OPEN,1)) AND CLOSE > MIN(REF(CLOSE,1)
 ,REF(OPEN,1))),1,0));
 T16{平顶}:=CONST(IF((ABS(HIGH-REF(HIGH,1))/HIGH<0.001),1,0));
 T17{平底}:=CONST(IF(((ABS(LOW-REF(LOW,1))/LOW<0.001 AND ABS(REF(LOW,1)
 -REF(LOW,2))/REF(LOW,1)<=0.001)),1,0));
 T18{大阳烛}:=CONST(IF((CLOSE/OPEN>1.05 AND HIGH/LOW < CLOSE/OPEN+0.018),1,0));
 T19{三个白武士}:=CONST(IF((REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)
 >REF(OPEN,1) AND CLOSE>OPEN
 AND REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1)),1,0));
 T20{双飞乌鸦}:=CONST(IF((REF(CLOSE,1)  AND CLOSE/OPEN<0.98),1,0));
 T21{孕育线}:=CONST(IF((REF(CLOSE,2)>REF(OPEN,2) AND (REF(CLOSE,2)
 -REF(OPEN,2))/REF(OPEN,2)>=2/100 AND REF(OPEN,1)>=REF(CLOSE,1)
 AND (REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<=2/100 AND REF(OPEN,1)
 <=REF(CLOSE,2) AND REF(CLOSE,1)>=REF(OPEN,2) AND C>=OPEN
 AND (CLOSE-OPEN)/OPEN>=2/100 AND CLOSE>=REF(OPEN,1) AND OPEN<=REF(CLOSE,1)
 AND (MAX(CLOSE,REF(C,2))-MIN(CLOSE,REF(CLOSE,2)))/MIN(CLOSE,REF(CLOSE,2))
 <=1/100),1,0));
 T22{多方炮}:=CONST(IF((REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)  AND CLOSE>OPEN),1,0));
 T23{出水芙蓉}:=CONST(IF(((OPEN  EMA(C,60)) AND (C>MAX(EMA(C,20),MAX(EMA(C,40),EMA(C,60))))AND (V/MA(V,30)
 >1.2 AND C/REF(C,1)>1.049)),1,0));
 T24{上升三部曲}:=CONST(IF((REF(CLOSE,4)/REF(OPEN,4)>1.03 AND REF(CLOSE,3)
   AND REF(LOW,4)  REF(HIGH,3) AND REF(HIGH,4)>REF(HIGH,2)
 AND REF(HIGH,4)>REF(HIGH,1) AND CLOSE/OPEN>1.03 AND CLOSE>REF(CLOSE,4)),1,0));
 T25{下

 ☟问题反馈 ☞┄┄┄┄┄┄┄┄┄┄→收藏资源:

通达信自用集粹主图源码

  • 下载资源所需积分

    0

  • 当前拥有积分

    0

上传会员: 
公式网
文件大小: 
Bytes
上传时间: 
2016-08-29
下载积分: 
-
免责声明: 
请仔细阅读并同意后才能下载
本附件为用户分享上传,公式网没有对文件进行验证,不能保证下载资源的准确性、安全性和完整性,也不保证下载资源能正常安装和使用,且下载后扣除的积分无法退还,除非您充分理解并完全接受本声明,否则您无权下载。
本站对提供下载的软件、指标、资料等不拥有任何权利,其版权归该下载资源的合法拥有者所有。本附件仅供学习和研究使用,不得用于商业或者非法用途,如有侵犯您的版权, 请参看 《公式网侵权处理流程》《公式网免责声明条款》
点击下载无反应时,更换主流浏览器重新登录操作,如360浏览器、Edge浏览器、谷歌浏览器,个别浏览器有不兼容现象。
勾选以下表示您已经阅读并同意以上声明才能下载本文件,扣除积分无法退还!
我已阅读所有条款规定, 请点我同意 所有条款内容!我自愿下载!
提示:如下载失败,请点关闭刷新此页面或提交问题反馈给管理员→
关闭

关于我们 - 联系我们 - 隐私政策 - 免责声明 - 下载帮助 - 广告合作 - SiteMap - TOP
增值电信业务经营ICP许可证:湘B2-20210269 湘ICP备09016573号-3 湘公网安备43108102000039号
Copyright © 2025 铭网科技,All Rights Reserved.