找回密码
 立即注册

QQ登录

只需一步,快速开始

广告载入中...
楼主: 追随达芬奇

超级MACD 通用

   火... [复制链接]
发表于 2010-10-16 11:13 | 显示全部楼层
超级MACD 通用
回复

使用道具 举报

发表于 2010-10-16 13:19 | 显示全部楼层
通达信已测试通过
回复

使用道具 举报

发表于 2010-10-16 13:19 | 显示全部楼层
111111111111111111111111111111
回复

使用道具 举报

发表于 2010-10-17 00:28 | 显示全部楼层
回复 1# 追随达芬奇


    主图黄金柱
回复

使用道具 举报

发表于 2010-10-17 07:46 | 显示全部楼层
多多学习了。。。。。
回复

使用道具 举报

发表于 2010-10-17 07:48 | 显示全部楼层
多多学习了。。。。。
回复

使用道具 举报

发表于 2010-10-23 13:04 | 显示全部楼层
VAR1:=(VOL/(((HIGH-LOW)*2)-ABS((CLOSE - OPEN))));买盘:=IF
((CLOSE>OPEN),(VAR1*(HIGH - LOW)),IF((CLOSE < OPEN),
(VAR1 * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2)));
卖盘:=IF((CLOSE > OPEN),(0 - (VAR1 * ((HIGH - CLOSE)+
(OPEN - LOW)))),IF((CLOSE < OPEN),(0 - (VAR1 * (HIGH-
LOW))),(0 - (VOL / 2)))); 买卖差:=(买盘 + 卖盘);
STICKLINE((买卖差 < 0),0,买卖差,5,0),COLOR33FF33;JX1:=BARSSINCE(买盘);
JY1:=IF(((121 > JX1) AND (JX1 > 0)),JX1,120);  
JY2:=IF(((4 > JX1) AND (JX1 > 0)),JX1,3); VAR30:=MA(VOL,JY2);
神比:=(买盘 / VAR30); 鬼比:=(卖盘 / VAR30);VAR2:=(HIGH - LOW);
VAR3:=ABS((OPEN - CLOSE));VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN));
VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW);  
VAR6:=((VAR3 / VAR2) * VOL);VAR7:=((VAR4 / VAR2) * VOL);
VAR8:=((VAR5 / VAR2) * VOL);  
VAR9:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100)))));  
VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100);  
VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60)));  VARC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30)));  
VARD:=REF(CLOSE,1);  
VARE:=((SMA(MAX((CLOSE - VARD),0),6,1) / SMA(ABS((CLOSE - VARD)),6,1)) * 100);
DRAWTEXT(((DATE > 700101) AND CROSS(84,VARE)),HIGH,'■卖出'),COLORF2A3A4;  
VAR40:=((IF((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),VAR6,买盘) + 买盘) / 2);  
VAR41:=((IF(((VAR7 > VAR6) AND (VAR7 > VAR8)),VAR7,买盘) + 买盘) / 2);  
VAR42:=((IF(((VAR8 > VAR6) AND (VAR8 > VAR7)),VAR8,买盘) + 买盘) / 2);  
VAR50:=((IF((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),VAR6,卖盘) + 卖盘) / 2);  
三日上攻:=MA((((VAR40 + VAR41) + VAR42) / 3),JY2);三日下攻:=MA(VAR50,JY2);
多头:STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,5,1),COLOR0000FF;
空头:STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,5,1),COLOR00FF00;
STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),0,VAR6,4,0),COLOR00FFFF;
STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),0,VAR6,4,0),COLORFF0000;
STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,4,0),COLORFFFFFF;
STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,4,0),COLORFF00FF;
STICKLINE((VOL > (MA(VOL,5) * 2.5)),0,VOL,2,0);
STICKLINE((买盘 > 0),买盘,0,2,0),COLOR0000FF;
上攻均量:=MA(买盘,JY1);下攻均量:=MA(卖盘,JY1);
DRAWTEXT(((((((((VAR7 > VAR6) AND (VARA > 2)) AND (VAR9 > VAR8)) AND (CLOSE > MA(CLOSE,5))) AND (CLOSE > MA(CLOSE,30))) AND (HIGH > MA(CLOSE,60))) AND (VOL > MA(VOL,5))) AND (VAR7 >= MA(VOL,5))),VOL,'▼出货');
DRAWTEXT(((((((VAR8 > VAR6) AND (VAR8 > VAR7)) AND (VARA < (0 - 2))) AND (CLOSE < MA(CLOSE,30))) AND (VAR8 < (MA(VOL,5) / 2))) AND (MA(VOL,5) < MA(VOL,10))),VOL,'●低进');
DRAWTEXT((((((VAR6 > (MA(VOL,5) * 2)) AND (VAR6 >= VAR7)) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)) OR ((VOL > (MA(VOL,5) * 3)) AND VARB)),VOL,'◆强势');
hsl:=DYNAINFO(37);DRAWTEXT((((VOL / REF((SUM(VOL,5) / 5),1)) >= 2)
AND (hsl > 1)),(VOL * 1.1),'●量变'),COLOR00FFFF;
MA1:MA(VOL,5),colorwhite;MA2:MA(VOL,10),coloryellow;
MA3:MA(VOL,20),colorff00ff;
回复

