撑压射线 - 分析家公式网

分析家公式网,提供指标公式,股票软件用户登录 |

当前位置：分析家公式网 → 股票公式 → 大智慧L2公式 → 一键转帖：撑压射线

软件名称：[B]撑压射线[/B]
软件类型：国产软件
运行环境：Win9X/2000/XP/2003/
软件语言：简体中文
授权方式：解密版
软件大小：9.00 KB
官方主页：Home Page
更新时间：2008-12-26 12:41:39
软件简介:

{撑压射线}
N:=3;
Var2:=HHV(EMA(C,3),N);
VarB2:LLV(EMA(C,3),N);
Var3:=BARSLAST(Var2>REF(Var2,1));
Var4:=IF(Var3>0,HHV(Var2,Var3),Var2);
Var5:=Var4-Var4*(Var3-1)*0.318/100;
Var6:=IF(Var5>REF(Var5,1),HHV(MA(c,3),3),Var5);
IF(Var6<C*0.85,LLV(C,13)*0.85,Var6);
Var7:=Var4-Var4*(Var3-1)*0.618/100;
Var8:=IF(Var7>REF(Var7,1),HHV(MA(c,3),3),Var7);
IF(Var8<C*0.85,LLV(C,13)*0.85,Var8);
Var9:=Var4-Var4*(Var3-1)*0.918/100;
VarA:=IF(Var9>REF(Var9,1),HHV(MA(c,3),3),Var9);
IF(VarA<C*0.85,LLV(C,13)*0.85,VarA);
VarB:=Var4-Var4*(Var3-1)*1.218/100;
VarC:=IF(VarB>REF(VarB,1),HHV(MA(c,3),3),VarB);
IF(VarC<C*0.85,LLV(C,13)*0.85,VarC);
VarD:=Var4-Var4*(Var3-1)*1.518/100;
VarE:=IF(VarD>REF(VarD,1),HHV(MA(c,3),3),VarD);
IF(VarE<C*0.85,LLV(C,13)*0.85,VarE),CIRCLEDOT,Color00FFFF;
VarF:=Var4-Var4*(Var3-1)*1.818/100;
Var10:=IF(VarF>REF(VarF,1),HHV(MA(c,3),3),VarF);
IF(Var10<C*0.85,LLV(C,13)*0.85,Var10);
Var11:=Var4-Var4*(Var3-1)*2.118/100;
Var12:=IF(Var11>REF(Var11,1),HHV(MA(c,3),3),Var11);
IF(Var12<C*0.85,LLV(C,13)*0.85,Var12);
Var13:=Var4-Var4*(Var3-1)*2.418/100;
Var14:=IF(Var13>REF(Var13,1),HHV(MA(c,3),3),Var13);
IF(Var14<C*0.85,LLV(C,13)*0.85,Var14);
Var15:=Var4-Var4*(Var3-1)*2.718/100;
Var16:=IF(Var15>REF(Var15,1),HHV(MA(c,3),3),Var15);
IF(Var16<C*0.85,LLV(C,13)*0.85,Var16);
Var17:=Var4-Var4*(Var3-1)*3.018/100;
Var18:=IF(Var17>REF(Var17,1),HHV(MA(c,3),3),Var17);
IF(Var18<C*0.85,LLV(C,13)*0.85,Var18);
Var1B:=Var4-Var4*(Var3-1)*3.318/100;
Var1C:=IF(Var1B>REF(Var1B,1),HHV(MA(c,3),3),Var1B);
IF(Var1C<C*0.85,LLV(C,13)*0.85,Var1C);

VarB3:=BARSLAST(VarB2<REF(VarB2,1));
VarB4:=IF(VarB3>0,LLV(VarB2,VarB3),VarB2);
VarB5:=VarB4+VarB4*(VarB3+1)*0.318/100;
VarB6:=IF(VarB5<REF(VarB5,1),LLV(MA(c,3),3),VarB5);
IF(VarB6>CLOSE*1.15,HHV(h,13)*1.15,VarB6);
VarB7:=VarB4+VarB4*(VarB3+1)*0.618/100;
VarB8:=IF(VarB7<REF(VarB7,1),LLV(MA(c,3),3),VarB7);
IF(VarB8>CLOSE*1.15,HHV(h,13)*1.15,VarB8);
VarB9:=VarB4+VarB4*(VarB3+1)*0.918/100;
VarBA:=IF(VarB9<REF(VarB9,1),LLV(MA(c,3),3),VarB9);
IF(VarBA>CLOSE*1.15,HHV(h,13)*1.15,VarBA);
VarBB:=VarB4+VarB4*(VarB3+1)*1.218/100;
VarBC:=IF(VarBB<REF(VarBB,1),LLV(MA(c,3),3),VarBB);
IF(VarBC>CLOSE*1.15,HHV(h,13)*1.15,VarBC);
VarBD:=VarB4+VarB4*(VarB3+1)*1.518/100;
VarBE:=IF(VarBD<REF(VarBD,1),LLV(MA(c,3),3),VarBD);
IF(VarBE>CLOSE*1.15,HHV(h,13)*1.15,VarBE),CIRCLEDOT,colorred;
VarBF:=VarB4+VarB4*(VarB3+1)*2.118/100;
VarB10:=IF(VarBF<REF(VarBF,1),LLV(MA(c,3),3),VarBF);
IF(VarB10>CLOSE*1.15,HHV(h,13)*1.15,VarB10);
VarB11:=VarB4+VarB4*(VarB3+1)*2.718/100;
VarB12:=IF(VarB11<REF(VarB11,1),LLV(MA(c,3),3),VarB11);
IF(VarB12>CLOSE*1.15,HHV(h,13)*1.15,VarB12);
VarB13:=VarB4+VarB4*(VarB3+1)*3.318/100;
VarB14:=IF(VarB13<REF(VarB13,1),LLV(MA(c,3),3),VarB13);
IF(VarB14>CLOSE*1.15,HHV(H,13)*1.15,VarB14);
VarB15:=VarB4+VarB4*(VarB3+1)*3.918/100;
VarB16:=IF(VarB15<REF(VarB15,1),LLV(MA(c,3),3),VarB15);
IF(VarB16>CLOSE*1.15,HHV(H,13)*1.15,VarB16);
VarB17:=VarB4+VarB4*(VarB3+1)*4.518/100;
VarB18:=IF(VarB17<REF(VarB17,1),LLV(MA(c,3),3),VarB17);
IF(VarB18>CLOSE*1.15,HHV(H,13)*1.15,VarB18);
VarB1B:=VarB4+VarB4*(VarB3+1)*5.118/100;
VarB1C:=IF(VarB1B<REF(VarB1B,1),LLV(MA(c,3),3),VarB1B);
IF(VarB1C>CLOSE*1.15,HHV(H,13)*1.15,VarB1C);

[url=http://www.70822.com/soft/sort013/sort03/down-5229.html]撑压射线[/url]