{金蛤蟆選股}（無未來函數(shù)）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);金蛤蟆選股公式 選出的股票可選擇最符合最好形態(tài){量頂天立地}（無未來函數(shù)）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);量頂天立地：某日出現(xiàn)半年來的天量，且收出大陽線。本公式集有一個量頂天立地五彩K線公式D!LDTLDWC與本公式對應(yīng)。{老鴨頭}缺省周期：日線 （無未來函數(shù)）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周期的價格平均線。當(dāng)5日、10日均線放量上穿60日平均線后，形成鴨頸部。（2）股價回落時形成的高點(diǎn)形成鴨頭部。（3）當(dāng)股價回落不久，5日、10日均線再次金叉向上形成鴨嘴部。操作：（1）在5日、10日均線放量上穿60日平均線形成鴨頸部時買入。（2）在鴨嘴部附近成交量芝麻點(diǎn)一帶逢低買入。（3）當(dāng)股價放量沖過鴨頭頂瞬間時介入。{量芝麻點(diǎn)}缺省周期：日線 （有未來函數(shù)慎用?。?div style="height:15px;">
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;量芝麻點(diǎn)：成交量連續(xù)出現(xiàn)萎縮，在量柱體圖上表現(xiàn)為小芝麻點(diǎn)，連續(xù)的小芝麻點(diǎn)與40日量平均線形成一個小水坑。操作建議：最好K線淺幅回檔，且成交量越小越好，當(dāng)放量上行時買入。{青龍取水}缺省周期：日線 （無未來函數(shù)）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、然后大漲。操作：待龍頭形成，成交量萎縮又放大后，逢低介入。(輕松過頭) 缺省周期：日線 （有未來函數(shù)慎用?。?div style="height:15px;">
NDAYA:= HHVBARS(HIGH,120); {120日內(nèi)最高價的周期數(shù)}NDAY1:= NDAYA-10; {最高點(diǎn)之后10日}NDAY2:= NDAYA+10; {莊家應(yīng)該在NDAY1--NDAY2之間吸納大部分籌碼}4 o. A9 T& Y# @' O; sA1 := NDAYA>=30;{確保高點(diǎn)出現(xiàn)的周期數(shù)大于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;{成交量呈現(xiàn)芝麻點(diǎn)}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）回檔完畢后成交量呈量芝麻點(diǎn)，股價再次上揚(yáng)沖擊前一頭部。（3）輕松沖過前一頭部并未明顯放量。操作：（1）在前一頭部成交量巨大時跟進(jìn)。（2）在回檔完畢后成交量呈現(xiàn)芝麻點(diǎn)時逢低吸納。（3）最經(jīng)濟(jì)、最大利潤化的方法是在輕松過頭前的一瞬間迅速介入。（4）前頭部價格一般是上升浪的腰部。大智慧Ｌ２的：+ K7 g, z1 l: b6 R0 j6 f7 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( rD:=SMA(K,3,1);& m* L! l8 x. p4 ^4 w, s9 O* YJ:=((3 * K) - (2 * D)); k$ y3 q/ T* n+ h% z! @0 p$ [ wRSV12:=(((CLOSE - LLV(LOW,34)) / (HHV(HIGH,34) - LLV(LOW,34))) * 100);" S# |0 n2 L* K cK12:=SMA(RSV12,3,1);: K! x9 _5 D2 }& a+ ^: lD12:=SMA(K12,3,1);; C; Y9 @- u, z6 r9 @ hJ12:=((3 * K12) - (2 * D12));/ Y6 t; Z9 D: X! IRSV24:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);7 {! T K* 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 VJ24:=((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 NU2L:=IF((CLOSE >= MA(CLOSE,20)),80,50);2 x7 r" X3 F8 a* |& z: uL2L:=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* ~" bRH4:=IF((HIGH > RH1),LOW,REF(LOW,BARSLAST((HIGH > RH1))));7 M3 ]- w' R A+ B0 {3 iRH42:=IF((HIGH > RH1),J,REF(J,BARSLAST((HIGH > RH1))));& \4 A1 U4 M7 ]- s6 @( ^ dRH5:=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 BRL4:=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 IAA5:=MA(CLOSE,21);h& k$ c l6 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; fSTICKLINE(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 JDRAWTEXT(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 e Z0 Y$ x8 Z支撐:=EMA(VARD,5);! s, B; l, S5 P短期底部:=LLV(OPEN,30);:o+ T7 I+ \* q! M( M機(jī)會難得: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- rSTICKLINE(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 pDRAWTEXT(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,'★機(jī)會難得'),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& \3Y JDRAWTEXT(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+ b h0 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# k m: `: k' ?! }DRAWTEXT((((VA AND ((均線120 - REF(均線120,1)) >0)) AND (HIGH < RH5)) AND (CLOSE >OPEN)),LOW,'★寶馬望月'),colorFFFFFF;4 C( g9 e5 E9 B w7 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* ]. [! ? ODRAWTEXT(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" kVar3:=COUNT(Var2,13)>=3;- Y% t2 A9 f" i# q( p. [5 _$ p+ I, BVar4:=CLOSE/REF(CLOSE,1)>1.049 AND Var1>5;6 u9 C5 R, i8 }& @3 \3 z7 bVar5:=REF(SUMBARS(VOL,CAPITAL),13)>89; W5 A( P* b+ Y& W7 j0 aVar6:=HIGH/CLOSE<1.021;: a/ H3 F! }2 D5 m. LVar7:=COUNT(CLOSE/REF(CLOSE,1)>1.04,10)<5;5 ?+ Z; I. w4 S* OVar8:=IF(COUNT(Var1>4,5)>=3,0,1);# I4 r8 I3 U* O) b- l: o6 F1 kVar9:=Var3 AND Var4 AND Var5 AND Var6;Var9 AND (REF(BARSLAST(Var9),1)>20 OR BARSSINCE(Var9)=0);D!DFP
