经典版分价图(大智慧)

经典版分价图(大智慧)

源码正文：

N:=120 {XG51};
M:=3 {XG51};
最高a:=REF(HHV(H,N),M){XG51};
最低a:=REF(LLV(L,N),M){XG51};
H1:=最高a-(最高a-最低a)*0.191{XG51};
H中:=最高a-(最高a-最低a)*0.5{XG51};
H5:=最高a-(最高a-最低a)*0.809{XG51};
安全:(H1),COLORFF8900{XG51};
中枢:(H中),COLORf00ff0{XG51};
警惕:(H5),COLORBLUE{XG51};
X11:=(C+L+H)/3{XG51};
X22:=ema(X11,6){XG51};
X33:=Ema(X22,5){XG51};
stICKLINE(X22>=X33,X22,X33,4,1),COLOR00A6F6{XG51};
STICKLINE(X22<X33,X22,X33,4,1), COLORYELLOW{XG51};
AA1:=(2*C+REF(C ,1 ))/3{XG51};
BB1:=EMA(AA1,2){XG51};
A:=MA(BB1,3){XG51};
AAA:=(H+C+O)/3{XG51};
AA2:=(18*AAA+17*REF(AAA ,1)+16*REF(AAA ,2)+15*REF(AAA ,3)+14*REF
(AAA ,4)
+13*REF(AAA ,5)+12*REF(AAA ,6)+11*REF(AAA ,7)+10*REF(AAA ,8)
+9*REF(AAA ,9)
+8*REF(AAA ,10)+7*REF(AAA ,11)+6*REF(AAA ,12)+5*REF(AAA ,13)
+4*REF(AAA ,14)
+3*REF(AAA ,15)+2*REF(AAA ,16)+REF(AAA ,17))/171{XG51};
DD3:=A>=AA2 AND C>AA2{XG51};
DD4:=A<AA2 {XG51};
DD5:=A>AA2 {XG51};
STICKLINE((DD4 OR DD5) AND O<=C ,C,O,2.8,0),COLOR00CC99{XG51};
STICKLINE((DD4 OR DD5) AND O>=C ,C,O,2.8,0),COLOR3F8C3A{XG51};
STICKLINE((DD3 OR C>AA2) AND O<=C,C,O,2.8,0),COLORWHITE{XG51};
STICKLINE((DD3 OR C>AA2) AND O>=C,C,O,2.8,0),COLORFF33FF{XG51};
STICKLINE(MA(C,13)>O AND C>MA(C,13) AND O<C,O,C,2.8,0),COLORBLUE{XG51};
STICKLINE(C>0,C,O,0,0),COLORFFFFFF{XG51};
X1:=HHV(H,3){XG51};
X2:=LLV(L,3){XG51};
XC:=C{XG51};
XH:=H{XG51};
XL:=L{XG51};
YCJY1:=IF(XH>REF(X1,1) AND XC>REF(XC,1),X2,IF(XL<REF(X2,1) AND
XC<REF(XC,1), X1,o)){XG51};
YCJY:=IF(YCJY1=o,REF(YCJY1,1),YCJY1){XG51};
SNX2:=IF(YCJY<H AND YCJY>L,REF(YCJY,1),YCJY){XG51};
Y1:=HHV(H,13){XG51};
Y2:=IF(Y1>REF(Y1,30),Y1,REF(Y1,8)){XG51};
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100{XG51};
K:=SMA(RSV,3,1),COLORRED{XG51};
D:=SMA(K,3,1),COLORBLUE{XG51};
J1:=-(3*K-2*D)+100{XG51};
J2:=IF(J1<0 ,0 ,J1){XG51};
J:=IF(J2>100,100,J2),COLORYELLOW{XG51};
超短:=SMA(AMOUNT,3,1)/100000000{XG51};
中线:=SMA(AMOUNT,13,1)/100000000{XG51};
压力1:=IF(J<K AND 超短>中线 AND C<Y2,SNX2,Y2){XG51};
压力:if(C>0,压力1,0),LINETHICK2,COLORWHITE{XG51};
支撑:IF(C>0,SNX2,0) ,LINETHICK2,COLOR00FF00;

 {X.G~5~1.C.N.{};

数字均线+筹码堆积主图(大智慧)

源码正文：

//数字均线+成交堆积
DRAWGBK(DATE>900101,COLORRGB(95,95,95),COLORRGB(0,0,0),1);

a0:=BARSCOUNT(c){XG51};
a3:=SYSPARAM(3){XG51};
a2:=SYSPARAM(2){XG51};
a4:=SYSPARAM(4){XG51};
a5:=SYSPARAM(5){XG51};
nn0:=a3-a2;nn:=a0-a2;hh1:=(a4-a5)/8{XG51};
hh2:=hh1/4{XG51};
ll1:=llv(l,nn0);lL2:=ll1[a3]{XG51};
y0:=a0>=a2;vv0:=if(y0=1 and SYSPARAM(1)>=a0,v,0){XG51};
c1:=if(BETWEEN(c,a4-0*hh1,a4-1*hh1),vv0,0){XG51};
c2:=if(BETWEEN(c,a4-1*hh1,a4-2*hh1),vv0,0){XG51};
c3:=if(BETWEEN(c,a4-2*hh1,a4-3*hh1),vv0,0){XG51};
c4:=if(BETWEEN(c,a4-3*hh1,a4-4*hh1),vv0,0){XG51};
c5:=if(BETWEEN(c,a4-4*hh1,a4-5*hh1),vv0,0){XG51};
c6:=if(BETWEEN(c,a4-5*hh1,a4-6*hh1),vv0,0){XG51};
c7:=if(BETWEEN(c,a4-6*hh1,a4-7*hh1),vv0,0){XG51};
c8:=if(BETWEEN(c,a4-7*hh1,a4-8*hh1),vv0,0){XG51};
c9:=if(BETWEEN(c,a4-8*hh1,a4-9*hh1),vv0,0){XG51};
c10:=if(BETWEEN(c,a4-9*hh1,a4-10*hh1),vv0,0){XG51};
v1:=STRTONUM(NUMTOstR(if(ISLASTBAR,sum(c1,nn0),0),2)),LINETHICK{XG51};
v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,nn0),0),2)){XG51};
v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,nn0),0),2)){XG51};
v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,nn0),0),2)){XG51};
v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,nn0),0),2)){XG51};
v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,nn0),0),2)){XG51};
v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,nn0),0),2)){XG51};
v8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,nn0),0),2)){XG51};
v9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,nn0),0),2)){XG51};
v10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,nn0),0),2)){XG51};
av0:=max(v1,max(v2,max(v3,max(v4,max(v5,max(v6,max(v7,max(v8,max(v9,v10)))))))));

