‹ 返回51872
🔧 核心通用·带A股选股过滤(核心可用 · 把'去ST/选板块/CODELIKE'那行删掉,美港马加都能跑)
周期:长线用途:只管进单(找买点/选股)(纯多·只做多)
📊 把公式 51872 实时算进主散博弈(纯技术函数;选股/筹码特殊函数会标注不支持)
🧩 这个指标拆开看 = 哪些"积木"组合的
★ 看主力(筹码 / 资金)筹码/成本 COST·WINNER — ★算每股持仓成本分布,判主力建仓/获利盘/控盘度——票在谁手里
主力资金 — ★测大单/主力资金进出方向
① 定方向(趋势)均线类 MA/EMA — 一段时间的平均价,铺出趋势中枢、看多空排列
MACD — 快慢均线之差,测趋势动能、金叉死叉
② 验量能(量价)成交量/额 VOL — 量在价先——放量证实突破、缩量过滤假信号
③ 抓买卖点(择时摆动)KDJ 随机 — 收盘在近期高低区间的位置,抓超买超卖+金叉
④ 触发(信号扳机)CROSS 交叉 — 两线金叉/死叉当买卖扳机
突破/计数/过滤 — 突破前高、信号计时与去重
搭条件的零件HHV/LLV/REF 等 — 取区间最高最低、引用前N根——搭条件的零件
图上标注买卖点画线/标注 — 在图上画柱、标买卖点、上色提示(只是显示,不是判断逻辑)
⚠️ A股专属(港股/美股/马股/加密都没有)代码/板块/题材 — 按代码段、行业、概念、龙头筛选(A股特有)
去ST/风险股 — 剔除A股ST风险股
组合思路:先盯主力筹码/资金(票在谁手里),再用均线/MACD 定方向,再用量能验证真假,再用摆动指标抓超买超卖,再用金叉/突破当买卖扳机。把几件事叠在一起同时成立,才算一个'信号'——叠得越多看着越细,但也越容易过度拟合。 ⚠️ 这条含 A股专属逻辑(涨停板/龙虎榜/代码板块)——只有大陆A股有这制度,港股、美股、马股、加密统统没有,这部分搬不过去。 不过它的'根'在筹码/量价层——这套是普世的,港股美股马股加密都能算;尤其散户多、流通差的市场(如马股小盘、港股仙股)主力筹码更好使。和你的主散博弈/刘彩游龙同源。
指标公式
DRAWGBK(C>0,RGB(0,0,110),RGB(0,25,0),0,' ',0);
���Ƿ�:(H-LLV(L,180))/LLV(L,180)*100,NODRAW,COLORMAGENTA;
��ʱת��:=IF(PERIOD=5,120,240);
VAR30:=(EMA(CLOSE,30)+EMA(CLOSE,72))/2;
CC111:=IF(CURRBARSCOUNT<18,CONST(REF(C,1)),DRAWNULL),COLOR888888,NODRAW;
ֹӮ:1.05*CC111,COLORMAGENTA,LINETHICK1;
ֹ��:0.97*CC111,COLORYELLOW,LINETHICK1;
DRAWBAND(ֹӮ,RGB(65,105,225),ֹ��,RGB(00,00,00));
DRAWTEXT_FIX(1,0.88,5,0,''),COLORRED;
HZZ:=1220601;
HZ:=IF(DATE<HZZ,1,DRAWNULL);
Z1:=STRCAT(HYBLOCK,' ')*HZ;
Z2:=STRCAT(Z1,DYBLOCK)*HZ;
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;
��ţ:=(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25)*HZ,DOTLINE,COLORYELLOW;
��������:XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK1,COLORRED,DOTLINE;
��ţ2:=EMA(��������,25)COLORCYAN,LINETHICK2;
DRAWKLINE(H,O,L,C);
STICKLINE(��������>LOW AND ��������<HIGH,��������,MIN(MIN(OPEN,CLOSE),��������),2,0),COLORYELLOW;
STICKLINE(��������>MIN(C,O) AND ��������<MAX(C,O),��������,MIN(OPEN,CLOSE),2,0),COLORYELLOW;
STICKLINE(��������>HIGH,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(��������>HIGH,HIGH,LOW,0,0),COLORYELLOW;
VAR23:=100*XMA(XMA((C-REF(C,1)),6),6)/XMA(XMA(ABS((C-REF(C,1))),6),6);
�ص���:=LLV(VAR23,2)=LLV(VAR23,7) AND COUNT(VAR23<0,2) AND CROSS(VAR23,MA(VAR23,2));
XG:=��������>HIGH AND �ص��� AND L<=��������;
DRAWBAND(��������,RGB(55,0,0),��ţ2,RGB(0,91,0));
DRAWTEXT(XG,L,'��'),COLORRED;
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));
QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));
DDX:=((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,10000,10000),COLOR00AAAA,LINETHICK;
V2:=SMA(IF(C>=REF(C,1),DDX,-DDX/100),2,1);
V5:=SMA(V2*120/FROMOPEN*5,2,1);
V10:=SMA(V5,5,1);
V20:=SMA(V10,5,1);
DY:=CURRBARSCOUNT=1 AND C<REF(C,1);
DY2:=REF(V2,1)-DY;
XG2:=C>O AND DY2<0.02 AND MA(C,5)>MA(C,60) AND C/REF(C,1)>=1.02 AND H<��ţ;
DRAWTEXT(XG2 AND L<��������,L,'��������'),COLORMAGENTA;
N10:=3;
N20:=6;
N3:=12;
N4:=24;
BBI:(MA(CLOSE,N10)+MA(CLOSE,N20)+MA(CLOSE,N3)+MA(CLOSE,N4))/4,COLORRED,LINETHICK2; BB:=BBI<REF(BBI,1);
IF(BB,BBI,DRAWNULL)COLORGREEN,LINETHICK2;
DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),LOW*0.978,'��'),LINETHICK2,COLORYELLOW;
DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.02,'��'),LINETHICK2,COLORYELLOW;
DRAWKLINE(H,O,L,C);
TJ:=VOL>=REF(V,1)*2.8 AND C>REF(C,1)*1.01;
STICKLINE(TJ,OPEN,CLOSE,1.5,0),COLORYELLOW;
K1:=SUMBARS(TJ,1);
STICKLINE(K1,REF(C,K1-1),REF(C,K1-1),1,0),COLORYELLOW;
STICKLINE(K1,REF(O,K1-1),REF(O,K1-1),1,0),COLORYELLOW;
TJ1:=VOL>=REF(V,1)*3;
STICKLINE(TJ1,OPEN,CLOSE,1.5,0),COLORYELLOW;
K2:=SUMBARS(TJ1,1);
STICKLINE(K2,REF(C,K2-1),REF(C,K2-1),1,0),COLORYELLOW;
STICKLINE(K1,REF(O,K2-1),REF(O,K2-1),1,0),COLORYELLOW;
X01:=IF(MA(C,5)>MA(C,10),20,0);
X02:=IF(MA(C,20)>MA(C,60),10,0);
X3:=IF(KDJ.J>KDJ.K,10,0);
X4:=IF(MACD.DIF>MACD.DEA,10,0);
X5:=IF(MACD.MACD>0,10,0);
X6:=IF(V>MA(V,60),10,0);
X7:=IF(WINNER(C)>0.5,10,0);
X8:=IF(C/REF(C,1)>1.03,10,0);
XX:=X01+X02+X3+X4+X5+X6+X7+X8;
DRAWTEXT_FIX(V>O,0.55,0.05,0,STRCAT('�������֣� ',STRCAT(CON2STR(XX,0),' '))),COLORYELLOW;
����:"999999$ADVANCE"+"399001$ADVANCE",COLORRED,NODRAW;
�µ�:"999999$DECLINE"+"399001$DECLINE",COLORLIGREEN,NODRAW;
DRAWTEXT_FIX(1,0.2,0.05,0,STRCAT('����:',STRCAT(CON2STR(����,0),' '))),COLORRED;
DRAWTEXT_FIX(1,0.35,0.05,0,STRCAT('�µ�:',STRCAT(CON2STR(�µ�,0),' '))),COLORGREEN;
E:=(HIGH+LOW+OPEN+2*CLOSE)/5;
��������:=2*E-LOW;
����֧��:=2*E-HIGH;
����ͻ��:=E+(HIGH-LOW);
���շ�ת:=E-(HIGH-LOW);
��������:=REF(�������� , 1);
����֧��:=REF(����֧�� , 1);
DRAWTEXT_FIX(C!=0,0.92,0.05,0,STRCAT('����������',STRCAT(CON2STR(��������,2),' Ԫ'))),COLORFFFF00;
DRAWTEXT_FIX(C!=0,0.92,0.1,0,STRCAT('����֧�ţ�',STRCAT(CON2STR(����֧��,2),' Ԫ'))),COLORRED;
DRAWTEXT_FIX(C!=0,0.92,0.15,0,STRCAT('����ͻ�ƣ�',STRCAT(CON2STR(����ͻ��,2),' Ԫ'))),COLORFF00FF;
DRAWTEXT_FIX(C!=0,0.92,0.2,0,STRCAT('����������',STRCAT(CON2STR(��������,2),' Ԫ'))),COLORFFFF00;
DRAWTEXT_FIX(C!=0,0.92,0.25,0,STRCAT('����֧�ţ�',STRCAT(CON2STR(����֧��,2),' Ԫ'))),COLORRED;
DRAWTEXT_FIX(C!=0,0.92,0.3,0,STRCAT('���շ�ת��',STRCAT(CON2STR(���շ�ת,2),' Ԫ'))),COLORYELLOW;
HAN:=DATE<1301230;
TT:=240/FROMOPEN;
��:=TT;
�ٽ�ָ���ͣƣ�:=(HIGH-LOW)*1000000/(VOL*��),COLORRED;
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);
AZ2:=EMA(AY2,9);
LT2:=(AY2-AZ2);
L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
ZGD:=HHV(H,80)*0.99;
ZGD2:=CONST(ZGD);
ZDD:=LLV(L211,80);
ZDD2:=CONST(ZDD);
YYA4:=MA(CLOSE,20);
YYA5:=(CLOSE > MA(CLOSE,5));
YYA6:=(MA(CLOSE,5) > MA(CLOSE,10));
YYA7:=(CLOSE > MA(CLOSE,10));
YYA8:=(MA(CLOSE,5) > MA(CLOSE,20));
YYA9:=(CLOSE > MA(CLOSE,20));
YYA10:=REF(YYA4,1);
YYA11:=(YYA4 > YYA10);
YYAVX:=(((((IF(YYA5,10,(0 - 10)) + IF(YYA6,10,(0 - 10))) + IF(YYA7,10,(0 - 10))) + IF(YYA8,10,(0 - 10))) + IF(YYA9,10,(0 -
10))) + IF(YYA11,10,(0 - 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
YYV1:=MA(VOL,5);
YYV2:=MA(VOL,10);
���1:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
���2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
���3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));
���4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 <= YYV2)) AND (DSLX < DSLX1)),1,0));
���9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
���10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
����3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));
����5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));
DRAWTEXT(���1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,1,'��������,������ǿ,��λ��2/3����'),COLOR00FFFF;
DRAWTEXT(���2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,1,'������ǿ,���ܲ��㣬���߽�������λ��1/2����'),COLOR00FFFF;
DRAWTEXT(���3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,1,'�������ã���û��������ǿ�����߽�������λ1/2���ҡ� '),COLOR00FFFF;
DRAWTEXT(���4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,1,'��̬�пɣ����ܲ��㣬δ��ȫ��ǿ,���߲��룬��λ1/3����'),COLOR00FFFF;
DRAWTEXT(���9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,1,'�ù���̬���ã�ǿ�����ԣ����ܳ��㣬���Լ������С� '),COLOR00FFFF;
DRAWTEXT(���10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,1,'�ù��������Ʋ��䣬ǿ����Ȼ�������ܿ�ʼת����ע����� '),COLOR00FFFF;
VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,LOW*0.95,'��'),LINETHICK1,COLOR0066FF;
VAR1:=(EMA(CLOSE,30)+EMA(CLOSE,72))/2;
ָ����:=CROSS(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1),SMA(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1),3,1)) AND SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1)<20;
DRAWTEXT(ָ����,L,'��'),COLORYELLOW;
DRAWTEXT(VAR1,L*0.98,'��'),COLORYELLOW;
DRAWTEXT(CROSS(MA(C,3),MA(C,9)) AND C>=REF(C,1) AND C>O,L*0.98,'��'),COLORMAGENTA;
DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),LOW*0.978,'��'),LINETHICK2,COLORYELLOW;
DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.02,'��'),LINETHICK2,COLORYELLOW;
AH:=HHV(H,60);
AL:=LLV(L,60);
A0:=(AH-AL)/21;
A1:=C>REF(C,4);NT:=BARSLASTCOUNT(A1);TJ11:=NT=9;TJ13:=ISLASTBAR AND BETWEEN(NT,5,8);AY:=(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT;DRAWTEXT(AY>0,H+1.1*A0,VAR2STR(AY,0)),COLORYELLOW;DRAWTEXT(NT=9,H+1.1*A0,'9'),COLORGREEN;DRAWTEXT(NT=13,H+1.1*A0,'13'),COLORGREEN;DRAWTEXT(NT=18,H+1.1*A0,'18'),COLORGREEN;B1:=C<REF(C,4);NT0:=BARSLASTCOUNT(B1);TJ21:=NT0=9 ;TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8);AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0;DRAWTEXT(AY1>0,L-1*A0,VAR2STR(AY1,0)),COLORLIGREEN;DRAWTEXT(NT0=9,H+1.1*A0,'9'),COLORYELLOW;DRAWTEXT(NT0=13,H+1.1*A0,'13'),COLORYELLOW;DRAWTEXT(NT0=18,H+1.1*A0,'18'),COLORYELLOW;ZF:=(C-REF(C,1))/REF(C,1)*100;������:=C>O AND ZF<0 AND O<REF(L,1);STICKLINE(������,O,C,0.5,0),COLORMAGENTA;
STICKLINE(ISLASTBAR,HHV(C,5),HHV(C,5),80,1)COLORBBBBBB;
STICKLINE(ISLASTBAR,HHV(C,5)*0.95,HHV(C,5)*0.95,80,1)COLORBBBBBB;
;