条件选股公式集源码大全
{金蛤蟆选股}（无未来函数）
RSV:=(((CLOSE - LLV(LOW,6)) / (HHV(HIGH,6) - LLV(LOW,6))) * 100);
K:=(POW(SMA(RSV,2,1),5) / POW(10,8));
D:=(POW(SMA(RSV,2,1),5) / POW(10,10));
蛤:=((K+ D) / 2);
蟆:=(0 - 蛤);
J:=1;
选股:CROSS(蛤,J);
金蛤蟆选股公式 选出的股票可选择最符合最好形态
{量顶天立地}（无未来函数）
A1:=V=HHV(V,120);
A2:=C/OPEN>1.049;
TJ:=A1 AND A2;
TJ AND (REF(BARSLAST(TJ),1)>80 OR BARSSINCE(TJ)=0);
量顶天立地：
某日出现半年来的天量，且收出大阳线。
本公式集有一个量顶天立地五彩K线公式D!LDTLDWC与本公式对应。
{老鸭头}缺省周期：日线 （无未来函数）
MA5 := MA(close,5);
MA10 := MA(close,10);
MA60 := MA(close,60);
pday1 := barslast(cross(ma5,ma60));{5日均线上穿60日均线}
6 _& g" w- N5 z9 N4 D/ B# h& M# |/ Opday2 := barslast(cross(ma10,ma60));{10日均线上穿60日均线，至此形成鸭颈部}
pday3 := barslast(high=hhv(high,pday2));{形成头部，要下跌}
pday4 := barslast(cross(ma10,ma5));{下跌后，5日均线和10日均线死叉}
pday5 := barslast(cross(ma5,ma10));{回落不久，5日均线和10日均线形成金叉，形成嘴部}
a1:= pday1>pday2 and pday2>pday3 and pday3>pday4 and pday4>pday5 and pday5<5;
a2:= count(cross(ma10,ma5),pday2)=1;
A1 AND A2;
老鸭头：
（1）采用5、10和60周期的价格平均线。当5日、10日均线放量上穿60日平均线后，形成鸭颈部。
（2）股价回落时形成的高点形成鸭头部。
（3）当股价回落不久，5日、10日均线再次金叉向上形成鸭嘴部。
操作：
（1）在5日、10日均线放量上穿60日平均线形成鸭颈部时买入。
（2）在鸭嘴部附近成交量芝麻点一带逢低买入。
（3）当股价放量冲过鸭头顶瞬间时介入。
{量芝麻点}缺省周期：日线 （有未来函数慎用！）
V1:=MA(V,40);
HSL:=V/CAPITAL*100;
A1:=COUNT(V/V1<1.3,14)>11;
A2:=CROSS(HSL,2);
A3:=C/REF(C,1)>1.025 AND C>OPEN;
ZTJ:=A1 AND A2 AND A3;
量芝麻点：
成交量连续出现萎缩，在量柱体图上表现为小芝麻点，连续的小芝麻点与40日量平均线形成一个小水坑。
操作建议：
最好K线浅幅回档，且成交量越小越好，当放量上行时买入。
{青龙取水}缺省周期：日线 （无未来函数）
A1:=MIN(MA(C,5),MA(C,10))>MA(C,60) AND CROSS(MA(C,5),MA(C,10));
A2:=MIN(MA(C,5),MA(C,10))/MA(C,60)<1.05;
A3:=COUNT(V<MA(V,10),10)>6;
A1 AND A2 AND A3;
青龙取水：
在5日、10日、60日均线图上，5、10日均线起伏不定，日K线在60日均线上逶迤。
2、龙头回到60日均线附近，犹如青龙取水，同时成交量萎缩
3、然后大涨。
操作：待龙头形成，成交量萎缩又放大后，逢低介入。
(轻松过头) 缺省周期：日线 （有未来函数慎用！）
NDAYA:= HHVBARS(HIGH,120); {120日内最高价的周期数}
NDAY1:= NDAYA-10; {最高点之后10日}
NDAY2:= NDAYA+10; {庄家应该在NDAY1--NDAY2之间吸纳大部分筹码}
4 o. A9 T& Y# @' O; sA1 := NDAYA>=30;{确保高点出现的周期数大于30}
A2 := REF(SUM(VOL,20),NDAY1) > FINANCE(7) * 0.4; {吸纳40%}
VMA:=MA(VOL,40);{40日量均线}
A3:=COUNT(VOL<VMA,NDAY1)/NDAY1>0.9;{成交量呈现芝麻点}
A4:=CLOSE>=HHV(HIGH,120);{股价在冲击前高位}
A5:=COUNT(VOL<(MA(VOL,10)*1.3),10)>8;{近期无明显放量}
A1 AND A2 AND A3 AND A4 AND A5;
轻松过头：
（1）前一个头部下方的成交量巨大，股价筑头后开始回档。
（2）回档完毕后成交量呈量芝麻点，股价再次上扬冲击前一头部。
（3）轻松冲过前一头部并未明显放量。
操作：
（1）在前一头部成交量巨大时跟进。
（2）在回档完毕后成交量呈现芝麻点时逢低吸纳。
（3）最经济、最大利润化的方法是在轻松过头前的一瞬间迅速介入。
（4）前头部价格一般是上升浪的腰部。
大智慧Ｌ２的：
+ K7 g, z1 l: b6 R0 j6 f
7 E3 G, q9 T6 f5 N* n上:=(SMA(HIGH,21,2) * 1.05);
# f- z: I& A& z下轨道:=(SMA(LOW,21,2) * 0.969);
: Z' G8 `! p+ f6 F阻挡:=(SMA(HIGH,21,2) * 1.05);
4 T/ X3 [2 N& ]# d4 RRSV:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
4 Z/ x* t/ E" t0 v$ T- V0 jK:=SMA(RSV,3,1);1 o4 d: t- w) H1 j) D' n( r
D:=SMA(K,3,1);& m* L! l8 x. p4 ^4 w, s9 O* Y
J:=((3 * K) - (2 * D));k$ y3 q/ T* n+ h% z! @0 p$ [w
RSV12:=(((CLOSE - LLV(LOW,34)) / (HHV(HIGH,34) - LLV(LOW,34))) * 100);
" S# |0 n2 L* KcK12:=SMA(RSV12,3,1);
: K! x9 _5 D2 }& a+ ^: lD12:=SMA(K12,3,1);; C; Y9 @- u, z6 r9 @h
J12:=((3 * K12) - (2 * D12));
/ Y6 t; Z9 D: X! IRSV24:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);
7 {! TK* V% i1 ?9 K0 @- V7 UK24:=SMA(RSV24,3,1);
7 a6 e+ p+ |: }4 }4 I7 fD24:=SMA(K24,3,1);" d# Q- d2 A. T; U( D8 V
J24:=((3 * K24) - (2 * D24));# r' m- I; T) ~/ @0 s* `1 |+ ]
支撑位:=IF(CROSS(J,J24),LOW,REF(LOW,BARSLAST(CROSS(J,J24))));
+ {9 Q0 s0 [5 T. S/ }1 V, D7 }压力位:=IF(CROSS(J24,J),HIGH,REF(HIGH,BARSLAST(CROSS(J24,J))));7 A. \/ D, M9 D: G8 N
U2L:=IF((CLOSE >= MA(CLOSE,20)),80,50);2 x7 r" X3 F8 a* |& z: u
L2L:=IF((CLOSE >= MA(CLOSE,20)),50,20);
/T; a' a0 M& GRH1:=IF(((J < U2L) AND (REF(J,1) >=U2L)),HHV(REF(HIGH,1),(BARSLAST(((J >= U2L) AND (REF(J,1) <U2L))) - 1)),REF(HHV(REF(HIGH,1),(BARSLAST(((J >= U2L) AND (REF(J,1)< U2L))) - 1)),BARSLAST(((J < U2L) AND REF(J,1)))));8 Z2 T- O3 S8 j+ ^2 N* ~" b
RH4:=IF((HIGH > RH1),LOW,REF(LOW,BARSLAST((HIGH > RH1))));
7 M3 ]- w' RA+ B0 {3 iRH42:=IF((HIGH > RH1),J,REF(J,BARSLAST((HIGH > RH1))));& \4 A1 U4 M7 ]- s6 @( ^d
RH5:=IF((((HIGH> RH4) AND (J < RH42)) AND (J <J24)),HIGH,REF(HIGH,BARSLAST((((HIGH > RH4) AND (J < RH42)) AND(J < J24)))));) W, Y7 Q! c+ a5 M
$~) F8 o1 E( CRL1:=IF(((J > L2L) AND (REF(J,1) <=L2L)),LLV(REF(LOW,1),(BARSLAST(((J <= L2L) AND (REF(J,1) > L2L)))- 1)),REF(LLV(REF(LOW,1),(BARSLAST(((J <= L2L) AND (REF(J,1) >L2L))) - 1)),BARSLAST(((J > L2L) AND REF(J,1)))));`, l7 u& |; ]4 B
RL4:=IF((LOW < RL1),HIGH,REF(HIGH,BARSLAST((LOW < RL1))));
. d2 ?9 K* D% g% kRL42:=IF((LOW < RL1),J,REF(J,BARSLAST((LOW < RL1))));
1v9 G6 h# N- j9 V- b4 e8 T8 V: fRL5:=IF((((LOW < RL4) AND (J >RL42)) AND (J > J24)),LOW,REF(LOW,BARSLAST((((LOW < RL4) AND (J> RL42)) AND (J > J24)))));
( n% ^# }( i; X. _2 ~
; B8 @, `1 D" Q( v0 ?黑马趋势:=MA(CLOSE,3);0 j2 c* `! J+ Y. u4 P4 I
AA5:=MA(CLOSE,21);
h& k$ cl6 o3 g+ Q; ^- [AA10:=MA(CLOSE,8);
)R! ]* X+ a9 q- t: ?) x2 S追击:FILTER(((((((CLOSE / OPEN) > 1.04) AND((CLOSE - REF(CLOSE,1)) > 0)) AND (CLOSE > 下轨道)) AND ((AA10 -REF(AA10,1)) > 0)) AND (CLOSE < 上)),3)*10,linethick0;& p; Z: r2 a& I) p( c; f
STICKLINE(FILTER(((((((CLOSE/ OPEN) > 1.04) AND ((CLOSE - REF(CLOSE,1)) > 0)) AND (CLOSE >下轨道)) AND ((AA10 - REF(AA10,1)) > 0)) AND (CLOSE <上)),3),10,0,8,0),colorred;6 p( ], d8 v& O* ]5 L' P+ Z0 U0 J
DRAWTEXT(FILTER(((((((CLOSE/ OPEN) > 1.04) AND ((CLOSE - REF(CLOSE,1)) > 0)) AND (CLOSE >下轨道)) AND ((AA10 - REF(AA10,1)) > 0)) AND (CLOSE <上)),3),10,'追击'),colorD1E768;
5 @4 O! F( ?& i$ L- U]VARD:=((((OPEN + LOW) + HIGH) + CLOSE) / 4);4 i; E1 B! V9 eZ0 Y$ x8 Z
支撑:=EMA(VARD,5);
! s, B; l, S5 P短期底部:=LLV(OPEN,30);
:o+ T7 I+ \* q! M( M机会难得:FILTER((((((((LOW <= 短期底部) AND ((CLOSE -REF(CLOSE,1)) > CLOSE)) AND ((MA(CLOSE,10) - REF(MA(CLOSE,10),1))> 0)) AND (WINNER(CLOSE) < 0.05)) AND (短期底部 = RL5)) AND (LOW<= RL5)) AND (HIGH < 压力位)),3)*8,linethick0;2 C9 z; V8 c3 O8 z- r
STICKLINE(FILTER((((((((LOW<= 短期底部) AND ((CLOSE - REF(CLOSE,1)) > CLOSE)) AND ((MA(CLOSE,10)- REF(MA(CLOSE,10),1)) > 0)) AND (WINNER(CLOSE) < 0.05)) AND(短期底部 = RL5)) AND (LOW <= RL5)) AND (HIGH <压力位)),3),8,0,8,0),coloryellow;% P' A9 B( Y) Z* h6 H5 p
DRAWTEXT(FILTER((((((((LOW<= 短期底部) AND ((CLOSE - REF(CLOSE,1)) > CLOSE)) AND ((MA(CLOSE,10)- REF(MA(CLOSE,10),1)) > 0)) AND (WINNER(CLOSE) < 0.05)) AND(短期底部 = RL5)) AND (LOW <= RL5)) AND (HIGH <压力位)),3),8,'★机会难得'),colorFFFFFF;! c# M7 m8 M( U/ K& l/ p) \# d
历史大底:FILTER((((((LLV(LOW,0) AND (WINNER(CLOSE) < 0.08)) AND (LOW<= 短期底部)) AND (CLOSE > 短期底部)) AND (J < 80)) AND ((CLOSE /OPEN) > 1.08)),20)*12,linethick1 ,colorgreen;
: ^4 Z" T+ q8 V2CSTICKLINE(FILTER((((((LLV(LOW,0) AND (WINNER(CLOSE) < 0.08)) AND(LOW <= 短期底部)) AND (CLOSE > 短期底部)) AND (J < 80)) AND ((CLOSE /OPEN) > 1.08)),20),12,0,8,0),colorgreen;
) ?' v- I' r& \3YJDRAWTEXT(FILTER((((((LLV(LOW,0) AND (WINNER(CLOSE) < 0.08)) AND(LOW <= 短期底部)) AND (CLOSE > 短期底部)) AND (J < 80)) AND ((CLOSE /OPEN) > 1.08)),20),LOW,'★★历史大底'), colorgreen;# l& I5 N, r2 @, h% r
黑马登天:FILTER(((((((((LOW <= 短期底部) AND (CLOSE > 压力位)) AND ((AA5 -REF(AA5,1)) > 0)) AND (J < 80)) AND (CLOSE > 支撑位)) AND ((黑马趋势- REF(黑马趋势,1)) > 0)) AND (WINNER(CLOSE) < 0.1)) AND (CLOSE >OPEN)),5)*15,linethick0;6 l& d; `9 }; d8 z! T2 {
DRAWTEXT(FILTER(((((((((LOW<= 短期底部) AND (CLOSE > 压力位)) AND ((AA5 - REF(AA5,1)) > 0)) AND(J < 80)) AND (CLOSE > 支撑位)) AND ((黑马趋势 - REF(黑马趋势,1)) > 0))AND (WINNER(CLOSE) < 0.1)) AND (CLOSE > OPEN)),5),(LOW -0.15),'★黑马登天'),colorCDEEC5;
0 |: @* X+ bh0 Z0 ?( l5 PX1:=(((((3 * CLOSE) + HIGH) + LOW) + OPEN) / 6);
& h9 {4 l/ @E4 TX2:=EMA(X1,10);
" a1 X. `$ [/ k: V9 Y4 S- o8 O均线:=MA(CLOSE,16);
' K+ d+ M+ U' o2 D1 P* U6 b& j7 }均线20:=MA(CLOSE,20);2 K: j% _4 \5 O7 V0 U1 ?8 m7 ~6 K
均线120:=MA(CLOSE,120);
: |/ j. c- {! |/ r! N2 M; IVA:=CROSS(MA(CLOSE,19),MA(CLOSE,120));
$H& p9 f4 C, n! {- n9 @跳马:FILTER(((((((((OPEN > 均线120) AND (均线20< 均线120)) AND (LOW <= 均线120)) AND ((均线20 - REF(均线20,1)) > 0))AND (CLOSE > OPEN)) AND ((均线120 - REF(均线120,1)) > 0)) AND (HIGH< RH5)) AND (CLOSE >= 均线120)),15)*5,color00ff00 ,linethick0;
0p3 b/ H. O; fDRAWTEXT(FILTER(((((((((OPEN > 均线120) AND (均线20 <均线120)) AND (LOW <= 均线120)) AND ((均线20 - REF(均线20,1)) > 0)) AND(CLOSE > OPEN)) AND ((均线120 - REF(均线120,1)) > 0)) AND (HIGH <RH5)) AND (CLOSE >= 均线120)),15),LOW,'★120跳马'),color00ff00;* T3 D) o$ [$ ^. l; C( H; O1 z
宝马望月:((((VA AND ((均线120 - REF(均线120,1)) > 0)) AND (HIGH < RH5)) AND (CLOSE > OPEN)))*15,linethick0;
-X2 d# km: `: k' ?! }DRAWTEXT((((VA AND ((均线120 - REF(均线120,1)) >0)) AND (HIGH < RH5)) AND (CLOSE >OPEN)),LOW,'★宝马望月'),colorFFFFFF;4 C( g9 e5 E9 Bw7 Z- t
三线开花:((((((均线 - REF(均线,1)) > 0) AND CROSS(均线20,均线120)) AND (LOW <= 均线120)) AND (CLOSE >= 均线120)))*3,linethick0;
)K|3 x$ O0 r+ G5 YDRAWTEXT((((((均线 - REF(均线,1)) > 0) ANDCROSS(均线20,均线120)) AND (LOW <= 均线120)) AND (CLOSE >=均线120)),LOW,'三线开花'),colorFFFFFF;/ T! F' }( z+ i`5 f
快马加鞭:FILTER(((((((((((OPEN < X2) AND (CLOSE > X2)) AND ((支撑 -REF(支撑,1)) > 0)) AND ((支撑 - REF(支撑,1)) > 0)) AND (CLOSE < 阻挡))AND ((均线 - REF(均线,1)) > 0)) AND (CLOSE >= 均线)) AND (HIGH <阻挡)) AND ((AA10 - REF(AA10,1)) > 0)) AND ((阻挡 - REF(阻挡,2)) >0)),11)*8,linethick0;' [/ k$ T* ]. [! ?O
DRAWTEXT(FILTER(((((((((((OPEN< X2) AND (CLOSE > X2)) AND ((支撑 - REF(支撑,1)) > 0)) AND ((支撑 -REF(支撑,1)) > 0)) AND (CLOSE < 阻挡)) AND ((均线 - REF(均线,1)) > 0))AND (CLOSE >= 均线)) AND (HIGH < 阻挡)) AND ((AA10 - REF(AA10,1))> 0)) AND ((阻挡 - REF(阻挡,2)) > 0)),11),(LOW -0.11),'★快马加鞭'),colorFF0000;
& K' h( V5 d2 f$ d+ M$n黑马狂奔:FILTER(((((((OPEN < X2) AND (WINNER(CLOSE) < 0.2)) AND(CLOSE > X2)) AND ((X2 - REF(X2,1)) > 0)) AND (HIGH < 阻挡)) AND((CLOSE - REF(CLOSE,1)) > 0.35)),4)*13,linethick0,colorff00ff;
$\4 m# v; C: J1 l8 c/ qDRAWTEXT(FILTER(((((((OPEN < X2) AND(WINNER(CLOSE) < 0.2)) AND (CLOSE > X2)) AND ((X2 - REF(X2,1))> 0)) AND (HIGH < 阻挡)) AND ((CLOSE - REF(CLOSE,1)) >0.35)),4),(LOW - 0.05),'★黑马狂奔'),colorff00ff;
东方红大阳升
Var1:=VOL/CAPITAL*100;
Var2:=Var1>4 AND CLOSE>REF(CLOSE,1);7 U/ H5 I# W8 x1 o- s" k
Var3:=COUNT(Var2,13)>=3;- Y% t2 A9 f" i# q( p. [5 _$ p+ I, B
Var4:=CLOSE/REF(CLOSE,1)>1.049 AND Var1>5;6 u9 C5 R, i8 }& @3 \3 z7 b
Var5:=REF(SUMBARS(VOL,CAPITAL),13)>89;W5 A( P* b+ Y& W7 j0 a
Var6:=HIGH/CLOSE<1.021;: a/ H3 F! }2 D5 m. L
Var7:=COUNT(CLOSE/REF(CLOSE,1)>1.04,10)<5;5 ?+ Z; I. w4 S* O
Var8:=IF(COUNT(Var1>4,5)>=3,0,1);# I4 r8 I3 U* O) b- l: o6 F1 k
Var9:=Var3 AND Var4 AND Var5 AND Var6;
Var9 AND (REF(BARSLAST(Var9),1)>20 OR BARSSINCE(Var9)=0);
D!DFP
本文地址：
http://www.45fan.com/a/question/34368.html
