『筹码量化』副图指标，筹码分析巅峰之作 基于殷富老师筹码尖峰理论改编

今:=ROUND((IF(CODELIKE('301') OR CODELIKE('300'),WINNER(C*1.2),WINNER(C*1.1))-IF(CODELIKE('301') OR CODELIKE('300'),WINNER(C*0.8),WINNER(C*0.9)))*100);

昨:=REF(今,1);

机:=CROSS(昨,今),NODRAW;

获利:=WINNER(C)*100,COLORRED;

阻力差:=今-昨,NODRAW;

套:=ROUND(100-IF(CODELIKE('301') OR CODELIKE('300'),WINNER(C*1.2),WINNER(C*1.1))*100);

锁:=ROUND((IF(CODELIKE('301') OR CODELIKE('300'),WINNER(C*0.8),WINNER(C*0.9))*100));

ZS:=REF(锁,1);

ZTL:=REF(套,1);

锁差:=锁-ZS,NODRAW;

换手率％:=100*VOL/(FINANCE(7)/100),COLORRED,NODRAW;

逃:=HHV(今,5)*0.7,COLORCYAN;

顶筹变化:=ROUND(REF(套,1)-套);

锁筹变化:=ROUND(锁-REF(锁,1));

牛气:SUM((顶筹变化+锁筹变化),2),COLORMAGENTA,NODRAW;

STICKLINE(锁筹变化,0,5,3,1),COLORRED;

STICKLINE(锁筹变化=0,0,5,3,1),COLORRED;

STICKLINE(锁筹变化>50,0,5,3,0),COLORRED;

STICKLINE(锁筹变化< 0,0,5,3,0),COLOR008000;

STICKLINE(牛气>50,0,5/2,3,0),COLORRED;

STICKLINE(牛气>50,5/2,5,3,0),COLORMAGENTA;

STICKLINE(顶筹变化,5,10,3,1),COLORRED;

STICKLINE(顶筹变化=0,5,10,3,1),COLORRED;

STICKLINE(锁,10,15,3,1),COLORRED;

STICKLINE(锁=0,10,15,3,1),COLORRED;

STICKLINE(锁>30 AND 锁< 50,10,15,3,0),COLORBROWN;

STICKLINE(锁>50,10,15,3,0),COLORMAGENTA;

STICKLINE(锁>20 AND 锁< 30,10,15,3,0),COLOR0080FF;

STICKLINE(今,15,20,3,1),COLORRED;

STICKLINE(今< 50,15,20,3,0),COLORRED;

STICKLINE(套,20,25,3,1),COLORRED;

STICKLINE(套=0,20,25,3,0),COLOR0080FF;

DRAWNUMBER(套>=0,23,IF(套>=0,套,0)),COLORWHITE;

DRAWNUMBER(套< 0,23,套),COLORWHITE;

DRAWNUMBER(今>=0,18,IF(今>=0,今,0)),COLORWHITE;

DRAWNUMBER(今< 0,18,今),COLORWHITE;

DRAWNUMBER(锁>=0,13,IF(锁>=0,锁,0)),COLORWHITE;

DRAWNUMBER(锁< 0,13,锁),COLORWHITE;

DRAWNUMBER(锁筹变化>=0,3,IF(锁筹变化>=0,锁筹变化,0)),COLORWHITE;

DRAWNUMBER(锁筹变化< 0,3,锁筹变化),COLORWHITE;

DRAWNUMBER(顶筹变化>=0,8,IF(顶筹变化>=0,顶筹变化,0)),COLORWHITE;

DRAWNUMBER(顶筹变化< 0,8,顶筹变化),COLORWHITE;

DRAWTEXT(ISLASTBAR,3,'        【锁筹变化】'),COLORGREEN;

DRAWTEXT(ISLASTBAR,8,'        【顶筹变化】'),COLORGREEN;

DRAWTEXT(ISLASTBAR,13,'        【锁筹】'),COLORGREEN;

DRAWTEXT(ISLASTBAR,18,'        【浮筹】'),COLORGREEN;

DRAWTEXT(ISLASTBAR,23,'        【顶筹】'),COLORGREEN;

W105:=WINNER(C*1.05);

W110:=WINNER(C*1.1);

W115:=WINNER(C*1.15);

W120:=WINNER(C*1.2);

W95:=WINNER(C*0.95);

W90:=WINNER(C*0.9);

W85:=WINNER(C*0.85);

W80:=WINNER(C*0.8);

W75:=WINNER(C*0.75);

W70:=WINNER(C*0.7);

W65:=WINNER(C*0.65);

JS5:=INTPART((W105-WINNER(C))*100);

JS10:=INTPART((W110-W105)*100);

JS15:=ROUND((W115-W110)*100);

