{最新极品超赞}

RC1:=REF(C,1);

AA:=REF(H,8)=HHV(H,2*8+1); AA1:=REF(L,8)=LLV(L,2*8+1);

QY:=BACKSET(AA,8+1); QY1:=BACKSET(AA1,8+1);

CC2:=FILTER(QY,8) AND H=HHV(H,8+1); CC1:=FILTER(QY1,8) AND L=LLV(L,8+1);

DDD:=BARSLAST(CC2); DD1:=BARSLAST(CC1);

GDTS:=IF(CC2,CURRBARSCOUNT,0); DDTS:=IF(CC1,CURRBARSCOUNT,0);

DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS); DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);

GDCS1:=CONST(DINGBUTS); DDCS1:=CONST(DDTS1);

GDCS13:=CONST(REF(H,GDCS1-1)); DDCS13:=CONST(REF(L,DDCS1-1));

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

GDCS2:=CONST(DINGBUTS1); DDCS2:=CONST(DDTS2);

GDCS23:=CONST(REF(H,DINGBUTS1-1)); DDCS23:=CONST(REF(L,DDTS2-1));

XG1:=BACKSET(ISLASTBAR,GDCS1); XD1:=BACKSET(ISLASTBAR,DDCS1);

XG2:=BACKSET(ISLASTBAR,DINGBUTS1); XD2:=BACKSET(ISLASTBAR,DDTS2);

M:=INTPART(3*8/5);

AAA:=REF(H,M)=HHV(H,2*M+1);

QYY:=BACKSET(AAA,M+1);

CCC:=FILTER(QYY,M) AND H=HHV(H,M+1);

DDDD:=BARSLAST(CCC),NODRAW;

GDTSS:=IF(CCC,CURRBARSCOUNT,0);

DINGBUTSS:=IF(DDDD,REF(GDTSS,DDDD),GDTSS);

GDCS11:=CONST(DINGBUTSS);

DINGBUTS11:=REF(DINGBUTSS,DDDD+1);

GDCS22:=CONST(DINGBUTS11);

AA11:=REF(L,M)=LLV(L,2*M+1);

QY11:=BACKSET(AA11,M+1);

CC11:=FILTER(QY11,M) AND L=LLV(L,M+1);

DD11:=BARSLAST(CC11);

DDTSS:=IF(CC11,CURRBARSCOUNT,0);

DDTS11:=IF(DD11,REF(DDTSS,DD11),DDTSS);

DDCS11:=CONST(DDTS11);

DDTS22:=REF(DDTS11,DD11+1);

DDCS22:=CONST(DDTS22);

AA1F:=REF(H,5)=HHV(H,2*5+1);

B1:=FILTER(AA1F,5);

CH:=BACKSET(B1,5+1);

D1:=FILTER(CH,5);

R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1); S11:=R11>REF(R11,1);

AA2:=REF(L,5)=LLV(L,2*5+1);

B2:=FILTER(AA2,5);

C12:=BACKSET(B2,5+1);

D2:=FILTER(C12,5);

T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1); U11:=T11>REF(T11,1);

HIGHN:=10;LOWN:=10;

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

QYQ:=BACKSET(AAR,HIGHN+1);

CCQ:=FILTER(QYQ,HIGHN) AND H=HHV(H,HIGHN+1);

DDDQQ:=BARSLAST(CCQ);

GDTSQ:=IF(CCQ,CURRBARSCOUNT,0);

DINGBUTSQ:=IF(DDDQQ,REF(GDTSQ,DDDQQ),GDTSQ);

GDCS1Q:=CONST(DINGBUTSQ);

DINGBUTS1Q:=REF(DINGBUTSQ,DDDQQ+1);

GDCS2Q:=CONST(DINGBUTS1Q);

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

QY1Q:=BACKSET(AA1Q,LOWN+1);

CC1Q:=FILTER(QY1Q,LOWN) AND L=LLV(L,LOWN+1);

DD1Q:=BARSLAST(CC1Q);

DDTSQ:=IF(CC1Q,CURRBARSCOUNT,0);

DDTS1Q:=IF(DD1Q,REF(DDTSQ,DD1Q),DDTSQ);

DDCS1Q:=CONST(DDTS1Q);

DDTS2Q:=REF(DDTS1Q,DD1Q+1);

DDCS2Q:=CONST(DDTS2Q);

TJ2:=BACKSET(ISLASTBAR,SUMBARS(V,CAPITAL));

TJ3:=TJ2>REF(TJ2,1);

上:DRAWLINE(CURRBARSCOUNT=GDCS22,H,CURRBARSCOUNT=GDCS11,H,1),COLORGRAY,LINETHICK1;

下:DRAWLINE(CURRBARSCOUNT=DDCS22,L,CURRBARSCOUNT=DDCS11,L,1) COLORGRAY,LINETHICK1;

IF(XG2,GDCS23,DRAWNULL),COLORC0C0C0,POINTDOT;

IF(XG1,GDCS13,DRAWNULL),COLORC0C0C0,POINTDOT;

IF(XD2,DDCS23,DRAWNULL),COLORC0C0C0,POINTDOT;

IF(XD1,DDCS13,DRAWNULL),COLORC0C0C0,POINTDOT;

短压:DRAWLINE(D1,H,S11,H,1),COLOR808000;

短撑:DRAWLINE(D2,L,U11,L,1),COLOR808000;

高压:DRAWLINE(CURRBARSCOUNT=GDCS2Q,H,CURRBARSCOUNT=GDCS1Q,H,1) COLORMAGENTA,LINETHICK1;

低撑:DRAWLINE(CURRBARSCOUNT=DDCS2Q,L,CURRBARSCOUNT=DDCS1Q,L,1),COLORMAGENTA,LINETHICK1;

{以上为趋势线自动划线}

Z1:=STRCAT(HYBLOCK,' ');

Z2:=STRCAT(Z1,DYBLOCK);

Z3:=STRCAT(Z2,' ');

DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORLIRED;

DRAWTEXT_FIX(ISLASTBAR,0,0.03,0,EXTERNSTR(0,3)),COLORWHITE;

DRAWTEXT_FIX(ISLASTBAR,0,0.06,0,EXTERNSTR(0,6)),COLORLIBLUE;

DRAWTEXT_FIX(ISLASTBAR,0,0.09,0,EXTERNSTR(0,12)),COLORLIGREEN;{老王}

DRAWTEXT_FIX(ISLASTBAR,0,0.15,0