QQ登录

只需一步,快速开始

广告载入中...
楼主: ablya

量学柱子完整分类(王子量学)

[复制链接]
 楼主| 发表于 2026-8-24 03:43 | 显示全部楼层
{月涨停统计--好}
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;

1:V0;
2:REF(V0,SUMBARS(V2,1));
3:REF(V0,SUMBARS(V2,2));
4:REF(V0,SUMBARS(V2,3));
5:REF(V0,SUMBARS(V2,4));
6:REF(V0,SUMBARS(V2,5));
7:REF(V0,SUMBARS(V2,6));
8:REF(V0,SUMBARS(V2,7));
9:REF(V0,SUMBARS(V2,8));
10:REF(V0,SUMBARS(V2,9));
11:REF(V0,SUMBARS(V2,10));
12:REF(V0,SUMBARS(V2,11));
13:REF(V0,SUMBARS(V2,12));
14:REF(V0,SUMBARS(V2,13));
15:REF(V0,SUMBARS(V2,14));
细分行业:  DRAWTEXT(1,0,HYBLOCK);
回复

使用道具 举报

 楼主| 发表于 2026-8-24 03:49 | 显示全部楼层
{参数 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;
回复

使用道具 举报

 楼主| 发表于 2026-8-25 04:46 | 显示全部楼层
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);
回复

使用道具 举报

 楼主| 发表于 2026-8-26 20:09 | 显示全部楼层
{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);
回复

使用道具 举报

 楼主| 发表于 2026-8-26 20:11 | 显示全部楼层
ablya 发表于 2026-8-26 20:09
{M  1    9    1}
DIF:=EMA(C,12)-EMA(C,26);
DEA:=EMA(DIF,9);

MACD绿柱¥黄金柱
回复

使用道具 举报

 楼主| 发表于 2026-8-27 00:57 | 显示全部楼层
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;
回复

使用道具 举报

 楼主| 发表于 2026-8-27 01:05 | 显示全部楼层
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;
回复

使用道具 举报

 楼主| 发表于 2026-8-27 22:58 | 显示全部楼层
{参数 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;
回复

使用道具 举报

 楼主| 发表于 2026-8-27 23:44 | 显示全部楼层
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);
回复

使用道具 举报

 楼主| 发表于 2026-8-28 01:55 | 显示全部楼层
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);
回复

使用道具 举报

 楼主| 发表于 2026-8-28 13:27 | 显示全部楼层
{变色均线}
AM21 : MA(C,21),COLORGREEN,LINETHICK2;
IF(AM21 > REF(AM21,1),AM21,DRAWNULL),COLORMAGENTA,LINETHICK2;
回复

使用道具 举报

 楼主| 发表于 2026-8-29 01:16 | 显示全部楼层
{周月涨停--复盘}
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);

1周:Z3;
2周:REF(Z3,SUMBARS(Z1,1));
3周:REF(Z3,SUMBARS(Z1,2));
4周:REF(Z3,SUMBARS(Z1,3));
5周:REF(Z3,SUMBARS(Z1,4));

本月:Y3;

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

使用道具 举报

 楼主| 发表于 2026-8-29 01:26 | 显示全部楼层
{周月涨停--复盘}
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);

1周:Z3;
2周:REF(Z3,SUMBARS(Z1,1));
3周:REF(Z3,SUMBARS(Z1,2));
4周:REF(Z3,SUMBARS(Z1,3));
5周:REF(Z3,SUMBARS(Z1,4));

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

使用道具 举报

 楼主| 发表于 2026-8-30 05:53 | 显示全部楼层
{参数 N 0  200  3 }
WN:=1;
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);
WT1:=BACKSET(ISLASTBAR,BARSLAST(WLD)+1); WU1:=WT1>REF(WT1,1);
WR2:=BACKSET(WS1,REF(BARSLAST(WHD),1)+2); WS2:=WR2>REF(WR2,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);
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);

HS2:=DRAWLINE(WS3,H, WS2,H,1);
HS3:=DRAWLINE(WS2,H,WS1,H,1);
HL2:IF(WN=0,DRAWNULL,HS2),COLORGREEN;
HL3:IF(WN=0,DRAWNULL,HS3),COLORYELLOW;
{        
LS1:=DRAWLINE(WU4,L,WU3,L,1);
LS2:=DRAWLINE(WU3,L,WU2,L,1);     
LS3:=DRAWLINE(WU2,L,WU1,L,1);}


{
LL1:IF(WN=0,DRAWNULL,LS1),DOTLINE,COLORRED;
LL2:IF(WN=0,DRAWNULL,LS2),DOTLINE,COLORGREEN;
LL3:IF(WN=0,DRAWNULL,LS3),DOTLINE,COLORYELLOW;
}
VAR1:=DATE<>REF(DATE,1);
VAR2:=REFX(VAR1,1); { OR ISLASTBAR}{每日收盘价}
DRAWTEXT(VAR2 AND PERIOD<5,IF(C>=O,C+0.01,C-0.01),VAR2STR(C,2)),COLORWHITE;
{每个高低点价格}
DRAWTEXT(VAR2 AND WS4,H,VAR2STR(H,2)),COLORRED,DRAWABOVE;
DRAWTEXT(VAR2 AND WS3,H,VAR2STR(H,2)),COLORGREEN,DRAWABOVE;
DRAWTEXT(VAR2 AND WS2,H,VAR2STR(H,2)),COLORYELLOW,DRAWABOVE;
DRAWTEXT(VAR2 AND WS1,H,VAR2STR(H,2)),COLORMAGENTA,DRAWABOVE;
DRAWTEXT(VAR2 AND WU4,L*0.995,VAR2STR(L,2)),COLORRED;
DRAWTEXT(VAR2 AND WU3,L*0.995,VAR2STR(L,2)),COLORGREEN;
DRAWTEXT(VAR2 AND WU2,L*0.995,VAR2STR(L,2)),COLORYELLOW;
DRAWTEXT(VAR2 AND WU1,L*0.995,VAR2STR(L,2)),COLORMAGENTA;

