2008-1-9 08:07
要学智者
[飞狐] 指标源码如下
M1:MA(CLOSE,P1);
N%C OQdIZ)}2P,Z
M2:MA(CLOSE,P2);
"g%]8J0e:z[%y!O(t
M3:MA(CLOSE,P3);
({nLDg6M*Z,tR&h[`
M4:MA(CLOSE,P4);(M,j&f(o,d)\J
NH1:=ABS(m1-m2)/m1<0.005;*L&Ja b'^u
NH2:=ABS(m1-m3)/m1<0.005;
1IRo$_ oN
NH:=FILTER(NH1 AND NH2,3);$y"hTSIq}9}u
DRAWTEXT(NH,LOW*1.005,'粘合'),COLORYELLOW;~+`{1][-y7ml/pS
{3%}/KH#{$mi7UH*m
X:=MA(C,10)>MA(C,30) AND CROSS(C,MA(C,10));vFL&?2c/Z
V1:=MA(VOL,3);5qO*QW"_.wA
V2:=MA(VOL,5);,w
F
?b2Cxq
Y:=V1>V2;VU.X;sI[
Z:=VOL>REF(VOL,1);&rkA(R%}ki
追加:=IF(X AND Y AND Z,2,0);?%GZ(La'{m S
{STICKLINE(追加=2,(open+close)/2,close,5,0),coloryellow;}6p1^q%y4f1V(E0K6a b-F8m(j
drawtext(追加=2,h*1.01,'3%'),coloryellow;
aZf&ZiDWcg
{横盘突破}$rk.y1EPp[W
O1:=SUM(EMA((CLOSE+LOW)/2,1)/3,3);;J2L2vX&gk:ZSf
O2:=EMA(O1,3);U4tHc$CeD"y9T4j
O3:=EMA(O2,3);
C8bGN"s
CP11:=HHV(O1,20);
w+_n)M:k$Z0p
CP21:=HHV(O1,1);
q9a,Btl"`
A:=CROSS(CP21,CP11);
k9AA(R2h)B&\$H
DRAWTEXT(FILTER(A,1),CP21,'突破'),coloryellow;
O2c\/qV}8uS
0o8O!Spw0DK9f
主线:=WMA(CLOSE,8);
(|vyjHh6O^
平均值:=MA(CLOSE,15);
3pr'mN4z#Q
MX:=MA(CLOSE,20);
%O1v?)u Vj_5ba&lQ
~l
DRAWTEXT((((((((REF(CLOSE,1) < MX) AND ((主线 - REF(主线,1))>0)) AND ((M2-REF(M2,1))>0.01)) AND
],m"~P#`kai
(LOW<MX)) AND (CLOSE>MX)) AND ((平均值-REF(平均值,1))>0)) AND ((CLOSE / OPEN) > 1.052)),(LOW - 0.08),'★黄金'),colorFFFF;
!pAd@/?$\5M"dW3n
0h+w9IE/gL\;P&ly
A1:=REF(c,10)=HHV(c,21);
s*\+]1G)W
B1:=FILTER(A1,10);
aoA!oh$x^M\
C1:=BACKSET(B1,11);
}-vXL#R`VH!{
_
HD:=FILTER(C1,10);
_~%dlD(o+}jC,e
A2:=REF(c,10)=LLV(c,21); ,hrE
`$ns)^v%y
B2:=FILTER(A2,10);
I(e {}q2k.V
C2:=BACKSET(B2,11); p:hwb)E7Q K'_
LD:=FILTER(C2,10);@zHDI&s3@EF;U?
A:=REF(C,BARSLAST(HD));
D5zY
wV}c0uBY;w
B:=REF(C,BARSLAST(LD));!GyD6aIIG2~"X
t1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
be"?'DS6pC:xRXZ
t2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);0St%VA[7Nq+bYJ?
波峰:A,ColorFF00FF,POINTDOT;
9b@8r2M4Cv!id
STICKLINE(c,A,A,9,0),ColorFF00FF;
o6B~IBIp
波谷:B,Color80FF00,POINTDOT;
c4}Q.w7u|
STICKLINE(c,B,B,9,0),Color80FF00;
x'[W }"kOn8k
DRAWNUMBER((((T1 = 0) AND (REF(T1,1) > 0)) OR (ISLASTBAR AND (T1 > 0))),(REF(A,1) + 0.1),REF(A,1),2),colorwhite;
qTyR)xW@O
DRAWNUMBER((((T2 = 0) AND (REF(T2,1) > 0)) OR (ISLASTBAR AND (T2 > 0))),(REF(B,1) + 0.1),REF(B,1),2),colorwhite;
Et{;Y,D+G
ma6:=ma(c,6),colorwhite,linethick2;
.T#r Ng6{yds
ma18:=ma(c,18),color0099ff,linethick2;
)Qzd8]K/gH7b7z%w
买进价:=((c-ref(ma6,1))/6+ma6)*1.004;
uW&?+Zf
买进条件:=cross(c,买进价) and 买进价>ref(买进价,1);3h$q|`2R w`-pW)R
白K买进:IF(买进条件,l,h),COLORWHITE,POINTDOT;1Q"Bhjl5\-kD+@
STICKLINE(买进条件,o,(open+close)/2,4,1),colorwhite,linethick2;
P+_ _
es
加码价:=((c-ref(ma18,1))/18+ma18)*1.004;KNC2TF
y[j
加码条件:=cross(c,加码价) and 加码价>ref(加码价,1);;DD,^:f`8gW
黄K加码:IF(加码条件,l,h),coloryellow,POINTDOT;
p8i2xp hl)uC
STICKLINE(加码条件,(open+close)/2,c,4,1),coloryellow,linethick2;