引用:

公式名称: 5天5%
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-10-28
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

5天5% ???



UP:=100*(CLOSE/REF(CLOSE,1)-1);
B:=BARSLAST(UP>=3);
F:=(UP>=3) OR (COUNT(UP>0,B)=B);
STICKLINE(F,0,40,4,1),COLORRED;   
STICKLINE(REF(F,1) AND NOT(F),0,50,4,0),COLORCYAN;

引用:

公式名称: 指南针的K线重心通道
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-10-28
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

指南针的K线重心通道



STICKLINE(o<=c,o,c,8,0),COLORRED;
STICKLINE(o<=c,h,l,1,0),COLORRED;
STICKLINE(o>c,o,c,8,0),COLORGREEN;
STICKLINE(o>c,h,l,1,0),COLORGREEN;
K线重心:AMOUNT/VOL/100,LINETHICK0;
VB1:=INDEXO;
VB2:=K线重心*1.1;
VB3:=IF(VB1=0,VB2,REF(K线重心,1)*1.1);
VB4:=(VB2+VB3)/2;
VB5:=K线重心*0.9;
VB6:=IF(VB1=0,VB5,REF(K线重心,1)*0.9);
VB7:=(VB5+VB6)/2;
VB8:=EMA(VB4,13);
VB9:=EMA(VB7,13);
K线重心通道上:FORCAST(VB8,13),COLORMAGENTA,LINETHICK2;
K线重心通道下:FORCAST(VB9,13),COLOrgreen,LINETHICK2;
时空隧道上轨:FORCAST(CLOSE,8)*1.05;
时空隧道下轨:FORCAST(CLOSE,8)*0.95;

引用:

DRAWGBK(CLOSE>0, COLORRGB(1,8888,8888), COLORRGB(1,3333,6666),3);
CG:ma(C,17),;
FL3:hhv(CG,9),COLORred,linethick1;
FS3:if(CG<FL3,(CG-(FL3-CG)),FL3),COLORred,linethick1;
A1:=简单移动平均(收盘价,20);
ZX:=向前引用(A1,20/2+1),LINETHICK2,COLORGREEN;
LIFE:(指数平滑移动平均(收盘价,60)+指数平滑移动平均(收盘价,90))/2,LINETHICK0,COLORCC33FF;
Var1:=(2*收盘价+最高价+最低价)/4;
SNOOK:指数平滑移动平均(Var1,99)*0.91,linethick0,COLORBLUE;
画柱线(收盘价<ZX,最高价,最低价,1,0),,COLORYELLOW;
画柱线(收盘价<ZX AND 收盘价<=LIFE,开盘价,收盘价,8,0),,COLORBLUE;
画柱线(收盘价<ZX AND 收盘价>=SNOOK,开盘价,收盘价,8,0),,COLORGREEN;
画柱线(收盘价<ZX AND 收盘价<SNOOK AND 收盘价>LIFE,开盘价,收盘价,8,0),,COLORGRAY;
画柱线(收盘价<ZX,开盘价,收盘价,2,0),,COLORWHITE;

引用:

公式名称: 龙过江
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-10-28
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

龙过江



Var1:=EMA(C,8);
Var2:=EMA(Var1,20);
Var3:=CROSS(Var1,Var2);
Var4:=Var1<EMA(C,120);
Var5:=EMA(SMA((C-LLV(L,19))/(HHV(H,19)-LLV(L,19))*100,8,1),3);
过江龙:IF(Var5>20 AND Var5<80,Var5,Var5) COLORyellow;
IF(Var5>80,Var5,80) COLORgreen;
风险区:80 ;
IF(Var5<20,Var5,20)  ;
牛熊区:50 ;
放心买入:IF(Var3 AND Var4,38,20),COLORred,linethick2;

引用:

RSV:= (CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100))*100;
FASTK:=SMA(RSV,3,1);
K:=SMA(FASTK,3,1);
D:=SMA(K,3,1);
风险区:80 ;
牛熊区:50 ;
放心区:20;
STICKLINE(k>d,0,d,10,0)coloryellow;
STICKLINE(k<d,0,d,10,0)colorffffff;
DRAWTEXT(CROSS(d,80),80,'小心风险')colorred;
DRAWTEXT(CROSS(80,d),80,'逃顶')colorred;
DRAWTEXT(CROSS(d,10),10,'准备')colorred;
DRAWTEXT(CROSS(d,20),20,'买入')colorred;
DRAWTEXT(CROSS(d,50),50,'拉升')colorred;
DRAWTEXT(CROSS(95,d),96,'逃顶2')colorred;

引用:

Var0:=if((60-MA(WINNER(CLOSE)*100,4))>55,(60-MA(WINNER(CLOSE)*100,4)),50);
PARTLINE(c>0,Var0);
STICKLINE(Var0>58,50,Var0,1,1),COLORRED;
Var1:=EMA(CLOSE,8);
Var2:=EMA(Var1,20);
Var3:=CROSS(Var1,Var2);
Var4:=Var1<EMA(CLOSE,120);
Var5:=EMA(SMA((CLOSE-LLV(LOW,19))/(HHV(HIGH,19)-LLV(LOW,19))*100,8,1),3);
过江龙:Var5,linethick0;
STICKLINE(Var5>20 AND Var5<80,Var5,Var5,6,1),linethick2,POINTDOT,COLORYELLOW;
STICKLINE(Var5>80,Var5,Var5,6,1),linethick2,POINTDOT,COLORRED;
STICKLINE(Var5<20,Var5,Var5,6,1),linethick2,POINTDOT,COLORBLUE;
风险区:80,POINTDOT,COLORMAGENTA;
牛熊区:50,POINTDOT,COLORWHITE;
安全区:IF(Var3 AND Var4,50,20),COLORGREEN;

引用:

公式名称: 几个公式
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-10-14
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

