‹ 返回

40871

40871 | 查看原文 ↗
🔧 核心通用·带A股选股过滤(核心可用 · 把'去ST/选板块/CODELIKE'那行删掉,美港马加都能跑)
周期:长线用途:只管进单(找买点/选股)(纯多·只做多)
📊 把公式 40871 实时算进主散博弈(纯技术函数;选股/筹码特殊函数会标注不支持) 
🧩 这个指标拆开看 = 哪些"积木"组合的
★ 看主力(筹码 / 资金)
筹码/成本 COST·WINNER — ★算每股持仓成本分布,判主力建仓/获利盘/控盘度——票在谁手里
① 定方向(趋势)
均线类 MA/EMA — 一段时间的平均价,铺出趋势中枢、看多空排列
MACD — 快慢均线之差,测趋势动能、金叉死叉
DMA — 两条不同周期均线之差,测中线方向
② 验量能(量价)
成交量/额 VOL — 量在价先——放量证实突破、缩量过滤假信号
③ 抓买卖点(择时摆动)
KDJ 随机 — 收盘在近期高低区间的位置,抓超买超卖+金叉
RSI — 涨跌力量强弱,超买超卖与背离
WR 威廉 — 反向超买超卖
④ 触发(信号扳机)
CROSS 交叉 — 两线金叉/死叉当买卖扳机
突破/计数/过滤 — 突破前高、信号计时与去重
搭条件的零件
HHV/LLV/REF 等 — 取区间最高最低、引用前N根——搭条件的零件
图上标注买卖点
画线/标注 — 在图上画柱、标买卖点、上色提示(只是显示,不是判断逻辑)
⚠️ A股专属(港股/美股/马股/加密都没有)
去ST/风险股 — 剔除A股ST风险股
组合思路:先盯主力筹码/资金(票在谁手里),再用均线/MACD 定方向,再用量能验证真假,再用摆动指标抓超买超卖,再用金叉/突破当买卖扳机。把几件事叠在一起同时成立,才算一个'信号'——叠得越多看着越细,但也越容易过度拟合。 ⚠️ 这条含 A股专属逻辑(涨停板/龙虎榜/代码板块)——只有大陆A股有这制度,港股、美股、马股、加密统统没有,这部分搬不过去。 不过它的'根'在筹码/量价层——这套是普世的,港股美股马股加密都能算;尤其散户多、流通差的市场(如马股小盘、港股仙股)主力筹码更好使。和你的主散博弈/刘彩游龙同源。

指标公式

