M1:= 5;
M2:=10;
M3:=20;
M4:=30;
M5:=60;
M6:=120;
M7:=250;
STICKLINE(CLOSE> REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORRED;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,3.1,0 ),COLOR000033;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR000066;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR000099;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLOR0000CC;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLOR0000FF;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORCC66FF;
STICKLINE(CLOSE< REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORCYAN;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,3.1,0 ),COLOR990000;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLORCC0000;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLORFF4400;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORFF8800;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORFFCC00;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORCYAN;
STICKLINE(CLOSE= REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORWHITE;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,3.1,0 ),COLOR555555;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR777777;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR999999;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORBBBBBB;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORDDDDDD;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORFFFFFF;
{一:MA(CLOSE,5);
二:MA(CLOSE,10);
三:MA(CLOSE,20);
四:MA(CLOSE,30);
五:MA(CLOSE,60);
六:MA(CLOSE,120);
七:MA(CLOSE,250);}
{十日叉:IF(CROSS(一,二),一,DRAWNULL),CROSSDOT,COLORFFFFFF,LINETHICK2;
廿日叉:IF(CROSS(二,三),二,DRAWNULL),CROSSDOT,COLOR00FFFF,LINETHICK2;
卅日叉:IF(CROSS(三,四),三,DRAWNULL),CROSSDOT,COLOR0099FF,LINETHICK2;
五日线:IF(一>=REF(一,1) AND 一>=二,一,DRAWNULL),COLORFFFFFF,LINETHICK2;
十日线:IF(二>=REF(二,1) AND 二>=三,二,DRAWNULL),COLOR00FFFF,LINETHICK2;
廿日线:IF(三>=REF(三,1) AND 三>=四,三,DRAWNULL),COLORFF00FF,LINETHICK2;}
{轨道}
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA30:=MA(CLOSE,30);
红轨道:MA(MA(CLOSE,3),1),LINETHICK2,COLOR0000FF;
绿轨道:MA(MA(CLOSE,3),3),LINETHICK2,COLOR00FF00;
{//布林线
BBI:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
UPR:BBI+P*STD(BBI,N);
DWN:BBI-P*STD(BBI,N);}
{红绿箭头}
AA1:=3*SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1)-2*SMA(SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1),3,1);
加仓:=IF(CROSS(AA1,REF(AA1+0.01,1)) AND LLV(AA1,2)=LLV(AA1,8) AND BETWEEN(AA1,20,60),1,0);
波段底:=(3)*(SMA(((CLOSE - LLV(LOW,27))/(HHV(HIGH,27) - LLV(LOW,27)))*(100),5,1)) -
(2)*(SMA(SMA(((CLOSE - LLV(LOW,27))/(HHV(HIGH,27) - LLV(LOW,27)))*(100),5,1),3,1));
减仓:=(CROSS(C,MA5) OR (O<MA5 AND C>MA5)) AND V>REF(V,1) AND MA5>REF(MA5,1) AND MA10>REF(MA10,1);
回头:=(MA10>MA30 AND MA(C,20)>MA30 ANDMA30>REF(MA30,1)) AND MA5>MA10 AND NOT(MA5>REF(MA5,1)) AND REF(MA5>REF(MA5,1),1);
{DRAWICON(加仓,L*0.97,1);
DRAWICON(CROSS(波段底,3),L*0.97,1);
DRAWICON(减仓>0 ,H*1.03,2);
DRAWICON(回头>0 ,H*1.03,2);}
DRAWTEXT(加仓,LOW*0.99,'买进'),COLOR00BBFF;
DRAWTEXT(CROSS(波段底,3),LOW*0.97,'买进'),COLOR0000FF;
DRAWTEXT(减仓>0,H*1.03,'卖出'),COLORFFFF00;
DRAWTEXT(回头>0,H*1.03,'卖出'),COLOR00FF00;
{
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=2*(DIFF-DEA);
MACD1:=CROSS(DIFF,DEA) AND COUNT(MACD>0,1)=1;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,9,1);
D:=SMA(K,9,1);
J:=3*K-2*D;
KDJ1:=CROSS(K,D) AND CROSS(J,D);
均线:=CROSS(MA(C,5),MA(C,10));
量线:=CROSS(MA(V,5),MA(V,10));
SCC:=MACD1 AND KDJ1 AND 均线 AND 量线;
SC1:=MACD1 AND KDJ1;
SC2:=均线 AND 量线;
SC3:=均线 AND MACD1;
SC4:=量线 AND KDJ1;
SC5:=均线 AND KDJ1;
SC6:=MACD1 AND 量线;
DRAWICON(SC1 OR SC2 OR SC3 OR SC4 OR SC5 OR SC6,L*0.95,11);
DRAWICON(SCC,L*0.96,7);
DRAWICON(CROSS(一,二),L*0.95,1);
DRAWICON(CROSS(二,三),L*0.95,1);
DRAWICON(CROSS(三,四),L*0.95,1);
DRAWICON(CROSS(二,一),H*1.05,2);
DRAWICON(CROSS(三,二),H*1.05,2);
DRAWICON(CROSS(四,三),H*1.05,2);
VAR1:=3;
VAR3:=(3)*(SMA(((CLOSE - LLV(LOW,27))/(HHV(HIGH,27) - LLV(LOW,27)))*(100),5,1)) - (2)*(SMA(SMA(((CLOSE - LLV(LOW,27))/(HHV(HIGH,27) - LLV(LOW,27)))*(100),5,1),3,1));
DRAWICON(CROSS(VAR3,VAR1),L*0.95,1);};{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
