再发多空波段----------（原码）大智慧2+通达信
出现红心为强势，蓝色为警惕，出现黄色则可留意也即表示空头力量有衰竭迹象。
原码：
{大智慧2}
{n1=3,1,12}
VAR1:=(CLOSE+HIGH+LOW+OPEN)/4;
VAR2:=SUMBARS(VOL,CAPITAL);
VAR3:=HHV(VAR1,VAR2);
VAR4:=LLV(VAR1,VAR2);
VAR5:=(2*VAR1-VAR4-REF(VAR4,1))/(VAR3-VAR4);
VAR6:=(VAR1-VAR4)/(VAR3-VAR4);
VAR7:=IF(VAR1<=VAR4,VAR5*60,VAR6*60);
VAR8:=600*(EMA(CLOSE,3)-EMA(LOW,30))/EMA(LOW,30);
VAR9:=EMA(VAR8,7);
VARA:=(WINNER(120*CLOSE/100)-WINNER(100*CLOSE/100))*100;
VARB:=(-100)*(WINNER(120*CLOSE/100)-WINNER(100*CLOSE/100))+5;
VARC:=HHV(HIGH,9)-LLV(LOW,9);
VARD:=HHV(HIGH,9)-CLOSE;
VARE:=CLOSE-LLV(LOW,9);
VARF:=VARD/VARC*100-70;
VAR10:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VAR11:=(2*CLOSE+HIGH+LOW)/4;
VAR12:=SMA(VARE/VARC*100,3,1);
VAR13:=LLV(LOW,34);
VAR14:=SMA(VAR12,3,1)-SMA(VARF,9,1);
VAR15:=IF(VAR14>100,VAR14-100,0);
VAR16:=HHV(HIGH,34);
VAR17:=EMA((VAR11-VAR13)/(VAR16-VAR13)*100,8);
VAR18:=EMA(VAR17,5);
STICKLINE(VAR17-VAR18>0,VAR17,VAR18,10,1),COLORRED ;
STICKLINE(VAR17-VAR18<0,VAR17,VAR18,10,1),COLORGREEN ;
DK:(VAR17-VAR18)*20,LINETHICK0;
STICKLINE(dk>0 and dk>ref(dk,1) and c>ref(c,1),VAR17,VAR18,6,0),COLORRED ;
STICKLINE(dk>0 and dk<ref(dk,1) and c<ref(c,1) ,VAR17,VAR18,6,0),COLORcyan ;
STICKLINE(dk<0 and dk>ref(dk,1) and c>ref(c,1),VAR17,VAR18,6,0),COLORyellow ;
{以下为大智慧2“玩笑”策略版，可要可不要}
DRAWRECTREL( 0,0 ,150 ,999 , rgb(0,0,255));
DRAWRECTREL( 0,299 ,150 ,301 , rgb(255,150,255));
DRAWRECTREL(115,300-DK ,125 ,300 ,if(dk>0, rgb(255,0,0),rgb(0,255,0 )));
DRAWRECTREL(105,300-ref(DK,1) ,115 ,300 ,if(ref(DK,1)>0, rgb(255,0,0),rgb(0,255,0 )));
DRAWRECTREL(95,300-ref(DK,2) ,105 ,300 ,if(ref(DK,2)>0, rgb(255,0,0),rgb(0,255,0 )));
DRAWRECTREL(85,300-ref(DK,3) ,95 ,300 ,if(ref(DK,3)>0, rgb(255,0,0),rgb(0,255,0 )));
DRAWRECTREL(75,300-ref(DK,4) ,85 ,300 ,if(ref(DK,4)>0, rgb(255,0,0),rgb(0,255,0 )));
DRAWRECTREL(65,300-ref(DK,5) ,75 ,300 ,if(ref(DK,5)>0, rgb(255,0,0),rgb(0,255,0 )));
DRAWRECTREL(55,300-ref(DK,6) ,65 ,300 ,if(ref(DK,6)>0, rgb(255,0,0),rgb(0,255,0 )));
DRAWRECTREL(45,300-ref(DK,7) ,55 ,300 ,if(ref(DK,7)>0, rgb(255,0,0),rgb(0,255,0 )));
DRAWRECTREL(35,300-ref(DK,8) ,45 ,300 ,if(ref(DK,8)>0, rgb(255,0,0),rgb(0,255,0 )));
DRAWRECTREL(25,300-ref(DK,9) ,35 ,300 ,if(ref(DK,9)>0, rgb(255,0,0),rgb(0,255,0 )));
DRAWTEXTREL( 10,700 ,'观望'),LINETHICK3,colorred;
DRAWTEXTREL( 10,840 ,'持股'),LINETHICK3,colorgreen;
DRAWRECTREL( 7,670 ,60 ,990 ,0 );
DRAWRECTREL( 7,if(dk>0,670,840) ,60 ,if(dk>0,840,990) ,if(dk>0,rgb(255,0,0),rgb(0,255,0) ));
DRAWTEXTREL( 30,550 ,'风雨飞雪策略'),LINETHICK1,coloryellow;
DRAWTEXTREL(65,850 ,'出蓝须警惕'),LINETHICK1,colorred;
DRAWTEXTREL(65,720 ,'出黄为留意'),LINETHICK1,colorred;
DRAWTEXTREL(5,200 ,'动'),LINETHICK1,colorwhite;
DRAWTEXTREL(5,305 ,'态'),LINETHICK1,colorwhite;
DRAWTEXTREL(130,200 ,'多'),LINETHICK1,colorwhite;
DRAWTEXTREL(130,305 ,'空'),LINETHICK1,colorwhite;
{通达信}
{N1=3,1,12}
VAR1:=(CLOSE+HIGH+LOW+OPEN)/4;
VAR2:=SUMBARS(VOL,CAPITAL);
VAR3:=HHV(VAR1,VAR2);
VAR4:=LLV(VAR1,VAR2);
VAR5:=(2*VAR1-VAR4-REF(VAR4,1))/(VAR3-VAR4);
VAR6:=(VAR1-VAR4)/(VAR3-VAR4);
VAR7:=IF(VAR1<=VAR4,VAR5*60,VAR6*60);
VAR8:=600*(EMA(CLOSE,3)-EMA(LOW,30))/EMA(LOW,30);
VAR9:=EMA(VAR8,7);
VARA:=(WINNER(120*CLOSE/100)-WINNER(100*CLOSE/100))*100;
VARB:=(-100)*(WINNER(120*CLOSE/100)-WINNER(100*CLOSE/100))+5;
VARC:=HHV(HIGH,9)-LLV(LOW,9);
VARD:=HHV(HIGH,9)-CLOSE;
VARE:=CLOSE-LLV(LOW,9);
VARF:=VARD/VARC*100-70;
VAR10:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VAR11:=(2*CLOSE+HIGH+LOW)/4;
VAR12:=SMA(VARE/VARC*100,3,1);
VAR13:=LLV(LOW,34);
VAR14:=SMA(VAR12,3,1)-SMA(VARF,9,1);
VAR15:=IF(VAR14>100,VAR14-100,0);
VAR16:=HHV(HIGH,34);
VAR17:=EMA((VAR11-VAR13)/(VAR16-VAR13)*100,8);
VAR18:=EMA(VAR17,5);
STICKLINE(VAR17-VAR18>0,VAR17,VAR18,4,1),COLORRED ;
STICKLINE(VAR17-VAR18<0,VAR17,VAR18,4,1),COLORGREEN ;
DK:=(VAR17-VAR18)*20,LINETHICK0;
STICKLINE(DK>0 AND DK>REF(DK,1) AND C>REF(C,1),VAR17,VAR18,2,0),COLORRED ;
STICKLINE(DK>0 AND DK<REF(DK,1) AND C<REF(C,1) ,VAR17,VAR18,2,0),COLORCYAN ;
STICKLINE(DK<0 AND DK>REF(DK,1) AND C>REF(C,1),VAR17,VAR18,2,0),COLORYELLOW ;{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
