量学柱子完整分类（王子量学）

ablya

{月涨停统计--好}
V1:=IF(FINANCE(3)=1,H>=ZTPRICE(REF(CLOSE,1),0.1),H>=ZTPRICE(REF(CLOSE,1),0.2));
V2:=IF(REF(MONTH=12,1),MONTH<REF(MONTH,1),MONTH>REF(MONTH,1));
V3:=BARSLAST(V2);
V0:=COUNT(V1,V3+1);

近一年:COUNT(ZT,250),NODRAW;
今年:COUNT(V1,BARSLAST(V=V#YEAR)+1),NODRAW;

１:V0;
２:REF(V0,SUMBARS(V2,1));
３:REF(V0,SUMBARS(V2,2));
４:REF(V0,SUMBARS(V2,3));
５:REF(V0,SUMBARS(V2,4));
６:REF(V0,SUMBARS(V2,5));
７:REF(V0,SUMBARS(V2,6));
８:REF(V0,SUMBARS(V2,7));
９:REF(V0,SUMBARS(V2,8));
１０:REF(V0,SUMBARS(V2,9));
１１:REF(V0,SUMBARS(V2,10));
１２:REF(V0,SUMBARS(V2,11));
１３:REF(V0,SUMBARS(V2,12));
１４:REF(V0,SUMBARS(V2,13));
１５:REF(V0,SUMBARS(V2,14));
细分行业:  DRAWTEXT(1,0,HYBLOCK);

ablya

{参数 N 0  200  3 }
WN:=5;
WA1:=REF(H,WN)=HHV(H,2*WN+1);
WB1:=FILTER(WA1,WN);
WC1:=BACKSET(WB1,WN+1);
WD1:=FILTER(WC1,WN);
WA2:=REF(L,WN)=LLV(L,2*WN+1);
WB2:=FILTER(WA2,WN);
WC2:=BACKSET(WB2,WN+1);
WD2:=FILTER(WC2,WN);
WE1:=(REF(LLV(L,2*WN),1)+REF(HHV(H,2*WN),1))/2;
WE2:=(H+L)/2;
WH1:=(WD1 AND NOT(WD2 AND WE1>=WE2)) OR ISLASTBAR OR BARSCOUNT(C)=1;
WL1:=(WD2 AND NOT(WD1 AND WE1<WE2));  
WH2:=WD1 AND NOT(WD2 AND WE1>=WE2);
WX1:=REF(BARSLAST(WH1),1)+1;
WF1:=BACKSET(WH1 AND COUNT(WL1,WX1)>0,LLVBARS(IF(WL1,L,10000),WX1));
WG1:=WF1>REF(WF1,1);
WI1:=BACKSET(WG1,2);
WLD:=WI1>REF(WI1,1);
WL2:=WLD OR ISLASTBAR OR BARSCOUNT(C)=1;
WX2:=REF(BARSLAST(WL2),1)+1;
WF2:=BACKSET(WL2 AND COUNT(WH2,WX2)>0,HHVBARS(IF(WH2,H,0),WX2));
WG2:=WF2>REF(WF2,1);
WI2:=BACKSET(WG2,2);
WHD:=WI2>REF(WI2,1);
WR1:=BACKSET(ISLASTBAR,BARSLAST(WHD)+1); WS1:=WR1>REF(WR1,1);
WR2:=BACKSET(WS1,REF(BARSLAST(WHD),1)+2); WS2:=WR2>REF(WR2,1);
WR3:=BACKSET(WS2,REF(BARSLAST(WHD),1)+2); WS3:=WR3>REF(WR3,1);
WR4:=BACKSET(WS3,REF(BARSLAST(WHD),1)+2); WS4:=WR4>REF(WR4,1);
WR5:=BACKSET(WS4,REF(BARSLAST(WHD),1)+2); WS5:=WR5>REF(WR5,1);
WT1:=BACKSET(ISLASTBAR,BARSLAST(WLD)+1); WU1:=WT1>REF(WT1,1);
WT2:=BACKSET(WU1,REF(BARSLAST(WLD),1)+2); WU2:=WT2>REF(WT2,1);
WT3:=BACKSET(WU2,REF(BARSLAST(WLD),1)+2); WU3:=WT3>REF(WT3,1);
WT4:=BACKSET(WU3,REF(BARSLAST(WLD),1)+2); WU4:=WT4>REF(WT4,1);
{每个高低点价格}
DRAWTEXT(WS1,H,VAR2STR(H,2)),COLORRED,DRAWABOVE;
DRAWTEXT(WS2,H,VAR2STR(H,2)),COLORYELLOW,DRAWABOVE;
DRAWTEXT(WS3,H,VAR2STR(H,2)),COLORGREEN,DRAWABOVE;
DRAWTEXT(WS4,H,VAR2STR(H,2)),COLORMAGENTA,DRAWABOVE;
DRAWTEXT(WS5,H,VAR2STR(H,2)),COLORCYAN,DRAWABOVE;
DRAWTEXT(WU1,L*0.995,VAR2STR(L,2)),COLORRED;
DRAWTEXT(WU2,L*0.995,VAR2STR(L,2)),COLORYELLOW;
DRAWTEXT(WU3,L*0.995,VAR2STR(L,2)),COLORGREEN;
DRAWTEXT(WU4,L*0.995,VAR2STR(L,2)),COLORMAGENTA;
一高:REF(H,BARSLAST(WS1>REF(WS1,1))),DOTLINE,COLORRED;
二高:REF(H,BARSLAST(WS2>REF(WS2,1))),DOTLINE,COLORYELLOW;
三高:REF(H,BARSLAST(WS3>REF(WS3,1))),DOTLINE,COLORGREEN;
四高:REF(H,BARSLAST(WS4>REF(WS4,1))),DOTLINE,COLORMAGENTA;
五高:REF(H,BARSLAST(WS5>REF(WS5,1))),DOTLINE,COLORCYAN;
{每个交叉点画竖线}
MA22:MA(C,22),COLORMAGENTA;
DRAWSL(CROSS(MA22,一高),L,10000,360,1),COLORYELLOW;
DRAWSL(CROSS(MA22,二高),L,10000,360,1),COLORYELLOW;
DRAWSL(CROSS(MA22,三高),L,10000,360,1),COLORYELLOW;
DRAWSL(CROSS(MA22,四高),L,10000,360,1),COLORYELLOW;
DRAWSL(CROSS(MA22,五高),L,10000,360,1),COLORYELLOW;

ablya

WN:=5;
WA1:=REF(H,WN)=HHV(H,2*WN+1);
WB1:=FILTER(WA1,WN);
WC1:=BACKSET(WB1,WN+1);
WD1:=FILTER(WC1,WN);
高点:=REF(H,BARSLAST(WD1));
天数:BARSLAST(WD1);
跌幅LLV(L,天数)/高点-1)*100;
前高:IF(C<12 AND COUNT(C>高点,天数)<3 AND COUNT(H>高点,天数)>0 AND CAPITAL<12345678 AND C>MA(C,233),(C/高点-1)*100,DRAWNULL);
DIF:=EMA(C,12)-EMA(C,26);DEA:=EMA(DIF,9);
数MACD:IF(ISVALID(前高) AND DIF>DEA,BARSLAST(CROSS(DIF,DEA))+1,DRAWNULL);
ZT0:=IF(FINANCE(3)=1,H>=ZTPRICE(REF(CLOSE,1),0.1),H>=ZTPRICE(REF(CLOSE,1),0.2));
ZT1:=BARSLAST(ZT0);
ZT2:=(MIN(C,MIN(O,REF(C,1)))+H)/2;
ZT1B:=REF(ZT2,ZT1);
ZT3:=COUNT(C>=ZT1B,ZT1);
涨停一斗:IF(ZT1<13 AND ZT3=ZT1,ZT3,DRAWNULL);

ablya

{M  1    9    1}
DIF:=EMA(C,12)-EMA(C,26);
DEA:=EMA(DIF,9);
MACD:=2*(DIF-DEA);
JX:=CROSS(DIF,DEA);
SX:=CROSS(DEA,DIF);
VAR1:=LLVBARS(MACD,BARSLAST(SX)+1);
VAR2:=CROSS(BACKSET(JX OR (ISLASTBAR AND DIF<DEA),VAR1+1),0.1);
MACDG:IF(C<9 AND BARSLAST(VAR2)=M,C,DRAWNULL);

SPJ:=C<=REFX(C,1) AND C<=REFX(C,2) AND C<=REFX(C,3);
CJL:=V>=(REFX(V,1)+REFX(V,2)+REFX(V,3))/3;
ZDJ:=O<=REFX(L,1) AND O<=REFX(L,2) AND O<=REFX(L,3);
HJZ:=SPJ AND CJL AND ZDJ AND C>O AND ISVALID(REFX(V,3));
HJZ2:IF(ISVALID(MACDG),BARSLAST(HJZ),DRAWNULL);

ablya

ablya 发表于 2026-8-26 20:09
{M  1    9    1}
DIF:=EMA(C,12)-EMA(C,26);
DEA:=EMA(DIF,9);

MACD绿柱￥黄金柱

ablya

AX1:=COST(85);
AX2:=COST(15);
AX3:=AX1-AX2;
AX4:=(AX1+AX2)/2;
AX5:=AX3/AX4*100<8;
BX1:=HHV(HIGH,300);
BX2:=LLV(LOW,300);
BX3:=BX1-BX2;
BX4:=(AX4-BX2)<BX3/2;
低位单峰密集:AX5 AND BX4 AND C<11 AND CAPITAL<12345678;

ablya

A100:=DYNAINFO(17)>0 AND
FINDSTR(FGBLOCK,'最近闪跌')<1 AND
FINDSTR(FGBLOCK,'近期解禁')<1 AND
FINDSTR(FGBLOCK,'商誉减值')<1 AND
FINDSTR(FGBLOCK,'高质押股')<1 AND
FINDSTR(FGBLOCK,'破发行价')<1 AND
FINDSTR(FGBLOCK,'高负债率')<1 AND
FINDSTR(FGBLOCK,'业绩预降')<1 AND
FINDSTR(FGBLOCK,'微利股')<1 AND
FINDSTR(FGBLOCK,'扣非亏损')<1 AND
FINDSTR(FGBLOCK,'最近闪拉')<1 AND
FINDSTR(FGBLOCK,'配股股')<1 AND
FINDSTR(FGBLOCK,'亏损股')<1 AND
FINDSTR(FGBLOCK,'连续亏损')<1 AND
FINDSTR(FGBLOCK,'风险提示')<1 AND
Z值>=1.2;

ablya

{参数 N 0  200  3 }
WN:=5;
WA1:=REF(H,WN)=HHV(H,2*WN+1);
WB1:=FILTER(WA1,WN);
WC1:=BACKSET(WB1,WN+1);
WD1:=FILTER(WC1,WN);
WA2:=REF(L,WN)=LLV(L,2*WN+1);
WB2:=FILTER(WA2,WN);
WC2:=BACKSET(WB2,WN+1);
WD2:=FILTER(WC2,WN);
WE1:=(REF(LLV(L,2*WN),1)+REF(HHV(H,2*WN),1))/2;
WE2:=(H+L)/2;
WH1:=(WD1 AND NOT(WD2 AND WE1>=WE2)) OR ISLASTBAR OR BARSCOUNT(C)=1;
WL1:=(WD2 AND NOT(WD1 AND WE1<WE2));  
WH2:=WD1 AND NOT(WD2 AND WE1>=WE2);
WX1:=REF(BARSLAST(WH1),1)+1;
WF1:=BACKSET(WH1 AND COUNT(WL1,WX1)>0,LLVBARS(IF(WL1,L,10000),WX1));
WG1:=WF1>REF(WF1,1);
WI1:=BACKSET(WG1,2);
WLD:=WI1>REF(WI1,1);
WL2:=WLD OR ISLASTBAR OR BARSCOUNT(C)=1;
WX2:=REF(BARSLAST(WL2),1)+1;
WF2:=BACKSET(WL2 AND COUNT(WH2,WX2)>0,HHVBARS(IF(WH2,H,0),WX2));
WG2:=WF2>REF(WF2,1);
WI2:=BACKSET(WG2,2);
WHD:=WI2>REF(WI2,1);
WR1:=BACKSET(ISLASTBAR,BARSLAST(WHD)+1); WS1:=WR1>REF(WR1,1);
WR2:=BACKSET(WS1,REF(BARSLAST(WHD),1)+2); WS2:=WR2>REF(WR2,1);
WR3:=BACKSET(WS2,REF(BARSLAST(WHD),1)+2); WS3:=WR3>REF(WR3,1);
WR4:=BACKSET(WS3,REF(BARSLAST(WHD),1)+2); WS4:=WR4>REF(WR4,1);
WR5:=BACKSET(WS4,REF(BARSLAST(WHD),1)+2); WS5:=WR5>REF(WR5,1);
WT1:=BACKSET(ISLASTBAR,BARSLAST(WLD)+1); WU1:=WT1>REF(WT1,1);
WT2:=BACKSET(WU1,REF(BARSLAST(WLD),1)+2); WU2:=WT2>REF(WT2,1);
WT3:=BACKSET(WU2,REF(BARSLAST(WLD),1)+2); WU3:=WT3>REF(WT3,1);
WT4:=BACKSET(WU3,REF(BARSLAST(WLD),1)+2); WU4:=WT4>REF(WT4,1);
{每个高低点价格}
DRAWTEXT(WS1,H,VAR2STR(H,2)),COLORRED,DRAWABOVE;
DRAWTEXT(WS2,H,VAR2STR(H,2)),COLORYELLOW,DRAWABOVE;
DRAWTEXT(WS3,H,VAR2STR(H,2)),COLORGREEN,DRAWABOVE;
DRAWTEXT(WS4,H,VAR2STR(H,2)),COLORMAGENTA,DRAWABOVE;
DRAWTEXT(WS5,H,VAR2STR(H,2)),COLORCYAN,DRAWABOVE;
DRAWTEXT(WU1,L*0.995,VAR2STR(L,2)),COLORRED;
DRAWTEXT(WU2,L*0.995,VAR2STR(L,2)),COLORYELLOW;
DRAWTEXT(WU3,L*0.995,VAR2STR(L,2)),COLORGREEN;
DRAWTEXT(WU4,L*0.995,VAR2STR(L,2)),COLORMAGENTA;
一高:REF(H,BARSLAST(WS1>REF(WS1,1))),DOTLINE,COLORRED;
二高:REF(H,BARSLAST(WS2>REF(WS2,1))),DOTLINE,COLORYELLOW;
三高:REF(H,BARSLAST(WS3>REF(WS3,1))),DOTLINE,COLORGREEN;
四高:REF(H,BARSLAST(WS4>REF(WS4,1))),DOTLINE,COLORMAGENTA;
五高:REF(H,BARSLAST(WS5>REF(WS5,1))),DOTLINE,COLORCYAN;
{每个交叉点画竖线}
MA22:MA(C,22),COLORMAGENTA;
DRAWSL(CROSS(MA22,一高),L,10000,360,1),COLORYELLOW;
DRAWSL(CROSS(MA22,二高),L,10000,360,1),COLORYELLOW;
DRAWSL(CROSS(MA22,三高),L,10000,360,1),COLORYELLOW;
DRAWSL(CROSS(MA22,四高),L,10000,360,1),COLORYELLOW;
DRAWSL(CROSS(MA22,五高),L,10000,360,1),COLORYELLOW;
MA5:EMA(C,5),COLORWHITE;
MA10:EMA(C,10),COLORYELLOW;
MA55:EMA(C,55),COLORGREEN;
MA120:EMA(C,120),COLORGRAY;
MA233:EMA(C,233),COLORBLUE;
EMA181:IF(PERIOD=6,EMA(C,181),DRAWNULL),COLORRED;

ablya

WN:=5;
WA1:=REF(H,WN)=HHV(H,2*WN+1);
WB1:=FILTER(WA1,WN);
WC1:=BACKSET(WB1,WN+1);
WD1:=FILTER(WC1,WN);
高点:=REF(H,BARSLAST(WD1));
天数:BARSLAST(WD1);
跌幅LLV(L,天数)/高点-1)*100;
前高:IF(C<12 AND COUNT(C>高点,天数)<3 AND COUNT(H>高点,天数)>0 AND CAPITAL<12345678 AND C>MA(C,233),(C/高点-1)*100,DRAWNULL);
DIF:=EMA(C,12)-EMA(C,26);DEA:=EMA(DIF,9);
数MACD:IF(ISVALID(前高) AND DIF>DEA,BARSLAST(CROSS(DIF,DEA))+1,DRAWNULL);

