【通达信源码分享】筹码峰主图指标源码　有未来贴图　成交密集区分析

HB:=COST(99.3);LB:=COST(0.2);B3:=(HB-LB)/50;

 B31:=HB-B3;B32:=HB-2*B3;B33:=HB-3*B3;B34:=HB-4*B3;B35:=HB-5*B3;B36:=HB-6*B3;

 B37:=HB-7*B3;

 B38:=HB-8*B3;B39:=HB-9*B3;

 B310:=HB-10*B3;B311:=HB-11*B3;B312:=HB-12*B3;B313:=HB-13*B3;B314:=HB-14*B3;B315:=HB-15*B3;B316:=HB-16*B3;B317:=HB-17*B3;B318:=HB-18*B3;B319:=HB-19*B3;

 B320:=HB-20*B3;B321:=HB-21*B3;B322:=HB-22*B3;B323:=HB-23*B3;B324:=HB-24*B3;B325:=HB-25*B3;B326:=HB-26*B3;B327:=HB-27*B3;B328:=HB-28*B3;B329:=HB-29*B3;

 B330:=HB-30*B3;B331:=HB-31*B3;B332:=HB-32*B3;B333:=HB-33*B3;B334:=HB-34*B3;B335:=HB-35*B3;B336:=HB-36*B3;B337:=HB-37*B3;B338:=HB-38*B3;B339:=HB-39*B3;

 B340:=HB-40*B3;B341:=HB-41*B3;B342:=HB-42*B3;B343:=HB-43*B3;B344:=HB-44*B3;B345:=HB-45*B3;B346:=HB-46*B3;B347:=HB-47*B3;B348:=HB-48*B3;B349:=HB-49*B3;

 A1:=WINNER(HB)*100-WINNER(B31)*100;A2:=WINNER(B31)*100-WINNER(B32)*100;A3:=WINNER(B32)*100-WINNER(B33)*100;A4:=WINNER(B33)*100-WINNER(B34)*100;

 A5:=WINNER(B34)*100-WINNER(B35)*100;A6:=WINNER(B35)*100-WINNER(B36)*100;A7:=WINNER(B36)*100-WINNER(B37)*100;A8:=WINNER(B37)*100-WINNER(B38)*100;

 A9:=WINNER(B38)*100-WINNER(B39)*100;A10:=WINNER(B39)*100-WINNER(B310)*100;A11:=WINNER(B310)*100-WINNER(B311)*100;A12:=WINNER(B311)*100-WINNER(B312)*100;

 A13:=WINNER(B312)*100-WINNER(B313)*100;A14:=WINNER(B313)*100-WINNER(B314)*100;A15:=WINNER(B314)*100-WINNER(B315)*100;A16:=WINNER(B315)*100-WINNER(B316)*100;

 A17:=WINNER(B316)*100-WINNER(B317)*100;A18:=WINNER(B317)*100-WINNER(B318)*100;A19:=WINNER(B318)*100-WINNER(B319)*100;A20:=WINNER(B319)*100-WINNER(B320)*100;

 A21:=WINNER(B320)*100-WINNER(B321)*100;A22:=WINNER(B321)*100-WINNER(B322)*100;A23:=WINNER(B322)*100-WINNER(B323)*100;A24:=WINNER(B323)*100-WINNER(B324)*100;

 A25:=WINNER(B324)*100-WINNER(B325)*100;A26:=WINNER(B325)*100-WINNER(B326)*100;A27:=WINNER(B326)*100-WINNER(B327)*100;A28:=WINNER(B327)*100-WINNER(B328)*100;

 A29:=WINNER(B328)*100-WINNER(B329)*100;A30:=WINNER(B329)*100-WINNER(B330)*100;A31:=WINNER(B330)*100-WINNER(B331)*100;A32:=WINNER(B331)*100-WINNER(B332)*100;

 A33:=WINNER(B332)*100-WINNER(B333)*100;A34:=WINNER(B333)*100-WINNER(B334)*100;A35:=WINNER(B334)*100-WINNER(B335)*100;A36:=WINNER(B335)*100-WINNER(B336)*100;

 A37:=WINNER(B336)*100-WINNER(B337)*100;A38:=WINNER(B337)*100-WINNER(B338)*100;A39:=WINNER(B338)*100-WINNER(B339)*100;A40:=WINNER(B339)*100-WINNER(B340)*100;

 A41:=WINNER(B340)*100-WINNER(B341)*100;A42:=WINNER(B341)*100-WINNER(B342)*100;A43:=WINNER(B342)*100-WINNER(B343)*100;A44:=WINNER(B343)*100-WINNER(B344)*100;

 A45:=WINNER(B344)*100-WINNER(B345)*100;A46:=WINNER(B345)*100-WINNER(B346)*100;A47:=WINNER(B346)*100-WINNER(B347)*100;A48:=WINNER(B347)*100-WINNER(B348)*100;

 A49:=WINNER(B348)*100-WINNER(B349)*100;A50:=WINNER(B349)*100-WINNER(LB)*100;

 MX0:=MAX(A1, MAX(A2, MAX(A3, MAX(A4, MAX(A5, MAX(A6, MAX(A7, MAX(A8, MAX(A9,A10)))))))));

 MX1:=MAX(A11, MAX(A12, MAX(A13, MAX(A14, MAX(A15, MAX(A16, MAX(A17, MAX(A18, MAX(A19,A20)))))))));

 MX2:=MAX(A21, MAX(A22, MAX(A23, MAX(A24, MAX(A25, MAX(A26, MAX(A27, MAX(A28, MAX(A29,A30)))))))));

 MX3:=MAX(A31, MAX(A32, MAX(A33, MAX(A34, MAX(A35, MAX(A36, MAX(A37, MAX(A38, MAX(A39,A40)))))))));

 MX4:=MAX(A41, MAX(A42, MAX(A43, MAX(A44, MAX(A45, MAX(A46, MAX(A47, MAX(A48, MAX(A49,A50)))))))));

