分时横盘

分时图中显现主力动向。

input:N(0,0,250),N1(0,0,100),N2(0,0,100),N3(0,0,100);
DRAWTEXTREL(10,800,'勇士'),linethick1,COLOR00EEff;
时: MA(CLOSE,10);
分: (EMA(CLOSE,N1)*7+EMA(CLOSE,N2)*3)/10,Color3299CC;
VarA:=REF(CLOSE,1);
VarE:=SMA(MAX(CLOSE-VarA,0),6,1)/SMA(ABS(CLOSE-VarA),6,1)*100;
PARTLINE(时,时>REF(时,1),RGB(255,0,0), 时<REF(时,1),RGB(0,255,0)),LAYER0,linethick3;
DRAWTEXT(DATE>700101 AND CROSS(84,VarE),HIGH,'☆卖'),COLORRED;
VarF:=(2*CLOSE+HIGH+LOW)/4;
tt:=BARSCOUNT(C);
CC:=CLOSE;
zz:=SUM(AMOUNT,tt)/SUM(VOL*100,tt);
zz1:=BETWEEN(C/zz,1.05,0.95);
均线:IF(zz1=0,MA(C,TT),zz),COLOR00FFFF,LINETHICK0;
PARTLINE(均线,均线>ref(均线,1),rgb(250,0,0),均线<=ref(均线,1),rgb(0,250,0)),linethick2;
上均:均线 + AVEDEV(C,tt)*2,ColorGreen,LAYER0;
下均:均线 - AVEDEV(C,tt)*2,COLORFFBB00,LINETHICK2,LAYER0;
时长:=if(HOUR>=13 AND HOUR<15 ,1,0);
涨幅:=(close/DYNAINFO(3))>=1.03;
跌幅:=(close/DYNAINFO(3))<=0.97;
涨跌幅:=涨幅 OR 跌幅;
yy:=SMA(vol,30,1);
放量:=(yy-LLV(Llv(yy,1),30))/(HHV(Hhv(yy,1),30)-LLV(Llv(yy,1),30))>0;
横盘:=((HHV(CLOSE,TT)-LLV(CLOSE,TT))/CLOSE)<=0.05;
横涨:=涨跌幅=0 and 横盘 and 时长 and 放量 and CROSS(CC,上均)and DYNAINFO(22)<DYNAINFO(23) ;
横跌:=涨跌幅=0 and 横盘 and 时长 and 放量 and CROSS(下均,CC) ;
PP:= FILTER(横涨,100) ;
UU:= FILTER(横跌,50) ;
DRAWTEXT(PP,上均,'★上突'),colorff00ff;
DRAWTEXT(UU,下均,'★下破'),COLOR00FFFF;
VERTLINE( PP,3),COLORWHITE,LINETHICK2;
VERTLINE( UU,3),COLOR00FF00,LINETHICK2;
gqc:=dYNAINFO(3);{昨收}
个股涨幅:=DYNAINFO(7)/gqc-1;
上证昨收:=hhv(STKINDI('sh000001','002.rc#day'),0);
深证昨收:=hhv(STKINDI('399001','002.rc#day'),0);
上证最新:=STKINDI('1A0001','002.c1#min1');
深证最新:=STKINDI('399001','002.c1#min1');
最新行情:=if(STRCMP(MARKETLABEL,'SH')=0,上证最新,深证最新);
大盘昨收:=if(STRCMP(MARKETLABEL,'SH')=0,上证昨收,深证昨收);
大盘涨幅:=最新行情/大盘昨收;
虚拟大盘:=gqc*大盘涨幅;
PARTLINE(虚拟大盘,虚拟大盘>ref(虚拟大盘,1),rgb(250,200,0),虚拟大盘<=ref(虚拟大盘,1),rgb(0,250,0)),linethick2;
var1:="chzhshch@kxian";{处理K线}
var2:="chzhshch@bi";{处理笔关系}
drawline(var2=1,h,var2=-1,l,0),pointdot,coloryellow;
drawline(var2=-1,l,var2=1,h,0),pointdot,COLORf00ff0,LINETHICK3;
var3:="chzhshch@duan";{处理段关系}
drawtext(var3=1,h,''+h),align2,colormagenta;
drawtext(var3=-1,l,''+l),colorgreen;
drawline(var3=1,h,var3=-1,l,0),colorff6600;
drawline(var3=-1,l,var3=1,h,0),colorff6600;
{高一级别的段
var4:="chzhshch@duan2";
drawline(var4=1,h,var4=-1,l,0),linethick2,colorred;
drawline(var4=-1,l,var4=1,h,0),linethick2,colorred;}
h1:=0;
X1:=BARSLAST(h1);
rcc:=DYNAINFO(3); s2:=sma(c,3,1); s6:=sma(c,5,1);
dk:=10*(s2-s6); kk:=IF(DATATYPE=8,0.95,1);
STICKLINE(dk>0,rcc*kk,rcc*kk+dk,0,1),Color007FFF,LAYER1;
STICKLINE(dk<0,rcc*kk,rcc*kk+dk,0,1),Color99CC32,LAYER1;
{大单资金}
主买金额:="00引用.主买金额#tick";
主卖金额:="00引用.主卖金额#tick" ;
资金进出:=主买金额-主卖金额;{这就是分时净额}
大买金额:="00引用.大买金额#tick";
大卖金额:="00引用.大卖金额#tick";
大单净额:=大买金额-大卖金额; {这就是大单净额}
DRAWTEXTREL(300,20,'主买金额:'+主买金额),COLORRED,LINETHICK3;
DRAWTEXTREL(300,100,'主卖金额:'+主卖金额),COLORGREEN,LINETHICK3;
DRAWTEXTREL(300,200,'资金进出:'+资金进出),COLORCYAN,LINETHICK3;
DRAWTEXTREL(300,300,'大单净额:'+大单净额),COLORYELLOW,LINETHICK3;