查看完整版本: 财智论坛版主清风斜阳搜集编制系列指标

清风斜阳 2005-3-17 19:08

L罗氏看盘

Var1:=100*VOL/CAPITAL;
Var2:=100*(WINNER(CLOSE)-REF(WINNER(CLOSE),1));
筹码穿透率: Var2/Var1, VOLSTICK;
获利盘: WINNER(CLOSE)*100;
换手率: VOL/CAPITAL*100;
每股收益: FINANCE(33);
流通盘: CAPITAL/1000000;
20, linethick1, colorffff00;
环保区: 获利盘<1*50, STICK;
地雷区: 获利盘>95*50, LINESTICK;
我破解不成功,缺环保区、地雷区竖柱显示,凡请补齐。




{L罗氏看盘}
Var1:=100*VOL/CAPITAL;
Var2:=100*(WINNER(CLOSE)-REF(WINNER(CLOSE),1));
筹码穿透率: Var2/Var1, VOLSTICK;
获利盘: WINNER(CLOSE)*100;
换手率: VOL/CAPITAL*100;
每股收益: FINANCE(33);
流通盘: CAPITAL/1000000;
20, linethick1, colorffff00;
环保区:( 获利盘<1)*50, STICK;
地雷区: (获利盘>95)*50, LINESTICK;

清风斜阳 2005-3-17 19:09

财智论坛版主清风斜阳搜集编制系列指标

{ MTM动力     pj}

技术指标公式:A绝路标  缺省周期:日线
=======================================================================================
Var1:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*80;
B: SMA(Var1,7,1);
Var2:=SMA(B,5,1);
E: IF(CROSS(B,Var2) AND B<40,Var2*2,Var2);
STICKLINE(B>Var2,B,E,0,0), , [00010001];
STICKLINE(B<Var2,B,Var2,0,0), , [00010001];
=======================================================================================
注意:航标的长短和保险系数有一定的关系,股价处在绝对底部,航标会很短,但保险系数更高;股价在次高位时出现航标,航标会同比增长,越长的航标反而越没有短航标成功率高!
=======================================================================================

清风斜阳 2005-3-17 19:10

财智论坛版主清风斜阳搜集编制系列指标

{gg2000    pj     有未来涵数}

技术指标公式:HGZ1 (多空争夺买卖点)  缺省周期:日线
=======================================================================================
参数描述: P(1,100,11)
=======================================================================================
Var1:=1020630;
Var2:=IF(DATE<=Var1,1,0);
Var3:=ZIG(2,P)>REF(ZIG(2,P),1) AND REF(ZIG(2,P),1)<REF(ZIG(2,P),2)*Var2;
Var4:=ZIG(1,P)<REF(ZIG(1,P),1) AND REF(ZIG(1,P),1)>REF(ZIG(1,P),2)*Var2;
Var5:=ZIG(2,18)>REF(ZIG(2,18),1) AND REF(ZIG(2,18),1)<REF(ZIG(2,18),2)*Var2;
Var6:=ZIG(1,18)<REF(ZIG(1,18),1) AND REF(ZIG(1,18),1)>REF(ZIG(1,18),2)*Var2;
Var7:=ZIG(2,28)>REF(ZIG(2,28),1) AND REF(ZIG(2,28),1)<REF(ZIG(2,28),2)*Var2;
Var8:=ZIG(1,28)<REF(ZIG(1,28),1) AND REF(ZIG(1,28),1)>REF(ZIG(1,28),2)*Var2;
Var9:=Var3*Var2;
VarA:=Var4*Var2;
多头卒: Var3*Var2, , [00050001];
空头卒: Var4*Var2, , [00050001];
DRAWICON(Var9,Var9,1)*Var2;
DRAWICON(VarA,VarA,2)*Var2;
=======================================================================================
声明!本指标有黄、施工作室专用指标(使用时间由本组指定时间内使用,其它时间将不会显示该指标)
如需用者可向E-mail:hgz066@163.com或13506228311、0512-58282760申请方可使用。
注:此指标是收费使用,到期不交费将自动仃止。

清风斜阳 2005-3-17 19:11

财智论坛版主清风斜阳搜集编制系列指标

Var1:=9991020;
Var2:=EMA(MA(IF(CLOSE>OPEN,(CLOSE-OPEN)*VOL,IF(CLOSE<OPEN,(CLOSE-OPEN)*VOL,0)),5),1);
Var3:=EMA(MA(IF(CLOSE>REF(CLOSE,1),(CLOSE-REF(CLOSE,1))*VOL,IF(CLOSE<REF(CLOSE,1),(CLOSE-REF(CLOSE,1))*VOL,0)),5),1);
Var4:=EMA(MA(IF(OPEN>REF(CLOSE,1),(OPEN-REF(CLOSE,1))*VOL,IF(OPEN<REF(CLOSE,1),(OPEN-REF(CLOSE,1))*VOL,0)),5),1);
Var5:=EMA(MA(IF(CLOSE<OPEN,(OPEN-CLOSE)*VOL,IF(CLOSE>OPEN,(OPEN-CLOSE)*VOL,0)),10),1);
Var6:=EMA(MA(IF(CLOSE<REF(CLOSE,1),(REF(CLOSE,1)-CLOSE)*VOL,IF(CLOSE>REF(CLOSE,1),(REF(CLOSE,1)-CLOSE)*VOL,0)),10),1);
Var7:=EMA(MA(IF(OPEN<REF(CLOSE,1),(REF(CLOSE,1)-OPEN)*VOL,IF(OPEN>REF(CLOSE,1),(REF(CLOSE,1)-OPEN)*VOL,0)),10),1);
Var8:=CLOSE>OPEN;
Var9:=CLOSE>REF(CLOSE,1);
VarA:=OPEN>REF(CLOSE,1);
VarB:=Var8 OR Var9 OR VarA;
VarC:=IF(DATE<Var1,(Var2+Var3+Var4)/3/100,0);
VarD:=IF(DATE<Var1,(Var5+Var6+Var7)/3/100,0);
VarE:=IF(DATE<Var1,EMA((COUNT(Var9,12)/12+COUNT(Var8,12)/12+COUNT(VarA,12)/12)/3*MA(VarC,5)*2*1.1,2),0);
VarF:=VarD>0 OR VarC<VarE;
Var10:=VarD>0 AND VarC>VarE;
Var11:=VarD<0 AND CROSS(VarC,VarE);
Var12:=VarD>0 AND CROSS(VarC,VarE);
Var13:=VarD<0 AND VarC>VarE AND (CLOSE+OPEN)/2>MA(CLOSE,5);
Var14:=VarF AND (CLOSE+OPEN)/2<MA(CLOSE,5) OR CLOSE<MA(CLOSE,30);
Var15:=Var13 AND Var14;
Var16:=ABS(VarC-VarD);
Var17:=ABS(VarE-VarD);
Var18:=ABS(0-VarD);
Var19:=ABS(0-VarE);
Var1A:=IF(VarD<0 AND VarC>VarE AND (CLOSE+OPEN)/2>MA(CLOSE,5),ABS(VarC-VarD),0);
Var1B:=IF(VarF AND (CLOSE+OPEN)/2<MA(CLOSE,5) OR CLOSE<MA(CLOSE,30),ABS(VarE-VarD),0);
Var1C:=IF(DATE<Var1,IF(NOT(Var15),ABS(VarE-VarD),0),0);
Var1D:=MAX(Var1C,MAX(Var1A,Var1B));
Var1E:=MAX(Var16,MAX(Var17,MAX(Var18,Var19)));
Var1F:=MIN(Var16,MIN(Var17,MIN(Var18,Var19)));
Var20:=MAX(VarC,MAX(VarD,VarE));
Var21:=MIN(VarC,MIN(VarD,VarE));
Var22:=(VarC+VarD+VarE)/3;
Var23:=Var16 OR Var18 OR Var19;
Var24:=Var17 OR Var18;
Var25:=Var17;
Var26:=VarD<0 AND VarC>VarE AND (CLOSE+OPEN)/2>MA(CLOSE,5);
Var27:=VarF AND (CLOSE+OPEN)/2<MA(CLOSE,5) OR CLOSE<MA(CLOSE,30);
Var28:=IF(VarD<0 AND VarC>VarE AND (CLOSE+OPEN)/2>MA(CLOSE,5) AND REF(Var27,1),ABS(VarC-VarD),0);
Var29:=REF(Var1B,1)<>0 OR REF(Var1C,1)<>0;
Var2A:=REF(Var1B,1)<>0 AND REF(Var1C,1)<>0;
Var2B:=Var1C=Var1D AND REF(Var1A,1)<>0;
安全区(持有): IF(DATE<Var1,STICKLINE(Var26,VarC,VarD,1,1),0), , COLOR3333FF;
风险区(出局): IF(DATE<Var1,STICKLINE(NOT(Var15),VarE,VarD,1,1),0), , COLORYELLOW;
观望区(空仓): IF(DATE<Var1,STICKLINE(Var27,VarE,VarD,1,1),0), , COLORBLUE;
↓:出局: IF(DATE<Var1,STICKLINE(Var27 AND NOT(Var15) AND REF(Var1A,1),VarE,VarD,1,1),0), , COLORYELLOW;
↑:行情: IF(DATE<Var1,STICKLINE(Var13 AND CLOSE>MA(CLOSE,5),0,VarD,1,1),0), , COLORRED;
§:反弹: IF(DATE<Var1,STICKLINE(Var10,0,VarE,1,1),0), , COLORRED;
IF(DATE<Var1,STICKLINE(Var2B,Var20,Var21,1,1),0), , COLORYELLOW;
DRAWTEXT(Var2B,Var1C*0.7,'↓'), , COLORWHITE;
DRAWTEXT(Var12 OR Var11,Var22,'§'), , COLORFFFFCC;
DRAWTEXT(Var28,Var21,'↑'), , COLORGREEN;
DRAWTEXT(DATE=Var1,100,'请购买正式版!电话:13588101993 联系人:林彭生 网址:[url]http://linhuihong.3322.net[/url]'), , COLORRED;
林彭生创作: 0, , ;

清风斜阳 2005-3-17 19:12

财智论坛版主清风斜阳搜集编制系列指标

{jianha    pj}

{D多空分歧    多空产生分歧,很容易会变盘!}
Var1:=WINNER(CLOSE);
Var2:=WINNER(REF(CLOSE,1));
Var3:=REF(Var1,1);
Var4:=Var1-Var2;
Var5:=Var1-Var3;
Var6:=Var3-Var2;
Var7:=REF(Var4+Var1,1);
Var8:=SUM(Var4,0);
Var9:=(Var8-LLV(Var8,9))/(HHV(Var8,9)-LLV(Var8,9))*100;
VarA:=SMA(Var9,3,1);
VarB:=SMA(VarA,3,1);
VarC:=3*VarA-2*VarB;
VarD:=SUM(Var5,0);
VarE:=(VarD-LLV(VarD,9))/(HHV(VarD,9)-LLV(VarD,9))*100;
VarF:=SMA(VarE,3,1);
Var10:=SMA(VarF,3,1);
Var11:=3*VarF-2*Var10;
Var12:=VarC-Var11;
MA3: MA(Var12,3), , COLORMAGENTA;
Var13:=ABS(INTPART(Var12/10))+1;
多空分歧1: STICKLINE(Var12>0,Var12,0,Var13,0), ,  COLORRED;
多空分歧2: STICKLINE(Var12<=0,Var12,0,Var13,0), , COLORGREEN;



{多空分歧D   多空产生分歧,很容易会变盘!}
Var1:=WINNER(CLOSE);
Var2:=WINNER(REF(CLOSE,1));
Var3:=REF(Var1,1);
Var4:=Var1-Var2;
Var5:=Var1-Var3;
Var6:=Var3-Var2;
Var7:=REF(Var4+Var1,1);
Var8:=SUM(Var4,0);
Var9:=(Var8-LLV(Var8,9))/(HHV(Var8,9)-LLV(Var8,9))*100;
VarA:=SMA(Var9,3,1);
VarB:=SMA(VarA,3,1);
VarC:=3*VarA-2*VarB;
VarD:=SUM(Var5,0);
VarE:=(VarD-LLV(VarD,9))/(HHV(VarD,9)-LLV(VarD,9))*100;
VarF:=SMA(VarE,3,1);
Var10:=SMA(VarF,3,1);
Var11:=3*VarF-2*Var10;
Var12:=VarC-Var11;
MA3: MA(ABS(Var12),3), , COLORMAGENTA;
Var13:=ABS(INTPART(Var12/10))+1;
多空分歧1: STICKLINE(Var12>0,Var12,0,Var13,0), ,  COLORRED;
多空分歧2: STICKLINE(Var12<=0,(-1)*Var12,0,Var13,0), , COLORGREEN;

蝶恋花 2005-3-17 19:12

建议写源码时禁用Smilies

谢谢

清风斜阳 2005-3-17 19:12

筹码分析

技术指标公式:2筹码分析 (*****95.05%=1938上轨道 下轨道 筹码 提示) 缺省周期:日线
参数描述: N(1,100,12)N2(-30,0,-25)N3(1,10,6)N4(1,100,95)M(34,10,55)
Var3:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;
筹码: MA((CLOSE-REF(OPEN,M))/REF(OPEN,M),1)*100,pointdot,colorblue;
筹码差: MA(筹码,10),pointdot;
Var5:=VOL/CAPITAL*100;
上轨道: SUM(Var5,30);
下轨道: REVERSE(SUM(Var5,30));
跌筹比: 筹码/下轨道, COLORSTICK;
STICKLINE(筹码>0,筹码*1.9,0,3,0),colorblue;
STICKLINE(筹码<0,筹码*1.9,0,3,0),colorblue;
STICKLINE(筹码>筹码差,筹码*1.9,筹码差*1.9,3,1),colorred;
STICKLINE(筹码<筹码差,筹码*1.9,筹码差*1.9,3,1),colorgreen;
提示: STICKLINE(跌筹比>1 AND 筹码<N2,跌筹比*20,0,1,1),colorcyan;
VarE:=IF(跌筹比>1,10,0);
VarF:=CLOSE<0.98*REF(CLOSE,1);
买入:=if(跌筹比>N4/100 AND 筹码<N2 AND Var3>5.5  OR COUNT(跌筹比>N4/100 AND 筹码<N2 AND Var3>5.5 ,N) AND VarF,1,0);
STICKLINE(买入,45,0,6,0);
DRAWTEXT(跌筹比>N4/100 AND 筹码<N2 AND Var3>6 ,40,'买'),colorff00ff;
DRAWTEXT(COUNT(跌筹比>N4/100 AND 筹码<N2 AND Var3>5.5 ,N) AND CLOSE<0.95*REF(CLOSE,1),30,'震'),colorred;
DRAWTEXT(COUNT(跌筹比>N4/100 AND 筹码<N2 AND Var3>5.5 ,N) AND CLOSE<0.98*REF(CLOSE,1) AND CLOSE>0.96*REF(CLOSE,1),40,'打'),colorgreen;
DRAWTEXT(COUNT(跌筹比>N4/100 AND 筹码<N2 AND Var3>5.5 ,N) AND CLOSE<0.96*REF(CLOSE,1) AND CLOSE>0.94*REF(CLOSE,1),40,'压'),colorgreen;
STICKLINE(VarE>0 AND Var3>4.9 AND 跌筹比>1 AND 筹码<下轨道 AND 筹码<N2,0,40,6,0);
-------

清风斜阳 2005-3-17 19:13

财智论坛版主清风斜阳搜集编制系列指标

{wwgs   pj}

技术指标公式:GJL (海岛过江龙)  缺省周期:日线
=======================================================================================
参数描述: N(1,100,9)M(1,100,6)
=======================================================================================
ROC: (CLOSE-REF(CLOSE,N))/REF(CLOSE,N)*100, , [00050001];
AVG: MA(ROC,M), , [00070001];
Var1:=EMA(AVG-ROC*2,15);
DIR: IF(Var1>AVG,0,AVG), , [00070001];
1.3*(ROC-AVG), , [00040003];
0, , [00010001];
=======================================================================================

清风斜阳 2005-3-17 19:14

财智论坛版主清风斜阳搜集编制系列指标

{ wdf988      pj}

