QQ登录

只需一步,快速开始

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

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

[复制链接]
 楼主| 发表于 2026-6-23 21:46 | 显示全部楼层
//KT交易师公式
DIF:=EMA(C,12)-EMA(C,26);DEA:=EMA(DIF,9);
X:=(StkType=C_Stock_A Or StkType=C_Mas) AND NOT(StrFind(StkName,'S',1)) And FINANCE(30) >0;
Y:="MACD数.MACD数#Day" > 0  and  "ZF.Z#Day" <2.36 AND "ZT21.ZT#Day" =1 And "HSL.HS#Day" >2.36 AND "LB.LB#Day" >1;
斜率:IF(C<11 AND DIF<=DEA and X AND Y,ATAN(DIF-REF(DIF,1))*100,Invalid);

//HSVOL/CAPITAL*100);
//LB:V/REF(MA(V,5),1);
//ZC-Ref(C,1))/Ref(C,1)*100;
//ZT:Exist(c/Ref(c,1)>1.09 AND C=H,21);
//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),Invalid));
回复

使用道具 举报

 楼主| 发表于 2026-6-24 07:53 | 显示全部楼层
//KT交易师主图
#MAINCHART
M5:MA(C,5),COLORWHITE;
M10:MA(C,10),COLORYELLOW;
M20:MA(C,20),COLORMAGENTA;
M30:MA(C,30),COLORRED;
M60:MA(C,60),COLORGREEN;
M120:MA(C,120),COLORGRAY;
M245:MA(C,245),COLORBLUE;
//画昨日收盘价
B:=DataCount-BARPOS;
B1:=DATE<>REF(DATE,1);
B2:=BARSLAST(B1)+1;
B3:=REF(C,B2);
STICKLINE(DataType=2 Or DATATYPE=11,B3,B3,4,1),COLORGREEN;
DRAWNUMBER((REFX(B1,1) OR (ISLASTBAR AND B3)) AND (DataType=2 Or DATATYPE=11),B3*1.003,B3,2),COLORGREEN;
//分时均价
B4:=SUM(AMOUNT,B2)/SUM(VOL,B2);
B5:=IF(V>0,B4,ref(b4,1));
均价:IF(B<=48 AND DATATYPE=2 ,B5,Invalid),COLORYELLOW,LINETHICK2;
//涨停画线
ZT:=C=H AND C/REF(C,1)>=1.093;DT:=C=L AND C/REF(C,1)<=0.907;
STICKLINE(ZT,C,O,7,0),COLORRED;
STICKLINE(DT,C,O,7,0),COLORGREEN;
DRAWTEXT(ZT AND DATATYPE=6,H*1.02,'涨\n停'),COLORYELLOW;
DRAWTEXT(DT AND DATATYPE=6,L*0.98,'跌\n停'),COLORGREEN;
//MACD高低柱子画线
VARY1:=EMA(C,12)-EMA(C,26);
VARY2:=EMA(VARY1,9);
VARY3:=2*(VARY1-VARY2);
VARY4:=CROSS(VARY1,VARY2);
VARY5:=CROSS(VARY2,VARY1);
VARY6:=HHVBARS(VARY3,BARSLAST(VARY4)+1);
VARY7:=CROSS(BACKSET(VARY5 OR (ISLASTBAR AND VARY1>VARY2),VARY6+1),0.1);
VARY8:=BARSLAST(VARY7);
VARY9:=REF(L,VARY8);
DRAWSL(1,VARY9,0,1,0),COLORRED;
DRAWNUMBER(REFX(VARY7,1) OR (ISLASTBAR AND REF(VARY1>VARY2,VARY8)),VARY9*1.002,VARY9,2),COLORRED;
VARY10:=LLVBARS(VARY3,BARSLAST(VARY5)+1);
VARY11:=CROSS(BACKSET(VARY4 OR (ISLASTBAR AND VARY1<VARY2),VARY10+1),0.1);
VARY12:=BARSLAST(VARY11);
VARY13:=REF(H,VARY12);
DRAWSL(1,VARY13,0,1,0),COLORCYAN;
DRAWNUMBER(REFX(VARY11,1) OR (ISLASTBAR AND REF(VARY1<VARY2,VARY12)),VARY13*0.998,VARY13,2),COLORCYAN;

