通达信主图指标超级宝贝的,不带未来函数的

通达信主图指标超级宝贝的，不带未来函数的

SR1:=REF(HIGH,10)=HHV(HIGH,2*10+1);

SR2:=FILTER(SR1,10);

SR3:=BACKSET(SR2,10+1);

HD:=FILTER(SR3,10);

前高:=REF(H,BARSLAST(HD));

DRAWICON(CROSS(C,前高),L-0.20,3);{突破前高的信号};

N:=75;P:=5;P1:=10;

{N为多少天内的高低值参数，我以自已的初始K线根数定义。P1、P2为短、长支撑压力取点参数}

A1:=REF(H,P)=HHV(H,2*P+1);

B1:=FILTER(A1,P);

C1:=BACKSET(B1,P+1);

D1:=FILTER(C1,P);

E1:=BACKSET(ISLASTBAR,BARSLAST(D1)+1); F1:=E1>REF(E1,1);

短压:DRAWLINE(D1,H,F1,H,1),COLORGREEN; A2:=REF(L,P)=LLV(L,2*P+1);

B2:=FILTER(A2,P);

C2:=BACKSET(B2,P+1);

D2:=FILTER(C2,P);

E2:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);

F2:=E2>REF(E2,1);

短支:DRAWLINE(D2,L,F2,L,1),COLORLIRED;

AA1:=REF(H,P1)=HHV(H,2*P1+1);

BB1:=FILTER(AA1,P1);

CC1:=BACKSET(BB1,P1+1);

DD1:=FILTER(CC1,P1);

EE1:=BACKSET(ISLASTBAR,BARSLAST(DD1)+1); FF1:=EE1>REF(EE1,1);

长压:DRAWLINE(DD1,H,FF1,H,1),COLORGREEN; AA2:=REF(L,P1)=LLV(L,2*P1+1);

BB2:=FILTER(AA2,P1);

CC2:=BACKSET(BB2,P1+1);

DD2:=FILTER(CC2,P1);

EE2:=BACKSET(ISLASTBAR,BARSLAST(DD2)+1); FF2:=EE2>REF(EE2,1);

长支:DRAWLINE(DD2,L,FF2,L,1),COLORRED; STICKLINE(C>=O,C,O,3,0),COLOR000045; STICKLINE(C>=O,C,O,2.5,0),COLOR000065; STICKLINE(C>=O,C,O,2,0),COLOR000085; STICKLINE(C>=O,C,O,1.5,0),COLOR0000A5; STICKLINE(C>=O,C,O,1,0),COLOR0000C5; STICKLINE(C>=O,C,O,0.5,0),COLOR0000E5;

STICKLINE(C>=O,H,L,0,0),COLOR0000F5;

STICKLINE(C<O,C,O,3,0),COLOR353500;

STICKLINE(C<O,C,O,2.5,0),COLOR454500;

STICKLINE(C<O,C,O,2,0),COLOR555500;

STICKLINE(C<O,C,O,1.5,0),COLOR656500;

STICKLINE(C<O,C,O,1,0),COLOR757500;

{STICKLINE(C<O,C,O,0.5,0),COLOR858500;}

STICKLINE(C<O,H,L,0,0),COLOR959500;

{趋势线部分}

HIGHN:=10;LOWN:=10;HIGHDISPLAY:=0;LOWDISPLAY: =0;ZGDISPLAY:=0;MADISPLAY:=0;

BB:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);

QY:=BACKSET(BB,HIGHN+1);

CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1); {DRAWICON(CC,H*1.02,2);}{压力符号}

DDD:=BARSLAST(CC);

GDTS:=IF(CC,CURRBARSCOUNT,0);

DINGBU:=IF(DDD,REF(H,DDD),H);{顶部} DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS); DINGBU1:=REF(DINGBU,DDD+1);

GDCS1:=CONST(DINGBUTS);

DINGBUTS1:=REF(DINGBUTS,DDD+1);

GDCS2:=CONST(DINGBUTS1);

DINGBU2:=REF(DINGBU1,DDD+1);

MM:=IF(CURRBARSCOUNT>GDCS2,0,1);

高点压

力:DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBA RSCOUNT=GDCS1,H,1),COLORMAGENTA,LINETHICK 2;

AA9:=REF(L,LOWN)=LLV(L,2*LOWN+1);

QY1:=BACKSET(AA9,LOWN+1);

CC9:=FILTER(QY1,LOWN) AND L=LLV(L,LOWN+1);

{DRAWICON(CC1,L*0.98,1);}{支撑符号}

