自动画线--什么都不说,好用请支持
{自动画线}
ATS1:=REF(HIGH,PS)=HHV(HIGH,2*PS+1);
ATS2:=FILTER(ATS1,PS);
ATS3:=BACKSET(ATS2,PS+1);
ATS4:=FILTER(ATS3,PS),COLORWHITE;{高点}
ATS5:=REFDATE(BARSLAST(ATS4),DATE);
ATS6:=REFDATE(REF(BARSLAST(ATS4),ATS5+1)+ATS5+1,DATE);
ATS7:=CURRBARSCOUNT=ATS5+1;
ATS8:=CURRBARSCOUNT=ATS6+1;
HP1:=CONST(REF(H,ATS5));
HP2:=CONST(REF(H,ATS6));
TBT:=ATS6-ATS5;{时间间隔}
MAR:=ABS(HP1-HP2);{差};
TD:=BARSLAST(ATS8);
PR:=IF(HP1>HP2,HP2+MAR/TBT*TD,HP2-MAR/TBT*TD);
SPR1:=IF(HP1>HP2,HP2+1/2*MAR/TBT*TD,HP2-1/2*MAR/TBT*TD);
SPR2:=IF(HP1>HP2,HP2+1/3*MAR/TBT*TD,HP2-1/3*MAR/TBT*TD);
SPR3:=IF(HP1>HP2,HP2+1/4*MAR/TBT*TD,HP2-1/4*MAR/TBT*TD);
SPR4:=IF(HP1>HP2,HP2+1/8*MAR/TBT*TD,HP2-1/8*MAR/TBT*TD);
SPR5:=IF(HP1>HP2,HP2+2*MAR/TBT*TD,HP2-2*MAR/TBT*TD);
SPR6:=IF(HP1>HP2,HP2+3*MAR/TBT*TD,HP2-3*MAR/TBT*TD);
SPR7:=IF(HP1>HP2,HP2+4*MAR/TBT*TD,HP2-4*MAR/TBT*TD);
SPR8:=IF(HP1>HP2,HP2+8*MAR/TBT*TD,HP2-8*MAR/TBT*TD);
BTS1:=REF(LOW,SS)=LLV(LOW,2*SS+1);
BTS2:=FILTER(BTS1,SS);
BTS3:=BACKSET(BTS2,SS+1);
BTS4:=FILTER(BTS3,SS),COLORWHITE;{高点}
BTS5:=REFDATE(BARSLAST(BTS4),DATE);
BTS6:=REFDATE(REF(BARSLAST(BTS4),BTS5+1)+BTS5+1,DATE);
BTS7:=CURRBARSCOUNT=BTS5+1;
BTS8:=CURRBARSCOUNT=BTS6+1;
LP1:=CONST(REF(LOW,BTS5));
LP2:=CONST(REF(LOW,BTS6));
BTBT:=BTS6-BTS5;{时间间隔}
BMAR:=ABS(LP1-LP2);{差};
BTD:=BARSLAST(BTS8);
SR:=IF(LP1>LP2,LP2+BMAR/BTBT*BTD,LP2-BMAR/BTBT*BTD);
SSR1:=IF(LP1>LP2,LP2+1/2*BMAR/BTBT*BTD,LP2-1/2*BMAR/BTBT*BTD);
SSR2:=IF(LP1>LP2,LP2+1/3*BMAR/BTBT*BTD,LP2-1/3*BMAR/BTBT*BTD);
SSR3:=IF(LP1>LP2,LP2+1/4*BMAR/BTBT*BTD,LP2-1/4*BMAR/BTBT*BTD);
SSR4:=IF(LP1>LP2,LP2+1/8*BMAR/BTBT*BTD,LP2-1/8*BMAR/BTBT*BTD);
SSR5:=IF(LP1>LP2,LP2+2*BMAR/BTBT*BTD,LP2-2*BMAR/BTBT*BTD);
SSR6:=IF(LP1>LP2,LP2+3*BMAR/BTBT*BTD,LP2-3*BMAR/BTBT*BTD);
SSR7:=IF(LP1>LP2,LP2+4*BMAR/BTBT*BTD,LP2-4*BMAR/BTBT*BTD);
SSR8:=IF(LP1>LP2,LP2+8*BMAR/BTBT*BTD,LP2-8*BMAR/BTBT*BTD);
GX:=MAX(HP1,HP2);
DX:=MIN(LP1,LP2);
HL:IF(CURRBARSCOUNT<=ATS6+1,HP2,DRAWNULL),POINTDOT;
PRL:IF(BETWEEN(PR,DX,GX),PR,DRAWNULL);
SPRL1:IF(BETWEEN(SPR1,DX,GX),SPR1,DRAWNULL),POINTDOT;
SPRL2:IF(BETWEEN(SPR2,DX,GX),SPR2,DRAWNULL),POINTDOT;
SPRL3:IF(BETWEEN(SPR3,DX,GX),SPR3,DRAWNULL),POINTDOT;
SPRL4:IF(BETWEEN(SPR4,DX,GX),SPR4,DRAWNULL),POINTDOT;
SPRL5:IF(BETWEEN(SPR5,DX,GX),SPR5,DRAWNULL),POINTDOT;
SPRL6:IF(BETWEEN(SPR6,DX,GX),SPR6,DRAWNULL),POINTDOT;
SPRL7:IF(BETWEEN(SPR7,DX,GX),SPR7,DRAWNULL),POINTDOT;
SPRL8:IF(BETWEEN(SPR8,DX,GX),SPR8,DRAWNULL),POINTDOT;
{股票软件下载网 HTTP://WWW.88GS.COM 整理}
LL:IF(CURRBARSCOUNT<=BTS6+1,LP2,DRAWNULL),POINTDOT;
SRL:IF(BETWEEN(SR,DX,GX),SR,DRAWNULL);
SSRL1:IF(BETWEEN(SSR1,DX,GX),SSR1,DRAWNULL),POINTDOT;
SSRL2:IF(BETWEEN(SSR2,DX,GX),SSR2,DRAWNULL),POINTDOT;
SSRL3:IF(BETWEEN(SSR3,DX,GX),SSR3,DRAWNULL),POINTDOT;
SSRL4:IF(BETWEEN(SSR4,DX,GX),SSR4,DRAWNULL),POINTDOT;
SSRL5:IF(BETWEEN(SSR5,DX,GX),SSR5,DRAWNULL),POINTDOT;
SSRL6:IF(BETWEEN(SSR6,DX,GX),SSR6,DRAWNULL),POINTDOT;
SSRL7:IF(BETWEEN(SSR7,DX,GX),SSR7,DRAWNULL),POINTDOT;
SSRL8:IF(BETWEEN(SSR8,DX,GX),SSR8,DRAWNULL),POINTDOT;