‹ 返回42151
🔧 核心通用·带A股选股过滤（核心可用 · 把'去ST/选板块/CODELIKE'那行删掉，美港马加都能跑）
周期：中线用途：只管进单(找买点/选股)（纯多·只做多)
📊 把公式 42151 实时算进主散博弈(纯技术函数;选股/筹码特殊函数会标注不支持)
🧩 这个指标拆开看 = 哪些"积木"组合的
① 定方向（趋势）均线类 MA/EMA — 一段时间的平均价，铺出趋势中枢、看多空排列
② 验量能（量价）成交量/额 VOL — 量在价先——放量证实突破、缩量过滤假信号
④ 触发（信号扳机）CROSS 交叉 — 两线金叉/死叉当买卖扳机
突破/计数/过滤 — 突破前高、信号计时与去重
搭条件的零件HHV/LLV/REF 等 — 取区间最高最低、引用前N根——搭条件的零件
图上标注买卖点画线/标注 — 在图上画柱、标买卖点、上色提示（只是显示，不是判断逻辑）
⚠️ A股专属（港股/美股/马股/加密都没有）代码/板块/题材 — 按代码段、行业、概念、龙头筛选（A股特有）
去ST/风险股 — 剔除A股ST风险股
组合思路：用均线/MACD 定方向，再用量能验证真假，再用金叉/突破当买卖扳机。把几件事叠在一起同时成立，才算一个'信号'——叠得越多看着越细，但也越容易过度拟合。 ⚠️ 这条含 A股专属逻辑（涨停板/龙虎榜/代码板块）——只有大陆A股有这制度，港股、美股、马股、加密统统没有，这部分搬不过去。
指标公式
UPPER:(1+6/100)*MA(CLOSE,25);
LOWER:(1-6/100)*MA(CLOSE,25);
ENE:(UPPER+LOWER)/2;
TY:=C;
A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10);
A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10);
ǰ�ڸ�λ:REF(C,BARSLAST(HD)),COLOR00FF00,POINTDOT;
STICKLINE(C,ǰ�ڸ�λ,ǰ�ڸ�λ,8,0),COLORYELLOW;
����:=1;
JLW:=REF(MA(VOL,5),2);
�����춯:=����>0 AND V>REF(V,1)*2 AND C>OPEN AND VOL>JLW*2 , NODRAW;
��������:= ����>0 AND COUNT(REF(�����춯,1),3)>0 AND �����춯>0;
DRAWTEXT(��������<>1 AND �����춯>0 ,LOW*0.985,'�I�춯'),COLORYELLOW;
VBB1:=TROUGHBARS(3,15,1)<10;
VBB2:=PEAKBARS(3,15,1)<5;
VBB3:=IF(VBB1=1,50,0);
VBB4:=IF(VBB2=1,50,0);
�ײ�:=IF(VBB3=50,10,0);
ͷ��:=IF(VBB4=50,20,80);
δ����:STICKLINE(IF(�ײ�=10 AND REF(�ײ�,1)=10 AND REF(�ײ�,2)=0,30,0),L*0.985,L*0.99,15,0),LINETHICK2,COLORYELLOW;
δ������:DRAWTEXT(IF(�ײ�=10 AND REF(�ײ�,1)=10 AND REF(�ײ�,2)=0,1,0),L*0.995,'��'),LINETHICK2,COLORYELLOW;
δ����:STICKLINE(IF(ͷ��=20 AND REF(ͷ��,1)=20 AND REF(ͷ��,2)=80,30,0),H*1.01,H*1.012,15,0),LINETHICK2,COLORYELLOW;
δ������:DRAWTEXT(IF(ͷ��=20 AND REF(ͷ��,1)=20 AND REF(ͷ��,2)=80,1,0),H*1.02,'��'),LINETHICK2,COLORYELLOW;
DRAWTEXT_FIX(1,0.7,0,0,'�������:'),COLORFF6000;
DRAWTEXT_FIX(1,0.77,0,0,HYBLOCK),COLORRED;
DRAWTEXT_FIX(1,0.835,0,0,DYBLOCK),COLORYELLOW;
�ܹɱ�:=STRCAT(STRCAT('�ܹɱ�: ',CON2STR(TOTALCAPITAL/1000000,2)),'��');
��ͨ��:=STRCAT(STRCAT(' ��ͨ��: ',CON2STR(CAPITAL/1000000,2)),'��');
ȫ��ͨ:=STRCAT(' ȫ��ͨ: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2));
��ֵ:=STRCAT(STRCAT(' ��ͨ��ֵ: ',CON2STR((CAPITAL/1000000)*C,2)),'��');
��������:=STRCAT(' ��������: ',CON2STR(FINANCE(42),0));
�ɱ���ֵ:=STRCAT('�ɱ���ֵ: ',STRCAT(STRCAT(STRCAT(STRCAT(�ܹɱ�,��ͨ��),ȫ��ͨ),��ֵ),��������));
��ӯ��:=STRCAT('��ӯ��: ',CON2STR(C/FINANCE(33),2));
������:=STRCAT(' ������: ',CON2STR(C/(FINANCE(20)/FINANCE(1)),2));
���:=STRCAT(' ���: ',CON2STR(C/FINANCE(34),2));
����������:=STRCAT(' ����������: ',CON2STR(FINANCE(33)/FINANCE(34)*100,2));
���:=STRCAT(' ���: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2));
��������:=STRCAT(' �������� ',CON2STR(FINANCE(30)/FINANCE(20)*100,2));
��Ӫ������:=STRCAT(' ��Ӫ������ ',CON2STR(FINANCE(23)/FINANCE(20)*100,2));
��ǰҵ��:=STRCAT('��ǰҵ��: ',STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(��ӯ��,������),�о���),����������),ë����),��������),��Ӫ������));
X1:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;
X2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;
X3:=FINANCE(23)/FINANCE(10)*3.3;
X4:=FINANCE(19)/FINANCE(15)*0.6;
X5:=FINANCE(20)/FINANCE(15)*0.999;
Zֵ:=X1+X2+X3+X4+X5;
Ԥ��:=IF(Zֵ<1.2,'�ؾ�',IF(Zֵ>=1.2 AND Zֵ<2.6,'�ᾯ','��'));
����Ԥ��:=STRCAT('����Ԥ��: ',STRCAT(Ԥ��,STRCAT('-Zֵ: ',CON2STR(Zֵ,3))));
�����ʲ���:=STRCAT(' �����ʲ���: ',CON2STR((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19),2));
�ֽ�ծ��:=STRCAT(' �ֽ�ծ��: ',CON2STR(FINANCE(25)/FINANCE(15),3));
����ϵ��:=STRCAT('����ϵ��: ',STRCAT(STRCAT(����Ԥ��,�����ʲ���),�ֽ�ծ��));
DRAWTEXT_FIX(ISLASTBAR,0.005,0.01,0,����ϵ��),COLOR888888;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.06,0,��ǰҵ��),COLOR888888;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.115,0,�ɱ���ֵ),COLOR888888;
��:=ZIG(3,6);
��:=MA(��,2);
DRAWICON(CROSS(��,��),L-0.1,7);
DRAWICON(CROSS(��,��),H+0.1,8);
STICKLINE(��>�� AND O>=C,C,O,-1,0),COLORRED;
STICKLINE(��>�� AND O>=C,L,H,0,0),COLORRED;
STICKLINE(�� < �� AND O<=C,O,C,-1,1),COLORCYAN;
STICKLINE(�� < �� AND O<=C,O,L,0,1),COLORCYAN;
STICKLINE(�� < �� AND O<=C,C,H,0,1),COLORCYAN;
VAR11:=MA(C,25),COLORRED;
����ͨ��:IF(VAR11>REF(VAR11,1),VAR11,DRAWNULL),LINETHICK3,COLORRED;
�½�ͨ��:IF(VAR11<REF(VAR11,1),VAR11,DRAWNULL),LINETHICK3,COLORGREEN;