多头选股公式 {周线金叉(选股)} {指股指、股价20日均线上穿30日均线。必须用周线选股。} {M20 2 1000 20, M30 2 1000 30 } 均线20:=MA(CLOSE,M20)COLORYELLOW; 均线30:=MA(CLOSE,M30)COLORMAGENTA; 选股:CROSS(REF(均线20,0),REF(均线30,0)); {大道日线(选股)} 通线17:=EMA(C,17); 子线26:=MA(C,26); 均线多头金叉:=CROSS(REF(通线17,0),REF(子线26,0)); 持仓:=IF(CLOSE>=SAR(4,2,20),SAR(4,2,20),DRAWNULL); 空仓:=IF(CLOSE<=SAR(4,2,20),SAR(4,2,20),DRAWNULL); 标识:=STICKLINE(C/REF(C,1)>1.095,O,C,1.5,0); 流通盘:=CAPITAL*100<=500000000{表示流通盘小于5个亿的个股}; 停牌:=DYNAINFO(4)>0;{表示停牌股} 选股:均线多头金叉 AND LONGCROSS(持仓,空仓,8) AND 流通盘 AND 停牌; {SAR 持仓(选股)} 持仓:=IF(CLOSE>=SAR(4,2,20),SAR(4,2,20),DRAWNULL); 空仓:=IF(CLOSE<=SAR(4,2,20),SAR(4,2,20),DRAWNULL); 标识:=STICKLINE(C/REF(C,1)>1.095,O,C,1.5,0); 流通盘:=CAPITAL*100<=500000000{表示流通盘小于5个亿的个股}; 停牌:=DYNAINFO(4)>0;{表示停牌股} XG:CROSS(REF(CLOSE,0),REF(SAR(4,2,20),0)) AND 流通盘 AND 停牌; {天堂孤影(选股)} 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); {主升柱} 孤影图示01:=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),3,1); 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); {主跌柱} 孤影图示02:=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),3,1); 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; 孤影图示03:=STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),4,1); 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; {蓝顶外框} 孤影图示04:=STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),5,2); 孤影图示05:=STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3,0); 孤影图示06:=STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2,0); 孤影图示07:=STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2,0); {黄金底} 孤影图示08:=STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0); {蓝顶} 孤影图示09:=STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0); {蓝顶中心线} 孤影图示10:=STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),0,0); {升跌过渡} 孤影走势:=MA(C,5); {上升线} 万筹朝孤:=IF(孤影走势>REF(孤影走势,1),孤影走势,DRAWNULL); {下跌线} 孤影弃筹:=IF(孤影走势<REF(孤影走势,1),孤影走势,DRAWNULL); X:=(3*C+L+O+H)/6; {上升点线} {天堂孤影绝杀专用} 天堂之路:=(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6) +13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12) +7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+ REF(X,20))/210; DD:=天堂之路<REF(天堂之路,1); {下跌点线} 地狱之门:=IF(DD,天堂之路,DRAWNULL); {天堂孤影绝杀专用} A:=(孤影走势>天堂之路); {上升点} 天堂孤影:=IF(A,天堂之路,DRAWNULL); 持仓:=IF(CLOSE>=SAR(4,2,20),SAR(4,2,20),DRAWNULL); 空仓:=IF(CLOSE<=SAR(4,2,20),SAR(4,2,20),DRAWNULL); 天堂:DRAWICON(LONGCROSS(REF(天堂孤影,0),REF(地狱之门,1),5)AND CROSS(REF(C,0),REF(SAR(4,2,20),0)),万筹朝孤,5); {主力进场(选股)} {短线:"KDJ.J"(5,3,3),COLORAAAAAA;} 散户线:=100*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60)); RSV30:=(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100; K30:=SMA(RSV30,5,1); D30:=SMA(K30,3,1); J30:=3*K30-2*D30; 主力线:=EMA(J30,6); RSV21:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100; K21:=SMA(RSV21,13,8); 强弱分界线:=50; 趋势线:=CEILING(SMA(K21,13,8)); 选股:CROSS(REF(主力线,0),REF(主力线,1))AND CROSS(REF(散户线,1),REF(散户线,0))AND CROSS(REF(主力线,0),REF(强弱分界线,1)); {红杏出墙(选股)} {参数设置:SHORT 2 200 13 LONG 2 200 154 MID 2 200 9} DIF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG); DEA:=EMA(DIF,MID); MACD:=(DIF-DEA)*2; XD:LONGCROSS(MACD.MACD>0,MACD.MACD<0,3); {条件 1:当日MACD翻红 (MACD>0); 条件 2: 前几日还都是连续地翻绿柱。}; {均线组图(选股)} M05:=MA(C,5); 通线17:=MA(C,17); 子线26:=MA(C,26); M17:=MEMA(C,17); M24:=MA(C,24); M25:=MA(C,25); M26:=EMA(M25,3); M27:=EMA(M26,3); M28:=EMA(M27,2); M29:=EMA(M28,2); 多头均线粘合:=CROSS(REF(M17,0),REF(M17,1)); 多头波段拐点:=DRAWICON(多头均线粘合,M26,9); SAR持股:=IF(CLOSE>=SAR(4,2,20),SAR(4,2,20),DRAWNULL); SAR持币:=IF(CLOSE<=SAR(4,2,20),SAR(4,2,20),DRAWNULL); 标识:=STICKLINE(C/REF(C,1)>1.095,O,C,1.5,0); XG:多头波段拐点 AND CROSS(REF(C,0),REF(SAR(4,2,20),0)); {筹码密集(选股)} 选股:COST(60)=REF(CLOSE,0); {KDJ周金叉 月金叉(选股)} RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K:=SMA(RSV,3,1); D:=SMA(K,3,1); J:=3*K-2*D; VARK:=K,COLORWHITE; 上升K:=IF(VARK>REF(VARK,1),VARK,DRAWNULL); 走平K:=IF(VARK=REF(VARK,1),VARK,DRAWNULL); 下降K:=IF(VARK<REF(VARK,1),VARK,DRAWNULL); VARD:=D,COLORYELLOW; 上升D:=IF(VARD>REF(VARD,1),VARD,DRAWNULL); 走平D:=IF(VARD=REF(VARD,1),VARD,DRAWNULL); 下降D:=IF(VARD<REF(VARD,1),VARD,DRAWNULL); VARJ:=J,COLORMAGENTA; 上升J:=IF(VARJ>REF(VARJ,1),VARJ,DRAWNULL); 走平J:=IF(VARJ=REF(VARJ,1),VARJ,DRAWNULL); 下降J:=IF(VARJ<REF(VARJ,1),VARJ,DRAWNULL); N:=9; M1:=3; M2:=3; 涨:=CROSS(K>D,K); 跌:=CROSS(K<D,K); 上:=CROSS(J>D,J); 下:=CROSS(J<D,J); 周K:=MA("KDJ.K#WEEK"(N,M1,M2),5); 周D:=MA("KDJ.D#WEEK"(N,M1,M2),5); 周J:=MA("KDJ.J#WEEK"(N,M1,M2),5); 周金叉:=DRAWTEXT(CROSS("KDJ.K#WEEK"(N,M1,M2),"KDJ.D#WEEK"(N,M1,M2)),-8,'●'); 周死叉:=DRAWTEXT(CROSS("KDJ.D#WEEK"(N,M1,M2),"KDJ.K#WEEK"(N,M1,M2)),108,'●'); 月金叉:=DRAWTEXT(CROSS("KDJ.K#MONTH"(N,M1,M2),"KDJ.D#MONTH"(N,M1,M2)),-8,'●'); 月死叉:=DRAWTEXT(CROSS("KDJ.D#MONTH"(N,M1,M2),"KDJ.K#MONTH"(N,M1,M2)),108,'●'); 停牌:=DYNAINFO(4)>0;{表示停牌股} 选股:周金叉 AND 停牌 OR 月金叉 AND 停牌; {筹码获利(选股)} {N(1,100,15)} 获利比例:=((WINNER(CLOSE))*(100)); 顶部:=COST(90); 底部:=COST(5); 收盘:=CLOSE,LINETHICK2; {选股:=收盘>顶部 && ((顶部-底部)/底部)*100<N;} 集中度:=((COST(95)-底部)/(COST(95)+底部)*1000)/10; XG:获利比例>=(90); {筹码上移(选股)} {N(1,100,15)} 获利比例:=((WINNER(CLOSE))*(100)); 顶部:=COST(90); 底部:=COST(5); 收盘:=CLOSE,LINETHICK2; {选股:=收盘>顶部 && ((顶部-底部)/底部)*100<N;} 集中度:=((COST(95)-底部)/(COST(95)+底部)*1000)/10; XG:CROSS(REF(获利比例,0),REF(顶部,0)); {MACD缩脚(选股)} {参数设置:SHORT 2 200 12 LONG 2 200 26 MID 2 200 9} DIF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG); DEA:=EMA(DIF,MID); MACD:=(DIF-DEA)*2; 翻红:=STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,1,0)*100; 红变黄:=STICKLINE(MACD<=REF(MACD,1) AND MACD>0,0,MACD,1,0)*100; 翻绿:=STICKLINE(MACD<REF(MACD,1) AND MACD<0,0,MACD,1,0)*100; 绿变蓝:=STICKLINE(MACD>=REF(MACD,1) AND MACD<0,0,MACD,1,0)*100; 流通盘:=CAPITAL*100<=800000000; 停牌:=DYNAINFO(4)>0;{表示停牌股} 选股:EXIST(MACD<0,1)AND CROSS(REF(MACD,0),REF(MACD,1))AND MACD>=(-0.2) AND 停牌 AND 流通盘; {MACD翻红(选股)} {参数设置:SHORT 2 200 12 LONG 2 200 26 MID 2 200 9} DIF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG); DEA:=EMA(DIF,MID); MACD:=(DIF-DEA)*2; 翻红:=STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,1,0)*100; 红变黄:=STICKLINE(MACD<=REF(MACD,1) AND MACD>0,0,MACD,1,0)*100; 翻绿:=STICKLINE(MACD<REF(MACD,1) AND MACD<0,0,MACD,1,0)*100; 绿变蓝:=STICKLINE(MACD>=REF(MACD,1) AND MACD<0,0,MACD,1,0)*100; 流通盘:=CAPITAL*100<=800000000; 停牌:=DYNAINFO(4)>0;{表示停牌股} 选股:EXIST(MACD<0,2)AND CROSS(REF(MACD,0),REF(MACD,1))AND MACD>=(0) AND 停牌 AND 流通盘; {宝塔线三平底(选股)} MA5:=MA(C,5); MA10:=MA(C,10); MA15:=MA(C,15); MA30:=MA(C,30); B1:=REF(C,1);B2:=REF(C,2); SS:=IF(C>REF(C,1) AND REF(C,1)>=REF(C,2),1,IF(C<REF(C,1) AND REF(C,1)<=REF(C,2),-1,IF(C>REF(C,2) AND REF(C,2)>REF(C,1),2,IF(C<REF(C,2) AND REF(C,2)<REF(C,1),-2,0)))); SM:=IF(REF(SS,1)!=0,REF(SS,1),IF(REF(SS,2)!=0,REF(SS,2),IF(REF(SS,3)!=0,REF(SS,3),IF(REF(SS,5)!=0,REF(SS,5),IF(REF(SS,6)!=0,REF(SS,6),IF(REF(SS,7)!=0,REF(SS,7),0)))))); 标识01:=STICKLINE(SS=1 OR SM>=1 AND SS=0,B1,C,3,0); 标识02:=STICKLINE(SS=-1 OR SM<=-1 AND SS=0,B1,C,3,0); 标识03:=STICKLINE(SS=2,B2,C,3,0); 标识04:=STICKLINE(SS=-2,B2,C,3,0); 标识05:=STICKLINE((SS=-1 OR SS=-2) AND SM>0,B2,B1,3,0); 标识06:=STICKLINE((SS=1 OR SS=2) AND SM<0,B2,B1,3,0); AA:=CLOSE>REF(CLOSE,1) AND REF(CLOSE,1)>REF(CLOSE,2) AND REF(CLOSE,1)<REF(CLOSE,3) AND IF(REF(CLOSE,3)<REF(CLOSE,4),1,IF(REF(CLOSE,4)<REF(CLOSE,5),REF(CLOSE,1)<REF(CLOSE,4) OR (REF(CLOSE,2)<REF(CLOSE,4) AND REF(CLOSE,3)>=REF(CLOSE,5)),IF(REF(CLOSE,5)<REF(CLOSE,6),1,REF(CLOSE,6)<REF(CLOSE,7)))); BB:=CLOSE<REF(CLOSE,1) AND REF(CLOSE,1)<REF(CLOSE,2) AND REF(CLOSE,1)>REF(CLOSE,3) AND IF(REF(CLOSE,3)>REF(CLOSE,4),1,IF(REF(CLOSE,4)>REF(CLOSE,5),REF(CLOSE,1)>REF(CLOSE,4) OR (REF(CLOSE,2)>REF(CLOSE,4) AND REF(CLOSE,3)<=REF(CLOSE,5)),IF(REF(CLOSE,5)>REF(CLOSE,6),1,REF(CLOSE,6)>REF(CLOSE,7)))); 标识07:=DRAWICON(AA AND CLOSE>REF(OPEN,2),0.99*LOW,1); 标识08:=DRAWICON(BB AND CLOSE<REF(CLOSE,2),HIGH*1.01,2); 标识09:DRAWTEXT(AA AND CLOSE>REF(OPEN,2),LOW*0.98,'三平底翻红'); 标识10:=DRAWTEXT(BB AND CLOSE<REF(CLOSE,2),HIGH*1.02,'三平顶翻绿'); 超跌选股公式 {散户至顶(选股)} RSV30:=(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100; K30:=SMA(RSV30,5,1); D30:=SMA(K30,3,1); J30:=3*K30-2*D30; 主力线:=EMA(J30,6); 散户线:=100*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60)); RSV21:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100; K21:=SMA(RSV21,13,8); 趋势线:=CEILING(SMA(K21,13,8)); 零:=0;贰拾:=20;伍拾:=50;捌拾:=80;壹佰:=100; 玖伍:=散户线>=95; VAR1:=IF(YEAR>=2038 AND MONTH>=1,0,1); VAR2:=REF(LOW,1)*VAR1; VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100*VAR1; VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3)*VAR1; VAR5:=LLV(LOW,30)*VAR1; VAR6:=HHV(VAR4,30)*VAR1; VAR7:=IF(MA(CLOSE,58),1,0)*VAR1; VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7*VAR1; 吸筹:=IF(VAR8>100,100,VAR8)*VAR1; 庄家吸筹:=STICKLINE(吸筹>-150,0,吸筹,2,-1); LC:=REF(CLOSE,1); RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100); FF:=EMA(CLOSE,3); MA15:=EMA(CLOSE,21); 散户至顶:=CROSS(REF(散户线,0),REF(散户线,1)); 选股:玖伍 AND 散户至顶; |
|