JS20:=ROUND((W120-W115)*100);

JS20E:=ROUND((1-W120)*100);

JX5:=INTPART((WINNER(C)-W95)*100);

JX10:=INTPART((W95-W90)*100);

JX15:=INTPART((W90-W85)*100);

JX20:=INTPART((W85-W80)*100);

JX25:=ROUND((W80-W75)*100);

JX30:=ROUND((W75-W70)*100);

JX35:=ROUND((W70-W65)*100);

JX45:=ROUND(W65*100);

擎天柱:=JX10+JX15;

JX:=JX25+JX30+JX35+JX45;

MAXC:=MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(JS5,JS10),JS15),JS20),JS20E),JX5),JX10),JX15),JX20),MAX(MAX(JX25,JX30),JX35));

X1:=30< MAXC>=0;

X2:=MAXC>=30;

STICKLINE(擎天柱,25,30,3,1),COLORRED;

STICKLINE(擎天柱>30,25,30,3,0),COLORMAGENTA;

DRAWNUMBER(擎天柱>=0,28,IF(擎天柱>=0,擎天柱,0)),COLORWHITE;

DRAWNUMBER(擎天柱< 0,28,擎天柱),COLORWHITE;

DRAWTEXT(ISLASTBAR,28,'        【擎天柱】'),COLORGREEN;

STICKLINE(JX15,30,35,3,0),COLORYELLOW;

STICKLINE(JX15=0,30,35,3,1),COLORRED;

DRAWNUMBER(JX15>=0,33,IF(JX15>=0,JX15,0)),COLORRED;

DRAWNUMBER(JX15< 0,33,JX15),COLORRED;

STICKLINE(JX10,35,40,3,0),COLORCYAN;

STICKLINE(JX10=0,35,40,3,1),COLORRED;

DRAWNUMBER(JX10>=0,38,IF(JX10>=0,JX10,0)),COLORRED;

DRAWNUMBER(JX10< 0,38,JX10),COLORRED;

DRAWTEXT(ISLASTBAR,33,'        【支撑筹码】'),COLORGREEN;

DRAWTEXT(ISLASTBAR,38,'        【介入筹码】'),COLORGREEN;

STICKLINE(JX5,40,45,3,1),COLORRED;

STICKLINE(JX5=0,40,45,3,1),COLORRED;

STICKLINE(JX5>30,40,45,3,0),COLORRED;

STICKLINE(JS5,45,50,3,0),COLOR408000;

STICKLINE(JS5=0,45,50,3,1),COLORRED;

DRAWNUMBER(JX5>=0,43,IF(JX5>=0,JX5,0)),COLORWHITE;

DRAWNUMBER(JX5< 0,43,JX5),COLORWHITE;

DRAWNUMBER(JS5>=0,48,IF(JS5>=0,JS5,0)),COLORWHITE;

DRAWNUMBER(JS5< 0,48,JS5),COLORWHITE;

DRAWTEXT(ISLASTBAR,43,'        【托底筹码】'),COLORGREEN;

DRAWTEXT(ISLASTBAR,48,'        【抛压筹码】'),COLORGREEN;

STICKLINE(JS10,50,55,3,0),COLORCYAN;

STICKLINE(JS10=0,50,55,3,1),COLORRED;

DRAWNUMBER(JS10>=0,53,IF(JS10>=0,JS10,0)),COLORRED;

DRAWNUMBER(JS10< 0,53,JS10),COLORRED;

STICKLINE(JS15,55,60,3,0),COLOR008000;

STICKLINE(JS15=0,55,60,3,1),COLORRED;

DRAWNUMBER(JS15>=0,58,IF(JS15>=0,JS15,0)),COLORRED;

DRAWNUMBER(JS15< 0,58,JS15),COLORRED;

DRAWTEXT(ISLASTBAR,53,'        【抛筹码】'),COLORGREEN;

DRAWTEXT(ISLASTBAR,58,'        【割肉抛筹】'),COLORGREEN;

AE2:=(((2*CLOSE)+HIGH)+LOW)/4;

AE3:=LLV(LOW,34);

AE4:=HHV(HIGH,34);

YUE:=(EMA((((AE2-AE3)/(AE4-AE3))*100),8));

QIAN:=(EMA(YUE,5));

F_1:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100)/3;

F_2:=HHV(F_1>20,10);

M5:=MA(CLOSE,5);

M10:=MA(CLOSE,10);

M20:=MA(CLOSE,20);

M30:=MA(CLOSE,30);

M5X10:=BARSLAST(CROSS(M5,M10));

M10X5:=BARSLAST(CROSS(M10,M5));

R9:=IF(M5X10< M10X5,M5X10+1,0);

