公式网 股票指标公式源码分享 登录 注册
公式指标平网
未来函数检测
首页 金钻指标 通达信公式 大智慧公式 同花顺公式 文华财经公式 东财通公式 飞狐公式 操盘手公式 其他公式 公式解答 股票软件 股票池
当前位置:→ 公式网 > 大智慧公式 > 正文 → 正文

由通达信转来的仪表主图(主图.源码.有未来函数对照可用.可不用)

发布时间:2014/10/5 6:59:06  浏览次数:

对于公式不必太过较劲.没有百分之百. 没有完全正确. 也没有完美无缺的公式. 就连K线图形也是【人】编辑出来的.  因为要保密哪位编辑的K线图形【操盘手的老爹】.也不会知道未来K线会是什么样.何况你我小小的散户.
现在还是书归正传 看看源码吧--------------------
{K线变色}
STICKLINE(CLOSE>OPEN,HIGH,LOW,0.5,0 ),COLOR0000FF;    
 STICKLINE(OPEN>=CLOSE,HIGH,LOW,0.5 ,0 ),COLOR00FF00;
   
 STICKLINE(open>=close ,close ,open,0,0 ),COLOR00FF00,LAYER0;
 STICKLINE(open>=close ,close ,open,8,0 ),COLOR008800,LAYER0;
 STICKLINE(open>=close ,close ,open,7,0 ),COLOR009900,LAYER0;
 STICKLINE(open>=close ,close ,open,6,0 ),COLOR00AA00,LAYER0;
 STICKLINE(open>=close ,close ,open,5,0 ),COLOR00BB00,LAYER0;
 STICKLINE(open>=close ,close ,open,4,0 ),COLOR00CC00,LAYER0;
 STICKLINE(open>=close ,close ,open,3,0 ),COLOR00DD00,LAYER0;
 STICKLINE(open>=close ,close ,open,2,0 ),COLOR00EE00,LAYER0;
 STICKLINE(open>=close ,close ,open,1,0 ),COLOR00FF00,LAYER0;

STICKLINE(close>open,close,open,0,0) ,COLORFFBBFF,LAYER0;
 STICKLINE(close>open,close,open,8,0) ,COLORFF00FF,LAYER0;
 STICKLINE(close>open,close,open,7,0) ,COLORFF22FF,LAYER0;
 STICKLINE(close>open,close,open,6,0) ,COLORFF44FF,LAYER0;
 STICKLINE(close>open,close,open,5,0) ,COLORFF66FF,LAYER0;
 STICKLINE(close>open,close,open,4,0) ,COLORFF88FF,LAYER0;
 STICKLINE(close>open,close,open,3,0) ,COLORFF99FF,LAYER0;
 STICKLINE(close>open,close,open,2,0) ,COLORFFAAFF,LAYER0;
 STICKLINE(close>open,close,open,1,0) ,COLORFFBBFF,LAYER0;

现价: if (DYNAINFO(4)=0,C,DYNAINFO(7)),colorwhite,POINTDOT;
箱顶:WMA(REF(HHV(C,30),1),3),COLOR0099FF,LINETHICK2;
箱底:WMA(REF(LLV(C,30),1),3),COLORFF9900,LINETHICK2;
 (箱顶+箱底)/2,COLOR00FFff,LINETHICK1;;
 VARJ:FORCAST(C+C*(CLOSE-FORCAST(CLOSE,13))/FORCAST(CLOSE,13),8),colorwhite,DOTLINE,LAYER0;;
 x9:FORCAST(C,9),Colorwhite,LINETHICK2;
 llx:=llv(FORCAST(C,9),2);
 PARTLINE(x9,x9=llx,rgb(0,255,0),x9<>llx,rgb(255,0,0)),linethick2,LAYER0;
 FILLRGN(VARJ ,x9 ,VARJ>x9,RGB(80,0,80)),LINETHICK1,LAYER7;

{ZIG -------------未来函数--------------}
ZF:=10;
 Z10:=ZIG(4,ZF);
 Low1:=TROUGH(4,ZF ,1);
 High1:=PEAK(4,ZF,1);
 X:=BARSLAST(DISPSTATUS=1)+1; 
