通达信真实筹码－判断支撑压力公式（提供飞狐源码下载）

真实筹码-----判断支撑压力
 

刚才在论坛看到这个指标感觉非常不错，是大智慧的，经Ｔｈａｎｋ老师修改为通达信的，为让更多的看到用到特在此再发一遍，感谢原作者感谢Ｔｈａｎｋ老师。
 
以色带表示筹码的密集度：蓝色表示短筹密集，青黄色表示大量筹码沉淀，此时要密切关注股价突破方向和成交量配合。此指标的与其他有关筹码的指标相比，其优势在于它的直观、直效性，而且还给出支撑/压力的强弱，这在同类指标中是独一无二的，能及时准确地判断，这一点在实战中非常重要，可以让你买在低点，出在高点。
 
注意，在上升趋势中，还能用来寻找起爆点哟，当出现筹码高度密集信号时，关注股价是否启涨出现数阴包前阳，或能量不济多为假突破突破密筹区需要巨量配合
 假突破是无法滤去的，因为很可能是庄家想拉，但发现阻力很大，转而变成震荡洗盘；或者大盘不配合，庄家选择弃庄（形成顶部）。本公式真实反映了这种情况，其实突破是真是假很容易通过盘面强弱和成交量变化而识别出来
 
 
W00:=COST(1);
 W10:=COST(10);
 W20:=COST(20);
 W30:=COST(30);
 W40:=COST(40);
 W50:=COST(50);
 W60:=COST(60);
 W70:=COST(70);
 W80:=COST(80);
 W90:=COST(90);
 W100:=COST(99);
 W5:=COST(5);
 W15:=COST(15);
 W25:=COST(25);
 W35:=COST(35);
 W45:=COST(45);
 W55:=COST(55);
 W65:=COST(65);
 W75:=COST(75);
 W85:=COST(85);
 W95:=COST(95);
 C5:=W5-W00;
 C10:=W10-W5;
 C15:=W15-W10;
 C20:=W20-W15;
 C25:=W25-W20;
 C30:=W30-W25;
 C35:=W35-W30;
 C40:=W40-W35;
 C45:=W45-W40;
 C50:=W50-W45;
 C55:=W55-W50;
 C60:=W60-W55;
 C65:=W65-W60;
 C70:=W70-W65;
 C75:=W75-W70;
 C80:=W80-W75;
 C85:=W85-W80;
 C90:=W90-W85;
 C95:=W95-W90;
 C100:=W100-W95;
 ZX:=MIN(C5,MIN(C10,MIN(C15,MIN(C20,MIN(C25,MIN(C30,MIN(C35,MIN(C40,MIN(C45,MIN(C50,MIN(C55,MIN(C60,MIN(C65,MIN(C70,MIN(C75,MIN(C80,MIN(C85,MIN(C90,MIN(C95,C100)))))))))))))))))));
 STICKLINE(ZX=C5,W00,W5,5,0),COLORFF8800;
 STICKLINE(ZX=C10,W10,W5,5,0),COLORFF8800;
 STICKLINE(ZX=C15,W15,W10,5,0),COLORFF8800;
 STICKLINE(ZX=C20,W20,W15,5,0),COLORFF8800;
 STICKLINE(ZX=C25,W25,W20,5,0),COLORFF8800;
 STICKLINE(ZX=C30,W30,W25,5,0),COLORFF8800;
 STICKLINE(ZX=C35,W35,W30,5,0),COLORFF8800;
 STICKLINE(ZX=C40,W40,W35,5,0),COLORFF8800;
 STICKLINE(ZX=C45,W45,W40,5,0),COLORFF8800;
 STICKLINE(ZX=C50,W50,W45,5,0),COLORFF8800;
 STICKLINE(ZX=C55,W55,W50,5,0),COLORFF8800;
 STICKLINE(ZX=C60,W60,W55,5,0),COLORFF8800;
 STICKLINE(ZX=C65,W65,W60,5,0),COLORFF8800;
 STICKLINE(ZX=C70,W70,W65,5,0),COLORFF8800;
 STICKLINE(ZX=C75,W75,W70,5,0),COLORFF8800;
 STICKLINE(ZX=C80,W80,W75,5,0),COLORFF8800;
 STICKLINE(ZX=C85,W85,W70,5,0),COLORFF8800;
 STICKLINE(ZX=C90,W90,W85,5,0),COLORFF8800;
 STICKLINE(ZX=C95,W95,W90,5,0),COLORFF8800;
 STICKLINE(ZX=C100,W100,W95,5,0),COLORFF8800;
 筹宽:=W100-W00;
 J90:=W90-W60;
 J80:=W80-W50;
 J70:=W70-W40;
 J60:=W60-W30;
 J50:=W50-W20;
 J40:=W40-W10;
 J30:=W30-W00;
 STICKLINE(J90/筹宽<0.08,W90,W60,5,0),COLOR74D9A4;
 STICKLINE(J80/筹宽<0.08,W80,W50,5,0),COLOR74D9A4;
 STICKLINE(J70/筹宽<0.08,W70,W40,5,0),COLOR74D9A4;
 STICKLINE(J60/筹宽<0.08,W60,W30,5,0),COLOR74D9A4;
 STICKLINE(J50/筹宽<0.08,W50,W20,5,0),COLOR74D9A4;
 STICKLINE(J40/筹宽<0.08,W40,W10,5,0),COLOR74D9A4;
 JJ90:=W90-W70;
 JJ80:=W80-W60;
 JJ70:=W70-W50;
 JJ60:=W60-W40;
 JJ50:=W50-W30;
 JJ40:=W40-W20;
 JJ30:=W30-W10;
 STICKLINE(JJ90/筹宽<0.05,W90,W70,5,0),COLORFFFF00;
 STICKLINE(JJ80/筹宽<0.05,W80,W60,5,0),COLORFFFF00;
 STICKLINE(JJ70/筹宽<0.05,W70,W50,5,0),COLORFFFF00;
 STICKLINE(JJ60/筹宽<0.05,W60,W40,5,0),COLORFFFF00;
 STICKLINE(JJ50/筹宽<0.05,W50,W30,5,0),COLORFFFF00;
 STICKLINE(JJ40/筹宽<0.05,W40,W20,5,0),COLORFFFF00;
 STICKLINE(JJ30/筹宽<0.05,W30,W10,5,0),COLORFFFF00;
 
{彩色K线}
 TYX3:=MA(REF(HHV((C+L+O+H)/4,30),1),3);
 TYX4:=MA((C+L+O+H)/4,13);
 TYX5:=EMA((C+L+O+H)/4,21);
 {空心红}
 STICKLINE(CO,H,L,0,0),COLORRED;
 STICKLINE(CO