图片
图片
图片
图片
以下是源码：分时满仓做T主图：
Var1:=(DVOL/C)/2,NODRAW;
Var2:=SUM(IF(Var1>100 AND CLOSE>REF(CLOSE,1),Var1,0),0);
Var3:=SUM(IF(Var1>100 AND CLOSE< REF(CLOSE,1),Var1,0),0);
Var4:=SUM(IF(Var1< 100 AND CLOSE>REF(CLOSE,1),Var1,0),0);
Var5:=SUM(IF(Var1< 100 AND CLOSE< REF(CLOSE,1),Var1,0),0);
Var6:=Var2+Var3+Var4+Var5;
Var7:=IF((BARSTATUS=2),((100*Var2)/Var6),0);
Var8:=((IF((BARSTATUS=2),((100*Var3)/Var6),0)));
Var9:=((IF((BARSTATUS=2),((100*Var4)/Var6),0)));
Var10:=((IF((BARSTATUS=2),((100*Var5)/Var6),0)));
Var11:=(Var2),LINETHICK2;
Var12:=(Var3),LINETHICK2;
Var13:=(Var4);
Var14:=(Var5);
Var15:=(Var2),LINETHICK6,COLORRED;
Var16:=(Var3),LINETHICK6,COLORGREEN;
Var17:=1;
Var18:=STRCAT(STRCAT('机构买',CON2STR((100*Var2)/Var6,0)),'%');
Var19:=STRCAT(STRCAT('机构卖',CON2STR((100*Var3)/Var6,0)),'%');
Var20:=STRCAT(STRCAT('净买入',CON2STR((100*(Var2-Var3))/Var6,0)),'%');
DRAWTEXT_FIX(Var17=1,0,0.04,0,Var18),COLORRED;
DRAWTEXT_FIX(Var17=1,0,0.12,0,Var19),COLORGREEN;
DRAWTEXT_FIX(Var17=1,0,0.20,0,Var20),COLOR00FFFF;
HG0:HHV(H,480),DOTLINE,COLORCYAN;
Var21:=DATETODAY(DATE)-DATETODAY(REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT))+1;
Var22:=BARSLAST((Var21-REF(Var21,1))!=WEEKDAY-REF(WEEKDAY,1) OR TOTALBARSCOUNT-CURRBARSCOUNT=0)+1;
Var23:=REF(C,Var22);
Var24:=REF(Var23,Var22);
Var25:=REF(Var24,Var22);
Var26:=REF(Var25,Var22);
Var27:=REF(Var26,Var22);
Var28:=REF(Var27,Var22);
Var29:=REF(Var28,Var22);
Var30:=REF(Var29,Var22);
Var31:=REF(Var30,Var22);
Var32:=MAX(DYNAINFO(3),DYNAINFO(5));
Var33:=MIN(DYNAINFO(3),DYNAINFO(6));
Var34:=Var32-Var33;
HG15:Var33+Var34*8/9,COLORLIRED,DOTLINE;
HG16:Var33+Var34*0.5/9,COLORGREEN,DOTLINE;
HG17:IF(BETWEEN(C/(SUM(AMOUNT,0)/SUM(VOL*100,0)),1.05,0.95)=0,MA(C,0),(SUM(AMOUNT,0)/SUM(VOL*100,0))),COLORYELLOW,DOTLINE;
Var35:=(EMA(CLOSE,12)-EMA(CLOSE,26))+DYNAINFO(3);
Var36:=EMA(Var35,9);
Var37:=10*(Var35-Var36);
Var38:=EMA(Var37,2);
STICKLINE(Var37>=Var38 AND Var37>=0,DYNAINFO(3),Var37+DYNAINFO(3),0,-1),COLORLIGRAY;
STICKLINE(Var37< Var38 AND Var37>0,DYNAINFO(3),Var37+DYNAINFO(3),0,-1),COLORLICYAN;
STICKLINE(Var37>=Var38 AND Var37< 0,DYNAINFO(3),Var37+DYNAINFO(3),0,-1),COLORLIGRAY;
STICKLINE(Var37< Var38 AND Var37< 0,DYNAINFO(3),Var37+DYNAINFO(3),0,-1),COLORLIGREEN;
Var39:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE));
Var40:=EXPMA(CLOSE/Var39,20);
Var41:=EXPMA(CLOSE/Var39,60);
Var42:=EXPMA(CLOSE/Var39,120);
Var43:=1;
1.022,NODRAW;
Var44:=1.033;
DRAWTEXT(CROSS(Var40,1.02),C*0.999,' 拉'),COLORMAGENTA,LINETHICK9;
DRAWICON(CROSS(Var40,1.04),C,45);
DRAWTEXT(CROSS(Var40,1.04),C*0.999,' 冲'),COLORRED,LINETHICK9;
Var45:=(VOL/CLOSE)/3;
Var46:=SUM((IF(((Var45>40) AND (CLOSE>(REF(CLOSE,1)))),Var45,0)),0);
Var47:=SUM((IF(((Var45>40) AND (CLOSE< (REF(CLOSE,1)))),Var45,0)),0);
Var48:=SUM((IF(((Var45< 40) AND (CLOSE>(REF(CLOSE,1)))),Var45,0)),0);
Var49:=SUM((IF(((Var45< 40) AND (CLOSE< (REF(CLOSE,1)))),Var45,0)),0);
Var50:=((Var46+Var47)+Var48)+Var49;
Var51:=IF((BARSTATUS=2),((100*Var46)/Var50),0);
Var52:=((IF((BARSTATUS=2),((100*Var47)/Var50),0)));
Var53:=((IF((BARSTATUS=2),((100*Var48)/Var50),0)));
Var54:=((IF((BARSTATUS=2),((100*Var49)/Var50),0)));
DRAWTEXT(LONGCROSS(HG16,C,2),C-0.01,'满仓买入'),COLORRED,LINETHICK9;
DRAWICON(LONGCROSS(HG16,C,2),C-0.01,1);
STICKLINE(LONGCROSS(HG16,C,2),C,HG15,0,-1),COLORCYAN;
DRAWTEXT(LONGCROSS(C,HG15,2),C+0.01,'卖出'),COLORGREEN,LINETHICK9;
DRAWICON(LONGCROSS(C,HG15,2),C+0.01,45);
本站仅提供存储服务，所有内容均由用户发布，如发现有害或侵权内容，请点击举报。凯丰资本提示：文章来自网络，不代表本站观点。
