今天分享的《My抄底钻石》很快被推荐为精华帖,感谢大家的支持! 大家的支持就是我的动力。今天再分享一个我的原创指标---《短线操作》的副图和选股指标!!! 此《短线操作》指标与网上看到的短线操作指标是截然不同的,此指标系本人原创。其原理是根据 牛熊力量和买卖压力而编辑的指标。希望大家喜欢! {短线操作(DMI+DMK)} {牛熊力量} MTR:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14); HD :=HIGH-REF(HIGH,1); LD :=REF(LOW,1)-LOW; DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),14); DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),14); PDI:=DMP*100/MTR; MDI:=DMM*100/MTR; ADX:=EMA(ABS(MDI-PDI)/(MDI+PDI)*100,6); ADXR:=EMA(ADX,6); NX:=PDI/(PDI+MDI)*100; {买卖压力} MM1:=SUM(IF(H-REF(C,1)>0,(H-REF(C,1))+(C-L),C-L),8); MM2:=SUM(IF(REF(C,1)-L>0,(REF(C,1)-L)+(H-C),H-C),8); DMK:=MM1/(MM1+MM2)*100; BD:=(NX+DMK)/2; MBD:EMA(BD,5); {条件选股} MAL:=MA(L,3); TJ1:=REF(MBD,4)>REF(MBD,3) AND REF(MBD,3)>REF(MBD,2) AND REF(MBD,2)>REF(MBD,1) AND REF(MBD,1)<MBD AND C>=MA(C,6)*1.004 AND MBD<43; TJ2:=REF(MBD,5)>REF(MBD,4) AND REF(MBD,4)>REF(MBD,3) AND REF(MBD,3)>REF(MBD,2) AND REF(MBD,2)<REF(MBD,1) AND REF(MBD,1)<MBD AND C>=MA(C,6)*1.004 AND MBD<43; TJ3:=REF(MBD,6)>REF(MBD,5) AND REF(MBD,5)>REF(MBD,4) AND REF(MBD,4)>REF(MBD,3) AND REF(MBD,3)<REF(MBD,2) AND REF(MBD,2)<REF(MBD,1) AND REF(MBD,1)<MBD AND C>=MA(C,6)*1.004 AND MBD<43; XG:=FILTER((TJ1 OR TJ2 OR TJ3) AND MAL>REF(MAL,1),5); {STICKLINE(XG,35,65,0,-1),COLORRED;} {画垂直线}; IF(XG,50,DRAWNULL),POINTDOT,COLORYELLOW,LINETHICK8;{画大圆点} STICKLINE(C>0,50,50,1,0); STICKLINE(C>0,75,75,1,0),COLORC6C600; STICKLINE(C>0,25,25,1,0),COLORGREEN; (二)选股 {波段操作(DMI+DMK)} {牛熊力量} MTR:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14); HD :=HIGH-REF(HIGH,1); LD :=REF(LOW,1)-LOW; DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),14); DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),14); PDI:=DMP*100/MTR; MDI:=DMM*100/MTR; ADX:=EMA(ABS(MDI-PDI)/(MDI+PDI)*100,6); ADXR:=EMA(ADX,6); NX:=PDI/(PDI+MDI)*100; {买卖压力} MM1:=SUM(IF(H-REF(C,1)>0,(H-REF(C,1))+(C-L),C-L),8); MM2:=SUM(IF(REF(C,1)-L>0,(REF(C,1)-L)+(H-C),H-C),8); DMK:=MM1/(MM1+MM2)*100; BD:=(NX+DMK)/2; MBD:=EMA(BD,5); {条件选股} MAL:=MA(L,3); TJ1:=REF(MBD,4)>REF(MBD,3) AND REF(MBD,3)>REF(MBD,2) AND REF(MBD,2)>REF(MBD,1) AND REF(MBD,1)<MBD AND C>=MA(C,6)*1.004 AND MBD<43; TJ2:=REF(MBD,5)>REF(MBD,4) AND REF(MBD,4)>REF(MBD,3) AND REF(MBD,3)>REF(MBD,2) AND REF(MBD,2)<REF(MBD,1) AND REF(MBD,1)<MBD AND C>=MA(C,6)*1.004 AND MBD<43; TJ3:=REF(MBD,6)>REF(MBD,5) AND REF(MBD,5)>REF(MBD,4) AND REF(MBD,4)>REF(MBD,3) AND REF(MBD,3)<REF(MBD,2) AND REF(MBD,2)<REF(MBD,1) AND REF(MBD,1)<MBD AND C>=MA(C,6)*1.004 AND MBD<43; XG:FILTER((TJ1 OR TJ2 OR TJ3) AND MAL>REF(MAL,1),5); |