持有:LAST(Z10>=REF(Z10,1)),PRECIS0 ,LINETHICK0;
空仓:LAST(Z10<REF(Z10,1)),PRECIS0,LINETHICK0;
 JD:=HHvall(HHv(H,X))*1.05;
 DRAWTEXT(barstatus=2 AND 持有>0,JD,'★ZIG上涨能飘逸范围【L:'+Low1+'→H:'+NUMTOSTRN(Low1*(1+ZF/100),2)+'】'),ALIGN2,Color0099ff,linethick3,LAYER0;
 DRAWTEXT(barstatus=2 AND 空仓>0,JD,'★ZIG下跌能飘逸范围【H:'+High1+'→L:'+NUMTOSTRN(High1*(1-ZF/100),2)+'】'),ALIGN2,Color00FF00,linethick3,LAYER0;
 STICKLINE(BARSTATUS=2 AND 持有>0,Low1,Low1*(1+ZF/100),14,1),COLOR0099dd,LINETHICK1,LAYER4;
 STICKLINE(BARSTATUS=2 AND 持有>0,Low1*(1+ZF/100),Low1*(1+ZF/100),150,1),COLOR0000ff,LINETHICK2,LAYER2;
 STICKLINE(BARSTATUS=2 AND 空仓>0,High1,High1*(1-ZF/100),14,1),COLORff9900,LINETHICK1,LAYER4;
 STICKLINE(BARSTATUS=2 AND 空仓>0,High1*(1-ZF/100),High1*(1-ZF/100),150,1),COLOR00ff00,LINETHICk2,LAYER2;
 {PARTLINE(Z10,Z10>=REF(Z10,1),rgb(255,0,0),Z10<REF(Z10,1),rgb(0,255,0)),DOTLINE,LAYER2;}
 DRAWGBK(Z10>REF(Z10,1) ,STRIP(RGB(0,0,150),RGB(0,80,255),0));  {----ZIG波段-----};
 {主图仪表}
M5:=MA(C,5);
 M10:=MA(C,10);
 M20:=MA(C,20);
 M30:=MA(C,30);;
 M60:=MA(C,60);
 M120:=MA(C,120);
 LC:=REF(C,1);
主升浪:=DISPSTATUS=2 AND M5>M20 AND M20>M60 AND M60>M120 AND M20>=REF(M20,1) AND M60>=REF(M60,1) AND M120>=REF(M120,1);
主浪回调:=DISPSTATUS=2 AND C<LC AND (C<M5 OR M5<REF(M5,1)) AND M5>M20 AND M20>M60 AND M20>=REF(M20,1) AND M60>=REF(M60,1);
主浪深调:=DISPSTATUS=2 AND C<LC AND C<M5 AND M5<REF(M5,1) AND M5<M60 AND M5<M20 AND M10>M20 AND M20>M60 AND M20>=REF(M20,1) AND M60>=REF(M60,1);
初升浪:=DISPSTATUS=2 AND C>LC AND C>(M5 OR M10) AND M5>(M20 OR M10) AND M5>=REF(M5,1) AND C>M20 AND (M5 OR M10)>M20 AND M20>=REF(M20,1) AND M60<(C OR M5 OR M10);
底部反弹:=DISPSTATUS=2 AND C>LC AND M120>M60 AND M60>M20 AND M5>M20;
有牛:=DISPSTATUS=2 AND C>LC AND M20>=REF(M20,1) AND C>=M60 AND M60<(C OR M5 OR M10) AND C>=M120;
放弃:=DISPSTATUS=2 AND C<LC AND C<M10 AND C<M20 AND M20<M60 AND M20<REF(M20,1);
满仓:=IF(DISPSTATUS=2 AND (C>M5 OR M5>=REF(M5,1)) AND C>M10 AND (M5>=M10 OR (M5>=M20 AND M5>=REF(M5,1)))
           AND M5>M20 AND M10>M20 AND M20>M60 AND M30>M120 AND M10>=REF(M10,1) AND M20>=REF(M20,1)
           AND M60>=REF(M60,1) AND M120>=REF(M120,1),1,0);