x1:=v1/av0>=nn/nn0 and nn>=0{XG51};
x2:=v2/av0>=nn/nn0 and nn>=0{XG51};
x3:=v3/av0>=nn/nn0 and nn>=0{XG51};
x4:=v4/av0>=nn/nn0 and nn>=0{XG51};
x5:=v5/av0>=nn/nn0 and nn>=0{XG51};
x6:=v6/av0>=nn/nn0 and nn>=0{XG51};
x7:=v7/av0>=nn/nn0 and nn>=0{XG51};
x8:=v8/av0>=nn/nn0 and nn>=0;

FILLRGN(v1/av0>=nn/nn0 and nn>=0,a4-0*hh1,a4-1*hh1+hh1*0.5),Color003CB7{XG51};
FILLRGN(v2/av0>=nn/nn0 and nn>=0,a4-1*hh1,a4-2*hh1+hh1*0.5),Color808000{XG51};
FILLRGN(v3/av0>=nn/nn0 and nn>=0,a4-2*hh1,a4-3*hh1+hh1*0.5),Color8B4D43{XG51};
FILLRGN(v4/av0>=nn/nn0 and nn>=0,a4-3*hh1,a4-4*hh1+hh1*0.5),Color1B3D70{XG51};
FILLRGN(v5/av0>=nn/nn0 and nn>=0,a4-4*hh1,a4-5*hh1+hh1*0.5),Color00AEAE{XG51};
FILLRGN(v6/av0>=nn/nn0 and nn>=0,a4-5*hh1,a4-6*hh1+hh1*0.5),color666666{XG51};
FILLRGN(v7/av0>=nn/nn0 and nn>=0,a4-6*hh1,a4-7*hh1+hh1*0.5),color666666{XG51};
FILLRGN(v8/av0>=nn/nn0 and nn>=0,a4-7*hh1,a4-8*hh1+hh1*0.5),color666666;

