K宝塔线
与钱龙的一模一样,再次优化!看图。。。。。。
MA1:=MA(CLOSE,5);
MA2:=MA(CLOSE,10);
MA3:=MA(CLOSE,20);
MA4:=MA(CLOSE,60);
MA5:=MA(CLOSE,120);
MA6:=MA(CLOSE,250);
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),8,0),colorred;
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ttt:STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),8,0),colorgreen;
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),8,0),colorgreen;
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),8,0) ,coloryellow;
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),8,0),colorlired;
上1:=IF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,MAX(CLOSE,REF(CLOSE,1)),0);
上2:=IF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,MAX(CLOSE,REF(CLOSE,1)),0);
上3:=IF(VAR19,MAX(REF(CLOSE,1),REF(CLOSE,2)),0);
上4:=IF(VAR1A,MAX(REF(CLOSE,1),REF(CLOSE,2)),0);
中1:=IF(VAR19,MAX(REF(CLOSE,1),REF(CLOSE,2)),
IF(VAR1A,MIN(REF(CLOSE,1),REF(CLOSE,2)),0));
下1:=IF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC
,MIN(CLOSE,REF(CLOSE,1)),MAX(CLOSE,REF(CLOSE,1)));
下2:=IF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18
,MIN(CLOSE,REF(CLOSE,1)),MAX(CLOSE,REF(CLOSE,1)));
下3:=IF(VAR19,MIN(REF(CLOSE,1),REF(CLOSE,2)),MAX(REF(CLOSE,1),REF(CLOSE,2)));
下4:=IF(VAR1A,MIN(REF(CLOSE,1),REF(CLOSE,2)),MAX(REF(CLOSE,1),REF(CLOSE,2)));
上:MAX(MAX(上1,上2),MAX(上3,上4)),NODRAW;
中:=中1,NODRAW;
下:MIN(MIN(下1,下2),MIN(下3,下4)),NODRAW;
//{涨停回马枪:}
涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(C,1)),1,0);
均价线:=AMOUNT/VOL,NODRAW;
B11:='﹉﹉﹉﹉';
B33:='┄┄┄┄┄';
B22:='┄┄┄┄┄';
绿:REF(均价线,BARSLAST(涨停)),COLOR80FF80,NODRAW;
红:REF((O+C)/2,BARSLAST(涨停)),COLOR0000FF,NODRAW;
灰:REF(L,BARSLAST(涨停)),COLOR808080,NODRAW;
//DRAWTEXT(涨停,绿,B11),colorgreen;//{涨停后次日划绿色}
//DRAWTEXT(涨停,红,B11),colormagenta;//{涨停后次日划洋红色}
//DRAWTEXT(涨停,灰,B11),colorgray;//{涨停后次日划灰色}
波动系数1:=IF(RANGE(上,8,8*2),0.03*2,IF(RANGE(上,8*2+0.01,8*3),0.03*3,
IF(RANGE(上,(8*3+0.01),8*4),0.03*4,IF(上<8,0.03,0.03*5))));
波动系数2:=IF(RANGE(下,8,8*2),0.03*2,IF(RANGE(下,8*2+0.01,8*3),0.03*3,
IF(RANGE(下,(8*3+0.01),8*4),0.03*4,IF(下<8,0.03,0.03*5))));
三平底:=COUNT(ABS(下-REF(下,1))<=波动系数2,2)=2 AND VAR19;
三平顶:=COUNT(ABS(上-REF(上,1))<=波动系数1,2)=2 AND VAR1A;
DRAWTEXT(三平顶, 上+0.02,'︿'),coloryellow;
DRAWTEXT(三平底,下*0.995,'底'),colormagenta;//{此段显示文字提示};
一穿三:=MA1>O AND MA2>O AND MA3>O AND MA1<C AND MA2<C AND MA3<C AND CLOSE>OPEN;
//标志1:=IF(VAR1A AND EXIST(ABS(下-上)<=2,3),1,0);
//TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,240,1)))));
//MTIME:=MOD(FROMOPEN,TOTAL);
//CTIME:=IF(MTIME<0.5,TOTAL,MTIME);
//VVOL:=IF(CURRBARSCOUNT=1,VOL*TOTAL/CTIME,DRAWNULL),NODRAW;
VOLUME:=VOL,VOLSTICK;
MAVOL1:=MA(VOLUME,5);
MAVOL2:=MA(VOLUME,10);
DRAWTEXT(ABS(下-上)<=0.02 AND VOLUME>MAVOL1 AND VOLUME>MAVOL2
AND CLOSE>OPEN,下*0.99,'买'),colorred;
条件1:=IF(C<REF(C,1) AND VOLUME<MAVOL1,1,0);
条件2:= 下=REF(下,1) AND O>REF(C,1) AND C>REF(C,1);
//{DRAWTEXT(条件2,下*0.99,'买'),coloryellow;}
//{通达信超高成功率抄底选股指标公式(源码,副图)}
UP:=SMA(IF(CLOSE>REF(CLOSE,1), CLOSE-REF(CLOSE,1),0),3,1);
DN:=SMA(IF (CLOSE<=REF(CLOSE,1),ABS(CLOSE-REF(CLOSE,1)),0),3,1);
指标:=100*UP/(UP+DN);
强弱:=EMA(指标,3),colorred;
平均:=EMA(强弱,3),colorgreen;
VAR26:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
VAR28:=SMA(VAR26,3,1);
散户:=SMA(VAR28,3,1),colormagenta;
主力:=SMA(散户,3,1), coloryellow;
VAR101:=(C+H+O+L)/4;
支撑:=MA(VAR101,30)*(1-100/1000);
底部率:=支撑/L*10,NODRAW;
T1:=BARSLAST(CROSS(50,平均));
T2:=BARSLAST(CROSS(平均,50));
TT3:=BARSLAST(CROSS(主力,REF(主力,1)));
TJ1:=COUNT(C>O,T1)=1 AND C>O;
TJ2:=COUNT(平均>主力,T2-T1)=T2-T1 AND 主力>REF(主力,TT3+1) AND DYNAINFO(8)>0;
初选:=TJ1 AND TJ2,NODRAW;
烈火20天:=IF(HHV(底部率,2)>10.3 AND 初选,1,0);
DRAWTEXT(烈火20天,L,'抄底');
布中:=MA(CLOSE,20),COLORFFFFFF,DOTLINE;
上穿布中:=CROSS(C,布中);
条件6:=EXIST(上穿布中,7) AND C>=布中 AND L<=布中 AND REF(C,1)>=布中;
DRAWTEXT(条件6,下*0.99,'买'),coloryellow;
//条件7:=(CROSS(上,布中) OR CROSS(上,前高) OR CROSS(上,IF(T3,E,E))) AND (三平底 OR 涨停) ;
//DRAWTEXT(条件7,下*0.99,'强'),coloryellow;
- 上一篇:享受追涨乐趣:突破大阴【通达信 源码 无未来 副图 选股】 2016/11/7
- 下一篇:主图清晰 2016/11/6