设为首页收藏本站伏击涨停
切换到窄版

 立即登录
 立即注册

QQ登录

只需一步，快速开始

股海明灯官网»量学论坛 › 入门与提高 › 新人新帖 › 怎么看待黑马王子的《量柱擒涨停》?
广告载入中...
1234567
返回列表 发新帖
楼主: ablya

怎么看待黑马王子的《量柱擒涨停》?

[复制链接]
 楼主| 发表于 2026-6-13 23:05 | 显示全部楼层
{涨停价一半划线}
VAR1:=  (STR2CON(CODE)>=300000 AND STR2CON(CODE)<=302999 AND DATE>=1200824);
VAR2:=VAR1 OR (STR2CON(CODE)>=688000 AND STR2CON(CODE)<=689999);
VAR3:=  (STR2CON(CODE)>=430000 AND STR2CON(CODE)<=439999) OR
(STR2CON(CODE)>=830000 AND STR2CON(CODE)<=879999) OR
(STR2CON(CODE)>=920000 AND STR2CON(CODE)<=929999);
VAR4:=IF(VAR3,ZTPRICE(REF(C,1),0.3),IF(VAR2,ZTPRICE(REF(C,1),0.2),ZTPRICE(REF(C,1),0.1)));
VAR5:=  C>=VAR4 AND C=H;
VAR6:=BARSLAST(VAR5);
VAR7:=IF(O>REF(C,1),(REF(C,1)+C)/2,(O+C)/2);
DRAWSL(1,REF(VAR7,VAR6),0,1,0),COLORYELLOW;
DRAWTEXT(REFX(VAR5,1) OR ISLASTBAR,REF(VAR7,VAR6),VAR2STR(REF(VAR7,VAR6),2)),COLORYELLOW,DRAWABOVE;
回复

使用道具 举报

 楼主| 发表于 2026-6-14 15:16 | 显示全部楼层
{画涨停跌停涨停试盘K线并标注字}
DT:=IF(NAMEINCLUDE('ST'),(C<=DTPRICE(REF(CLOSE,1),0.05) AND C=L),IF(FINANCE(3)=3 OR FINANCE(3)=4,(C<=DTPRICE(REF(CLOSE,1),0.2) AND C=L),(C<=DTPRICE(REF(CLOSE,1),0.1) AND C=L)));
ZT:=IF(NAMEINCLUDE('ST'),(C>=ZTPRICE(REF(CLOSE,1),0.05) AND C=H),IF(FINANCE(3)=3 OR FINANCE(3)=4,(C>=ZTPRICE(REF(CLOSE,1),0.2) AND C=H),(C>=ZTPRICE(REF(CLOSE,1),0.1) AND C=H)));
SZT:=H=ZTPRICE(REF(C,1),0.1) AND C<>H;
STICKLINE(ZT,C,O,-1,0),COLORRED;
STICKLINE(DT,C,O,-1,0),COLORGREEN;
STICKLINE(SZT,C,O,-1,0),COLORMAGENTA;
DRAWTEXT(ZT AND PERIOD=5,H,'涨'),COLORYELLOW,DRAWABOVE;
DRAWTEXT(DT AND PERIOD=5,H,'跌'),COLORGREEN,DRAWABOVE;
DRAWTEXT(SZT AND PERIOD=5,H,'试'),COLORMAGENTA,DRAWABOVE;
回复