大半仓:=DISPSTATUS=2 AND (C>M10 OR (C>M5 AND M10>=REF(M10,1))) AND M5>=M20 AND (M10>=M20 OR M10>=REF(M10,1)) AND M20>=M60
          AND (M10>=REF(M10,1) OR (C>M5 AND M5>=REF(M5,1))) AND M20>=REF(M20,1) AND M60>=REF(M60,1);
上升回调:=DISPSTATUS=2 AND C<M5 AND M5<M10 AND M5>M20 AND M10>M20 AND M20>M60 AND M5<=REF(M5,1) AND
           M10<REF(M10,1) AND M20>=REF(M20,1) AND M60>=REF(M60,1);
减仓:=DISPSTATUS=2 AND C<LC AND M5<REF(M5,1) AND M10<REF(M10,1) AND M5<M20 AND M10<M20 AND M20>=REF(M20,1);
半仓:=DISPSTATUS=2 AND C>M5 AND M5>M10 AND M10>M20 AND M20>=M30 AND M5>=REF(M5,1) AND M10>=REF(M10,1)
          AND M20>=REF(M20,1) AND M30>=REF(M30,1) AND M30>=M60 AND M60<=REF(M60,1);
反弹:=DISPSTATUS=2 AND C>M5 AND C>M10 AND M5>M20 AND M60>M20 AND M20>=REF(M20,1) AND M60<REF(M60,1);
初升浪:=DISPSTATUS=2 AND C>LC AND C>(M5 OR M10) AND M5>(M20 OR M10) AND M5>=REF(M5,1) AND C>M20 AND (M5 OR M10)>M20 AND M20>=REF(M20,1) AND M60<(C OR M5 OR M10);
探底阶段:=DISPSTATUS=2 AND C<M5 AND M5<M10 AND M10<M20 AND M20<M60 AND M5<REF(M5,1) AND M10<REF(M10,1)
          AND M20<REF(M20,1) AND M60<REF(M60,1);
小半仓:=DISPSTATUS=2 AND C>=LC AND C>=M5 AND M5>=M10 AND M10>=M20 AND M5>=REF(M5,1) AND M10>=REF(M10,1) AND
          M20>=REF(M20,1) AND M20<M60 AND M60<=REF(M60,1);
关注:=DISPSTATUS=2 AND C>LC AND C>M5 AND C>M20 AND M5>M10 AND M5>REF(M5,1) AND M10>REF(M10,1) AND M20<=REF(M20,1) AND
          M20<=M60;
空仓:=DISPSTATUS=2 AND (M5<M20 OR M10<M20) AND M20<M60 AND M5<=REF(M5,1) AND M10<=REF(M10,1) AND M20<REF(M20,1);
上穿3线:=IF(DISPSTATUS=2 AND C>MAX(M5,MAX(M10,MIN(M20,M30))) AND LC<=(MIN(REF(M5,1),MIN(REF(M10,1),MAX(REF(M20,1),REF(M30,1))))),1,0);
下破3线:=IF(DISPSTATUS=2 AND C<MIN(M5,MIN(M10,MAX(M20,M30))) AND LC>=(MAX(REF(M5,1),MAX(REF(M10,1),MIN(REF(M20,1),REF(M30,1))))),1,0);
观望:=DISPSTATUS=2 AND 满仓=0 AND 大半仓=0 AND 上升回调=0 AND 减仓=0 AND 半仓=0 AND 反弹=0 AND 探底阶段=0
           AND 小半仓=0 AND 关注=0 AND 空仓=0 AND 上穿3线=0 AND 下破3线=0;

