{自动画线} 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; {点击看本软件截图: 58股票 公式网 http://www. 58gu. com 整理} |