|
以下是通达信殷保华主图末来源码（无源码的请下载附件导入）
庄家线MA144:MA(CLOSE,144),LINETHICK1;
幼黑马MA25:MA(CLOSE,25),LINETHICK2;
大黑马MA318:MA(CLOSE,318),LINETHICK1;
生命线MA453:MA(CLOSE,453),LINETHICK1;
暗马MA550:MA(CLOSE,550),LINETHICK1;
魔黑马MA610:MA(CLOSE,610),LINETHICK1;
奇家线MA730:MA(CLOSE,730),LINETHICK1;
疯黑马MA888:MA(CLOSE,888),LINETHICK1;
小黑马MA99:MA(CLOSE,99),LINETHICK1;
DIFF:=( EMA(CLOSE,7) - EMA(CLOSE,19));
DEA:=EMA(DIFF,9);
MACD:=0.90*(DIFF-DEA);
TJ:=(DIFF>=DEA);
TJ1:=(DIFF>=0);
STICKLINE(TJ,H,L,0.0,1),COLORYELLOW;
STICKLINE(TJ,O,C,2,1),COLORYELLOW;
STICKLINE(TJ1 AND TJ,H,L,0.0,1),COLORF00FF0;
STICKLINE(TJ1 AND TJ,O,C,2,1),COLORF00FF0;
STICKLINE(DIFF<DEA,H,L,0.0,1),COLORF0F000;
STICKLINE(DIFF<DEA,O,C,2,1),COLORF0F000;
VAR1:=(CLOSE*2+HIGH+LOW)/4;
SK:= EMA(VAR1,13)-EMA(VAR1,73);
SD:= EMA(SK,2);{www.guhai.com.cn}
DRAWTEXT((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 )
OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)) ,L*0.99,'短线'),COLORGREEN;
STICKLINE((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 )
OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)),H,L,0.5,0),COLORRED;
STICKLINE((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 )
OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)),O,C,2,1),LINETHICK3,COLORRED;
{www.guhai.com.cn股海}
ZD1:=MA(CLOSE,30);
ZD2:=MA(CLOSE,40);
ZD3:=MA(CLOSE,48);
ZD4:=MA(CLOSE,60);
ZD5:=MA(CLOSE,80);
ZD6:=MA(CLOSE,96);
ZD7:=MA(CLOSE,90);
ZD8:=MA(CLOSE,120);
ZD9:=MA(CLOSE,144);
ZD10:=MA(CLOSE,160);
ZD11:=MA(CLOSE,192);
ZD12:=MA(CLOSE,150);
ZD13:=MA(CLOSE,200);
ZD14:=MA(CLOSE,240);
ZD15:=MA(CLOSE,180);
ZD16:=MA(CLOSE,288);
ZD17:=MA(CLOSE,210);
ZD18:=MA(CLOSE,280);
ZD19:=MA(CLOSE,336);
ZD20:=MA(CLOSE,320);
ZD21:=MA(CLOSE,384);
ZD22:=MA(CLOSE,270);
ZD23:=MA(CLOSE,360);
ZD24:=MA(CLOSE,432);
ZD25:=MA(CLOSE,300);
ZD26:=MA(CLOSE,400);
ZD27:=MA(CLOSE,480);
ZD111:=MAX(ZD1,MAX(ZD2,MAX(ZD3,MAX(ZD4,MAX(ZD5,MAX(ZD6,MAX(ZD7,MAX(ZD8,ZD9))))))));
ZD222:=MAX(ZD10,MAX(ZD11,MAX(ZD12,MAX(ZD13,MAX(ZD14,MAX(ZD15,MAX(ZD16,MAX(ZD17,ZD18))))))));
ZD333:=MAX(ZD19,MAX(ZD20,MAX(ZD21,MAX(ZD22,MAX(ZD23,MAX(ZD24,MAX(ZD25,MAX(ZD26,ZD27))))))));
ZD:MAX(ZD111,MAX(ZD222,ZD333))COLOR0000FF;
814177339.jpg
|
