通达信量化筹码寻庄副图
今:=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);
鱼哥5 := INTPART((W105 - WINNER(C)) * 100);
鱼哥10 := INTPART((W110 - W105) * 100);
鱼哥15 := ROUND((W115 - W110) * 100);
鱼哥20 := ROUND((W120 - W115) * 100);
鱼哥20E := ROUND((1-W120) * 100);
章鱼5 := INTPART((WINNER(C) - W95) * 100);
章鱼10 := INTPART((W95 - W90) * 100);
章鱼15 := INTPART((W90 - W85) * 100);
章鱼20 := INTPART((W85 - W80) * 100);
章鱼25 := ROUND((W80 - W75) * 100);
章鱼30:= ROUND((W75 - W70) * 100);
章鱼35:= ROUND((W70 - W65) * 100);
章鱼45:= ROUND(W65 * 100);
擎天柱:=章鱼10+章鱼15;
章鱼:=章鱼25 + 章鱼30 + 章鱼35 + 章鱼45 ;
MAXC := MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(鱼哥5, 鱼哥10), 鱼哥15), 鱼哥20), 鱼哥20E), 章鱼5), 章鱼10), 章鱼15), 章鱼20), MAX(MAX(章鱼25, 章鱼30), 章鱼35));
X1:=30< MAXC>=0;
DRAWTEXT_FIX(1,0.60,0.75,0,'更多指标，低费率交易，私聊 '),COLORYELLOW;
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(章鱼15,30,35,3,0),COLORYELLOW;
STICKLINE(章鱼15=0,30,35,3,1),COLORRED;
DRAWNUMBER(章鱼15>=0, 33, IF(章鱼15>=0,章鱼15,0)), COLORRED;
DRAWNUMBER(章鱼15< 0, 33, 章鱼15), COLORRED;
STICKLINE(章鱼10,35,40,3,0),COLORCYAN;
STICKLINE(章鱼10=0,35,40,3,1),COLORRED;
DRAWNUMBER(章鱼10>=0, 38, IF(章鱼10>=0,章鱼10,0)), COLORRED;
DRAWNUMBER(章鱼10< 0, 38, 章鱼10), COLORRED;
DRAWTEXT(ISLASTBAR,33, ' 【支撑筹码】'),COLORGREEN;
DRAWTEXT(ISLASTBAR,38, ' 【介入筹码】'),COLORGREEN;
STICKLINE(章鱼5,40,45,3,1),COLORRED;
STICKLINE(章鱼5=0,40,45,3,1),COLORRED;
STICKLINE(章鱼5>30,40,45,3,0),COLORRED;
STICKLINE(鱼哥5,45,50,3,0),COLOR408000;
STICKLINE(鱼哥5=0,45,50,3,1),COLORRED;
DRAWNUMBER(章鱼5>=0, 43, IF(章鱼5>=0,章鱼5,0)), COLORWHITE;
DRAWNUMBER(章鱼5< 0, 43, 章鱼5), COLORWHITE;
DRAWNUMBER(鱼哥5>=0,48, IF(鱼哥5>=0,鱼哥5,0)), COLORWHITE;
DRAWNUMBER(鱼哥5< 0,48,鱼哥5 ), COLORWHITE;
DRAWTEXT(ISLASTBAR,43, ' 【托底筹码】'),COLORGREEN;
DRAWTEXT(ISLASTBAR,48, ' 【抛压筹码】'),COLORGREEN;
STICKLINE(鱼哥10,50,55,3,0),COLORCYAN;
STICKLINE(鱼哥10=0,50,55,3,1),COLORRED;
DRAWNUMBER(鱼哥10>=0, 53, IF(鱼哥10>=0,鱼哥10,0)), COLORRED;
DRAWNUMBER(鱼哥10< 0, 53, 鱼哥10), COLORRED;
STICKLINE(鱼哥15,55,60,3,0),COLOR008000;
STICKLINE(鱼哥15=0,55,60,3,1),COLORRED;
DRAWNUMBER(鱼哥15>=0, 58, IF(鱼哥15>=0,鱼哥15,0)), COLORRED;
DRAWNUMBER(鱼哥15< 0, 58, 鱼哥15), 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;
ZYG0:=(CLOSE-REF(CLOSE,3))/REF(CLOSE,3);
ZYG1:=(CLOSE-REF(CLOSE,5))/REF(CLOSE,5);
ZYG2:=(CLOSE-REF(CLOSE,20))/REF(CLOSE,20);
ZYG3:=(CLOSE-REF(CLOSE,60))/REF(CLOSE,60);
ZYG4:=(CLOSE-REF(CLOSE,120))/REF(CLOSE,120);
ZYG5:=(CLOSE-REF(CLOSE,250))/REF(CLOSE,250);
ZYG6:=(CLOSE-REF(CLOSE,10))/REF(CLOSE,10);
章鱼哥0:=(INDEXC-REF(INDEXC,3))/REF(INDEXC,3);
章鱼哥1:=(INDEXC-REF(INDEXC,5))/REF(INDEXC,5);
章鱼哥2:=(INDEXC-REF(INDEXC,20))/REF(INDEXC,20);
章鱼哥3:=(INDEXC-REF(INDEXC,60))/REF(INDEXC,60);
章鱼哥4:=(INDEXC-REF(INDEXC,120))/REF(INDEXC,120);
章鱼哥5:=(INDEXC-REF(INDEXC,250))/REF(INDEXC,250);
章鱼哥6:=(INDEXC-REF(INDEXC,10))/REF(INDEXC,10);
RS3:=ZYG0-章鱼哥0;
RS5:=ZYG1-章鱼哥1;
RS10:=ZYG6-章鱼哥6;
RS20:=ZYG2-章鱼哥2;
RS60:=ZYG3-章鱼哥3;
RS120:=ZYG4-章鱼哥4;
RS250:=ZYG5-章鱼哥5;
逆风:=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;