技术指标公式:看盘指标 ([url]http://www.88gs.com[/url] 分析家公式网会员使用)  缺省周期:日线
=======================================================================================
IF(DATE<1090701,0,100000);
Var1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
Var2:=2*ABS(Var1);
Var3:=100-(100-3*SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,20,1),15,1));
Var4:=100-(100-3*SMA((OPEN-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,20,1),15,1));
Var5:=(HIGH+LOW+CLOSE)/3;
Var6:=(Var5-MA(Var5,10))/(0.015*AVEDEV(Var5,10));
Var7:=(Var5-MA(Var5,30))/(0.015*AVEDEV(Var5,30));
Var8:=IF(Var6>=150 AND Var6<200 AND Var7>=150 AND Var7<200,10,0);
Var9:=IF(Var6<=-150 AND Var6>-200 AND Var7<=-150 AND Var7>-200,-10,Var8);
VarA:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VarB:=100-ABS(VarA);
VarC:=3*SMA((INDEXC-LLV(INDEXL,55))/(HHV(INDEXH,55)-LLV(INDEXL,55))*100,20,1)-2*SMA(SMA((INDEXC-LLV(INDEXL,55))/(HHV(INDEXH,55)-LLV(INDEXL,55))*100,20,1),15,1);
VarD:=3*SMA((INDEXO-LLV(INDEXL,55))/(HHV(INDEXH,55)-LLV(INDEXL,55))*100,20,1)-2*SMA(SMA((INDEXO-LLV(INDEXL,55))/(HHV(INDEXH,55)-LLV(INDEXL,55))*100,20,1),15,1);
VarE:=REF(LOW,1)*0.9;
VarF:=LOW*0.9;
Var10:=(VarF*VOL+VarE*(CAPITAL-VOL))/CAPITAL;
Var11:=EMA(Var10,30);
Var12:=Var11-CLOSE;
Var13:=REF(CLOSE,1);
Var14:=SMA(MAX(CLOSE-Var13,0),7,1)/SMA(ABS(CLOSE-Var13),7,1)*100;
Var15:=SMA(MAX(CLOSE-Var13,0),13,1)/SMA(ABS(CLOSE-Var13),13,1)*100;
Var16:=BARSCOUNT(CLOSE);
Var17:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100;
Var18:=((-100)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+50)*2;
Var19:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
Var1A:=(SMA(Var19,4,1)-50)*2;
Var1B:=SMA(Var1A,3,1);
Var1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
Var1D:=SMA(Var1C,4,1);
Var1E:=SMA(Var1D,3,1);
Var1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
Var20:=IF(Var17<=25 AND Var18<-95 AND Var1F>20 AND Var1B<-30 AND Var1E<30 AND Var12>=-0.25 AND Var14<22 AND Var15<28 AND Var16>50,80,0);
大趋势: Var3, , [00010001];
顶线: IF(VarB<90,VarB,100);
多方: IF(Var1>0,Var1,0), LINESTICK;
空方: 0-IF(Var1<0,Var2,0), LINESTICK;
抄底: Var20 AND PWINNER(5,CLOSE)<1.1, , [00050001];
预警系统: IF(Var7>=200 AND Var6>=150 OR CROSS(65,多方),15,IF(Var7<=-200 AND Var6<=-150,-15,Var9))+65, , [00050001];
STICKLINE(Var3<=REF(Var4,1),Var3,Var4,8,0), , [00010001];
STICKLINE(Var3>REF(Var4,1),Var3,Var4,8,0), , [00010001];
Var21:=CLOSE>MA(CLOSE,20) AND MA(CLOSE,20)>=REF(MA(CLOSE,20),1);
Var22:=CLOSE<MA(CLOSE,20) AND MA(CLOSE,20)<REF(MA(CLOSE,20),1);
Var23:=多方>60 AND 预警系统>65 AND 顶线=100;
Var24:=多方>48 AND 预警系统>65 AND 顶线<100;
Var25:=空方<-38 AND 预警系统<65;
Var26:=抄底>50 AND 顶线<90;
Var27:=Var3>REF(Var4,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
Var28:=Var3<=REF(Var4,1) AND CLOSE<REF(CLOSE,1) AND 预警系统=65 AND 抄底=0 AND 空方>=REF(空方,1) AND VarC<REF(VarD,1);
DRAWTEXT(Var21 AND COUNT(Var21,30)=1,10,'上升通道!'), , [00010001];
Var29:=DRAWTEXT(Var22 AND COUNT(Var22,30)=1,55,'下降通道!');
Var2A:=DRAWTEXT(Var23 AND COUNT(Var23,30)=1,55,'上涨过急!');
Var2B:=DRAWTEXT(Var24 AND COUNT(Var24,30)=1,75,'庄家出货!');
Var2C:=DRAWTEXT(Var25 AND COUNT(Var25,30)=1,50,'有小反弹!');
Var2D:=DRAWTEXT(Var26 AND COUNT(Var26,30)=1,30,'抢反弹!');
Var2E:=DRAWTEXT(Var27 AND COUNT(Var27,30)=1,-10,'资金进场!');
DRAWTEXT(Var28 AND COUNT(Var28,30)=1,90,'见顶回落!'), , [00010001];

清风斜阳 2005-3-17 19:15

财智论坛版主清风斜阳搜集编制系列指标

{crocofalcon}


技术指标公式:1市场盈亏  缺省周期:日线
=======================================================================================
参数描述: N(1,100,30)N2(1,10,3)N3(1,10,10)N4(-35,0,-35)
=======================================================================================
A: MA((CLOSE-REF(OPEN,N))/REF(OPEN,N)*100,N2), COLORSTICK;
MA((CLOSE-REF(OPEN,N))/REF(OPEN,N)*100,N2);
B: MA(A,N3);
DRAWTEXT(CROSS(A,B) AND B<N4,B,' 抢反弹');

=======================================================================================

蝶恋花 2005-3-17 19:15

[quote]Originally posted by [i]蝶恋花[/i] at 2005-3-17 07:12 PM:
建议写源码时禁用Smilies

谢谢 [/quote]

会出现笑脸时要禁用Smilies,这样方便引入:cool:

清风斜阳 2005-3-17 19:17

财智论坛版主清风斜阳搜集编制系列指标

seeyou    飞狐的完全加密指标目前尚无人能解 ,我送给你一个指标,以表心意}

{技术指标公式:Z朱氏K线 (朱氏K线) 主图  缺省周期:日线}
Var1:=(3*CLOSE+LOW+OPEN+HIGH)/6;
Var2:=(20*Var1+19*REF(Var1,1)+18*REF(Var1,2)+17*REF(Var1,3)+16*REF(Var1,4)+15*REF(Var1,5)+14*REF(Var1,6)+13*REF(Var1,7)+12*REF(Var1,8)+11*REF(Var1,9)+10*REF(Var1,10)+9*REF(Var1,11)+8*REF(Var1,12)+7*REF(Var1,13)+6*REF(Var1,14)+5*REF(Var1,15)+4*REF(Var1,16)+3*REF(Var1,17)+2*REF(Var1,18)+REF(Var1,20))/210;
Var3:=MA(Var2,4);
Var4:=MA(Var2,5);
Var5:=IF(YEAR>2008,MA(Var1,5)>MA(Var1,46),MA(Var1,3)>MA(Var1,5));
STICKLINE(Var5,HIGH,LOW,8,1),colorred , ;
STICKLINE(NOT(Var5),HIGH,LOW,8,0),colorblue , ;
MID:= MA(Var1,13);
DRAWICON(CLOSE<-999999999999999999999,LOW,1);

清风斜阳 2005-3-17 19:18

财智论坛版主清风斜阳搜集编制系列指标

{ZWL2000    pj}

技术指标公式:5超级地瓜 (主图电子股评[看看你的股票有什么提示])  缺省周期:日线
=======================================================================================
参数描述: 年(1995,3000,2003)月(1,12,7)日(1,31,8)
=======================================================================================
Var1:=IF(YEAR=年,1,0);
Var2:=IF(MONTH=月,1,0);
Var3:=IF(DAY=日,1,0);
Var4:=Var1*Var2*Var3;
Var5:=HHV(HIGH,34);
Var6:=(2*CLOSE+HIGH+LOW)/4;
Var7:=LLV(LOW,34);
Var8:=EMA((Var6-Var7)/(Var5-Var7)*100,13);
Var9:=EMA(0.667*REF(Var8,1)+0.333*Var8,2);
VarA:=Var8-Var9>1 AND Var8<30 AND Var9<30;
VarB:=Var8-Var9<0 AND Var8>80 AND Var9>80 AND REF(Var8-Var9,1)>0;
VarC:=COUNT(Var8-Var9>0,2)=2;
VarD:=Var8-Var9<0;
DRAWTEXT(Var4 AND VarA,CLOSE*0.985,'最佳买入时机');
DRAWTEXT(Var4 AND VarB,CLOSE*0.985,'最佳卖出时机');
DRAWTEXT(Var4 AND VarC,CLOSE*0.99,'持仓区');
DRAWTEXT(Var4 AND VarD,CLOSE*0.99,'空仓区');
DRAWTEXT(Var4 AND CLOSE/REF(CLOSE,1)>INDEXC/REF(INDEXC,1),CLOSE*1.002,'各股强于大盘');
DRAWTEXT(Var4 AND CLOSE/REF(CLOSE,1)<INDEXC/REF(INDEXC,1),CLOSE*1.002,'各股弱于大盘');
VarE:=CLOSE-REF(CLOSE,6);
VarF:=MA(VarE,6);
Var10:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
Var11:=SMA(Var10,3,1);
Var12:=SMA(Var11,3,1);
Var13:=EMA(3*Var11-2*Var12,2);
Var14:=(HIGH+LOW+CLOSE)/3;
Var15:=(Var14-MA(Var14,14))/(0.015*AVEDEV(Var14,14))/2;
Var16:=(Var15+EMA(((-100)*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14))+100)/100,3)*200-100)/2;
Var17:=Var16-REF(Var16,14);
Var18:=Var16-REF(Var16,26);
Var19:=(Var16+Var17+Var18)/3;
Var1A:=EMA(Var19,4);
DRAWTEXT(Var4 AND Var1A>EMA(Var1A,4) AND Var1A>REF(Var1A,1),CLOSE*0.98,'快速介入吧!'), , [00010001];
DRAWTEXT(Var4 AND Var1A>EMA(Var1A,4) AND Var1A<REF(Var1A,1),CLOSE*0.98,'休息一会~');
DRAWTEXT(Var4 AND Var1A<EMA(Var1A,4) AND Var1A>REF(Var1A,1),CLOSE*0.98,'注意短线有变盘可能!');
DRAWTEXT(Var4 AND Var1A<EMA(Var1A,4) AND Var1A<REF(Var1A,1),CLOSE*0.98,'赶紧快跑呀!');
Var1B:=REF(CLOSE,1);
Var1C:=(SMA(MAX(CLOSE-Var1B,0),19,1)/SMA(ABS(CLOSE-Var1B),19,1)*100-50)*1.25;
Var1D:=(SMA(MAX(CLOSE-Var1B,0),34,1)/SMA(ABS(CLOSE-Var1B),34,1)*100-50)*1.25;
Var1E:=(SMA(MAX(CLOSE-Var1B,0),72,1)/SMA(ABS(CLOSE-Var1B),72,1)*100-50)*1.25;
Var1F:=EMA(((Var1C+Var1D)/2-Var1E)*5,6);
Var20:=Var1F;
DRAWTEXT(Var4 AND Var20>EMA(Var20,4) AND Var20>REF(Var20,1),CLOSE*1.01,'中线介入!'), , [00010001];
DRAWTEXT(Var4 AND Var20>EMA(Var20,4) AND Var20<REF(Var20,1),CLOSE*1.01,'学会休息'), , [00010001];
DRAWTEXT(Var4 AND Var20<EMA(Var20,4) AND Var20>REF(Var20,1),CLOSE*1.01,'注意变盘'), , [00010001];
DRAWTEXT(Var4 AND Var20<EMA(Var20,4) AND Var20<REF(Var20,1),CLOSE*1.01,'中线逃跑'), , [00010001];
J: EMA(LOW,13), , [00040001];
JJ: EMA(LOW,34), , [00040001];
=======================================================================================

清风斜阳 2005-3-19 12:10

神光全套公式

:smokin:

脑电波
n1  3    n2  6    n3    12     n4    24}
DK: (MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
DK1:MA(DK,5);
DK2:MA(DK,10)

神光强势股
zy1:=close/indexc*1000;
a1:=if(zy1>HHV(zy1,3),10,0);
a2:=if(zy1>HHV(zy1,5),15,0);
a3:=if(zy1>HHV(zy1,10),20,0);
a4:=if(zy1>HHV(zy1,2),10,0);
a5:=COUNT(zy1>ref(zy1,1) ,9)*5;
神光强势股评分:A1+A2+A3+A4+A5

神光评分神光强势股评分
zy1:=close/indexc*1000;
P1:=if(zy1=hhv(zy1,3),10,0);
P2:=if(zy1=hhv(zy1,5),15,0);
P3:=if(zy1=hhv(zy1,10),20,0);
P4:=if(zy1>ref(zy1,1),10,0);
P5:=if(zy1>ref(zy1,1),5,0);
P6:=if(ref(zy1,1)>ref(zy1,2),5,0);
P7:=if(ref(zy1,2)>ref(zy1,3),5,0);
P8:=if(ref(zy1,3)>ref(zy1,4),5,0);
P9:=if(ref(zy1,4)>ref(zy1,5),5,0);
P10:=if(ref(zy1,5)>ref(zy1,6),5,0);
P11:=if(ref(zy1,6)>ref(zy1,7),5,0);
P12:=if(ref(zy1,7)>ref(zy1,8),5,0);
P13:=if(ref(zy1,8)>ref(zy1,9),5,0);
point:=P1+P2+p3+P4+P5+p6+P7+P8+p9+P10+P11+p12+p13;
神光评分:point;

{神光量比指标}
zy2:=vol/indexv*1000;
量比:zy2;
ma5:ma(zy2,5);
ma10:ma(zy2,10)


神光生命N:50  1   100
h1:=hhv(high,n);
l1:=llv(low,n);
h2:=hhv(indexh,n);
l2:=llv(indexl,n);
zy:=close/indexc*2000;

zy1:ema(zy,3);
zy2:ema(zy,17);
zy3:ema(zy,34);


神光生命线A
As0:=(C-LLV(LOW,3))/(HHV(HIGH,3)-LLV(LOW,3));
As1:=SMA(As0,2,1);
As2:=SMa(As1,2,1);
As3:=3*As1-2*As2 ;
As4:=2*As3-0.5;
As5:=C*(1-(As4-As2)/15);
As6:As5;


神光心电图
Var1:CLOSE/INDEXC*1000;
Var2:MA(Var1,5);
Var3:MA(Var1,10);


神光公式集}
{n20  10  200}
Var1:=MA(CLOSE,20);
Var2:=REF(CLOSE,3)>REF(OPEN,3) AND REF(CLOSE,2)<REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) AND CLOSE>OPEN AND CLOSE>REF(CLOSE,1) AND Var1>REF(Var1,1);
Var3:=REF(CLOSE,4)>REF(OPEN,4) AND REF(CLOSE,3)<REF(OPEN,3) AND REF(CLOSE,2)<REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) AND CLOSE>OPEN AND CLOSE>REF(CLOSE,1) AND Var1>REF(Var1,1);
阳后双阴阳买进: Var2 OR Var3;

神光强势股
zy1:=close/indexc*1000;
a1:=if(zy1>HHV(zy1,3),10,0);
a2:=if(zy1>HHV(zy1,5),15,0);
a3:=if(zy1>HHV(zy1,10),20,0);
a4:=if(zy1>HHV(zy1,2),10,0);
a5:=COUNT(zy1>ref(zy1,1) ,9)*5;
神光强势股评分:A1+A2+A3+A4+A5



{神光量比指标}
zy2:=vol/indexv*1000;
量比:zy2;
ma5:ma(zy2,5);
ma10:ma(zy2,10)

清风斜阳 2005-3-19 12:11

一个好朋友送我自用的好指标

现在转送大家觉得好就顶上来大家用

《原码》
Varv1:= MA(vol,5)/ref(MA(vol,5),1)>1.20 ;
Varv2:= MA(vol,5)>MA(vol,13) and MA(vol,5)>MA(vol,21);
Varv3:= Varv1 or Varv2;
VarD:= CLOSE<ABS(MA(CLOSE,60))*0.82 ;
AA:=FILTER( Varv3 and VarD,5);
AA;

清风斜阳 2005-3-19 12:13

学习资料,仅供参考,不得销售
联系办法:QQ 82052669
联系邮箱[email]china999@163.com[/email]
清风斜阳热烈欢迎你真诚交流


DRAWBKBMP(CLOSE>=OPEN or CLOSE<OPEN,'1');
Var1:=MA(CLOSE,5);
Var2:=MA(CLOSE,10);
Var3:=MA(CLOSE,20);
Var4:=MA(CLOSE,30);
h1a:=(var1+var2+var3+var4)/4;
{STICKLINE(C>MA(h1a,13),MA(h1a,13),MA(h1a,13),8,0),colorYELLOW,linethick5;}
{IF C>MA(h1a,13) THEN MA(h1a,13),colorred ELSE MA(h1a,13),colorblue;}
STICKLINE(CLOSE>=OPEN,HIGH,LOW,1,0),COLOR0000FF;
STICKLINE(CLOSE>=OPEN,HIGH,LOW,0,0),COLOR0000FF;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,8,1),COLOR0000FF;
STICKLINE(CLOSE<=OPEN,HIGH,LOW,1,0),COLORFF0000;
STICKLINE(CLOSE<=OPEN,HIGH,LOW,0,0),COLORFFFF00;
STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,8,0),COLORcyan;


{ 慢速关注;  N1 8-1-100 M 8-1-100 M1 4-1-100 }
80,Stick,ColorD20000;
20,Stick,Color000000;
{-------卖点------------------------------------------------}
LL:=REF(CLOSE,1);
MM1:=SMA(MAX(CLOSE-LL,0),6,1)/SMA(ABS(CLOSE-LL),6,1)*100;
MD:=CROSS(80,MM1);

ar1:=AMOUNT/VOL/1000;
ar2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
ar3:=SUM(AMOUNT,13)/ar1/1000;
ar4:=DMA(ar2,VOL/ar3);
SK:=(CLOSE-ar4)/ar4*1000, ;
md2:=cross(40,sk);

Var5i:=(REF(HIGH,1)+REF(LOW,1))/2;
Var6i:=MA(CLOSE,20)+2*STD(CLOSE,20);
db1:=CROSS(Var5i,Var6i);{日均价下穿20日均线卖出}

Va3h:=(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21))*100-10;
Va4h:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
Va5h:=SMA(Va4h,13,8);
走势:=CEILING(SMA(Va5h,13,8)),colorred;
Va6h:=SMA(Va3h,21,8),pointdot;{8}
fff:=(cross(85,走势));
卖点:if(md  {or mb2 or fff}  ,85,100),colorgreen,LINETHICK1;
{-------02------快卖★--------------------------------------------}
Var75:=(CLOSE-MA(CLOSE,42))/MA(CLOSE,42)*100;
stickline(CROSS(-28,Var75),-5,2,3,0),colorred,linethick2 ;
Var76:=(CLOSE-REF(OPEN,29))/REF(OPEN,29)*100;
Var77:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;
Var78:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36))*100;
Var79:=SMA(Var78,5,1);
Var80:=SMA(Var79,3,1);