//黄金柱
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);
STICKLINE(SPJ AND CJL AND ZDJ AND C>O,OPEN,CLOSE,5,0),COLORYELLOW;
STICKLINE(SPJ AND CJL AND ZDJ AND C>O,OPEN,CLOSE,0.1,0),COLORRED;
//出水芙蓉
MA5:=MA(C,5);MA10:=MA(C,10);MA20:=MA(C,20);
MA60:=MA(C,60);MA120:=MA(C,120);MA250:=MA(C,250);
VER7:=MaxList(MA5,MA10,MA20,MA60,MA120,MA250);
VER8:=MinList(MA5,MA10,MA20,MA60,MA120,MA250);
XG:=C>=VER7 AND Min(O,Ref(c,1))<=VER8;
StickLine(XG,Min(O,Ref(c,1)),Close,3,0),ColorMagenta;
StickLine(XG,Min(O,Ref(c,1)),Close,0.1,0),ColorRed;

{涨停价一半划线}
VAR5:=c/Ref(c,1)>1.093 AND C=H;
VAR6:=BARSLAST(VAR5);
VAR7:=IF(O>REF(C,1),(REF(C,1)+C)/2,(O+C)/2);
var8:=REF(VAR7,VAR6);
DRAWSL(1 and DataType=6,REF(VAR7,VAR6),0,1,0),COLORYELLOW;
DRAWNUMBER((REFX(VAR5,1) OR (ISLASTBAR AND var8)) and DataType=6,var8*1.015,var8,2),ColorYellow;
回复

使用道具 举报

 楼主| 发表于 2026-6-24 19:41 | 显示全部楼层
{开盘八法解盘}
{十五分钟K线昨左后一根K线}
W昨:=BARSLAST(DAY>REF(DAY,1))-48;
昨日收盘:=REF(C,W昨+1),COLORWHITE,LINETHICK0;
昨日收盘A:=昨日收盘 AND REF(昨日收盘,1)<>昨日收盘;
昨日开盘:=REF(O,W昨+1),COLORWHITE,LINETHICK0;
昨日最高:=REF(H,W昨+1),COLORWHITE,LINETHICK0;
昨日最低:=REF(L,W昨+1),COLORWHITE,LINETHICK0;
STICKLINE(昨日收盘A=1 AND 昨日收盘>昨日开盘,昨日最高,昨日最低,0,0),COLORRED;
STICKLINE(昨日收盘A=1 AND 昨日收盘>昨日开盘,昨日开盘,昨日收盘,3,1),COLORRED;
STICKLINE(昨日收盘A=1 AND 昨日收盘<昨日开盘,昨日最高,昨日最低,0,0),COLORGREEN;
STICKLINE(昨日收盘A=1 AND 昨日收盘<昨日开盘,昨日开盘,昨日收盘,3,1),COLORGREEN;
STICKLINE(昨日收盘A=1 AND 昨日收盘=昨日开盘,昨日开盘*0.9998,昨日收盘,3,0),COLORWHITE;
STICKLINE(昨日收盘A=1 AND 昨日收盘=昨日开盘,昨日最高,昨日最低,0,1),COLORWHITE;

{十五分钟K线第一根K线}
WA:=BARSLAST(DAY>REF(DAY,1));
前收:REF(C,WA+1),COLORWHITE,LINETHICK0;
昨日收盘价:前收,COLORGREEN,NODRAW ;
今开:=REF(O,WA),COLORYELLOW,LINETHICK0;
首根K线开盘价:今开,COLORYELLOW,NODRAW ;
今开A:=今开 AND REF(今开,1)<>今开;
今收:REF(C,WA),COLORMAGENTA ,LINETHICK0;
首根K线收盘价:今收,COLORMAGENTA ,NODRAW ;
今收A:=今收 AND REF(今收,1)<>今收;
今高:=REF(H,WA),COLORYELLOW,LINETHICK0;
今高A:=今高 AND REF(今高,1)<>今高;
今低:=REF(L,WA),COLORYELLOW,LINETHICK0;
今低A:=今低 AND REF(今低,1)<>今低;
STICKLINE(1,今开,今开,5,1),COLORYELLOW;{开盘首根K线开盘价}
STICKLINE(1,今收,今收,5,1),COLORMAGENTA ;{开盘首根K线收盘价}
STICKLINE(1,前收,前收,5,1),COLORGREEN; {昨日日线K线收盘价}
DRAWNUMBER(CURRBARSCOUNT=1,前收,  前收),COLORGREEN;
DRAWTEXT(ISLASTBAR,前收,'               昨收盘价'),COLORGREEN;
STICKLINE(今收A=1 AND 今收>今开 ,今高,今低,0,0),COLORRED;
STICKLINE(今收A=1 AND 今收>今开 ,今开,今收,3,0),COLORRED;
STICKLINE(今收A=1 AND 今收<=今开 ,今高,今低,0,0),COLORGREEN;
STICKLINE(今收A=1 AND 今收<=今开 ,今开,今收,3,0),COLORGREEN;
STICKLINE(今收A=1 AND 今收=今开,今开,今收,3,0),COLORWHITE;
STICKLINE(今收A=1 AND 今收=今开,今高,今低,0,0),COLORWHITE;

