宝塔线三平底翻红/绿（可适用短线，副图、源码、使用说明）介绍
宝塔线三平底翻红/绿（可适用短线，副图、源码、使用说明）
宝塔线三平底翻红
YC2:=REF(CLOSE,2);
YC:=REF(CLOSE,1),LINETHICK0;
TJ:=YC>=YC2;
YH:=MAX(YC2,YC),LINETHICK0;
YL:=MIN(YC2,YC),LINETHICK0;
TH:=MAX(YC,CLOSE),LINETHICK0;
TL:=MIN(YC,CLOSE),LINETHICK0;
RH:=TH,LINETHICK0;
RL1:=IF(TJ=0,YH,MAX(TL,YL)),LINETHICK0;
RL:=IF(RL1>RH,RH,RL1),LINETHICK0;
GL:=TL,LINETHICK0;
GH1:=IF(TJ=0,MIN(YH,TH),YL),LINETHICK0;
GH:=IF(GH1<GL,GL,GH1),LINETHICK0;
BASE1:=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)));
TOWER:BASE1,LINETHICK0;
STICKLINE(GH>GL,GH,GL,2.5,0),COLOR008000;
STICKLINE(RH>RL,RH,RL,2.5,0),COLORRED;
STICKLINE(RH=RL AND GH=GL,RH,RL,2.5,0),COLORRED;
PAR2:=ROUND((TOWER/8)+0.5);
PAR1:=PAR2*0.03;
T4:=REF(TOWER,4),LINETHICK0;
T3:=REF(TOWER,3),LINETHICK0;
T2:=REF(TOWER,2),LINETHICK0;
T1:=REF(TOWER,1),LINETHICK0;
A:=RH-RL,LINETHICK0;
B:=GH-GL,LINETHICK0;
P1:=IF(A>2*B,1,0);
P2:=IF(B>2*A,1,0);
BUY:=ABS(T1-T3)<=PAR1 AND ABS(T2-T3)<=PAR1 AND P1=1;
SALE:=ABS(T1-T3)<=PAR1 AND ABS(T2-T3)<=PAR1 AND P2=1;
SALE1:=SALE AND VOL<REF(VOL,1)*0.7 AND CLOSE>REF(CLOSE,1)*0.965;
DRAWICON(BUY,0.99*LOW,1);
DRAWICON(SALE,HIGH*1.01,2);
DRAWICON(REF(SALE1,1) AND P1=1,HIGH*1.01,9);
gd19735
