通达信金钻筹码源码分布

金钻筹码源码：

IF(CURRBARSCOUNT<INTPART(PPART(2)*100/2),CONST(COSTEX(REF(CLOSE,1),REF(CLOSE,2))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(5)*100/2),CONST(COSTEX(REF(CLOSE,4),REF(CLOSE,5))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(6)*100/2),CONST(COSTEX(REF(CLOSE,5),REF(CLOSE,6))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(7)*100/2),CONST(COSTEX(REF(CLOSE,6),REF(CLOSE,7))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(8)*100/2),CONST(COSTEX(REF(CLOSE,8),REF(CLOSE,9))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(9)*100/2),CONST(COSTEX(REF(CLOSE,9),REF(CLOSE,10))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(10)*100/2),CONST(COSTEX(REF(CLOSE,10),REF(CLOSE,11))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(11)*100/2),CONST(COSTEX(REF(CLOSE,11),REF(CLOSE,12))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(12)*100/2),CONST(COSTEX(REF(CLOSE,12),REF(CLOSE,13))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(13)*100/2),CONST(COSTEX(REF(CLOSE,13),REF(CLOSE,14))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(14)*100/2),CONST(COSTEX(REF(CLOSE,14),REF(CLOSE,15))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(15)*100/2),CONST(COSTEX(REF(CLOSE,15),REF(CLOSE,16))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(16)*100/2),CONST(COSTEX(REF(CLOSE,16),REF(CLOSE,17))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(17)*100/2),CONST(COSTEX(REF(CLOSE,17),REF(CLOSE,18))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(18)*100/2),CONST(COSTEX(REF(CLOSE,18),REF(CLOSE,19))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(19)*100/2),CONST(COSTEX(REF(CLOSE,19),REF(CLOSE,20))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(20)*100/2),CONST(COSTEX(REF(CLOSE,20),REF(CLOSE,21))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(21)*100/2),CONST(COSTEX(REF(CLOSE,21),REF(CLOSE,22))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(22)*100/2),CONST(COSTEX(REF(CLOSE,22),REF(CLOSE,23))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(23)*100/2),CONST(COSTEX(REF(CLOSE,23),REF(CLOSE,24))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(24)*100/2),CONST(COSTEX(REF(CLOSE,24),REF(CLOSE,25))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(25)*100/2),CONST(COSTEX(REF(CLOSE,25),REF(CLOSE,26))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(26)*100/2),CONST(COSTEX(REF(CLOSE,26),REF(CLOSE,27))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(27)*100/2),CONST(COSTEX(REF(CLOSE,27),REF(CLOSE,28))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(28)*100/2),CONST(COSTEX(REF(CLOSE,28),REF(CLOSE,29))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(29)*100/2),CONST(COSTEX(REF(CLOSE,29),REF(CLOSE,30))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(30)*100/2),CONST(COSTEX(REF(CLOSE,30),REF(CLOSE,31))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(31)*100/2),CONST(COSTEX(REF(CLOSE,31),REF(CLOSE,32))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(32)*100/2),CONST(COSTEX(REF(CLOSE,32),REF(CLOSE,33))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(33)*100/2),CONST(COSTEX(REF(CLOSE,33),REF(CLOSE,34))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(34)*100/2),CONST(COSTEX(REF(CLOSE,34),REF(CLOSE,35))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(35)*100/2),CONST(COSTEX(REF(CLOSE,35),REF(CLOSE,36))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(36)*100/2),CONST(COSTEX(REF(CLOSE,36),REF(CLOSE,37))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(37)*100/2),CONST(COSTEX(REF(CLOSE,37),REF(CLOSE,38))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(38)*100/2),CONST(COSTEX(REF(CLOSE,38),REF(CLOSE,39))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(39)*100/2),CONST(COSTEX(REF(CLOSE,39),REF(CLOSE,40))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(40)*100/2),CONST(COSTEX(REF(CLOSE,40),REF(CLOSE,41))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(41)*100/2),CONST(COSTEX(REF(CLOSE,41),REF(CLOSE,42))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(42)*100/2),CONST(COSTEX(REF(CLOSE,42),REF(CLOSE,43))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(43)*100/2),CONST(COSTEX(REF(CLOSE,43),REF(CLOSE,44))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(44)*100/2),CONST(COSTEX(REF(CLOSE,44),REF(CLOSE,45))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(45)*100/2),CONST(COSTEX(REF(CLOSE,45),REF(CLOSE,46))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(46)*100/2),CONST(COSTEX(REF(CLOSE,46),REF(CLOSE,47))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(47)*100/2),CONST(COSTEX(REF(CLOSE,47),REF(CLOSE,48))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(48)*100/2),CONST(COSTEX(REF(CLOSE,48),REF(CLOSE,49))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(49)*100/2),CONST(COSTEX(REF(CLOSE,49),REF(CLOSE,50))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(50)*100/2),CONST(COSTEX(REF(CLOSE,50),REF(CLOSE,51))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(51)*100/2),CONST(COSTEX(REF(CLOSE,51),REF(CLOSE,52))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(52)*100/2),CONST(COSTEX(REF(CLOSE,52),REF(CLOSE,53))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(53)*100/2),CONST(COSTEX(REF(CLOSE,53),REF(CLOSE,54))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(54)*100/2),CONST(COSTEX(REF(CLOSE,54),REF(CLOSE,55))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(55)*100/2),CONST(COSTEX(REF(CLOSE,55),REF(CLOSE,56))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(56)*100/2),CONST(COSTEX(REF(CLOSE,56),REF(CLOSE,57))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(57)*100/2),CONST(COSTEX(REF(CLOSE,57),REF(CLOSE,58))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(58)*100/2),CONST(COSTEX(REF(CLOSE,58),REF(CLOSE,59))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(59)*100/2),CONST(COSTEX(REF(CLOSE,59),REF(CLOSE,60))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(60)*100/2),CONST(COSTEX(REF(CLOSE,60),REF(CLOSE,61))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(61)*100/2),CONST(COSTEX(REF(CLOSE,61),REF(CLOSE,62))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(62)*100/2),CONST(COSTEX(REF(CLOSE,62),REF(CLOSE,63))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(63)*100/2),CONST(COSTEX(REF(CLOSE,63),REF(CLOSE,64))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(64)*100/2),CONST(COSTEX(REF(CLOSE,64),REF(CLOSE,65))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(65)*100/2),CONST(COSTEX(REF(CLOSE,65),REF(CLOSE,66))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(66)*100/2),CONST(COSTEX(REF(CLOSE,66),REF(CLOSE,67))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(67)*100/2),CONST(COSTEX(REF(CLOSE,67),REF(CLOSE,68))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(68)*100/2),CONST(COSTEX(REF(CLOSE,68),REF(CLOSE,99))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(69)*100/2),CONST(COSTEX(REF(CLOSE,69),REF(CLOSE,70))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(70)*100/2),CONST(COSTEX(REF(CLOSE,70),REF(CLOSE,71))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(71)*100/2),CONST(COSTEX(REF(CLOSE,71),REF(CLOSE,72))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(72)*100/2),CONST(COSTEX(REF(CLOSE,72),REF(CLOSE,73))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(73)*100/2),CONST(COSTEX(REF(CLOSE,73),REF(CLOSE,74))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(74)*100/2),CONST(COSTEX(REF(CLOSE,74),REF(CLOSE,75))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(75)*100/2),CONST(COSTEX(REF(CLOSE,75),REF(CLOSE,76))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(76)*100/2),CONST(COSTEX(REF(CLOSE,76),REF(CLOSE,77))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(77)*100/2),CONST(COSTEX(REF(CLOSE,77),REF(CLOSE,78))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(78)*100/2),CONST(COSTEX(REF(CLOSE,78),REF(CLOSE,79))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(79)*100/2),CONST(COSTEX(REF(CLOSE,79),REF(CLOSE,80))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(80)*100/2),CONST(COSTEX(REF(CLOSE,80),REF(CLOSE,81))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(81)*100/2),CONST(COSTEX(REF(CLOSE,81),REF(CLOSE,82))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(82)*100/2),CONST(COSTEX(REF(CLOSE,82),REF(CLOSE,83))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(83)*100/2),CONST(COSTEX(REF(CLOSE,83),REF(CLOSE,84))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(84)*100/2),CONST(COSTEX(REF(CLOSE,84),REF(CLOSE,85))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(85)*100/2),CONST(COSTEX(REF(CLOSE,85),REF(CLOSE,86))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(86)*100/2),CONST(COSTEX(REF(CLOSE,86),REF(CLOSE,87))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(87)*100/2),CONST(COSTEX(REF(CLOSE,87),REF(CLOSE,88))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(88)*100/2),CONST(COSTEX(REF(CLOSE,88),REF(CLOSE,89))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(89)*100/2),CONST(COSTEX(REF(CLOSE,89),REF(CLOSE,90))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(90)*100/2),CONST(COSTEX(REF(CLOSE,90),REF(CLOSE,91))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(91)*100/2),CONST(COSTEX(REF(CLOSE,91),REF(CLOSE,92))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(92)*100/2),CONST(COSTEX(REF(CLOSE,92),REF(CLOSE,93))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(93)*100/2),CONST(COSTEX(REF(CLOSE,93),REF(CLOSE,94))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(94)*100/2),CONST(COSTEX(REF(CLOSE,94),REF(CLOSE,95))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(95)*100/2),CONST(COSTEX(REF(CLOSE,95),REF(CLOSE,96))),DRAWNULL),COLORBLUE;
 IF(CURRBARSCOUNT<INTPART(PPART(96)*100/2),CONST(COSTEX(REF(CLOSE,96),REF(CLOSE,97))),DRAWNULL),COLORBLUE;
红色:IF(CURRBARSCOUNT<INTPART(PPART(1)*100/2),CONST(CLOSE),DRAWNULL),COLORRED,LINETHICK2;
白色:IF(CURRBARSCOUNT<INTPART(PPART(1)*100/2),CONST(CLOSE)*1.03,DRAWNULL),COLORWHITE,LINETHICK2;
黄色:IF(CURRBARSCOUNT<INTPART(PPART(4)*100/2),CONST(COSTEX(REF(CLOSE,3),REF(CLOSE,4))),DRAWNULL),COLORYELLOW,LINETHICK2;
橙色:IF(CURRBARSCOUNT<INTPART(PPART(4)*100/2),CONST(黄色*1.03),DRAWNULL),COLOR015BFD,LINETHICK4;
 DRAWKLINE(HIGH,OPEN,LOW,CLOSE);