{十五分钟K线第二根K线}
WB:=BARSLAST(DAY>REF(DAY,1))-1;
前收B:=REF(C,WB+1),COLORWHITE,LINETHICK0;
今开B:=REF(O,WB),COLORYELLOW,LINETHICK0;
今开BA:=今开B AND REF(今开B,1)<>今开B;
今收B:=REF(C,WB),COLORYELLOW,LINETHICK0;
今收BA:=今收B AND REF(今开B,1)<>今开B;
今高B:=REF(H,WB),COLORYELLOW,LINETHICK0;
今高BA:=今高B AND REF(今高B,1)<>今高B;
今低B:=REF(L,WB),COLORYELLOW,LINETHICK0;
今低BA:=今低 AND REF(今低,1)<>今低;
STICKLINE(今收BA=1 AND 今收B>今开B,今高B,今低B,0,0),COLORRED;
STICKLINE(今收BA=1 AND 今收B>今开B,今开B,今收B,3,0),COLORRED;
STICKLINE(今收BA=1 AND 今收B<=今开B,今高B,今低B,0,0),COLORGREEN;
STICKLINE(今收BA=1 AND 今收B<=今开B,今开B,今收B,3,0),COLORGREEN;
STICKLINE(今收BA=1 AND 今收B=今开B,今开B,今收B,3,0),COLORWHITE;
STICKLINE(今收BA=1 AND 今收B=今开B,今高B,今低B,0,0),COLORWHITE;

{十五分钟K线第三根K线}
WC:=BARSLAST(DAY>REF(DAY,1))-2;
前收C:=REF(C,WC+1),COLORWHITE,LINETHICK0;
今开C:=REF(O,WC),COLORYELLOW,LINETHICK0;
今开CA:=今开C AND REF(今开C,1)<>今开C;
今收C:=REF(C,WC),COLORYELLOW,LINETHICK0;
今收CA:=今收C AND REF(今开C,1)<>今开C;
今高C:=REF(H,WC),COLORYELLOW,LINETHICK0;
今高CA:=今高C AND REF(今高C,1)<>今高C;
今低C:=REF(L,WC),COLORYELLOW,LINETHICK0;
今低CA:=今低 AND REF(今低,1)<>今低;
STICKLINE(今收CA=1 AND 今收C>今开C,今高C,今低C,0,0),COLORRED;
STICKLINE(今收CA=1 AND 今收C>今开C,今开C,今收C,3,0),COLORRED;
STICKLINE(今收CA=1 AND 今收C<今开C,今高C,今低C,0,0),COLORGREEN;
STICKLINE(今收CA=1 AND 今收C<今开C,今开C,今收C,3,0),COLORGREEN;
STICKLINE(今收CA=1 AND 今收C=今开C,今开C,今收C,3,0),COLORWHITE;
STICKLINE(今收CA=1 AND 今收C=今开C,今高C,今低C,0,0),COLORWHITE;

{开盘八法解盘}
AXX1:=今收>=前收  AND 今收B>今收 AND 今收C>=今收B AND 今收CA=1;
AXX2:=今收>=前收  AND 今收B>今收 AND 今收C<今收B AND 今收CA=1;
AXX3:=今收>=前收  AND 今收B<今收 AND 今收C>=今收B AND 今收CA=1;
AXX4:=今收>=前收  AND 今收B<今收 AND 今收C<今收B AND 今收CA=1;
AXX5:=今收<=前收 AND 今收B>今收 AND 今收C>=今收B AND 今收CA=1;
AXX6:=今收<前收  AND 今收B>今收 AND 今收C<今收B AND 今收CA=1;
AXX7:=今收<前收  AND 今收B<=今收 AND 今收C>今收B AND 今收CA=1;
AXX8:=今收<前收  AND 今收B<=今收 AND 今收C<今收B AND 今收CA=1;
AXX9:=今收<=前收 AND 今收B<=今收 AND 今收C=今收B AND 今收CA=1;
AXX10:=今收>=前收 AND 今收B=今收 AND 今收C=今收B AND 今收CA=1;


