TAX:=HORCALC(HYBLOCK,105,1,DRAWNULL);
TAA:=STRCAT(HYBLOCK,' 个股排名 ：');
DRAWTEXT_FIX(ISLASTBAR,0.003,0,0,STRCAT(TAA,CON2STR(TAX,0))),COLORYELLOW;
创业板:=INBLOCK('创业板');
中小企业:=INBLOCK('中小板');
上证Ａ股:=INBLOCK('上证Ａ股');
深证Ａ股:=INBLOCK('深证Ａ股');
INDEC:=IF(中小企业=1,"399005$C",IF(创业板=1,"399006$C",IF(上证Ａ股=1,"999999$C","399001$C"))),NODRAW;
指数涨幅:=(INDEC-REF(INDEC,1))*100/REF(INDEC,1);
CCCC:=HY_INDEXC;
ZF1:=(C-REF(C,1))/REF(C,1)*100;
行业指数:=(CCCC-REF(CCCC,1))*100/REF(CCCC,1);
DRAWTEXT_FIX(ISLASTBAR AND 指数涨幅<=行业指数,0.13,0,0,'板块强'),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR AND 指数涨幅>行业指数,0.13,0,0,'板块弱'),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR AND ZF1>=行业指数,0.18,0,0,'个股强'),COLORRED;
DRAWTEXT_FIX(ISLASTBAR AND ZF1<行业指数,0.18,0,0,'个股弱'),COLORGREEN;
N:=5;N1:=30;N2:=3;P1:=15;P2:=3;
A1:=REF(H,N)=HHV(H,2*N+1);
B1:=FILTER(A1,N);
C1:=BACKSET(B1,N+1);
D1:=FILTER(C1,N);
A2:=REF(L,N)=LLV(L,2*N+1);
B2:=FILTER(A2,N);
C2:=BACKSET(B2,N+1);
D2:=FILTER(C2,N);
E1:=(REF(LLV(L,2*N),1)+REF(HHV(H,2*N),1))/2;
E2:=(H+L)/2;
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR CURRBARSCOUNT=2 OR BARSCOUNT(C)=1;
L1:=(D2 AND NOT(D1 AND E1>=E2)) ;
H2:=D1 AND NOT(D2 AND E1>=E2);
X1:=REF(BARSLAST(H1),1)+1;
F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS (IF(L1,L,10000),X1));
G1:=F1>REF(F1,1);
I1:=BACKSET(G1,2);
LD:=I1>REF(I1,1);
L2:=LD OR CURRBARSCOUNT=2 OR BARSCOUNT(C)=1;
X2:=REF(BARSLAST(L2),1)+1;
F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS (IF(H2,H,0),X2));
G2:=F2>REF(F2,1);
I2:=BACKSET(G2,2);
HD:=I2>REF(I2,1);
R1:=BACKSET(CURRBARSCOUNT=2,BARSLAST(HD)+1);
S1:=R1>REF(R1,1);
T1:=BACKSET(CURRBARSCOUNT=2,BARSLAST(LD)+1);
U1:=T1>REF(T1,1);
R2:=BACKSET(S1,REF(BARSLAST(HD),1)+2);
S2:=R2>REF(R2,1);
T2:=BACKSET(U1,REF(BARSLAST(LD),1)+2);
U2:=T2>REF(T2,1);
短压:DRAWLINE(S2,H,S1,H,1),COLORRED,LINETHICK1;
短撑:DRAWLINE(U2,L,U1,L,1),COLORGREEN,LINETHICK1;
DRAWTEXT(ISLASTBAR,短撑,'↖短撑')LINETHICK1,COLORLIGRAY;
DRAWTEXT(ISLASTBAR,短压,'↙短压')LINETHICK1,COLORLIGRAY;
DRAWICON(CROSS(C,短压),短压*1,11);
巨量:=V=HHV(VOL,120);
BAB:=REF(H,BARSLAST(巨量 AND CURRBARSCOUNT<120));
巨量平台:DRAWLINE(巨量,H,1,REF(BAB,1),1),COLORRED,DOTLINE;
DRAWTEXT(ISLASTBAR,巨量平台,'↙巨量')LINETHICK1,COLORRED;
DRAWICON(CROSS(C,巨量平台),巨量平台*1,1);
DRAWTEXT_FIX(1,0.980,20,1,'公式平台 公式源码 http://www.gspt.com'),COLOR333333;
{长期压力}
A155:=REF(H,20)=HHV(H,2*20+1);
B155:=FILTER(A155,20);
C155:=BACKSET(B155,20+1);
D155:=FILTER(C155,20);
R11:=BACKSET(ISLASTBAR,BARSLAST(D155)+1);
S11:=R11>REF(R11,1);
长期压力:DRAWLINE(D155,H,S11,H,1),COLORGREEN,DOTLINE;
DRAWICON(CROSS(C,长期压力),长期压力*1,11);
DRAWTEXT(ISLASTBAR,长期压力,'↙长压')LINETHICK1,COLORYELLOW;
{长期支撑}
A255:=REF(L,20)=LLV(L,2*20+1);
B255:=FILTER(A255,20);
C255:=BACKSET(B255,20+1);
D255:=FILTER(C255,20);
T11:=BACKSET(ISLASTBAR,BARSLAST(D255)+1);
U11:=T11>REF(T11,1);
长期支撑:DRAWLINE(D255,L,U11,L,1),COLORFF0000,LINETHICK1;
DRAWTEXT(ISLASTBAR,长期支撑,'↖长撑')LINETHICK1,COLORYELLOW;
M:=INTPART(3*20/5);
A12:=REF(H,M)=HHV(H,2*M+1);
B12:=FILTER(A12,M);
C12:=BACKSET(B12,M+1);
D12:=FILTER(C12,M);
R112:=BACKSET(ISLASTBAR,BARSLAST(D12)+1);
S112:=R112>REF(R112,1);
辅助压力:DRAWLINE(D12,H,S112,H,1),COLORMAGENTA,DOTLINE;
DRAWICON(CROSS(C,辅助压力),辅助压力*1,11);
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
DKX:(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;
MADKX:MA(DKX,5);{5日多空线}
DRAWBAND(MADKX,RGB(0,100,200),DKX,RGB(255,150,70));{画出带状线}
{买线:=EMA(C,1);
卖线:=EMA(SLOPE(C,10)*10+C,20);
DRAWLINE(CROSS(买线,卖线),LLV(L,2),买线>卖线,IF(ISLASTBAR=1,L,DRAWNULL),0),COLORMAGENTA,LINETHICK2;
DRAWLINE(CROSS(买线,卖线),LLV(L,2),CROSS(卖线,买线),H,0),COLORMAGENTA,LINETHICK2;
DRAWLINE(CROSS(卖线,买线),H,CROSS(买线,卖线),LLV(L,2),0),COLORWHITE,LINETHICK2;
DRAWKLINE(H,O,L,C);
STICKLINE(买线>=卖线,O,C,2,0)COLORLIRED;
STICKLINE(买线>=卖线,L,H,0,0)COLORLIRED;
STICKLINE(买线<卖线,O,C,2,0)COLORCC9900;
STICKLINE(买线<卖线,L,H,0,0)COLORCC9900;
DRAWICON(CROSS(买线,卖线),L*0.995,25);
DRAWICON(CROSS(卖线,买线),H*1.03,24);};
