通达信抄盘高手主图公式源码

以下是通达信抄盘高手主图公式源码

主图公式.抄盘高手

原码:

{N:5,250,14;}

N1:=6;N2:=12;N3:=26;

MA6:MA(CLOSE,6),COLORWHITE{,LINETHICK2};

MA18:MA(CLOSE,18),COLORBLUE{,LINETHICK2};

a:=(3*c+l+o+h)/6;

X:=(20*a+19*ref(a,1)+18*ref(a,2)+17*ref(a,3)+16*ref(a,4)+15*ref(a,5)+

14*ref(a,6)+13*ref(a,7)+12*ref(a,8)+11*ref(a,9)+10*ref(a,10)+9*ref(a,11)+8*ref(a,12)

+7*ref(a,13)+6*ref(a,14)+5*ref(a,15)+4*ref(a,16)+3*ref(a,17)+2*ref(a,18)+

ref(a,20))/210;

庄成本:eMA(X,13),COLORRED,LINETHICK2;

MTM:=C-REF(C,1);

DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);

买:IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0),COLORRED;

卖:IF(HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX),1,0),COLOR00FF00;

DRAWTEXT(filter(买=1,5),LOW-0.03,'买'),COLORRED;

STICKLINE(filter(买=1,5),HIGH,LOW,0,1),COLORRED{,LINETHICK2};

STICKLINE(filter(买=1,5),OPEN,CLOSE,4,1),COLORRED{,LINETHICK2};

DRAWTEXT(filter(卖=1,1),HIGH*1.02,'卖'),COLORBLUE;

STICKLINE(filter(卖=1,1),HIGH,LOW,0,1),COLORBLUE{,LINETHICK2};

STICKLINE(filter(卖=1,1),OPEN,CLOSE,4,1),COLORBLUE{,LINETHICK2};

{加仓}

加仓A:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10;

加仓B:=加仓A;{白K突破压力位要用}

DRAWTEXT(FILTER((CROSS(加仓A,0) OR CROSS(CLOSE,庄成本)) {AND MA18>REF(MA18,1)} AND 买<>1,3),LOW-0.03,'加'),COLORFF00FF;

STICKLINE(FILTER((CROSS(加仓A,0) OR CROSS(CLOSE,庄成本)) {AND MA18>REF(MA18,1)} AND 买<>1,3),HIGH,LOW,0,1),COLORFF00FF{,LINETHICK2};

STICKLINE(FILTER((CROSS(加仓A,0) OR CROSS(CLOSE,庄成本)) {AND MA18>REF(MA18,1)} AND 买<>1,3),OPEN,CLOSE,4,1),COLORFF00FF{,LINETHICK2};

加仓:FILTER((CROSS(加仓A,0) OR CROSS(CLOSE,庄成本)) {AND MA18>REF(MA18,1)} AND 买<>1,3),COLORFF00FF;

{追加}

追:IF(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),1,0),COLOR006633;

DRAWTEXT(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),LOW*0.96,'追'),COLOR006633;

STICKLINE(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),HIGH,LOW,0,1),COLOR006633{,LINETHICK2};

STICKLINE(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),OPEN,CLOSE,4,1),COLOR006633{,LINETHICK2};

{注意}

RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;

K:=SMA(RSV,3,1),COLORFFFFFF;

D:=SMA(K,3,1),COLOR00FFFF;

J:=3*K-2*D,COLORFF00FF;

BDGD:=HHV(J,2)=HHV(J,8) AND J>80;

注意:IF(CROSS(REF(J-0.01,1),J) AND REF(BDGD,1),1,0),COLORYELLOW;

DRAWTEXT(注意 AND 卖<>1,HIGH*1.02,'减'),COLORYELLOW;

STICKLINE(注意 AND 卖<>1,HIGH,LOW,0,1),COLORYELLOW{,LINETHICK2};

STICKLINE(注意 AND 卖<>1,OPEN,CLOSE,4,1),COLORYELLOW{,LINETHICK2};

{买跌}

KA:=N/2;

DTPL:=MA(C,N)>MA(C,N*1.5) AND MA(C,N*1.5)>MA(C,N*3) AND MA(C,3)>MA(C,N*6);

连续走强:=COUNT(C>MA(C,N),KA)=KA;

ZQSJ:=BARSLAST(连续走强);

下穿:=CROSS(MA(C,N),C);

GL:=MA(C,N/2)/MA(C,N*2)>=1.05;

买跌A:=(下穿 AND ZQSJ<=3 AND DTPL AND GL)*N;

DRAWTEXT(买跌A>0,LOW*0.98 , '买'),COLOR00FF00;

STICKLINE(买跌A>0,HIGH,LOW,0,1),COLOR00FF00{,LINETHICK2};

STICKLINE(买跌A>0,OPEN,CLOSE,4,1),COLOR00FF00{,LINETHICK2};

买跌:IF((下穿 AND ZQSJ<=3 AND DTPL AND GL)*N,1,0),COLOR00FF00;

RSV1:=(c-LLV(low,13))/(HHV(h,13)-LLV(l,13))*100;

K1:=SMA(RSV1,3,1),COLORFFFFFF;

D1:=SMA(K1,3,1),COLOR00FFFF;

J1:=3*K1-2*D1,COLORFF00FF;

RSV2:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;

K2:=SMA(RSV2,3,1);

D2:=SMA(K2,3,1);

J2:=3*K2-2*D2;

支撑:=IF(CROSS(J1,J2),L,REF(L,BARSLAST(CROSS(J1,J2)))),COLORRED;

压力:=IF(CROSS(J2,J1),H,REF(H,BARSLAST(CROSS(J2,J1)))),COLOR00FF00;

DRAWTEXT(支撑=压力 AND REF(支撑,1)<>REF(压力,1),LOW*0.99,'●'),COLOR3300FF;

DRAWTEXT(支撑=压力 AND REF(支撑,1)<>REF(压力,1),LOW*0.97,'优'),COLOR3300FF;

DRAWTEXT((CROSS(C,压力) AND 加仓B<>加仓A) OR (CROSS(C,压力) AND 买<>1) OR (C=压力 AND OPEN<CLOSE),LOW*0.98,'突'),COLORWHITE;

STICKLINE((CROSS(C,压力) AND 加仓B<>加仓A) OR (CROSS(C,压力) AND 买<>1) OR (C=压力 AND OPEN<CLOSE),HIGH,LOW,0,1),COLORWHITE{,LINETHICK2};

STICKLINE((CROSS(C,压力) AND 加仓B<>加仓A) OR (CROSS(C,压力)AND 买<>1) OR (C=压力 AND OPEN<CLOSE),OPEN,CLOSE,4,1),COLORWHITE{,LINETHICK2};

突破压力位:IF((CROSS(C,压力) AND 加仓B<>加仓A) OR (CROSS(C,压力)AND 买<>1) OR (C=压力 AND OPEN<CLOSE),1,0),COLORWHITE;

TY:=C;

HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10);

LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10);

A2:=REF(C,BARSLAST(HD));

B2:=REF(C,BARSLAST(LD));

T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;

T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);

波浪顶:IF(T1,A2,A2),COLOR00FF00,POINTDOT,LINETHICK2;

STICKLINE(T1,A2,A2,9,0),COLOR00FF00;

波浪底:IF(T2,B2,B2),COLORFF00FF,POINTDOT,LINETHICK2;