[通达信指标]江恩角度线

HH:=800;

LL:=800;

N1:=3;

N2:=100;

N3:=25;

N4:=1;

TCH:=CONST(FINDHIGH(H,0,HH*10,1));

GTT:=CONST(BARSLAST(TCH=H))+1;

SXZANGH:=CONST(IF(GTT=1,H,REF(H,GTT-1)));

BCL:=CONST(FINDLOW(L,0,LL*10,1));

DTT:=CONST(BARSLAST(BCL=L))+1;

SXDIEL:=CONST(IF(DTT=1,L,REF(L,DTT-1)));

ZHANGDZQ:=BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(L=SXDIEL)+1));

DIEDIANZQ:=BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(H=SXZANGH)+1));

DI0206:=IF(N1=1,DIEDIANZQ,IF(N1=2,ZHANGDZQ,IF(N1=3,ZHANGDZQ,DIEDIANZQ)));

LXIELV:=N2/IF(C<300,1000,10);

GAO0206:=IF(N1=1,DIEDIANZQ,IF(N1=2,ZHANGDZQ,IF(N1=3,DIEDIANZQ,ZHANGDZQ)));

HXIELV:=N2/IF(C<300,1000,10);

IM68:=((SXZANGH-SXDIEL)/6-(SXZANGH-SXDIEL)/8);

GHZANGX:=SXZANGH+(SXZANGH-SXDIEL)/8;

DLDIEX:=SXDIEL-(SXZANGH-SXDIEL)/8;

GTHT:=IF(DTT>GTT,DTT,GTT);

R:=ABS(GTT-DTT);

TIANXIAN:=SXZANGH;

DICIAN:=SXDIEL;

HHH1:=IF(DICIAN+CONST(LXIELV*1.618)*DI0206>=DICIAN,DICIAN+CONST(LXIELV*1.618)*DI0206,DRAWNULL);

HHH2:=IF(DICIAN+CONST(LXIELV*1.000)*DI0206>=DICIAN,DICIAN+CONST(LXIELV*1.000)*DI0206,DRAWNULL);

HHH3:=IF(DICIAN+CONST(LXIELV*0.618)*DI0206>=DICIAN,DICIAN+CONST(LXIELV*0.618)*DI0206,DRAWNULL);

HHH4:=IF(DICIAN+CONST(LXIELV*0.382)*DI0206>=DICIAN,DICIAN+CONST(LXIELV*0.382)*DI0206,DRAWNULL);

HHH5:=IF(DICIAN+CONST(LXIELV*0.316)*DI0206>=DICIAN,DICIAN+CONST(LXIELV*0.316)*DI0206,DRAWNULL);

HHH6:=IF(DICIAN+CONST(LXIELV*0.250)*DI0206>=DICIAN,DICIAN+CONST(LXIELV*0.250)*DI0206,DRAWNULL);

HHH7:=IF(DICIAN+CONST(LXIELV*0.156)*DI0206>=DICIAN,DICIAN+CONST(LXIELV*0.156)*DI0206,DRAWNULL);

HHH8:=IF(DICIAN+CONST(LXIELV*0.092)*DI0206>=DICIAN,DICIAN+CONST(LXIELV*0.092)*DI0206,DRAWNULL);

HHH9:=IF(DICIAN+CONST(LXIELV*0.055)*DI0206>=DICIAN,DICIAN+CONST(LXIELV*0.055)*DI0206,DRAWNULL);

HHH10:=IF(DICIAN+CONST(LXIELV*0.025)*DI0206>=DICIAN,DICIAN+CONST(LXIELV*0.025)*DI0206,DRAWNULL);

HHH11:=IF(DICIAN+CONST(LXIELV*0.000)*DI0206>=DICIAN,DICIAN+CONST(LXIELV*0.000)*DI0206,DRAWNULL);

上11:IF(HHH11<=TIANXIAN*1.05,HHH11,DRAWNULL)COLORRED;

上10:IF(HHH10<=TIANXIAN*1.05,HHH10,DRAWNULL)COLORRED;

