简单分时与top源码(大智慧)

简单分时与top源码(大智慧)

源码正文：

简单分笔
a:=BUYvol*c/100{XG51};
bz:=sum(a,0){XG51};
b:=c*SELLVOL/100{XG51};
sz:=sum(b,0){XG51};
z:=bz+sz{XG51};
cz:=bz-sz{XG51};
xb5:=if(a<=20,a,0);散户买:sum(xb5,0),LINETHICK2,COLORred{XG51};
xs5:=if(b<=20,b,0);散户卖:sum(xs5,0),LINETHICK2,COLORgreen{XG51};
xb100:=if(a<=100 and a>=20,a,0);游资买:sum(xb100,0),LINETHICK2,COLORred{XG51};
xs100:=if(b<=100 and b>=20,b,0);游资卖:sum(xs100,0),LINETHICK2,COLORgreen{XG51};
xb150:=if(a>=100 ,a,0);主力买:sum(xb150,0),LINETHICK2,COLORred{XG51};
xs150:=if(b>=100 ,b,0);主力卖:sum(xs150,0),LINETHICK2,COLORgreen;

简单散户
散户买:="简单分笔.散户买#tick"{XG51};
散户卖:="简单分笔.散户卖#tick"{XG51};
散户:散户买-散户卖,LINETHICK3,colorgreen;

简单游资
游资买:="简单分笔.游资买#tick"{XG51};
游资卖:="简单分笔.游资卖#tick"{XG51};
游资:游资买-游资卖,LINETHICK3,coloryellow;

简单主力
特买:="简单分笔.主力买#tick"{XG51};
特卖:="简单分笔.主力卖#tick"{XG51};
主力:特买-特卖,LINETHICK3,colorred;

top源码

散户买:="简单分笔.散户买#tick"{XG51};
散户卖:="简单分笔.散户卖#tick"{XG51};
散户:散户买-散户卖,LINETHICK3,colorgreen{XG51};
游资买:="简单分笔.游资买#tick"{XG51};
游资卖:="简单分笔.游资卖#tick"{XG51};
游资:游资买-游资卖,LINETHICK3,coloryellow{XG51};
特买:="简单分笔.主力买#tick"{XG51};
特卖:="简单分笔.主力卖#tick"{XG51};
主力:特买-特卖,LINETHICK3,colorred;

DRAWTEXTREL(10,998,'散户'){XG51};
DRAWTEXTREL(20,998,'游资'){XG51};
DRAWTEXTREL(30,998,'主力'){X?G-5=1?C?N?{};

纯金MACD副图(大智慧)

源码正文：

difF:ema(CLOSE,12)-Ema(CLOSE,27){XG51};
DEA:EMA(DIFF,9){XG51};
macd:=2*(DIFF-DEA){XG51};
stICKLINE(MacD>=0,MACD,0,4,1),COLORF00FF0{XG51};
STICKLINE(MACD<0,MACD,0,4,1),COLORRED{XG51};
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,4,0 ),COLOR00aaff{XG51};
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,3.3,0 ),COLOR00bbff{XG51};
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,2.2,0 ),COLOR00ccff{XG51};
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,1.65,0 ),COLOR00ddff{XG51};
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,1.1,0 ),COLOR00eeff{XG51};
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,0.55,0 ),COLOR00ffff{XG51};
STICKLINE(MACD>=ref(MACD,1)and MACD>0,0,MACD,4 ,0 ),COLOR0000aa{XG51};
STICKLINE(MACD>=ref(MACD,1)and MACD>0,0,MACD,3.3 ,0 ),COLOR0011bb{XG51};
STICKLINE(MACD>=ref(MACD,1)and MACD>0,0,MACD,2.2,0 ),COLOr0022cc{XG51};
STICKLINE(MACD>=ref(MACD,1)and MACD>0,0,MACD,1.65 ,0 ),COLOR0033dd{XG51};
STICKLINE(MACD>=ref(MACD,1)and MACD>0,0,MACD,1.1 ,0 ),COLOR0044ee{XG51};
STICKLINE(MACD>=ref(MACD,1)and MACD>0,0,MACD,0.55 ,0 ),COLOR0055ff{XG51};
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,4,0 ),COLOraa00bb{XG51};
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,3.3 ,0 ),COLORbb11bb{XG51};
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,2.2,0 ),COLOrcc22bb{XG51};
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,1.65,0 ),COLORdd33bb{XG51};
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,1.1,0 ),COLORee44bb{XG51};
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,0.55 ,0 ),COLORff55bb{XG51};
STICKLINE(MACD<=ref(MACD,1)and MACD<0,0,MACD,4,0 ),COLOrffaa00{XG51};
STICKLINE(MACD<=ref(MACD,1)and MACD<0,0,MACD,3.3 ,0 ),COLORffbb11{XG51};
STICKLINE(MACD<=ref(MACD,1)and MACD<0,0,MACD,2.2,0 ),COLOrffcc22{XG51};
STICKLINE(MACD<=ref(MACD,1)and MACD<0,0,MACD,1.65 ,0 ),COLORffdd33{XG51};
STICKLINE(MACD<=ref(MACD,1)and MACD<0,0,MACD,1.1 ,0 ),COLORffee44{XG51};
STICKLINE(MACD<=ref(MACD,1)and MACD<0,0,MACD,0.55 ,0 ),COLORffff55{XG51};
if(diff<0,diff,0),colorred,linethick1{XG51};
if(diff<0,0,diff),coloryellow,linethick1{XG51};
if(diff<dea,diff,dea),COLOR00ff00,linethick1{XG51};
if(diff>dea,dea,dea),COLORwhite,linethick1{XG51};
低位金叉:=crOSS(DIFF,DEA) AND DIFF<-0.1{XG51};
STICKLINE(低位金叉,0,-0.18,6,0),COLORBLUE;DRAWTEXT(低位金叉,-0.1,' 低位金叉'),COLORBLUE{XG51};
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BArslAST(DEA>=0)){XG51};
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1{XG51};
STICKLINE(二次金叉,0,-0.18,6,0),ColorFF00FF{XG51};
DRAWICON(二次金叉,dea*1.04,13) {XG51};
DRAWTEXT(二次金叉,-0.1,' 二次金叉'),ColorFF00FF{XG51};
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1)){XG51};
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA){XG51};
STICKLINE(底背离,0,0.13,6,0),Color00FF00{XG51};
DRAWLINE(A1=0,DEA,底背离,DEA,0),COLORWHITE,linethick2{XG51};
DRAWTEXT(底背离,0.1,' 底背离'),Color00FF00{XG51};
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF){XG51};
DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORCYAN,linethick2{X?G^5~1?C?N?{};