[通达信指标]顶底系列1 宝塔三平地翻红指标含选股

指标源码

BTVAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);

BTVAR2:=REF(BTVAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

BTVAR3:=REF(BTVAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

BTVAR4:=REF(BTVAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

BTVAR5:=REF(BTVAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

BTVAR6:=REF(BTVAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

BTVAR7:=REF(BTVAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

BTVAR8:=REF(BTVAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

BTVAR9:=REF(BTVAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

BTVARA:=REF(BTVAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

BTVARB:=REF(BTVARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

BTVARC:=REF(BTVARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

STICKLINE(BTVAR1 OR BTVAR2 OR BTVAR3 OR BTVAR4 OR BTVAR5 OR BTVAR6 OR BTVAR7 OR BTVAR8 OR BTVAR9 OR BTVARA OR BTVARB OR BTVARC,CLOSE,REF(CLOSE,1),3.1,0),COLOR000055;

STICKLINE(BTVAR1 OR BTVAR2 OR BTVAR3 OR BTVAR4 OR BTVAR5 OR BTVAR6 OR BTVAR7 OR BTVAR8 OR BTVAR9 OR BTVARA OR BTVARB OR BTVARC,CLOSE,REF(CLOSE,1),2.7,0),COLOR000077;

STICKLINE(BTVAR1 OR BTVAR2 OR BTVAR3 OR BTVAR4 OR BTVAR5 OR BTVAR6 OR BTVAR7 OR BTVAR8 OR BTVAR9 OR BTVARA OR BTVARB OR BTVARC,CLOSE,REF(CLOSE,1),2.1,0),COLOR000099;

STICKLINE(BTVAR1 OR BTVAR2 OR BTVAR3 OR BTVAR4 OR BTVAR5 OR BTVAR6 OR BTVAR7 OR BTVAR8 OR BTVAR9 OR BTVARA OR BTVARB OR BTVARC,CLOSE,REF(CLOSE,1),1.5,0),COLOR0000BB;

STICKLINE(BTVAR1 OR BTVAR2 OR BTVAR3 OR BTVAR4 OR BTVAR5 OR BTVAR6 OR BTVAR7 OR BTVAR8 OR BTVAR9 OR BTVARA OR BTVARB OR BTVARC,CLOSE,REF(CLOSE,1),0.9,0),COLOR0000DD;

STICKLINE(BTVAR1 OR BTVAR2 OR BTVAR3 OR BTVAR4 OR BTVAR5 OR BTVAR6 OR BTVAR7 OR BTVAR8 OR BTVAR9 OR BTVARA OR BTVARB OR BTVARC,CLOSE,REF(CLOSE,1),0.3,0),COLOR0000FF;

BTVARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);

BTVARE:=REF(BTVARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

BTVARF:=REF(BTVARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

BTVAR10:=REF(BTVARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

BTVAR11:=REF(BTVAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

BTVAR12:=REF(BTVAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

BTVAR13:=REF(BTVAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

BTVAR14:=REF(BTVAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

BTVAR15:=REF(BTVAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

BTVAR16:=REF(BTVAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

BTVAR17:=REF(BTVAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

BTVAR18:=REF(BTVAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

STICKLINE(BTVARD OR BTVARE OR BTVARF OR BTVAR10 OR BTVAR11 OR BTVAR12 OR BTVAR13 OR BTVAR14 OR BTVAR15 OR BTVAR16 OR BTVAR17 OR BTVAR18,CLOSE,REF(CLOSE,1),3.1,0),COLOR00AAFF;

STICKLINE(BTVARD OR BTVARE OR BTVARF OR BTVAR10 OR BTVAR11 OR BTVAR12 OR BTVAR13 OR BTVAR14 OR BTVAR15 OR BTVAR16 OR BTVAR17 OR BTVAR18,CLOSE,REF(CLOSE,1),2.7,0),COLOR00DDFF;

STICKLINE(BTVARD OR BTVARE OR BTVARF OR BTVAR10 OR BTVAR11 OR BTVAR12 OR BTVAR13 OR BTVAR14 OR BTVAR15 OR BTVAR16 OR BTVAR17 OR BTVAR18,CLOSE,REF(CLOSE,1),2.1,0),COLOR00EEFF;

STICKLINE(BTVARD OR BTVARE OR BTVARF OR BTVAR10 OR BTVAR11 OR BTVAR12 OR BTVAR13 OR BTVAR14 OR BTVAR15 OR BTVAR16 OR BTVAR17 OR BTVAR18,CLOSE,REF(CLOSE,1),1.5,0),COLOR22FFFF;

STICKLINE(BTVARD OR BTVARE OR BTVARF OR BTVAR10 OR BTVAR11 OR BTVAR12 OR BTVAR13 OR BTVAR14 OR BTVAR15 OR BTVAR16 OR BTVAR17 OR BTVAR18,CLOSE,REF(CLOSE,1),0.9,0),COLOR99FFFF;

STICKLINE(BTVARD OR BTVARE OR BTVARF OR BTVAR10 OR BTVAR11 OR BTVAR12 OR BTVAR13 OR BTVAR14 OR BTVAR15 OR BTVAR16 OR BTVAR17 OR BTVAR18,CLOSE,REF(CLOSE,1),0.3,0),COLORFFFFFF;

BTVAR19:=REF(BTVARD OR BTVARE OR BTVARF OR BTVAR10 OR BTVAR11 OR BTVAR12 OR BTVAR13 OR BTVAR14 OR BTVAR15 OR BTVAR16 OR BTVAR17 OR BTVAR18,1) AND BTVAR1;

STICKLINE(BTVAR19,REF(CLOSE,1),REF(CLOSE,2),3,0),COLORMAGENTA;

BTVAR1A:=REF(BTVAR1 OR BTVAR2 OR BTVAR3 OR BTVAR4 OR BTVAR5 OR BTVAR6 OR BTVAR7 OR BTVAR8 OR BTVAR9 OR BTVARA OR BTVARB OR BTVARC,1) AND BTVARD;

STICKLINE(BTVAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),COLOR008800;

BTSZ:=IF(C<REF(C,1) AND REF(C,1)<REF(C,2) AND L<REF(L,1) AND L>REF(L,2),REF(C,2),IF(C>REF(C,1),C,REF(C,1)));

TWR:=IF(BTVAR1A,REF(BTSZ,1),BTSZ);

TWR3:=REF(TWR,3);

TWR2:=REF(TWR,2);

TWR1:=REF(TWR,1);

TWR0:=TWR;

PP0:=IF(TWR<8,0.03,0.06) ;

PP1:=TWR0=TWR1 AND TWR1=TWR2;

PP2:=ABS(TWR0-TWR1)<=PP0 AND ABS(TWR0-TWR2)<=PP0;

STICKLINE(PP1 OR PP2,CLOSE,REF(CLOSE,1),2.5,0),COLORBLUE;

PQ0:=IF(TWR<16 AND TWR>=8,0.06,0.09) ;

PQ1:=TWR0=TWR1 AND TWR1=TWR2;

PQ2:=ABS(TWR0-TWR1)<=PP0 AND ABS(TWR0-TWR2)<=PP0;

STICKLINE(PQ1 OR PQ2,CLOSE,REF(CLOSE,1),2.5,0),COLORBLUE;

PW0:=IF(TWR<24 AND TWR>=16,0.09,0.12) ;

PW1:=TWR0=TWR1 AND TWR1=TWR2;

PW2:=ABS(TWR0-TWR1)<=PP0 AND ABS(TWR0-TWR2)<=PP0;

STICKLINE(PW1 OR PW2,CLOSE,REF(CLOSE,1),2.5,0),COLORBLUE;

PE0:=IF(TWR<24 AND TWR>=16,0.12,0.15) ;

PE1:=TWR0=TWR1 AND TWR1=TWR2;

PE2:=ABS(TWR0-TWR1)<=PP0 AND ABS(TWR0-TWR2)<=PP0;

STICKLINE(PE1 OR PE2,CLOSE,REF(CLOSE,1),2.5,0),COLORBLUE;

PR0:=IF(TWR<32 AND TWR>=24,0.15,0.18) ;

PR1:=TWR0=TWR1 AND TWR1=TWR2;

PR2:=ABS(TWR0-TWR1)<=PP0 AND ABS(TWR0-TWR2)<=PP0;

STICKLINE(PR1 OR PR2,CLOSE,REF(CLOSE,1),2.5,0),COLORBLUE;

AA:=CLOSE>REF(CLOSE,1) AND REF(CLOSE,1)>REF(CLOSE,2) AND REF(CLOSE,1)<REF(CLOSE,3) AND IF(REF(CLOSE,3)<REF(CLOSE,4),1,IF(REF(CLOSE,4)<REF(CLOSE,5),REF(CLOSE,1)<REF(CLOSE,4) OR (REF(CLOSE,2)<REF(CLOSE,4) AND REF(CLOSE,3)>=REF(CLOSE,5)),IF(REF(CLOSE,5)<REF(CLOSE,6),1,REF(CLOSE,6)<REF(CLOSE,7))));

BB:=CLOSE<REF(CLOSE,1) AND REF(CLOSE,1)<REF(CLOSE,2) AND REF(CLOSE,1)>REF(CLOSE,3) AND IF(REF(CLOSE,3)>REF(CLOSE,4),1,IF(REF(CLOSE,4)>REF(CLOSE,5),REF(CLOSE,1)>REF(CLOSE,4) OR (REF(CLOSE,2)>REF(CLOSE,4) AND REF(CLOSE,3)<=REF(CLOSE,5)),IF(REF(CLOSE,5)>REF(CLOSE,6),1,REF(CLOSE,6)>REF(CLOSE,7))));

DRAWTEXT(AA AND CLOSE>REF(OPEN,2),LOW*0.98,’三平底翻红’),COLORYELLOW;