当前位置:→ 公式网通达信公式 → 正文
  • 通达信万山红遍主图源码

  • 相关简介:{万山红遍} 高:=CONST(REF(HHV(H,150),3)); 低:=CONST(REF(LLV(L,150),3)); NN:=100; N:=9; LC:=REF(C,1); QC:=REF(C,2); AA:=REF(H,N)=HHV(H,2*N+1); AA1:=REF(L,N)=LLV(L,2*N+1); QY:=BACKSET(AA,N+1); QY1:=BACKSET(AA1,N+1); CC:=FILTER(QY,N) AND H=HHV(H,N+1); CC1:=FIL

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

通达信万山红遍主图源码

{万山红遍}
高:=CONST(REF(HHV(H,150),3));
低:=CONST(REF(LLV(L,150),3));
 NN:=100;

N:=9;
 LC:=REF(C,1);
 QC:=REF(C,2);
 AA:=REF(H,N)=HHV(H,2*N+1);
 AA1:=REF(L,N)=LLV(L,2*N+1);
 QY:=BACKSET(AA,N+1);
 QY1:=BACKSET(AA1,N+1);
 CC:=FILTER(QY,N) AND H=HHV(H,N+1);
 CC1:=FILTER(QY1,N) AND L=LLV(L,N+1);
 DDD:=BARSLAST(CC); DD1:=BARSLAST(CC1);
 GDTS:=IF(CC,CURRBARSCOUNT,0);
 DDTS:=IF(CC1,CURRBARSCOUNT,0);
 UTS:=IF(DDD,REF(GDTS,DDD),GDTS);
 DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
 GDCS1:=CONST(UTS);
 DDCS1:=CONST(DDTS1);
 GDCS13:=CONST(REF(H,GDCS1-1));
 DDCS13:=CONST(REF(L,DDCS1-1));
 SS1:=REF(UTS,DDD+1);
 TS2:=REF(DDTS1,DD1+1);
 GDCS2:=CONST(SS1);
 DDCS2:=CONST(TS2);

M:=INTPART(3*N/5);
 AAA:=REF(H,M)=HHV(H,2*M+1);
 QYY:=BACKSET(AAA,M+1);
 CCC:=FILTER(QYY,M) AND H=HHV(H,M+1);
 DDDD:=BARSLAST(CCC),NODRAW;
 GDTSS:=IF(CCC,CURRBARSCOUNT,0);
 TSS:=IF(DDDD,REF(GDTSS,DDDD),GDTSS);
 GDCS11:=CONST(TSS);
 TS11:=REF(TSS,DDDD+1);
 GDCS22:=CONST(TS11);
 AA11:=REF(L,M)=LLV(L,2*M+1);
 QY11:=BACKSET(AA11,M+1);
 CC11:=FILTER(QY11,M) AND L=LLV(L,M+1);
 DD11:=BARSLAST(CC11);
 DDTSS:=IF(CC11,CURRBARSCOUNT,0);
 DDTS11:=IF(DD11,REF(DDTSS,DD11),DDTSS);
 DDCS11:=CONST(DDTS11);
 DDTS22:=REF(DDTS11,DD11+1);
 DDCS22:=CONST(DDTS22);
 ZGD:=HHV(H,60)*1.01.00;
 ZGD2:=CONST(ZGD);
高压M:=DRAWLINE(CURRBARSCOUNT=GDCS22,H,CURRBARSCOUNT=GDCS11,H,1),COLORRED,LINETHICK1;
低撑M:=DRAWLINE(CURRBARSCOUNT=DDCS22,L,CURRBARSCOUNT=DDCS11,L,1) COLORRED,LINETHICK1;
高压1:=DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1) ,COLORBLUE,LINETHICK1;
低撑1:=DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1),COLORBLUE,LINETHICK1;
高点:=CONST(HHV(H,NN));
低点:=CONST(LLV(L,NN));

