{MA2}
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,'所属板块:'+BLKNAME),ALIGN4,colorBBFFFF;
A:="STSFunc@CALSTSL";
R1:="STSFunc@STS_RISK1";
R2:"STSFunc@STS_RISK2",LINETHICK0,color804000;
S1:="STSFunc@STS_STS1";
S2:="STSFunc@STS_STS2";
TBS:="STSFunc@STS_STSBS";
DN:="STSFunc@STS_STSDN";
UP:="STSFunc@STS_STSUP";
压力位:ABS(UP),LINETHICK0,PRECISION2,colorFF;
支撑位:ABS(DN),LINETHICK0,PRECISION2,colorFF00;
警示位:IF(R1<>0,ABS(R1),IF(R2<>0,ABS(R2),0)),LINETHICK0,PRECISION2,color77BBFF;
DRAWLINE(CROSS(UP,0.01),UP,UP<>REF(UP,1) OR CLOSE=DYNAINFO(7) OR ISLASTBAR,REF(UP,BARSLAST(CROSS(UP,0.01))),0),LINEDOT,colorFF;
DRAWLINE(CROSS(-0.01,UP),-UP,UP<>REF(UP,1) OR CLOSE=DYNAINFO(7) OR ISLASTBAR,REF(-UP,BARSLAST(CROSS(-0.01,UP))),0),colorFF;
DRAWLINE(CROSS(DN,0.01),DN,DN<>REF(DN,1) OR CLOSE=DYNAINFO(7) OR ISLASTBAR,REF(DN,BARSLAST(CROSS(DN,0.01))),0),LINEDOT,colorFF00;
DRAWLINE(CROSS(-0.01,DN),-DN,DN<>REF(DN,1) OR CLOSE=DYNAINFO(7) OR ISLASTBAR,REF(-DN,BARSLAST(CROSS(-0.01,DN))),0),colorFF00;
DRAWLINE(CROSS(R1,0.01),R1,R1<>REF(R1,1) OR CLOSE=DYNAINFO(7) OR ISLASTBAR,REF(R1,BARSLAST(CROSS(R1,0.01))),0),color77BBFF;
DRAWLINE(CROSS(-0.01,R1),-R1,R1<>REF(R1,1) OR CLOSE=DYNAINFO(7) OR ISLASTBAR,REF(-R1,BARSLAST(CROSS(-0.01,R1))),0),LINEDOT,color77BBFF;
DRAWLINE(CROSS(R2,0.01),R2,R2<>REF(R2,1) OR CLOSE=DYNAINFO(7) OR ISLASTBAR,REF(R2,BARSLAST(CROSS(R2,0.01))),0),LINEDOT,color77BBFF;
DRAWLINE(CROSS(-0.01,R2),-R2,R2<>REF(R2,1) OR CLOSE=DYNAINFO(7) OR ISLASTBAR,REF(-R2,BARSLAST(CROSS(-0.01,R2))),0),color77BBFF;
DRAWNUMBER(S1<0,HIGH*1.02,ABS(S1),0),ALIGN0,colorFFFFFF;
DRAWNUMBER(S1>0,LOW,S1,0),ALIGN0,colorFF00;
DRAWNUMBER(S2<0 AND S2>-13,HIGH*1.01,ABS(S2),0),ALIGN0,colorFF;
DRAWNUMBER(S2>0 AND S2<13,LOW,ABS(S2),0),ALIGN0,PXDN18,colorFFFF;
DRAWTEXT(S2=13,LOW*0.97,'+'),ALIGN0,colorFF;
DRAWTEXT(S2=14,LOW*0.97,'13'),ALIGN0,colorFF;
DRAWTEXT(S2=-13,HIGH*1.06,'+'),ALIGN0,colorFF;
DRAWTEXT(S2=-14,HIGH*1.06,'13'),ALIGN0,colorFF;
A:="LTFunc4@FORLT2";
S1:="LTFunc4@LT_S1";
HS:="LTFunc4@LT_HS";
LS:="LTFunc4@LT_LS";
P1:="LTFunc4@LT_P1";
UPP:="LTFunc4@LT_UPP";
UDD:="LTFunc4@LT_UDD";
LXB:=P1=1 AND REF(P1,1)=0;
LXS:=P1=0 AND REF(P1,1)=1;
MR:=S1=1 AND REF(S1,1)=0 AND P1+REF(P1,1)<>1;
MC:=S1=0 AND REF(S1,1)=1 AND P1+REF(P1,1)<>1;
FB:=IF(S1=0,HS,LS);
DRAWICON(P1=1 AND REF(P1,1)=0,LOW*0.994,'buy1');
DRAWICON(P1=0 AND REF(P1,1)=1,HIGH*1.04,'sell1');
IF DATACOUNT<3 THEN
EXIT;
HH:=HIGH;
LL:=LOW;
PL:=LL[DATACOUNT];
PH:=0;
TK:=IF(LOW>REF(HIGH,1),1,IF(HIGH<REF(LOW,1),-1,0));
FOR I=DATACOUNT-1 DOWNTO 2 DO BEGIN
IF LL[I]<PL THEN
PL:=LL[I];
IF HH[I]>PH THEN
PH:=HH[I];
IF TK[I]=1 AND PL<=HH[I-1] THEN
TK[I]:=0;
IF TK[I]=-1 AND PH>=LL[I-1] THEN
TK[I]:=0;
END;
DRAWTEXT(TK=1,LOW-(LOW-REF(HIGH,1))/2,' 未补'),ALIGN1,PXUP4,colorBBFFFF;
DRAWTEXT(TK=-1,HIGH+(REF(LOW,1)-HIGH)/2,'未补 '),ALIGN1,PXUP4,color77BBFF;
DRAWSL(TK=1,REF(HIGH,1),0,2,1),colorC0C0C0;
DRAWSL(TK=1,LOW,0,2,1),colorC0C0C0;
DRAWSL(TK=-1,REF(LOW,1),0,2,1),color808040;
DRAWSL(TK=-1,HIGH,0,2,1),color808040;
FH:=HIGH;
FL:=LOW;
FOR P=DATACOUNT-1 DOWNTO 1 DO BEGIN
IF FH[P]<FH[P+1] THEN
FH[P]:=FH[P+1];
IF FL[P]>FL[P+1] THEN
FL[P]:=FL[P+1];
END;
QK:=LOW>REF(HIGH,1) OR HIGH<REF(LOW,1);
G:=IF(LOW>REF(HIGH,1),LOW,IF(HIGH<REF(LOW,1),REF(LOW,1),0));
D:=IF(LOW>REF(HIGH,1),REF(HIGH,1),IF(HIGH<REF(LOW,1),HIGH,0));
S:=IF(LOW>REF(HIGH,1),2,IF(HIGH<REF(LOW,1),1,0));
TJ:=S=2 AND FL<=G AND FL>=D OR S=1 AND FH<G AND FH>=D;
W:=BARSSINCE(BACKSET(BARSTATUS=2,BARSLAST(TJ*BARPOS=BARPOS)+1))+1;
S1:=IF(REF(S,W-1)=2,REF(FL,W-1),IF(REF(S,W-1)=1,REF(FH,W-1),0));
S2:=IF(REF(S,W-1)=2,REF(D,W-1),IF(REF(S,W-1)=1,REF(G,W-1),0));
A:=MAX(S1,S2);
B:=MIN(S1,S2);
STICKLINE(W,S1,S2,30,0),color808080;
DRAWTEXTEX(CLOSE,1,1,42,'缺口: '+NUMTOSTR(B,2)+'--'+NUMTOSTR(A,2)),color77BBFF; |
