标题: [大智慧]大智慧金钱吊吊主图源码公式 [打印本页] 作者: 我是一个兵 时间: 2009-11-5 14:39 标题: [大智慧]大智慧金钱吊吊主图源码公式 大智慧金钱吊吊主图源码公式：
n:5,1,100
AA05:MA(C,5),linethick0;
MM5:=(c-AA05)/AA05*100;
BB05:=atan((aa05/ref(aa05,1)-1)*100)*180/3.1416;
NN5:=sma(ema((AA05-ref(AA05,1))/ref(AA05,1),3)*100,3,1);
NNNN5:ema((NN5-ref(NN5,1)),3),linethick0;
AA10:MA(C,10),linethick0;
AA20:=MA(c,20);
BB10:=atan((aa10/ref(aa10,1)-1)*100)*180/3.1416;
AA30:MA(C,30),linethick0;
MM30:(c-AA30)/AA30*100,linethick0;
Var1:=(AA20-AA30)>ref((AA20-AA30),1) and AA20>ref(aa20,1) and AA30>ref(AA30,1);
Var2:=(AA30-AA20)<ref((AA30-AA20),1) and AA20<ref(aa20,1) and AA30<ref(AA30,1);
BB30:=atan((aa30/ref(aa30,1)-1)*100)*180/3.1416;
强势:=filter(BB30>30 and BB10>45 and cross(BB05,60),10);
加仓:=filter(count(cross(BB05,30),5)>=1 and AA05>ref(aa05,1) and MM30>ref(MM30,1) and AA10>ref(AA10,1)
and NNNN5>ref(NN5,1) and NN5>ref(NN5,1) ,10) ;
清仓:=filter(count(cross(30,BB05),5)>=1 and (c>AA30 or O>AA30) and AA05<ref(aa05,1) and MM30<ref(MM30,1) and AA10<ref(AA10,1),10);
JC:=cross(0,MM5) and MM30<ref(MM30,1) and AA10>ref(AA10,1) ;
减仓:=filter(JC,10);
MR:=count(cross(MM30,0),3)>=1 and MM30>ref(MM30,1) and AA05>ref(AA05,1) and (c/ref(c,1)-1)*100>5 and ref(c,1)<AA30;
买入:=filter(MR,10);
DRAWTEXT((买入),low*0.945,'⊙'),linethick2,ALIGN1,COLORYELLOW;
DRAWTEXT((买入),low*0.965,'⊙'),linethick2,ALIGN1,COLORYELLOW;
DRAWTEXT((买入),low*0.985,'⊙'),linethick2,ALIGN1,COLORYELLOW;
drawtext(减仓,high*1.06,'◇'),ALIGN2,linethick3,colorcyan;
DRAWTEXT((加仓),low*0.985,'⊙'),linethick2,ALIGN1,colorWhite;
DRAWTEXT((加仓),low*0.965,'⊙'),linethick2,ALIGN1,colorWhite;
DRAWTEXT((加仓),low*0.945,'⊙'),linethick2,ALIGN1,colorWhite;
DRAWTEXT((强势),low*0.985,'⊙'),linethick2,ALIGN1,COLORred;
DRAWTEXT((强势),low*0.965,'⊙'),linethick2,ALIGN1,COLORred;
现价:CLOSE,POINTDOT,Color000F89;
VAR1:=(2*CLOSE+HIGH+LOW+OPEN)/5;
A1: (EMA(VAR1,3)+EMA(VAR1,6)+EMA(VAR1,12)+EMA(VAR1,24))/4,COLORff9900;
A2: EMA(A1,2),COLORff9900;
A3: EMA(A2,2),COLORff9900;
A4: EMA(A3,2),COLORff9900;
A5: EMA(A4,2),COLORff9900;
A6: EMA(A5,2),COLORff9900;
A7: EMA(A6,2),COLORff9900;
PARTLINE(A1,A1>REF(A1,1)),COLOR0ffff0;
PARTLINE(A2,A2>REF(A2,1)),COLOR0ffff0;
PARTLINE(A3,A3>REF(A3,1)),COLOR0ffff0;
PARTLINE(A4,A1>REF(A4,1)),COLOR0ffff0;
PARTLINE(A5,A1>REF(A5,1)),COLOR0ffff0;
PARTLINE(A6,A6>REF(A6,1)),COLOR0ffff0;
PARTLINE(A7,A7>REF(A7,1)),COLOR0ffff0;
wN:=N;{原码 N:=3;}
wA1:=REF(H,wN)=HHV(H,2*wN+1); wB1:=FILTER(wA1,wN);
wC1:=BACKSET(wB1,wN+1);
wD1:=FILTER(wC1,wN);{高点}
wA2:=REF(L,wN)=LLV(L,2*wN+1); wB2:=FILTER(wA2,wN);
wC2:=BACKSET(wB2,wN+1);
wD2:=FILTER(wC2,wN);{低点}
wR1:=BACKSET(DISPSTATUS=2,BARSLAST(wD1)+1); wS1:=wR1>REF(wR1,1); {前一高}
wT1:=BACKSET(DISPSTATUS=2,BARSLAST(wD2)+1); wU1:=wT1>REF(wT1,1); {前一低}
wR2:=BACKSET(wS1,REF(BARSLAST(wD1),1)+2); wS2:=wR2>REF(wR2,1); {前二高}
wT2:=BACKSET(wU1,REF(BARSLAST(wD2),1)+2); wU2:=wT2>REF(wT2,1); {前二低}
wR3:=BACKSET(wS2,REF(BARSLAST(wD1),1)+2); wS3:=wR3>REF(wR3,1); {前三高}
wT3:=BACKSET(wU2,REF(BARSLAST(wD2),1)+2); wU3:=wT3>REF(wT3,1); {前三低}
wR4:=BACKSET(wS3,REF(BARSLAST(wD1),1)+2); wS4:=wR4>REF(wR4,1); {前四高}
wT4:=BACKSET(wU3,REF(BARSLAST(wD2),1)+2); wU4:=wT4>REF(wT4,1); {前四高}
DRAWLINE(wS2,H,wS1,H,1),Color0000Ff; {★压力１:}
DRAWLINE(wU2,L,wU1,L,1),POINTDOT,Color0000FF;{★支撑１:}
DRAWLINE(wS3,H,wS2,H,1),Color888000; {★压力２:}
DRAWLINE(wU3,L, wU2,L,1),POINTDOT,Color888000;{★支撑２:}
{DRAWLINE(wS4,H,wS3,H,1),Color00ccCC;{★压力３:}
{DRAWLINE(wU4,L, wU3,L,1),POINTDOT,Color00ccCC;{★支撑３;}
平均成本:=COST(50);
获利盘:=WINNER(CLOSE)*100;
DRAWTEXTREL(20,400,'获利盘:'+获利盘+'% '),colormagenta;
DRAWTEXTREL(20,500,'平均成本:'+平均成本),colormagenta;
AA05:=MA(C,5);
五日乖离率:=(C-AA05)/AA05*100;
BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;
速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);
加速度5:=EMA((速度5-REF(速度5,1)),3);
AA10:=MA(C,10);
AA20:=MA(C,20);BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;
AA30:=MA(C,30);
三拾日乖离率:=(C-AA30)/AA30*100;
VAR11:=(AA20-AA30)>REF((AA20-AA30),1)
AND AA20>REF(AA20,1) AND AA30>REF(AA30,1);
VAR22:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND
AA30<REF(AA30,1);
BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416;
强势狙击:=FILTER(BB30>30 AND BB10>45 AND
CROSS(BB05,60),10);
加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND
AA05>REF(AA05,1) AND 三拾日乖离率>REF(三拾日乖离率,1) AND
AA10>REF(AA10,1)
AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) ;
清仓:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND (C>AA30 OR O>AA30) AND
AA05<REF(AA05,1) AND 三拾日乖离率<REF(三拾日乖离率,1) AND
AA10<REF(AA10,1),10);
DRAWICON(加仓 ,LOW*0.99,9);
DRAWICON(清仓 ,HIGH*1.01,4);
DRAWICON(强势狙击 ,LOW*0.99,5);
VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);
VAR2222:=CROSS(VAR1111,0.9);
VAR3333:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);
VAR4444:=CROSS(VAR3333,0.9);
压力: REF(HIGH,BARSLAST(Var2222)), POINTDOT,ColorEA91B5;
STICKLINE(CLOSE,REF(HIGH,BARSLAST(Var2222)),REF(HIGH,BARSLAST(Var2222)),5,0),ColorEA91B5;
支撑: REF(LOW,BARSLAST(Var4444)), POINTDOT,Color00b4ff;
STICKLINE(CLOSE,REF(LOW,BARSLAST(Var4444)),REF(LOW,BARSLAST(Var4444)),5,0),Color00b4ff;