快卖★: IF(CROSS(Var80,Var79) AND Var80>80 AND Var76>10,80,100)
,Color0080FF,linethick2;
{------03--------------底部------------------------------------}
D1:=SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100;
D2:=SMA(MAX(O-REF(O,1),0),6,1)/SMA(ABS(O-REF(O,1)),6,1)*100;
D3:=SMA(MAX(H-REF(H,1),0),6,1)/SMA(ABS(H-REF(H,1)),6,1)*100;
D4:=SMA(MAX(L-REF(L,1),0),6,1)/SMA(ABS(L-REF(L,1)),6,1)*100;
IF(CROSS(D3,20) OR D1>20,0,30),Color808E00,linethick2;
IF(D4<10,0,20),ColorFF00FF,linethick2;
{----08----出手-赢-------------------------------------------------}
Var3:=REF(HIGH,1)*1.1;
Var4:=HIGH*1.1;
Var5:=(Var4*VOL+Var3*(CAPITAL-VOL))/CAPITAL;
Var6:=REF(LOW,1)*0.9;
Var7:=LOW*0.9;
Var8:=(Var7*VOL+Var6*(CAPITAL-VOL))/CAPITAL;
Var9:=EMA(Var8,30);
VarA:=EMA(Var5,30);
VarB:=VarA-2;
VarC:=IF(CLOSE<=Var9,VarB,VarA);
VarD:=MA(CLOSE,80)-MA(CLOSE,10)/17;
{出手:}STICKLINE(VarC-VarB=0 AND  CROSS((EMA(EMA(EMA(CLOSE,3),3),3)
-REF(EMA(EMA(EMA(CLOSE,3),3),3),1))/REF(EMA(EMA(EMA(CLOSE,3),3),3),1)
*100,MA((EMA(EMA(EMA(CLOSE,3),3),3)-REF(EMA(EMA(EMA(CLOSE,3),3),3),1))
/REF(EMA(EMA(EMA(CLOSE,3),3),3),1)*100,2)),35,0,3,0),linethick3,
,COLORred ;
{赢:}DRAWTEXT(FILTER(VarC-VarB=0 AND CROSS((EMA(EMA(EMA(CLOSE,3),3),
3)-REF(EMA(EMA(EMA(CLOSE,3),3),3),1))/REF(EMA(EMA(EMA(CLOSE,3),3),3),
1)*100,MA((EMA(EMA(EMA(CLOSE,3),3),3)-REF(EMA(EMA(EMA(CLOSE,3),3),3),
1))/REF(EMA(EMA(EMA(CLOSE,3),3),3),1)*100,2)),4),40,'▲进'),
,COLORred ;
{------------钟枪▲---------------------------------------------}
Var38:=3;

Var39:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)
-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))
*100,5,1),3,1);

钟枪▲:IF(CROSS(Var39,Var38),30,0),ColorFFFF00,linethick2 ;{买点}
{-------中行--------------------------------------------------}
Var1:=(HHV(HIGH,5)-LLV(LOW,5));
Var2:=(HHV(HIGH,9)-CLOSE);
Var3:=(CLOSE-LLV(LOW,9));
Var4:=Var2/Var1*100-70 ;
Var5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
Var6:=(2*C+H+L)/4;
Var7:=SMA((Var3/Var1*100),3,1);  
Var8:=LLV(LOW,34);
Var9:=SMA(Var7,3,1)-SMA(Var4,9,1);
Var10:= IF(Var9>100,Var9-100,0);
VarA:=HHV(HIGH,34);

中行涨:STICKLINE(EMA((Var6-Var8)/(VarA-Var8)*100,8)>0 AND EMA
((Var6-Var8)/(VarA-Var8)*100,8)-EMA(EMA((Var6-Var8)/(VarA-Var8)
*100,8),5)>=0,49,50,15,0),Color4080FF,linethick6;

中行跌:STICKLINE(EMA((Var6-Var8)/(VarA-Var8)*100,8)>0 AND EMA
((Var6-Var8)/(VarA-Var8)*100,8)-EMA(EMA((Var6-Var8)/(VarA-Var8
)*100,8),5)<0,49,50,15,0),ColorFF0000,linethick6;
{-------------------------------------------------------------}
Var1:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
Var2:=SMA(Var1,M1,1);
卖线: SMA(Var2,M1,1),ColorFFFFFF, linethick1;
Var3:=(HHV(HIGH,M)-CLOSE)/(HHV(HIGH,M)-LLV(LOW,M))*100;
Var4:=SMA(Var3,M1,1);
Var5:=SMA(Var4,M1,1);
买入线: SMA(Var5,M1,1),Color00FF00, linethick1;
必卖线: SMA(卖线,M1,1),Color0000FF, linethick1;


DRAWTEXT(买入线>76.5 AND CROSS(卖线,必卖线),必卖线*1.15,'▲抢反弹'),ColorFFFFFF;
DRAWTEXT(买入线>56 AND 买入线<=76 AND CROSS(卖线,必卖线),卖线,'●留意')
,,Color00FFFF , ;
DRAWTEXT(买入线<45 AND 卖线>78 AND 必卖线>78 AND CROSS(必卖线,卖线),
必卖线,'☆☆跑'),ColorFFFFFF;
DRAWTEXT(CROSS(买入线,78.5),买入线,'●关注'),Color0000FF;
DRAWTEXT(CROSS(买入线,85),买入线,'★★重点关注'),ColorFFFFFF;
{-------------------------------------------------------------}

var1:=(CLOSE-LLV(LOW,45))/(HHV(HIGH,45)-LLV(LOW,45))*100;
var2:=SMA(var1,3,1);
var3:=SMA(var2,3,1);
var4:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))
*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))
*100,5,1),3,1);
var5:=CROSS(var4,10) AND var3<P2;

IF(var5,40,1), , COLORRED,Color00FFFF;
DRAWICON(var5,48,1);
1,ColorFF0000, linethick1;
{--05----逃顶------------------------------------------------------}
LC:=REF(CLOSE,1);
RSI5:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*100;
R:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
A:=SMA(R,3,1);
B:=SMA(A,3,1);
CCC:=(B/2+40)*1.1;
D:=SMA(CCC,3,1);
【逃顶I】:if(CROSS(D,RSI5),90,100),ColorFF00FF;
【逃顶II】:if(CROSS(80,RSI5),85,100),Color00FF00;

STICKLINE(CROSS(D,RSI5),85,96,5,0),ColorFF00FF;
STICKLINE(CROSS(80,RSI5),80,90,5,0),Color00FF00;
{-------个股比大盘----------------------------------------}
个股趋势:=MA(c,1)/MA(ref(c,18),18)*100,;
大盘趋势:=ma(INDEXC,1)/MA(ref(INDEXC,18),18)*100;
位置:(个股趋势-大盘趋势),LINETHICK0;
STICKLINE(位置>=0,2,-2,10,0),ColorC0C0C0;
STICKLINE(位置<0,2,-2,10,0),ColorFF0000;
{-----------------------------------------------------------------}
100,ColorFF0000, linethick5;
80,ColorFF0000, linethick2;
高压线: 85,ColorFF8000, linethick1;
20,ColorFF0000, linethick2;

触底线: 9,ColorFF8000, linethick1;
{--------红禄条------------------------------------------------------}
Var1:=SMA((CLOSE-LLV(LOW,PP))/(HHV(HIGH,PP)-LLV(LOW,PP))*200-105,5,1);
Var2:=SMA((HHV(HIGH,PP)-CLOSE)/(HHV(HIGH,PP)-LLV(LOW,PP))*200-125,5,1);

涨区:STICKLINE(Var1>=Var2,100,101,15,0),ColorC0C0C0,linethick5;
跌区:STICKLINE(Var1<Var2,100,101,15,0),ColorFF0000,linethick5;
{--------------------------------------------------------------------}
EXPLAIN(c>0  ,'

★年线下变平,准备捕老熊。年线往上拐,回踩坚决买!  
★年线往下行,一定要搞清,如等半年线,暂做壁上观。  
★深跌破年线,老熊活年半。价稳年线上,千里马亮相。  
★要问为什么?牛熊一线亡!半年线下穿,千万不要沾。  
★半年线上拐,坚决果断买!季线如下穿,后市不乐观!  
★季线往上走,长期须多头!月线不下穿,光明就在前!  
★股价踩季线,入市做波段。季线如被破,眼前就有祸,  
★月线上穿季,买进等获利。月线如下行,本波已完成!  
★价跌月线平,底部已探明。2 0 线走平,观望暂做空。  
★2 0线上翘,犹如冲锋号。突然呈加速,离顶查一步!  
★10天庄成本,不破不走人。短线看 3天,破掉你就窜!  
★长期往上翘,短期呈缠绕,平台一做成,股价往上跑!
'),Color80FF00;

{------------------------------------------------------------}

清风斜阳 2005-3-19 12:13

大智慧金品!

学习资料,仅供参考,不得销售
联系办法:QQ 82052669
联系邮箱[email]china999@163.com[/email]
清风斜阳热烈欢迎你真诚交流
大智慧金品!原码



VAR1:=SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14,1);
VAR2:=HIGH-REF(HIGH,1);
VAR3:=REF(LOW,1)-LOW;
VAR4:=SMA(IF((VAR2>0) AND (VAR2>VAR3),VAR2,0),12,1);
VAR5:=SMA(IF((VAR3>0) AND (VAR3>VAR2),VAR3,0),12,1);
VAR6:=((VAR4)*(100))/(VAR1);
VAR7:=((VAR5)*(100))/(VAR1);
VAR8:=SMA(((ABS(VAR7-VAR6))/(VAR7+VAR6))*(100),12,1);
VAR9:=(VAR8+REF(VAR8,5))/(2);
VARA:=((SUM(HIGH-OPEN,12))/(SUM(OPEN-LOW,12)))*(100);
VARB:=((SUM(MAX(0,HIGH-REF(CLOSE,1)),12))/(SUM(MAX(0,REF(CLOSE,1)-LOW),12)))*(100);
VARC:=((AMOUNT)/(VOL))/(100);
VARD:=((3)*(HIGH)+LOW+OPEN+(2)*(CLOSE))/(7);
VARE:=((SUM(AMOUNT,5))/(VARC))/(100);
VARF:=((SUM(AMOUNT,13))/(VARC))/(100);
VAR10:=((SUM(AMOUNT,34))/(VARC))/(100);
VAR11:=((SUM(AMOUNT,209))/(VARC))/(100);
VAR12:=REF(VOL,1)+REF(VOL,2)+REF(VOL,3)+REF(VOL,4);
VAR13:=(VAR12)/(CAPITAL);
VAR14:=((VOL)/(CAPITAL))*(VARD)+(VAR13)*(REF(VARC,1));
VAR15:=DMA(VARD,(VOL)/(VARE));
VAR16:=DMA(VARD,(VOL)/(VARF));
VAR17:=DMA(VARD,(VOL)/(VAR10));
VAR18:=DMA(VARD,(VOL)/(CAPITAL));
VAR19:=MA(HHV(HIGH,488),18);
VAR1A:=MA(HHV(HIGH,220),18);
VAR1B:=MA(HHV(HIGH,98),18);
VAR1C:=MA(LLV(LOW,488),18);
VAR1D:=MA(LLV(LOW,220),18);
VAR1E:=MA(LLV(LOW,98),18);
VAR1F:=MA(((VAR1C)*(0.95999997)+(VAR1D)*(0.95999997)+(VAR1E)*(0.95999997)+(VAR19)*(0.55800002)+(VAR1A)*(0.55800002)+(VAR1B)*(0.55800002))/(6),18);
VAR20:=MA(((VAR1C)*(1.25)+(VAR1D)*(1.23)+(VAR1E)*(1.2)+(VAR19)*(0.55[url=www.macd.cn/result.php?sn=000001][color=blue][u]000001[/u][/color][/url])+(VAR1A)*(0.55[url=www.macd.cn/result.php?sn=000001][color=blue][u]000001[/u][/color][/url])+(VAR1B)*(0.64999997))/(6),18);
VAR21:=MA(((VAR1C)*(1.3)+(VAR1D)*(1.3)+(VAR1E)*(1.3)+(VAR19)*(0.68)+(VAR1A)*(0.68)+(VAR1B)*(0.68))/(6),18);
VAR22:=MA((((VAR1F)*(3)+(VAR20)*(2)+VAR21)/(6))*(1.738),18);
VAR23:=IF((DATE<=1021231),VAR22,(VAR22)*(DAY));
VAR24:=LOW;
VAR25:=REF(LOW,1);
VAR26:=((SMA(ABS(VAR24-VAR25),3,1))/(SMA(MAX(VAR24-VAR25,0),3,1)))*(100);
VAR27:=MA(IF(((CLOSE)*(1.35)<=VAR23),(VAR26)*(10),(VAR26)/(10)),3);
VAR28:=LLV(LOW,30);
VAR29:=HHV(VAR27,30);
VAR2A:=IF((LOW<=VAR28),(VAR27+(VAR29)*(2))/(2),0);
VAR31:=MA(HHV(HIGH,488),18);
VAR32:=MA(HHV(HIGH,220),18);
VAR33:=MA(HHV(HIGH,98),18);
VAR34:=MA(LLV(LOW,488),18);
VAR35:=MA(LLV(LOW,220),18);
VAR36:=MA(LLV(LOW,98),18);
VAR37:=MA(((VAR34)*(0.95999997)+(VAR35)*(0.95999997)+(VAR36)*(0.95999997)+(VAR31)*(0.55800002)+(VAR32)*(0.55800002)+(VAR33)*(0.55800002))/(6),18);
VAR38:=MA(((VAR34)*(1.25)+(VAR35)*(1.23)+(VAR36)*(1.2)+(VAR31)*(0.55[url=www.macd.cn/result.php?sn=000001][color=blue][u]000001[/u][/color][/url])+(VAR32)*(0.55[url=www.macd.cn/result.php?sn=000001][color=blue][u]000001[/u][/color][/url])+(VAR33)*(0.64999997))/(6),18);
VAR39:=MA(((VAR34)*(1.3)+(VAR35)*(1.3)+(VAR36)*(1.3)+(VAR31)*(0.68)+(VAR32)*(0.68)+(VAR33)*(0.68))/(6),18);
VAR40:=MA((((VAR37)*(3)+(VAR38)*(2)+VAR39)/(6))*(1.738),18);
VAR41:=VAR40;
VAR42:=LOW;
VAR43:=REF(LOW,1);
VAR44:=((SMA(ABS(VAR42-VAR43),3,1))/(SMA(MAX(VAR42-VAR43,0),3,1)))*(100);
VAR45:=MA(IF(((CLOSE)*(1.35)<=VAR41),(VAR44)*(10),(VAR44)/(10)),3);
VAR46:=LLV(LOW,30);
VAR47:=HHV(VAR45,30);
VAR49:=IF((LOW<=VAR46),(VAR45+(VAR47)*(2))/(2),0);
见底:MA(VAR49 AND (CLOSE<COST(1)),3),Color00FFFF;
买入:MA(VAR2A AND (CLOSE<COST(1)),3) AND (((CLOSE-VAR16)/(VAR16))*(100)<(-13)),Color008000;
趋势:(EMA((3)*(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100),5,1))-(2)*(SMA(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100),5,1),3,1)),5))/(100),ColorFFFFFF;
底线:0.1,ColorFFFFFF,POINTDOT;
金指63:IF((((REF(CLOSE,13)-CLOSE)/(REF(CLOSE,13)))*(100)>15) AND ((SUM((VOL)/(CAPITAL),13))*(100)<18) AND (((VOL)/(CAPITAL))*(100)<2.5) AND (((REF(CLOSE,1)-CLOSE)/(REF(CLOSE,1)))*(100)<8),1,0),ColorFFCC66;
V2:=((CLOSE-REF(CLOSE,1))/(REF(CLOSE,1)))*(100);
V3:=(MA(VOL,2))/(MA(VOL,10));
V4:=(VOL)/(CAPITAL);
A1:=(0.0068)*(V2)-(0.0072)*(V3)-(0.56760001)*(V4)-0.0105;
A2:=(0.0015)*(V2)-(0.0124)*(V3)+(1.7461)*(V4)-0.0074;
A3:=((-0.0003))*(V2)+(0.04699999)*(V3)-(0.57340002)*(V4)-0.0549;
买63:(((-12.2401))*(A1)-(1)*(A2)+0.32100001<0),Color99CC66;
B1:=((CLOSE-MA(CLOSE,27))/(MA(CLOSE,27))<(-0.15999999));
品股72:B1,ColorFF0000;

清风斜阳 2005-3-19 12:17

散户必赢

学习资料,仅供参考,不得销售
联系办法:QQ 82052669
联系邮箱[email]china999@163.com[/email]
清风斜阳热烈欢迎你真诚交流


以前总是....................
今天我也发个源码
这个是DZH的

{
m 50 120 88
n 1 12 6
n1 -10 10 -6
n2 -10 10 -3}

CYC2: DMA((CLOSE+OPEN)/2,VOL/(SMA(VOL,13,1)*13));
CYC3: DMA((CLOSE+OPEN)/2,VOL/(SMA(VOL,34,1)*34));
CYC4: DMA((CLOSE+OPEN)/2,VOL/(SMA(VOL,89,1)*89)),linethick2;

Var1a:=(HIGH+LOW+CLOSE)/3;
Var2a:=(Var1a-MA(Var1a,14))/(0.015*AVEDEV(Var1a,14));
Var3:=MA(VOL,5);
Var4:=MA(VOL,10);
Var5:=MA(VOL,60);
Var6:=MA(CLOSE,5);
Var7:=MA(CLOSE,8);
Var8:=MA(CLOSE,25);
Var9:=MA(CLOSE,60);
DRAWTEXT(CROSS(Var2a,EMA(Var2a,2)) AND Var2a>80 AND VOL>Var3 AND VOL>Var4 AND VOL>Var5 AND Var6>Var9 AND Var7>Var9 AND Var8>Var9 AND OPEN<Var6 AND CLOSE>Var6,LOW,'红鸟拉升'),coloryellow;

Var1:=EMA(AMOUNT/VOL/100,3);
成本: EMA(Var1,M), CROSSDOT;
伏击: EMA(Var1,M)*0.85, CROSSDOT;

MA4:MA(CLOSE,250),POINTDOT;

cb:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);
散户出逃:cb+cb*10/100, COLORBLUE;