使用道具 举报

 楼主| 发表于 2026-6-14 15:47 | 显示全部楼层
{黄金柱向右画横线并标注价格}
SPJ:=    C<=REFX(C,1) AND C<=REFX(C,2) AND C<=REFX(C,3);
CJL:=    V>=REFX(V,1) AND V>=REFX(V,2) AND V>=REFX(V,3);
ZDJ:=   O<=REFX(L,1) AND O<=REFX(L,2) AND O<=REFX(L,3);
HJZ1:=  SPJ AND CJL AND ZDJ AND C>O;
STICKLINE(HJZ1,OPEN,CLOSE,3,0),COLORYELLOW;
STICKLINE(HJZ1,OPEN,CLOSE,0.1,0),COLORRED;
HJZ2:=   BARSLAST(HJZ1);
DRAWSL(1,REF(C,HJZ2),0,1,0),COLORYELLOW;
DRAWTEXT(REFX(HJZ1,1) OR ISLASTBAR,REF(C,HJZ2),VAR2STR(REF(C,HJZ2),2)),COLORYELLOW,DRAWABOVE;
回复

使用道具 举报

 楼主| 发表于 2026-6-14 15:51 | 显示全部楼层
{涨停价一半划线并标注价格}
VAR5:=   C>=ZTPRICE(REF(C,1),0.1) AND C=H;
VAR6:=   BARSLAST(VAR5);
VAR7:=   IF(O>REF(C,1),(REF(C,1)+C)/2,(O+C)/2);
DRAWSL(1,REF(VAR7,VAR6),0,1,0),COLORYELLOW;
DRAWTEXT(REFX(VAR5,1) OR ISLASTBAR,REF(VAR7,VAR6),VAR2STR(REF(VAR7,VAR6),2)),COLORYELLOW,DRAWABOVE;
回复

使用道具 举报

 楼主| 发表于 2026-6-14 16:01 | 显示全部楼层
{涨停价一半划线并标注价格}
ZT1:=IF(NAMEINCLUDE('ST'),(C>=ZTPRICE(REF(CLOSE,1),0.05) AND C=H),IF(FINANCE(3)=3 OR FINANCE(3)=4,(C>=ZTPRICE(REF(CLOSE,1),0.2) AND C=H),(C>=ZTPRICE(REF(CLOSE,1),0.1) AND C=H)));
VAR6:=BARSLAST(ZT1);
VAR7:=IF(O>REF(C,1),(REF(C,1)+C)/2,(O+C)/2);
DRAWSL(1,REF(VAR7,VAR6),0,1,0),COLORYELLOW;
DRAWTEXT(REFX(ZT1,1) OR ISLASTBAR,REF(VAR7,VAR6),VAR2STR(REF(VAR7,VAR6),2)),COLORYELLOW,DRAWABOVE;
回复

使用道具 举报

 楼主| 发表于 2026-6-14 17:28 | 显示全部楼层
{倍量后连续缩量排序好低量群}
BT:=V/REF(V,1)>=2 AND REFX(V,1)/V<0.9;
NUM:BARSLAST(BT);
BTV:=REF(V,NUM);
NUM2:=COUNT(V<BTV*0.382,NUM);
统计:IF(C<20,NUM2/NUM*100,DRAWNULL);
回复

使用道具 举报

 楼主| 发表于 2026-6-14 18:11 | 显示全部楼层
{取得该周期离今天的天数}

函数
DAYSTOTODAY
回复

使用道具 举报

 楼主| 发表于 2026-6-14 21:17 | 显示全部楼层
{黄金柱 向右横线+价格标注 修正版}
SPJ:=C<=REFX(C,1) AND C<=REFX(C,2) AND C<=REFX(C,3);
CJL:=V>=REFX(V,1) AND V>=REFX(V,2) AND V>=REFX(V,3);
ZDJ:=O<=REFX(L,1) AND O<=REFX(L,2) AND O<=REFX(L,3);
HJZ1:=SPJ AND CJL AND ZDJ AND C>O;
STICKLINE(HJZ1,OPEN,CLOSE,3,0),COLORYELLOW;
STICKLINE(HJZ1,OPEN,CLOSE,0.1,0),COLORRED;
HJZ2:=BARSLAST(HJZ1);
HJZ_PRICE:=REF(C,HJZ2);
DRAWSL(1,HJZ_PRICE, 0, 1, 0),COLORYELLOW;
DRAWTEXT(HJZ1 OR ISLASTBAR, HJZ_PRICE, VAR2STR(HJZ_PRICE,2)),COLORYELLOW,DRAWABOVE;
回复