使用道具 举报

发表于 2010-10-23 13:10 | 显示全部楼层
三线粘合向上加成交量
回复

使用道具 举报

发表于 2010-10-23 13:12 | 显示全部楼层
很好的指标公式
回复

使用道具 举报

发表于 2010-10-23 13:19 | 显示全部楼层
448448448178
回复

使用道具 举报

发表于 2010-10-27 17:11 | 显示全部楼层
MID谢谢分享
回复

使用道具 举报

发表于 2010-10-27 18:05 | 显示全部楼层
DRAWGBK(DATE>900101,COLORRGB(95,95,95),COLORRGB(0,0,0),1);
a:=BARPOS; a1:=SYSPARAM(1); a2:=SYSPARAM(2); a3:=SYSPARAM(3);
tt:=BARPOS=SYSPARAM(2);
hh:=SYSPARAM(4); ll:=SYSPARAM(5);
换手率:=100*v/capital,colorfffFff;
RH:=H-L;
R:=DYNAINFO(13)*100;
DRAWTEXT(TT,hh,'                  当日振幅:'+NUMTOSTR(R,2)+'%   '+NUMTOSTR(RH,2)+'元 '+'  当前换手率:'+NUMTOSTR(换手率,2)+'%  '),ColorFFFFFF,pxdn10,align4;
DRAWTEXT(TT,hh,'代码:'+STKLABEL),ColorFFFFFF,pxdn10,align4;
DRAWTEXT(TT,hh,'  所属板块:'+SELFSTRING('所属板块')),colorffffff,pxdn40,align4;
DRAWTEXT(TT,hh,'  机构评级:'+selfstring('评级')),coloryellow,pxdn70,align4;
反压线:HHV(FORCAST(C,10),18),coloree8fff,linethick1;
Ab:MA(C,5),ColorFFFfff,linethick1;
Ac:MA(C,10),Color00Ffff,linethick1;
Ae:MA(C,21),Colorff00ff,linethick1;
A4:MA(C,30),Color00ff00,linethick1;
A5:MA(C,60),Color208fff,linethick1;
A6:MA(C,90),Color00ff00,linethick0;
A7:MA(C,120),Color00Ffff,linethick0;
A8:MA(C,240),Color00ff00,linethick0;
指导线: EMA((EMA(C,4)+EMA(C,6)+EMA(C,12)+EMA(C,24))/4,2),linethick0,ColorFFffFF;
界: MA(CLOSE,21),linethick0,Color00FFFF;
上限: 界+3*STD(C,20),linethick0,Color00FFFF;
卖: 界+2*STD(C,20),linethick0,ColorFF00FF;
买: 界-2*STD(C,20),linethick0,ColorF0FF00;
下限: 界-2.9*STD(close,20),linethick0,Color00FF00;
DRAWICON(((c>界 and 指导线>界 and cross(界,l))),l,8),ALIGN0,pxdn0;
DRAWTEXT(((c>界 and 指导线>界 and cross(指导线,界))),l,'买点'),ALIGN0,pxdn20;
DRAWTEXT(((c>界 and 指导线>界 and cross(指导线,界))),l,'⊕'),ALIGN0,pxdn5,Colorffffff;
DRAWICON(cross(H,上限),h,10),ALIGN0,pxup0;
DRAWICON(cross(上限,H),h,9),ALIGN0,pxup0;
DRAWICON((h>上限 and cross(h,上限)),h,12),ALIGN0,pxup0;
DRAWTEXT(cross(H,上限),H,' ̄'),ALIGN0,pxup0,Color00ffff;
DRAWICON((h>卖 and cross(上限,H)),h,9),ALIGN0,pxup0;
DRAWTEXT(cross(上限,H),H,' ̄'),ALIGN0,pxup0,Colorff00ff;
DRAWTEXT(cross(下限,L),l,'限'),ALIGN0,pxdn5,Color00ff00;
DRAWTEXT(cross(下限,L),l,' ̄'),ALIGN0,pxdn5,Color00ff00;
DRAWTEXT(cross(买,L),l,'△'),ALIGN0,pxdn5,Colorffff00;
DRAWTEXT(cross(买,L),l,' ̄'),ALIGN0,pxdn5,Colorffff00;
DRAWTEXT(cross(买,C),L,'▲'),ALIGN0,pxdn5,Colorffff00;
DRAWTEXT(cross(买,C),L,' ̄'),ALIGN0,pxdn5,Colorffff00;
年:MA(CLOSE,26),color00ff00,LINETHICK0;
STICKLINE(C>=年 AND C>=O,C,O,7,0),COLOR0000aa;
STICKLINE(C>=年 AND C>=O,C,O,5,0),COLOR0000cc;
STICKLINE(C>=年 AND C>=O,C,O,3,0),COLOR0000ee;
STICKLINE(C>=年 AND C>=O,C,O,1,0),COLORRED;
STICKLINE(C>=年 AND C>=O,H,L,0,0),COLORRED;
STICKLINE(C>=年 AND C<O,C,O,7,0),COLOR0000aa;
STICKLINE(C>=年 AND C<O,C,O,5,0),COLOR0000cc;
STICKLINE(C>=年 AND C<O,C,O,3,0),COLOR0000ee;
STICKLINE(C>=年 AND C<O,C,O,1,0),COLORRED;
STICKLINE(C>=年 AND C<O,O,H,0,0),COLORRED;
STICKLINE(C>=年 AND C<O,C,L,0,0),COLORRED;
STICKLINE(C<年 AND C>O,C,O,7,0),COLORaaaa00;
STICKLINE(C<年 AND C>O,C,O,5,0),COLORcccc00;
STICKLINE(C<年 AND C>O,C,O,3,0),COLOReeee00;
STICKLINE(C<年 AND C>O,C,O,1,0),COLORffff00;
STICKLINE(C<年 AND C<=O,C,O,7,0),COLORaaaa00;
STICKLINE(C<年 AND C<=O,C,O,5,0),COLORcccc00;
STICKLINE(C<年 AND C<=O,C,O,3,0),COLOReeee00;
STICKLINE(C<年 AND C<=O,C,O,1,0),COLORffff00;
STICKLINE(C<年 AND C<=O,H,L,0,0),COLORffff00;
STICKLINE(C<年 AND C>O,C,H,0,0),COLORffff00;
STICKLINE(C<年 AND C>O,O,L,0,0),COLORffff00;
VAR1:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR2:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
DRAWTEXT(CROSS(VAR2,MA(VAR3,6)),L ,'B'),color208fFF,ALIGN0,pxdn5;
DRAWtext(CROSS(h,年) and CROSS(VAR2,MA(VAR3,6)),l,'B'),coloryellow,ALIGN0,pxdn5;
DRAWtext(CROSS(年,l) and c<=年,h,'S'),colorgreen,ALIGN0,pxup25;
dp:=if(c=INDEXC,0,1);
gj:=AMOUNT/v/100;
明日阻力:=l+(gj-l)+(c-l);
明日支撑:=l+(c-gj);
今日阻力:=REF(明日阻力 , 1);
今日支撑:=REF(明日支撑 , 1);{
STICKLINE(a1 and dp=1 and c>=今日阻力,今日阻力,今日阻力,30,0),Color0000FF;
STICKLINE(a1 and dp=1 and c<今日阻力,今日阻力,今日阻力,30,0),Color00FF00;
STICKLINE(a1 and dp=1 and c>=今日支撑,今日支撑,今日支撑,30,0),ColorFF00FF;
STICKLINE(a1 and dp=1 and c<今日支撑,今日支撑,今日支撑,30,0),ColorFF0000;}
DRAWTEXT(TT,hh,'  今日支撑=:'+NUMTOSTR(今日支撑 ,2 )),ColorFF00FF,pxdn100,align4;
DRAWTEXT(TT,hh,'  今日阻力=:'+NUMTOSTR(今日阻力 ,2 )),ColorFFFF00,pxdn127,align4;
DRAWTEXT(TT,hh,'  明日支撑=:'+NUMTOSTR(明日支撑 ,2 )),Color00FFFF,pxup127,align3;
DRAWTEXT(TT,hh,'  明日阻力=:'+NUMTOSTR(明日阻力 ,2 )),Color00FF00,pxup100,align3;
DD:=FINANCE( 1);
SS:=FINANCE( 7);
FF:=FINANCE(18);
GG:=FINANCE(33);
zz:=FINANCE(53);
JJ:=FINANCE(40);
MM:=JJ/SS;
HH:=DYNAINFO(39);
DRAWTEXT(barpos=SYSPARAM(2),H,'总股本'+NUMTOSTR(DD,0)+'万股)' +' 流通A股'+NUMTOSTR(SS,0)+'万股)'+' 市盈率:'+NUMTOSTR(HH,2)+'%'+'  每股收益:'+NUMTOSTR(GG,3)+' 主营业务增长率:'+NUMTOSTR(zz,2)+'%'+' 经营现金流量'+NUMTOSTR(MM,2)),COLORbbffff,,ALIGN5,pxdn5;
回复

使用道具 举报

头像被屏蔽
发表于 2010-10-27 18:14 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
回复

使用道具 举报

发表于 2010-10-27 20:24 | 显示全部楼层
超级MACD 通用
回复

使用道具 举报

发表于 2010-10-27 21:20 | 显示全部楼层
谢谢分享!!!!!!!!!!!!!!!
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|股海明灯官网 ( 京ICP备18020431号 )

GMT+8, 2024-11-28 19:42 , Processed in 0.096633 second(s), Total 9, Slave 8 queries , Gzip On, MemCached On.

Powered by Discuz! X3.5

Copyright © 2001-2024 Tencent Cloud.

快速回复 返回顶部 返回列表