大智慧筹码低位密集主图选股指标公式源码

大智慧筹码低位密集主图选股指标公式源码

源码正文：

一:=COst(10)/COST(1){XG51};
二:=COST(20)/COST(10){XG51};
三:=COST(30)/COST(20){XG51};
四:=COST(40)/COST(30){XG51};
五:=COST(50)/COST(40){XG51};
密:=一<二 AND 一<三 AND 一<四 AND 一<五 {XG51};
密二:=二<三 AND 二<四 AND 二<五 {XG51};
密三:=三<二 AND 三<四 AND 三<五 {XG51};
密四:=四<二 AND 四<三 AND 四<五 {XG51};
密五:=五<二 AND 五<三 AND 五<四 {XG51};
STICKLINE(c>=o,c,o,9,1),colorred{XG51};
STICKLINE(c>=o,l,o,0.1,0),colorred{XG51};
STICKLINE(c>=o,c,h,0.1,0),colorred{XG51};
STICKLINE(c<o,c,o,9,0),colorffff00{XG51};
STICKLINE(c<o,h,l,0.1,0),colorffff00{XG51};
x11:POLYLINE(密二>0,COST(11)),COLOR008800;
x21:POLYLINE(密二>0,COST(12)),COLOR008800;
x31:POLYLINE(密二>0,COST(13)),COLOR008800;
x41:POLYLINE(密二>0,COST(14)),COLOR008800;
x51:POLYLINE(密二>0,COST(15)),COLOR008800;
x61:POLYLINE(密二>0,COST(16)),COLOR008800;
x71:POLYLINE(密二>0,COST(17)),COLOR008800;
x81:POLYLINE(密二>0,COST(18)),COLOR008800;
x91:POLYLINE(密二>0,COST(19)),COLOR008800{XG51};
x12:POLYLINE(密三>0,COST(21)),COLORff9933;
x22:POLYLINE(密三>0,COST(22)),COLORff9933;
x32:POLYLINE(密三>0,COST(23)),COLORff9933;
x42:POLYLINE(密三>0,COST(24)),COLORff9933;
x52:POLYLINE(密三>0,COST(25)),COLORff9933;
x62:POLYLINE(密三>0,COST(26)),COLORff9933;
x72:POLYLINE(密三>0,COST(27)),COLORff9933;
x82:POLYLINE(密三>0,COST(28)),COLORff9933;
x92:POLYLINE(密三>0,COST(29)),COLORff9933{XG51};
x13:POLYLINE(密四>0,COST(31)),COLOR008800;
x23:POLYLINE(密四>0,COST(32)),COLOR008800;
x33:POLYLINE(密四>0,COST(33)),COLOR008800;
x43:POLYLINE(密四>0,COST(34)),COLOR008800;
x53:POLYLINE(密四>0,COST(35)),COLOR008800;
x63:POLYLINE(密四>0,COST(36)),COLOR008800;
x73:POLYLINE(密四>0,COST(37)),COLOR008800;
x83:POLYLINE(密四>0,COST(38)),COLOR008800;
x93:POLYLINE(密四>0,COST(39)),COLOR008800{XG51};
x14:POLYLINE(密五>0,COST(41)),COLOR33cc00;
x24:POLYLINE(密五>0,COST(42)),COLOR33cc00;
x34:POLYLINE(密五>0,COST(43)),COLOR33cc00;
x44:POLYLINE(密五>0,COST(44)),COLOR33cc00;
x54:POLYLINE(密五>0,COST(45)),COLOR33cc00;
x64:POLYLINE(密五>0,COST(46)),COLOR33cc00;
x74:POLYLINE(密五>0,COST(47)),COLOR33cc00;
x84:POLYLINE(密五>0,COST(48)),COLOR33cc00;
x94:POLYLINE(密五>0,COST(49)),COLOR33cc00;

stickline(密>0 AND c<COST(50),COST(10),COST(2),2,1),COLORCYAN{XG51};
stickline(密二>0 AND c<COST(50),COST(10),COST(20),0.8,1),COLORBLUE{XG51};
stickline(密二>0 AND c<COST(50),COST(20)/1.0017,COST(20),4,1),COLORBLUE{XG51};
stickline(密三>0 AND c<COST(50),COST(20),COST(30),1,1),COLORBLUE{XG51};
stickline(密三>0 AND c<COST(50),COST(30)/1.0017,COST(30),4,1),COLORBLUE{XG51};
stickline(密四>0 AND c<COST(50),COST(30),COST(40),0.8,1),COLORBLUE{XG51};
stickline(密四>0 AND c<COST(50),COST(40)/1.0017,COST(40),4,1),COLORBLUE{XG51};
stickline(密五>0 AND c<COST(50),COST(40),COST(50),1,1),COLORBLUE{XG51};
stickline(密五>0 AND c<COST(50),COST(50)/1.0017,COST(50),4,1),COLORBLUE{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};
kk:=0{XG51};
for i=1 TO 4  DO
kk:=kk+REF(gz2,i){XG51};
kkk:=kk/4{XG51};
DRAWTEXT(kkk=0 and gz2>0 and c>REF(c,1),L*0.994,'&uarr;☆买'),COLORBLUE,linethick3{XG51};
DRAWTEXT(kkk=6 and gz2<6 ,H*1.02,'卖☆&darr;'),COLORRED,ALIGN2,linethick3{XG51};
A:=SUMBARS(V,CAPITAL*1){XG51};
A1:=SUM(COST(10),A)/A{XG51};
A2:=SUM(COST(20),A)/A{XG51};
A3:=SUM(COST(30),A)/A{XG51};
A4:=SUM(COST(40),A)/A{XG51};
A5:=SUM(COST(50),A)/A{XG51};
庄家成本线:(5*A1+4*A2+3*A3+2*A4+A5)/15,Color98FF00,linethick2{X.G_5*1.C.N.{};