前高2:IF(C<12 AND COUNT(C>高点,天数)<3 AND COUNT(H>高点,天数)>0 AND CAPITAL<12345678,(C/高点-1)*100,DRAWNULL);
MACD2:IF(ISVALID(前高2) AND DIF>DEA,BARSLAST(CROSS(DIF,DEA))+1,DRAWNULL);

细分行业RAWTEXT(1,0,HYBLOCK);

T:=C>=REF(C,1);
A:=BARSLASTCOUNT(T);
J:=(A>2 AND REFX(NOT(T),1)) OR (REF(T,1) AND T AND ISLASTBAR);
连阳:IF(J,A,DRAWNULL);
前高3:IF(C<12 AND ISVALID(连阳) AND CAPITAL<12345678,(C/高点-1)*100,DRAWNULL);
MACD3:IF(ISVALID(前高3) AND DIF>DEA,BARSLAST(CROSS(DIF,DEA))+1,DRAWNULL);

ablya

DIF:=EMA(C,12)-EMA(C,26);DEA:=EMA(DIF,9);
WN:=5;
WA1:=REF(H,WN)=HHV(H,2*WN+1);
WB1:=FILTER(WA1,WN);
WC1:=BACKSET(WB1,WN+1);
WD1:=FILTER(WC1,WN);
高点:=REF(H,BARSLAST(WD1));
天数:BARSLAST(WD1);
跌幅LLV(L,天数)/高点-1)*100;