使用道具 举报

 楼主| 发表于 2026-6-15 08:16 | 显示全部楼层
{金叉|死叉|红色MACD最高柱的最低价|绿色MACD最高柱的最高价|向右划线并在线末端标价}
DIF:=   EMA(C,12)-EMA(C,26);
DEA:=   EMA(DIF,9);
XMACD:=   2*(DIF-DEA);
JX:=   CROSS(DIF,DEA);
SX:=   CROSS(DEA,DIF);
CD6:=   HHVBARS(XMACD,BARSLAST(JX)+1);
CD7:=   CROSS(BACKSET(SX OR (ISLASTBAR AND DIF>DEA),CD6+1),0.1);
CD8:=   BARSLAST(CD7);
CD9:=   REF(L,CD8);
DRAWSL(1,CD9,0,1,0),COLORRED;
DRAWTEXT(REFX(CD7,1) OR (ISLASTBAR AND REF(DIF>DEA,CD8)),CD9,VAR2STR(CD9,2)),COLORRED,DRAWABOVE;
CD10:=   LLVBARS(XMACD,BARSLAST(SX)+1);
CD11:=   CROSS(BACKSET(JX OR (ISLASTBAR AND DIF<DEA),CD10+1),0.1);
CD12:=   BARSLAST(CD11);
CD13:=   REF(H,CD12);
DRAWSL(1,CD13,0,1,0),COLORCYAN;
DRAWTEXT(REFX(CD11,1) OR (ISLASTBAR AND REF(DIF<DEA,CD12)),CD13,VAR2STR(CD13,2)),COLORCYAN,DRAWABOVE;
SXL: DRAWLINE(SX,H,REF(SX,1),REF(H,1),1),COLORYELLOW,DOTLINE;
JG1:=   REF(H,BARSLAST(SX));
DRAWNUMBER(CURRBARSCOUNT=1 OR (SXL!=DRAWNULL AND REFX(SXL=DRAWNULL,1)),JG1,JG1),COLORYELLOW,DRAWABOVE;
JXL: DRAWLINE(JX,L,REF(JX,1),REF(L,1),1),COLORMAGENTA,DOTLINE;
JG2:=   REF(L,BARSLAST(JX));
DRAWNUMBER(CURRBARSCOUNT=1 OR (JXL!=DRAWNULL AND REFX(JXL=DRAWNULL,1)),JG2,JG2),COLORMAGENTA,DRAWABOVE;
{每一次MACD最大绿柱到最大红柱之间的涨跌幅，分别在最大红绿住最高价最低处标注}
MCD6:=   LLVBARS(XMACD,BARSLAST(SX)+1);
MCD7:=   HHVBARS(XMACD,BARSLAST(JX)+1);
MCD8:=   CROSS(BACKSET(SX,MCD7+1) AND DIF>DEA,0.1) OR CROSS(BACKSET(ISLASTBAR AND DIF>DEA,MCD7+1),0.1);
MCD9:=   REF(L,MCD6);
MCD10:=    (H-MCD9)/MCD9*100;
MCD11:=   CROSS(BACKSET(JX,MCD6+1) AND DIF<DEA,0.1) OR CROSS(BACKSET(ISLASTBAR AND DIF<DEA,MCD6+1),0.1);
MCD12:=   REF(H,MCD7);
MCD13:=    (L/MCD12-1)*100;
DRAWTEXT(MCD8,H,VARCAT(VAR2STR(MCD10,2),'%')),COLORYELLOW,DRAWABOVE;
DRAWTEXT(MCD11,L*0.99,VARCAT(VAR2STR(MCD13,2),'%')),COLORGREEN;
回复

