红箭头买 绿箭头卖
JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
DDD:=(DYNAINFO(5)<0.01 OR DYNAINFO(6)<0.01);
JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) AND JJJ>(DYNAINFO(6)-0.01)));
五日成本:IF(JJJT,0.01*EMA(AMOUNT,5)/EMA(VOL,5),EMA((HIGH+LOW+CLOSE)/3,5));
十三日日成本:IF(JJJT,0.01*EMA(AMOUNT,13)/EMA(VOL,13),EMA((HIGH+LOW+CLOSE)/3,13));
三十四日成本:IF(JJJT,0.01*EMA(AMOUNT,34)/EMA(VOL,34),EMA((HIGH+LOW+CLOSE)/3,34));
长期成本:IF(JJJT,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120)),DOTLINE;
日线锁定:=C>0 AND V>0;
引力:=(MA(C,30)+MA(C,72))/2;
下轨:=引力*0.73;
下轨75:=引力*0.75;
下轨71:=引力*0.71;
下轨68:=引力*0.68;
过滤周期:=1;
VAR1:=EMA(EMA(CLOSE,9),9);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
资金:=EMA(EMA(CLOSE,8),8);
资金抬轿:=(资金-REF(资金,1))/REF(资金,1)*1000;
有庄控盘:=资金抬轿>0; 无庄控盘:=资金抬轿<=0; 买线:=EMA(C,3);
卖线:=EMA(SLOPE(C,22)*20+C,54);
BU1:=CROSS(买线,卖线);
SEL1:=CROSS(卖线,买线);
BU2:=IFF(BU1 AND 有庄控盘,1,IFF(COUNT(BU1 AND 无庄控盘,BARSLAST(SEL1)+1)==1 AND CROSS(资金抬轿,0),1,0));
BU:=BU2 AND COUNT(BU2,BARSLAST(SEL1)+1)==1;
SEL:=SEL1 AND COUNT(SEL1,BARSLAST(BU)+1)==1;
BUNEW:=BU;
止损条件:=CLOSE/REF(OPEN,BARSLAST(BU))<(1-7/100) AND COUNT(BU,BARSLAST(BU)+1)==1 AND COUNT(SEL,BARSLAST(BU)+1)==0;
SELNEW:=IFF(止损条件 AND COUNT(止损条件,BARSLAST(BU)+1)==1,1,IFF(SEL AND COUNT(止损条件,BARSLAST(BU)+1)==0,1,0));
重新买入:=COUNT(止损条件,BARSLAST(BUNEW)+1)>=1 AND CROSS(C,0.965*REF(O,BARSLAST(BUNEW)));
不在同一天1:=((重新买入 AND SELNEW)==0); BUNEW2:=((BUNEW AND COUNT(SELNEW,过滤周期)==0) OR 重新买入) AND 不在同一天1;
二次止损:=(CLOSE/REF(OPEN,BARSLAST(重新买入))<(1-7/100) AND COUNT(重新买入,BARSLAST(重新买入)+1)==1 AND COUNT(SEL,BARSLAST(重新买入)+1)==0);
重新卖出:=(SEL AND COUNT(重新买入,BARSLAST(BUNEW2)+1)==1) OR (二次止损 AND SUM(二次止损,0)==1);
不在同一天2:=((重新卖出 AND BUNEW2)==0);
SELNEW2:=((SELNEW AND COUNT(SELNEW,BARSLAST(BUNEW2)+1)==1) OR 重新卖出) AND 不在同一天2;
BUNEW3:=BUNEW2 AND COUNT(BUNEW2,BARSLAST(SELNEW2)+1)==1;
SELNEW3:=SELNEW2 AND COUNT(SELNEW2,BARSLAST(BUNEW3)+1)==1;
D:=BARSLAST(BUNEW3)+1>=1 AND COUNT(SELNEW3,BARSLAST(BUNEW3)+1)==0;
K:=BARSLAST(SELNEW3)+1>=1 AND COUNT(BUNEW3,BARSLAST(SELNEW3)+1)==0;
修正部分定位:=IFF(COUNT(SELNEW3,BARSCOUNT(C))==0 AND COUNT(BUNEW3,BARSCOUNT(C))==0,1,0);
修正部分累计:=SUM(修正部分定位,1000)+1;
精准修正累计:=IFF(修正部分累计==REF(修正部分累计,1) AND REF(修正部分累计,2)<修正部分累计,修正部分累计,0);
上市修正B:=修正部分定位 AND CROSS(控盘,0);
上市修正S:=修正部分定位 AND CROSS(0,控盘) AND COUNT(上市修正B,BARSLAST(C>0))>=1;
上市D:=COUNT(上市修正B,BARSLAST(上市修正B)+1)==1 AND COUNT(上市修正S,BARSLAST(上市修正B)+1)==0 AND COUNT (SELNEW3,BARSCOUNT
(C))==0;
上市K:=COUNT(上市修正S,BARSLAST(上市修正S)+1)==1 AND COUNT(上市修正B,BARSLAST(上市修正S)+1)==0 AND COUNT
(BUNEW3,BARSCOUNT(C))==0;
SSXZBZS:=COUNT(上市修正B,BARSCOUNT(C));
SSXZSZS:=COUNT(上市修正S,BARSCOUNT(C));
QB:=IFF(修正部分定位,上市修正B,BUNEW3);
QS:=IFF(修正部分定位,上市修正S AND (SSXZBZS==SSXZSZS AND SSXZBZS>=0 AND COUNT(SELNEW3,BARSCOUNT(C))==1 AND COUNT
(BUNEW3,BARSCOUNT(C))==0)==0, SELNEW3 AND (SSXZBZS==SSXZSZS AND SSXZBZS>=0 AND COUNT(SELNEW3,BARSCOUNT(C))==1 AND COUNT
(BUNEW3,BARSCOUNT(C))==0)==0);
K补:=(COUNT(上市修正B,BARSLAST(C>0))==0 AND COUNT(QB,BARSLAST(C>0))==0)==0;
定位B68:=QB AND COUNT(L<下轨68,10)>=1;
定位B71:=QB AND COUNT(L<下轨71,10)>=1;
定位B75:=QB AND COUNT(L<下轨75,10)>=1;
定位68B:=EXIST(定位B68,BARSLAST(BUNEW)+1) AND 重新买入 AND QB;
定位71B:=EXIST(定位B71,BARSLAST(BUNEW)+1) AND 重新买入 AND QB;
定位75B:=EXIST(定位B75,BARSLAST(BUNEW)+1) AND 重新买入 AND QB;
概率1:=IFF(定位B68,5,IFF(定位B71,4,IFF(定位B75,3,0)));
概率2:=IFF(定位68B,5,IFF(定位71B,4,IFF(定位75B,3,0)));
概率:=IFF(概率1>0,概率1,概率2);
绘制多头:=(D AND 日线锁定) OR (上市D AND 日线锁定);
绘制空头:=(K AND K补 AND 日线锁定) OR (上市K AND 日线锁定);
代修复部分:=绘制多头==0 AND 绘制空头==0;
B修:=BARSLAST(QB);
S修:=BARSLAST(QS);
补充绘制:=IFF(B修<S修 AND 代修复部分,1,IFF(B修>S修 AND 代修复部分,2,0));
DRAWICON(QB AND 日线锁定,LOW*0.95,1);
DRAWICON(QS AND 日线锁定,HIGH*1.01,2);
DRAWICON(概率==5 AND 日线锁定,L*0.97,1);
DRAWICON(概率==4 AND 日线锁定,L*0.97,1);
DRAWICON(概率==3 AND 日线锁定,L*0.97,1);
|