BXX1:='1、三高盘  (涨涨涨),做多为主,强势股积极参与。盘中震荡第三波低点易成当日最低点(不能破平盘),可进场。10:30过开盘高点收红盘,若破平盘杀尾盘',COLORLIBLUE;
BXX2:='2、两高盘  (涨涨跌),原则上做多强势股为主,但冲高遇阻注意压力位附近降低成本。拉高第三波高点可适量减仓,拉回第三波低点(不破平盘)可低吸。',COLORLIBLUE;
BXX3:='3、平移下盘(涨跌涨),原则上观望为主。后市若选择方向,切勿逆势操作。',COLORLIBLUE;
BXX4:='4、一高盘  (涨跌跌),原则上拉高,高抛减仓为主。10:30左右突破开盘高点,当天收阳对高概率大,盘中回落可轻仓博弈。10:30左右跌破平盘价,当天收低点概率较大,且低点往往出现在尾盘。',COLORLIBLUE;
BXX5:='5、一低盘  (跌涨涨),盘中拉回第三波未创新低可进场做多,若再回探不创新低可加仓。观察指标股量价是否健康,是重点操作方向。持仓者一般可以选择抱牢动作。',COLORLIBLUE;
BXX6:='6、平移上盘(跌涨跌),原则上观望为主。后市若选择方向,切勿逆势操作。',COLORLIBLUE;
BXX7:='7、两低盘  (跌跌涨),盘中震荡第三波、或第五波低点,可短线做多。尾盘观察下影线长度,长度超过1.5%,次日反弹概率大。操作方向以指标股为主。',COLORLIBLUE;
BXX8:='8、三低盘  (跌跌跌),通常情况下盘中反弹均是卖点。低点往往出现在尾盘,因此全天无买点。盘中走势重返平盘线上的概率小,第二天惯性低开概率大。',COLORLIBLUE;
BXX9:='9、三平盘  (平平平),不确定性 ,以观望为主。',COLORLIBLUE;
BXX10:='10、三平盘  (涨平平),不确定性 ,以观望为主。',COLORLIBLUE;
昨收盘:前收,NODRAW,COLORGREEN;
今收盘:C,COLORWHITE,DOTLINE;
DRAWTEXT_FIX(AXX1,0.015,0.0,0,BXX1),COLORLIMAGENTA;
DRAWTEXT_FIX(AXX2,0.015,0.1,0,BXX2),COLORLIMAGENTA;
DRAWTEXT_FIX(AXX3,0.015,0.2,0,BXX3),COLORLIMAGENTA;
DRAWTEXT_FIX(AXX4,0.015,0.3,0,BXX4),COLORLIMAGENTA;
DRAWTEXT_FIX(AXX5,0.015,0.4,0,BXX5),COLORLIBLUE;
DRAWTEXT_FIX(AXX6,0.015,0.5,0,BXX6),COLORLIBLUE;
DRAWTEXT_FIX(AXX7,0.015,0.6,0,BXX7),COLORLIBLUE;
DRAWTEXT_FIX(AXX8,0.015,0.7,0,BXX8),COLORLIBLUE;
DRAWTEXT_FIX(AXX9,0.015,0.8,0,BXX9),COLORLIBLUE;
DRAWTEXT_FIX(AXX10,0.015,0.9,0,BXX10),COLORLIBLUE;

{易变盘时间}
STICKLINE(TIME=1030,今开*1.02,今收*0.98,0,-1),COLORRED;
STICKLINE(TIME=1400,今开*1.02,今收*0.98,0,-1),COLORRED;
DRAWTEXT (TIME=1030,今收*0.98,'  10:30  易变盘时间'),COLORRED;  
DRAWTEXT (TIME=1400,今收*0.98,'  14:00  易变盘时间'),COLORRED;

DRAWTEXT_FIX(1,0,0,0,'注意:此开盘八法解盘谨适用于5分钟周期盘面。'),COLORYELLOW;
回复