DRAWNUMBER(FILTER(refx(x1<ref(x1,1),6) and v1>0,10),a4,a4-0*hh1,2),COLOR00FF00{XG51};
DRAWNUMBER(FILTER(refx(x2<ref(x2,1),6) and v2>0,10),(a4-1*hh1),a4-1*hh1,2),COLOR00FF00{XG51};
DRAWNUMBER(FILTER(refx(x3<ref(x3,1),6) and v3>0,10),(a4-2.7*3*hh2),a4-2*hh1,2),COLOR00FF00{XG51};
DRAWNUMBER(FILTER(refx(x4<ref(x4,1),6) and v4>0,10),(a4-12*hh2),a4-3*hh1,2),COLOR00FF00{XG51};
DRAWNUMBER(FILTER(refx(x5<ref(x5,1),6) and v5>0,10),(a4-16*hh2),a4-4*hh1,2),COLOR00FF00{XG51};
DRAWNUMBER(FILTER(refx(x6<ref(x6,1),6) and v6>0,10),(a4-20*hh2),a4-5*hh1,2),COLOR00FF00{XG51};
DRAWNUMBER(FILTER(refx(x7<ref(x7,1),6) and v7>0,10),(a4-24*hh2),a4-6*hh1,2),COLOR00FF00{XG51};
DRAWNUMBER(FILTER(refx(x8<ref(x8,1) and v8>0,5),10),ll2+1*4*hh2,a4-7*hh1,2),COLOR00FF00{XG51};
指导线:= ema((EMA(C,4)+EMA(C,6)+EMA(C,12)+EMA(C,24))/4,2),linethick0,Color00ffFF,LINEDOT{XG51};
界:= MA(CLOSE,21),linethick0,ColorFEBAF5{XG51};
上限: 界+3*STD(C,20),linethick0,Color00FFFF{XG51};
卖: 界+2*STD(C,20),linethick0,ColorFF00FF{XG51};
买: 界-2*STD(C,20),linethick0,ColorF0FF00{XG51};
下限: 界-2.9*STD(close,20),linethick0,Color00FF00{XG51};
DRAWICON(H>=上限,h,10),ALIGN0,pxup15{XG51};
DRAWICON(cross(H,上限),h,12),ALIGN0{XG51};
DRAWTEXT(cross(H,上限),H,#39;￣&#39;),ALIGN0,Color00ffff{XG51};
DRAWICON(cross(上限,H),h,5),ALIGN0{XG51};
DRAWTEXT(cross(上限,H),H,#39;￣&#39;),ALIGN0,Color00ffff{XG51};
DRAWICON(cross(H,卖),h,5),ALIGN0{XG51};
DRAWTEXT(cross(H,卖),H,#39;￣&#39;),ALIGN0,Colorff00ff{XG51};
DRAWTEXT(cross(C,卖),H,#39;￣&#39;),ALIGN0,Colorff0000{XG51};
DRAWICON(cross(C,卖),h,5),ALIGN0{XG51};
DRAWTEXT(cross(下限,L),l,#39;跟&#39;),ALIGN0,Color00ff00{XG51};
DRAWTEXT(cross(下限,L),l,#39;￣&#39;),ALIGN0,Color00ff00{XG51};
DRAWTEXT(cross(买,L),l,#39;△&#39;),ALIGN0,Colorffff00{XG51};
DRAWTEXT(cross(买,L),l,#39;￣&#39;),ALIGN0,Colorffff00{XG51};
DRAWTEXT(cross(买,C),L,#39;▲&#39;),ALIGN0,Colorffff00{XG51};
DRAWTEXT(cross(买,C),L,#39;￣&#39;),ALIGN0,Colorffff00{XG51};
STICKLINE(C>=O,C,O,7,0),COLOR0000AA{XG51};
STICKLINE(C>=O,C,O,6,0),COLOR0000bb {XG51};
STICKLINE(C>=O,C,O,5,0),COLOR0000cc{XG51};
STICKLINE(C>=O,C,O,4,0),COLOR0000DD {XG51};
STICKLINE(C>=O,C,O,3,0),COLOR0000ee{XG51};
STICKLINE(C>=O,C,O,2,0),COLOR0000FF{XG51};
STICKLINE(C>=O,C,O,1,0),COLOR0000ff{XG51};
STICKLINE(C>=O,H,L,0,0),COLORWHITE{XG51};
STICKLINE(C<=O,C,O,7,0),Coloraaaa00{XG51};
STICKLINE(C<=O,C,O,6,0),Colorbbbb00{XG51};
STICKLINE(C<=O,C,O,5,0),Colorcccc00{XG51};
STICKLINE(C<=O,C,O,4,0),Colordddd00{XG51};
STICKLINE(C<=O,C,O,3,0),Coloreeee00{XG51};
STICKLINE(C<=O,C,O,2,0),COLORffff00{XG51};
STICKLINE(C<=O,C,O,1,0),Colorffff00{XG51};
STICKLINE(C<=O,H,L,0,0),COLORffff00{XG51};
STICKLINE(c/ref(c,1)>1.05,(c+o)/2,c,7,0),color00AAAA{XG51};
STICKLINE(c/ref(c,1)>1.05,(c+o)/2,c,5,0),color00CCCC{XG51};
STICKLINE(c/ref(c,1)>1.05,(c+o)/2,c,3,0),color00EEEE{XG51};
STICKLINE(c/ref(c,1)>1.05,(c+o)/2,c,1,0),coloryellow;//当涨幅大于3--5％，要主图k线的实体的一半变为另一色。
DH:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100){XG51};
STICKLINE(DH<=-4,(c+o)/2,c,7,0),colorAA0000{XG51};
STICKLINE(DH<=-4,(c+o)/2,c,5,0),colorCC0000{XG51};
STICKLINE(DH<=-4,(c+o)/2,c,3,0),colorEE0000{XG51};
STICKLINE(DH<=-4,(c+o)/2,c,1,0),colorFF0000;//当跌幅大于3-4-5％，要主图K线的实体的一半变为另一色。

Mb5:MA(CLOSE,5),ColorFFFfff,linethick1{XG51};
Mb10:MA(CLOSE,10),Color00Ffff,linethick1{XG51};
Mb20:MA(CLOSE,20),Color00ff00,linethick1{XG51};
Mb30:MA(CLOSE,30),Colorff00ff,linethick1;

VAR1:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21)))){XG51};
VAR2:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21)))){XG51};
VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34)){XG51};
DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW * 0.998),4){XG51};
DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH * 1.013),5){XG51};
DRAWTEXT(CROSS(VAR2,MA(VAR3,6)),(LOW * 0.98),#39;Ｂ &#39;),color4440FF{XG51};
DRAWTEXT(CROSS(MA(VAR3,6),VAR1),(HIGH * 1.016),#39;Ｓ &#39;),colorFFFF34;

x6:=REF(CLOSE,1){XG51};
x7:=SMA(MAX(CLOSE-x6,0),7,1)/SMA(Abs(CLOSE-x6),7,1)*100{XG51};
x8:=CROSS(79,x7){XG51};
x9:=FILTER(x8,4){XG51};
DRAWTEXT(x9,HIGH*1.02,#39;←出货&#39;),Color9000F5;

mtm:=C-REF(C,1){XG51};
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6){XG51};
买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0){XG51};
DRAWTEXT(filter(买=1,5),LOW-0.03,#39;。买&#39;),COLORWHITE;

均价:=(CLOSE+HIGH+LOW+LOW)/4{XG51};
p:=EMA(均价,9){XG51};
q:=EMA(REF(p,1),3){XG51};
换手:=1000*vol/capital{XG51};
close3:=ref(close,3){XG51};
close5:=ref(close,5){XG51};
close7:=ref(close,7){XG51};
close8:=ref(close,8){XG51};
close13:=ref(close,13){XG51};
close21:=ref(close,21){XG51};
jc:=(ref(c,3)+ref(c,5)+ref(c,7)+ref(c,8)+ref(c,13)+ref(c,21))/6{XG51};
参考价:=sma(jc,5,1),colorffccff{XG51};
aa:=if(c>=ref(c,3),1,0){XG51};
bb:=if(c>=ref(c,5),1,0){XG51};
cc:=if(c>=ref(c,7),1,0){XG51};
dd:=if(c>=ref(c,8),1,0){XG51};
ee:=if(c>=ref(c,13),1,0){XG51};
ff:=if(c>=ref(c,21),1,0){XG51};
gz2:=aa+bb+cc+dd+ee+ff{XG51};
s:=ma(c,1){XG51};
DRAWNUMBER(c>0,s,gz2,0),colorwhite;

 {X*G=5?1*C*N*{};