S22:=WU3>REF(WU3,1);
三低:REF(L,BARSLAST(S22)),DOTLINE,COLORYELLOW;
S33:=WU2>REF(WU2,1);
二低:REF(L,BARSLAST(S33)),DOTLINE,COLORYELLOW;
S44:=WU1>REF(WU1,1);
一低:REF(L,BARSLAST(S44)),DOTLINE,COLORMAGENTA;

MA21:MA(C,21),COLORGREEN,LINETHICK2;
IF(MA21 > REF(MA21,1),MA21,DRAWNULL),COLORMAGENTA,LINETHICK2;
年线:MA(C,233),COLORBLUE;
{画涨停跌停涨停试盘K线并标注字}
ZT1:=IF(FINANCE(3)=1,(C>=ZTPRICE(REF(CLOSE,1),0.1) AND C=H),(C>=ZTPRICE(REF(CLOSE,1),0.2) AND C=H));
DT1:=IF(FINANCE(3)=1,(C<=DTPRICE(REF(CLOSE,1),0.1) AND C=L),(C<=DTPRICE(REF(CLOSE,1),0.2) AND C=L));
SZT1:=H>=ZTPRICE(REF(C,1),0.1) AND C<>H;
YUZ:=O/REF(C,1)>1.05 AND C<O AND C>REF(C,1);
STICKLINE(ZT1,C,O,-1,0),COLORRED;
STICKLINE(DT1,C,O,-1,0),COLORGREEN;
STICKLINE(YUZ,C,O,-1,0),COLORGREEN;
{STICKLINE(SZT1,C,O,-1,0),COLORRED;}
DRAWTEXT(ZT1 AND PERIOD=5,H,'涨'),COLORYELLOW,DRAWABOVE;
DRAWTEXT(DT1 AND PERIOD=5,H,'跌'),COLORGREEN,DRAWABOVE;
DRAWTEXT(YUZ AND PERIOD=5,H,'预'),COLORGREEN,DRAWABOVE;
DRAWTEXT(SZT1 AND PERIOD=5,H,'试'),COLORMAGENTA,DRAWABOVE;

{黄金柱 向右横线+价格标注 修正版}
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:=BARSLAST(HJZ);
HJZC:=REF(C,HJZ2);
ZDJ1:=FINDLOW(L,HJZ2-3,3,1);
ZDJ2:=MIN(HJZC,ZDJ1);
STICKLINE(HJZ,OPEN,CLOSE,3,0),COLORYELLOW;
STICKLINE(HJZ,OPEN,CLOSE,0.1,0),COLORRED;
DRAWSL(1,ZDJ2,0,HJZ2,2), COLORYELLOW;
DRAWTEXT(REFX(HJZ,1) OR ISLASTBAR, ZDJ2, VAR2STR(ZDJ2,2)),COLORYELLOW,DRAWABOVE;
DRAWTEXT((HJZ AND L>REF(C,1)),H,'帅'),COLORYELLOW,DRAWABOVE;

ZT2:=IF(FINANCE(3)=1,H>=ZTPRICE(REF(CLOSE,1),0.1),H>=ZTPRICE(REF(CLOSE,1),0.2));
ZT3:=BARSLAST(ZT2);
GZ:=BARSLASTCOUNT(MA(C,21)>REF(MA(C,21),1));
涨停高点:=IF(ZT3<9,FINDHIGH(H,0,ZT3+1,1),DRAWNULL);
涨停后跌:=IF(GZ>0,(C/涨停高点-1)*100,DRAWNULL);
DRAWTEXT(ISLASTBAR,L*0.965,VARCAT(VAR2STR(涨停后跌,2),'%')),COLORGREEN;
回复

使用道具 举报

 楼主| 发表于 2026-8-30 06:39 | 显示全部楼层
年线上:C>MA(C,233);
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);

细分行业RAWTEXT(1,0,HYBLOCK);
MA21:=BARSLASTCOUNT(MA(C,21)>REF(MA(C,21),1));

涨停高点:=IF(ZT1<9,FINDHIGH(H,0,ZT1+1,1),DRAWNULL);
涨停后跌:IF(C<12 AND CAPITAL<12345678 AND MA21>0,(C/涨停高点-1)*100,DRAWNULL);

DIF:=EMA(C,12)-EMA(C,26);DEA:=EMA(DIF,9);MACD:=(DIF-DEA)*2;
数MACD:IF(DIF>DEA,BARSLAST(CROSS(DIF,DEA))+1,IF(DEA>DIF,-(BARSLAST(CROSS(DEA,DIF))+1),DRAWNULL));
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

快速回复 返回顶部 返回列表