‹ 返回51727
🔧 核心通用·带A股选股过滤（核心可用 · 把'去ST/选板块/CODELIKE'那行删掉，美港马加都能跑）
周期：长线用途：只管进单(找买点/选股)（纯多·只做多)
📊 把公式 51727 实时算进主散博弈(纯技术函数;选股/筹码特殊函数会标注不支持)
🧩 这个指标拆开看 = 哪些"积木"组合的
★ 看主力（筹码 / 资金）筹码/成本 COST·WINNER — ★算每股持仓成本分布，判主力建仓/获利盘/控盘度——票在谁手里
① 定方向（趋势）均线类 MA/EMA — 一段时间的平均价，铺出趋势中枢、看多空排列
DMA — 两条不同周期均线之差，测中线方向
② 验量能（量价）成交量/额 VOL — 量在价先——放量证实突破、缩量过滤假信号
波动通道BOLL/标准差 — 均线±标准差通道，测波动与超买超卖
④ 触发（信号扳机）CROSS 交叉 — 两线金叉/死叉当买卖扳机
突破/计数/过滤 — 突破前高、信号计时与去重
搭条件的零件HHV/LLV/REF 等 — 取区间最高最低、引用前N根——搭条件的零件
图上标注买卖点画线/标注 — 在图上画柱、标买卖点、上色提示（只是显示，不是判断逻辑）
⚠️ A股专属（港股/美股/马股/加密都没有）代码/板块/题材 — 按代码段、行业、概念、龙头筛选（A股特有）
去ST/风险股 — 剔除A股ST风险股
组合思路：先盯主力筹码/资金（票在谁手里），再用均线/MACD 定方向，再用通道测波动边界，再用量能验证真假，再用金叉/突破当买卖扳机。把几件事叠在一起同时成立，才算一个'信号'——叠得越多看着越细，但也越容易过度拟合。 ⚠️ 这条含 A股专属逻辑（涨停板/龙虎榜/代码板块）——只有大陆A股有这制度，港股、美股、马股、加密统统没有，这部分搬不过去。 不过它的'根'在筹码/量价层——这套是普世的，港股美股马股加密都能算；尤其散户多、流通差的市场(如马股小盘、港股仙股)主力筹码更好使。和你的主散博弈/刘彩游龙同源。
指标公式
DRAWGBK(CLOSE>0,RGB(1,1,1),RGB(1,1,1),0,1,0);
DRAWNULL,COLORCCCCCC;
�ܹɱ�:=STRCAT(STRCAT(' �ܹɱ�:',CON2STR(TOTALCAPITAL/1000000,2)),'��');
��ͨ��:=STRCAT(STRCAT(' ��ͨ��:',CON2STR(CAPITAL/1000000,2)),'��');
ȫ��ͨ:=STRCAT(STRCAT(' ��ͨ��:',CON2STR(CAPITAL/TOTALCAPITAL*100,2)),'��');
��ֵ:=STRCAT(STRCAT(' ��ͨ��ֵ:',CON2STR((CAPITAL/1000000)*C,2)),'��');
�ɱ���ֵ:=STRCAT('���ɱ���ֵ����',STRCAT(STRCAT(STRCAT(�ܹɱ�,��ͨ��),ȫ��ͨ),��ֵ));
��ӯ��:=STRCAT(' ��ӯ��:',CON2STR(C/FINANCE(33),2));
����������:=STRCAT(' ����������:',CON2STR(FINANCE(33)/FINANCE(34)*100,2));
��Ӫ������:=STRCAT(' ��Ӫ������:',CON2STR(FINANCE(23)/FINANCE(20)*100,2));
��ǰҵ��:=STRCAT('����ǰҵ������',STRCAT(STRCAT(��ӯ��,����������),��Ӫ������));
DRAWTEXT_FIX(ISLASTBAR,0.005,0.12,0,�ɱ���ֵ),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.17,0,��ǰҵ��),COLORMAGENTA;
�����̣�:=100*WINNER(C);
����ѹ��:=HHV(H,15);
����֧��:=LLV(L,20);
X11:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;
X12:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;;
X13:=FINANCE(23)/FINANCE(10)*3.3;
X14:=FINANCE(19)/FINANCE(15)*0.6;
X15:=FINANCE(20)/FINANCE(15)*0.999;
Zֵ:=X11+X12+X13+X14+X15;
DRAWTEXT_FIX(Zֵ<1.2,0.312,0.22,0,' ��������ؾ���'),COLORLIRED;
DRAWTEXT_FIX( BETWEEN(Zֵ,1.2,2.6),0.312,0.22,0,' ��������ᾯ��'),COLOR0099FF;
DRAWTEXT_FIX(Zֵ>2.6,0.312,0.22,0,' �����������'),COLORLIGREEN;
DRAWTEXT_FIX(C>0,0.005 ,0.22,0,'�������̣���:'),COLORRED;
DRAWTEXT_FIX(C>0,0.105,0.22,0,'������ѹ����:'),COLOR00FF00;
DRAWTEXT_FIX(C>0,0.21,0.22,0,'������֧�š�:'),COLORYELLOW;
DRAWNUMBER_FIX(C>0,0.075,0.22,0,CONST(�����̣�)),COLORRED;
DRAWNUMBER_FIX(C>0,0.175,0.22,0,CONST(����ѹ��)),COLOR00FF00;
DRAWNUMBER_FIX(C>0,0.28,0.22,0,CONST(����֧��)),COLORYELLOW;
STG:=NAMELIKE('S') OR NAMELIKE('*');
��ͣ:=((C/REF(C,1)>=1.095 AND C=H) OR (C/REF(C,1)>=1.09 AND C=O AND O=L AND H=L) OR (C/REF(C,1)>=1.048 AND STG=1 AND C=H) OR (C/REF(C,1)>=1.045 AND C=O AND O=L AND H=L AND STG=1)) AND CURRBARSCOUNT<=120;
ZTCS:=COUNT(��ͣ,BARSSINCE(��ͣ)+1);
GZT1:=STRCAT(' �������ͣ������',CON2STR(ZTCS,0));
GZT2:=STRCAT(GZT1,'��');
SSTS1:=STRCAT(' ����������',CON2STR(FINANCE(42),0));
SSTS2:=STRCAT(SSTS1,'��');
NTZZT1:=STRCAT('�����:',CON2STR(CONST(BARSLAST(��ͣ)),0));
NTZZT2:=STRCAT(NTZZT1,'������ͣ');
ZTTJ1:=STRCAT(SSTS2,GZT2);
ZTTJ2:=STRCAT(ZTTJ1,NTZZT2);
ZTTJ:=STRCAT('����ͣͳ�ơ�:',ZTTJ2);
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.005,0.265,0,ZTTJ),COLORYELLOW;
DRAWKLINE(H,O,L,C);
N:=2;M:=30;
MA(H,M) * (1 + 13 / 100) * 1.0382,LINETHICK1,COLORYELLOW ;
MA(H,M) * (1 + 13 / 100),LINETHICK1,COLORYELLOW ;
EMA(L,30) * (1 - 15 / 100),COLORGREEN , NODRAW ;
EMA(L,30) * (1 - 15 / 100) * 0.82,NODRAW, COLORYELLOW;
AA:(EMA(C,5) * 7 + EMA(C,10) * 3) / 10,LINETHICK2,COLORWHITE;
A1:=(H + L + O + C) / 4;A2:=EMA(A1,13) - EMA(A1,34);A3:=EMA(A2,5);
A4:=(A2 - A3) * 5;A5:=IF(A4 >= 1000,1000,IF(A4 <= A1,A1,A4));
A6:=FORCAST(FORCAST(A5,32),10);A7:=(C - EMA(C,13)) / EMA(C,13) * (0 - 100);
A8:=EMA(A7 / 10 + EMA(C,13),8);A9:=EMA(C,3);A10:=EMA(SLOPE(C,22) * 20 + C,45);
A11:=IF(PERIOD >8 AND PERIOD < 11,MA(A10,1),IF(PERIOD = 8,MA(A10,4),IF(PERIOD = 7,MA(A10,8),IF(PERIOD = 6,MA(A10,16),IF(PERIOD = 5,MA(A10,32),0)))));A12:=A11 * 0.865;A13:=IF(A9 > A11,A9,A12);
A14:=C * V;A15:=EMA((EMA(A14,3) / EMA(V,3) + EMA(A14,6) / EMA(V,6) + EMA(A14,12) / EMA(V,12) + EMA(A14,24) / EMA(V,24)) / 4,13);
A16:=1.06 * A15;A17:=(C - REF(C,1)) / REF(C,1) * 100 > 8.5;
A18:=EMA(H,10) * (1 + 5 / 100);
��:CROSS(AA,MA(H,30) * (1 + 13 / 100)) * 10,NODRAW;
A19:=(C - O) / REF(C,1) * 100;A20:=REF(H,N) = HHV(H,2 * N + 1);
A21:=FILTER(A20,N);A22:=BACKSET(A21,N + 1);A23:=FILTER(A22,N);
A24:=REF(L,N) = LLV(L,2 * N + 1);A25:=FILTER(A24,N);
A26:=BACKSET(A25,N + 1);A27:=FILTER(A26,N);
A28:=(REF(LLV(L,2 * N),1) + REF(HHV(H,2 * N),1)) / 2;
A29:=(H + L) / 2;A30:=(A23 AND NOT(A27 AND A28 >= A29)) OR ISLASTBAR OR BARSCOUNT(C) = 1;
A31:=A27 AND NOT(A23 AND A28 < A29);A32:=REF(BARSLAST(A30),1) + 1;
A33:=BACKSET(A30 AND COUNT(A31,A32) > 0,LLVBARS(IF(A31,L,10000),A32));
A34:=A33 > REF(A33,1);A35:=BACKSET(A34,2);A36:=A35 > REF(A35,1);
A37:=A36 OR ISLASTBAR OR BARSCOUNT(C) = 1;A38:=REF(BARSLAST(A37),1) + 1;
A39:=BACKSET(A37 AND COUNT(A23 AND NOT(A27 AND A28 >= A29),A38) > 0,HHVBARS(IF(A23 AND NOT(A27 AND A28 >= A29),H,0),A38));
A40:=A39 > REF(A39,1);A41:=BACKSET(A40,2);A42:=A41 > REF(A41,1);
A43:=BACKSET(ISLASTBAR,BARSLAST(A42) + 1);A44:=A43 > REF(A43,1);
A45:=BACKSET(A44,REF(BARSLAST(A42),1) + 2);A46:=A45 > REF(A45,1);
����ѹ��:DRAWLINE(A46,H,A44,H,1),COLORGREEN,NODRAW;
A0:=((L+H+C*2)/4);��F:=EMA(A0,14)*1.1382;
A1KX:=(��F-REF(��F,1)) / REF(��F,1) * 100;GD1:=BARSLAST(CROSS(A1KX,0));
��������:IF(H>=REF(A0,BARSLAST(CROSS(A1KX,0)))*1.3,REF(A0,BARSLAST(CROSS(A1KX,0)))*1.3,DRAWNULL),COLORFFB5FF,LINETHICK9;
DRAWTEXT(ISLASTBAR,��������,' ��������'),COLORFFB5FF;
DRAWTEXT(FILTER(CROSS(AA,MA(H,30) * (1 + 13 / 100)),5),MA(H,30) * (1 + 13 / 100) * 0.88,' ����'),COLORGREEN;
���22:=IF(((YEAR) >= (2039)) AND ((MONTH) > 3),0,1);
���33:=(MA(C,3) + MA(C,6) + MA(C,12) + MA(C,24)) / 4 + ((1.88) * (STD((MA(C,3) + MA(C,6) + MA(C,12) + MA(C,24)) / 4,9))) * (���22);
������ͣ��:((MA(�о���33,12)) * (1.06)) * (�о���22),LINETHICK2,COLORCYAN ;
���55:=(EMA(H,10)) * (1 + 5 / (100));
���6:=C * V;
���7:=EMA(((EMA(���6,3)) / (EMA(V,3)) + (EMA(���6,6)) / (EMA(V,6)) + (EMA(���6,12)) / (EMA(V,12)) + (EMA(���6,24)) / (EMA(V,24))) / 4,13);
���8:=(1.06) * (���7);���9:=(L / ((H + REF(C,1) + O) / 3)) * C;
DRAWTEXT(((CROSS(�о���9,�о���8)) AND (C > (�о���55))) AND (C > (������ͣ��)),L,'��'),LINETHICK1,COLORYELLOW;
NN:=5;MM:=3;���0:=((EMA(C,5)) * 7 + (EMA(C,10)) * 3) / 10;
���1:=IF((YEAR) >= (2025),0,1);���2:=EMA(EMA(L,21) + (6.8) * (STD(L,2)),55);���3:=EMA(((C / (���2)) * ((1.88) * C + L + O)) / (2.75),3);
�о���4:=(((�о���3) - (�о���2)) / (�о���2)) / 2;�о���5:=(EMA((�о���3) - ((�о���4) * (�о���3)),5)) * (�о���1);�ƽ���:(IF((�о���0) > (�о���5),�о���0,�о���5)) * (�о���1),NODRAW ,COLORRED ;�Ϲ�:IF(((�о���5) < (�о���0)) AND ((�о���5) < (C * (0.15))),(EMA(C,300)) - (3 * (STD(C,300))),�о���5),NODRAW ,COLORYELLOW;IF((�о���5) > (�о���0),�Ϲ�,DRAWNULL),COLORCYAN ,NODRAW ;
���10:=(((SMA(MAX(C - (REF(C,1)),0),24,1)) / (SMA(ABS(C - (REF(C,1))),24,1))) * (100)) * (���1);���13:=((SMA(MAX(C - (REF(C,1)),0),14,1)) / (SMA(ABS(C - (REF(C,1))),14,1))) * (100);
���14:=(EMA(C,60) + EMA(C,120) + EMA(C,240) + EMA(C,480)) / 4;
���15:=���14 + (1.91) * (STD(���14,3));���16:=(EMA(���15,12)) * (1.23);
STICKLINE((((���10) > 65) AND ((���13) >= 65)) AND ((MA(C,1)) > (���16)),H,L,0,0),COLORRED;
STICKLINE((((���10) >= (64.5)) AND ((���13) >= 65)) AND ((MA(C,1)) > (���16)),C,O,3,0),COLORRED;���37:=((L + H) / 2);
���39:=(EMA((C + L + H) / 3,1));STICKLINE(((((���10) >= (64.5)) AND ((���13) >= 65)) AND ((MA(C,1)) > (���16))) AND ((MA(C,1)) > ((MA(H,30)) * (1 + 15 / (100)))),O,(���37 + L) / 2,3,0),COLORYELLOW;
STICKLINE(((C > ((MA(H,30)) * (1 + 18 / (100)))) AND (C > (���5))) AND ((���10) > (64.5)),���39,���37,3,0),COLORWHITE;
תǿ:=100*(C-REF(C,12))/REF(C,12);
��ǿ:=((H+L+C)/3-MA((H+L+C)/3,88))/(0.015*AVEDEV((H+L+C)/3,88));
ͨ��:=1.07*DMA(C,ABS((2*C+H+L)/4-MA(C,26))/MA(C,26));
����:=MA(ATAN(ͨ��-REF(ͨ��,1)),3);
QS1:=IF((C>O OR C<O) AND H>=REF(C,1),ATAN(MA(H,5)*1.02-REF(MA(C,5)*1.02,1)),0);
QS2:=IF((C>O OR C<O) AND H<REF(C,1),-ATAN(REF(MA(C,5)*1.02,1)-MA(H,5)*1.02),0);
�ֽ�:=MA(REF((QS1+QS2),1),26);
ǿ��:=����>�ֽ� AND ����>REF(����,1);
����ţ��:=ǿ�� AND ��ǿ>200 AND תǿ>20 AND C>REF(C,1);
;
DRAWTEXT(����ţ��,L*0.95,' ��'),COLORRED;