上9:IF(HHH9<=TIANXIAN*1.05,HHH9,DRAWNULL)COLORRED;

上8:IF(HHH8<=TIANXIAN*1.05,HHH8,DRAWNULL)COLORRED;

上7:IF(HHH7<=TIANXIAN*1.05,HHH7,DRAWNULL)COLORRED;

上6:IF(HHH6<=TIANXIAN*1.05,HHH6,DRAWNULL)COLORYELLOW;

上5:IF(HHH5<=TIANXIAN*1.05,HHH5,DRAWNULL)COLORRED;

上4:IF(HHH4<=TIANXIAN*1.05,HHH4,DRAWNULL)COLORRED;

上3:IF(HHH3<=TIANXIAN*1.05,HHH3,DRAWNULL)COLORRED;

上2:IF(HHH2<=TIANXIAN*1.05,HHH2,DRAWNULL)COLORRED;

上1:IF(HHH1<=TIANXIAN*1.05,HHH1,DRAWNULL)COLORRED;

LLL1:=IF(TIANXIAN-CONST(HXIELV*1.618)*GAO0206<=TIANXIAN,TIANXIAN-CONST(HXIELV*1.618)*GAO0206,DRAWNULL);

LLL2:=IF(TIANXIAN-CONST(HXIELV*1.000)*GAO0206<=TIANXIAN,TIANXIAN-CONST(HXIELV*1.000)*GAO0206,DRAWNULL);

LLL3:=IF(TIANXIAN-CONST(HXIELV*0.618)*GAO0206<=TIANXIAN,TIANXIAN-CONST(HXIELV*0.618)*GAO0206,DRAWNULL);

LLL4:=IF(TIANXIAN-CONST(HXIELV*0.382)*GAO0206<=TIANXIAN,TIANXIAN-CONST(HXIELV*0.382)*GAO0206,DRAWNULL);

LLL5:=IF(TIANXIAN-CONST(HXIELV*0.316)*GAO0206<=TIANXIAN,TIANXIAN-CONST(HXIELV*0.316)*GAO0206,DRAWNULL);

LLL6:=IF(TIANXIAN-CONST(HXIELV*0.250)*GAO0206<=TIANXIAN,TIANXIAN-CONST(HXIELV*0.250)*GAO0206,DRAWNULL);

LLL7:=IF(TIANXIAN-CONST(HXIELV*0.156)*GAO0206<=TIANXIAN,TIANXIAN-CONST(HXIELV*0.156)*GAO0206,DRAWNULL);

LLL8:=IF(TIANXIAN-CONST(HXIELV*0.092)*GAO0206<=TIANXIAN,TIANXIAN-CONST(HXIELV*0.092)*GAO0206,DRAWNULL);

LLL9:=IF(TIANXIAN-CONST(HXIELV*0.055)*GAO0206<=TIANXIAN,TIANXIAN-CONST(HXIELV*0.055)*GAO0206,DRAWNULL);

LLL10:=IF(TIANXIAN-CONST(HXIELV*0.025)*GAO0206<=TIANXIAN,TIANXIAN-CONST(HXIELV*0.025)*GAO0206,DRAWNULL);

LLL11:=IF(TIANXIAN-CONST(HXIELV*0.000)*GAO0206<=TIANXIAN,TIANXIAN-CONST(HXIELV*0.000)*GAO0206,DRAWNULL);

下11:IF(LLL11>=DICIAN*0.95,LLL11,DRAWNULL),COLORGREEN;

下10:IF(LLL10>=DICIAN*0.95,LLL10,DRAWNULL),COLORGREEN;

下9:IF(LLL9>=DICIAN*0.95,LLL9,DRAWNULL),COLORGREEN;

下8:IF(LLL8>=DICIAN*0.95,LLL8,DRAWNULL),COLORGREEN;

下7:IF(LLL7>=DICIAN*0.95,LLL7,DRAWNULL),COLORGREEN;