最大值:=MAX(MX0, MAX(MX1, MAX(MX2, MAX(MX3,MX4))));

峰值过滤:=IF(最大值<8,40,IF(最大值<14,25,15));

线宽调整:=IF(C<1.5,0.003,IF(C<3,0.01,IF(C<10,0.02,IF(C<16,0.03,IF(C<30,0.05,0.06)))))*(5/10);

线条长度:=3;

 STICKLINE(ISLASTBAR AND A1 >最大值/线条长度 AND A1 =MAX(MX0,MX1),HB ,HB+线宽调整 ,A1*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A1 >最大值/线条长度 AND A1 =MAX(MX0,MX1),B31 ,B31+线宽调整 ,A1*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A2 >最大值/线条长度 AND A2 =MAX(MX0,MX1),B32 ,B32+线宽调整 ,A2*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A3 >最大值/线条长度 AND A3 =MAX(MX0,MX1),B33 ,B33+线宽调整 ,A3*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A4 >最大值/线条长度 AND A4 =MAX(MX0,MX1),B34 ,B34+线宽调整 ,A4*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A5 >最大值/线条长度 AND A5 =MAX(MX0,MX1),B35 ,B35+线宽调整 ,A5*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A6 >最大值/线条长度 AND A6 =MAX(MX0,MX1),B36 ,B36+线宽调整 ,A6*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A7 >最大值/线条长度 AND A7 =MAX(MX0,MX1),B37 ,B37+线宽调整 ,A7*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A8 >最大值/线条长度 AND A8 =MAX(MX0,MX1),B38 ,B38+线宽调整 ,A8*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A9 >最大值/线条长度 AND A9 =MAX(MX0,MX1),B39 ,B39+线宽调整 ,A9*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A10 >最大值/线条长度 AND A10 =MAX(MX0,MX1),B310 ,B310+线宽调整 ,A10*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A11 >最大值/线条长度 AND A11 =MAX(MX0,MX1),B311 ,B311+线宽调整 ,A11*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A12 >最大值/线条长度 AND A12 =MAX(MX0,MX1),B312 ,B312+线宽调整 ,A12*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A13 >最大值/线条长度 AND A13 =MAX(MX0,MX1),B313 ,B313+线宽调整 ,A13*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A14 >最大值/线条长度 AND A14 =MAX(MX0,MX1),B314 ,B314+线宽调整 ,A14*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A15 >最大值/线条长度 AND A15 =MAX(MX0,MX1),B315 ,B315+线宽调整 ,A15*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A16 >最大值/线条长度 AND A16 =MAX(MX0,MX1),B316 ,B316+线宽调整 ,A16*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A17 >最大值/线条长度 AND A17 =MAX(MX0,MX1),B317 ,B317+线宽调整 ,A17*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A18 >最大值/线条长度 AND A18 =MAX(MX0,MX1),B318 ,B318+线宽调整 ,A18*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A19 >最大值/线条长度 AND A19 =MAX(MX0,MX1),B319 ,B319+线宽调整 ,A19*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A20 >最大值/线条长度 AND A20 =MAX(MX0,MX1),B320 ,B320+线宽调整 ,A20*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A21 >最大值/线条长度 AND A21 =MX2,B321 ,B321+线宽调整 ,A21*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A22 >最大值/线条长度 AND A22 =MX2,B322 ,B322+线宽调整 ,A22*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A23 >最大值/线条长度 AND A23 =MX2,B323 ,B323+线宽调整 ,A23*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A24 >最大值/线条长度 AND A24 =MX2,B324 ,B324+线宽调整 ,A24*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A25 >最大值/线条长度 AND A25 =MX2,B325 ,B325+线宽调整 ,A25*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A26 >最大值/线条长度 AND A26 =MX2,B326 ,B326+线宽调整 ,A26*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A27 >最大值/线条长度 AND A27 =MX2,B327 ,B327+线宽调整 ,A27*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A28 >最大值/线条长度 AND A28 =MX2,B328 ,B328+线宽调整 ,A28*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A29 >最大值/线条长度 AND A29 =MX2,B329 ,B329+线宽调整 ,A29*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A30 >最大值/线条长度 AND A30 =MX2,B330 ,B330+线宽调整 ,A30*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A31 >最大值/线条长度 AND A31 =MAX(MX3,MX4),B331 ,B331+线宽调整 ,A31*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A32 >最大值/线条长度 AND A32 =MAX(MX3,MX4),B332 ,B332+线宽调整 ,A32*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A33 >最大值/线条长度 AND A33 =MAX(MX3,MX4),B333 ,B333+线宽调整 ,A33*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A34 >最大值/线条长度 AND A34 =MAX(MX3,MX4),B334 ,B334+线宽调整 ,A34*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A35 >最大值/线条长度 AND A35 =MAX(MX3,MX4),B335 ,B335+线宽调整 ,A35*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A36 >最大值/线条长度 AND A36 =MAX(MX3,MX4),B336 ,B336+线宽调整 ,A36*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A37 >最大值/线条长度 AND A37 =MAX(MX3,MX4),B337 ,B337+线宽调整 ,A37*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A38 >最大值/线条长度 AND A38 =MAX(MX3,MX4),B338 ,B338+线宽调整 ,A38*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A39 >最大值/线条长度 AND A39 =MAX(MX3,MX4),B339 ,B339+线宽调整 ,A39*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A40 >最大值/线条长度 AND A40 =MAX(MX3,MX4),B340 ,B340+线宽调整 ,A40*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A41 >最大值/线条长度 AND A41 =MAX(MX3,MX4),B341 ,B341+线宽调整 ,A41*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A42 >最大值/线条长度 AND A42 =MAX(MX3,MX4),B342 ,B342+线宽调整 ,A42*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A43 >最大值/线条长度 AND A43 =MAX(MX3,MX4),B343 ,B343+线宽调整 ,A43*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A44 >最大值/线条长度 AND A44 =MAX(MX3,MX4),B344 ,B344+线宽调整 ,A44*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A45 >最大值/线条长度 AND A45 =MAX(MX3,MX4),B345 ,B345+线宽调整 ,A45*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A46 >最大值/线条长度 AND A46 =MAX(MX3,MX4),B346 ,B346+线宽调整 ,A46*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A47 >最大值/线条长度 AND A47 =MAX(MX3,MX4),B347 ,B347+线宽调整 ,A47*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A48 >最大值/线条长度 AND A48 =MAX(MX3,MX4),B348 ,B348+线宽调整 ,A48*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A49 >最大值/线条长度 AND A49 =MAX(MX3,MX4),B349 ,B349+线宽调整 ,A49*峰值过滤 ,0 ),COLORYELLOW;

 STICKLINE(ISLASTBAR AND A50 >最大值/线条长度 AND A50 =MAX(MX3,MX4),LB ,LB+线宽调整 ,A50*峰值过滤 ,0 ),COLORYELLOW;

 {DRAWKLINE(HIGH,OPEN,LOW,CLOSE);};

虽然是有未来函数的，但是只是获利盘之类的函数，对操作指导没有太大影响，只是给我们预测支撑压力。个人认为不错。不喜勿喷。

 注意：对大盘没用。