��:=CONST(REF(HHV(H,150),3));
��:=CONST(REF(LLV(L,150),3));
NN:=100;
N:=9;
LC:=REF(C,1);
QC:=REF(C,2);
AA:=REF(H,N)=HHV(H,2*N+1);
AA1:=REF(L,N)=LLV(L,2*N+1);
QY:=BACKSET(AA,N+1);
QY1:=BACKSET(AA1,N+1);
CC:=FILTER(QY,N) AND H=HHV(H,N+1);
CC1:=FILTER(QY1,N) AND L=LLV(L,N+1);
DDD:=BARSLAST(CC); DD1:=BARSLAST(CC1);
GDTS:=IF(CC,CURRBARSCOUNT,0);
DDTS:=IF(CC1,CURRBARSCOUNT,0);
UTS:=IF(DDD,REF(GDTS,DDD),GDTS);
DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
GDCS1:=CONST(UTS);
DDCS1:=CONST(DDTS1);
GDCS13:=CONST(REF(H,GDCS1-1));
DDCS13:=CONST(REF(L,DDCS1-1));
SS1:=REF(UTS,DDD+1);
TS2:=REF(DDTS1,DD1+1);
GDCS2:=CONST(SS1);
DDCS2:=CONST(TS2);
M:=INTPART(3*N/5);
AAA:=REF(H,M)=HHV(H,2*M+1);
QYY:=BACKSET(AAA,M+1);
CCC:=FILTER(QYY,M) AND H=HHV(H,M+1);
DDDD:=BARSLAST(CCC),NODRAW;
GDTSS:=IF(CCC,CURRBARSCOUNT,0);
TSS:=IF(DDDD,REF(GDTSS,DDDD),GDTSS);
GDCS11:=CONST(TSS);
TS11:=REF(TSS,DDDD+1);
GDCS22:=CONST(TS11);
AA11:=REF(L,M)=LLV(L,2*M+1);
QY11:=BACKSET(AA11,M+1);
CC11:=FILTER(QY11,M) AND L=LLV(L,M+1);
DD11:=BARSLAST(CC11);
DDTSS:=IF(CC11,CURRBARSCOUNT,0);
DDTS11:=IF(DD11,REF(DDTSS,DD11),DDTSS);
DDCS11:=CONST(DDTS11);
DDTS22:=REF(DDTS11,DD11+1);
DDCS22:=CONST(DDTS22);
ZGD:=HHV(H,60)*1.01.00;
ZGD2:=CONST(ZGD);
��ѹM:=DRAWLINE(CURRBARSCOUNT=GDCS22,H,CURRBARSCOUNT=GDCS11,H,1),COLORRED,LINETHICK1;
�ͳ�M:=DRAWLINE(CURRBARSCOUNT=DDCS22,L,CURRBARSCOUNT=DDCS11,L,1) COLORRED,LINETHICK1;
��ѹ1:=DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1) ,COLORBLUE,LINETHICK1;
�ͳ�1:=DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1),COLORBLUE,LINETHICK1;
�ߵ�:=CONST(HHV(H,NN));
�͵�:=CONST(LLV(L,NN));
DRAWTEXT_FIX(1,0.00,0.00,0,' 
,COLORYELLOW;
R1:=C>LC AND C>QC;
R2:=REF(R1,1) AND C<=LC AND C>=QC;
R3:=REF(R2,1) AND C>=LC AND C<=QC;
R4:=REF(R3,1) AND C<=LC AND C>=QC;
R5:=REF(R4,1) AND C>=LC AND C<=QC;
R6:=REF(R5,1) AND C<=LC AND C>=QC;
R7:=REF(R6,1) AND C>=LC AND C<=QC;
R8:=REF(R7,1) AND C<=LC AND C>=QC;
R9:=REF(R8,1) AND C>=LC AND C<=QC;
RA:=REF(R9,1) AND C<=LC AND C>=QC;
RB:=REF(RA,1) AND C>=LC AND C<=QC;
RC:=REF(RB,1) AND C<=LC AND C>=QC;
RD:=C<LC AND C<QC;
RE:=REF(RD,1) AND C>=LC AND C<=QC;
RF:=REF(RE,1) AND C<=LC AND C>=QC;
R10:=REF(RF,1) AND C>=LC AND C<=QC;
R11:=REF(R10,1) AND C<=LC AND C>=QC;
R12:=REF(R11,1) AND C>=LC AND C<=QC;
R13:=REF(R12,1) AND C<=LC AND C>=QC;
R14:=REF(R13,1) AND C>=LC AND C<=QC;
R15:=REF(R14,1) AND C<=LC AND C>=QC;
R16:=REF(R15,1) AND C>=LC AND C<=QC;
R17:=REF(R16,1) AND C<=LC AND C>=QC;
R18:=REF(R17,1) AND C>=LC AND C<=QC;
R19:=REF(RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18,1) AND R1;
R1A:=((REF(R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC,1)) AND RD);
VAR3:=IF(C<200 ,MA(COST(80),3),2500),NODRAW;
VAR4:=(H+LC)/3;
VAR5:=EMA((O+H+L+C)/4,2330);
VAR6:=(VAR5 + ((VAR5 * 6) / 100));
����:R19,NODRAW,COLOR00AAAA;
�볡:R1A,NODRAW,COLORFF7700;
�ֹ�:R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC,NODRAW,COLOR8000FF;
����:RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18,NODRAW,COLOR767628;
����:=(C-MA(C,34))/MA(C,34)*100<-14,COLORBBBBBB,NODRAW;
Q1:=CONST(IF(����,100,IF(�볡,0,IF(�ֹ�,100,IF(����,150,40))))),NODRAW;
Q2:=CONST(IF(����,100,IF(�볡,66,IF(�ֹ�,0,IF(����,150,118))))),NODRAW;
Q3:=CONST(IF(����,0,IF(�볡,132,IF(�ֹ�,50,IF(����,150,118))))),NODRAW;
DRAWBAND(�ߵ�,RGB(Q1,Q2,Q3),�͵�,DRAWNULL);
C1:=IF(����,����,DRAWNULL),;
C2:=IF(�볡,�볡,DRAWNULL),;
JH:=SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100;
SZ:=FILTER(CROSS(JH,35),13);
SX:=FILTER(CROSS(JH,30),7);
SQ:=FILTER(CROSS(71,JH),74);
SD:=FILTER(CROSS(80,JH),74);
CCL:=REF(HHV(C,120),1);
DD:=REF(LLV(C,120),1);
WW:=100*(C-DD)/(CCL-DD);
EE:=AMOUNT;
FF:=(EMA(EE,5)/REF(EMA(EE,5),5));
����:IF(CAPITAL<1,SZ,SX),COLOR22FFFF,NODRAW;
����:FILTER(O<REF(L,1) AND C>O AND V>REF(V,1),13),COLORFF88FF,NODRAW;
��ռ:=FILTER((FF>=2 AND WW<35 AND BARSCOUNT(C)>30 OR (FF>=2 AND WW<100) AND BARSCOUNT(C)<50),90),COLOR0000AA,NODRAW;
����:=IF(CAPITAL<1,SQ,SD),COLOR00CC00,NODRAW;
�ֹ�K:C>REF(C,1),COLOR0099FF,NODRAW;
�ֱ�K:C<REF(C,1),COLORFFAA00,NODRAW;
ƽ��:=C=REF(C,1),COLOR999999,NODRAW;
STICKLINE(�ֹ�K,H,L,3,1),COLOR0099FF;
STICKLINE(�ֹ�K,C,O,1.5,0),COLOR0099FF;
STICKLINE(�ֱ�K,H,L,3,1),COLORFF9900;
STICKLINE(�ֱ�K,C,O,1.5,0),COLORFF9900;
STICKLINE(ƽ��,H,L,3,1),COLOR999999;
STICKLINE(ƽ��,C,O,1.5,0),COLOR999999;
STICKLINE(��ռ,H,L,3,1),COLOR0000CC;
STICKLINE(��ռ,C,O,1.5,0),COLOR0000CC;
STICKLINE(����,H,L,3,1), COLORFF88FF;
STICKLINE(����,C,O,1.5,0),COLORFF88FF;
STICKLINE(����,H,L,3,1),COLOR22FFFF;
STICKLINE(����,C,O,1.5,0),COLOR22FFFF;
STICKLINE(����,H,L,3,1),COLOR00CC00;
STICKLINE(����,C,O,1.5,0),COLOR00CC00;
������:=3*SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1)-2*SMA(SMA((C-LLV(L,27))/
(HHV(H,27)-LLV(L,27))*100,5,1),3,1),COLORBCBC00,NODRAW;
ZZ:=������>REF(������,1);
QWX1:=HHV(C,30);
QWX2:=LLV(C,30);
QWX3:=CONST((QWX1+QWX2)/2);
QWX4:=ABS((2*C+H+L)/4-MA(C,20))/MA(C,20);
QWX5:=CONST((1-7/100)*(DMA(C,QWX4)));
QWX6:=CONST((1+7/100)*(DMA(C,QWX4)));
����:IF(BARSLAST(CURRBARSCOUNT=12),QWX6,DRAWNULL),COLORFF9D3C,LINETHICK1,CIRCLEDOT;
֧��:IF(BARSLAST(CURRBARSCOUNT=12),QWX5,DRAWNULL),COLORFF00FF,LINETHICK1,CIRCLEDOT;
RSI5:=(SMA(MAX((C-LC),0),5,1)/SMA(ABS((C-LC)),5,1))*100;
TR1:=SUM(MAX(MAX((H-L),ABS(H-REF(C,1))),ABS(L-REF(C,1))),10);
HD:=H-REF(H,1);
LD:=REF(L,1)-L;
DMP:=SUM(IF((HD>0 AND HD>LD),HD,0),10);
DMM:=SUM(IF((LD>0 AND LD>HD),LD,0),10);
PDI:=DMP*100/TR1;
MDI:=DMM*100/TR1;
ADX:=MA((ABS((MDI-PDI)/(MDI+PDI))*100),5);
AV:=RSI5+ADX;
DXR:=(ADX+REF(ADX,5)/2)+RSI5;
WR10:=(100*(HHV(H,10)-C))/(HHV(H,10)-LLV(L,10));
NEWVOL:=RSI5-WR10;
�������:=AV+NEWVOL;
J:="KDJ.J";
X:=LLV(J,2)=LLV(J,8);
����ʱ��:=(CROSS(J,3));
��ѡA:=CROSS(�������,0);
RSIA:=(SMA(MAX(C-LC,0),6,1)/SMA(ABS(C-LC),6,1)*100)/100;
WR:=-100*(HHV(H,14)-C)/(HHV(H,14)-LLV(L,14));
����:=((0-WR)-100)/100,;
�ǶȲ�:=1-(����/RSI);
�Ƕ�2:=MA(�ǶȲ�,2);
�Ƕ�4:=MA(�ǶȲ�,4);
�ǶȲ�A:=�ǶȲ�>MA(�ǶȲ�,3)*1.3;
ת��:=REF(�ǶȲ�,1)<REF(�ǶȲ�,2) AND �ǶȲ�>REF(�ǶȲ�,1) AND REF(�ǶȲ�,1)<1.06;
SS:=COUNT(ת��,4)>0 OR COUNT(�ǶȲ�A,4)>0;
DIF��:=CROSS(�Ƕ�2,�Ƕ�4) AND SS,COLOR0088FF;
CYC13:=0.01*EXPMA(AMOUNT,13)/EXPMA(V,13);
CYS:=(C-CYC13)/CYC13*100;
�������:=IF("ZXNH.ZXNH"=1 AND CYS<=-2,0.6,0);
ץţA:=DIF��&&�������;
��:=(HHV(H,21)-C)/(HHV(H,21)-LLV(L,21))*100-10;
��:=(C-LLV(L,21))/(HHV(H,21)-LLV(L,21))*100;
��:=SMA(��,13,8);
��:=CEILING(SMA(��,13,8));
����:=SMA(��,21,8);
��:=��-����,COLORFFFFFF;
RC1:=REF((L+O+C+H)/4,1);
RC2:=SMA(ABS(L-RC1),13,1)/SMA(MAX(LOW-RC1,0),10,1);
RC3:=EMA(RC2,10);
RC4:=LLV(L,33);
RC5:=EMA(IF(L<=RC4,RC3,0),3),;
����:=IF(RC5>REF(RC5,1),RC5,0);
ϴ:=IF(RC5<REF(RC5,1),RC5,0),;
����A:=FILTER(REF(��,1)<-70 AND ��>REF(��,1) AND (���� OR ϴ),3);
X3:=(2*C+L+H)/4;
��:=EMA(X3,55)*0.84,;
����5:=(C-MA(C,5))/MA(C,5)*100,NODRAW;
����A:=FILTER(L<�� AND REF(����5,1)<-5 AND ����5>REF(����5,1),3);
����:=7*SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*30,4,1)
-3*SMA(SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*30,4,1),3,1)
-SMA(SMA(SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*30,4,1),3,1),2,1);
����:=78.89;
�Ӷ�:=CROSS(����,����);
����A:=CROSS(����,5);
ZF:=((C-REF(C,1))/REF(C,1))*100;
HSL:=(V/CAPITAL)*100;
KK:=ZF/HSL,COLOR6000FF;
KK5:=MA(KK,5),COLORFFAA00;
LL:=LLV(KK,34);
������A:=CROSS(KK,KK5)&&REF(KK,1)<=LL&&ZZ,;
ֹ��:=(REF(EVERY(C<O,2),1) AND C>O);
VAR1N:=MA(C,5),;
VAR2N:=MA(C,10);
VAR3N:=(VAR1N-C)/C>3/100;
VAR4N:=(VAR2N-VAR1N)/VAR1N>0.03;
VAR5N:=LLV(C,30)=LLV(C,120);
�ײ�:=VAR3N AND VAR4N AND VAR5N;
��׬A:=BARSLAST(�ײ�)<=2 AND ֹ��,COLORFF8800,NODRAW;
A:=REF(C,1);
RSIK:=SMA(MAX(C-A,0),6,1)/SMA(ABS(C-A),6,1)*100;
A4:=RSIA<20;
ZZF:=(C/REF(C,1)-1)*100;
���1:=IF(BETWEEN(A4,0,5) AND L<=REF(C,A4)AND ZZF<=-5 ,20,0),COLORFF0000,LINETHICK2;
CD:= C>=O AND REF(���1 ,1)=20 AND REF(RSI,1)<20 ;
���A:=C>O AND REF(���1 ,1)=20 AND REF(RSI,1)<20;
��ӡ�:IF(���A,L*1.005,DRAWNULL)COLOR55FF55,CIRCLEDOT,LINETHICK5;
��ѡ��:IF(��ѡA,L*0.995,DRAWNULL)COLORFF88FF,CIRCLEDOT,LINETHICK4;
������:IF(����A,L*0.99,DRAWNULL)COLORFFFF00,CIRCLEDOT,LINETHICK4;
ץţ��:IF(ץţA,L*0.985,DRAWNULL)COLOR0088FF,CIRCLEDOT,LINETHICK4;
����ס�:IF(����A,L*0.98,DRAWNULL)COLORFFFFFF,CIRCLEDOT,LINETHICK4;
�������:IF(������A,L*0.975,DRAWNULL)COLOR0000FF,CIRCLEDOT,LINETHICK4;
������:IF(����A,L*0.97,DRAWNULL)COLOR00FFFF,CIRCLEDOT,LINETHICK4;
��׬��:IF(��׬A,L*0.965,DRAWNULL)COLORFF00FF,CIRCLEDOT,LINETHICK4;
B01:=IF(��ѡA,1,0);
B02:=IF(����A,1,0);
B03:=IF(ץţA,1,0);
B04:=IF(����A,1,0);
B05:=IF(������A,1,0);
B06:=IF(����A,1,0);
B07:=IF(��׬A,1,0);
B08:=IF(���A,1,0);
������:B01+B02+B03+B04+B05+B06+B07+B08,COLOR00FFFF,NODRAW;
DRAWICON(������>=4,H*1.008,34);
�ֱ���:EMA(C,13),COLOR32E01F,LINETHICK3;
�ֹ���:IF(�ֱ���>REF(�ֱ���,1),�ֱ���,DRAWNULL),COLOR460CF3,LINETHICK3;
IF(BETWEEN(��ѹM,�ߵ�,�͵�),��ѹM,DRAWNULL),COLOR00CCFF,LINETHICK1;
IF(BETWEEN(�ͳ�M,�ߵ�,�͵�),�ͳ�M,DRAWNULL),COLOR00CCFF,LINETHICK1;
IF(BETWEEN(��ѹ1,�ߵ�,�͵�),��ѹ1,DRAWNULL),COLORCCCCCC,LINETHICK1;
IF(BETWEEN(�ͳ�1