设为首页加入收藏

微信关注
官方微信号:71712643
加关注获取每日精选资讯
股票入门欢迎您加入
广告服务联系我们网站地图

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

2014-11-21 10:11:48 股票入门 http://rumen.southmoney.com

  南方财富网带来大智慧主图源码通达信转来的仪表主图(主图。源码。有未来函数对照可用。可不用)。

  对于公式不必太过较劲。没有百分之百。 没有完全正确。 也没有完美无缺的公式。 就连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;

股票入门声明:资讯来源于互联网,属作者个人观点,仅供投资者参考,并不构成投资建议。投资者据此操作,风险自担。