甲乙动态黄金分割
-
相关简介:C/C++ Code 复制内容到剪贴板 lhnh:=BARSLAST(DISPSTATUS=1)+1; nnl:=DISPSTATUS=2; qqqq:=BACKSET(DISPSTATUS=2,barslast(dispstatus=1)); hh:=HHV(h,lhnh); ll:=llV(l,lhnh); q809:=ll+(hh-ll)*0.809; q618:=ll+(hh-ll)*0.618; q500:=ll+(hh-ll)*0.5; q382:
-
文章来源:择股网作者:股海网发布时间:2009-08-25浏览次数:
C/C++ Code复制内容到剪贴板
- lhnh:=BARSLAST(DISPSTATUS=1)+1;
- nnl:=DISPSTATUS=2;
- qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));
- hh:=HHV(h ,lhnh);
- ll:=llV(l ,lhnh);
- q809:=ll+(hh-ll)*0.809;
- q618:=ll+(hh-ll)*0.618;
- q500:=ll+(hh-ll)*0.5;
- q382:=ll+(hh-ll)*0.382;
- q191:=ll+(hh-ll)*0.191;
- PARTLINE(hh,qqqq,RGB(255,18,28)),DOTLINE;
- PARTLINE(q191,qqqq,RGB(255,255,255)),DOTLINE;
- PARTLINE(q382,qqqq,RGB(255,150,150));
- PARTLINE(q500,qqqq,RGB(255,0,255)),DOTLINE;
- PARTLINE(q618,qqqq,RGB(150,150,255)),DOTLINE;
- PARTLINE(q809,qqqq,RGB(0,255,0)),DOTLINE;
- PARTLINE(ll,qqqq,RGB(238,238,28)),DOTLINE;
- DRAWTEXT(nnl,hh*0.997,'最高价【'+hh+'】'),ALIGN2,Color0000FF;
- DRAWTEXT(nnl,q809,'19.1%【'+q809+'】80.9%'),ALIGN2,Color00FF00;
- DRAWTEXT(nnl,q618,'38.2%【'+q618+'】61.8%'),ALIGN2,Colorffaa00;
- DRAWTEXT(nnl,q500,'50%【'+q500+'】'),ALIGN2,ColorFF00FF;
- DRAWTEXT(nnl,q382,'61.8%【'+q382+'】38.2%'),ALIGN2,Color6699FF;
- DRAWTEXT(nnl,q191,'80.9%【'+q191+'】19.1%'),ALIGN2,ColorffFFFF;
- DRAWTEXT(nnl,ll*1.003,'最低价【'+ll+'】'),ALIGN2,VALIGN2,Color00FFFF;
- var1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
- Var2:=REF(Var1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
- Var3:=REF(Var2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
- Var4:=REF(Var3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
- Var5:=REF(Var4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
- Var6:=REF(Var5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
- Var7:=REF(Var6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
- Var8:=REF(Var7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
- Var9:=REF(Var8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
- VarA:=REF(Var9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
- VarB:=REF(VarA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
- VarC:=REF(VarB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
- VarD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
- VarE:=REF(VarD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
- VarF:=REF(VarE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
- Var10:=REF(VarF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
- Var11:=REF(Var10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
- Var12:=REF(Var11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
- Var13:=REF(Var12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
- Var14:=REF(Var13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
- Var15:=REF(Var14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
- Var16:=REF(Var15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
- Var17:=REF(Var16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
- Var18:=REF(Var17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
- Var19:=REF(VarD OR VarE OR VarF OR Var10 OR Var11 OR Var12 OR Var13 OR Var14 OR Var15 OR Var16 OR Var17 OR Var18,1) AND Var1;
- STICKLINE(Var19,REF(CLOSE,1),REF(CLOSE,2),4,0),color0000ff;
- Var1A:=REF(Var1 OR Var2 OR Var3 OR Var4 OR Var5 OR Var6 OR Var7 OR Var8 OR Var9 OR VarA OR VarB OR VarC,1) AND VarD;
- STICKLINE(Var1A,REF(CLOSE,1),REF(CLOSE,2),4,0),colorff0000;
下载链接:( 说明:股海资源如需解压密码的请输入本站域名:www.guhai.com.cn请仔细输入!)
|
上一篇:全宇宙最豪华副图“解盘”公式
下一篇:拉升