通达信筹码峰指标公式
全仓买入:((CROSS(MA(CLOSE,5),MA(CLOSE,30)))ANDCLOSE<MA(CLOSE,60));
上线:=SMA(C,6.5,1);
下线:=SMA(C,13.5,1);
上线1:=SMA(C,3,1);
下线1:=SMA(C,8,1);
DRAWTEXT(CROSS(上线,下线),LOW*0.98,'◎全仓买'),COLOR00FF00;
DRAWTEXT(CROSS(下线1,上线1),H*1.02,'●清仓'),COLORYELLOW;
买卖线:MA(CLOSE,5),COLORGREEN,LINETHICK2;
买:IF(买卖线>REF(买卖线,1),买卖线,DRAWNULL),COLORRED,LINETHICK2;
卖:IF(买卖线<REF(买卖线,1),买卖线,DRAWNULL),COLORGREEN,LINETHICK2;
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
UPR:=BBI+3*STD(BBI,13),LINETHICK2;
DWN:=BBI-3*STD(BBI,13);
安全:=MA(CLOSE,60),LINETHICK2;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
DRAWTEXT(CROSS(82,RSI),HIGH*1.02,'◆减仓'),COLORFF9966,LINETHICK2;
A77:=(2*C+H+L)/4;
操作1:=MA(A77,5)*1.03,LINETHICK2;
操作2:=MA(A77,5)*0.97,LINETHICK2;
VAR1:LLV(A77,21);
VAR2:HHV(A77,21);
SK:=EMA((A77-VAR1)/(VAR2-VAR1)*100,7);
SD:=EMA(0.667*REF(SK,1)+0.333*SK,5);
DRAWTEXT(IF(COUNT(CLOSE<REF(CLOSE,1),8)/8>6/10ANDVOL>=1.5*MA(VOL,5)
AND
COUNT(SK>=SD,3)ANDREF(LOW,1)=LLV(LOW,120),1,0),LOW*0.98,'◇买进
'),COLOR0099FF;
DRAWTEXT(IF(COUNT(CLOSE<REF(CLOSE,1),13)/13>6/10AND
COUNT(SK>SD,6)ANDREF(LOW,5)=LLV(LOW,120)ANDREF(CLOSE>=OPEN,4)AND
REF(CLOSE>OPEN,3)ANDREF(CLOSE>OPEN,2)ANDREF(OPEN>CLOSE,1)AND
OPEN>REF(CLOSE,1),1,0),LOW*0.98,'◇买进'),COLORYELLOW;
D:=MA(CLOSE,80)-MA(CLOSE,10)/3;
DRAWTEXT(IF(CLOSE<DANDVOL/240>MA(VOL,5)/240AND
CLOSE>REF(CLOSE,1)*1.08
ANDCLOSE<MA(CLOSE,13)*1.3,1,0),LOW*0.98,'◆抄底'),COLORYELLOW;
VARE1:=EMA(C,3);
VARE2:=EMA(C,5);
VARE3:=EMA(C,10);
VAR4:=EMA(C,20);
VAR5:=EMA(C,30);
买进价:=((C-REF(MA(C,6),1))/6+MA(C,6))*1.004;
买进条件:=CROSS(C,买进价)AND买进价>REF(买进价,1);
STICKLINE(买进条件,H,L,0.5,1),COLORRED,LINETHICK2;STICKLINE(买进条
件,O,C,6,0),COLORRED,LINETHICK2;
加码价:=((C-REF(MA(C,18),1))/18+MA(C,18))*1.004;
加码条件:=CROSS(C,加码价)AND加码价>REF(加码价,1);
STICKLINE(加码条件,H,L,0.5,1),COLORYELLOW,LINETHICK2;STICKLINE(加码条
件,O,C,6,0),COLORYELLOW,LINETHICK2;
{成本分布}
HB:=COST(99.9);
LB:=COST(0.1);
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;
STICKLINE(ISLASTBAR,HB,HB,A1*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B31,B31,A1*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B32,B32,A2*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B33,B33,A3*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B34,B34,A4*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B35,B35,A5*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B36,B36,A6*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B37,B37,A7*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B38,B38,A8*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B39,B39,A9*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B310,B310,A10*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B311,B311,A11*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B312,B312,A12*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B313,B313,A13*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B314,B314,A14*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B315,B315,A15*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B316,B316,A16*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B317,B317,A17*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B318,B318,A18*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B319,B319,A19*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B320,B320,A20*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B321,B321,A21*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B322,B322,A22*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B323,B323,A23*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B324,B324,A24*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B325,B325,A25*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B326,B326,A26*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B327,B327,A27*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B328,B328,A28*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B329,B329,A29*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B330,B330,A30*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B331,B331,A31*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B332,B332,A32*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B333,B333,A33*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B334,B334,A34*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B335,B335,A35*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B336,B336,A36*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B337,B337,A37*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B338,B338,A38*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B339,B339,A39*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B340,B340,A40*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B341,B341,A41*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B342,B342,A42*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B343,B343,A43*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B344,B344,A44*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B345,B345,A45*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B346,B346,A46*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B347,B347,A47*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,B348,B348,A48*50,0),COLORGRAY;
STICKLINE(ISLASTBAR,LB,LB,A50*50,0),COLORGRAY;
当前获利筹码:IF(WINNER(CLOSE),WINNER(CLOSE)*100,0),NODRAW;
通达信动态筹码峰公式
LC:=REF(CLOSE,1);
WRSI:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*100;
获利筹码:=CONST(WINNER(C)*100);
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
量能饱和:=(IF(SAT>1,1,SAT)*100);
WR10:=(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3))*100;
活跃:=(WRSI-WR10);
活跃度比:=IF(活跃>=0,(活跃+100)/2,100-ABS((活跃-100)/2));
DRAWTEXT_FIX(ISLASTBAR=1,0.83,0.25,1,STRCAT(STRCAT('量能饱和： ',CON2STR(量
能饱和,2)),'％')),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR=1,0.83,0.52,1,STRCAT(STRCAT('活跃度比： ',CON2STR(活
跃度比,2)),'％')),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR=1,0.83,0.75,1,STRCAT(STRCAT('获利筹码： ',CON2STR(获
利筹码,2)),'％')),COLORYELLOW;
DRAWRECTREL(950,470,630,365,RGB(150,10,250));
DRAWRECTREL(950,710,630,610,RGB(150,10,250));
DRAWRECTREL(950,855,630,955,RGB(150,10,250));
DRAWRECTREL(950,470,630+CONST(量能饱和*(950-630)/100),365,RGB(0,100,0));
DRAWRECTREL(790,470,790,365,RGB(0,0,10));
DRAWRECTREL(950,710,630+CONST(活跃度比*(950-630)/100),610,RGB(0,100,0));
DRAWRECTREL(790,710,790,610,RGB(0,0,10));
DRAWRECTREL(950,855,630+CONST(获利筹码*(950-630)/100),955,RGB(0,100,0));
DRAWRECTREL(790,855,790,955,RGB(0,0,10));
总涨幅周期:=350;
高点位:=REFDATE(HHV(H,总涨幅周期),DATE);
低点位:=REFDATE(LLV(L,总涨幅周期),DATE);
低位价:=REF(L,BARSLAST(低点位=L)),COLORGREEN,NODRAW;
高位价:=REF(H,BARSLAST(高点位=H)),COLORRED,NODRAW;
曾最大涨幅:=(高位价-低位价)/低位价*100;
当前涨幅:=(C-低位价)/低位价*100;
ZFA:=CON2STR(CONST(曾最大涨幅),2);
ZFB:=CON2STR(CONST(当前涨幅),2);
ZFC:=STRCAT('【曾最大涨幅】 ： ',ZFA);
ZFD:=STRCAT(ZFC,'％');
ZFE:=STRCAT(ZFD,'【当前总涨幅】 ： ');
ZFF:=STRCAT(ZFE,ZFB);
ZFG:=STRCAT(ZFF,'％');
{DRAWTEXT_FIX(ISLASTBAR,0.73,0.345,0,''),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.73,0.345,0,ZFG),COLORYELLOW};
AA1X:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),-
VOL/CAPITAL*100,0)),0)};
成交额:=V*C/100,NODRAW;{万元}
AA2X:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);
AA3X:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);
AA4X:=SUM((IF(((成交额/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);
AA5X:=SUM((IF(((成交额/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);
AA6X:=((AA2X+AA3X)+AA4X)+AA5X;
DD1X:=1;
AAA1:=STRCAT(STRCAT('机构持有',CON2STR((100*AA2X)/AA6X,0)),'%');
AAA2:=STRCAT(STRCAT('散户持有',CON2STR((100*AA3X)/AA6X,0)),'%');
DRAWTEXT_FIX(1,0.83,0,1,'《★筹码分析★》 '),COLORRED;
DRAWTEXT_FIX(DD1X=1,0.63,0,0,AAA1),COLORMAGENTA;
DRAWTEXT_FIX(DD1X=1,0.89,0,0,AAA2),COLORGREEN;
VARA5:=CONST(AA2X/AA6X*100);
DRAWRECTREL(950,220,630,115,RGB(150,10,250));
DRAWRECTREL(950,220,630+CONST(VARA5*(950-630)/100),115,RGB(0,100,0));
DRAWRECTREL(790,220,790,115,RGB(0,0,10));
评论(0)