Var9a:=REF(CLOSE,1);
VarA:=SMA(MAX(CLOSE-Var9a,0),6,1)/SMA(ABS(CLOSE-Var9a),6,1)*100;
DRAWTEXT(CROSS(84,VarA),HIGH,'→ 逃顶 '),COLOR00ff00;

Var1g:=SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14,1);
Var2g:=HIGH-REF(HIGH,1);
Var3g:=REF(LOW,1)-LOW;
Var4g:=SMA(IF(Var2g>0 AND Var2g>Var3g,Var2g,0),12,1);
Var5g:=SMA(IF(Var3g>0 AND Var3g>Var2g,Var3g,0),12,1);
Var6g:=Var4g*100/Var1;
Var7g:=Var5g*100/Var1;
Var8g:=SMA(ABS(Var7g-Var6g)/(Var7g+Var6g)*100,12,1);
Var9g:=(Var8g+REF(Var8g,5))/2;
VarAg:=SUM(HIGH-OPEN,12)/SUM(OPEN-LOW,12)*100;
VarB:=SUM(MAX(0,HIGH-REF(CLOSE,1)),12)/SUM(MAX(0,REF(CLOSE,1)-LOW),12)*100;
VarC:=AMOUNT/VOL/100;
VarD:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
VarE:=SUM(AMOUNT,5)/VarC/100;
VarF:=SUM(AMOUNT,13)/VarC/100;
Var10:=SUM(AMOUNT,34)/VarC/100;
Var11:=SUM(AMOUNT,209)/VarC/100;
Var12:=REF(VOL,1)+REF(VOL,2)+REF(VOL,3)+REF(VOL,4);
Var13:=Var12/CAPITAL;
Var14:=VOL/CAPITAL*VarD+Var13*REF(VarC,1);
Var15:=DMA(VarD,VOL/VarE);
Var16:=DMA(VarD,VOL/VarF);
Var17:=DMA(VarD,VOL/Var10);
Var18:=DMA(VarD,VOL/CAPITAL);
Var19:=MA(HHV(HIGH,488),18);
Var1Ag:=MA(HHV(HIGH,220),18);
Var1B:=MA(HHV(HIGH,98),18);
Var1C:=MA(LLV(LOW,488),18);
Var1D:=MA(LLV(LOW,220),18);
Var1E:=MA(LLV(LOW,98),18);
Var1F:=MA((Var1C*0.96+Var1D*0.96+Var1E*0.96+Var19*0.558+Var1Ag*0.558+Var1B*0.558)/6,18);
Var20:=MA((Var1C*1.25+Var1D*1.23+Var1E*1.2+Var19*0.55+Var1Ag*0.55+Var1B*0.65)/6,18);
Var21:=MA((Var1C*1.3+Var1D*1.3+Var1E*1.3+Var19*0.68+Var1Ag*0.68+Var1B*0.68)/6,18);
Var22:=MA((Var1F*3+Var20*2+Var21)/6*1.738,18);
Var23:=IF(DATE>=999999,Var22,Var22*DAY);
Var24:=LOW;
Var25:=REF(LOW,1);
Var26:=SMA(ABS(Var24-Var25),3,1)/SMA(MAX(Var24-Var25,0),3,1)*100;
Var27:=MA(IF(CLOSE*1.35<=Var23,Var26*10,Var26/10),3);
Var28:=LLV(LOW,30);
Var29:=HHV(Var27,30);
Var2Ag:=IF(LOW<=Var28,(Var27+Var29*2)/2,0);
DRAWTEXT(MA(Var2Ag AND CLOSE<COST(1),3) AND (CLOSE-Var16)/Var16*100<N1-13,LOW,'盯');
DRAWTEXT(MA(Var2Ag AND CLOSE<COST(1),3) AND (CLOSE-Var16)/Var16*100<N2-13,LOW,'杀进'),COLORYELLOW ;

Var1z:=(CLOSE-OPEN)/OPEN*100;
Var2z:=REF(CLOSE,1);
Var3z:=SMA(MAX(CLOSE-Var2z,0),6,1)/SMA(ABS(CLOSE-Var2z),6,1)*100;
Var4z:=COUNT(Var3z<20,20)>=1;
DRAWTEXT(Var1z>9 AND Var4z,LOW,'红鸟屠龙'),coloryellow;

Var18a:=(HIGH+LOW+CLOSE)/3;
Var19a:=(Var18a-MA(Var18a,14))/(0.015*AVEDEV(Var18a,14));
Var1Aa:=(Var18a-MA(Var18a,70))/(0.015*AVEDEV(Var18a,70));
Var1Ba:=IF(Var19a>=150 AND Var19a<200 AND Var1Aa>=150 AND Var1Aa<200,-10,0);
Var1Ca:=IF(Var19a<=-150 AND Var19a>-200 AND Var1Aa<=-150 AND Var1Aa>-200,10,0);
Var1Da:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
Var1Ea:=100-ABS(Var1Da);
出击A:=(IF(BARSCOUNT(CLOSE)<13,-100,0-IF(Var1Ea<92 AND Var1Da<0,20,100))+100)*1,STICK;
出击:DRAWICON(IF(出击A=80,30,0),LLV(LOW,5),4),;
卖出A:=(IF(BARSCOUNT(CLOSE)<70,120,IF(Var1Aa>=200 AND Var19a>=150,-15,
Var1B)))*(-1),STICK,colorccff66;
DRAWICON(卖出A<=15 AND 卖出A>5 ,HHV(HIGH,5),5),;

清风斜阳 2005-3-19 12:18

操盘王中王(源码)转宝宝+贝贝的

学习资料,仅供参考,不得销售
联系办法:QQ 82052669
联系邮箱[email]china999@163.com[/email]
清风斜阳热烈欢迎你真诚交流
操盘王中王(源码)





x:=c-ref(ma(c,20),11);
lgl:=IF(EMA(C,5)/EMA(EMA(C,9),16)<=0.85 and c/ref(c,1)>0.905 and c/ref(c,1)<1.05 and VOL/CAPITAL*100<5,50,0);
wr1:=-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))+100*x;
wr2:=-100*(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,50)-LLV(LOW,50))+100;
wr3:=-100*(HHV(HIGH,70)-CLOSE)/(HHV(HIGH,70)-LLV(LOW,70))+100*x;
BIAS1:=((CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100+10)*5;
BIAS2:=((CLOSE-MA(CLOSE,50))/MA(CLOSE,50)*100+10)*5;
BIAS3:=((CLOSE-MA(CLOSE,70))/MA(CLOSE,70)*100+10)*5;
s1:=(wr1+wr2+wr3+bias1+bias2+bias3)/6*x;
s2:=ema(s1,3);
s3:=abs(bias1-bias3);
sx:=(s1+s3)/2;
xc1:=(-1)*(ema(100*(1-WINNER(CLOSE)),1)-50)+50;
ccc:=xc1+sx;
zjz:=IF( lgl>0 and ccc<0,200,0)*x;
lxl:=if(sx<0 and c=llV(c,5) and c/ref(c,1)>0.905 and c/ref(c,1)<1.05 and VOL/CAPITAL*100<5,-50,0);
jbj:=if(ccc<0 and lxl=-50,100,0)*x;
ma3:= ma(c,3);
c0:=ref(c,2)*0.865;
c1:=ref(c,13)*0.772;
bot:=MIN(c0,c1);
hsl:=100*vol/capital*x;
ma13:=ma(c,13)*x;
cxc:=if((c-bot)/c<3/100 and sum(hsl,5)/5<1.8,1,0);
vmc:=if(cxc>0 and (lxl<0 or lgl>0),10,0);
满仓:if((vmc>0),60,0),colorred;
半仓:if(((zjz>0 and jbj>0 and SUM(VOL/CAPITAL*100,5)/5<1) or (cxc>0 and ref(c,1)/ref(c,2)>0.902)) or (((zjz>0 and jbj>0 and SUM(VOL/CAPITAL*100,5)/5<1) or cxc>0) and (lxl<0 or lgl>0)) and vmc<10 ,50,0);
v93:=(((zjz>0 and jbj>0 and SUM(VOL/CAPITAL*100,5)/5<1) or cxc>0) and (lxl<0 or lgl>0)) ;
v90:=((zjz>0 and jbj>0 and SUM(VOL/CAPITAL*100,5)/5<1) or (cxc>0 and ref(c,1)/ref(c,2)>0.902));
买一点:if((v93 or v90),10,0);
Var2q:=(MA(CLOSE,80)-MA(CLOSE,13)/3);
神奇线:= MA((CLOSE-Var2q)/Var2q,1);
买二点:IF(CROSS(神奇线,0) AND LOW/REF(HIGH,1)<1.012 and ((c-ref(c,2))/c)>0.06,20,0);
yy:=SMA(SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,18,1),12,1);
yt:=SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,12,1);
st:=if(cross(yt,yy),30,0);
Var5pt:=(HIGH+LOW+CLOSE)/3;
Var6pt:=(Var5pt-MA(Var5pt,14))/(0.015*AVEDEV(Var5pt,14));
Var7pt:=(Var5pt-MA(Var5pt,85))/(0.015*AVEDEV(Var5pt,85));
sa:=IF(Var7pt>=200 AND Var6pt>=150,10,0);
Var3qq:=REF(CLOSE,1);
Var4qq:=SMA(MAX(CLOSE-Var3qq,0),6,1)/SMA(ABS(CLOSE-Var3qq),6,1)*100;
sm:=if(CROSS(80,Var4qq),30,0);
卖点:if((sm and (sa or st)),30,0);

清风斜阳 2005-3-19 12:21

学习资料,仅供参考,不得销售

联系办法:QQ 82052669
联系邮箱[email]china999@163.com[/email]
清风斜阳热烈欢迎你真诚交流



hsl:=100*V/CAPITAL;
sum(if(c>ref(c,1),hsl,0),n);
sum(if(c<ref(c,1),hsl,0),n);
n参数可以调。

清风斜阳 2005-3-19 13:15

给大家两个公式

学习资料,仅供参考,不得销售
联系办法:QQ 82052669
联系邮箱[email]china999@163.com[/email]
清风斜阳热烈欢迎你真诚交流


主力向量(净买及净卖)
CC:=C;
HH:=H;
LL:=L;
OO:=O;
BB:=AMOUNT;
VV:VOL,linethick0;
VAR1:=VOL/((HH-LL)*2-ABS(CC-OO));
成交:=VOL;
// STICKLINE(VOL,VOL,0,8,0),colorwhite;
bull:=V*(c-L)/(H-L);
bear:=v-bull;

主動買盤:IF(CC>OO,if(cc=hh,vv,bull),IF(CC<OO,if(cc=ll,0,bull),if(cc=ll,0,bull)));
// STICKLINE(主動買盤,主動買盤,0,7,0),colorred;

主動賣盤:IF(CC>OO,if( cc=hh,0,  if(cc=LL,(-vv),(-bear))  ),  IF( CC<OO,if(cc=hh,0,if(cc=LL,(-vv),(-bear)) ),if(cc=ll,(-vv),(-bear))));
// STICKLINE(主動賣盤,主動賣盤,0,7,0),colorffcc33;
主動淨買:=(主動買盤+主動賣盤);
STICKLINE(主動淨買>0,主動淨買,0,7,0),colorred;
STICKLINE(主動淨買<0,主動淨買,0,7,0),colorffcc33;


主力向量(总买及总卖)
CC:=C;
HH:=H;
LL:=L;
OO:=O;
BB:=AMOUNT;
VV:VOL,linethick0;
VAR1:=VOL/((HH-LL)*2-ABS(CC-OO));
成交:=VOL;
// STICKLINE(VOL,VOL,0,8,0),colorwhite;
bull:=V*(c-L)/(H-L);
bear:=v-bull;

主動買盤:IF(CC>OO,if(cc=hh,vv,bull),IF(CC<OO,if(cc=ll,0,bull),if(cc=ll,0,bull)));
STICKLINE(主動買盤,主動買盤,0,7,0),colorred;

主動賣盤:IF(CC>OO,if( cc=hh,0,  if(cc=LL,(-vv),(-bear))  ),  IF( CC<OO,if(cc=hh,0,if(cc=LL,(-vv),(-bear)) ),if(cc=ll,(-vv),(-bear))));
STICKLINE(主動賣盤,主動賣盤,0,7,0),colorffcc33;

清风斜阳 2005-3-19 13:16

资金为王 个股分析 珍藏版(小天)

参数 1-4

N 3  1 100
M 34 1 100
P 8  1  100
X 1  1  100

CYC1:=DMA((CLOSE+OPEN)/2,VOL/(SMA(VOL,n,1)*n));
☆1线:0POINTDOT,Color0000FF;

aa:=CYC1-ref(CYC1,1);
xta:="BB01$AMOUNT";
xtb:="BB01$CAPITAL"*100;
AAA:=CHECKUSER(1);
资金平衡:=xta/xtb,LINETHICK1;
var1:=splitdata(1)+splitdata(2);
cap:=c;
cap[datacount]:=1;
for i=datacount downto 2 do cap[i-1]:=cap[i]/(1+var1[i]/10);
capi:=cap*capital/100;
//vol/capi;
//历史流通盘{万股}:capi,LINETHICK0;
资金攻击:=AMOUNT/capi;

小天资金1:=300*(AMOUNT/capi)/ref(资金平衡,1);

小天资金:=(AMOUNT/capi)/ref(资金平衡,1),VOLSTICK;
Var1:=SMA(AA*小天资金1,m,1)*x;
C0:=INTPART(Var1*1000)/1000;
{-------------------------------------------------------------------

-}
B1:=REF(C0,1);B2:=REF(C0,2);B3:=REF(C0,3);B4:=REF(C0,4);B5:=REF

(C0,5);B6:=REF(C0,6);B7:=REF(C0,7);
B8:=REF(C0,8);B9:=REF(C0,9);B10:=REF(C0,10);B11:=REF(C0,11);B12:=REF

(C0,12);B13:=REF(C0,13);B14:=REF(C0,14);
B15:=REF(C0,15);B16:=REF(C0,16);B17:=REF(C0,17);B18:=REF

(C0,18);B19:=REF(C0,19);B20:=REF(C0,20);
B21:=REF(C0,21);B22:=REF(C0,22);B23:=REF(C0,23);B24:=REF

(C0,24);B25:=REF(C0,25);B26:=REF(C0,26);
B27:=REF(C0,27);B28:=REF(C0,28);B29:=REF(C0,29);B30:=REF

(C0,30);B31:=REF(C0,31);B32:=REF(C0,32);
B33:=REF(C0,33);B34:=REF(C0,34);B35:=REF(C0,35);B36:=REF

(C0,36);B37:=REF(C0,37);B38:=REF(C0,38);
B39:=REF(C0,39);B40:=REF(C0,40);B41:=REF(C0,41);B42:=REF

(C0,42);B43:=REF(C0,43);B44:=REF(C0,44);
B45:=REF(C0,45);B46:=REF(C0,46);B47:=REF(C0,47);B48:=REF

