通达信立桩量+上升主升浪主副图 指标源码
通达信立桩量+上升主升浪主副图 指标源码
{立桩量上升主图源码如下}
MA5:MA(C,5);
MA20:MA(C,20);
MA60:MA(C,60);
ABC1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
ABC2:=REF(ABC1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABC3:=REF(ABC2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABC4:=REF(ABC3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABC5:=REF(ABC4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABC6:=REF(ABC5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABC7:=REF(ABC6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABC8:=REF(ABC7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABC9:=REF(ABC8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABCA:=REF(ABC9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABCB:=REF(ABCA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABCC:=REF(ABCB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABCD:=C;
ABCE:=REF(ABCD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABCF:=REF(ABCE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABC10:=REF(ABCF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABC11:=REF(ABC10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABC12:=REF(ABC11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABC13:=REF(ABC12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABC14:=REF(ABC13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABC15:=REF(ABC14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABC16:=REF(ABC15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABC17:=REF(ABC16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABC18:=REF(ABC17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABC19:=REF(ABCD OR ABCE OR ABCF OR ABC10 OR ABC11 OR ABC12 OR ABC13 OR
ABC14 OR ABC15 OR ABC16 OR ABC17 OR ABC18,1) AND ABC1;
ABC1A:=REF(ABC1 OR ABC2 OR ABC3 OR ABC4 OR ABC5 OR ABC6 OR ABC7 OR
ABC8 OR ABC9 OR ABCA OR ABCB OR ABCC,1) AND ABCD;
STICKLINE(ABC19,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR00FFFF;{黄色}
STICKLINE(ABC1A,REF(CLOSE,1),REF(CLOSE,2),2,0),COLORGREEN;{粉红色}
X1:=(C+L+H)/3;
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);
DRAWTEXT(FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10),
EMA8,' →上升'),COLORMAGENTA;
STICKLINE(FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10),OPEN,CLOSE,3,0),COLORMAGENTA;
DRAWICON(FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10),L,9);
AAA:=(3*C+H+L+O)/6;
ABC41:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>ABC41;
立桩量:=FILTER(TJ1,5);
TJ2:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(HIGH,3),1,0)));
突破:=TJ2=1;
TJ3:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(LOW,3),1,0)));
三天法则:=TJ3=1;
成立:=三天法则 AND 突破;
条件成立:=FILTER(成立,3);
DRAWICON(条件成立,L*0.99,25);
STICKLINE(条件成立,OPEN,CLOSE,3,0),COLORYELLOW;
DRAWTEXT(条件成立,L*0.99,' →立桩量'),COLORYELLOW;
{立桩量上升主副源码如下}
MA5:=MA(C,5);
MA20:=MA(C,20);
MA60:=MA(C,60);
ABC1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
ABC2:=REF(ABC1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABC3:=REF(ABC2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABC4:=REF(ABC3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABC5:=REF(ABC4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABC6:=REF(ABC5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABC7:=REF(ABC6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABC8:=REF(ABC7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABC9:=REF(ABC8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABCA:=REF(ABC9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABCB:=REF(ABCA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABCC:=REF(ABCB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABCD:=CLOSE;
ABCE:=REF(ABCD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABCF:=REF(ABCE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABC10:=REF(ABCF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABC11:=REF(ABC10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABC12:=REF(ABC11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABC13:=REF(ABC12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABC14:=REF(ABC13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABC15:=REF(ABC14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABC16:=REF(ABC15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABC17:=REF(ABC16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ABC18:=REF(ABC17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ABC19:=REF(ABCD OR ABCE OR ABCF OR ABC10 OR ABC11 OR ABC12 OR ABC13 OR
ABC14 OR ABC15 OR ABC16 OR ABC17 OR ABC18,1) AND ABC1;
ABC1A:=REF(ABC1 OR ABC2 OR ABC3 OR ABC4 OR ABC5 OR ABC6 OR ABC7 OR
ABC8 OR ABC9 OR ABCA OR ABCB OR ABCC,1) AND ABCD;
X1:=(C+L+H)/3;
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);
AAA:=(3*C+H+L+O)/6;
ABC41:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>ABC41;
立桩量:=FILTER(TJ1,5);
TJ2:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(HIGH,3),1,0)));
突破:=TJ2=1;
TJ3:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(LOW,3),1,0)));
三天法则:=TJ3=1;
成立:=三天法则 AND 突破;
条件成立:=FILTER(成立,3);
STICKLINE(条件成立,0,10,3,0),COLORYELLOW;
STICKLINE(立桩量,0,10,3,0),COLORRED;