细分行业RAWTEXT(1,0,HYBLOCK);

T:=C>=REF(C,1);
A:=BARSLASTCOUNT(T);
连阳:IF(A>3,A,DRAWNULL);
前高3:IF(C<12 AND ISVALID(连阳) AND CAPITAL<12345678,(C/高点-1)*100,DRAWNULL);
MACD3:IF(ISVALID(前高3) AND DIF>DEA,BARSLAST(CROSS(DIF,DEA))+1,DRAWNULL);

ablya

{变色均线}
AM21 : MA(C,21),COLORGREEN,LINETHICK2;
IF(AM21 > REF(AM21,1),AM21,DRAWNULL),COLORMAGENTA,LINETHICK2;

ablya

{周月涨停--复盘}
ZT:=IF(FINANCE(3)=1,H>=ZTPRICE(REF(CLOSE,1),0.1),H>=ZTPRICE(REF(CLOSE,1),0.2));
Y1:=IF(REF(MONTH=12,1),MONTH<REF(MONTH,1),MONTH>REF(MONTH,1));
Y2:=BARSLAST(Y1);
Y3:=COUNT(ZT,Y2+1);
Z1:=IF(REF(WEEKOFYEAR=53,1),WEEKOFYEAR<REF(WEEKOFYEAR,1),WEEKOFYEAR>REF(WEEKOFYEAR,1));
Z2:=BARSLAST(Z1);
Z3:=COUNT(ZT,Z2+1);