使用道具 举报

 楼主| 发表于 2026-6-25 17:02 | 显示全部楼层
{好用成交量副图}
TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1)))));
MTIME:=MOD(FROMOPEN,TOTAL);
CTIME:=IF(MTIME<0.5,TOTAL,MTIME);
VVOL:=IF((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VOL*(TOTAL+3)/(CTIME+3),DRAWNULL);
STICKLINE((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VVOL,0,-1,-1),COLOR00C0C0;
VOLM:VOL,VOLSTICK;
VOL5:=MA(VOLM,5)/1000;
VOL10:=MA(VOLM,10)/1000;
BV:=C>REF(C,1) AND V/REF(V,1)>2 AND C>O;
DRAWTEXT(BV,V,VAR2STR(V/REF(V,1),2)),COLORMAGENTA,DRAWABOVE;
SV:=V/REF(V,1) <0.619 AND REF(C,1)>REF(O,1);
DRAWTEXT(SV,V,VAR2STR(V/REF(V,1),2)),COLORGREEN,DRAWABOVE;
STICKLINE(BV,0,V,1,0),COLORYELLOW;
TZ:=C/REF(C,1)>1.09 AND C=H;
涨停距今:BARSLAST(TZ),COLORGREEN,NODRAW;
{DRAWNUMBER(BARSLAST(C<REF(C,1))>0,V,BARSLAST(C<REF(C,1))),DRAWABOVE;
DRAWNUMBER(BARSLAST(C<REF(C,1))>0,V,BARSLAST(C<REF(C,1))),DRAWABOVE;}
{连阳天数统计}
T:=C>=REF(C,1);
A:=BARSLASTCOUNT(T);
J:=(A>2 AND REFX(NOT(T),1)) OR (REF(T,1) AND T AND ISLASTBAR);
DRAWTEXT(J,V*1.0382,VAR2STR(A,0)),COLORYELLOW;
筹码集中COST(95)-COST(5))/HHV(H,0)*100*(1-(1/(1-(FINVALUE(244)/FINVALUE(238)))*0.1)),COLORYELLOW,NODRAW;
K:=BARSLAST(DATE<>REF(DATE,1));
V1:=REF(V,K);
换手: V1/CAPITAL*100,COLORRED,NODRAW;
{计算明天高低点价}
ZFF:=C/REF(C,1);{涨幅}
X1:=(H*2+L+C)/2;{阳线涨}
X2:=(L*2+H+C)/2;{阴线跌}
X3:=(C*2+H+L)/2;{十字星}
JZ:=IF(ZFF>1.00236,X1,IF(ZFF<0.99764,X2,X3));
明天高:JZ-L,COLORMAGENTA,NODRAW;明天低:JZ-H,COLORGREEN,NODRAW;
{个股今明天压力支撑}
JZ0:=(REF(O,1)+REF(C,1)+REF(H,1)+REF(L,1))/4-REF(L,1);
今压力:REF(C,1)+JZ0,COLORRED,NODRAW;今支撑:REF(C,1)-JZ0,COLORGREEN,NODRAW;
JZ1:=(O+C+H+L)/4-L;
明压力:C+JZ1,COLORYELLOW,NODRAW;明支撑:C-JZ1,COLORGREEN,NODRAW;
三八二:C*1.0382,NODRAW;

{当前价向左画水平虚线到最近倍量};
START1:=CONST(SUMBARS(BV,1));START2:=CONST(SUMBARS(BV,2));
线1:IF(START1>=CURRBARSCOUNT,CONST(V),DRAWNULL),COLORLIGREEN;
线2:IF(START2>=CURRBARSCOUNT,CONST(REF(V,START2-1)),DRAWNULL),COLORLIGREEN,DOTLINE;
回复

使用道具 举报

 楼主| 发表于 2026-6-25 17:23 | 显示全部楼层
{ 好用的MACD副图}
DIF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIF,9);
MACDDIF-DEA)*2,COLORSTICK;
DIF1:=HHV(DIF,0);DIF2:=ABS(LLV(DIF,0));DIF3:=MAX(DIF1,DIF2);
DEA1:=HHV(DEA,0);DEA2:=ABS(LLV(DEA,0));DEA3:=MAX(DEA1,DEA2);
ZDZ:=MAX(DIF3,DEA3);
MACDA:=100-(ZDZ-DIF)/ZDZ*100;MACDB:=100+(DIF-ZDZ)/ZDZ*100;
MACDC:=100-(ZDZ-DEA)/ZDZ*100;MACDD:=100+(DEA-ZDZ)/ZDZ*100;
DIF离0轴距离:IF(DIF>0,MACDA,MACDB),NODRAW;

0,COLORWHITE,DOTLINE;
DRAWNUMBER(DIF>DEA,MACD,BARSLAST(CROSS(DIF,DEA))+1),COLORRED,DRAWABOVE;
DRAWNUMBER(DIF<DEA,MACD,BARSLAST(CROSS(DEA,DIF))+1),COLORCYAN;

JX:=CROSS(DIF,DEA);
VER1:=IF(DIF>DEA,BARSLAST(CROSS(DIF,DEA))+1,IF(DEA>DIF,-(BARSLAST(CROSS(DEA,DIF))+1),DRAWNULL));
一:REF(VER1,BARSLAST(JX)+1),NODRAW;
二:REF(VER1,SUMBARS(JX,2)),NODRAW;
三:REF(VER1,SUMBARS(JX,3)),NODRAW;
MACDE:IF(MACD>REF(MACD,1),MACD,0),STICK,COLORRED;
MACDF:IF(MACD<REF(MACD,1),MACD,0),STICK,COLORCYAN;
{STICKLINE(MACD>MA(MACD,5),MACD,MA(MACD,5),1,0),COLOR8BFFFF;};
回复

使用道具 举报

 楼主| 发表于 2026-6-27 06:59 | 显示全部楼层
{月涨停排序  好}
V1:=IF(NAMELIKE('ST') OR NAMELIKE('*ST') OR NAMELIKE('SST'),(C>=ZTPRICE(REF(CLOSE,1),0.05) AND C=H),IF((CODELIKE('688') OR (CODELIKE('300') AND DATE>=1200824)),(C>=ZTPRICE(REF(CLOSE,1),0.2) AND C=H),(C>=ZTPRICE(REF(CLOSE,1),0.1) AND C=H)));
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));
细分行业RAWTEXT(1,0,HYBLOCK);
回复