(C0,48);B49:=REF(C0,49);B50:=REF(C0,50);
HL:=IF(C0>B1 AND B1>=B2,1,IF(C0<B1 AND B1<=B2,-1,IF(C0>B2 AND

B2>B1,2,IF(C0<B2 AND B2<B1,-2,0))));
HG:=IF(B1>B2 AND B1>B3,1,IF(B1<B2 AND B1<B3,-1,IF(B2>B3 AND

B2>B4,2,IF(B2<B3 AND B2<B4,-2,
IF(B3>B4 AND B3>B5,3,IF(B3<B4 AND B3<B5,-3,IF(B4>B5 AND B4>B6,4,IF

(B4<B5 AND B4<B6,-4,
IF(B5>B6 AND B5>B7,5,IF(B5<B6 AND B5<B7,-5,IF(B6>B7 AND B6>B8,6,IF

(B6<B7 AND B6<B8,-6,
IF(B7>B8 AND B7>B9,7,IF(B7<B8 AND B7<B9,-7,IF(B8>B9 AND B8>B10,8,IF

(B8<B9 AND B8<B10,-8,
IF(B9>B10 AND B9>B11,9,IF(B9<B10 AND B9<B11,-9,IF(B10>B11 AND

B10>B12,10,IF(B10<B11 AND B10<B12,-10,
IF(B11>B12 AND B11>B13,11,IF(B11<B12 AND B11<B13,-11,IF(B12>B13 AND

B12>B14,12,IF(B12<B13 AND B12<B14,-12,
IF(B13>B14 AND B13>B15,13,IF(B13<B14 AND B13<B15,-13,IF(B14>B15 AND

B14>B16,14,IF(B14<B15 AND B14<B16,-14,
IF(B15>B16 AND B15>B17,15,IF(B15<B16 AND B15<B17,-15,IF(B16>B17 AND

B16>B18,16,IF(B16<B17 AND B16<B18,-16,
IF(B17>B18 AND B17>B19,17,IF(B17<B18 AND B17<B19,-17,IF(B18>B19 AND

B18>B20,18,IF(B18<B19 AND B18<B20,-18,
IF(B19>B20 AND B19>B21,19,IF(B19<B20 AND B19<B21,-19,IF(B20>B21 AND

B20>B22,20,IF(B20<B21 AND B20<B22,-20,
IF(B21>B22 AND B21>B23,21,IF(B21<B22 AND B21<B23,-21,IF(B22>B23 AND

B22>B24,22,IF(B22<B23 AND B22<B24,-22,
IF(B23>B24 AND B23>B25,23,IF(B23<B24 AND B23<B25,-23,IF(B24>B25 AND

B24>B26,24,IF(B24<B25 AND B24<B26,-24,
IF(B25>B26 AND B25>B27,25,IF(B25<B26 AND B25<B27,-25,IF(B26>B27 AND

B26>B28,26,IF(B26<B27 AND B26<B28,-26,
IF(B27>B28 AND B27>B29,27,IF(B27<B28 AND B27<B29,-27,IF(B28>B29 AND

B28>B30,28,IF(B28<B29 AND B28<B30,-28,
IF(B29>B30 AND B29>B31,29,IF(B29<B30 AND B29<B31,-29,IF(B30>B31 AND

B30>B32,30,IF(B30<B31 AND B30<B32,-30,
IF(B31>B32 AND B31>B33,31,IF(B31<B32 AND B31<B33,-31,IF(B32>B33 AND

B32>B34,32,IF(B32<B33 AND B32<B34,-32,
IF(B33>B34 AND B33>B35,33,IF(B33<B34 AND B33<B35,-33,IF(B34>B35 AND

B34>B36,34,IF(B34<B35 AND B34<B36,-34,
IF(B35>B36 AND B35>B37,35,IF(B35<B36 AND B35<B37,-35,IF(B36>B37 AND

B36>B38,36,IF(B36<B37 AND B36<B38,-36,
IF(B37>B38 AND B37>B39,37,IF(B37<B38 AND B37<B39,-37,IF(B38>B39 AND

B38>B40,38,IF(B38<B39 AND B38<B40,-38,
IF(B39>B40 AND B39>B41,39,IF(B39<B40 AND B39<B41,-39,IF(B40>B41 AND

B40>B42,40,IF(B40<B41 AND B40<B42,-40,
IF(B41>B42 AND B41>B43,41,IF(B41<B42 AND B41<B43,-41,IF(B42>B43 AND

B42>B44,42,IF(B42<B43 AND B42<B44,-42,
IF(B43>B44 AND B43>B45,43,IF(B43<B44 AND B43<B45,-43,IF(B44>B45 AND

B44>B46,44,IF(B44<B45 AND B44<B46,-44,
IF(B45>B46 AND B45>B47,45,IF(B45<B46 AND B45<B47,-45,IF(B46>B47 AND

B46>B48,46,IF(B46<B47 AND B46<B48,-46,
IF(B47>B48 AND B47>B49,47,IF(B47<B48 AND B47<B49,-47,IF(B48>B49 AND

B48>B50,48,IF(B48<B49 AND B48<B50,-48,
0))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))

))))))))))))))))))))))))))));
{-------------------------------------------------------------------

-}
生命线:EMA(Var1,13),ColorFFFFFF;
资金成本:=DMA(Var1,VOL/CAPITAL),COLORCYAN;
短期成本:EMA(Var1,p),ColorFF8000,linethick2;
中期成本:EMA(Var1,34),ColorFF00FF;
长期成本:EMA(Var1,55),ColorFF0000;
长250期:EMA(Var1,250),Color008000;

//长期成本:EMA(Var1,55),COLORBLUE;
快:=B1,POINTDOT,LINETHICK1,COLORYELLOW;
慢:=B2,POINTDOT,LINETHICK1,COLORMAGENTA;
{----------------------------------------------------}

STICKLINE((HL=2 and HG=3) ,C0,B1,5,0),COLORMAGENTA;
STICKLINE((HL=2 and HG=2) ,C0,B1,5,0),COLORMAGENTA;
STICKLINE((HL=2 and HG=0) ,C0,B1,5,0),COLORMAGENTA;
STICKLINE((HL=2 and HG=-1) ,B2,B1,5,0),COLORYELLOW;
STICKLINE((HL=2 and HG=-1) ,C0,B2,5,0),COLORred;
STICKLINE((HL=2 and HG=-2) ,C0,B2,5,0),COLORred;
STICKLINE((HL=2 and HG=-3) ,C0,B2,5,0),COLORred;
STICKLINE((HL=1 and HG=-1) ,C0,B1,5,1),COLORred;
STICKLINE((HL=1 and HG=-2) ,C0,B1,5,1),COLORred;
STICKLINE((HL=1 and HG=-3) ,C0,B1,5,1),COLORred;
STICKLINE((HL=1 and HG=0) ,C0,B1,5,1),COLORred;
STICKLINE((HL=1 and HG=1) ,C0,B1,5,1),COLORred;
STICKLINE((HL=1 and HG=2) ,C0,B1,5,1),COLORred;
STICKLINE((HL=1 and HG=3) ,C0,B1,5,1),COLORred;

STICKLINE((HL=0 and HG=1) ,C0,B1,5,0),COLORBLUE;
STICKLINE((HL=0 and HG=2) ,C0,B1,5,0),COLORBLUE;
STICKLINE((HL=0 and HG=3) ,C0,B1,5,0),COLORBLUE;
STICKLINE((HL=0 and HG=-1) ,C0,B1,5,0),COLORYELLOW;
STICKLINE((HL=0 and HG=-2) ,C0,B1,5,0),ColorYELLOW;
STICKLINE((HL=0 and HG=-3) ,C0,B1,5,0),Color00004D;
STICKLINE((HL=-1 and HG=3) ,C0,B2,5,0),COLORGREEN;
STICKLINE((HL=-1 and HG=2) ,C0,B2,5,0),COLORGREEN;
STICKLINE((HL=-1 and HG=2) ,B2,B1,5,0),COLORCYAN;
STICKLINE((HL=-1 and HG=-1) ,C0,B1,5,1),COLORGREEN;
STICKLINE((HL=-1 and HG=-2) ,C0,B1,5,1),COLORGREEN;
STICKLINE((HL=-1 and HG=-3) ,C0,B1,5,1),COLORGREEN;
STICKLINE((HL=-2 and HG=3) ,C0,B1,5,1),COLORred;
STICKLINE((HL=-2 and HG=2) ,C0,B1,5,1),COLORGREEN;
STICKLINE((HL=-2 and HG=1) ,C0,B1,5,0),COLORGREEN;
STICKLINE((HL=-2 and HG=0) ,C0,B1,5,0),COLORGRAY;
STICKLINE((HL=-2 and HG=-1) ,C0,B1,5,1),COLORGREEN;
STICKLINE((HL=-2 and HG=-2) ,C0,B1,5,0),COLORYELLOW;
STICKLINE((HL=-2 and HG=-3) ,C0,B1,5,0),COLORYELLOW;
A:=90+(100-90)/2;
B:=(100-90)/2;
CC:=COST(A);
DD:=COST(B);
SCR:=(CC-DD)/(CC+DD)*100;
A1:=70+(100-70)/2;
B1:=(100-70)/2;
CC1:=COST(A1);
DD1:=COST(B1);
SCR1:=(CC1-DD1)/(CC1+DD1)*100;
EXPLAINEX(vol>0,'90%筹码集中度=',SCR,1,0),COLORred;
EXPLAINEX(vol>0,'70%筹码集中度=',SCR1,1,0),COLORred;
AA2:=1.05*CLOSE;
BB2:=0.95*CLOSE;
DD2:=COST(100);
EE2:=COST(0);
cc2:=WINNER(AA2 )*100-WINNER(BB2)*100;
tx:=MA(WINNER(BB2)*100-WINNER(ee2)*100,1),linethick1,coloraaaaff;
dx:=MA(WINNER(DD2)*100-WINNER(AA2)*100,1),linethick1;
zxpy:=MA(CC2,1),linethick1,color0011ff;
EXPLAINEX(vol>0,'获利筹码=',tx,1,0),COLORYELLOW;
EXPLAINEX(vol>0,'套牢筹码=',dx,1,0),COLORYELLOW;
EXPLAINEX(vol>0,'浮动筹码=',zxpy,1,0),COLORYELLOW;
EXPLAINEX(vol>0,'★★量价密码=',HL,1,0),COLORMAGENTA;
EXPLAINEX(vol>0,'★★资金密码=',HG,1,0),COLORMAGENTA;
EXPLAIN(HL=2 and HG=4,'★结论:极端上升,临近头部小

心。'),COLORMAGENTA;
EXPLAIN(HL=2 and HG=2,'▲结论:强势冲击,继续持股待涨。'),colorred;
EXPLAIN(HL=2 and HG=-1,'▲结论:启稳攻击,可以择机买入。'),colorred;
EXPLAIN(HL=2 and HG=-3,'▲结论:强势之底,抓住好机会。'),colorred;
EXPLAIN(HL=1 and HG=3,'▲结论:多空分歧大,多方略优。'),colorred;
EXPLAIN(HL=1 and HG=1,'▲结论:升势状态,恭喜继续持有。'),colorred;
EXPLAIN(HL=1 and HG=-2,'▲结论:攻击开始,适当跟踪或追买。'),colorred;
EXPLAIN(HL=0 and HG=3,'●结论:多空分歧加大,注意K线方

向。'),colorYELLOW;
EXPLAIN(HL=0 and HG=2,'●结论:多空分歧加大,注意K线方

向。'),colorYELLOW;
EXPLAIN(HL=0 and HG=1,'★结论:上攻乏力,建议减仓为好。'),COLORCYAN;
EXPLAIN(HL=0 and HG=-1,'▲结论:初步启稳,逢低少量试

买。'),colorYELLOW;
EXPLAIN(HL=0 and HG=-2,'▲结论:初步启稳,逢低少量试

买。'),colorYELLOW;
EXPLAIN(HL=-1 and HG=4,'★结论:头部成立,建议迅速出局。'),COLORCYAN;
EXPLAIN(HL=-1 and HG=2,'★结论:调整开始,逢高出局观望。'),COLORCYAN;
EXPLAIN(HL=-1 and HG=-1,'★结论:跌势状态,空仓等待。'),Color00FF00;
EXPLAIN(HL=-1 and HG=-3,'●结论:超跌之底,继续密切观注。'),COLORCYAN;
EXPLAIN(HL=-2 and HG=3,'★结论:多空分歧大,空方胜优。'),COLORGRAY;
EXPLAIN(HL=-2 and HG=1,'●结论:减仓动作,可能变盘向下。'),COLORgreen;
EXPLAIN(HL=-2 and HG=-2,'●▲结论:强势之底,可能变盘向

上。'),COLORYELLOW;
{------------------------------------------------------}
EXPLAIN(c>0  ,'★放头雁,打二雁妙。'),ColorFF9900;
{---------------------------------------------------------}
EXPLAIN(c>0  ,'●指标是死的 人是活的●'),ColorFFFFFF;

{------------------------------------------------------------}

清风斜阳 2005-3-19 18:18

&raquo; 财智论坛版主清风斜阳搜集编制系列指标 &raquo; 发表回复

N:=CLOSE-REF(CLOSE,9);
var1:=EMA(EMA(N,14),21)/EMA(EMA(ABS(N),14),21)*100;
var3:=EMA(EMA(N,4),9)/EMA(EMA(ABS(N),4),9)*100;
卖出:IF(var1>0 AND CROSS(var3,var1),-40,0),stick,linethick1,colorgreen;  
DRAWTEXT(卖出,98,'逃'),colorgreen;

Vare:=EMA(CLOSE,7);
Varf:=EMA(Vare,20);
Varg:=CROSS(Vare,Varf);
Varh:=Vare<EMA(CLOSE,44);
Vari:=EMA(SMA((CLOSE-LLV(LOW,19))/(HHV(HIGH,19)-LLV(LOW,19))*100,8,1),3);
起动:IF(Varg AND Varh,100,0),COLORRED,LINETHICK3;

Var26:=(CLOSE-REF(CLOSE, 1))/REF(CLOSE, 1)*100;
Var27:=(EMA(CLOSE, 6)-EMA(CLOSE, 12))*100;
Var28:=EMA(Var27, 3);
Var28:=EMA(Var27, 3);
买进:STICKLINE(Var27<(20) AND Var26>7,0,(-40),10, 0), Color0000FF;
DRAWTEXT(Var27<(20) AND Var26>7 AND Var27<Var28,-8, '★买'),Color00FF00;
DRAWTEXT(Var27<(20) AND Var26>7 AND Var27>=Var28, -8, '★买'),Color00FF00;
RSV:= (HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100;
LWR1:SMA(RSV,3,1),ColorFFFFFF,linethick3;
LWR2:SMA(LWR1,3,1),Color00FFFF,linethick3;
LWR3:LWR1*3-LWR2*2,ColorFF00FF,linethick3;
VarA:=3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)-2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VarB:=(CLOSE-LLV(LOW,26))/(HHV(HIGH,26)-LLV(LOW,26))*100;
VarC:=SMA(SMA(VarB,3,1),3,1);
VarD:=EMA(VarC,9);
底部:STICKLINE(CROSS(VarD,10) AND VarD>10,-30,0,10,0),Color4B9EA5,LINETHICK1;
追:STICKLINE(CROSS(VarD,16) AND VarD>8,-40,0,10,0),Color00FFFF,LINETHICK1;
DRAWTEXT(VarD<(9) AND VarD>8 AND VarD>=VarD, 95, '底'),Color00FF00;

清风斜阳 2005-3-19 18:21

财智论坛版主清风斜阳搜集编制系列指标 &raquo; 发表回复

参数描述: N(1,50,20)M1(1,30,4)M2(1,30,2)Q1(0,100,30)
=======================================================================================
Var1:=IF(YEAR>=2011 AND MONTH>6,0,1);
Var2:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100*Var1;
Var3:=SMA(Var2,M1,1)*Var1;
Var4:=SMA(Var3,M2,1)*Var1;
Var5:=VOL/CAPITAL*100*Var1;
Var6:=REF(Var5,1)*Var1;
机构建仓: Var4<14.5 AND Var3<11*Var1;
大户减仓: Var6>Q1 AND Var6<47*Var1;
机构减仓: Var4>82 AND Var3>89*Var1;
股价临界: Var4>85 AND Var3>95*Var1;

清风斜阳 2005-3-19 18:22

财智论坛版主清风斜阳搜集编制系列指标 &raquo; 发表回复

技术指标公式:飓风V5.0 (付氏捕食)  缺省周期:日线
=======================================================================================
Var1:=(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*200-110;
散户: SMA(Var1,8,1), , [00010001];
Var2:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*200-100;
主力: SMA(SMA(Var2,5,1),3,1), , [00010001];
生死线: 0, , [00010001];
Var3:=MA(CLOSE,5);
Var4:=MA(CLOSE,10);
Var5:=MA(CLOSE,30);
Var6:=Var5+2*STD(CLOSE,60);
Var7:=Var5-2*STD(CLOSE,60);
Var8:=MA(CLOSE,5);
Var9:=MA(CLOSE,34);
VarA:=MA(CLOSE,60);
VarB:=MA(CLOSE,13);
VarC:=(EMA(CLOSE,5)*7+EMA(CLOSE,5)*3)/10;
VarD:=REF(CLOSE,1);
VarE:=SMA(MAX(CLOSE-VarD,0),6,1)/SMA(ABS(CLOSE-VarD),6,1)*100;
DRAWTEXT(CROSS(84,VarE),(-1)*VarE,'☆'), , [00010001];
IF(CROSS(84,VarE),(-1)*VarE,0), , [00010001];
VarF:=(2*CLOSE+HIGH+LOW)/4;
Var10:=LLV(LOW,34);
Var11:=HHV(HIGH,34);
Var12:=EMA((VarF-Var10)/(Var11-Var10)*100,6);
Var13:=EMA(0.667*REF(Var12,1)+0.333*Var12,4);
Var14:=LLV(LOW,120);
Var15:=HHV(HIGH,120);
Var16:=Var15-Var14;
IF(IF(COUNT(CLOSE<REF(CLOSE,1),8)/8>0.3 AND COUNT(Var12>Var13,3) AND REF(LOW,1)=LLV(LOW,120) AND CLOSE>OPEN,1,0),52,0), , [00010001];
Var17:=3;
Var18:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
IF(CROSS(Var18,Var17),52,0), , [00010001];
DRAWTEXT(CROSS(Var18,Var17),52,'★'), , [00010001];
Var19:=(CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100;
Var1A:=SMA(Var8,4,1);
Var1B:=SMA(Var9,2,1);
Var1C:=VOL/CAPITAL*34;
Var1D:=REF(Var1C,1);
IF(Var1D>4 AND Var1D<4.2,-60,0), , [00010001];

清风斜阳 2005-3-19 18:29

财智论坛版主清风斜阳搜集编制系列指标 &raquo; 发表回复

Var1:=DATE>901224 AND DATE<1040608;
趋势线: Var1*((3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1)-50)*1.032+50), , [00010001];
Var2:=(2*CLOSE+HIGH+LOW+OPEN)/5;
Var3:=LLV(LOW,34);
Var4:=HHV(HIGH,34);
SK: EMA((Var2-Var3)/(Var4-Var3)*100,13)*Var1, , [00010001];
SD: EMA(SK,2)*Var1, , [00010001];
Var5:=EMA(CLOSE,12)-EMA(CLOSE,26);
Var6:=EMA(Var5,9);
Var7:=Var1*CLOSE*1.236<MA(CLOSE,60);
Var8:=CLOSE/REF(CLOSE,1)>1.021;
Var9:=(HIGH-CLOSE)*1.36<=CLOSE-OPEN;
VarA:=(MA(CLOSE,120)-CLOSE)/CLOSE*100;
VarB:=ABS(Var5-Var6);
VarC:=STD(CLOSE,90)*10;
VarD:=COUNT((REF(CLOSE,15)-CLOSE)/CLOSE*100>45,5);
买91: Var1*Var7 AND Var8 AND Var9 AND VarC<25 AND CLOSE<8 AND VarA<114 AND VarB<=0.23*40, , [00050002];
VarE:=SLOPE(CLOSE,40);
VarF:=COUNT((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)<-0.098,90);
Var10:=(MA(CLOSE,120)-CLOSE)/CLOSE*100;
Var11:=Var1*STD(CLOSE,63)*10;
Var12:=Var1*(MA(CLOSE,76)-MA(CLOSE,13)/3);
Var13:=Var1*MA((CLOSE-Var12)/Var12,1);
买87: Var1*IF(CROSS(Var13,-0.008) AND VarE>-0.618 AND Var10<114 AND Var11<23.6 AND VarF<8 AND LOW/REF(HIGH,1)<1.145 OR REF(Var13,2)=LLV(Var13,20) AND REF(Var13,2)<0.042 AND VarF<8 AND REF(Var13,2)<REF(Var13,1) AND NOT(REF(LOW,1)>REF(HIGH,2) AND LOW>REF(HIGH,1)) AND Var13>-0.368 AND CLOSE>REF(CLOSE,1),68,0), , [00050002];
Var14:=MA(CLOSE,5);
Var15:=MA(CLOSE,10);
Var16:=MA(CLOSE,20);
Var17:=MA(CLOSE,30);
Var18:=MA(CLOSE,60);
Var19:=MA(CLOSE,150);
Var1A:=MA(CLOSE,250);
Var1B:=Var1*VOL/CAPITAL*100;
Var1C:=(CLOSE-Var1A)/Var1A*100;
Var1D:=Var1*(CLOSE/REF(CLOSE,1)-1)*100;
Var1E:=PWINNER(1,CLOSE);
Var1F:=IF(Var1>0.75 AND Var1<0.901,0.618,1);
牛97: IF(Var14>Var15 AND Var15>Var16 AND Var16>Var17 AND Var16>Var18 AND Var19>Var1A AND (Var1E>=0.9 OR Var1E>0.76 AND Var1E<0.901 AND Var1D>5 AND Var1B>5) AND Var1D>1.8 AND Var1C<40 AND CLOSE>3 AND (CLOSE-Var18)/Var18<0.25 AND Var1B<=6 AND Var4*Var1B>=1 AND CLOSE<18.5,76,0), , [00090002];
Var20:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
Var21:=(MA(CLOSE,48)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
Var22:=Var1*(MA(CLOSE,12)+MA(CLOSE,24)+MA(CLOSE,48)+MA(CLOSE,96))/4;
Var23:=Var1*MA(CLOSE,250);
Var24:=MA(CLOSE,125);
牛: IF(SD>18 AND SK<75 AND CROSS(Var20,Var21) AND (Var22-Var23)/Var23<0.161 AND REF(SK,3)<SK AND REF(Var22,1)<Var22,95,0), , [00050002];
Var25:=CLOSE/MA(CLOSE,3)>=1.05 AND CLOSE=HHV(CLOSE,3) AND MA(VOL,2)/MA(VOL,40)>=3 AND MA(VOL,2)=HHV(MA(VOL,2),3) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
Var26:=REF(CLOSE,1);
Var27:=SMA(MAX(CLOSE-Var26,0),5,1)/SMA(ABS(CLOSE-Var26),5,1)*100;
Var28:=Var1*COUNT(Var27<25,20)>=1;
Var29:=(HIGH-LOW)/HIGH*100+(CLOSE-Var26)/Var26*100;
Var2A:=EMA(MA(Var29,41),6);
Var2B:=Var2A>LLV(Var2A,6)*1.02 AND REF(Var2A,1)<REF(LLV(Var2A,6),1)*1.02 AND LLV(Var2A,29)=LLV(Var2A,6);
Var2C:=Var1*LLV(LOW,6)=LLV(LOW,41) AND LLV(LOW,6)<HHV(LOW,41)*71/100*Var1;
Var2D:=HIGH>LOW*1.033;
涨势确立: Var1*(Var2C>0 AND Var2D*16+81.5)*Var1, , [00010001];
买入: IF(CROSS(趋势线,21),50,18.5)*Var1, , [00010001];
卖出: IF(CROSS(87,趋势线),50,81.5)*Var1, , [00010001];
DRAWTEXT(Var2C>0 AND Var2D,88,'↑')*Var1, , [00010001];
Var2E:=IF(CROSS(SK,SD),25,18.5);
Var2F:=IF(CROSS(SD,SK),75,81.5);
卖线: Var2F*Var1, , [00010001];
买线: Var2E*Var1, , [00010001];
Var13<0.06*(-10)+81.5, , [00010001];
Var30:=0-SQRT(SQRT(FLOOR(SQRT(MA(1/WINNER(CLOSE)*100,4)/10000))))*5*Var1;
STICKLINE(Var30<-2,0,Var30,1.5,1), , [00010001];
Var31:=DATE=1040528;
DRAWTEXT(Var31,94,'软件6月8日到期,如果您认为好用请注册,支持作者开发,您将不断享受更多的软件升级,QQ:275617947'), , [00010001];

清风斜阳 2005-3-20 01:41

筹码黄金分割

aa:=hhv(h,50000);{上市以来的最高价对应的筹码的价位}
bb:=llv(l,250);       {250天以来的最低价对应的筹码的价位}
ss:=aa-bb;             {最高筹码与最低筹码之间的价差}
STICKLINE(c>0,ss*0.191+bb,ss*0.191+bb,10,0); {以下几句是分别对应的黄金分割位置对应价位}
STICKLINE(c>0,ss*0.382+bb,ss*0.382+bb,10,0);
STICKLINE(c>0,ss*0.5+bb,ss*0.5+bb,10,0);
STICKLINE(c>0,ss*0.618+bb,ss*0.618+bb,10,0);
STICKLINE(c>0,ss*0.809+bb,ss*0.809+bb,10,0);
STICKLINE(c>0,bb,bb,10,0);
1.强行拉升突破点
  当股价放量突破(0.809)位置时,是一种没有解套盘的拉升突破.往往是比较大的行情
的启动点.

2.反抽拉升的启动点
    当股价经过比较大的下跌后,往往市场主力是在下跌的最后段开始进货的,即打压进货.
对于这类股票,我们投资(投机)者往往不知道什么时间主力才能拉升.
    ****困扰我们的问题是****
    A.买早了,靠不起,尤其是自己手中的股票不涨,而其它股票上涨的时间,最难忍耐;
    B.买晚了,心理有不平衡;
   那么,什么时间下手?  当股价带量(换手在3%-5%之间),突破(0.191)位置时是最佳买点.

前面我们讲了:黄金分割的两个位(0.809)和(0.191)在寻找启动点的位置的应用.其他线的作用同理.
在这里给出一个口决:
      1.穿下线;
      2.上线看;
      3.上线压;
      4.下线见;
      5.锁定赚;
      6.可别贪!

上面的18字诀总结了这个指标的特性.我想不难理解.
这个指标的使用要领已经讲的很清楚了.祝朋友们使用愉快!}

清风斜阳 2005-3-20 01:49

分析家版:资金为王 没用飞狐-源码-

REFLINE:-200, 0, 300;
CYC1:=DMA((CLOSE+OPEN)/2,VOL/(SMA(VOL,3,1)*3));
aa:=CYC1-ref(CYC1,1);
Var6:=(2*CLOSE+HIGH+LOW)/4;
VarB:=HHV(HIGH,34);
Var8:=LLV(LOW,34);
VarC:=EMA(0.667*REF(EMA((Var6-Var8)/(VarB-Var8)*100,13),1)+0.333*EMA((Var6-Var8)/(VarB-Var8)*100,13),2);
Var1:=SMA(AA*VarC,34,1)*80;
C0:=INTPART(Var1*1000)/1000;
{REFLINE:-20, 0, 30;N 3  1 100
M 34 1 100
P 8  1  100
X 1  1  100

CYC1:=DMA((CLOSE+OPEN)/2,VOL/(SMA(VOL,n,1)*n));-------------------------------------------------------------------

-}
B1:=REF(C0,1);B2:=REF(C0,2);B3:=REF(C0,3);B4:=REF(C0,4);B5:=REF

(C0,5);B6:=REF(C0,6);B7:=REF(C0,7);
B8:=REF(C0,8);B9:=REF(C0,9);B10:=REF(C0,10);B11:=REF(C0,11);B12:=REF

(C0,12);B13:=REF(C0,13);B14:=REF(C0,14);
B15:=REF(C0,15);B16:=REF(C0,16);B17:=REF(C0,17);B18:=REF

(C0,18);B19:=REF(C0,19);B20:=REF(C0,20);
B21:=REF(C0,21);B22:=REF(C0,22);B23:=REF(C0,23);B24:=REF

(C0,24);B25:=REF(C0,25);B26:=REF(C0,26);
B27:=REF(C0,27);B28:=REF(C0,28);B29:=REF(C0,29);B30:=REF

(C0,30);B31:=REF(C0,31);B32:=REF(C0,32);
B33:=REF(C0,33);B34:=REF(C0,34);B35:=REF(C0,35);B36:=REF

(C0,36);B37:=REF(C0,37);B38:=REF(C0,38);
B39:=REF(C0,39);B40:=REF(C0,40);B41:=REF(C0,41);B42:=REF

(C0,42);B43:=REF(C0,43);B44:=REF(C0,44);
B45:=REF(C0,45);B46:=REF(C0,46);B47:=REF(C0,47);B48:=REF

(C0,48);B49:=REF(C0,49);B50:=REF(C0,50);
HL:=IF(C0>B1 AND B1>=B2,1,IF(C0<B1 AND B1<=B2,-1,IF(C0>B2 AND

B2>B1,2,IF(C0<B2 AND B2<B1,-2,0))));
HG:=IF(B1>B2 AND B1>B3,1,IF(B1<B2 AND B1<B3,-1,IF(B2>B3 AND

B2>B4,2,IF(B2<B3 AND B2<B4,-2,
IF(B3>B4 AND B3>B5,3,IF(B3<B4 AND B3<B5,-3,IF(B4>B5 AND B4>B6,4,IF

(B4<B5 AND B4<B6,-4,
IF(B5>B6 AND B5>B7,5,IF(B5<B6 AND B5<B7,-5,IF(B6>B7 AND B6>B8,6,IF

(B6<B7 AND B6<B8,-6,
IF(B7>B8 AND B7>B9,7,IF(B7<B8 AND B7<B9,-7,IF(B8>B9 AND B8>B10,8,IF

(B8<B9 AND B8<B10,-8,
IF(B9>B10 AND B9>B11,9,IF(B9<B10 AND B9<B11,-9,IF(B10>B11 AND

B10>B12,10,IF(B10<B11 AND B10<B12,-10,
IF(B11>B12 AND B11>B13,11,IF(B11<B12 AND B11<B13,-11,IF(B12>B13 AND

B12>B14,12,IF(B12<B13 AND B12<B14,-12,
IF(B13>B14 AND B13>B15,13,IF(B13<B14 AND B13<B15,-13,IF(B14>B15 AND

B14>B16,14,IF(B14<B15 AND B14<B16,-14,
IF(B15>B16 AND B15>B17,15,IF(B15<B16 AND B15<B17,-15,IF(B16>B17 AND

B16>B18,16,IF(B16<B17 AND B16<B18,-16,
IF(B17>B18 AND B17>B19,17,IF(B17<B18 AND B17<B19,-17,IF(B18>B19 AND

B18>B20,18,IF(B18<B19 AND B18<B20,-18,
IF(B19>B20 AND B19>B21,19,IF(B19<B20 AND B19<B21,-19,IF(B20>B21 AND

B20>B22,20,IF(B20<B21 AND B20<B22,-20,
IF(B21>B22 AND B21>B23,21,IF(B21<B22 AND B21<B23,-21,IF(B22>B23 AND

B22>B24,22,IF(B22<B23 AND B22<B24,-22,
IF(B23>B24 AND B23>B25,23,IF(B23<B24 AND B23<B25,-23,IF(B24>B25 AND

B24>B26,24,IF(B24<B25 AND B24<B26,-24,
IF(B25>B26 AND B25>B27,25,IF(B25<B26 AND B25<B27,-25,IF(B26>B27 AND

B26>B28,26,IF(B26<B27 AND B26<B28,-26,
IF(B27>B28 AND B27>B29,27,IF(B27<B28 AND B27<B29,-27,IF(B28>B29 AND

B28>B30,28,IF(B28<B29 AND B28<B30,-28,
IF(B29>B30 AND B29>B31,29,IF(B29<B30 AND B29<B31,-29,IF(B30>B31 AND

B30>B32,30,IF(B30<B31 AND B30<B32,-30,
IF(B31>B32 AND B31>B33,31,IF(B31<B32 AND B31<B33,-31,IF(B32>B33 AND

B32>B34,32,IF(B32<B33 AND B32<B34,-32,
IF(B33>B34 AND B33>B35,33,IF(B33<B34 AND B33<B35,-33,IF(B34>B35 AND

B34>B36,34,IF(B34<B35 AND B34<B36,-34,
IF(B35>B36 AND B35>B37,35,IF(B35<B36 AND B35<B37,-35,IF(B36>B37 AND

B36>B38,36,IF(B36<B37 AND B36<B38,-36,
IF(B37>B38 AND B37>B39,37,IF(B37<B38 AND B37<B39,-37,IF(B38>B39 AND

B38>B40,38,IF(B38<B39 AND B38<B40,-38,
IF(B39>B40 AND B39>B41,39,IF(B39<B40 AND B39<B41,-39,IF(B40>B41 AND

B40>B42,40,IF(B40<B41 AND B40<B42,-40,
IF(B41>B42 AND B41>B43,41,IF(B41<B42 AND B41<B43,-41,IF(B42>B43 AND

B42>B44,42,IF(B42<B43 AND B42<B44,-42,
IF(B43>B44 AND B43>B45,43,IF(B43<B44 AND B43<B45,-43,IF(B44>B45 AND

B44>B46,44,IF(B44<B45 AND B44<B46,-44,
IF(B45>B46 AND B45>B47,45,IF(B45<B46 AND B45<B47,-45,IF(B46>B47 AND

B46>B48,46,IF(B46<B47 AND B46<B48,-46,
IF(B47>B48 AND B47>B49,47,IF(B47<B48 AND B47<B49,-47,IF(B48>B49 AND

B48>B50,48,IF(B48<B49 AND B48<B50,-48,
0))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))

))))))))))))))))))))))))))));
{-------------------------------------------------------------------

-}
生命线:EMA(Var1,13),ColorFFFFFF;
资金成本MA(Var1,VOL/CAPITAL),COLORCYAN;
短期成本:EMA(Var1,8),ColorFF8000,linethick2;
中期成本:EMA(Var1,34),ColorFF00FF;
长期:EMA(Var1,250),Color008000;

长期成本:EMA(Var1,55),COLORBLUE;
快:B1,POINTDOT,LINETHICK1,COLORYELLOW;
慢:B2,POINTDOT,LINETHICK1,COLORMAGENTA;
{----------------------------------------------------}

STICKLINE((HL=2 and HG=3) ,C0,B1,5,0),COLORMAGENTA;
STICKLINE((HL=2 and HG=2) ,C0,B1,5,0),COLORMAGENTA;
STICKLINE((HL=2 and HG=0) ,C0,B1,5,0),COLORMAGENTA;
STICKLINE((HL=2 and HG=-1) ,B2,B1,5,0),COLORYELLOW;
STICKLINE((HL=2 and HG=-1) ,C0,B2,5,0),COLORred;
STICKLINE((HL=2 and HG=-2) ,C0,B2,5,0),COLORred;
STICKLINE((HL=2 and HG=-3) ,C0,B2,5,0),COLORred;
STICKLINE((HL=1 and HG=-1) ,C0,B1,5,1),COLORred;
STICKLINE((HL=1 and HG=-2) ,C0,B1,5,1),COLORred;
STICKLINE((HL=1 and HG=-3) ,C0,B1,5,1),COLORred;
STICKLINE((HL=1 and HG=0) ,C0,B1,5,1),COLORred;
STICKLINE((HL=1 and HG=1) ,C0,B1,5,1),COLORred;
STICKLINE((HL=1 and HG=2) ,C0,B1,5,1),COLORred;
STICKLINE((HL=1 and HG=3) ,C0,B1,5,1),COLORred;

STICKLINE((HL=0 and HG=1) ,C0,B1,5,0),COLORBLUE;
STICKLINE((HL=0 and HG=2) ,C0,B1,5,0),COLORBLUE;
STICKLINE((HL=0 and HG=3) ,C0,B1,5,0),COLORBLUE;
STICKLINE((HL=0 and HG=-1) ,C0,B1,5,0),COLORYELLOW;
STICKLINE((HL=0 and HG=-2) ,C0,B1,5,0),ColorYELLOW;
STICKLINE((HL=0 and HG=-3) ,C0,B1,5,0),Color00004D;
STICKLINE((HL=-1 and HG=3) ,C0,B2,5,0),COLORGREEN;
STICKLINE((HL=-1 and HG=2) ,C0,B2,5,0),COLORGREEN;
STICKLINE((HL=-1 and HG=2) ,B2,B1,5,0),COLORCYAN;
STICKLINE((HL=-1 and HG=-1) ,C0,B1,5,1),COLORGREEN;
STICKLINE((HL=-1 and HG=-2) ,C0,B1,5,1),COLORGREEN;
STICKLINE((HL=-1 and HG=-3) ,C0,B1,5,1),COLORGREEN;
STICKLINE((HL=-2 and HG=3) ,C0,B1,5,1),COLORred;
STICKLINE((HL=-2 and HG=2) ,C0,B1,5,1),COLORGREEN;
STICKLINE((HL=-2 and HG=1) ,C0,B1,5,0),COLORGREEN;
STICKLINE((HL=-2 and HG=0) ,C0,B1,5,0),COLORGRAY;
STICKLINE((HL=-2 and HG=-1) ,C0,B1,5,1),COLORGREEN;
STICKLINE((HL=-2 and HG=-2) ,C0,B1,5,0),COLORYELLOW;
STICKLINE((HL=-2 and HG=-3) ,C0,B1,5,0),COLORYELLOW;

清风斜阳 2005-3-20 01:50

春意融融

★★★★
Var1:=SUM(WINNER(CLOSE)*100,10 )/10;
Var2:=SUM(WINNER(CLOSE)*100,10 )/20;
ZSYD:Var1-(Var2+10),COLORSTICK;
PP:=Var1-(Var2+10);
PD:=MA(ZSYD,8);
if(PP>0,0,PP),COLORGREEN;
河水:if(PP<0,0,PP),COLORBLUE;
水面冰封:if(PP<0,0,2),COLORWHITE;
春意融融:if(PP>PD,PP+1,PP),COLOR00FFFF,LINETHICK2;
if(PP>PD,PP-2,PP),COLORWHITE;
冲破冰封:IF(CROSS(PP,0),20,0),COLORBLUE;
破冰:if(冲破冰封>0,10,0),COLORWHITE;

gjl 2005-3-20 09:53

xiexie!

清风斜阳 2005-3-20 17:42

曲娟的指标后改编

Var1:=EMA((CLOSE+LOW+OPEN+HIGH)/4,3);
STICKLINE(Var1>=REF(Var1,1) AND DATE<=9040331,OPEN,CLOSE,7,0);
STICKLINE(Var1>=REF(Var1,1) AND CLOSE<=OPEN AND DATE<=9040331,OPEN,CLOSE,7,0);
STICKLINE(Var1<=REF(Var1,1) AND CLOSE>OPEN AND DATE<=9040331,OPEN,CLOSE,7,1);
STICKLINE(Var1<=REF(Var1,1) AND CLOSE<=OPEN AND DATE<=9040331,OPEN,CLOSE,7,0);
B1: IF(DATE<=9040331,FORCAST(Var1,5),0);
趋势线: IF(DATE<=9040331,FORCAST(Var1,N),0) linethick2;
B: IF(DATE<=9040331,FORCAST((CLOSE+LOW+OPEN+HIGH)/4,3),0);
辅助牛线: IF(DATE<=9040331,FORCAST((CLOSE+LOW+OPEN+HIGH)/4,150),0) COLORRED LINETHICK3;
牛牛线: EMA((CLOSE+LOW+OPEN+HIGH)/4,120) colorcyan,linethick4;

清风斜阳 2005-3-20 17:44

乖离kdj

Var1:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
Var2:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
Var3:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
Var4:=(Var1+2*Var2+3*Var3)/6;
Var5:=MA(Var4,3)-STD(Var4,3);
STICKLINE(Var5<-36,125,110,6,0), ,COLOR95FBDD ;
STICKLINE(Var5<-28 AND Var5>-36,115,100,6,0), ,COLORMAGENTA ;
STICKLINE(Var5<-24 AND Var5>-28,105,85,6,0), , COLORYELLOW;
STICKLINE(Var5<-20 AND Var5>-24,95,65,6,0), , COLORRED;
STICKLINE(Var5<-18 AND Var5>-20,85,55,6,0), ,COLORDDAA78 ;
STICKLINE(Var5<-16 AND Var5>-18,75,45,6,0), ,COLORFFE0C0;
STICKLINE(Var5<-14 AND Var5>-16,65,35,6,0), , ;
STICKLINE(Var5<-12 AND Var5>-14,50,20,5,0), ,  COLORGREEN;
STICKLINE(Var5<-9 AND Var5>-12,35,5,5,0), , COLORAAAE5D;
STICKLINE(Var5<-6 AND Var5>-9,-2,-15,5,0), , COLORWHITE;
Var6:=STICKLINE(Var5<-4 AND Var5>-6,-17,-30,5,0);
Var7:=(EMA(CLOSE,12)-EMA(CLOSE,26))*100+50;
Var8:=EMA(Var7,9);
Var9:=2*(Var7-Var8);
VarA:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K: SMA(VarA,3,1), , COLORYELLOW;
VarB:=SMA(K,3,1);
J: 3*K-2*VarB, , COLORGREEN;
试探介入: IF(CROSS(J,VarB) AND COUNT(Var5<-9,4)>=1,65,-15),LINETHICK2 , COLOR6ACCFF;
果断介入: IF(CROSS(J,VarB) AND COUNT(Var5<-12,3)>=1,95,1), , COLORMAGENTA;
主力介入: IF(CROSS(J,VarB) AND COUNT(Var5<-16,4)>=1,40,-15), , COLORWHITE;
VarC:=DRAWICON(CROSS(J,1),1,1);
98;

清风斜阳 2005-3-20 17:45

机构建仓

Var1:=COST(999999999999999999999999999);
Var2:=REVERSE((REF(CLOSE,1)-CLOSE)/CLOSE*100);
Var3:=REVERSE((REF(INDEXC,1)-INDEXC)/INDEXC*100);
Var4:=(Var2-Var3)*2;
Var5:=SUM(Var4,150);
Var6:=MA(Var5,30);
机构建仓: (Var5-Var6)*2, COLORSTICK;
Var7:=IF(AMOUNT-REF(AMOUNT,1)<0,AMOUNT,0);
Var8:=SUM((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*Var7/1000,0)/1000+100;
Var9:=MA(Var8,72);
主力拉升: (Var8-Var9)*18;

清风斜阳 2005-3-20 17:49

股市预测

3 ★★★
{N(1,1000,30)}
Var1:=EMA((CLOSE+LOW+OPEN+HIGH)/4,3);
STICKLINE(Var1>=REF(Var1,1) AND DATE<=1040331,OPEN,CLOSE,7,0), , [00010001];
STICKLINE(Var1>=REF(Var1,1) AND CLOSE<=OPEN AND DATE<=1040331,OPEN,CLOSE,7,0);
STICKLINE(Var1<=REF(Var1,1) AND CLOSE>OPEN AND DATE<=1040331,OPEN,CLOSE,7,1);
STICKLINE(Var1<=REF(Var1,1) AND CLOSE<=OPEN AND DATE<=1040331,OPEN,CLOSE,7,0);
B1: IF(DATE<=1040331,FORCAST(Var1,5),0);
B2: IF(DATE<=1040331,FORCAST(Var1,N),0);
B: IF(DATE<=1040331,FORCAST((CLOSE+LOW+OPEN+HIGH)/4,3),0);
B3: IF(DATE<=1040331,FORCAST((CLOSE+LOW+OPEN+HIGH)/4,150),0);
A2: EMA((CLOSE+LOW+OPEN+HIGH)/4,120);



本指标不含未来函数,但是未来函数所体现出来的操作思想却在此指标中闪耀着夺目的光芒。有人问我未来函数的运用方法,实际上其最大的价值就是作为一种指导思想,除了作为交易系统、选股条件、技术指标外。
   请记住本人的投资格言:股市的投资原则是——方向、方向、还是方向。
   事实胜于雄辩,任何主观意志及其分析结论在市场面前都是苍白无力的。
本指标的使用方法如下:红色表示行情上升,绿色表示行情下跌;黄色表示行情上升过程中及波段的顶部状态时的阴K线,粉红色表示下跌过程中或可能见底时的阳K线。具体的使用方法其实不用多说,因为这一切都是一目了然的。当然价位控制和资金管理是必要的,颜色变化的意义与其出现的位置有很大的关系。对于大多数有识之士而言技术水平自然不在话下,如果失败就是整体投资策略上的问题了。
   股票短期的走势是可以把握但不能绝对预期的,反之长期趋势可以预期但不能绝对把握。把握是指我们可以对其进行操作和进行风险控制;预期是说我们对其进行判断或总体看法。所以预期是否正确并不特别重要,但操作却务求准确和成功。

清风斜阳 2005-3-20 17:55

逃离苦海公式

AA:MA(WINNER(C*0.95)*100,3),COLORYELLOW;
AA,stick,COLORYELLOW,linethick2;
Var1:=1/WINNER(CLOSE);
Var2:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
Var3:=100-ABS(Var2);
Var4:=3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)-2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
Var5:=3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)-2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
Var6:=100-Var5;
Var7:=100-Var4;
Var8:=MA(WINNER(CLOSE*0.95)*100,3);
Var9:=IF(Var1>5,IF(Var1<100,Var1,Var3-10),0);
VarA:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VarB:=SMA(VarA,3,1);
VarC:=SMA(VarB,3,1);
探索: EMA(3*VarB-2*VarC,3),colorwhite;
主力: (-1)*(EMA(Var7,1)-50)+50,COLORYELLOW,linethick2;
Z1: MA(主力,9),COLORRED,linethick2;
VarD:=(-1)*(EMA(Var7,1)-50)+50;
VarE:=(-1)*(EMA(Var7,12)-50)+50;
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
天涯:if(rsi1>93 or (AA>90 and rsi1>80),80,100),;
海角: 0,colorgreen;
苦海: EMA(100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14)),6),LINESTICK,;
ZS: MA(探索,3),COLORYELLOW;
ZM: MA(MA(探索,3),3),COLORGREEN;

清风斜阳 2005-3-20 17:58

益盟操盘手指标源码(飞狐)

ABJB
按部就班
N(1,100,5)
现价:C;
MC=MCOST(4, 19*N, 15*N, 6*N, 1*N);
顶部: MC[1] ,colorffff33;
卖出: MC[2] ,colorgreen;
买入: MC[3] ,colorred;
底部: MC[4] ,coloryellow;
--------------------------------------
BDWD
波段无敌
坐标线:-50;-30;0;30;50
P1=0;
P2= IF (CLOSE>MA(CLOSE,5),P1+10,P1-10);
P3= IF (CLOSE>MA(CLOSE,10),P2+10,P2-10);
P4= IF (CLOSE>MA(CLOSE,10),P3+10,P3-10);
P5= IF (MA(CLOSE,5)>MA(CLOSE,10),P4+10,P4-10);
P6= IF (MA(CLOSE,10)>MA(CLOSE,20),P5+10,P5-10);
BD6;
STICKLINE(BD>=-50,-50,BD,5,0)COLORGREEN;
STICKLINE(BD>=-30,-30,BD,5,0)COLORCYAN;
STICKLINE(BD>=0,0,BD,5,0)COLORYELLOW;
STICKLINE(BD<=50&&BD>=30,30,BD,5,0)COLORRED;
----------------------------------
BHLCT
冰火两重天
P(0,100,16);
能量=SQRT(VOL)*(((C-(H+L)/2))/((H+L)/2));
平滑能量=EMA(能量,P);
能量惯性:EMA(平滑能量,P)
STICKLINE(能量惯性>=0,(能量惯性-能量惯性*0.05),(能量惯性-能量惯性*0.15),5,0) COLOR0000CC;
STICKLINE(能量惯性>=0,(能量惯性-能量惯性*0.2),(能量惯性-能量惯性*0.35),5,0) COLOR0066ff;
STICKLINE(能量惯性>=0,(能量惯性-能量惯性*0.4),(能量惯性-能量惯性*0.55),5,0) COLOR0099ff;
STICKLINE(能量惯性>=0,(能量惯性-能量惯性*0.6),(能量惯性-能量惯性*0.75),5,0) COLOR00CCff;
STICKLINE(能量惯性>=0,(能量惯性-能量惯性*0.8),(能量惯性-能量惯性*0.95),5,0) COLOR00ffff;
STICKLINE(能量惯性<0,(能量惯性-能量惯性*0.05),(能量惯性-能量惯性*0.15),5,0) COLORff3300;
STICKLINE(能量惯性<0,(能量惯性-能量惯性*0.2),(能量惯性-能量惯性*0.35),5,0) COLORFF6600;
STICKLINE(能量惯性<0,(能量惯性-能量惯性*0.4),(能量惯性-能量惯性*0.55),5,0) COLORFF9900;
STICKLINE(能量惯性<0,(能量惯性-能量惯性*0.6),(能量惯性-能量惯性*0.75),5,0) COLORffcc00;
STICKLINE(能量惯性<0,(能量惯性-能量惯性*0.8),(能量惯性-能量惯性*0.95),5,0) COLORffff00;
------------------------------------
cmfx
筹码分析
HSL=EMA(VOL/CAPITAL,3);
ZDL=HHV(HSL,240);
ZXL=LLV(HSL,240);
XS=MA(C,33);
锁定筹码:EMA((HSL-ZXL)/ZXL*XS,13);
浮动筹码:EMA((ZDL-HSL)/HSL*XS,13);
力量对比:锁定筹码-浮动筹码 #COLORSTICK
------------
dkby
多空博弈
Var1=(HHV(HIGH,21)-C)/(HHV(HIGH,21)-LLV(LOW,21))*100-10;
Var2=(C-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
Var3=SMA(Var2,13,8);
高位:90;
低位:0;
多方: SMA(Var3,13,8),COLORRED;
空方: SMA(Var1,21,8),COLORGREEN;
中轴:45
-----------------
ltsh
龙腾四海
N (0, 100, 8);
坐标线:0;20;50;80;100
龙腾四海:100-100*(HHV(HIGH,5*N)-CLOSE)/(HHV(HIGH,5*N)-LLV(LOW,5*N));
海面:20,COLORGREEN;
海天分界线:50,COLORYELLOW;
天际:80,COLORRED;
-----------------------------
mmpp
买卖频谱
买线:EMA(C,3);
卖线:EMA(SLOPE(C,21)*20+C,55);  
买卖差=买线-卖线;
STICKLINE(买卖差>=0,(买线-买卖差*0.05),(买线-买卖差*0.15),5,0) #COLOR00ffff;
STICKLINE(买卖差>=0,(买线-买卖差*0.2),(买线-买卖差*0.35),5,0) #COLOR00ccff;
STICKLINE(买卖差>=0,(买线-买卖差*0.4),(买线-买卖差*0.55),5,0) #COLOR0099ff;
STICKLINE(买卖差>=0,(买线-买卖差*0.6),(买线-买卖差*0.75),5,0) #COLOR0066ff;
STICKLINE(买卖差>=0,(买线-买卖差*0.8),(买线-买卖差*0.95),5,0) #COLOR0000cc;
STICKLINE(买卖差<0,(卖线+买卖差*0.05),(卖线+买卖差*0.15),5,0) #COLOR006600;
STICKLINE(买卖差<0,(卖线+买卖差*0.2),(卖线+买卖差*0.35),5,0) #COLOR009900;
STICKLINE(买卖差<0,(卖线+买卖差*0.4),(卖线+买卖差*0.55),5,0) #COLOR00cc00;
STICKLINE(买卖差<0,(卖线+买卖差*0.6),(卖线+买卖差*0.75),5,0) #COLOR00ff00;
STICKLINE(买卖差<0,(卖线+买卖差*0.8),(卖线+买卖差*0.95),5,0) #COLOR66ff00;
------------
zljc
主力进出
MAV=(C*2+H+L)/4;
SK = EMA(MAV,13) - EMA(MAV,34);
SD = EMA(SK,5);
中轴:0;
空方主力 : (-2*(SK-SD))*3.8,COLORGREEN;
多方主力 : (2*(SK-SD))*3.8,COLORRED;
--------------------------------------
CPSLSYY
主力拉升意愿
坐标线:-10;50;70;110;
ww:100*(CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18));
ww2:100*(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36));
lsqu:70;
---------------------
CPSNL
主力能量(实力)
坐标线:150;180;210;240;450
zlnl2=SUM(vol,30)/FINANCE(3)+150;
zlnl:if(zlnl2<240,zlnl2,ref(zlnl2,1)*2/3+zlnl2/3);
ftqy:30+150;
tzqy:60+150;
lsqy:90+150;
--------------------------
CPSZLSP
主力试盘意愿
aa=100*(HHV(HIGH,18)-CLOSE)/(HHV(HIGH,18)-LLV(LOW,18));
cpszlsp:if(aa>99,100,0);
--------------------------

rqnb 2005-3-20 22:13

学习,谢谢!

清风斜阳 2005-3-21 10:39

财智论坛版主清风斜阳搜集编制系列指标

钥匙:=1330131; 锁:=IF(DATE<=钥匙,1,0); T:=BARSSINCE(DATE>=910101);
HF:=HHV(H,T)*锁; FT:=BARSLAST(HF=H);
LG:=LLV(L,T)*锁; GT:=BARSLAST(LG=L); FG:=HF-LG;
XX6:=IF(GT>FT,HF-FG/16,C);  
XX12:=IF(GT>FT,HF-FG/8,C);  XX25:=IF(GT>FT,HF-FG/4,C);  
XX33:=IF(GT>FT,HF-FG/3,C);  XX37:=IF(GT>FT,HF-FG*3/8,C);
XX50:=IF(GT>FT,HF-FG/2,C);  XX62:=IF(GT>FT,HF-FG*5/8,C);
XX66:=IF(GT>FT,HF-FG*2/3,C);XX75:=IF(GT>FT,HF-FG*3/4,C);
XX87:=IF(GT>FT,HF-FG*7/8,C);XX94:=IF(GT>FT,HF-FG*0.948,C);

X6:IF(GT<FT,LG+FG/16,XX6),Color4F00FF;
X12:IF(GT<FT,LG+FG/8,XX12),Color00FF00;
X25:IF(GT<FT,LG+FG/4,XX25),COLORwhite;
X33:IF(GT<FT,LG+FG/3,XX33),COLORYELLOW;
X37:IF(GT<FT,LG+FG*3/8,XX37),COLORBLUE;
X50:IF(GT<FT,LG+FG/2,XX50),COLORRED;
X62:IF(GT<FT,LG+FG*5/8,XX62),COLORBLUE;
X66:IF(GT<FT,LG+FG*2/3,XX66),COLORYELLOW;
X75:IF(GT<FT,LG+FG*3/4,XX75),COLORwhite;
X87:IF(GT<FT,LG+FG*7/8,XX87),COLORGREEN;
X94:IF(GT<FT,LG+FG*0.948,XX94),COLORGRAY;

清风斜阳 2005-3-21 11:45

财智论坛版主清风斜阳搜集编制系列指标

{飞狐、分析家能用,大智慧暂时编辑不了。应用于主图和副图均可。}
空:=EMA(C,5);
均衡:EMA(空,5),COLORWHITE;
中轨:HHV(MA(H,13),13),COLORRED,LINETHICK2;
趋势:LLV(MA(H,13),1),COLORGREEN,LINETHICK2;
varA:=(CLOSE-REF(OPEN,29))/REF(OPEN,29)*100;
varB:=EMA(0.667*REF(varA,1)+0.333*varA,5);
DRAWTEXT(IF(VOL>=1.3*MA(VOL,5) AND COUNT(varA>=varB AND varA<-17,3) AND REF(LOW,1)=LLV(LOW,120),1,0),LOW,'买入');
varC:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
DRAWICON(CROSS(82,varC),HIGH,2);
var1:=(HIGH+LOW+OPEN+2*CLOSE)/5;
var2:=REF(var1,1);
var3:=SMA(MAX(var1-var2,0),10,1)/SMA(ABS(var1-var2),10,1)*100;
var4:=FILTER(IF(COUNT(var3<20,5)>=1 AND COUNT(var1=LLV(var1,10),10)>=1 AND CLOSE>=OPEN*1.038 AND VOL>MA(VOL,5)*1.2,1,0),5);
DRAWICON(var4,LOW,1);
var5:=FILTER(均衡>REF(均衡,1)AND 中轨<REF(中轨,1)AND C>REF(C,1),11);
DRAWTEXT(var5,L*0.98,'追涨'),ALIGN2;
var6:=REF(CLOSE,1);
var7:=SMA(MAX(CLOSE-var6,0),6,1)/SMA(ABS(CLOSE-var6),6,1)*100;
DRAWTEXT(CROSS(84,var7),H*1.03,'逃顶'),COLORYELLOW ;

清风斜阳 2005-3-21 12:01

财智论坛版主清风斜阳搜集编制系列指标

{DRAWBKBMP(C>O,'爱神');}
jj:=(HIGH+LOW+CLOSE+OPEN)/4;
Var1:=MA(CLOSE,5);
Var2:=MA(CLOSE,10);
Var3:=MA(CLOSE,20);
Var4:=MA(CLOSE,30);
h1a:=(var1+var2+var3+var4)/4;
{STICKLINE(C>MA(h1a,13),MA(h1a,13),MA(h1a,13),8,0),colorYELLOW,linethick5;}
{IF C>MA(h1a,13) THEN MA(h1a,13),colorred ELSE MA(h1a,13),colorblue;}
STICKLINE(CLOSE>0,jj,jj,7,0),colorgreen;
{STICKLINE(C<MA(h1a,13),MA(h1a,13),MA(h1a,13),3,0),color005500,linethick3;}
DRAWBKBMP(CLOSE>=OPEN or CLOSE<OPEN,'爱神');
Var1:=MA(CLOSE,5);
Var2:=MA(CLOSE,10);
Var3:=MA(CLOSE,20);
Var4:=MA(CLOSE,30);
h1a:=(var1+var2+var3+var4)/4;
{STICKLINE(C>MA(h1a,13),MA(h1a,13),MA(h1a,13),8,0),colorYELLOW,linethick5;}
{IF C>MA(h1a,13) THEN MA(h1a,13),colorred ELSE MA(h1a,13),colorblue;}
STICKLINE(CLOSE>=OPEN,HIGH,LOW,1,0),COLOR0000FF;
STICKLINE(CLOSE>=OPEN,HIGH,LOW,0,0),COLOR0000FF;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,8,1),COLOR0000FF;
STICKLINE(CLOSE<=OPEN,HIGH,LOW,1,0),COLORFF0000;
STICKLINE(CLOSE<=OPEN,HIGH,LOW,0,0),COLORFFFF00;
STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,8,0),COLORcyan;

nplgfjfo 2005-3-25 03:26

好东西.顶。

清风斜阳 2005-3-25 06:40

主力进场

Var2:=REF(LOW,1);
Var3:=SMA(ABS(LOW-Var2),13,1)/SMA(MAX(LOW-Var2,0),13,1)*100;
Var4:=EMA(IF(CLOSE*1.2,Var3*13,Var3/13),13);
Var5:=LLV(LOW,34);
Var6:=HHV(Var4,34);
Var7:=IF(LLV(LOW,56),1,0);
Var8:=EMA(IF(LOW<=Var5,(Var4+Var6*2)/2,0),3)/618*Var7;
Var9:=EMA(CLOSE,5);
Var10:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*(-10);
STICKLINE(Var9>REF(Var9,1),0,Var9*0.08,4,1),color10E410;
减仓:-IF(Var9>REF(Var9,1),Var9,0),color10E410,linethick0;
STICKLINE(Var9<REF(Var9,1),0,Var9*0.08,4,1),color1010FF;
增仓:IF(Var9<REF(Var9,1),Var9,0),color1010FF,linethick0;
STICKLINE(Var8>REF(Var8,1),0,Var8,4,1),color10FFFF;
主力进场:IF(Var8>REF(Var8,1),Var8*8,0),color10FFFF,linethick0;
STICKLINE(Var8<REF(Var8,1),0,Var8,4,1),colorFFF810;
洗盘:-IF(Var8<REF(Var8,1),Var8*10,0),colorFFF810,linethick0;
主力持仓:(LOW*5),colorFF10FF,linethick0;
增减力度:Var10,colorFF7676;
AM:=IF(DATE<=1031231,1,0);
AA:=CLOSE/REF(CLOSE,1)>=1.099;
AB:=VOL/REF(VOL,1);
预警:IF(CLOSE/REF(CLOSE,1)>=1.07 AND AB<1,33,0),COLOR00FFFF;
目标:IF(AA AND AB<1,55,0)*AM,COLOR0000FF,LINETHICK2;
var1:=SUMBARS(vol,capital);
var2:=dma(close,30/var1)colorff6600;
var3:=ma(var2,5)color00ff00;
Var4:=100*VOL/CAPITAL*10;
STICKLINE(var2>var3,Var2,var3,Var4,1)colorff00ff;
STICKLINE(var2<var3,Var2,var3,Var4,1)color00cc00;
绝对市场成本:cost(50),color00ffff,POINTDOT;
主力资金方向:dma(close,1/var1)color6600ff;
主力资金速动:dma(close,5/var1);

XL1:=MA(LOW,2)*0.96;
XL2:=MA(LOW,26)*0.85;
XL3:=REF(XL1,1)<XL2 AND REF(XL1,1)<XL1 AND REF(XL1,1)<REF(XL1,2);
STICKLINE(XL3,0,Var8*3,4,0),Color006EFF;
DRAWTEXT(XL3,Var8*2,'买'),ColorRED;
↑买:DRAWICON(XL3,0,4),COLORRED;

清风斜阳 2005-3-25 06:41

综合解盘

EXPLAIN(CLOSE,'《清风斜阳决策系统》QQ 82052669 ')COLORcyan;
Var1:=EMA(CLOSE,34)-EMA(CLOSE,5);
Var2:=EMA(Var1,5);
趋势: (-3)*(Var1-Var2), COLORSTICK;长期趋势:EMA(Var1,10)*(-1);
趋势;
EXPLAIN(趋势>0,'Z线趋势上升中\n') COLORGREEN;
EXPLAIN(趋势<0,'Z线趋势下降中\n') COLORYELLOW;
EXPLAIN(CROSS(趋势,0),'Z线考虑买入\n') colorblue;
EXPLAIN(CROSS(0,趋势),'Z线考虑卖出\n') COLORRED;
Var11:=MA((VOL/(HIGH-LOW)),4);
Var33:=ABS(CLOSE-OPEN);Var44:=VOL/(HIGH-LOW);
EXPLAIN(Var44<var11 AND Var33<MA(Var33,4),'资金无入场意愿,萎缩中\n') COLORYELLOW;
EXPLAIN(Var44<var11 AND Var33>MA(Var33,4),'场内资金运作行为\n') color005500;
EXPLAIN(Var44>var11 AND Var33<MA(Var33,4),'多空双方激烈争夺中\n') COLORRED;
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') color005500;
EXPLAIN(CROSS(mdi,pdi),'PDI线从上向下跌破MDI线,显示有新空头进场,为卖出信号\n') COLORRED;
EXPLAIN(adx>REF(adx,1),'ADX值持续高于前一日,行情将维持原趋势\n') COLOR0000FF;
EXPLAIN(adx<REF(adx,1) and adx<20,'ADX值递减,降到20以下,且横向行进时,市场气氛为盘整\n') COLORFF0000;
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') color10ff10;
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,'\n下面为KDJ,CCI,W&R,RSI,MTM等指标的判断 \n\n') COLORcyan;
EXPLAIN(CROSS(j,k) and k<50,'KDJ金叉\n') COLORYELLOW;
EXPLAIN(CROSS(k,j) and k>50,'KDJ死叉\n') COLORwhite;
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<-100,'CCI指标底位,买入机会\n');
EXPLAIN(cci>100,'CCI指标高位,卖出机会\n');
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));
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),'MTM从下向上突破MTMMA,买入信号\n');
EXPLAIN(CROSS(MTMMA,MTM),'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;
EXPLAIN(RSI1>85,'6日RSI向上突破85,超买,考虑卖出\n');
EXPLAIN(RSI1<15,'6日RSI向下跌破15,超卖,考虑买入\n');
EXPLAIN(CROSS(RSI1,RSI2),'6日RSI向上突破12日RSI,买进信号\n');
EXPLAIN(CROSS(RSI2,RSI1),'6日RSI向下跌破12日RSI,卖出信号\n');

psy:=COUNT(CLOSE>REF(CLOSE,1),12)/12*100;
EXPLAINEX(1=1,'12天心理线,PSY=',psy,2,1);
EXPLAINEX(1=1,'获利盘比例=',WINNER(CLOSE)*100,2,1);
EXPLAINEX(1=1,'套牢盘比例=',100-WINNER(CLOSE)*100,2,1);

清风斜阳 2005-3-25 06:42

紫气MACD交易

DIFF: EMA(CLOSE,12) - EMA(CLOSE,26),COLORYELLOW,LINETHICK2;
DEA1:=EMA(DIFF,9);
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线趋势上升中'),COLORRED;
EXPLAIN(趋势<0,'Z线趋势下降中'),COLORGREEN;
EXPLAIN(cross(趋势,0),'Z线考虑买入'),COLORCYAN;
EXPLAIN(cross(0,趋势),'Z线考虑卖出'),COLORCYAN;
Var11:=ma((v/(h-l)),4);
Var33:=abs(c-o);
Var44:=v/(h-l);
EXPLAIN(Var44<var11 AND Var33<ma(Var33,4),'资金无入场意愿,萎缩中'),COLORCYAN;
EXPLAIN(Var44<var11 AND Var33>ma(Var33,4),'场内资金运作行为'),COLORRED;
EXPLAIN(Var44>var11 AND Var33<ma(Var33,4),'多空双方激烈争夺中'),colorwhite;
EXPLAIN(Var44>var11 AND Var33>ma(Var33,4),'场外资金冲动强烈,积极关注他们的动向'),coloryellow;
TR := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14),colormagenta;
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线,显示有新多头进场,为买进信号'),COLORRED;
EXPLAIN(cross(mdi,pdi),'PDI线从上向下跌破MDI线,显示有新空头进场,为卖出信号'),COLORGREEN;
EXPLAIN(adx>ref(adx,1),'ADX值持续高于前一日,行情将维持原趋势'),coloryellow;
EXPLAIN(adx<ref(adx,1) and adx<20,'ADX值递减,降到20以下,且横向行进时,市场气氛为盘整'),colorwhite;
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值从上升倾向转为下降时,表明行情即将反转'),colorblue;
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;
EXPLAINEX(1=1,'(中标)macd=',macd,2,1),colorwhite;
EXPLAIN(macd>0 and diff>0,'大势属多头市场'),COLORRED;
EXPLAIN(macd>0.35,'超买中,随时有可能见顶回落'),COLORGREEN;
EXPLAIN(macd<0 and diff<0,'大势属空头市场'),coloryellow;
EXPLAIN(macd<-0.35,'超卖中,随时有可能反弹'),colorblue;
EXPLAIN(cross(diff,dea) and cross(macd,0),'上穿o轴,可考虑买入');
EXPLAIN(cross(j,k) and k<50,'KDJ金叉'),coloryellow;
EXPLAIN(cross(k,d) and k>70,'KDJ死叉'),colorblue;
EXPLAIN(j>84,'KDJ指标高位');EXPLAIN(j<16,'KDJ指标低位'),COLORGREEN;
TYP := (HIGH + LOW + CLOSE)/3;
cci:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
EXPLAIN(cci<-180,'CCI指标底位,买入机会'),COLORRED;
EXPLAIN(cci>180,'CCI指标高位,卖出机会'),COLORGREEN;
EXPLAINEX(1=1,'(短标)cci=',cci,2,1),colorblue;
EXPLAINEX(1=1,'换手率=',vol/CAPITAl*100,2,1),COLORGREEN;
explain((vol/CAPITAl)>0.075,'换手过大,小心主力出逃,短期头部'),coloryellow;
wr:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
EXPLAINEX(1=1,'威廉指标(短标)=',wr,2,1),coloryellow;
explain(wr>-20,'W&R超买,短线即将见顶,应及时卖出'),colorblue;
explain(wr<-80,'W&R超卖,短线即将见底,应伺机买进'),colorwhite;
MTM := CLOSE-REF(CLOSE,6);
MTMMA := MA(MTM,6);
EXPLAIN(CROSS(MTM,MTMMA) and MTMMA<-0.8,'MTM从下向上突破MTMMA,买入信号'),COLORRED;
EXPLAIN(CROSS(MTMMA,MTM) and MTMMA>0.8,'MTM从上向下跌破MTMMA,卖出信号'),COLORGREEN;
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),COLORRED;
EXPLAIN(RSI1>85,'6日RSI超买,防止回挡'),colorblue;
EXPLAIN(RSI1>80,'6日RSI向上突破85,超买,考虑卖出'),colormagenta;
EXPLAIN(RSI1<15,'6日RSI超卖,随时有可能反弹'),colorblue;
EXPLAIN(RSI1<15,'6日RSI向下跌破15,超卖,考虑买入'),colormagenta;
EXPLAIN(CROSS(RSI1,15),'6日RSI向上突破15,买进信号'),COLORRED;
EXPLAIN(CROSS(RSI1,85),'6日RSI向下跌破85,卖出信号'),colormagenta;
psy:=COUNT(CLOSE>REF(CLOSE,1),12)/12*100;
EXPLAINEX(1=1,'12天心理线,PSY=',psy,2,1),COLORGREEN;
EXPLAINEX(1=1,'获利盘比例=',WINNER(c)*100,2,1),coloryellow;
EXPLAINEX(1=1,'套牢盘比例=',100-WINNER(c)*100,2,1),colorblue;
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),coloryellow;
EXPLAIN(close>分水岭,'股价在分水岭之上,大势属多头,可积极做多'),COLORRED;
EXPLAIN(close<分水岭,'股价在分水岭之下,大势属空头,超跌只能抢反弹'),colorblue;
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,'多空布林收敛中,有变盘的可能,上下自己分析'),coloryellow;
EXPLAIN(var57 and var56 and c>o ,'布林上下乖离太大,有反弹的可能'),COLORRED;
EXPLAIN(var58 and var56 and c<o ,'布林上下乖离太大,有回落的可能'),colorblue;

清风斜阳 2005-3-25 06:44

主图水平平铺叠加macd、kdj、rsi

{以下显示叠加指标的数值}
k:"kdj.k",linethick,COLORWHITE;
d:"kdj.d",linethick0,COLORYELLOW;
r1:"rsi.rsi1",linethick0,ColorC080FF;
r2:"rsi.rsi2",linethick0,ColorFF8080;
r3:"rsi.rsi3",linethick0,Color87F8F4;
f:"macd.diff",linethick0,Color72C072;
a:"macd.dea",linethick0,ColorE98210;
m:"macd.macd",linethick0,COLORWHITE;
{以下定义叠加区间(在这里是可见K线的范围)}
q:=SYSPARAM(3)-SYSPARAM(2);
p:=SYSPARAM(3);
{以下计算叠加比和叠加平移量}
{1、叠加区域高度}
kh:=hhv(h,q);
kL:=LLv(L,q);
dh:=hhv(max(k,d),q);
dL:=LLv(min(k,d),q);
mh:=hhv(max(f,a),q);
mL:=LLv(max(f,a),q);
rh:=hhv(max(max(r1,r2),r3),q);
rL:=LLv(min(min(r1,r2),r3),q);
{2、叠加比}
bd:=(kh-kL)/(dh-dL)/3;
bm:=(kh-kL)/(mh-mL)/3;
br:=(kh-kL)/(rh-rL)/3;
{3、叠加平移量}
wk:=(kh-kL)/3;
wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
wm:=(kh+kL-(mh+mL)*bm)/2;
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];
{以下画叠加线}
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
STICKLINE(m<0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORGREEN;
{以下画叠加指标的横坐标线}
PARTLINE(1,wm[p]),COLORWHITE;
PARTLINE(1,20*br[p]+wr[p]),COLORGREEN,POINTDOT;
PARTLINE(1,80*br[p]+wr[p]),COLORred,POINTDOT;
PARTLINE(1,50*br[p]+wr[p]),COLORYELLOW,POINTDOT;
PARTLINE(1,20*bd[p]+wd[p]),COLORGREEN,POINTDOT;
PARTLINE(1,80*bd[p]+wd[p]),COLORred,POINTDOT;
PARTLINE(1,50*bd[p]+wd[p]),COLORYELLOW,POINTDOT;
{以下显示叠加指标的横坐标值}
DRAWTEXT(p=BARPOS,(80*br[p]+wr[p])*1.015,'80\nrsi')COLORWHITE,ALIGN0;
DRAWTEXT(p=BARPOS,(50*br[p]+wr[p])*1.015,'50\nrsi')COLORWHITE,ALIGN0;
DRAWTEXT(p=BARPOS,(20*br[p]+wr[p])*1.015,'20\nrsi')COLORWHITE,ALIGN0;
DRAWTEXT(p=BARPOS,(20*bd[p]+wd[p])*1.015,'20\nkdj')COLORWHITE,ALIGN0;
DRAWTEXT(p=BARPOS,(50*bd[p]+wd[p])*1.015,'50\nkdj')COLORWHITE,ALIGN0;
DRAWTEXT(p=BARPOS,(80*bd[p]+wd[p])*1.015,'80\nkdj')COLORWHITE,ALIGN0;
DRAWTEXT(p=BARPOS,wm[p]*1.015,'0\nmacd')COLORWHITE,ALIGN0;

清风斜阳 2005-3-25 08:20

标题: ☆☆银狐乐园学习资料:需要公式原码的朋友请进来

[url]http://bbs.fjfox.com/t-16356.html[/url]

xfc038 2005-5-3 21:49

谢谢!

pbb3 2005-5-3 23:05

清风斜阳版主大气大方,

胸襟不凡。
页: 1 2 3 4 5 6 [7] 8
查看完整版本: 财智论坛版主清风斜阳搜集编制系列指标