近一年:COUNT(ZT,250);
今年:COUNT(ZT,BARSLAST(V=V#YEAR)+1);

１周:Z3;
２周:REF(Z3,SUMBARS(Z1,1));
３周:REF(Z3,SUMBARS(Z1,2));
４周:REF(Z3,SUMBARS(Z1,3));
５周:REF(Z3,SUMBARS(Z1,4));

本月:Y3;

细分行业:  DRAWTEXT(1,0,HYBLOCK);

ablya

{周月涨停--复盘}
ZT:=IF(FINANCE(3)=1,H>=ZTPRICE(REF(CLOSE,1),0.1),H>=ZTPRICE(REF(CLOSE,1),0.2));
Y1:=IF(REF(MONTH=12,1),MONTH<REF(MONTH,1),MONTH>REF(MONTH,1));
Y2:=BARSLAST(Y1);
Y3:=COUNT(ZT,Y2+1);
Z1:=IF(REF(WEEKOFYEAR=53,1),WEEKOFYEAR<REF(WEEKOFYEAR,1),WEEKOFYEAR>REF(WEEKOFYEAR,1));
Z2:=BARSLAST(Z1);
Z3:=COUNT(ZT,Z2+1);

近一年:COUNT(ZT,250);
今年:COUNT(ZT,BARSLAST(V=V#YEAR)+1);

１周:Z3;
２周:REF(Z3,SUMBARS(Z1,1));
３周:REF(Z3,SUMBARS(Z1,2));
４周:REF(Z3,SUMBARS(Z1,3));
５周:REF(Z3,SUMBARS(Z1,4));

本月:Y3;
上月:REF(Y3,SUMBARS(Y1,1));
细分行业:  DRAWTEXT(1,0,HYBLOCK);