通达信〖新筹码〗用筹码分布统计平均成本主图指标公式源码

逃顶线:=COST(90);
风险线:=HHV(COST(90),20);
VV:=HHV(COST(90),10);
XX:=LLV(COST(70),20);
启动:HHV(COST(90),10),COLORRED,LINETHICK2;
套牢筹码:STICKLINE(逃顶线<VV,逃顶线,VV,8,0),COLORB4771F;
X_36:=COST(1);
X_37:=COST(10);
X_38:=COST(20);
X_39:=COST(30);
X_40:=COST(40);
X_41:=COST(50);
X_42:=COST(60);
X_43:=COST(70);
X_44:=COST(80);
X_45:=COST(90);
X_46:=COST(99);
X_47:=COST(5);
X_48:=COST(15);
X_49:=COST(25);
X_50:=COST(35);
X_51:=COST(45);
X_52:=COST(55);
X_53:=COST(65);
X_54:=COST(75);
X_55:=COST(85);
X_56:=COST(95);
X_57:=X_47-X_36;
X_58:=X_37-X_47;
X_59:=X_48-X_37;
X_60:=X_38-X_48;
X_61:=X_49-X_38;
X_62:=X_39-X_49;
X_63:=X_50-X_39;
X_64:=X_40-X_50;
X_65:=X_51-X_40;
X_66:=X_41-X_51;
X_67:=X_52-X_41;
X_68:=X_42-X_52;
X_69:=X_53-X_42;
X_70:=X_43-X_53;
X_71:=X_54-X_43;
X_72:=X_44-X_54;
X_73:=X_55-X_44;
X_74:=X_45-X_55;
X_75:=X_56-X_45;
X_76:=X_46-X_56;
X_77:=MIN(X_57,MIN(X_58,MIN(X_59,MIN(X_60,MIN(X_61,MIN(X_62,MIN(X_63,MIN(X_64,MIN(X_65,MIN(X_66,MIN(X_67,MIN(X_68,MIN(X_69,MIN(X_70,MIN(X_71,MIN(X_72,MIN(X_73,MIN(X_74,MIN(X_75,X_76)))))))))))))))))));
X_78:=IF(X_57=X_77,(X_47+X_36)/2,IF(X_58=X_77,(X_47+X_37)/2,IF(X_59=X_77,(X_48+X_37)/2,IF(X_60=X_77,(X_48+X_38)/2,IF(X_61=X_77,(X_49+X_38)/2,IF(X_62=X_77,(X_49+X_39)/2,IF(X_63=X_77,(X_50+X_39)/2,IF(X_64=X_77,(X_50+X_40)/2,IF(X_65=X_77,(X_51+X_40)/2,IF(X_66=X_77,(X_51+X_41)/2,IF(X_67=X_77,(X_52+X_41)/2,IF(X_68=X_77,(X_52+X_42)/2,IF(X_69=X_77,(X_53+X_42)/2,IF(X_70=X_77,(X_53+X_43)/2,IF(X_71=X_77,(X_54+X_43)/2,IF(X_72=X_77,(X_54+X_44)/2,IF(X_73=X_77,(X_55+X_44)/2,IF(X_74=X_77,(X_55+X_45)/2,IF(X_75=X_77,(X_56+X_45)/2,(X_56+X_46)/2)))))))))))))))))));
STICKLINE(X_78 AND ISLASTBAR,X_78-0.01,X_78+0.01,50,1),{COLOREE99FF}COLOR8515C7;
DRAWTEXT(X_78 AND ISLASTBAR,X_78*1.015,' 筹 码 峰'),{COLORLIBLUE}COLOR8515C7;
XA_1:=COST(0.1);
XA_2:=COST(99.900002);
XA_3:=(XA_2-XA_1)/10;
筹一:(WINNER(XA_1+XA_3)-WINNER(XA_1))*100,COLOR0000CD,NODRAW;
筹二:(WINNER(XA_1+XA_3*2)-WINNER(XA_1+XA_3))*100,COLOR5533FF,NODRAW;
筹三:(WINNER(XA_1+XA_3*3)-WINNER(XA_1+XA_3*2))*100,COLOR7777FF,NODRAW;
筹四:(WINNER(XA_1+XA_3*4)-WINNER(XA_1+XA_3*3))*100,COLORE16941,NODRAW;
筹五:(WINNER(XA_1+XA_3*5)-WINNER(XA_1+XA_3*4))*100,COLORFF7648,NODRAW;
筹六:(WINNER(XA_1+XA_3*6)-WINNER(XA_1+XA_3*5))*100,COLORFF901E,NODRAW;
筹七:(WINNER(XA_1+XA_3*7)-WINNER(XA_1+XA_3*6))*100,COLORFFB863,NODRAW;
筹八:(WINNER(XA_1+XA_3*8)-WINNER(XA_1+XA_3*7))*100,COLOR006633,NODRAW;
筹九:(WINNER(XA_1+XA_3*9)-WINNER(XA_1+XA_3*8))*100,COLOR009933,NODRAW;
筹十:(WINNER(XA_2)-WINNER(XA_1+XA_3*9))*100,COLOR71C671,NODRAW;
{峰占比:=MAX(筹一,MAX(筹二,MAX(筹三,MAX(筹四,MAX(筹五,MAX(筹六,MAX(筹七,MAX(筹八,MAX(筹九,筹十)))))))));
峰底价:=IF(峰占比=筹一,XA_1,IF(峰占比=筹二,XA_1+XA_3,IF(峰占比=筹三,XA_1+XA_3*2,IF(峰占比=筹四,XA_1+XA_3*3,IF(峰占比=筹五,XA_1+XA_3*4,IF(峰占比=筹六,XA_1+XA_3*5,IF(峰占比=筹七,XA_1+XA_3*6,IF(峰占比=筹八,XA_1+XA_3*7,IF(峰占比=筹九,XA_1+XA_3*8,XA_1+XA_3*9)))))))));
STICKLINE(峰占比>12,峰底价,峰底价+XA_3,8,0),COLORYELLOW; 备用}
DRAWNUMBER(筹一>=5 AND 筹一<20,XA_1+XA_3,INTPART(筹一)),COLOR999999;
DRAWNUMBER(筹一>=20,XA_1+XA_3,INTPART(筹一)),COLORE22B8A;
DRAWNUMBER(筹二>=5 AND 筹二<20,XA_1+XA_3*2,INTPART(筹二)),COLOR999999;
DRAWNUMBER(筹二>=20,XA_1+XA_3*2,INTPART(筹二)),COLORE22B8A;
DRAWNUMBER(筹三>=5 AND 筹三<20,XA_1+XA_3*3,INTPART(筹三)),COLOR999999;
DRAWNUMBER(筹三>=20,XA_1+XA_3*3,INTPART(筹三)),COLORE22B8A;
DRAWNUMBER(筹四>=5 AND 筹四<20,XA_1+XA_3*4,INTPART(筹四)),COLOR999999;
DRAWNUMBER(筹四>=20,XA_1+XA_3*4,INTPART(筹四)),COLORE22B8A;
DRAWNUMBER(筹五>=5 AND 筹五<20,XA_1+XA_3*5,INTPART(筹五)),COLOR999999;
DRAWNUMBER(筹五>=20,XA_1+XA_3*5,INTPART(筹五)),COLORE22B8A;
DRAWNUMBER(筹六>=5 AND 筹六<20,XA_1+XA_3*6,INTPART(筹六)),COLOR999999;
DRAWNUMBER(筹六>=20,XA_1+XA_3*6,INTPART(筹六)),COLORE22B8A;
DRAWNUMBER(筹七>=5 AND 筹七<20,XA_1+XA_3*7,INTPART(筹七)),COLOR999999;
DRAWNUMBER(筹七>=20,XA_1+XA_3*7,INTPART(筹七)),COLORE22B8A;
DRAWNUMBER(筹八>=5 AND 筹八<20,XA_1+XA_3*8,INTPART(筹八)),COLOR999999;
DRAWNUMBER(筹八>=20,XA_1+XA_3*8,INTPART(筹八)),COLORE22B8A;
DRAWNUMBER(筹九>=5 AND 筹九<20,XA_1+XA_3*9,INTPART(筹九)),COLOR999999;
DRAWNUMBER(筹九>=20,XA_1+XA_3*9,INTPART(筹九)),COLORE22B8A;
DRAWNUMBER(筹十>=5 AND 筹十<20,XA_2,INTPART(筹十)),COLOR999999;
DRAWNUMBER(筹十>=20,XA_2,INTPART(筹十)),COLORE22B8A;
涨幅:=(C-LLV(C,60))/LLV(C,60)*100;
最低筹码:=COST(0.1);
最高筹码:=COST(99.9);
筹码均分:=(最高筹码-最低筹码)/10;
COST97:=INTPART(COST(97)*100)/100;
UP97:=(COST97-REF(COST97,1))/REF(COST97,1)*100;
筹码突破:=涨幅<60 AND ((crOSS(C,COST97) AND UP97>2) OR WINNER(C)*100>98) AND (WINNER(最低筹码+筹码均分*4)-WINNER(最低筹码))*100>10;
{DRAWTEXT(筹码突破,H*1.03,'T'),COLORGREEN,LINETHICK3;}
STICKLINE(1,X_78-X_77/2,X_78+X_77/2,8,0),COLORYELLOW;
平均成本:COST(50),COLOR800080,LINETHICK3;
现价:CLOSE,COLORCYAN,LINETHICK2;