使用道具 举报

 楼主| 发表于 2026-6-15 09:02 | 显示全部楼层
{ENE轨道线}
UPPER:IF(PERIOD=5,MA(C,10)*(1+9/100),DRAWNULL);
LOWER:IF(PERIOD=5,MA(C,10)*(1-11/100),DRAWNULL);
ENE:IF(PERIOD=5,(UPPER+LOWER)/2,DRAWNULL);
DRAWTEXT(ISLASTBAR,UPPER,VAR2STR(UPPER,2)),COLORWHITE,DRAWABOVE;
{画涨停跌停涨停试盘K线并标注字}
ZT1:=   IF(NAMEINCLUDE('ST'),(C>=ZTPRICE(REF(CLOSE,1),0.05) AND C=H),IF(FINANCE(3)=3 OR FINANCE(3)=4,(C>=ZTPRICE(REF(CLOSE,1),0.2) AND C=H),(C>=ZTPRICE(REF(CLOSE,1),0.1) AND C=H)));
DT1:=   IF(NAMEINCLUDE('ST'),(C<=DTPRICE(REF(CLOSE,1),0.05) AND C=L),IF(FINANCE(3)=3 OR FINANCE(3)=4,(C<=DTPRICE(REF(CLOSE,1),0.2) AND C=L),(C<=DTPRICE(REF(CLOSE,1),0.1) 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),COLORMAGENTA;
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;
{涨停价一半划线并标注价格}

VAR6:=   BARSLAST(ZT1);
VAR7:=   IF(O>REF(C,1),(REF(C,1)+C)/2,(O+C)/2);
DRAWSL(1,REF(VAR7,VAR6),0,1,0),COLORMAGENTA;
DRAWTEXT(REFX(ZT1,1) OR ISLASTBAR,REF(VAR7,VAR6),VAR2STR(REF(VAR7,VAR6),2)),COLORYELLOW,DRAWABOVE;
{K线图显示分时图的均价线}
B:=   CURRBARSCOUNT;
B1:=   DAY<>REF(DAY,1);
B2:=   BARSLAST(B1)+1;
B3:=   MA(C,B2);
B4:=   SUM(AMO,B2)/SUM(VOL,B2)/100;
B5:=   IF(CAPITAL>0,B4,B3);
均价1:=   IF(B<=CONST(B2) AND (PERIOD=1 OR PERIOD=0 OR PERIOD=8),B5,DRAWNULL),COLORYELLOW,LINETHICK2;
均价:IF(B<=48 AND (PERIOD=1 OR PERIOD=0 OR PERIOD=8),B4,DRAWNULL),COLORYELLOW,LINETHICK2;

{黄金柱 向右横线+价格标注 修正版}
SPJ:=   C<=REFX(C,1) AND C<=REFX(C,2) AND C<=REFX(C,3);
CJL:=   V>=REFX(V,1) AND V>=REFX(V,2) AND V>=REFX(V,3);
ZDJ:=   O<=REFX(L,1) AND O<=REFX(L,2) AND O<=REFX(L,3);
HJZ1:=   SPJ AND CJL AND ZDJ AND C>O;
STICKLINE(HJZ1,OPEN,CLOSE,3,0),COLORYELLOW;
STICKLINE(HJZ1,OPEN,CLOSE,0.1,0),COLORRED;
HJZ2:=   BARSLAST(HJZ1);
HJZ_PRICE:=   REF(C,HJZ2);
DRAWSL(1,HJZ_PRICE, 0, 1, 0),COLORYELLOW;
DRAWTEXT(REFX(HJZ1,1) OR HJZ1 OR ISLASTBAR OR CURRBARSCOUNT=1, HJZ_PRICE, VAR2STR(HJZ_PRICE,2)),COLORYELLOW,DRAWABOVE;

MA55:MA(C,55),COLORGREEN;

{金叉|死叉|红色MACD最高柱的最低价|绿色MACD最高柱的最高价|向右划线并在线末端标价}
DIF:=   EMA(C,12)-EMA(C,26);
DEA:=   EMA(DIF,9);
XMACD:=   2*(DIF-DEA);
JX:=   CROSS(DIF,DEA);
SX:=   CROSS(DEA,DIF);
CD6:=   HHVBARS(XMACD,BARSLAST(JX)+1);
CD7:=   CROSS(BACKSET(SX OR (ISLASTBAR AND DIF>DEA),CD6+1),0.1);
CD8:=   BARSLAST(CD7);
CD9:=   REF(L,CD8);
DRAWSL(1,CD9,0,1,0),COLORRED;
DRAWTEXT(REFX(CD7,1) OR (ISLASTBAR AND REF(DIF>DEA,CD8)),CD9,VAR2STR(CD9,2)),COLORRED,DRAWABOVE;
CD10:=   LLVBARS(XMACD,BARSLAST(SX)+1);
CD11:=   CROSS(BACKSET(JX OR (ISLASTBAR AND DIF<DEA),CD10+1),0.1);
CD12:=   BARSLAST(CD11);
CD13:=   REF(H,CD12);
DRAWSL(1,CD13,0,1,0),COLORCYAN;
DRAWTEXT(REFX(CD11,1) OR (ISLASTBAR AND REF(DIF<DEA,CD12)),CD13,VAR2STR(CD13,2)),COLORCYAN,DRAWABOVE;
SXL: DRAWLINE(SX,H,REF(SX,1),REF(H,1),1),COLORYELLOW,DOTLINE;
JG1:=   REF(H,BARSLAST(SX));
DRAWNUMBER(CURRBARSCOUNT=1 OR (SXL!=DRAWNULL AND REFX(SXL=DRAWNULL,1)),JG1,JG1),COLORYELLOW,DRAWABOVE;
JXL: DRAWLINE(JX,L,REF(JX,1),REF(L,1),1),COLORMAGENTA,DOTLINE;
JG2:=   REF(L,BARSLAST(JX));
DRAWNUMBER(CURRBARSCOUNT=1 OR (JXL!=DRAWNULL AND REFX(JXL=DRAWNULL,1)),JG2,JG2),COLORMAGENTA,DRAWABOVE;
{每一次MACD最大绿柱到最大红柱之间的涨跌幅，分别在最大红绿住最高价最低处标注}
MCD6:=   LLVBARS(XMACD,BARSLAST(SX)+1);
MCD7:=   HHVBARS(XMACD,BARSLAST(JX)+1);
MCD8:=   CROSS(BACKSET(SX,MCD7+1) AND DIF>DEA,0.1) OR CROSS(BACKSET(ISLASTBAR AND DIF>DEA,MCD7+1),0.1);
MCD9:=   REF(L,MCD6);
MCD10:=    (H-MCD9)/MCD9*100;
MCD11:=   CROSS(BACKSET(JX,MCD6+1) AND DIF<DEA,0.1) OR CROSS(BACKSET(ISLASTBAR AND DIF<DEA,MCD6+1),0.1);
MCD12:=   REF(H,MCD7);
MCD13:=    (L/MCD12-1)*100;
DRAWTEXT(MCD8,H,VARCAT(VAR2STR(MCD10,2),'%')),COLORYELLOW,DRAWABOVE;
DRAWTEXT(MCD11,L*0.99,VARCAT(VAR2STR(MCD13,2),'%')),COLORGREEN;
回复

使用道具 举报

 楼主| 发表于 2026-6-17 06:45 | 显示全部楼层
UPPER:=MA(C,10)*(1+9/100);
LOWER:=MA(C,10)*(1-11/100);
ENE1:=(UPPER+LOWER)/2;
ENEJD:=ATAN((ENE1/REF(ENE1,1)-1)*100)*180/3.1416;

DIF:=EMA(C,12)-EMA(C,26);DEA:=EMA(DIF,9);XMACD:=(DIF-DEA)*2;
BAR:=IF(DIF>DEA,BARSLAST(CROSS(DIF,DEA))+1,IF(DEA>DIF,-(BARSLAST(CROSS(DEA,DIF))+1),DRAWNULL));
BL:=C>REF(C,1) AND V/REF(V,1)>=2;
TZ:=C=ZTPRICE(REF(C,1),0.1) AND C=H;
ZF1:=C/REF(C,1);
SY:=(H-MAX(O,C))/MAX(O,C)*100;
XY:=(MIN(O,C)-L)/L*100;
十字星:=FINANCE(3)=1 AND C<16.18 AND EXIST(TZ,13) AND C<=REF(C,BARSLAST(TZ)) AND BETWEEN(C/O,0.994,1.006) AND SY+XY <6.18 AND
BETWEEN(ZF1,0.95,1.05) AND BETWEEN(C,MA(C,55)*0.92,MA(C,55)*1.1382) AND DYNAINFO(4)>0;
ZF2:=(C-O)/O*100;
十字星涨幅:IF(十字星,ZF2,DRAWNULL);
几天前涨停:IF(十字星,BARSLAST(TZ),DRAWNULL);
SPJ:=C<=REFX(C,1) AND C<=REFX(C,2) AND C<=REFX(C,3);
CJL:=V>=REFX(V,1) AND V>=REFX(V,2) AND V>=REFX(V,3);
ZDJ:=O<=REFX(L,1) AND O<=REFX(L,2) AND O<=REFX(L,3);
HJZ1:=SPJ AND CJL AND ZDJ AND C>O;
HJZ2:=BARSLAST(HJZ1);
HJZC:=REF(C,HJZ2);

突破黄金柱:IF(C<16.18 AND HJZ2>1 AND CROSS(C,HJZC),HJZ2,DRAWNULL);
ZT1:=IF(NAMEINCLUDE('ST'),(C>=ZTPRICE(REF(CLOSE,1),0.05) AND C=H),IF(FINANCE(3)=3 OR FINANCE(3)=4,(C>=ZTPRICE(REF(CLOSE,1),0.2) AND C=H),(C>=ZTPRICE(REF(CLOSE,1),0.1) AND C=H)));
ZT2:=BARSLAST(ZT1);
ZT3:=IF(O>REF(C,1),(REF(C,1)+C)/2,(O+C)/2);
ZTC:=REF(ZT3,ZT2);
一半:=(C-ZTC)/ZTC*100;
一半距离:IF(ISVALID(突破黄金柱),一半,DRAWNULL);

选股:IF(ZTC<HJZC AND EXIST(HJZ1,ZT2) AND HJZ2>1 AND ZT2<34,(C-ZTC)/ZTC*100,DRAWNULL);
回复

使用道具 举报

 楼主| 发表于 2026-6-18 17:28 | 显示全部楼层
{最近一期季报净利润为正}

FINANCE(30)>1
回复

使用道具 举报

 楼主| 发表于 2026-6-20 16:39 | 显示全部楼层
TZ:=C=ZTPRICE(REF(C,1),0.1) AND C=H;
MAA:=MA(C,5);MAB:=MA(C,10);MAC:=MA(C,20);MAD:=MA(C,60);MAE:=MA(C,120);MAF:=MA(C,250);
HH:=HHV(MAF,100);LL:=LLV(MAF,100);NXZP:=(HH-LL)/LL;
ZD:=MAX6(MAA,MAB,MAC,MAD,MAE,MAF);
XZ:=MIN6(MAA,MAB,MAC,MAD,MAE,MAF);
年线走平涨停聚合:IF(NXZP<0.01618 AND EXIST(TZ,55),(ZD-XZ)/XZ*100,DRAWNULL);
回复

使用道具 举报

1234567
返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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