通达信主图Z1:
{M台+本+MK+口:
量能平台+估测量+量能K线+缺口提示
注:以下VV为通达信估测量(估测周期:周、3日、日、10分钟、60、30、15、5分钟),以分钟为计算单位的动态估测量(个股为换手率,指数为成交金额)}
ZZ:=PERIOD<5 OR PERIOD=8;
{缺口标记}
DRAWBAND(DYNAINFO(4),RGB(38,0,0),DYNAINFO(3),RGB(0,0,38));{当日开盘跳高或跳低标记} VA1:=REF(HIGH,1); VA2:=REF(LOW,1); VA3:=LOW>VA1; VA4:=HIGH<VA2; STICKLINE(VA3,LOW,VA1,6,1),COLORYELLOW,LINETHICK3; STICKLINE(VA4,HIGH,VA2,6,1),COLORWHITE,LINETHICK3; {量估算, 其中周、3日、当日、以及当下60分钟、30分钟、15分钟、10分钟、5分钟为以分钟为单位的动态估测量} VV1:=IF(CLOSE<150,100*VOL/(FINANCE(7)/100),IF(PERIOD=8,VOL/10000,AMOUNT/100000000));
VV2:=IF(MOD(FROMOPEN,60)>0,MOD(FROMOPEN,60),60); VV3:=IF(MOD(FROMOPEN,30)>0,MOD(FROMOPEN,30),30); VV4:=IF(MOD(FROMOPEN,15)>0,MOD(FROMOPEN,15),15); VV7B:=IF(MOD(FROMOPEN,5)>0,MOD(FROMOPEN,5),5); VV8B:=IF(MOD(FROMOPEN,10)>0,MOD(FROMOPEN,10),10); VV6:=IF(PERIOD=5,240/FROMOPEN,IF(PERIOD=4,60/VV2,IF(PERIOD=3,30/VV3,IF(PERIOD=2,15/VV4,IF(PERIOD=1,5/VV7B,IF(PERIOD=8,10/VV8B,1)))))); VV9:=ABS(WEEKDAY-REF(WEEKDAY,1)); VV10:=IF(MOD(VV9,3)>0,MOD(VV9,3),3); VV11:=IF(WEEKDAY=4 OR WEEKDAY=5,3/VV10,1); VV12:=IF(REF(WEEKDAY,1)=5,IF(WEEKDAY=1,3,IF(WEEKDAY=2,3/2,1)),1); VV13:=IF(REF(WEEKDAY,1)=4,IF(WEEKDAY=5,3,IF(WEEKDAY=1,3/2,1)),VV12); VV15:=IF((REF(WEEKDAY,1)=1 AND NOT(WEEKDAY=5)) OR REF(WEEKDAY,1)=2,3/VV10,IF(REF(WEEKDAY,1)=3,VV11,VV13)); VV:=VV1*IF(CURRBARSCOUNT=1,IF(PERIOD<=5 OR PERIOD=8,VV6,IF(PERIOD=6,IF(WEEKDAY=1,5*VV6,IF(WEEKDAY=2,5/2,IF(WEEKDAY=3,5/3,IF(WEEKDAY=4,5/4,1)))),IF(PERIOD=9,VV15,1))),1),COLORGRAY,STICK,LINETHICK1; {能量K线)
K:=CLOSE;
K2:=0.1; K3:=VV/REF(VV,1); VAR1:=K3>=1+K2 AND C>=O; VAR1B:=RANGE(K3,1,1+K2) AND C>=O; VAR2:=K3<=1-K2 AND C>=O; VAR2B:=RANGE(K3,1-K2,1) AND C>=O; VAR3:=K3<=1-K2 AND C<O; VAR3B:=RANGE(K3,1-K2,1) AND C<O; VAR4:=K3>=1+K2 AND C<O; VAR4B:=RANGE(K3,1,1+K2) AND C<O; STICKLINE(VAR1,K,O,3,0),COLORRED,LINETHICK2; STICKLINE(VAR1B,K,O,3,1),COLORRED,LINETHICK2; STICKLINE(VAR2,K,O,3,0),COLORFF00FF,LINETHICK2; STICKLINE(VAR2B,K,O,3,1),COLORFF00FF,LINETHICK2; STICKLINE(VAR3,K,O,3,0),COLORGREEN,LINETHICK2; STICKLINE(VAR3B,K,O,3,1),COLORGREEN,LINETHICK2; STICKLINE(VAR4,K,O,3,0),COLORGRAY,LINETHICK2; STICKLINE(VAR4B,K,O,3,1),COLORGRAY,LINETHICK2; STICKLINE(VAR1 OR VAR2,C,H,0.18,0),COLORRED; STICKLINE(VAR1 OR VAR2,L,O,0.18,0),COLORRED; STICKLINE(VAR3 OR VAR4,O,H,0.18,0),COLORGREEN; STICKLINE(VAR3 OR VAR4,L,C,0.18,0),COLORGREEN; {能量平台及相应成本线}
VH20:=VV=HHV(VV,25); NVH20:=BARSLAST(VH20)+1; VVV:=NVH20<=31 AND NVH20>1; VVV3:=IF(CLOSE<150,AMOUNT/(100*VOL),(HIGH+LOW+OPEN+CLOSE)/4); VVV4:=BACKSET(VVV,NVH20); 量台H:REF(VVV3,NVH20-1),COLOR33CCFF,LINETHICK0; 成本H:IF(CLOSE<150,SUM(AMOUNT,NVH20)/(100*SUM(VOL,NVH20)),MA((HIGH+LOW+OPEN+CLOSE)/4,NVH20)),COLORBROWN,LINETHICK1; STICKLINE(VVV4>0,REF(VVV3,NVH20-1),REF(VVV3,NVH20-1),3,0),COLOR33CCFF,LINETHICK2; STICKLINE(VH20>0,IF(ZZ,0.9999,0.999)*VVV3,IF(ZZ,1.0001,1.001)*VVV3,5,0),COLOR33CCFF,LINETHICK5; BVH20:=VV=HHV(VV,16);
BNVH20:=BARSLAST(BVH20)+1; BVVV:=BNVH20<=31 AND BNVH20>1; BVVV2:=BACKSET(BVVV,BNVH20); STICKLINE(BVVV2>0,REF(VVV3,BNVH20-1),REF(VVV3,BNVH20-1),3,0),COLORRED,LINETHICK4; 成本H2:IF(CLOSE<150,SUM(AMOUNT,BNVH20)/(100*SUM(VOL,BNVH20)),MA((HIGH+LOW+OPEN+CLOSE)/4,BNVH20)),COLORBROWN,LINETHICK1; VL20:=VV=LLV(VV,10);
NVL20:=BARSLAST(VL20)+1; VVL:=NVL20<=13 AND NVL20>1; VVL2:=BACKSET(VVL,NVL20); 量台L:REF(VVV3,NVL20-1),COLORBLUE,LINETHICK0; 成本L:IF(CLOSE<150,SUM(AMOUNT,NVL20)/(100*SUM(VOL,NVL20)),MA((HIGH+LOW+OPEN+CLOSE)/4,NVL20)),COLORCYAN,LINETHICK1; STICKLINE(VVL2>0,REF(VVV3,NVL20-1),REF(VVV3,NVL20-1),3,0),COLORBLUE,LINETHICK2; STICKLINE(VL20>0,IF(ZZ,0.9999,0.999)*VVV3,IF(ZZ,1.0001,1.001)*VVV3,5,0),COLORBLUE,LINETHICK5; BVL20:=VV=LLV(VV,16);
BNVL20:=BARSLAST(BVL20)+1; BVVL:=BNVL20<=13 AND BNVL20>1; BVVL2:=BACKSET(BVVL,BNVL20); STICKLINE(BVVL2>0,REF(VVV3,BNVL20-1),REF(VVV3,BNVL20-1),3,0),COLORCYAN,LINETHICK4; 成本L2:IF(CLOSE<150,SUM(AMOUNT,BNVL20)/(100*SUM(VOL,BNVL20)),MA((HIGH+LOW+OPEN+CLOSE)/4,BNVL20)),COLOR33CCFF,LINETHICK1; {注:量能彩色K线中的量,是指成交金额(或,个股也可指换手率);
量能彩色K线原理,以4种颜色,分别搭配以实心、空心K线,表示以下8种含义: 实心大红K线:放量上涨,且比上一根K线增量超过10%;
空心大红K线:放量上涨,但比上一根K线增量小于10%; 实心粉红K线:缩量上涨,且比上一根K线缩量超过-10%;
空心粉红K线:缩量上涨,但比上一根K线缩量少于-10%; 实心大黑K线:放量下跌,且比上一根K线增量超过10%;
空心大黑K线:放量下跌,但比上一根K线增量小于10%; 实心大绿K线:缩量下跌,且比上一根K线缩量超过-10%;
空心大绿K线:缩量下跌,但比上一根K线缩量少于-10%; } --------------------
通达信副图1:
{虚拟成交金额macd,
注:当天(日k线及以下)成交金额为以分钟为单位的动态估测值}
N1:=1;
N2:=135; N3:=3; N4:=10; N5:=5; N6:=21; N7:=35; VV1:=AMOUNT*IF(CLOSE<150,1/1000000,1/100000000); VV2:=IF(FROMOPEN<=60,FROMOPEN,IF(FROMOPEN<=120,FROMOPEN-60,IF(FROMOPEN<=180,FROMOPEN-120,IF(FROMOPEN<=240,FROMOPEN-180,FROMOPEN)))); VV3:=IF(FROMOPEN<=30,FROMOPEN,IF(FROMOPEN<=60,FROMOPEN-30,IF(FROMOPEN<=90,FROMOPEN-60,IF(FROMOPEN<=120,FROMOPEN-90,IF(FROMOPEN<=150,FROMOPEN-120,IF(FROMOPEN<=180,FROMOPEN-150,IF(FROMOPEN<=210,FROMOPEN-180,IF(FROMOPEN<=240,FROMOPEN-210,FROMOPEN)))))))); VV4:=IF(FROMOPEN<=15,FROMOPEN,IF(FROMOPEN<=30,FROMOPEN-15,IF(FROMOPEN<=45,FROMOPEN-30,IF(FROMOPEN<=60,FROMOPEN-45,IF(FROMOPEN<=75,FROMOPEN-60,IF(FROMOPEN<=90,FROMOPEN-75,IF(FROMOPEN<=105,FROMOPEN-90,IF(FROMOPEN<=120,FROMOPEN-105,IF(FROMOPEN<=135,FROMOPEN-120,IF(FROMOPEN<=150,FROMOPEN-135,IF(FROMOPEN<=165,FROMOPEN-150,IF(FROMOPEN<=180,FROMOPEN-165,IF(FROMOPEN<=195,FROMOPEN-180,IF(FROMOPEN<=210,FROMOPEN-195,IF(FROMOPEN<=225,FROMOPEN-210,IF(FROMOPEN<=240,FROMOPEN-225,FROMOPEN)))))))))))))))); VV:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VV1*240/FROMOPEN,IF(CURRBARSCOUNT=1 AND PERIOD=4,VV1*IF(FROMOPEN<=60,60,60)/(VV2),IF(CURRBARSCOUNT=1 AND PERIOD=3,VV1*IF(FROMOPEN<=30,30,30)/(VV3),IF(CURRBARSCOUNT=1 AND PERIOD=2,VV1*IF(FROMOPEN<=15,15,15)/(VV4),VV1))));
{以上当日、以及当下60分钟、30分钟、15分钟成交金额为以分钟为单位的动态估测值} DIF:MA(VV,N1)-MA(VV,N2),COLORGRAY;
DIF2:MA(VV,N3)-MA(VV,N4),COLORBROWN,LINETHICK2; DIF3:MA(VV,N5)-MA(VV,N6),COLOR33CCFF; DIF4:MA(VV,N7)-MA(VV,N2),COLORBLUE; DRAWTEXT(CROSS(DIF<REF(DIF,1) AND REF(DIF,1)<REF(DIF,2) AND DIF2<REF(DIF2,1),0.5),DIF,'警'),COLORGREEN; QRD:DIF2-REF(DIF2,1),COLORSTICK; |
|