几个公式~~~~~~~~~`



我从电脑里找到以前的几个公式~~~~~~~


不知信号如何？


Var1:=CLOSE/MA(CLOSE,40)*100<76;
Var2:=CLOSE/MA(CLOSE,60)*100<74;
Var3:=HIGH>LOW*1.051;
Var4:=Var3 AND COUNT(Var3,5)>1;
Var4 AND (Var1 OR Var2) AND MA(CLOSE,27)/CLOSE>1.169 AND MA(CLOSE,17)/CLOSE>1.158 AND CLOSE<MA(CLOSE,120) AND MA(CLOSE,60)<MA(CLOSE,120) AND MA(CLOSE,60)>MA(CLOSE,30) AND "CCI">-210 AND MA(VOL,60)>MA(VOL,30) AND (CLOSE>OPEN OR CLOSE<OPEN) AND (OPEN-REF(CLOSE,1))/REF(CLOSE,1)>-0.07;

引用:

CLOSE<DMA(EMA(CLOSE,21),SUM(VOL,5)/5/CAPITAL)*0.8 AND CLOSE<HHV(HIGH,13)*0.8 AND "KDJ.J"(28,14,7)<20 AND MA(VOL,10)<MA(VOL,50)*3;

引用:

BIAS1:=(收盘价-指数平滑移动平均(收盘价,12))/指数平滑移动平均(收盘价,12)*100, , COLORRED;
BIAS2:=绝对值(指数平滑移动平均(收盘价,12)-指数平滑移动平均(收盘价,50))/指数平滑移动平均(收盘价,50)*100, , COLORMAGENTA;
反弹1:条件函数(BIAS1<0  AND BIAS2>14,8,0);
反弹2:条件函数(BIAS1<0 AND BIAS2>20,18,0);
乖离反弹:(反弹2 or 反弹1);

引用:

公式名称: 原码
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-09-16
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

原码！



Var1:=CLOSE/MA(CLOSE,40)*100<76;
Var2:=CLOSE/MA(CLOSE,60)*100<74;
Var3:=HIGH>LOW*1.051;
Var4:=Var3 AND COUNT(Var3,5)>1;
Var4 AND (Var1 OR Var2) AND MA(CLOSE,27)/CLOSE>1.169 AND MA(CLOSE,17)/CLOSE>1.158 AND CLOSE<MA(CLOSE,120) AND MA(CLOSE,60)<MA(CLOSE,120) AND MA(CLOSE,60)>MA(CLOSE,30) AND "CCI">-210 AND MA(VOL,60)>MA(VOL,30) AND (CLOSE>OPEN OR CLOSE<OPEN) AND (OPEN-REF(CLOSE,1))/REF(CLOSE,1)>-0.07;

引用:

公式名称: 原码
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-09-13
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

原码！



{n=64}
CC1:(C-MA(C,20))/MA(C,20)*100;
hsl:vol/capital*100;
资金流向值:sum(hsl,n),linethick0;
阳换手:sum(if(c>o,hsl,0),20),linethick0;
阴换手:sum(if(c<=o,hsl,0),20),linethick0;
STICKLINE(cc1>=0,0,cc1,5,0),colorred;
DRAWICON(cc1<0,0,11);
DRAWICON(cc1>=00,0,12);

引用:

{华泰通道主图}
a1:=hhv(h,2);
a2:=llv(l,2);
MAA1:=SMA(A1,20,1)*105/100;
MAA2:=SMA(A2,20,1)*95/100;
maA3:=sma(maA1,2,1);
maA4:=sma(maA2,2,1);
maA5:=sma(maA3,2,1);
maA6:=sma(maA4,2,1);
上轨:sma(maA5,2,1);
下轨:sma(maA6,2,1);
分水岭:sma(ma(c,5),220,1);circledot;
A01:=MA(C,1);
A02:=SMA(SMA(SMA(A01,2,1),2,1),2,1);
sma1:=A02,colorbaaaa5;
sma2:=MA(A02,2),coloryellow;
var2:=(3*CLOSE+LOW+OPEN+HIGH)/6;
多头线: (20*var2+19*REF(var2,1)+18*REF(var2,2)+17*REF(var2,3)
+16*REF(var2,4)+15*REF(var2,5)+14*REF(var2,6)+13*REF(var2,7)+12*REF(var2,8)
+11*REF(var2,9)+10*REF(var2,10)+9*REF(var2,11)+8*REF(var2,12)+7*REF(var2,13)+6*REF(var2,14)
+5*REF(var2,15)+4*REF(var2,16)+3*REF(var2,17)+2*REF(var2,18)+REF(var2,20))/210,linethick1,colorff00ff;
空头线: MA(多头线,5),linethick1,color00ff00;
DRAWICON(cross(c,空头线) and c>空头线 and filter(c>空头线,10),空头线,1);

引用:

公式名称: 短线操盘
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-08-29
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

短线操盘



Var3:=LLV(HIGH,241);
Var4:=100*(CLOSE-Var3)/Var3;
Var5:=REF(LLV(CLOSE,481),1);
Var6:=REF(HHV(CLOSE,481),1);
Var7:=100*(CLOSE-Var5)/(Var6-Var5);
Var8:=(CLOSE-LLV(CLOSE,981))/(HHV(CLOSE,981)-LLV(CLOSE,981))*100;
Var9:=(CLOSE-LLV(CLOSE,393))/(HHV(CLOSE,393)-LLV(CLOSE,393))*100;
VarA:=(CLOSE-LLV(LOW,981))/(HHV(HIGH,981)-LLV(LOW,981))*100;
VarB:=(CLOSE-LLV(LOW,393))/(HHV(HIGH,393)-LLV(LOW,393))*100;
VarC:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),5)/4;
VarD:=IF(DATE<1031231,IF(VarC>23.16,VarC,0),0);
VarE:=VarC<1;
VarF:=VarD;
Var10:=Var4<0 AND Var7<0;
Var11:=1;
Var12:=(HIGH+LOW+CLOSE*2)/4*Var11;
Var13:=EMA(Var12,21);
Var14:=STD(Var12,21);
Var15:=((Var12-Var13)/Var14*100+200)/4*Var11;
Var16:=(EMA(Var15,89)-25)*1.56*Var11;
Var17:=EMA(Var16,5)*1.22*Var11;
Var18:=EMA(Var17,3)*Var11;
Var19:=3*Var17-2*Var18*Var11;
Var1A:=IF(CROSS(Var19,Var17) AND CROSS(Var19,Var18) AND CROSS(Var17,Var18),1,0);
Var1B:=IF(CROSS(Var17,Var19) AND CROSS(Var18,Var19) AND CROSS(Var18,Var17),1,0);
买点: IF(FILTER(Var8=0 AND VarE AND Var10 AND Var1A,5)=1,10,0), colorred;
卖点: IF(FILTER(Var8=100 AND VarF AND Var1B,5)=1,10,0),  colorgreen;
Var1C:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),13)/4;
Var1D:=EMA(CLOSE,2)-EMA(CLOSE,89);
Var1E:=EMA(Var1D,30);
Var1F:=2*(Var1D-Var1E)*10;
Var20:=POW(Var1F,3)*0.1+POW(Var1F,2);
Var21:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));
Var22:=EMA(Var21*0.97,3);
Var23:=(HIGH+LOW+CLOSE)/3;
Var24:=(Var23-MA(Var23,14))/(0.015*AVEDEV(Var23,14));
Var25:=IF(YEAR<2008 AND Var1F>0.015,Var20,0)/45;
庄拉线: Var25,coloryellow ;
Var26:=EMA(CLOSE,2)-EMA(CLOSE,150);
Var27:=EMA(Var26,100);
Var28:=2*(Var26-Var27);
Var29:=POW(Var28,3)*0.1+POW(Var28,1);
Var2A:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));
Var2B:=EMA(Var2A*0.97,3);
Var2C:=(HIGH+LOW+CLOSE)/3;
Var2D:=(Var2C-MA(Var2C,14))/(0.015*AVEDEV(Var2C,14));
黑马线: IF( Var28>0.1,Var29,0)*5,  colorred;
量价线: (CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100, COLORFFA2AF;
Var2E:=IF(FILTER(量价线>0 AND 量价线<3,5)=1,12,0);
涨幅前兆: IF(FILTER(庄拉线>0 AND 庄拉线<0.5 AND Var2E AND Var1C<3,10)=1,10,0), colorwhite;
选股利器: IF(FILTER(Var2E>0 AND Var1C<2 AND 庄拉线>0 AND 庄拉线<1
AND 黑马线>0 AND 黑马线<1.5 AND Var2E>0,5)=1,10,0),colormagenta;
DRAWICON(买点>0,10,1);
DRAWICON(卖点>0,10,2);
DRAWICON(涨幅前兆>0,10,1);
DRAWICON(选股利器>0,10,1);

引用:

公式名称: 玄黄趋势+智仁参谋
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-09-08
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

原码！



玄黄趋势
Var1:=HHV(HIGH,55);
Var2:=LLV(LOW,55);
空仓: SMA((CLOSE-Var2)/(Var1-Var2),8,1)*100,colorgreen;
持股: EMA(HHV(空仓,3),1),colorred,linethick2;

智仁参谋
jc:=sar(7,4,20);
jj:=FORCAST(EMA(jc,36),6);
FJ:=if(C>JJ,c/jc,-jc/c);
抄盘用智:SUM(FJ,0),linethick2,COLORF00FF0;
估出不仁:forcast(EMA(抄盘用智,3),18);

引用:

公式名称: KDJ+RSI
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-09-09
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

KDJ+RSI



RSI1:SMA(MAX(CLOSE-REF(CLOSE,1),0),N1,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),N1,1)*100;
K:SMA(RSI1,M1,1);
D:SMA(K,M2,1);
20;
80;


{n1= 6    m1 =3  m2=3 }

引用:

慢KD



RSV:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
K:SMA(RSV,3,1),,linethick2;
D:SMA(K,3,1),,linethick2;
低位关注:20;
高位不碰:80;
drawIcon(Cross(K,D),K,1);
drawIcon(Cross(D,80),80,2);
drawIcon(Cross(D,K),D,2);

引用:

公式名称: 控盘指标+抄底公式
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-09-01
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

今天有空，发个原码！



控盘指标

Var3:=(CLOSE+HIGH+LOW)/3;
Var4:=EMA(EMA(EMA(Var3,1),13),21);
控盘度:(Var4-REF(Var4,1))/REF(Var4,1)*100,COLORSTICK,LINETHICK3;

Var5:=LLV(LOW,33);
Var6:=HHV(HIGH,17);
Var7:=EMA((CLOSE-Var5)/(Var6-Var5)*100,20)*0.998;
Var8:=EMA(0.667*REF(Var7,1)+0.333*Var7,1);
Var9:=EMA(100*(HHV(HIGH,20)-CLOSE)/(HHV(HIGH,20)-LLV(LOW,33)),20);
VarA:=EMA(Var9,1);
VarB:=VOL/CAPITAL*100;
VarC:=SUM(VarB,5)>=3;
VarD:=VarC/REF(VarB,10)>=2;
VarE:=HHV(CLOSE,5);
VarF:=VarE/REF(CLOSE,5)>=1.01;
Var10:=VarA > 20;
Var11:=HIGH/REF(LOW,20) < 1.2;
Var12:=WINNER(CLOSE)*100;
Var13:=VarC AND Var10 AND VarD AND Var11 AND VarF;
Var14:=FILTER(Var13,20);
DRAWTEXT(Var14,-0.15,'有主力资金活动迹象!!!'),linethick3,colormagenta;
Var15:=EMA(WINNER(CLOSE),20);
Var16:=Var15 > 0.85 AND CLOSE; SUM(VOL,10)/CAPITAL > 0.2 OR SUM(VOL,3)/CAPITAL > 0.1 OR CLOSE/REF(CLOSE,20)>=1.9;
{Var16:=Var15>0.85 AND CLOSE 0.2  OR SUM(VOL,3)/CAPITAL > 0.1) OR CLOSE/REF(CLOSE,20)>=1.9;}
DRAWTEXT(Var16,0.5,'出'),COLORYELLOW;

引用:

抄底公式
Var1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
Var2:=SMA(Var1,3,1);
Var3:=SMA(Var2,3,1);
Var4:=3*Var2-2*Var3;
Var5:=(Var2+Var3+Var4)/3<=25;
Var6:=COUNT(CROSS(Var4,Var2),2)=1;
Var7:=COUNT(CROSS(Var2,Var3),2)=1;
Var8:=DYNAINFO(17)>=1.8;
Var6 AND Var7 AND Var5 OR Var8,COLORGREEN;

引用:

公式名称: 群龙有首
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-08-23
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

群龙有首原码



a1:=EMA((EMA(CLOSE,1)+EMA(CLOSE,3)+EMA(CLOSE,5))/3,3);
a2:=EMA((EMA(CLOSE,3)+EMA(CLOSE,5)+EMA( CLOSE,7))/3,3);
a3:=EMA((EMA(CLOSE,5)+EMA(CLOSE,7)+EMA( CLOSE,9))/3,3);
a4:=EMA((EMA(CLOSE,7)+EMA(CLOSE,9)+EMA( CLOSE,11))/3,3);
a5:=EMA((EMA(CLOSE,9)+EMA(CLOSE,11)+EMA( CLOSE,13))/3,3);
a6:=EMA((EMA(CLOSE,11)+EMA(CLOSE,13)+EMA( CLOSE,15))/3,3);
a7:=EMA((EMA(CLOSE,13)+EMA(CLOSE,15)+EMA( CLOSE,17))/3,3);
a8:=EMA((EMA(CLOSE,15)+EMA(CLOSE,17)+EMA( CLOSE,19))/3,3);
a9:=EMA((EMA(CLOSE,17)+EMA(CLOSE,19)+EMA( CLOSE,21))/3,3);
a10:=EMA((EMA(CLOSE,19)+EMA(CLOSE,21)+EMA( CLOSE,23))/3,3);
a11:=EMA((EMA(CLOSE,21)+EMA(CLOSE,23)+EMA( CLOSE,25))/3,3);
A:=EMA((EMA(CLOSE,29)+EMA(CLOSE,31)+EMA(CLOSE,33))/3,3),LINETHICK0;
群龙有首:A,LINETHICK0;
{hz2004716}
a15:=a-(a1-a*0.997),colorFF1010;
a16:=a-(a2-a),colorff2010;
a17:=a-(a3-a),colorff3010;
a18:=a-(a4-a),colorff4010;
a19:=a-(a5-a),colorff5010;
a20:=a-(a6-a),colorff6010;
a21:=a-(a7-a),colorff7010;
a22:=a-(a8-a),colorff8010;
a23:=a-(a9-a),colorff9010;
a24:=a-(a10-a),colorffc010;
a25:=a-(a11-a*0.997),colorffe010;{LINEDOT;}

FILLRGN(A9>A,A9,A),color436873;
FILLRGN(A9<A,A9,A),color436873;
FILLRGN(A23<A,A,A23),color4D635A;
FILLRGN(A23>A,A,A23),color4D635A;

PARTLINE(1,a15),colorFF1010;PARTLINE(1,a16),colorFF2010;
PARTLINE(1,a17),colorFF3010;PARTLINE(1,a18),colorFF4010;
PARTLINE(1,a19),colorFF5010;PARTLINE(1,a20),colorFF6010;
PARTLINE(1,a21),colorFF7010;PARTLINE(1,a22),colorFF8010;
PARTLINE(1,a23),colorFF9010;PARTLINE(1,a24),colorFFc010;
PARTLINE(1,a25),colorFFe010;{LINEDOT;}

PARTLINE(1,a1),color1010FF;PARTLINE(1,a2),color1020FF;
PARTLINE(1,a3),color1030FF;PARTLINE(1,a4),color1040FF;
PARTLINE(1,a5),color1050FF;PARTLINE(1,a6),color1060FF;
PARTLINE(1,a7),color1070FF;PARTLINE(1,a8),color1080FF;
PARTLINE(1,a9),color1090FF;PARTLINE(1,a10),color10c0FF;
PARTLINE(1,a11),color10e0FF;{LINEDOT;}

STICKLINE(OPEN>=CLOSE ,OPEN,CLOSE,9,0 ),COLORaaaaaa;
STICKLINE(OPEN>=CLOSE ,OPEN,CLOSE,6,0 ),COLORbbbbbb;
STICKLINE(OPEN>=CLOSE ,OPEN,CLOSE,2.4,0 ),COLORcccccc;
STICKLINE(OPEN>=CLOSE ,OPEN,CLOSE,1.1,0 ),COLOR;
STICKLINE(CLOSE>OPEN,OPEN,CLOSE,9,0 ),COLOr6666cc;
STICKLINE(CLOSE>OPEN,OPEN,CLOSE,6 ,0 ),COLOR7777dd;
STICKLINE(CLOSE>OPEN,OPEN,CLOSE,2.4 ,0 ),COLOR8888ee;
STICKLINE(CLOSE>OPEN,OPEN,CLOSE,1.1 ,0 ),COLOR9999ff;
STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0 ),COLOR1199ff;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5 ,0 ),COLOR1199ff;
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5 ,0 ),COLORcccccc;
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5 ,0 ),COLORcccccc;

DRAWICON(a<REF(a,1),a,'s28');
DRAWICON(a>REF(a,1),a,'s31');
A:=SYSPARAM(1)=BARPOS;
x:IF(a>0,DATE,0),linethick0;
mm:=BARSLAST(DATE=x);
hh:HHV(HIGH,mm+1),color0000ff,linethick2;
ll:LLV(LOW,mm+1),color00ff33,linethick2;

((hh-ll)/6+ll),color00ff66;
(ll+(hh-ll)/6+(hh-ll)/6),color00ff99;
(hh-(hh-ll)/6),color0033ff;
(hh-(hh-ll)/6-(hh-ll)/6),color0099ff;

引用:

公式名称: MACD&KD
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-08-30
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

转帖！



MACD和慢KD做在同图里  原理是把MACD的坐标上移50  这里50线是强弱分水岭  分析家和飞狐都可用
原码：  MACD&KD

RSV:= (CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
FASTK:=(SMA(RSV,3,1)-50)*1.4+50;
K:SMA(FASTK,3,1);
D:SMA(K,3,1);

DI:=EMA(CLOSE,12) - EMA(CLOSE,26);

a:=count(c>0,0);  
x:=if(a<180,a,180);
a1:=sum(max(di-0,0),x)/count(di>0,x);
a2:=sum(max(0-di,0),x)/count(di<0,x);
a3:=if(di>0,a1,a2);
ddi:=di*20/a3+50;
diff:ema(ddi,3);
de:ema(ddi,9);

50,POINTDOT;

引用:

公式名称: DY波段
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-08-26
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

转帖：{DY波段}



{DY波段}
red:=(h+l+c*2)/4;
hys:=llv(l,34);
var3:=hhv(h,34);
波段:ema((red-hys)/(var3-hys)*100,9),colorred,LINETHICK0;
b1:ema(0.667*ref(波段,1)+0.333*波段,2),colorgreen,LINETHICK0;
fillrgn(b1>80,b1,80),color000055;
fillrgn(波段<20,波段,20),color005500;
FILLRGN(波段>b1,波段,b1),colorred;
FILLRGN(波段<b1,波段,b1),colorgreen;
r1:=ema((red-hys)/(var3-hys)*100,31),colorwhite;
r2:=ema(r1,5),coloryellow;
PARTLINE(1,80),color0000aa;
PARTLINE(1,20),color00aa00;
20;
80;

引用:

公式名称: 发个公式
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-08-27
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

今天有空，发个公式！



ASR10:=(winner(C*1.1)-winner(C*0.9))*100;

CYW:=SUM(((CLOSE-LOW)/(HIGH-LOW)+(CLOSE-HIGH)/(HIGH-LOW))*VOL,10)/10000;
TAO:=100*(1-WINNER(C));
XA:=EMA(SMA((CLOSE-LLV(LOW,19))/(HHV(HIGH,19)-LLV(LOW,19))*100,8,1),3);
XC:=SMA(XA,2,1);
波段线:=XA,POINTDOT;

JJ:=AMOUNT/(100*VOL);
XD:=MAX(ABS(HIGH-JJ),ABS(JJ-LOW));
XE:=ABS((OPEN+CLOSE)/2-JJ);
XF:=(XD+XE)/JJ*100;
异动线:IF(XF>=5,0,-5),COLOR9966FF;
K1:=SUM(IF(CLOSE>=REF(CLOSE,1),VOL,0),8);
K2:=SUM(IF(CLOSE<REF(CLOSE,1),VOL,0),8);
K3:=K1/(K1+K2)*100;
K4:=EMA(K3,3);
K5:=EMA(K3,7);
KB:=EMA(VOL,3);
KC:=(KB-LLV(VOL,50))/(HHV(VOL,50)-LLV(VOL,50))*100;
KD:=EMA(KC,4);
KE:=EMA(KD,16);
KH:=(KE+K5)/4;
STICKLINE(ASR10<10 AND TAO>90,90,100,2,0),COLORBLUE;
STICKLINE(CYW>0,0,-5,4,0),COLORRED;
量顶A:STICKLINE(CROSS(KH,30),80,100,4,0),COLORGREEN;
量顶B:STICKLINE(CROSS(30,KH),70,100,4,0),COLOR6783DB;


A:=BARSCOUNT(C);
N1:=IF(A>5,5,A);
N2:=IF(A>15,15,A);
N3:=IF(A>30,30,A);
N4:=IF(A>60,60,A);
N5:=IF(A>120,120,A);
V1:=SUM(AMOUNT,N1);
V2:=SUM(AMOUNT,N2);
V3:=SUM(AMOUNT,N3);
V4:=SUM(AMOUNT,N4);
V5:=SUM(AMOUNT,N5);
活跃度60日:100*(V4/V5),STICK,LINETHICK2,COLORffee00;
活跃度30日:100*(V3/V5),STICK,LINETHICK2,COLORffBB00;
活跃度15日:100*(V2/V5),STICK,LINETHICK2,COLORff8800;
活跃度5日:100*(V1/V5),STICK,LINETHICK2,COLORff0000;
IF(A>0,0,0),LINETHICK0,COLOR0000FF;
IF(A>0,20,0),LINETHICK0,COLOR0000FF;
IF(A>0,40,0),LINETHICK0,COLOR0000FF;
IF(A>0,60,0),LINETHICK0,COLOR0000FF;
IF(A>0,80,0),LINETHICK0,COLOR0000FF;
活跃度60日,COLORFFFFFF;
活跃度30日,COLORFFFFFF;
活跃度15日,COLORFFFFFF;
活跃度5日,COLORFFFFFF;
HHVBARS(HIGH,100);
LLVBARS(HIGH,100);
hh:=HHV(h,N);
ll:=LLV(l,N);
pp:=hh-ll;
a1:=(h-ll)/pp*100;
a2:=(l-ll)/pp*100;
a3:=(o-ll)/pp*100;
a4:=(c-ll)/pp*100;


B0:=REF(C-O,2);B1:=REF(C,1);B2:=REF(C,2);B3:=REF(C,3);B4:=REF(C,4);
CMAX:=MAX(MAX(MAX(C,B1),B2),B3);CMIN:=MIN(MIN(MIN(C,B1),B2),B3);
STICKLINE(C=CMAX AND (B1>=B2 OR B1>=B3) OR B1=CMAX AND (B2=CMIN OR B3=CMIN) AND C>=B2 OR
B2=CMAX AND B3=CMIN AND C>=B1 OR B3=CMAX AND C>=B1 AND C>=B2,REF(a4,1),a4,5,0),COLORAE30E3;
STICKLINE(C=CMAX AND B1=CMIN,REF(a4,2),a4,5,0),COLORAE30E3;
STICKLINE(C=CMIN AND (B1<B2 OR B1<B3) OR B1=CMIN AND (B2=CMAX OR B3=CMAX) AND C<B2 OR
B2=CMIN AND B3=CMAX AND C<B1 OR B3=CMIN AND C<B1 AND C<B2,REF(a4,1),a4,5,0),COLORblue;
STICKLINE(B1=CMAX AND C=CMIN,REF(a4,2),a4,5,0),COLORblue;
STICKLINE(B1=CMIN AND C>=B2 OR (B2=CMIN AND B1<=B3 OR
B3=CMIN AND B1<=B2) AND B2<B4 AND C>=B1,REF(a4,1),REF(a4,2),5,0),COLORblue;
STICKLINE(B1=CMAX AND C<B2 OR (B2=CMAX AND B1>B3 OR
B3=CMAX AND B1>B2) AND B2>=B4 AND C<B1,REF(a4,1),REF(a4,2),5,0),COLORAE30E3;

引用:

公式名称: 魔鬼量
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-08-27
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

原码！



魔鬼量

VOL/100,VOLSTICK;
h5:ma(VOL/CAPITAL*100,5);
h10:ma(VOL/CAPITAL*100,10);
量比:vol/MA(VOL,5);
换手率:VOL/CAPITAL*100;
v5:MA(VOL/100,5),colorffffff;
v10:MA(VOL/100,10)coloryellow;
STICKLINE(换手率>3 , vol/100 ,CAPITAL*0.03/100 ,6 ,0),COLOR6633CC;
STICKLINE(换手率>5 , vol/100 ,CAPITAL*0.05/100 ,6 ,0),COLOR0000FF

引用:

VAR0:= SMA(MAX(CLOSE-REF(CLOSE,1),0),8,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),8,1)*100;
VAR1:=SMA(MAX(CLOSE-REF(CLOSE,1),0),N,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),N,1)*100;
卖1:stickline(CROSS(78,VAR0),80,100,5,0),colorGREEN;
卖2:stickline(CROSS(LH,VAR1),20,0,5,0) COLORGREEN;
买:DRAWICON(CROSS(VAR0,15),4,1);
底部线: (COST(55)-COST(45))*100/(COST(97)-COST(3));
牛熊线: (COST(65)-COST(35))*100/(COST(97)-COST(3)),COLORRED;
压力线: (COST(95)-COST(5))*100/(COST(97)-COST(3));
STICKLINE(WINNER(CLOSE)*100>=WINNER(OPEN)*100,WINNER(OPEN)*100,WINNER(CLOSE)*100,9,1),COLORRED;
STICKLINE(WINNER(OPEN)*100>WINNER(CLOSE)*100,WINNER(CLOSE)*100,WINNER(OPEN)*100,9,1),COLORGREEN;
STICKLINE(WINNER(CLOSE)*100>=WINNER(OPEN)*100,WINNER(CLOSE)*100,WINNER(HIGH)*100,0.5,1),COLORRED;
STICKLINE(WINNER(CLOSE)*100>=WINNER(OPEN)*100,WINNER(OPEN)*100,WINNER(LOW)*100,0.5,1),COLORRED;
STICKLINE(WINNER(OPEN)*100>WINNER(CLOSE)*100,WINNER(CLOSE)*100,WINNER(LOW)*100,0.5,1),COLORGREEN;
STICKLINE(WINNER(OPEN)*100>WINNER(CLOSE)*100,WINNER(OPEN)*100,WINNER(HIGH)*100,0.5,1),COLORGREEN;


强弱分界线: 50, ,pointdot LINETHICK2 COLORFFFF00;

Var3:=(2*CLOSE+HIGH+LOW)/4;
Var4:=LLV(LOW,34);
Var5:=HHV(HIGH,34);
主力:=EMA((Var3-Var4)/(Var5-Var4)*100,13);
散户:=EMA(0.667*REF(主力,1)+0.333*主力,2);
DRAWTEXT(CROSS(主力,散户) AND 主力<22,20,'起动'),LINETHICK2,COLOR0099ff;
DRAWICON(CROSS(主力,散户) AND 主力<22,25,10);
DRAWTEXT(CROSS(主力,30) AND 散户<主力,40,'上扬 '),LINETHICK2,color00ccff;
DRAWICON(CROSS(主力,30) AND 散户<主力,35,4);
DRAWTEXT(CROSS(主力,65) AND 散户<主力,55,'冲顶 '),LINETHICK2,COLOR9933ff;
DRAWICON(CROSS(主力,65) AND 散户<主力,70,11);
DRAWTEXT(CROSS(主力,75) AND 散户<主力,67,'小心被套'),LINETHICK2,color009900;
DRAWICON(CROSS(主力,75) AND 散户<主力,80,5);
DRAWTEXT(CROSS(散户,主力) AND 散户>75,80,'头部'), ,COLORblue;
DRAWICON(CROSS(散户,主力) AND 散户>75,85,11);
买入脉冲:IF(CROSS(主力,散户) AND 主力<35,15,-10),LINETHICK2,COLORGREEN;
卖出脉冲:IF(CROSS(散户,主力) AND 散户>75,85,110),LINETHICK2,COLORRED;
bb1:=WINNER(CLOSE)*100;
bb2:=100-bb1;
bb3:=ABS(bb1-bb2);
TD:=Backset(ISLASTBAR,1);
DRAWTEXT(TD AND bb1,bb1*0.9,'牛'),COLORRED,shift3;
DRAWTEXT(TD AND bb2,bb2*0.9,'熊'),COLORYELLOW,shift3;
DRAWTEXT(TD AND bb3,bb3*0.9,'马'),COLORMAGENTA,shift3;
STICKLINE(TD,bb1,0,20,0 ),COLORRED,shift2;
STICKLINE(TD,bb2,0,10,0 ),COLORYELLOW,shift2;
STICKLINE(TD,bb3,0,5,0),COLORMAGENTA,shift2;

n  6

lh   80

引用:

公式名称: 群龙无首
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-08-23
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

群龙无首原码



a1:(ema(amount/v/100,3)+ema(amount/v/100,6)+ema( amount/v/100,9))/3,COLOR00ff00;
a2:(ema(amount/v/100,5)+ema(amount/v/100,10)+ema( amount/v/100,20))/3,COLOR00ff00;
a3:(ema(amount/v/100,7)+ema(amount/v/100,14)+ema( amount/v/100,28))/3,COLOR00ff00;
a4:(ema(amount/v/100,9)+ema(amount/v/100,18)+ema( amount/v/100,36))/3,COLOR00ff00;
a5:(ema(amount/v/100,11)+ema(amount/v/100,22)+ema( amount/v/100,44))/3,COLOR00ff00;
a6:(ema(amount/v/100,13)+ema(amount/v/100,26)+ema( amount/v/100,52))/3,COLOR00ff00;
A:(EMA(AMOUNT/V/100,21)+EMA(AMOUNT/V/100,34)+EMA(AMOUNT/V/100,55))/3,LINETHICK2;
PARTLINE(A>REF(A,1),A),LINETHICK2,COLORRED;
STICKLINE(A>REF(A,1),o,c,3,0),COLORff00ff;
STICKLINE(A<REF(A,1),o,c,3,1),COLORff0000;

a7:a-(a1-a),coloryellow;
a8:a-(a2-a),coloryellow;
a9:a-(a3-a),coloryellow;
a10:a-(a4-a),coloryellow;
a11:a-(a5-a),coloryellow;
a12:a-(a6-a),coloryellow

引用:

公式名称: MYPL
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-08-23
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

网友要的MYPL公式原码



DBIAS:=(indexC-ma(indexC,13))/ma(indexC,13)*100;
大盘底部:if(ref(DBIAS,1)<-5 and DBIAS>-5,100,0),stick,linethick3,coloryellow;
stickline(DBIAS<-5,50,0,4,0),color0099cc;
GBIAS:=(C-ma(C,13))/ma(C,13)*100;
个股底部:if(ref(GBIAS,1)<-8 and GBIAS>-8,80,0),stick,linethick2,colorffff11;
stickline(GBIAS<-8,30,0,3,0),colorff9900;
VarA:=IF(REF(L,1)<=LLV(L,120) and HHV(C,120)/LLV(C,120)>1.25 and C>O and HIGH>LOW+0.04,4,0);
探底:if(VarA>0,-40,0),color00ff00,stick,linethick3;
VarB:=sma(abs(l-ref(l,1)),3,1)/sma(max(l-ref(l,1),0),3,1);
VarC:=ema(if(c< ema(c,250),varB*1000,varB*10),3);
VarD:=ema(if(l<=llv(l,30),varC/2+hhv(varC,30),0),3)/618;
if(VarD>100,-25,0),stick,color99ffcc,linethick3;
Var1:=AMOUNT/VOL/100;
Var2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
Var3:=SUM(AMOUNT,7)/Var1/100;
Var4:=DMA(Var2,VOL/Var3);
Var5:=(CLOSE-Var4)/Var4*100;
Var6:=MA(Var5,20)+STD(Var5,20);
Var7:=MA(Var5,20)+1.732*STD(Var5,20);
BIAS21:=(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100;
Var8:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
K1:=SMA(Var8,3,1);
D1:=SMA(K1,3,1);
J1:=3*K1-2*D1;
Var9:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K2:=SMA(Var9,3,1);
D2:=SMA(K2,3,1);
J2:=3*K2-2*D2;
STICKLINE(REF(BIAS21,1)>=5 AND CROSS(Var6,Var5) AND REF(J1,1)>80 AND REF(J2,1)>80,100,0,4,0),colorblue;
STICKLINE(REF(BIAS21,1)>=5 AND CROSS(Var7,Var5) AND REF(J1,1)>80 AND REF(J2,1)>80 ,100,0,4,0),colorblue;
Var10:=REF(CLOSE,1.5);
Var11:=SMA(MAX(CLOSE-Var10,0),6,1)/SMA(ABS(CLOSE-Var10),6,1)*100;
STICKLINE((REF(Var11,1)>80) and (Var11<79),70,0,4,0),colorddddff;
Var12:=REF(CLOSE,1);
Var13:=SMA(MAX(CLOSE-Var12,0),6,1)/SMA(ABS(CLOSE-Var12),6,1)*100;
STICKLINE(CROSS(84,Var13),50,0,4,0),colorffcc00;
a1:=llv(h,250);
myp:100*(c-a1)/a1,colorff00ff;
a2:=hhv(h,250);
myl:100*(a2-c)/c,color66ff33;
a3:=ref(hhv(indexc,30),1);
b3:=ref(llv(indexc,30),1);
大盘趋势:100*(indexc-b3)/(a3-b3),colorred;
a4:=ref(hhv(c,30),1);
b4:=ref(llv(c,30),1);
个股趋势:100*(c-b4)/(a4-b4),colorwhite;
底线:0,colorgreen;
顶线:100,colorgreen;

引用:

公式名称: CYC
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-08-22
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

网友要找的CYC指标！



CYC5:EMA(AMOUNT,5)/EMA(VOL,5)/100;
CYC13:EMA(AMOUNT,13)/EMA(VOL,13)/100;
CYC34:EMA(AMOUNT,34)/EMA(VOL,34)/100;
CYC55:EMA(AMOUNT,55)/EMA(VOL,55)/100;
CYC89:EMA(AMOUNT,89)/EMA(VOL,89)/100;
CYC∞: DMA(AMOUNT/VOL/100,VOL/CAPITAL);

引用:

公式名称: MACD交易
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-06-23
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

MACD交易



DIFF: EMA(CLOSE,12) - EMA(CLOSE,26),COLORYELLOW,LINETHICK2;
DEA1:=EMA(DIFF,9);0.10;
MACD: 2*(DIFF-DEA1),LINETHICK0;
STICKLINE(MACD>0,0,MACD,8,1),COLORRED;
STICKLINE(MACD<0,0,MACD,8,1),COLORCYAN;
DEA: EMA(DIFF,9),COLORGREEN;
PARTLINE(DIFF>DEA,DIFF),COLORff11cc,LINETHICK2;
PARTLINE(DIFF>DEA AND DIFF<0,DIFF),COLORred,LINETHICK2;
DRAWICON(CROSS(DIFF,DEA),DIFF-0.01,6);
DRAWICON(CROSS(DEA,DIFF),DIFF,11);
V1:=EMA(EMA(CLOSE,n),n);
V2:=100*WINNER(CLOSE*0.95);
控盘力度:(V1-REF(V1,1))/REF(V1,1)*10,colorwhite,LINETHICK1;
无庄控盘:IF(控盘力度<0,控盘力度,0),LINETHICK2,COLOR00ff00,STICK;
有庄控盘:IF(控盘力度>REF(控盘力度,1) AND 控盘力度>0,控盘力度,0),LINETHICK2,COLORff00ff,STICK;
主力减仓:IF(控盘力度< REF(控盘力度,1) AND 控盘力度>0,控盘力度,0),LINETHICK2,COLOrBLUE,STICK;
高度控盘:IF(V2>50 AND COST(85)< CLOSE AND 控盘力度>0,控盘力度,0),LINETHICK2,COLORRED,STICK;
开始控盘:IF(CROSS(控盘力度,0),0.2,0),LINETHICK2,COLORFF00FF;
Var1:=EMA(CLOSE,34)-EMA(CLOSE,5);
Var2:=EMA(Var1,5);
趋势:=(-3)*(Var1-Var2), COLORSTICK;
趋势,colorred;
长期趋势:EMA(Var1,10)*(-1);
EXPLAIN(趋势>0,'Z线趋势上升中\n');
EXPLAIN(趋势<0,'Z线趋势下降中\n');
EXPLAIN(cross(趋势,0),'Z线考虑买入\n');
EXPLAIN(cross(0,趋势),'Z线考虑卖出\n');
Var11:=ma((v/(h-l)),4);
Var33:=abs(c-o);
Var44:=v/(h-l);
EXPLAIN(Var44<var11 AND Var33<ma(Var33,4),'资金无入场意愿，萎缩中\n');
EXPLAIN(Var44<var11 AND Var33>ma(Var33,4),'场内资金运作行为\n');
EXPLAIN(Var44>var11 AND Var33<ma(Var33,4),'多空双方激烈争夺中\n');
EXPLAIN(Var44>var11 AND Var33>ma(Var33,4),'场外资金介入（或出局）意愿强烈\n');
TR := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SUM(IF(HD>0 AND HD>LD,HD,0),14);
DMM:= SUM(IF(LD>0 AND LD>HD,LD,0),14);
PDI:= DMP*100/TR;
MDI:= DMM*100/TR;
ADX:= MA(ABS(MDI-PDI)/(MDI+PDI)*100,6);
ADXR:=(ADX+REF(ADX,6))/2;
EXPLAIN(cross(pdi,mdi),'PDI线从下向上突破MDI线，显示有新多头进场，为买进信号\n');
EXPLAIN(cross(mdi,pdi),'PDI线从上向下跌破MDI线，显示有新空头进场，为卖出信号\n');
EXPLAIN(adx>ref(adx,1),'ADX值持续高于前一日，行情将维持原趋势\n');
EXPLAIN(adx<ref(adx,1) and adx<20,'ADX值递减，降到20以下，且横向行进时，市场气氛为盘整\n');
EXPLAIN(adx<ref(adx,1) and ref(adx,1)<ref(adx,2) and ref(adx,2)>ref(adx,3) and ref(adx,3)>ref(adx,4),'ADX值从上升倾向转为下降时，表明行情即将反转\n');
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;
EXPLAIN(1=1,'下面为:macd,KDJ,CCI,W&R,RSI,MTM等指标的判断:');
EXPLAINEX(1=1,'（中标）macd=',macd,2,1);
EXPLAIN(macd>0 and diff>0,'大势属多头市场\n');
EXPLAIN(macd>0.35,'超买中，随时有可能见顶回落\n');
EXPLAIN(macd<0 and diff<0,'大势属空头市场\n');
EXPLAIN(macd<-0.35,'超卖中，随时有可能反弹\n');
EXPLAIN(cross(diff,dea) and cross(macd,0),'上穿o轴，可考虑买入\n');
EXPLAIN(cross(j,k) and k<50,'KDJ金叉\n');
EXPLAIN(cross(k,d) and k>70,'KDJ死叉\n');
EXPLAIN(j>84,'KDJ指标高位');EXPLAIN(j<16,'KDJ指标低位\n');
TYP := (HIGH + LOW + CLOSE)/3;
cci:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
EXPLAIN(cci<-180,'CCI指标底位，买入机会\n');
EXPLAIN(cci>180,'CCI指标高位，卖出机会\n');
EXPLAINEX(1=1,'（短标）cci=',cci,2,1);
EXPLAINEX(1=1,'换手率=',vol/CAPITAl*100,2,1);
explain((vol/CAPITAl)>0.075,'换手过大，小心主力出逃，短期头部\n');
wr:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
EXPLAINEX(1=1,'威廉指标（短标）=',wr,2,1);
explain(wr>-20,'W&R超买，短线即将见顶，应及时卖出\n');
explain(wr<-80,'W&R超卖，短线即将见底，应伺机买进\n');
MTM := CLOSE-REF(CLOSE,6);
MTMMA := MA(MTM,6);
EXPLAIN(CROSS(MTM,MTMMA) and MTMMA<-0.8,'MTM从下向上突破MTMMA，买入信号\n');
EXPLAIN(CROSS(MTMMA,MTM) and MTMMA>0.8,'MTM从上向下跌破MTMMA，卖出信号\n');

LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
EXPLAINEX(1=1,'相对强弱RSI1=',RSI1,2,1);
EXPLAIN(RSI1>85,'6日RSI超买,防止回挡\n');
EXPLAIN(RSI1>80,'6日RSI向上突破85，超买,考虑卖出\n');
EXPLAIN(RSI1<15,'6日RSI超卖,随时有可能反弹\n');
EXPLAIN(RSI1<15,'6日RSI向下跌破15，超卖，考虑买入\n');
EXPLAIN(CROSS(RSI1,15),'6日RSI向上突破15，买进信号\n');
EXPLAIN(CROSS(RSI1,85),'6日RSI向下跌破85，卖出信号\n');
psy:=COUNT(CLOSE>REF(CLOSE,1),12)/12*100;
EXPLAINEX(1=1,'12天心理线,PSY=',psy,2,1);
EXPLAINEX(1=1,'获利盘比例=',WINNER(c)*100,2,1);
EXPLAINEX(1=1,'套牢盘比例=',100-WINNER(c)*100,2,1);
Aa:=(EMA(C,30)*2+MA(C,60))/3;
Ra:=(VOL*CLOSE);
VL1a:=EMA(Ra,13)/EMA(VOL,13);
VL2a:=EMA(Ra,60)/EMA(VOL,60);
VLa:=EMA((VL1a+VL2a)/2,3);
分水岭:=ma((Aa+VLa)/2,1);
EXPLAINEX(1=1,'分水岭（中长标）=',分水岭,2,1);
EXPLAIN(close>分水岭,'股价在分水岭之上,大势属多头,可积极做多\n');
EXPLAIN(close<分水岭,'股价在分水岭之下,大势属空头,超跌只能抢反弹\n');
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
UPR:=BBI+3*STD(BBI,10);
DWN:=BBI-3*STD(BBI,10);
var55:=(UPR-DWN)/UPR<0.03;
var56:=(UPR-DWN)/UPR>0.18;
var57:=(ma(c,60)-ma(c,5))/ma(c,60)>0.15;
var58:=(ma(c,5)-ma(c,60))/ma(c,5)>0.15;
EXPLAIN(var55,'多空布林收敛中，有变盘的可能，上下自己分析\n');
EXPLAIN(var57 and var56 and c>o ,'布林上下乖离太大，有反弹的可能\n');
EXPLAIN(var58 and var56 and c<o ,'布林上下乖离太大，有回落的可能\n');

N     20   1    30

引用:

公式名称: 股价走势+逢高减磅
适用软件: 飞狐
发 表 人: 赤影     
发表日期: 2004-08-11
发表网址: http://www.li20.net/viewthread.p ... ght=%2B%B3%E0%D3%B0

引用:

股价走势原码！



{n  25  1  100}

VAR1:=(3*CLOSE+O+HIGH+LOW)/6;
VAR2:=CLOSE-LLV(VAR1,N);
VAR3:=HHV(VAR1,N)-LLV(VAR1,N);
股价走势:VAR2/VAR3*100,COLORRED ;
周势:EMA(股价走势,5),COLORWHITE;
月势:EMA(股价走势,21),COLORFF00FF,LINETHICK2;
{趋势支撑:EMA(股价走势线,55),COLORGRAY;}
底部区域禁线:5,COLORGRAY,LINETHICK2;
底部辅助确认:15,POINTDOT,COLORWHITE;
风险区域禁线:95 ,COLORFF99FF ;
风险辅助确认:70,POINTDOT ,COLORWHITE;
强弱中轴界:50,POINTDOT ,COLORYELLOW;

引用:

逢高减磅



STICKLINE(c>=o ,c,o,7,0),color0033ff;
STICKLINE(c>=o ,c,o,6,0),color0066ff;
STICKLINE(c>=o ,c,o,5,0),color0099ff;
STICKLINE(c>=o ,c,o,4,0),color00ccff;
STICKLINE(c>=o ,c,o,2,0),color00ffff;
STICKLINE(c>=o ,h,l,1,0),color00ffff;
STICKLINE(c<o ,c,o,8,0),colorff0066;
STICKLINE(c<o ,c,o,7,0),colorff3366;
STICKLINE(c<o ,c,o,6,0),colorff6666;
STICKLINE(c<o ,c,o,5,0),colorff9966;
STICKLINE(c<o ,c,o,4,0),colorffcc66;
STICKLINE(c<o ,c,o,2,0),colorffff66;
STICKLINE(c<o ,h,l,1,0),colorffff66;

龙10:COST(10),COLORBLUE;
龙33:COST(33),COLORCCCC00;

龙50:COST(50),COLORGREEN;

龙66:COST(66),COLOR0066FF;
龙90:COST(90),COLORRED;
c1:=sma(ema(AMOUNT,1)/ema(v,1)/100,2,1);
c3:=sma(ema(AMOUNT,3)/ema(v,3)/100,2,1);
c6:=sma(ema(AMOUNT,6)/ema(v,6)/100,2,1);
c7:=sma(ema(AMOUNT,7)/ema(v,7)/100,2,1);
STICKLINE(c1>=c6,c1,c6,8,0),COLORRED;
STICKLINE(c1>=c6,c7,c3,0,0),COLORRED;
STICKLINE(c1<=c6,c1,c6,8,0),COLORGREEN;
STICKLINE(c1<=c6,c7,c3,0,0),COLORGREEN;
均价:=(HIGH+4*LOW+OPEN+CLOSE)/7;
均价差:= EMA(均价,13) - EMA(均价,34);
移动均价:= EMA(均价差,5);
差:=(均价差-移动均价)*5;
A:=IF(差>=1000 ,1000 ,IF(差<=均价,均价,差) );
分水岭:forcast(forcast(A,31),10),linethick2,color009900;
上涨:if(A>分水岭,A,分水岭),colorred;
下跌:if(A<分水岭,A,分水岭),colorblue;
Var1:=BARSCOUNT(CLOSE);
Var2:=(HHV(HIGH,200)-LLV(LOW,200))/40;
STICKLINE(Var1/30=FLOOR(Var1/30),HIGH+Var2,HIGH+Var2*4,8,0), ,COLORYELLOW;
STICKLINE(Var1/30=FLOOR(Var1/30),HIGH+Var2,HIGH+Var2*3,8,0), , COLORRED;
Var4:=LLV(LOW,10);
Var5:=HHV(HIGH,25);

动力线:= EMA((CLOSE-Var4)/(Var5-Var4)*4,4);
DRAWTEXT(CROSS(动力线,2.8),h*1.05,'小心 '),colorwhite;
DRAWTEXT(CROSS(动力线,3.2),h*1.1,'逢高减磅'), colorred;
DRAWTEXT(CROSS(动力线,3.5),h*1.15,'再小心 '),colorgreen ;


jj:=(h+l+c)/3;
if(jj>0.05,jj,jj),colorgreen;{全天的成交重心}
Var6:=MA(c,5);
Var7:=MA(c,10);
Var8:=MA(c,20);
Var9:=MA(c,30);
h1a:=(var6+var7+var8+var9)/4;
ma(h1a,5),color1100ff;
ma(h1a,6),color3300ff;
ma(h1a,7),color3322ff;
ma(h1a,8),color3344ff;
ma(h1a,9),color3366ff;
ma(h1a,10),color3388ff;
ma(h1a,11),color33aaff;
ma(h1a,13),color00ccff,pointdot,linethick2;
ma(h1a,15),color33bbff;
ma(h1a,16),color3399ff;
ma(h1a,17),color3377ff;
ma(h1a,18),color3355ff;
ma(h1a,19),color3333ff;
ma(h1a,20),color3311ff;
ma(h1a,21),color2200ff;

v1:ema(LOW,6);
v2:ema(ema(LOW,18)*1.03,26)-0.16;
DRAWICON(cross(v1,v2),v1,1);