同花顺多空趋势线副图指标源码

A1:=(EMA(((O+H+L+C)/4),3)+EMA(((O+H+L+C)/4),6)+EMA(((O+H+L+C)/4),9))/3;

A2:=(EMA(((O+H+L+C)/4),5)+EMA(((O+H+L+C)/4),10)+EMA(((O+H+L+C)/4),20))/3;

A3:=(EMA(((O+H+L+C)/4),7)+EMA(((O+H+L+C)/4),14)+EMA(((O+H+L+C)/4),28))/3;

A4:=(EMA(((O+H+L+C)/4),9)+EMA(((O+H+L+C)/4),18)+EMA(((O+H+L+C)/4),36))/3;

A5:=(EMA(((O+H+L+C)/4),11)+EMA(((O+H+L+C)/4),22)+EMA(((O+H+L+C)/4),44))/3;

A6:=(EMA(((O+H+L+C)/4),13)+EMA(((O+H+L+C)/4),26)+EMA(((O+H+L+C)/4),52))/3;

A:(EMA(((O+H+L+C)/4),21)+EMA(((O+H+L+C)/4),34)+EMA(((O+H+L+C)/4),55))/3;

PARTLINE(A1,A1>REF(A1,1),RGB(255,0,255),A1<REF(A1,1),RGB(0,255,0));

PARTLINE(A2,A2>REF(A2,1),RGB(255,0,255),A2<REF(A2,1),RGB(0,255,0));

PARTLINE(A3,A3>REF(A3,1),RGB(255,0,255),A3<REF(A3,1),RGB(0,255,0));

PARTLINE(A4,A4>REF(A4,1),RGB(255,0,255),A4<REF(A4,1),RGB(0,255,0));

PARTLINE(A5,A5>REF(A5,1),RGB(255,0,255),A5<REF(A5,1),RGB(0,255,0));

PARTLINE(A6,A6>REF(A6,1),RGB(255,0,255),A6<REF(A6,1),RGB(0,255,0));

PARTLINE(A,A>REF(A,1),RGB(255,0,255),A<REF(A,1),RGB(0,255,0)),linethick1;

DRAWICON(CROSS(A1,A),A1+0.0,'buy');

A1:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,3)+EMA((OPEN+HIGH+LOW+CLOSE)/4,6)+EMA((OPEN+HIGH+LOW+CLOSE)/4,9))/3;

A2:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,5)+EMA((OPEN+HIGH+LOW+CLOSE)/4,10)+EMA((OPEN+HIGH+LOW+CLOSE)/4,20))/3;

A3:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,7)+EMA((OPEN+HIGH+LOW+CLOSE)/4,14)+EMA((OPEN+HIGH+LOW+CLOSE)/4,28))/3;

A4:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,9)+EMA((OPEN+HIGH+LOW+CLOSE)/4,18)+EMA((OPEN+HIGH+LOW+CLOSE)/4,36))/3;

A5:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,11)+EMA((OPEN+HIGH+LOW+CLOSE)/4,22)+EMA((OPEN+HIGH+LOW+CLOSE)/4,44))/3;

A6:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,13)+EMA((OPEN+HIGH+LOW+CLOSE)/4,26)+EMA((OPEN+HIGH+LOW+CLOSE)/4,52))/3;

A7:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,21)+EMA((OPEN+HIGH+LOW+CLOSE)/4,34)+EMA((OPEN+HIGH+LOW+CLOSE)/4,68))/3;

mA1:=FORCAST(A1,6);

mA2:=FORCAST(A2,6);

mA3:=FORCAST(A3,6);

mA4:=FORCAST(A4,6);

mA5:=FORCAST(A5,6);

mA6:=FORCAST(A6,6);

mA7:=FORCAST(A7,6),Colorfooffo,Linethick1;

TOWERC:=FORCAST(EMA((3*CLOSE+2*OPEN+HIGH+LOW)/7,1),6);

DIRECTIONMAX:=MAX(REF(TOWERC,1),REF(TOWERC,1));

DIRECTIONMIN:=MIN(REF(TOWERC,1),REF(TOWERC,1));

STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,8,1),COLOR0000FF;

STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,DIRECTIONMIN,8,1),COLOR00FF00;