追涨杀跌梦的摇篮源码附图
追涨杀跌梦的摇篮
“太极生两仪”的升级版，什么都不说了，去操作吧，朋友！！！
//界面修饰区
TURBO个人制作系列:'★★2015追涨杀跌Beta版★★ ';
DRAWTEXT_FIX(1,0,1,0,'最佳买入信号：绿色坡道末端凹槽向上，出现红柱||警告：不要在红坡末期绿坡前中期冲动操作'),colormagenta;
DRAWTEXT_FIX(1,0,0.8,0,
'细长黄柱，短中期大买卖；红柱：短买；绿柱：短卖；白色：多方加强；洋红色：多方减弱：金顶：百日新高'
),colorlired;
DRAWTEXT_FIX(1,0,0,0,'本指标依据瀑布线优化，提供大量买卖与趋势信息，如需更改界面文字请打开公式管理，如需帮助与建议请联系微博：turbo南川轻松赚钱，生活愉快'),colorligray;
//DRAWGBKLAST(C>O,STRIP(RGB(100,200,0),RGB(200,100,0),3));
//End.
//主程序源码
P1:=(EMA(CLOSE,M1)+EMA(CLOSE,M1*2)+EMA(CLOSE,M1*4))/3;
P2:=(EMA(CLOSE,M2)+EMA(CLOSE,M2*2)+EMA(CLOSE,M2*4))/3;
P3:=(EMA(CLOSE,M3)+EMA(CLOSE,M3*2)+EMA(CLOSE,M3*4))/3;
P4:=(EMA(CLOSE,M4)+EMA(CLOSE,M4*2)+EMA(CLOSE,M4*4))/3;
P5:=(EMA(CLOSE,M5)+EMA(CLOSE,M5*2)+EMA(CLOSE,M5*4))/3;
P6:=(EMA(CLOSE,M6)+EMA(CLOSE,M6*2)+EMA(CLOSE,M6*4))/3;
MAXP:=MAX(MAX(MAX(MAX(MAX(P1,P2),P3),P4),P5),P6);
MINP:=MIN(MIN(MIN(MIN(MIN(P1,P2),P3),P4),P5),P6);
//瀑布线成本线
P0:=(6*P1+5*P2+4*P3+3*P4+2*P5+P6)/21;
//横盘
//振幅小于百分之十为横盘整理
A1:=(HHV(C,M6)-LLV(C,M6))/MA(C,M6)*100;
//标准差的比值，越大则爆发越高，作因子
A2:=STD(C,M6)/STD(C,M3);
//成交量的比值，越大则爆发越高，作因子
A3:=(SUM(VOL,M6)/M6)/(SUM(VOL,M3)/M3);
//瀑布线的粘合程度，越粘合爆发越高，因子
A4:=REF(HHV(MAXP-MINP,M2),3)/HHV(MAXP-MINP,3);
//瀑布线走势
A5:=P1-MA(P1,M1)=HHV(P1-MA(P1,M1),M1);
//价差
A6:=100*(HHV(H,M6)/LLV(L,M6)-1);
PARTLINE(P1,P1<P3 OR HHV(P1,BARSLAST(CROSS(P4,P1)))<MAXP,RGB(0,255,0),1,RGB(255,0,0));
PARTLINE(P2,P1<P3 OR HHV(P1,BARSLAST(CROSS(P4,P1)))<MAXP,RGB(0,255,0),1,RGB(255,0,0));
PARTLINE(P3,P1<P3 OR HHV(P1,BARSLAST(CROSS(P4,P1)))<MAXP,RGB(0,255,0),1,RGB(255,0,0));
PARTLINE(P5,P1<P3 OR HHV(P1,BARSLAST(CROSS(P4,P1)))<MAXP,RGB(0,255,0),1,RGB(255,0,0));
PARTLINE(P4,P1<P3 OR HHV(P1,BARSLAST(CROSS(P4,P1)))<MAXP,RGB(0,255,0),1,RGB(255,0,0));
PARTLINE(P6,P1<P3 OR HHV(P1,BARSLAST(CROSS(P4,P1)))<MAXP,RGB(0,255,0),1,RGB(255,0,0));
T1:=10*(P1-P2);
T2:=T1-REF(T1,1);
T3:=(P1-P3);
T4:=T3-REF(T3,1);
STICKLINE(T3<0 AND CROSS(T4,0) AND MAXP/MINP<REF(MAXP,1)/REF(MINP,1),MAXP,MAXP*1.02,4,0),colorred;
STICKLINE(T3>0 AND CROSS(0,T4) AND MAXP/MINP>REF(MAXP,1)/REF(MINP,1),MINP,MINP*0.98,3,0),colorgreen;
STICKLINE(REF(O,1)<REF(C,2) AND A4>2 AND REF(P1,1)<P3 AND P3-P1<REF(P3,1)-REF(P1,1)
AND(HHV(C,M2)-LLV(C,M2))/MA(C,M2)*100<4 AND C>REF(C,1) AND C>REF(O,1)
AND 3*SUM(VOL,2)/SUM(VOL,6)>1.05,
MINP*0.99,MAXP*1.2,2,0),coloryellow;
STICKLINE(COUNT(VOL>REF(VOL,1),2)>1 AND COUNT(C>REF(C,1),2)>1,MINP,MINP+MIN(VOL/CAPITAL,C/30),3,0),colorwhite;
STICKLINE(COUNT(VOL<REF(VOL,1),2)>1 AND COUNT(C>REF(C,1),2)>1,MINP,MINP+MAX(VOL/CAPITAL/3,C/50),3,0),colormagenta;
D1:BARSLAST(CROSS(P1,P2)),nodraw;
D2:BARSLAST(CROSS(P2,P1)),nodraw;
D3:C-REF(C,D1),nodraw;
D4:HHV(H,D1)-LLV(L,D1),nodraw;
D5:(C-REF(C,D2)),nodraw;
D6:LLV(L,D2)-HHV(H,D2),nodraw;
DRAWLINE(CROSS(P1,P2) ,P0,CROSS(P2,P1) AND D1>20,P0,0),coloryellow,LINETHICK3;
DRAWLINE(CROSS(P2,P1) ,P0,CROSS(P1,P2) AND D2>20,P0,0),colorblue,LINETHICK3;
//DRAWTEXT(CROSS(P2,P1) AND D1>20,P0*0.999,D3),coloryellow;
//DRAWTEXT(CROSS(P2,P1) AND D1>20,P0*0.997,D4),coloryellow;
DRAWTEXT(CROSS(P2,P1) AND D1>20,P0*0.995,D1),coloryellow;
DRAWTEXT(CROSS(P1,P2) AND D2>20,P0*0.995,D2),colorblue;
//DRAWTEXT(CURRBARSCOUNT=1 AND CROSS(P1,P2) AND D2>20,P0*0.995,C-REF(C,D2)),colorblue;
NUM1:=IF(C=HHV(C,0),'史上最高！！！！！！！！',HHVBARS(C,0)),colorred;
STICKLINE(H=HHV(H,100) AND H>REFX(&HIGH,1) AND H>REF(&HIGH,2),H,H*0.997,30,0),coloryellow;
DRAWTEXT(H=HHV(H,0) AND H>REFX(&HIGH,1) AND H>REF(&HIGH,2),H*0.99,'历史最高'),coloryellow;
STICKLINE(L=LLV(L,100) AND L<REFX(&LOW,1) AND L<REF(&LOW,2),L,L*1.003,30,0),colorbrown;
DRAWTEXT(L=LLV(L,0) AND L<REFX(&LOW,1) AND L<REF(&LOW,2),L*1.003,'历史最高'),colorbrown;
//备用修改区
//STICKLINE(A1<N1 AND 10*A4>N2 AND A2>N3/10 AND A6<N4 AND A3<N5/100, H*1.3,H*1.3*A3,1,0),coloryellow;
//STICKLINE(REF(C,1)=LLV(C,M6) AND P1<P2 AND (P2-P1)<(REF(P2,1)-REF(P1,1))
// AND (P4-P3)<(REF(P4,1)-REF(P3,1)),
//H*1.1,H*1.9,5,0),colorred;
//DRAWTEXT_FIX( C=HHV(C,100),0,0.01,0,'当前创百日新高已持续：');
//DRAWTEXT_FIX( C=HHV(C,100),0.12,0.01,0,NUM1);
//IF(CLOSE=HHV(CLOSE,100),
//DRAWTEXT_FIX( CLOSE=HHV(CLOSE,100),0,0.01,0,'当前创百日新高已持续：')
//AND DRAWTEXT_FIX( CLOSE=HHV(CLOSE,100),0.12,0.01,0,NUM1),
//0
// );
//IF(CROSS(P2,P1),(IF(CROSS(P3,P1),(IF(CROSS(P4,P1),(IF(CROSS(P5,P1),(IF(CROSS(P6,P1),DRAWTEXT(1,MINP*0.97,'5'),
//DRAWTEXT(1,MINP*0.97,'4');),DRAWTEXT(1,MINP*0.97,'3');),DRAWTEXT(1,MINP*0.97,'2');),DRAWTEXT(1,MINP*0.97,'1');),0);