使用道具 举报

 楼主| 发表于 2026-6-27 07:26 | 显示全部楼层
DIF:=EMA(C,12)-EMA(C,26);
DEA:=EMA(DIF,9);
JX:=CROSS(DIF,DEA);
SX:=CROSS(DEA,DIF);
MACD零上N次金叉:IF(DIF>=0,COUNT(JX AND DIF>=0,BARSLAST(CROSS(DIF,0))),DRAWNULL);
MACD零上N次死叉:IF(DIF>=0,COUNT(SX AND DIF>=0,BARSLAST(CROSS(DIF,0))),DRAWNULL);
回复

使用道具 举报

 楼主| 发表于 2026-6-27 09:11 | 显示全部楼层
DIF:=EMA(C,12)-EMA(C,26);DEA:=EMA(DIF,9);
BV:=IF(REF(C,1)>REF(O,1) AND REF(C,1)>REF(C,2) AND REF(V,1)/REF(V,2)>2,REF(V,1)/REF(V,2),DRAWNULL);
NX:=V/REF(V,1);
宝塔比值:IF(FINANCE(3)=1 AND FINANCE(30)>1 AND C<20 AND DIF>DEA AND C<O AND V/REF(V,1)<0.55,BV/NX,DRAWNULL);
回复

使用道具 举报

 楼主| 发表于 2026-6-27 14:33 | 显示全部楼层
{画昨日收盘价线}
RI1:=DATE<>REF(DATE,1);
RI2:=BARSLAST(B1)+1;
RI3:=REF(C,B2);
昨天:STICKLINE(PERIOD=1 AND RI2,RI3,RI3,4,1),COLORWHITE;
回复

使用道具 举报

 楼主| 发表于 2026-6-27 14:37 | 显示全部楼层
上面那个公式错误
{画昨日收盘价线}
RI1:=DATE<>REF(DATE,1);
RI2:=BARSLAST(RI1)+1;
RI3:=REF(C,RI2);
昨天:STICKLINE(PERIOD=1 AND RI2,RI3,RI3,4,1),COLORWHITE;
回复

使用道具 举报

 楼主| 发表于 2026-6-27 19:56 | 显示全部楼层
{公司地位排序}
中央国有企业:FINDSTR(EXTERNSTR(1,10008),'中央国有企业');
国资委:FINDSTR(EXTERNSTR(1,10008),'国资委');
地方国资委:FINDSTR(EXTERNSTR(1,10008),'地方国资委');
地方政府:FINDSTR(EXTERNSTR(1,10008),'地方政府');
顶尖:FINDSTR(EXTERNSTR(1,10010),'顶尖');{1家}
壁垒:FINDSTR(EXTERNSTR(1,10010),'壁垒');{1家}
小巨人:FINDSTR(EXTERNSTR(1,10010),'小巨人');{4家}
世界第一:FINDSTR(EXTERNSTR(1,10010),'世界第一');{4家}
独家:FINDSTR(EXTERNSTR(1,10010),'独家');{10家}
全球第一:FINDSTR(EXTERNSTR(1,10010),'全球第一');{11家}
全国第一:FINDSTR(EXTERNSTR(1,10010),'全国第一');{11家}
唯一:FINDSTR(EXTERNSTR(1,10010),'唯一');{15家}
世界:FINDSTR(EXTERNSTR(1,10010),'世界');{51家}
第一:FINDSTR(EXTERNSTR(1,10010),'第一');{178家}
最:FINDSTR(EXTERNSTR(1,10010),'最');{525家}
首批:FINDSTR(EXTERNSTR(1,10010),'首批');
龙头:FINDSTR(EXTERNSTR(1,10010),'龙头');{664家}
全球:FINDSTR(EXTERNSTR(1,10010),'全球');{285家};
均线粘合:FINDSTR(EXTERNSTR(1,10013),'均线粘合');
行业板块RAWTEXT(1,0,HYBLOCK);
回复

使用道具 举报

 楼主| 发表于 2026-6-27 21:22 | 显示全部楼层
{易变盘时间画竖线}

DRAWSL(TIME=1030,C,10000,123,2),COLORLIGREEN;
DRAWSL(TIME=1400,C,10000,123,2),COLORLIGREEN;
回复

