M1:=3; {预估成交量} TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1))))); MTIME:=MOD(FROMOPEN,TOTAL); CTIME:=IF(MTIME<0.5,TOTAL,MTIME); 预估成交量:IF((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VOL*(TOTAL+3)/(CTIME+3),DRAWNULL),NODRAW; STICKLINE((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),预估成交量,0,-1,-1),COLOR00C0C0; VOL,VOLSTICK; T:=DYNAINFO(8)>0; VO:=VOL=LLV(VOL,100) AND T; 地量柱:T AND VO,COLORBLUE; STICKLINE(地量柱,0,V,1,0),COLORBLUE; DRAWTEXT(地量柱,VOL+3000,'地'),COLORBLUE; AMOV:=VOL*(OPEN+CLOSE)/2; AMV1:SUM(AMOV,M1)/SUM(VOL,M1)COLORWHITE; 梯量柱:VOL>REF(VOL,1) AND REF(VOL,1)>REF(VOL,2) AND AMV1>REF(AMV1,1) AND C/REF(C,1)>1.01 AND CLOSE>OPEN,COLORYELLOW; DRAWTEXT(梯量柱,VOL*0.1,'↖梯柱'),COLORYELLOW; BLZ:=VOL>REF(V,1)*1.9; BLZ1:=VOL<REF(LLV(VOL,13),1); BLZ2:=VOL<REF(LLV(VOL,55),1); 倍量柱:BLZ,COLORRED; DRAWTEXT(倍量柱,VOL*0.9,'倍'),COLORYELLOW; 二倍量:=VOL>=REF(VOL,1)*3 AND VOL<REF(VOL,1)*4; STICKLINE(二倍量,0,VOL,0.1,0),COLORYELLOW; DRAWTEXT(二倍量,VOL,'二倍'),COLORMAGENTA; 四倍量:=VOL>=REF(VOL,1)*4; STICKLINE(四倍量,0,VOL,0.1,0),COLORYELLOW; DRAWTEXT(四倍量,VOL,'四倍量以上'),COLORMAGENTA; {量能} QJJ:=V/((H-L)*2-ABS(C-O)); HSL:=IF(C!=O,QJJ*(C-O),0)/100; LNGJ:=HSL*0.5+REF(HSL,1)*0.3+REF(HSL,2)*0.2; LLJX:=EMA(LNGJ,3); B:=0,POINTDOT,COLORWHITE; B1:=SUM(LLJX,1),COLORCYAN; B2:=SUM(LLJX,2),COLORCYAN; B3:=SUM(LLJX,3),COLORCYAN; B4:=SUM(LLJX,4),COLORCYAN; B5:=SUM(LLJX,5),COLORCYAN; B6:=SUM(LLJX,6),COLORCYAN; B7:=SUM(LLJX,7),COLORCYAN; B8:=SUM(LLJX,8),COLORCYAN; B9:=SUM(LLJX,9),COLORCYAN; B10:=SUM(LLJX,10),COLORCYAN; RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100; K:=SMA(RSV,3,1); D:=SMA(K,3,1); J:=3*K-2*D; XG0:=B1 AND B2 AND B3 AND B4 AND B5 AND B6 AND B7 AND B8 AND B9 AND B10; XG1:=COUNT(CROSS(MA(C,5),MA(C,20)),3)=1; XG2:=C>PEAK(1,5,1) AND REF(C,1)<PEAK(1,5,1); XG3:=V>REF(V,1)*1.9 AND C>O AND J<90 AND K<80; XG4:=COUNT(V>REF(V,1)*1.9 AND C>REF(C,1)*1.04,3)=1 AND C<REF(C,1)*0.96 AND V<REF(V,1)*0.6; XG:=(XG0 OR XG1 OR XG2) AND XG3; HH:=HHV(B10,120); DRAWTEXT(XG AND XG0,VOL*1.15,'量'),COLORRED; STICKLINE(XG AND XG0,0,V*2.5/3,2,0)COLORRED; 量缩涨:COUNT(CLOSE>REF(CLOSE,1),2)=2 AND COUNT(VOL<REF(VOL,1),2)=2,COLORGREEN; STICKLINE(量缩涨,0,V,1,0),COLORGREEN; {DRAWTEXT(量缩涨,VOL*1.05,'量缩涨'),COLORGREEN; } HJZ:=(3*C+H+L+O)/6; HJZ2:=(8*HJZ+7*REF(HJZ,1)+6*REF(HJZ,2)+5*REF(HJZ,3)+4*REF(HJZ,4)+3*REF(HJZ,5)+2*REF(HJZ,6)+REF(HJZ,8))/36; HJZ3:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>HJZ2 AND C>O; 黑马黄金柱:FILTER(HJZ3,5),COLORYELLOW,NODRAW; {DRAWTEXT(黑马黄金柱,V*1.25,'◆黄'),COLORYELLOW;} STICKLINE(黑马黄金柱,0,V,3.3,1),COLORRED; STICKLINE(黑马黄金柱,0,V*2.5/3,2,0)COLORRED; STICKLINE(倍量柱,0,VOL,0.1,0),COLORYELLOW; {DRAWLINE(V<= LLV(V,20),VOL,VOL>=HHV(V,20) ,HHV(V,3),0),,COLORRED,LINETHICK2; DRAWLINE(V>=HHV(V,20),V,V<=LLV(V,3),HHV(V,3),0),COLORCYAN,LINETHICK2;}; |
|