IF  满仓 AND 上穿3线=0  THEN  BEGIN
 DRAWTEXTABS(950,15, '【满仓】'),color0044FF,LINETHICK7; END;
 IF  主升浪  THEN  BEGIN
 DRAWTEXTABS(800,15, '【主升浪】'),color0099FF,LINETHICK7; END;
 IF  主浪回调  THEN  BEGIN
 DRAWTEXTABS(950,50, '【主浪回调】'),color00FF00,LINETHICK7; END;
 IF  主浪深调   THEN  BEGIN
 DRAWTEXTABS(950,15, '【主浪深调】'),color00FF00,LINETHICK7; END;
 IF  底部反弹  THEN  BEGIN
 DRAWTEXTABS(950,15, '【底部反弹】'),color0099FF,LINETHICK7; END;
 IF  有牛  THEN  BEGIN
 DRAWTEXTABS(800,15, '【有牛】'),color0000FF,LINETHICK7; END;
 IF  放弃   THEN  BEGIN
 DRAWTEXTABS(950,15, '【放弃】'),color00FF00,LINETHICK7; END;
 IF  上升回调  THEN  BEGIN
 DRAWTEXTABS(950,15, '【上升回调】'),color99FF99,LINETHICK7; END;
 IF  大半仓 AND (满仓=0 AND BARSCOUNT(C)>60)  THEN  BEGIN
 DRAWTEXTABS(980,15, '【大半仓】'),colorff00FF,LINETHICK7; END;
 IF  减仓   THEN  BEGIN
 DRAWTEXTABS(950,15, '【减仓】'),color00FF00,LINETHICK7; END;
 IF  半仓  THEN  BEGIN
 DRAWTEXTABS(800,15, '【半仓】'),color0099FF,LINETHICK7; END;
 IF  反弹  THEN  BEGIN
 DRAWTEXTABS(800,15, '【反弹】'),color0044FF,LINETHICK7; END;
 IF  初升浪   THEN  BEGIN
 DRAWTEXTABS(950,15, '【初升浪】'),color0099FF,LINETHICK7; END;
 IF  探底阶段  THEN  BEGIN
 DRAWTEXTABS(800,15, '【探底阶段】'),color0099FF,LINETHICK7; END;
 IF  关注  THEN  BEGIN
 DRAWTEXTABS(800,15, '【关注】'),color0044FF,LINETHICK7; END;
 IF  初升浪   THEN  BEGIN
 DRAWTEXTABS(950,15, '【初升浪】'),color0099FF,LINETHICK7; END;
 IF  上穿3线  THEN  BEGIN
 DRAWTEXTABS(800,50, '【上穿3线】'),color0099FF,LINETHICK7; END;
 IF  下破3线  THEN  BEGIN
 DRAWTEXTABS(800,50, '【下破3线】'),color00FF00,LINETHICK7; END;
 IF  观望  THEN  BEGIN
 DRAWTEXTABS(800,45, '【观望】'),color00FFff,LINETHICK7; END;
 VARF1:=COUNT(CROSS(WMA(C,1.8),WMA(WMA(C,5),3)),3)=1;
 VARF2:=COUNT(CROSS(WMA(C,5),WMA(WMA(C,5),3)),3)=1;
 ZAI:=FILTER(VARF1 AND VARF2,5);
 DRAWTEXT(ZAI,L*0.99,'↖拉升'),COLOR00FFFF,linethick1;
 AAX:=(C-ma(C,8))/ma(C,8)*100;
 VARM:=MIN(COUNT(C,0),8);
 AAX1:=EMA(AAX,VARM) *VARM;
 AAX2:=MA(AAX1,3);
 AAX3:=MA(AAX1,5);
卖:aax3>10  AND aax1<REF(aax1,1) and cross(aax2,aax1),linethick0;
减仓:filter(卖,5) ,PRECIS0,linethick0;
 DRAWTEXT(减仓,H*1.03,'←减仓'),COLOR00FF00,linethick1,ALIGN0;

由通达信转来的仪表主图(主图.源码.有未来函数对照可用.可不用)

资源下载链接   资源大小:unknow

手机移动版 - 关于我们 - 联系我们 - 广告合作 - 下载声明 - 网站帮助 - 友情链接 - 网站地图 - TOP
湘ICP备09016573号-3 增值电信业务经营ICP许可证:湘B2-20210269 湘公网安备43108102000039号
Copyright © GSZX.COM.CN ,All Rights Reserved.
股票公式,股票指标,股票软件,股票知识