图片
图片
以下是源码：
缠论波浪主图：
Var1:=8;
Var2:=REF(H,Var1)=HHV(H,2*Var1+1);
Var3:=FILTER(Var2,Var1);
Var4:=BACKSET(Var3,Var1+1);
Var5:=FILTER(Var4,Var1);
Var6:=REF(L,Var1)=LLV(L,2*Var1+1);
Var7:=FILTER(Var6,Var1);
Var8:=BACKSET(Var7,Var1+1);
Var9:=FILTER(Var8,Var1);
Var10:=(REF(LLV(L,2*Var1),1)+REF(HHV(H,2*Var1),1))/2;
Var11:=(H+L)/2;
Var12:=(Var5 AND NOT(Var9 AND Var10>=Var11)) OR ISLASTBAR OR BARSCOUNT(C)=1;
Var13:=(Var9 AND NOT(Var5 AND Var10< Var11));
Var14:=Var5 AND NOT(Var9 AND Var10>=Var11);
Var15:=REF(BARSLAST(Var12),1)+1;
Var16:=BACKSET(Var12 AND COUNT(Var13,Var15)>0,LLVBARS(IF(Var13,L,10000),Var15));
Var17:=Var16>REF(Var16,1);
Var18:=BACKSET(Var17,2);
Var19:=Var18>REF(Var18,1);
Var20:=Var19 OR ISLASTBAR OR BARSCOUNT(C)=1;
Var21:=REF(BARSLAST(Var20),1)+1;
Var22:=BACKSET(Var20 AND COUNT(Var14,Var21)>0,HHVBARS(IF(Var14,H,0),Var21));
Var23:=Var22>REF(Var22,1);
Var24:=BACKSET(Var23,2);
Var25:=Var24>REF(Var24,1);
Var26:=BACKSET(ISLASTBAR,BARSLAST(Var25)+1);
Var27:=Var26>REF(Var26,1);
Var28:=BACKSET(ISLASTBAR,BARSLAST(Var19)+1);
Var29:=Var28>REF(Var28,1);
Var30:=BACKSET(Var27,REF(BARSLAST(Var25),1)+2);
Var31:=Var30>REF(Var30,1);
Var32:=BACKSET(Var29,REF(BARSLAST(Var19),1)+2);
Var33:=Var32>REF(Var32,1);
HG34:DRAWLINE(Var31,H,Var27,H,1),LINETHICK2,COLORRED;
HG35:DRAWLINE(Var33,L,Var29,L,1),LINETHICK2,COLORGREEN;
DRAWICON(Var31,H,2);
DRAWICON(Var27,H,2);
DRAWICON(Var33,L,1);
DRAWICON(Var29,L,1);
DRAWLINE(Var25,H,Var19,L,0),COLORGREEN;
DRAWLINE(Var19,L,Var25,H,0),COLORRED;
Var34:=34;
Var35:=3;
Var36:=REF(HHV(H,Var34),Var35);
Var37:=REF(LLV(L,Var34),Var35);
Var38:=Var36-(Var36-Var37)*0.191;
Var39:=Var36-(Var36-Var37)*0.382;
Var40:=Var36-(Var36-Var37)*0.500;
Var41:=Var36-(Var36-Var37)*0.618;
Var42:=Var36-(Var36-Var37)*0.809;
HG45:REFDATE(Var36,DATE),COLORYELLOW;
HG46:REFDATE(Var38,DATE),COLORGRAY,DOTLINE;
HG47:REFDATE(Var39,DATE),COLORGRAY,DOTLINE;
HG48:REFDATE(Var40,DATE),COLORRED,DOTLINE;
HG49:REFDATE(Var41,DATE),COLORGRAY,DOTLINE;
HG50:REFDATE(Var42,DATE),COLORGRAY,DOTLINE;
HG51:REFDATE(Var37,DATE),COLORYELLOW;
Var43:=(CURRBARSCOUNT=34);
DRAWTEXT(Var43 AND HG45,HG45,'---高---'),COLORYELLOW;
DRAWTEXT(Var43 AND HG46,HG46,'-0.809-'),COLORCYAN;
DRAWTEXT(Var43 AND HG47,HG47,'-0.618-'),COLORGREEN;
DRAWTEXT(Var43 AND HG48,HG48,'-0.500-'),COLORYELLOW;
DRAWTEXT(Var43 AND HG49,HG49,'-0.382-'),COLORGREEN;
DRAWTEXT(Var43 AND HG50,HG50,'-0.191-'),COLORCYAN;
DRAWTEXT(Var43 AND HG51,HG51,'---底---'),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1,HG45,CON2STR(HG45,2)),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=1,HG46,CON2STR(HG46,2)),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=1,HG47,CON2STR(HG47,2)),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,HG48,CON2STR(HG48,2)),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1,HG49,CON2STR(HG49,2)),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,HG50,CON2STR(HG50,2)),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=1,HG51,CON2STR(HG51,2)),COLORMAGENTA;
本站仅提供存储服务，所有内容均由用户发布，如发现有害或侵权内容，请点击举报。诚多网提示：文章来自网络，不代表本站观点。
