大智L-2 一目均衡
大智L-2 一目均衡 (源码取自谁己记不清,因论坛有要,贴出,注意参数己有所改动并迟行带因L-2无此功能)
input:n1(3,2,100),n2(5,2,100),n3(13,2,100);
AA:=(HHV(HIGH,90)-LLV(LOW,120))/30;
Var1:=(2*CLOSE+HIGH+LOW)/4;
转换线:(HHV(HIGH,n1)+LLV(LOW,n1))/2,coloraaff99;
基准线:(HHV(HIGH,n2)+LLV(LOW,n2))/2,colorff6dd8;
迟行带:MA(CLOSE,n2),MOVE26,colorff9224;
先行带A:REF((转换线+基准线)/2,n2),COLORYELLOW;
先行带B:REF((HHV(HIGH,n3)+LLV(LOW,n3))/2,n2),color909090;
STICKLINE(先行带A<先行带B,先行带A,先行带B,2,1.5),COLOR339933;
STICKLINE(先行带A>=先行带B,先行带A,先行带B,2,0.1),COLOR0033CC;
POLYLINE(1,先行带A),COLORYELLOW;
POLYLINE(1,基准线),colorff6dd8;
POLYLINE(1,转换线),coloraaff99;
DRAWTEXT(CROSS(转换线,基准线) AND Var1<MIN(先行带A,先行带B),MIN(基准线,LOW)*0.995,'▲'),COLORRED,ALIGN0;
DRAWTEXT(CROSS(转换线,基准线) AND RANGE(Var1,MIN(先行带A,先行带B),MAX(先行带A,先行带B)),LOW*0.995,'▲▲'),COLORRED,ALIGN0;
DRAWTEXT(CROSS(转换线,基准线) AND Var1>MAX(先行带A,先行带B),LOW-AA*0.5,'▲▲▲'),COLORRED,ALIGN0;
DRAWTEXT(CROSS(基准线,转换线) AND Var1<MIN(先行带A,先行带B),MAX(基准线,HIGH)+AA*2,'▼▼▼'),COLORFF9966,ALIGN0;
DRAWTEXT(CROSS(基准线,转换线) AND RANGE(Var1,MIN(先行带A,先行带B),MAX(先行带A,先行带B)),MAX(基准线,HIGH)+AA,'▼▼'),COLORFF9966,ALIGN0;
DRAWTEXT(CROSS(基准线,转换线) AND Var1>MAX(先行带A,先行带B),MAX(基准线,HIGH)+AA,'▼'),COLORFF9966,ALIGN0;
{阴柱}
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLORFF9F68;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLOR009900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLOR00AA00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00BB00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLOR00CC00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00DD00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00EE00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00FF00;
{红柱}
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLORFFBBFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLORFF00FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLORFF22FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLORFF44FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLORFF66FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLORFF88FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLORFF99FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLORFFAAFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLORFFBBFF;
TY:=CLOSE;
HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10);
LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10);
A:=REF(CLOSE,BARSLAST(HD));
B:=REF(CLOSE,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD);
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
波浪顶:IF(T1,A,A),POINTDOT,LINETHICK3,colorFF00FF;
STICKLINE(T1,A,A,9,0),colorFF00FF;
波浪底:IF(T2,B,B),POINTDOT,LINETHICK3,color80FF00;
STICKLINE(T2,B,B,9,0),color80FF00;
波浪顶1:IF(T1,A,A),POINTDOT,LINETHICK3,colorFF00FF;
波浪底1:IF(T2,B,B),POINTDOT,LINETHICK3,color80FF00;