下6:IF(LLL6>=DICIAN*0.95,LLL6,DRAWNULL),COLORYELLOW;

下5:IF(LLL5>=DICIAN*0.95,LLL5,DRAWNULL),COLORGREEN;

下4:IF(LLL4>=DICIAN*0.95,LLL4,DRAWNULL),COLORGREEN;

下3:IF(LLL3>=DICIAN*0.95,LLL3,DRAWNULL),COLORGREEN;

下2:IF(LLL2>=DICIAN*0.95,LLL2,DRAWNULL),COLORGREEN;

下1:IF(LLL1>=DICIAN*0.95,LLL1,DRAWNULL),COLORGREEN;

DRAWTEXT(CURRBARSCOUNT=GTT,SXZANGH*0.98,’斐波那契下跌周期’),COLOR00FF00;

DRAWTEXT(CURRBARSCOUNT=GTT,SXZANGH*0.99,’1′),COLOR00FF00;

STICKLINE(CURRBARSCOUNT=GTT-2,SXZANGH,SXDIEL,0,0),COLOR556600;

DRAWTEXT(CURRBARSCOUNT=GTT-2,SXZANGH*0.99,’3′),COLOR00FF00;

STICKLINE(CURRBARSCOUNT=GTT-4,SXZANGH,SXDIEL,0,0),COLOR556600;

DRAWTEXT(CURRBARSCOUNT=GTT-4,SXZANGH*0.99,’5′),COLOR00FF00;

STICKLINE(CURRBARSCOUNT=GTT-7,SXZANGH,SXDIEL,0,0),COLOR556600;

DRAWTEXT(CURRBARSCOUNT=GTT-7,SXZANGH*0.99,’8′),COLOR00FF00;

STICKLINE(CURRBARSCOUNT=GTT-12,SXZANGH,SXDIEL,0,0),COLOR556600;

DRAWTEXT(CURRBARSCOUNT=GTT-12,SXZANGH*0.99,’13’),COLOR00FF00;

STICKLINE(CURRBARSCOUNT=GTT-20,SXZANGH,SXDIEL,0,0),COLOR556600;

DRAWTEXT(CURRBARSCOUNT=GTT-20,SXZANGH*0.99,’21’),COLOR00FF00;

STICKLINE(CURRBARSCOUNT=GTT-33,SXZANGH,SXDIEL,0,0),COLOR556600;

DRAWTEXT(CURRBARSCOUNT=GTT-33,SXZANGH*0.99,’34 ‘),COLOR00FF00;

STICKLINE(CURRBARSCOUNT=GTT-54,SXZANGH,SXDIEL,0,0),COLOR556600;

DRAWTEXT(CURRBARSCOUNT=GTT-54,SXZANGH*0.99,’55’),COLOR00FF00;

STICKLINE(CURRBARSCOUNT=GTT-88,SXZANGH,SXDIEL,0,0),COLOR556600;

DRAWTEXT(CURRBARSCOUNT=GTT-88,SXZANGH*0.99,’89’),COLOR00FF00;

STICKLINE(CURRBARSCOUNT=GTT-143,SXZANGH,SXDIEL,0,0),COLOR556600;

DRAWTEXT(CURRBARSCOUNT=GTT-143,SXZANGH*0.99,’144′),COLOR00FF00;

STICKLINE(CURRBARSCOUNT=GTT-232,SXZANGH,SXDIEL,0,0),COLOR556600;

DRAWTEXT(CURRBARSCOUNT=GTT-232,SXZANGH*0.99,’233′),COLOR00FF00;

STICKLINE(CURRBARSCOUNT=GTT-376,SXZANGH,SXDIEL,0,0),COLOR556600;

DRAWTEXT(CURRBARSCOUNT=GTT-376,SXZANGH*0.99,’377′),COLOR00FF00;

STICKLINE(CURRBARSCOUNT=GTT-609,SXZANGH,SXDIEL,0,0),COLOR556600;

DRAWTEXT(CURRBARSCOUNT=GTT-609,SXZANGH*0.99,’610′),COLOR00FF00;