使用道具 举报

 楼主| 发表于 2026-6-28 04:10 | 显示全部楼层
{五合一竞价集合竞价抓涨停}
VAR1:=C/REF(C,5)>1.00;VAR2:=C/REF(C,5)<1.02;VAR3:=C/REF(C,4)>1.00;
VAR4:=C/REF(C,4)<1.02;VAR5:=C/REF(C,3)>1.00;VAR6:=C/REF(C,3)<1.02;
VAR7:=C/REF(C,2)>1.00;VAR8:=C/REF(C,2)<1.02;VAR9:=C/REF(C,1)>=1.00;
VAR10:=TIME<0930;
竞价直线:VAR10 AND VAR1 AND VAR2 AND VAR3 AND VAR4 AND VAR5 AND VAR6 AND VAR7 AND VAR8 AND VAR9;

{核心竞价王}
Z_1:=(OPEN/REF(CLOSE,1)-1)*100;{开幅}
Z_2:=DYNAINFO(15)/OPEN/100;{量比}
Z_3:=Z_2/CAPITAL*100;
Z_4:=Z_2/REF(MA(VOL,5),1)*240;
Z_5:=REF(VOL,1);
Z_6:=DYNAINFO(15)/10000;{竞价金额}
Z_7:=Z_2/Z_5*1;
Z_8:=Z_4*Z_3*Z_1*1;
竞价王: Z_1<7 AND Z_1>0 AND Z_4>10 AND Z_3>0.3 AND Z_8>50 AND Z_7>0.05 AND Z_7<0.24;

ZTT:=IF(CODELIKE('30') OR CODELIKE('68'),C>=ZTPRICE(REF(C,1),0.2),IF(CODELIKE('8') OR CODELIKE('4') OR CODELIKE('9'), C>=ZTPRICE(REF(C,1),0.3), C>=ZTPRICE(REF(C,1),0.1)));
VVAR2:=REF(EVERY(ZTT,4)=0,1);
VVAR3:=IF(ISLASTBAR,DYNAINFO(15)/10000,GPJYVALUE(25,1,0)*O/100)*10000;
VVAR4:=(O/REF(C,1)-1)*100;
VVAR5:=REF(ZTT,1) AND REF(HIGH,1)=REF(LOW,1) AND REF(HIGH,1)=REF(CLOSE,1);
VVAR6:=VVAR3/O/FINANCE(46)*100*(O-REF(CLOSE,1))/REF(CLOSE,1)*100;
VVAR7:=IF( VVAR2 AND VVAR4< 9.6 AND REF(CLOSE,1)>REF(CLOSE,2)*1.096 AND NOT(VVAR5),VVAR6*31,0);
竞价先锋:VVAR7>100;

{祥龙竞价}
HYD:=DMA(EMA(CLOSE,12),SUM(VOL,5)/3/CAPITAL);{活跃度}
LFXJ:=(CLOSE-HYD)/HYD*200>35;
CJL:=DYNAINFO(15)/O/100;{成交量}
CN:=CJL/CAPITAL*100 ;{量比}
JZL:=CN/REF(V,1);
JJSS:=DYNAINFO(15)/DYNAINFO(4);
JD:=JJSS/FINANCE(46)*10000*(O-REF(C,1))/REF(C,1);
TJT1:=O>=1.097*REF(C,1);
TT:=NOT(TJT1);
MM:=C/REF(C,1)>=1.0973 AND C=H;{涨停}
JJR:=(HIGH+LOW+CLOSE)/3;
ZBCL0R:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
ZBCL1:=IF(CAPITAL=0,ZBCL0R*(JJR-MIN(CLOSE,OPEN)),ZBCL0R*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
ZBCL2:=IF(CAPITAL=0,ZBCL0R*(MIN(OPEN,CLOSE)-LOW),ZBCL0R*IF(HIGH=LOW,1,(JJR-MIN(CLOSE,OPEN))));
ZBCL3:=IF(CAPITAL=0,ZBCL0R*(HIGH-MAX(OPEN,CLOSE)),ZBCL0R*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
ZBCL4:=IF(CAPITAL=0,ZBCL0R*(MAX(CLOSE,OPEN)-JJR),ZBCL0R*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJR)));
DDX:=((ZBCL1+ZBCL2)-(ZBCL3+ZBCL4))/IF(CAPITAL=0,1000000,10000);
DX:=MA(DDX,5)*20;
DDX1:=SMA(DX,3,1);
AA2:=BETWEEN(C,2,90);
AA6:=AA2 AND DDX1>REF(DDX1,1);
OF:=(O/REF(C,1)-1)*100;{开盘涨跌幅}
祥龙竞价:AA6 AND TT AND CN+JZL+JD>4.3  AND REF(MM,1) AND LFXJ AND OF>=2 AND OF<=7;

