B点：买入
红色k线：持股。
S点:卖出
绿色k线：持币。
在持股状态下彩色K线柱为加仓点。
发源码了，不想加精！对振荡型态无用，波段明显有用。坚持BS还是有用的。这是我花钱和谐的收费指标。不喜勿下。MA1:MA(CLOSE,5)COLORWHITE,LINETHICK1;
IF(EMA(C,4)<REF(EMA(C,4),1),MA1, DRAWNULL) COLORGREEN,LINETHICK2;
MA2:MA(CLOSE,10)COLORYELLOW,LINETHICK2;
MA3:MA(CLOSE,20)COLORMAGENTA;
MA4:MA(CLOSE,60)COLORGREEN;
{CPX}
MA7:=MA(CLOSE,1);
转强:=(6*H+5*REF(H,1)+4*REF(H,2)+3*REF(H,3)+2*REF(H,4)+1*REF(H,5))/(6+5+4+3+2+1);
转弱:=(6*L+5*REF(L,1)+4*REF(L,2)+3*REF(L,3)+2*REF(L,4)+1*REF(L,5))/(6+5+4+3+2+1);
BB2:=IF(C>REF(转强,1),1,IF(C<REF(转弱,1),-1,0));
DD2:=BARSLAST(NOT(BB2=0));
B:=IF(BB2=0,REF(BB2,DD2),BB2);
中短:=IF(B=-1,MA(HIGH,6),MA(LOW,6));
STICKLINE(((OPEN<CLOSE)AND(MA7<中短)),CLOSE*1.002,OPEN*0.998,3.05,0),COLORCYAN;
STICKLINE(((OPEN>CLOSE)AND(MA7>中短)),OPEN*1.002,CLOSE*0.998,3.05,0),COLORRED;
DRAWKLINE(H,O,L,C);
STICKLINE(MA7<中短,HIGH,MAX(C,O)*1.002,0,1),COLORCYAN;
STICKLINE(MA7<中短,LOW,MIN(C,O)*0.998,0,1),COLORCYAN;
STICKLINE(MA7>中短,HIGH,MAX(C,O)*1.002,0,1),COLORRED;
STICKLINE(MA7>中短,LOW,MIN(C,O)*0.998,0,1),COLORRED;
DRAWICON(CROSS(MA7,中短),L*0.999,7);
DRAWICON(CROSS(中短,MA7),H*1.001,8);
{加仓点}
AAA7:=C-REF(C,1);
AAA8:=100*EMA(EMA(AAA7,6),6)/EMA(EMA(ABS(AAA7),6),6);
BU:=(LLV(AAA8,2)=LLV(AAA8,7) AND COUNT(AAA8<0,2) AND CROSS(AAA8,MA(AAA8,2)));
JCD:=MA(C,10)>REF(MA(C,10),1) AND MA(C,5)>MA(C,10) AND V>MA(V,5) AND CROSS(C,MA(C,5));
{暗渡陈仓}
CC1:=REF(C,1);
C2:=REF(C,2);
C3:=REF(C,3);
C4:=REF(C,4);
C5:=REF(C,5);
C6:=REF(C,6);
O1:=REF(O,1);
O2:=REF(O,2);
O3:=REF(O,3);
O4:=REF(O,4);
P1:=C2<=C3 AND C2<=C4 AND C2<=C5 AND C2<=C6;
P2:=C>MA(C,5) AND C>MA(C,10) AND C>MA(C,20);
P3:=C>O AND CC1>C2;P4:=C>CC1;
P:=P1 AND P2 AND P3 AND P4 AND CC1/C2<=1.05;
STICKLINE(JCD OR BU OR P,O,O+0.3*(C-O),2.9,0),COLORRED;
STICKLINE(JCD OR BU OR P,O+0.3*(C-O),O+0.6*(C-O),2.9,0),COLORBROWN;
STICKLINE(JCD OR BU OR P,O+0.6*(C-O),C,2.9,0),COLORYELLOW;
{步步为营}
M5:=EXPMA(C,5);
M60:=EXPMA(C,60);
BBTJ1:=REF(O/C>1.04,1);
BBTJ2:=O<=REF(C,1) AND C>REF(H,1);
BBTJ3:=IF(O>EXPMA(C,10),O/EXPMA(C,10)<1.05,O*0.97<EXPMA(C,10) AND C*1.03>EXPMA(C,10));
BBTJ4:=EXPMA(C,10)>EXPMA(C,60) AND EXPMA(C,10)/EXPMA(C,60)<1.25;
BBXG:=BBTJ1 AND BBTJ2 AND BBTJ3 AND BBTJ4;
DRAWICON(BBXG,L*0.93,1);
 |