{背景变色}
R1:=C>LC AND C>QC;
 R2:=REF(R1,1) AND C<=LC AND C>=QC;
 R3:=REF(R2,1) AND C>=LC AND C<=QC;
 R4:=REF(R3,1) AND C<=LC AND C>=QC;
 R5:=REF(R4,1) AND C>=LC AND C<=QC;
 R6:=REF(R5,1) AND C<=LC AND C>=QC;
 R7:=REF(R6,1) AND C>=LC AND C<=QC;
 R8:=REF(R7,1) AND C<=LC AND C>=QC;
 R9:=REF(R8,1) AND C>=LC AND C<=QC;
 RA:=REF(R9,1) AND C<=LC AND C>=QC;
 RB:=REF(RA,1) AND C>=LC AND C<=QC;
 RC:=REF(RB,1) AND C<=LC AND C>=QC;
 RD:=C  RE:=REF(RD,1) AND C>=LC AND C<=QC;
 RF:=REF(RE,1) AND C<=LC AND C>=QC;
 R10:=REF(RF,1) AND C>=LC AND C<=QC;
 R11:=REF(R10,1) AND C<=LC AND C>=QC;
 R12:=REF(R11,1) AND C>=LC AND C<=QC;
 R13:=REF(R12,1) AND C<=LC AND C>=QC;
 R14:=REF(R13,1) AND C>=LC AND C<=QC;
 R15:=REF(R14,1) AND C<=LC AND C>=QC;
 R16:=REF(R15,1) AND C>=LC AND C<=QC;
 R17:=REF(R16,1) AND C<=LC AND C>=QC;
 R18:=REF(R17,1) AND C>=LC AND C<=QC;
 R19:=REF(RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18,1) AND R1;
 R1A:=((REF(R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC,1)) AND RD);
 VAR3:=IF(C<200 ,MA(COST(80),3),2500),NODRAW;
 VAR4:=(H+LC)/3;
 VAR5:=EMA((O+H+L+C)/4,2330);
 VAR6:=(VAR5 + ((VAR5 * 6) / 100));
短买:R19,NODRAW,COLOR00AAAA;
离场:R1A,NODRAW,COLORFF7700;
持股:R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC,NODRAW,COLOR8000FF;
观望:RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18,NODRAW,COLOR767628;
超跌:=(C-MA(C,34))/MA(C,34)*100<-14,COLORBBBBBB,NODRAW;
 Q1:=CONST(IF(短买,100,IF(离场,0,IF(持股,100,IF(超跌,150,40))))),NODRAW;
 Q2:=CONST(IF(短买,100,IF(离场,66,IF(持股,0,IF(超跌,150,118))))),NODRAW;
 Q3:=CONST(IF(短买,0,IF(离场,132,IF(持股,50,IF(超跌,150,118))))),NODRAW;
 DRAWBAND(高点,RGB(Q1,Q2,Q3),低点,DRAWNULL);

C1:=IF(短买,短买,DRAWNULL),;
 C2:=IF(离场,离场,DRAWNULL),;

{DDE金指 N: 1, 999, 13;}
 JH:=SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100;
 SZ:=FILTER(CROSS(JH,35),13);
 SX:=FILTER(CROSS(JH,30),7);
 SQ:=FILTER(CROSS(71,JH),74);
 SD:=FILTER(CROSS(80,JH),74);
 CCL:=REF(HHV(C,120),1);
 DD:=REF(LLV(C,120),1);
 WW:=100*(C-DD)/(CCL-DD);
 EE:=AMOUNT;
 FF:=(EMA(EE,5)/REF(EMA(EE,5),5));
低买:IF(CAPITAL<1,SZ,SX),COLOR22FFFF,NODRAW;
变盘:FILTER(OO AND V>REF(V,1),13),COLORFF88FF,NODRAW;
霸占:=FILTER((FF>=2 AND WW<35 AND BARSCOUNT(C)>30 OR (FF>=2 AND WW<100) AND BARSCOUNT(C)<50),90),COLOR0000AA,NODRAW;
顶部:=IF(CAPITAL<1,SQ,SD),COLOR00CC00,NODRAW;
持股K:C>REF(C,1),COLOR0099FF,NODRAW;
持币K:C 平盘:=C=REF(C,1),COLOR999999,NODRAW;
 STICKLINE(持股K,H,L,3,1),COLOR0099FF;
 STICKLINE(持股K,C,O,1.5,0),COLOR0099FF;
 STICKLINE(持币K,H,L,3,1),COLORFF9900;
 STICKLINE(持币K,C,O,1.5,0),COLORFF9900;
 STICKLINE(平盘,H,L,3,1),COLOR999999;
 STICKLINE(平盘,C,O,1.5,0),COLOR999999;
 STICKLINE(霸占,H,L,3,1),COLOR0000CC;
 STICKLINE(霸占,C,O,1.5,0),COLOR0000CC;
 STICKLINE(变盘,H,L,3,1), COLORFF88FF;
 STICKLINE(变盘,C,O,1.5,0),COLORFF88FF;
 STICKLINE(低买,H,L,3,1),COLOR22FFFF;
 STICKLINE(低买,C,O,1.5,0),COLOR22FFFF;
 STICKLINE(顶部,H,L,3,1),COLOR00CC00;
 STICKLINE(顶部,C,O,1.5,0),COLOR00CC00;