STICKLINE(CURRBARSCOUNT=GTT-986,SXZANGH,SXDIEL,0,0),COLOR556600;

DRAWTEXT(CURRBARSCOUNT=GTT-986,SXZANGH*0.99,’987′),COLOR00FF00;

DRAWTEXT(CURRBARSCOUNT=DTT,SXDIEL*1.03,’斐波那契上升周期’),COLOR0000FF;

DRAWTEXT(CURRBARSCOUNT=DTT,SXDIEL*1.01,’1′),COLOR0000FF;

STICKLINE(CURRBARSCOUNT=DTT-2,SXZANGH,SXDIEL,0,0),COLORAA00AA;

DRAWTEXT(CURRBARSCOUNT=DTT-2,SXDIEL*1.01,’3′),COLOR0000FF;

STICKLINE(CURRBARSCOUNT=DTT-4,SXZANGH,SXDIEL,0,0),COLORAA00AA;

DRAWTEXT(CURRBARSCOUNT=DTT-4,SXDIEL*1.01,’5′),COLOR0000FF;

STICKLINE(CURRBARSCOUNT=DTT-7,SXZANGH,SXDIEL,0,0),COLORAA00AA;

DRAWTEXT(CURRBARSCOUNT=DTT-7,SXDIEL*1.01,’8′),COLOR0000FF;

STICKLINE(CURRBARSCOUNT=DTT-12,SXZANGH,SXDIEL,0,0),COLORAA00AA;

DRAWTEXT(CURRBARSCOUNT=DTT-12,SXDIEL*1.01,’13’),COLOR0000FF;

STICKLINE(CURRBARSCOUNT=DTT-20,SXZANGH,SXDIEL,0,0),COLORAA00AA;

DRAWTEXT(CURRBARSCOUNT=DTT-20,SXDIEL*1.01.01,’21’),COLOR0000FF;

STICKLINE(CURRBARSCOUNT=DTT-33,SXZANGH,SXDIEL,0,0),COLORAA00AA;

DRAWTEXT(CURRBARSCOUNT=DTT-33,SXDIEL*1.01,’34’),COLOR0000FF;

STICKLINE(CURRBARSCOUNT=DTT-54,SXZANGH,SXDIEL,0,0),COLORAA00AA;

DRAWTEXT(CURRBARSCOUNT=DTT-54,SXDIEL*1.01,’55’),COLOR0000FF;

STICKLINE(CURRBARSCOUNT=DTT-88,SXZANGH,SXDIEL,0,0),COLORAA00AA;

DRAWTEXT(CURRBARSCOUNT=DTT-88,SXDIEL*1.01,’89’),COLOR0000FF;

STICKLINE(CURRBARSCOUNT=DTT-143,SXZANGH,SXDIEL,0,0),COLORAA00AA;

DRAWTEXT(CURRBARSCOUNT=DTT-143,SXDIEL*1.01,’144′),COLOR0000FF;

STICKLINE(CURRBARSCOUNT=DTT-232,SXZANGH,SXDIEL,0,0),COLORAA00AA;

DRAWTEXT(CURRBARSCOUNT=DTT-232,SXDIEL*1.01,’233′),COLOR0000FF;

STICKLINE(CURRBARSCOUNT=DTT-376,SXZANGH,SXDIEL,0,0),COLORAA00AA;

DRAWTEXT(CURRBARSCOUNT=DTT-376,SXDIEL*1.01,’377′),COLOR0000FF;

STICKLINE(CURRBARSCOUNT=DTT-609,SXZANGH,SXDIEL,0,0),COLORAA00AA;

DRAWTEXT(CURRBARSCOUNT=DTT-609,SXDIEL*1.01,’610′),COLOR0000FF;

STICKLINE(CURRBARSCOUNT=DTT-986,SXZANGH,SXDIEL,0,0),COLORAA00AA;

DRAWTEXT(CURRBARSCOUNT=DTT-986,SXDIEL*1.01,’987′),COLOR0000FF;