R10:=IF(M10X5< M5X10,M10X5+1,0);

R11:=M5>M20 AND M10>M20 AND M20>REF(M20,1) AND M30>REF(M30,1);

R14:=HHV(R9,5)>=2 AND R11 AND M5>REF(M5,1) AND M5>M10;

FL:=R14*R9,COLORLIBLUE;

R15:=BARSLAST(FL>0 AND NOT(REF(FL,1)))+1;

RR:=ROUND((CLOSE/REF(CLOSE,R15)-1)*100);

STICKLINE(RR,60,65,3,1),COLORRED;

STICKLINE(RR=0,60,65,3,1),COLORRED;

STICKLINE(RR>0,60,65,3,0),COLORBROWN;

STICKLINE(RR>15,60,60+5/2,3,0),COLORRED;

STICKLINE(RR>15,60+5/2,65,3,0),COLORMAGENTA;

DRAWTEXT(ISLASTBAR,63,'        【千山值】'),COLORGREEN;

DRAWNUMBER(RR>=0,63,IF(RR>=0,RR,0)),COLORWHITE;

DRAWNUMBER(RR< 0,63,RR),COLORWHITE;

TYP:=(HIGH+LOW+CLOSE)/3;

千山CCI:=ROUND((TYP-MA(TYP,144))*1000/(15*AVEDEV(TYP,144))/10);

STICKLINE(千山CCI,65,70,3,1),COLORRED;

STICKLINE(千山CCI=0,65,70,3,1),COLORRED;

STICKLINE(千山CCI>40,65,70,3,0),COLORRED;

STICKLINE(千山CCI>10 AND 千山CCI< 40,65,70,3,0),COLOR0080FF;

DRAWTEXT(ISLASTBAR,68,'        【千山CCI】'),COLORGREEN;

DRAWNUMBER(千山CCI>=0,68,IF(千山CCI>=0,千山CCI,0)),COLORWHITE;

DRAWNUMBER(千山CCI< 0,68,千山CCI),COLORWHITE;

VAR0:=(CLOSE-REF(CLOSE,3))/REF(CLOSE,3);

VAR1:=(CLOSE-REF(CLOSE,5))/REF(CLOSE,5);

VAR2:=(CLOSE-REF(CLOSE,20))/REF(CLOSE,20);

VAR3:=(CLOSE-REF(CLOSE,60))/REF(CLOSE,60);

VAR4:=(CLOSE-REF(CLOSE,120))/REF(CLOSE,120);

VAR5:=(CLOSE-REF(CLOSE,250))/REF(CLOSE,250);

VAR6:=(CLOSE-REF(CLOSE,10))/REF(CLOSE,10);

DP0:=(INDEXC-REF(INDEXC,3))/REF(INDEXC,3);

DP1:=(INDEXC-REF(INDEXC,5))/REF(INDEXC,5);

DP2:=(INDEXC-REF(INDEXC,20))/REF(INDEXC,20);

DP3:=(INDEXC-REF(INDEXC,60))/REF(INDEXC,60);

DP4:=(INDEXC-REF(INDEXC,120))/REF(INDEXC,120);

DP5:=(INDEXC-REF(INDEXC,250))/REF(INDEXC,250);

DP6:=(INDEXC-REF(INDEXC,10))/REF(INDEXC,10);

RS3:=VAR0-DP0;

RS5:=VAR1-DP1;

RS10:=VAR6-DP6;

RS20:=VAR2-DP2;

RS60:=VAR3-DP3;

RS120:=VAR4-DP4;

RS250:=VAR5-DP5;

逆风:=ROUND((6*RS3+5*RS5+4*RS20+3*RS60+2*RS120+RS250)/21*25);

STICKLINE(逆风,70,75,3,1),COLORRED;

STICKLINE(逆风=0,70,75,3,1),COLORRED;

STICKLINE(逆风>3.5,70,75,3,0),COLORRED;

DRAWTEXT(ISLASTBAR,73,'        【逆风】'),COLORGREEN;

DRAWNUMBER(逆风>=0,73,IF(逆风>=0,逆风,0)),COLORWHITE;

DRAWNUMBER(逆风< 0,73,逆风),COLORWHITE;

NOTEXT0:60,COLORGREEN,LINETHICK3;

NOTEXT1:30,COLORGREEN,LINETHICK3;

NOTEXT2:25,COLORGREEN,LINETHICK3;

NOTEXT3:10,COLORGREEN,LINETHICK3;

换手率:100*VOL/CAPITAL,COLORRED,NODRAW;

今买明卖:REF(顶筹变化,1)< 0 AND 顶筹变化>=0 AND REF(锁筹变化,1)<=0 AND 锁筹变化>=0,NODRAW;