趋势线:=3*SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1)-2*SMA(SMA((C-LLV(L,27))/
 (HHV(H,27)-LLV(L,27))*100,5,1),3,1),COLORBCBC00,NODRAW;
 ZZ:=趋势线>REF(趋势线,1);


 {阻力支撑}
QWX1:=HHV(C,30);
 QWX2:=LLV(C,30);
 QWX3:=CONST((QWX1+QWX2)/2);
 QWX4:=ABS((2*C+H+L)/4-MA(C,20))/MA(C,20);
 QWX5:=CONST((1-7/100)*(DMA(C,QWX4)));
 QWX6:=CONST((1+7/100)*(DMA(C,QWX4)));
阻力:IF(BARSLAST(CURRBARSCOUNT=12),QWX6,DRAWNULL),COLORFF9D3C,LINETHICK1,CIRCLEDOT;
支撑:IF(BARSLAST(CURRBARSCOUNT=12),QWX5,DRAWNULL),COLORFF00FF,LINETHICK1,CIRCLEDOT;

{最佳买入选股}
RSI5:=(SMA(MAX((C-LC),0),5,1)/SMA(ABS((C-LC)),5,1))*100;
 TR1:=SUM(MAX(MAX((H-L),ABS(H-REF(C,1))),ABS(L-REF(C,1))),10);
 HD:=H-REF(H,1);
 LD:=REF(L,1)-L;
 DMP:=SUM(IF((HD>0 AND HD>LD),HD,0),10);
 DMM:=SUM(IF((LD>0 AND LD>HD),LD,0),10);
 PDI:=DMP*100/TR1;
 MDI:=DMM*100/TR1;
 ADX:=MA((ABS((MDI-PDI)/(MDI+PDI))*100),5);
 AV:=RSI5+ADX;
 DXR:=(ADX+REF(ADX,5)/2)+RSI5;
 WR10:=(100*(HHV(H,10)-C))/(HHV(H,10)-LLV(L,10));
 NEWVOL:=RSI5-WR10;
最佳买入:=AV+NEWVOL;
 J:="KDJ.J";
 X:=LLV(J,2)=LLV(J,8);
买入时机:=(CROSS(J,3));
佳选A:=CROSS(最佳买入,0);


 {DIF综合抓牛}
RSIA:=(SMA(MAX(C-LC,0),6,1)/SMA(ABS(C-LC),6,1)*100)/100;
 WR:=-100*(HHV(H,14)-C)/(HHV(H,14)-LLV(L,14));
反向:=((0-WR)-100)/100,;
角度差:=1-(反向/RSI);
角度2:=MA(角度差,2);
角度4:=MA(角度差,4);
角度差A:=角度差>MA(角度差,3)*1.3;
转向:=REF(角度差,1)REF(角度差,1) AND REF(角度差,1)<1.06;
 SS:=COUNT(转向,4)>0 OR COUNT(角度差A,4)>0;
 DIF买:=CROSS(角度2,角度4) AND SS,COLOR0088FF;
 {精准买点}
CYC13:=0.01*EXPMA(AMOUNT,13)/EXPMA(V,13);
 CYS:=(C-CYC13)/CYC13*100;
逢低买入:=IF("ZXNH.ZXNH"=1 AND CYS<=-2,0.6,0);
抓牛A:=DIF买&&逢低买入;

到:=(HHV(H,21)-C)/(HHV(H,21)-LLV(L,21))*100-10;
底:=(C-LLV(L,21))/(HHV(H,21)-LLV(L

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

通达信万山红遍主图源码

  • 下载资源所需积分

    0

  • 当前拥有积分

    0

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

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