DD9:=BARSLAST(CC9);

DDTS:=IF(CC9,CURRBARSCOUNT,0);

YDB:=IF(DD9,REF(L,DD9),L);

DDTS1:=IF(DD9,REF(DDTS,DD9),DDTS);

DDCS1:=CONST(DDTS1);

ZDB:=REF(YDB,DD9+1);

DDTS2:=REF(DDTS1,DD9+1);

DDCS2:=CONST(DDTS2);

低点支

撑:DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBA RSCOUNT=DDCS1,L,1) ,COLORGREEN,LINETHICK1.5;

DRAWTEXT(ISLASTBAR,低点支撑,' 低点连线

'),COLORRED;

DRAWTEXT(ISLASTBAR,高点压力,' 高点连线

'),COLORMAGENTA;

{次水平线}

大盘:=EMA(INDEXC,500)/EMA(C,500);

QA1:=REF(CLOSE,3)=HHV(CLOSE,2*3+1);

QB1:=BACKSET(QA1,3+1);

QC1:=FILTER(QB1,3) AND CLOSE=HHV(CLOSE,3+1); QD1:=BARSLAST(QC1);

QE1:=IF(QC1,CURRBARSCOUNT,0);

QF1:=IF(QD1,REF(QE1,QD1),QE1);

QG1:=CONST(QF1);

次水平

线:DRAWLINE(CURRBARSCOUNT=QG1,CLOSE,ISLAS TBAR,REF

(CLOSE,QG1-1),1),COLORYELLOW;

{30天颈线}

A11:=REF(C,30)=HHV(C,2*20+1);

B11:=FILTER(A11,30);

C11:=BACKSET(B11,30+1);

HDD:=FILTER(C11,30);

高位水平

线:REF(C,BARSLAST(HDD)),COLOR0099FF,POINTDOT ;

DRAWTEXT(ISLASTBAR,高位水平线,' 高颈线

'),COLOR0099FF;

STICKLINE(C,高位水平线,高位水平

线,8,0),COLOR0099FF;

{低位颈线}

A22:=REF(C,30)=LLV(C,2*20+1);

B22:=FILTER(A22,30);

C22:=BACKSET(B22,30+1);

LDD:=FILTER(C22,30);

低位水平

线:REF(C,BARSLAST(LDD)),COLORCYAN,POINTDOT;

DRAWTEXT(ISLASTBAR,低位水平线,' 低位水平线'),COLORCYAN;

{成交量颈线}

三十地

量:REF(L,BARSLAST(VOL<LLV(VOL,30)*1.001)),COLO RMAGENTA,POINTDOT,LINETHICK3;

地量期:=BARSLAST(V=LLV(V,30));

地量颈线:DRAWLINE(V=LLV(V,30),MIN(REF(L,1),L),地量期>0,MIN(REF(L,地量期+1),REF(L,地量

期)),1),COLORGREEN,LINETHICK3;

DRAWTEXT(ISLASTBAR,地量颈线,' 地量颈线

'),COLORGREEN;

{参数:NN=900101 1501231 1080918}{小/大/缺省}

{价格:=REF(C,DATE=(NN+1)),NODRAW;

颈线2:=DRAWLINE(DATE=NN,C,DATE>NN,价

格,1),LINETHICK3;}

{PC:=(H+L+C)/3;}

V5:=MA(VOL,5);

V20:=MA(VOL,20);

A13:=CROSS(V20,V5);

A23:=BARSLAST(A13);

C13:=REF(C,A23);

{地量双星}

昨天十

字:=ABS(REF(C,1)-REF(O,1))/REF(O,1)<=0.01;{昨天十字星}

前天十

字:=ABS(REF(C,2)-REF(O,2))/REF(O,1)<=0.01;{前天十字星}

XG1:=昨天十字AND 前天十字AND C>REF(C,1) AND (C/地量颈线)>1.0 AND (C/地量颈线)<1.12;

DRAWTEXT(XG1,L-0.09,' 地双星'),COLORYELLOW;

{XG2:=昨天十字AND 前天十字AND C>REF(C,1) AND (C/黄金线)>1.0 AND (C/黄金线)<1.15;

DRAWTEXT(XG2,L-0.12,'金双星'),COLORYELLOW;}; MA60:MA(C,60),COLORYELLOW,LINETHICK2;

C6:=REF(C,1);

C3:=REF(C,1);

涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0); STICKLINE(涨停,OPEN,CLOSE,2,1),COLORYELLOW;