通达信九转战神源码附图
通达信九转战神源码附图
{九转战神}
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
{牛线}
CG:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210;
FL:HHV(CG,5);
FS:CG-(FL-CG);
EMA55:=EMA(CLOSE,55);
机构成本:=EMA55,LINETHICK3,COLORFF00FF;
MA55:=MA(CLOSE,55);
DRAWTEXT(CROSS(EMA55,MA55) AND EMA55>REF(EMA55,1) AND CG=FL,MA55,'走强');
DRAWTEXT( EMA(C,55)>REF(EMA(C,55),1) AND FL>EMA(C,55) AND FS>EMA(C,55) AND FL=FS AND REF(FL,1)>REF(FS,1) ,FS,'买入' ),COLORYELLOW;
{涨停K线}
C2:=REF(C,1);
涨停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(涨停,OPEN,CLOSE,-1,1),COLORRED;
STICKLINE(涨停,H,O,0.5,0),COLORYELLOW;
{九转}
A1:=C>REF(C,4);
NT:=BARSLASTCOUNT(A1);
TJ11:=NT=9;
TJ13:=ISLASTBAR AND BETWEEN(NT,5,8);
AY:=(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT;
DRAWTEXT(AY>0,H*1.02,VAR2STR(AY,0)),COLORFF00FF;
DRAWTEXT(NT=9,H*1.02,'9'),COLORGREEN;
DRAWTEXT(NT=13,H*1.02,'13'),COLORGREEN;
DRAWTEXT(NT=18,H*1.02,'18'),COLORGREEN;
B1:=C<REF(C,4);
NT0:=BARSLASTCOUNT(B1);
TJ21:=NT0=9 ;
TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8);
AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0;
DRAWTEXT(AY1>0,L*0.98,VAR2STR(AY1,0)),COLORFF00FF;
DRAWTEXT(NT0=9,L*0.98,'9'),COLORGREEN;
DRAWTEXT(NT0=13,L*0.98,'13'),COLORGREEN;
DRAWTEXT(NT0=18,L*0.98,'18'),COLORGREEN;
ZF:=(C-REF(C,1))/REF(C,1)*100;
假阳线:=C>O AND ZF<0 AND O<REF(L,1);
STICKLINE(假阳线,O,C,0.5,0),COLORMAGENTA;
{筹码成本}
X_1:=COSTEX(ISLASTBAR+540,ISLASTBAR);
牛熊界限:MA(X_1,13),COLORGREEN;
IF(牛熊界限>REF(牛熊界限,1),牛熊界限,DRAWNULL),COLORRED;
AL:=SUMBARS(V,CAPITAL*1);{累计换手=100%的周期}
AL1:=SUM(COST(10),AL)/AL;{在A周期里获利10%的平均价}
AL2:=SUM(COST(20),AL)/AL;{在A周期里获利20%的平均价}
AL3:=SUM(COST(30),AL)/AL;{在A周期里获利30%的平均价}
AL4:=SUM(COST(40),AL)/AL;{在A周期里获利40%的平均价}
AL5:=SUM(COST(50),AL)/AL;{在A周期里获利50%的平均价}
主力成本:(5*AL1+4*AL2+3*AL3+2*AL4+AL5)/15,POINTDOT,COLOR00FF00;{求出庄家成本};
估:=(2*CLOSE+LOW+HIGH)/4;
风险区:EMA(估,40)*1.15,POINTDOT,COLORFF33FF;
机构参与度:EXTERNVALUE(0,1),COLORRED,NODRAW;{引用数据};
