|
论坛版主
指标公式版主 - 帖子
- 3096
- 积分
- 15869
- 注册时间
- 2007-4-11
|
45楼
大 中
小 发表于 2008-3-7 11:53 只看该作者
引用:关于MACD的几个指标~~~~~~
MACD 超前
SQX:=(C-MA(CLOSE,13))*100;
Q:EMA(MA(sqx,7),1),COLOR00ffff,;
W:EMA(Q,7),COLORff33ff,;
(Q-W)*2,COLORSTICK;
drawIcon(Cross(Q,W) AND Q<20,W,1); 引用:{MACD+K}
DIFF: EMA(CLOSE,12) - EMA(CLOSE,26),LINETHICK2;
DEA1:=EMA(DIFF,9);
MACD: 2*(DIFF-DEA1),LINETHICK0;
s1:=MACD<ref(MACD,1)and MACD>0;
s2:=MACD<ref(MACD,1)/2 and MACD<0;
STICKLINE(MACD>=0,MACD,0,8,1),COLORRED;
STICKLINE(s1,0,MACD,8,1),COLOR00ffff;
STICKLINE(s2,0,MACD,8,0),COLORffffff;
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,8,1),COLORffff00;
DEA: EMA(DIFF,9),COLORGREEN;
PARTLINE(DIFF>DEA,DIFF),COLORff11cc,LINETHICK2;
PARTLINE(DIFF>DEA AND DIFF<0,DIFF),COLORred,LINETHICK2;
DRAWICON(CROSS(DIFF,DEA),DIFF-0.01,6);
DRAWICON(CROSS(DEA,DIFF),DIFF,11);
Var1:=EMA(CLOSE,34)-EMA(CLOSE,5);
Var2:=EMA(Var1,5);
趋势:=(-3)*(Var1-Var2), COLORSTICK;
EXPLAIN(趋势>0,'Z线趋势上升中\n');
EXPLAIN(趋势<0,'Z线趋势下降中\n');
EXPLAIN(cross(趋势,0),'Z线考虑买入\n');
EXPLAIN(cross(0,趋势),'Z线考虑卖出\n');
Var11:=ma((v/(h-l)),4);
Var33:=abs(c-o);
Var44:=v/(h-l);
TR := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SUM(IF(HD>0 AND HD>LD,HD,0),14);
DMM:= SUM(IF(LD>0 AND LD>HD,LD,0),14);
PDI:= DMP*100/TR;
MDI:= DMM*100/TR;
ADX:= MA(ABS(MDI-PDI)/(MDI+PDI)*100,6);
ADXR:=(ADX+REF(ADX,6))/2;
EXPLAIN(cross(pdi,mdi),'PDI线从下向上突破MDI线，显示有新多头进场，为买进信号\n');
EXPLAIN(cross(mdi,pdi),'PDI线从上向下跌破MDI线，显示有新空头进场，为卖出信号\n');
EXPLAIN(adx>ref(adx,1),'ADX值持续高于前一日，行情将维持原趋势\n');
EXPLAINEX(1=1,'换手率=',vol/CAPITAl*100,2,1);
explain((vol/CAPITAl)>0.075,'换手过大，小心主力出逃，短期头部\n');
wr:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
EXPLAINEX(1=1,'威廉指标（短标）=',wr,2,1);
explain(wr>-20,'W&R超买，短线即将见顶，应及时卖出\n');
explain(wr<-80,'W&R超卖，短线即将见底，应伺机买进\n');
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
EXPLAINEX(1=1,'相对强弱RSI1=',RSI1,2,1);
EXPLAIN(RSI1>85,'6日RSI超买,防止回挡\n');
EXPLAIN(RSI1>80,'6日RSI向上突破85，超买,考虑卖出\n');
EXPLAIN(RSI1<15,'6日RSI超卖,随时有可能反弹\n');
EXPLAIN(RSI1<15,'6日RSI向下跌破15，超卖，考虑买入\n');
EXPLAIN(CROSS(RSI1,15),'6日RSI向上突破15，买进信号\n');
EXPLAIN(CROSS(RSI1,85),'6日RSI向下跌破85，卖出信号\n');
psy:=COUNT(CLOSE>REF(CLOSE,1),12)/12*100;
EXPLAINEX(1=1,'12天心理线,PSY=',psy,2,1);
EXPLAINEX(1=1,'获利盘比例=',WINNER(c)*100,2,1);
EXPLAINEX(1=1,'套牢盘比例=',100-WINNER(c)*100,2,1);
Aa:=(EMA(C,30)*2+MA(C,60))/3;
Ra:=(VOL*CLOSE);
VL1a:=EMA(Ra,13)/EMA(VOL,13);
VL2a:=EMA(Ra,60)/EMA(VOL,60);
VLa:=EMA((VL1a+VL2a)/2,3);
分水岭:=ma((Aa+VLa)/2,1);
EXPLAINEX(1=1,'分水岭（中长标）=',分水岭,2,1);
EXPLAIN(close>分水岭,'股价在分水岭之上,大势属多头,可积极做多\n');
EXPLAIN(close<分水岭,'股价在分水岭之下,大势属空头,超跌只能抢反弹\n');
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
UPR:=BBI+3*STD(BBI,10);
DWN:=BBI-3*STD(BBI,10);
var55:=(UPR-DWN)/UPR<0.03;
var56:=(UPR-DWN)/UPR>0.18;
var57:=(ma(c,60)-ma(c,5))/ma(c,60)>0.15;
var58:=(ma(c,5)-ma(c,60))/ma(c,5)>0.15;
EXPLAIN(var55,'多空布林收敛中，有变盘的可能，上下自己分析\n');
EXPLAIN(var57 and var56 and c>o ,'布林上下乖离太大，有反弹的可能\n'); 引用:{MACD 实战逃顶}
DIFF : EMA(CLOSE,12) - EMA(CLOSE,26);
DEA : EMA(DIFF,9);
MACD : 2*(DIFF-DEA), COLORSTICK;
D1:=EMA(C,3)-EMA(C,8);
D2:=EMA(O,3)-EMA(O,8);
D3:=EMA(H,3)-EMA(H,8);
D4:=EMA(L,3)-EMA(L,8);
DRAWICON(cross(diff,d1) and diff>0.1 ,d3+0.1,2);
STICKLINE(D1>=D2,D1,D2,8,0),COLOR0055AA;
STICKLINE(D1<=D2,D1,D2,8,0),COLOR006600;
STICKLINE(D1>=D2,D1,D2,5,0),COLOR0077CC;
STICKLINE(D1>=D2,D1,D2,3,0),COLOR0099DD;
STICKLINE(D1>=D2,D3,D4,0,0),COLOR00BBFF;
STICKLINE(D1<=D2,D1,D2,5,0),COLOR009900;
STICKLINE(D1<=D2,D1,D2,3,0),COLOR00BB00;
STICKLINE(D1<=D2,D3,D4,0,0),COLOR00EE00; 引用:{紫气MACD交易 飞狐解盘 N,20,1,30}
DIFF: EMA(CLOSE,12) - EMA(CLOSE,26),COLORYELLOW,LINETHICK2;
DEA1:=EMA(DIFF,9);
MACD: 2*(DIFF-DEA1),LINETHICK0;
STICKLINE(MACD>0,0,MACD,8,1),COLORRED;
STICKLINE(MACD<0,0,MACD,8,1),COLORCYAN;
DEA: EMA(DIFF,9),COLORGREEN;
PARTLINE(DIFF>DEA,DIFF),COLORff11cc,LINETHICK2;
PARTLINE(DIFF>DEA AND DIFF<0,DIFF),COLORred,LINETHICK2;
DRAWICON(CROSS(DIFF,DEA),DIFF-0.01,6);
DRAWICON(CROSS(DEA,DIFF),DIFF,11);
V1:=EMA(EMA(CLOSE,n),n);
V2:=100*WINNER(CLOSE*0.95);
控盘力度:(V1-REF(V1,1))/REF(V1,1)*10,colorwhite,LINETHICK1;
无庄控盘:IF(控盘力度<0,控盘力度,0),LINETHICK2,COLOR00ff00,STICK;
有庄控盘:IF(控盘力度>REF(控盘力度,1) AND 控盘力度>0,控盘力度,0),LINETHICK2,COLORff00ff,STICK;
主力减仓:IF(控盘力度< REF(控盘力度,1) AND 控盘力度>0,控盘力度,0),LINETHICK2,COLOrBLUE,STICK;
高度控盘:IF(V2>50 AND COST(85)< CLOSE AND 控盘力度>0,控盘力度,0),LINETHICK2,COLORRED,STICK;
开始控盘:IF(CROSS(控盘力度,0),0.2,0),LINETHICK2,COLORFF00FF;
Var1:=EMA(CLOSE,34)-EMA(CLOSE,5);
Var2:=EMA(Var1,5);
趋势:=(-3)*(Var1-Var2), COLORSTICK;
趋势,colorred;
长期趋势:EMA(Var1,10)*(-1);
EXPLAIN(趋势>0,'Z线趋势上升中'),COLORRED;
EXPLAIN(趋势<0,'Z线趋势下降中'),COLORGREEN;
EXPLAIN(cross(趋势,0),'Z线考虑买入'),COLORCYAN;
EXPLAIN(cross(0,趋势),'Z线考虑卖出'),COLORCYAN;
Var11:=ma((v/(h-l)),4);
Var33:=abs(c-o);
Var44:=v/(h-l);
EXPLAIN(Var44<var11 AND Var33<ma(Var33,4),'资金无入场意愿，萎缩中'),COLORCYAN;
EXPLAIN(Var44<var11 AND Var33>ma(Var33,4),'场内资金运作行为'),COLORRED;
EXPLAIN(Var44>var11 AND Var33<ma(Var33,4),'多空双方激烈争夺中'),colorwhite;
EXPLAIN(Var44>var11 AND Var33>ma(Var33,4),'场外资金介入（或出局）意愿强烈'),coloryellow;
TR := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14),colormagenta;
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SUM(IF(HD>0 AND HD>LD,HD,0),14);
DMM:= SUM(IF(LD>0 AND LD>HD,LD,0),14);
PDI:= DMP*100/TR;
MDI:= DMM*100/TR;
ADX:= MA(ABS(MDI-PDI)/(MDI+PDI)*100,6);
ADXR:=(ADX+REF(ADX,6))/2;
EXPLAIN(cross(pdi,mdi),'PDI线从下向上突破MDI线，显示有新多头进场，为买进信号'),COLORRED;
EXPLAIN(cross(mdi,pdi),'PDI线从上向下跌破MDI线，显示有新空头进场，为卖出信号'),COLORGREEN;
EXPLAIN(adx>ref(adx,1),'ADX值持续高于前一日，行情将维持原趋势'),coloryellow;
EXPLAIN(adx<ref(adx,1) and adx<20,'ADX值递减，降到20以下，且横向行进时，市场气氛为盘整'),colorwhite;
EXPLAIN(adx<ref(adx,1) and ref(adx,1)<ref(adx,2) and ref(adx,2)>ref(adx,3) and ref(adx,3)>ref(adx,4),'ADX值从上升倾向转为下降时，表明行情即将反转'),colorblue;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
EXPLAINEX(1=1,'（中标）macd=',macd,2,1),colorwhite;
EXPLAIN(macd>0 and diff>0,'大势属多头市场'),COLORRED;
EXPLAIN(macd>0.35,'超买中，随时有可能见顶回落'),COLORGREEN;
EXPLAIN(macd<0 and diff<0,'大势属空头市场'),coloryellow;
EXPLAIN(macd<-0.35,'超卖中，随时有可能反弹'),colorblue;
EXPLAIN(cross(diff,dea) and cross(macd,0),'上穿o轴，可考虑买入');
EXPLAIN(cross(j,k) and k<50,'KDJ金叉'),coloryellow;
EXPLAIN(cross(k,d) and k>70,'KDJ死叉'),colorblue;
EXPLAIN(j>84,'KDJ指标高位');EXPLAIN(j<16,'KDJ指标低位'),COLORGREEN;
TYP := (HIGH + LOW + CLOSE)/3;
cci:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
EXPLAIN(cci<-180,'CCI指标底位，买入机会'),COLORRED;
EXPLAIN(cci>180,'CCI指标高位，卖出机会'),COLORGREEN;
EXPLAINEX(1=1,'（短标）cci=',cci,2,1),colorblue;
EXPLAINEX(1=1,'换手率=',vol/CAPITAl*100,2,1),COLORGREEN;
explain((vol/CAPITAl)>0.075,'换手过大，小心主力出逃，短期头部'),coloryellow;
wr:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
EXPLAINEX(1=1,'威廉指标（短标）=',wr,2,1),coloryellow;
explain(wr>-20,'W&R超买，短线即将见顶，应及时卖出'),colorblue;
explain(wr<-80,'W&R超卖，短线即将见底，应伺机买进'),colorwhite;
MTM := CLOSE-REF(CLOSE,6);
MTMMA := MA(MTM,6);
EXPLAIN(CROSS(MTM,MTMMA) and MTMMA<-0.8,'MTM从下向上突破MTMMA，买入信号'),COLORRED;
EXPLAIN(CROSS(MTMMA,MTM) and MTMMA>0.8,'MTM从上向下跌破MTMMA，卖出信号'),COLORGREEN;
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
EXPLAINEX(1=1,'相对强弱RSI1=',RSI1,2,1),COLORRED;
EXPLAIN(RSI1>85,'6日RSI超买,防止回挡'),colorblue;
EXPLAIN(RSI1>80,'6日RSI向上突破85，超买,考虑卖出'),colormagenta;
EXPLAIN(RSI1<15,'6日RSI超卖,随时有可能反弹'),colorblue;
EXPLAIN(RSI1<15,'6日RSI向下跌破15，超卖，考虑买入'),colormagenta;
EXPLAIN(CROSS(RSI1,15),'6日RSI向上突破15，买进信号'),COLORRED;
EXPLAIN(CROSS(RSI1,85),'6日RSI向下跌破85，卖出信号'),colormagenta;
psy:=COUNT(CLOSE>REF(CLOSE,1),12)/12*100;
EXPLAINEX(1=1,'12天心理线,PSY=',psy,2,1),COLORGREEN;
EXPLAINEX(1=1,'获利盘比例=',WINNER(c)*100,2,1),coloryellow;
EXPLAINEX(1=1,'套牢盘比例=',100-WINNER(c)*100,2,1),colorblue;
Aa:=(EMA(C,30)*2+MA(C,60))/3;
Ra:=(VOL*CLOSE);
VL1a:=EMA(Ra,13)/EMA(VOL,13);
VL2a:=EMA(Ra,60)/EMA(VOL,60);
VLa:=EMA((VL1a+VL2a)/2,3);
分水岭:=ma((Aa+VLa)/2,1);
EXPLAINEX(1=1,'分水岭（中长标）=',分水岭,2,1),coloryellow;
EXPLAIN(close>分水岭,'股价在分水岭之上,大势属多头,可积极做多'),COLORRED;
EXPLAIN(close<分水岭,'股价在分水岭之下,大势属空头,超跌只能抢反弹'),colorblue;
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
UPR:=BBI+3*STD(BBI,10);
DWN:=BBI-3*STD(BBI,10);
var55:=(UPR-DWN)/UPR<0.03;
var56:=(UPR-DWN)/UPR>0.18;
var57:=(ma(c,60)-ma(c,5))/ma(c,60)>0.15;
var58:=(ma(c,5)-ma(c,60))/ma(c,5)>0.15;
EXPLAIN(var55,'多空布林收敛中，有变盘的可能，上下自己分析'),coloryellow;
EXPLAIN(var57 and var56 and c>o ,'布林上下乖离太大，有反弹的可能'),COLORRED;
EXPLAIN(var58 and var56 and c<o ,'布林上下乖离太大，有回落的可能'),colorblue; 引用:{HZ长牛线-MACD-ROC }
DIFF : EMA(CLOSE,12) - EMA(CLOSE,26);
DEA : EMA(DIFF,9);
MACD : 2*(DIFF-DEA)*80, COLORSTICK;
ROC1:=(CLOSE-REF(CLOSE,14))/REF(CLOSE,14)*100;
ROC2:=(CLOSE-REF(CLOSE,11))/REF(CLOSE,11)*100;
提前量:MA(ROC2,6),coloryellow,LINETHICK2;
HZ1:=EMA(ROC1,13),LINETHICK1,coloRYELLOW;
HZ2:EMA(ROC1,4),coloRgreen,LINETHICK1;
HZ3:EMA(HZ2,2),coloRgreen,LINETHICK1;
HZ4:EMA(HZ3,2),coloRgreen,LINETHICK1;
HZ5:EMA(HZ4,2),colormagenta,LINETHICK1;
HZ6:EMA(HZ5,2),colormagenta,LINETHICK1;
HZ7:EMA(HZ6,2),colormagenta,LINETHICK1;
起步线:-13,pointdot,colorgreen;
强势线:0,pointdot,LINETHICK1,colorMAGENTA;
主图KDJ and 主图MACD 迭加(原码)
RSV1:=(C-LLV(L,6))/(HHV(H,6)-LLV(L,6));
RSV2:=(RSV1-0.5)/5*EMA(C,20);
RSVK:=SMA(RSV2,3,1);
RSVD:=SMA(RSVK,3,1);
RSVJ:=RSVK*3-RSVD*2;
K:RSVK+EMA(C,20),COLORWHITE;
D:RSVD+EMA(C,20),COLORYELLOW;
J:RSVJ+EMA(C,20),COLORRED;
UPPERL:MA(H,30)*1.13,COLORMAGENTA;
UPPERS:MA(H,5)*1.03,COLORGREEN;
LOWERS:MA(L,5)*0.97,COLORFF9900;
LOWERL:MA(L,30)*0.85,COLORCYAN;
DIFF1:=EMA(CLOSE,4)-EMA(CLOSE,10);
DEA1:=EMA(DIFF1,5);
DIFF:DIFF1*4.5+EMA(C,4)*0.9,COLORWHITE;
DEA:DEA1*4.5+EMA(C,5)*0.9,COLORYELLOW;
STICKLINE(DIFF>DEA,DIFF,DEA,3,0),COLORmagenta;
STICKLINE(C>=O,C,O,7,0),COLORRED;
STICKLINE(C>=O,C,O,4,0),COLORB0B0FF;
aa:=STICKLINE(C>=O,C,O,2,0),COLORYELLOW;
STICKLINE(C>=O,H,L,0,0),COLORYELLOW;
STICKLINE(C<=O,C,O,7,0),COLORFF2020;
STICKLINE(C<=O,C,O,4,0),COLORFF6600;
BB:=STICKLINE(C<=O,C,O,2,0),COLORCYAN;
STICKLINE(C<=O,H,L,0,0),COLORCYAN; [ 本帖最后由 蓝鼠 于 2008-3-8 09:06 编辑 ] 附件: 您所在的用户组无法下载或查看附件
骤雨过，琼珠乱撒，打遍新荷。
人生百年有几，念良辰美景，休放虚过。
穷通前定，何用苦张罗。
命友邀宾玩赏，对芳尊浅酌低歌。
且酩酊，任他两轮日月，来往如梭。
|