流通市值:=FINANCE(40)*REF(C,1)/100000000< 1000;
去ST:=NAMELIKE('ST')=0 AND NAMELIKE('*ST')=0 AND NAMELIKE('SST')=0 AND NAMELIKE('S*ST')=0;
只做主板:=CODELIKE('60')||CODELIKE('00');
去杂:=流通市值 AND 去ST AND 只做主板;
X_5:=DYNAINFO(15)/OPEN/100;
X_6:=(DYNAINFO(4)/DYNAINFO(3)-1)*100;
X_7:=IF(FINANCE(7)/100< 100000,100000,FINANCE(7)/100);
X_8:=REF(CLOSE,1)>REF(CLOSE,2)*1.096 AND REF(HIGH,1)=REF(LOW,1) AND REF(HIGH,1)=REF(CLOSE,1);
X_9:=DYNAINFO(15)/(DYNAINFO(4))/FINANCE(46)*100*((DYNAINFO(4))-REF(CLOSE,1))/REF(CLOSE,1)*100;
连板:=IF(X_6< 9.6 AND REF(CLOSE,1)>REF(CLOSE,2)*1.096  AND X_6>0 AND NOT(X_8),X_9*31,0);
王者竞价:连板>=100 AND 去杂;

涨停 := (CLOSE - REF(CLOSE, 1)) / REF(CLOSE, 1) > 0.095 AND CLOSE = HIGH;
开幅2 := (OPEN - REF(CLOSE, 1)) / REF(CLOSE, 1) * 100;
竞价量 := DYNAINFO(15) / OPEN / 100;
价格定义 := REF(CLOSE < 40, 1) AND REF(CLOSE > 2, 1);
开幅定义 := 开幅2 > 0 AND 开幅2 < 7;
去停盘 := DYNAINFO(17) > 0;
非新股 := BARSCOUNT(CLOSE) > 90;
开盘换手Z := DYNAINFO(15) / OPEN / FINANCE(46) * 100;
换手Z定义 := 开盘换手Z >= 0.8 AND 开盘换手Z <= 3;
竞昨比2 := 竞价量 / REF(VOL, 1) * 100;
只做主板1:=CODELIKE('60')||CODELIKE('00');
龙行竞价 :只做主板1 AND  价格定义 AND 开幅定义 AND 去停盘 AND 非新股 AND 换手Z定义 AND 竞昨比2 >= 5 AND  REF(涨停, 2)=0   AND  REF(涨停, 1)  AND NOT(CLOSE / REF(CLOSE, 1) > 1.0975 AND HIGH = OPEN);

{ZTT X:C>=ZTPRICE(REF(C,1),0.1);}
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
价:=BETWEEN(O,2,13);盘:=CAPITAL<50000000;
非三:=REF(EVERY(C/REF(C,1)>1.09 AND H=C,3)=0,1);
昨:=REF((C/REF(C,1)-1)*100,1);
幅:=(O/REF(C,1)-1)*100;
量:=DYNAINFO(15)/O/100;
钱:=DYNAINFO(15)/10000;
量比:=量/REF(MA(V,5),1)*240;
换手:=(DYNAINFO(15)/O)/FINANCE(46)*100;
开:=BETWEEN(幅,-1.5,3.82);
行业板块RAWTEXT(1,0,HYBLOCK);
竞昨比YNAINFO(15)/REF(AMOUNT,1)*100;开幅:幅;
MACD数:IF(DIF>DEA,BARSLAST(CROSS(DIF,DEA))+1,IF(DEA>DIF,-(BARSLAST(CROSS(DEA,DIF))+1),DRAWNULL));
数值:量比*换手*竞昨比/O;
开换手:换手;涨幅C-REF(C,1))/REF(C,1)*100;昨涨:昨;流通盘:CAPITAL/1000000;
开量比:量比;成交量:量;金额:钱;
{
涨停数:INSUM(HYBLOCK,'ZTT',1,0);
强度:INSUM(HYBLOCK,'ZTT',1,0)/BLOCKSETNUM(HYBLOCK)*100;
};
回复

使用道具 举报

 楼主| 发表于 2026-6-28 05:35 | 显示全部楼层
{主图标注日期星期}
星期几:=VARCAT(' 星期',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五',''))))));
日期:=VARCAT(VARCAT(VARCAT(VARCAT(VARCAT(VARCAT(VAR2STR(YEAR,0),'年'),VAR2STR(MONTH,0)),'月'),VAR2STR(DAY,0)),'日'),星期几);
DRAWTEXT_FIX(ISLASTBAR,0.78,1,0,日期),COLORMAGENTA;
回复

使用道具 举报

 楼主| 发表于 2026-6-28 05:46 | 显示全部楼层
{易变盘时间画箭头}
DRAWICON(TIME=1305, L, 1);
回复

使用道具 举报

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

本版积分规则

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