‹ 返回9633
🔧 核心通用·带A股选股过滤（核心可用 · 把'去ST/选板块/CODELIKE'那行删掉，美港马加都能跑）
周期：长线用途：只管进单(找买点/选股)（纯多·只做多)
📊 把公式 9633 实时算进主散博弈(纯技术函数;选股/筹码特殊函数会标注不支持)
🧩 这个指标拆开看 = 哪些"积木"组合的
★ 看主力（筹码 / 资金）筹码/成本 COST·WINNER — ★算每股持仓成本分布，判主力建仓/获利盘/控盘度——票在谁手里
① 定方向（趋势）均线类 MA/EMA — 一段时间的平均价，铺出趋势中枢、看多空排列
MACD — 快慢均线之差，测趋势动能、金叉死叉
DMA — 两条不同周期均线之差，测中线方向
② 验量能（量价）成交量/额 VOL — 量在价先——放量证实突破、缩量过滤假信号
④ 触发（信号扳机）CROSS 交叉 — 两线金叉/死叉当买卖扳机
突破/计数/过滤 — 突破前高、信号计时与去重
搭条件的零件HHV/LLV/REF 等 — 取区间最高最低、引用前N根——搭条件的零件
图上标注买卖点画线/标注 — 在图上画柱、标买卖点、上色提示（只是显示，不是判断逻辑）
⚠️ A股专属（港股/美股/马股/加密都没有）去ST/风险股 — 剔除A股ST风险股
组合思路：先盯主力筹码/资金（票在谁手里），再用均线/MACD 定方向，再用量能验证真假，再用金叉/突破当买卖扳机。把几件事叠在一起同时成立，才算一个'信号'——叠得越多看着越细，但也越容易过度拟合。 ⚠️ 这条含 A股专属逻辑（涨停板/龙虎榜/代码板块）——只有大陆A股有这制度，港股、美股、马股、加密统统没有，这部分搬不过去。 不过它的'根'在筹码/量价层——这套是普世的，港股美股马股加密都能算；尤其散户多、流通差的市场(如马股小盘、港股仙股)主力筹码更好使。和你的主散博弈/刘彩游龙同源。
指标公式
�ɺ�MACDת�ۼ�λָ�깫ʽԴ������:
input: P(19,15,100), S(7,5,140), M(9,2,80);
ZJ1:=DMA((H+L+C*2)/4,0.9); ZJ2:=V/((H-L)*2-ABS(C-O));
ZJ3:=IF(C>O,ZJ2*(H-L),IF(C<O,ZJ2*(H-O+(C-L)),V/2))+IF(C>O,0-ZJ2*(H-C+(O-L)),IF(C<O,0-ZJ2*(H-L),0-V/2));
ZJ4:=ZJ3/20/1.15; ZJ5:=ZJ4*0.55+REF(ZJ4,1)*0.33+REF(ZJ4,2)*0.22; ZJ6:=EMA(ZJ5,3);
MJ_1 := EMA(CLOSE,S) - EMA(CLOSE,P);
MJ_2 := EMA(MJ_1,M);
MJ_3 := 2*(MJ_1-MJ_2);
MJ_4:=REVERSE(MJ_3)+2*WMA(WMA(MJ_3,1),5);
MJ_5:=3*MJ_4-2*SMA(MJ_4,2,1);
�ͽ�:=CROSS(MJ_1,MJ_2) AND MJ_1<-0.1;
SA0:=COUNT(CROSS(MJ_1,MJ_2) AND MJ_2<0,21)=3;
���¶������:=CROSS(MJ_3,0) and SA0;
SA1:=COUNT(CROSS(MJ_1,MJ_2),BARSLAST(MJ_2>=0));
����:=(CROSS(MJ_1,MJ_2) AND MJ_2<0 AND COUNT(SA1=2,21)=1)*2;
SA2:=BARSLAST(REF(CROSS(MJ_1,MJ_2),1));
�ױ�:=(REF(C,SA2+1)>C AND MJ_1>REF(MJ_1,SA2+1) AND CROSS(MJ_1,MJ_2))*3;
��ȫ:=�ͽ� AND ���� AND �ױ�;
SA3:=BARSLAST(REF(CROSS(MJ_2,MJ_1),1));
����:=REF(C,SA3+1)<C AND REF(MJ_1,SA3+1)>MJ_1 AND CROSS(MJ_2,MJ_1);
M_C1:=EMA(C,5)/EMA(EMA(C,9),16)<=0.85 and c/ref(c,1)<1.05 and c/ref(c,1)>0.905 and V/CAPITAL*100<5;
M_C2:=MIN(ref(C,2)*0.865,ref(c,13)*0.772); M_C3:=(C-M_C2)/C<0.03; ����:=M_C1 and M_C3;
X:=BarsLast(Backset(ISLASTBAR,1)=1)+1;
Z_1:=REF(MJ_2,1)+((M+1)/(2*(M-1)))*REF(MJ_3,1);
Z_2:=((P-1)*(S+1)*REF(EMA(C,P),1)-(P+1)*(S-1)*REF(EMA(C,S),1)+(S+1)*(P+1)*REF(MJ_1,1))/(2*P-2*S);
Z_3:=((P-1)*(S+1)*REF(EMA(C,P),1)-(P+1)*(S-1)*REF(EMA(C,S),1)+(S+1)*(P+1)*REF(MJ_2,1))/(2*P-2*S);
Z_4:=((P-1)*(S+1)*REF(EMA(C,P),1)-(P+1)*(S-1)*REF(EMA(C,S),1)+(S+1)*(P+1)*Z_1)/(2*P-2*S);
Y_1:=(MJ_2*X+((M+1)/(2*(M-1)))*MJ_3*X);
Y_2:=((P-1)*(S+1)*EMA(C,P)*X-(P+1)*(S-1)*EMA(C,S)*X+(S+1)*(P+1)*MJ_1*X)/(2*P-2*S);
Y_3:=((P-1)*(S+1)*EMA(C,P)*X-(P+1)*(S-1)*EMA(C,S)*X+(S+1)*(P+1)*MJ_2*X)/(2*P-2*S);
Y_4:=((P-1)*(S+1)*EMA(C,P)*X-(P+1)*(S-1)*EMA(C,S)*X+(S+1)*(P+1)*Y_1)/(2*P-2*S);
FILLRGN(MJ_1>=MJ_2,MJ_1,MJ_2),Color689AFF;
FILLRGN(MJ_1<MJ_2,MJ_2,MJ_1),ColorFFC000;
FILLRGN(MJ_3>MJ_5,MJ_5,MJ_3),ColorFFB7FF;
FILLRGN(MJ_3<MJ_5,MJ_5,MJ_3),Color003E00;
STICKLINE(MJ_3<ref(MJ_3,1) and MJ_3<0,0,MJ_3,0,0),ColorFFCF78;
STICKLINE(MJ_3<ref(MJ_3,1) and MJ_3>0,0,MJ_3,0,0),COLORYELLOW;
STICKLINE(MJ_3>ref(MJ_3,1) and MJ_3<0,0,MJ_3,0,0),ColorAF00AF;
STICKLINE(MJ_3>ref(MJ_3,1) and MJ_3>0,0,MJ_3,0,0),COLORRED;
DIFF: MJ_1,PRECISION2,COLORWHITE;
DEA: MJ_2,PRECISION2,COLORYELLOW;
����:2.8*(MJ_2-MJ_1),LINETHICK,PRECISION2,COLORGREEN;
PARTLINE(RANGE(BARPOS,SYSPARAM(3)-34,SYSPARAM(3)+1),����),LINEDOT,COLORGREEN;
��ͷ: MJ_3,LINETHICK2,PRECISION2,COLORRED;
Ԥ��:MJ_5,PRECISION2,ColorFF8900,ColorFFB500;
PARTLINE(MJ_1>=REF(MJ_1,1) AND MJ_2<REF(MJ_2,1),MJ_1),LINETHICK2,COLORMAGENTA;//��
PARTLINE(MJ_1<REF(MJ_1,1) AND MJ_2>REF(MJ_2,1),MJ_1),LINETHICK2,COLORBLUE;//��
PARTLINE(1,0),LINETHICK2,COLORWHITE;//��
PARTLINE(ZJ6>=0,0),LINETHICK2,COLORRED;//��
DRAWTEXT(�ͽ�,DEA*1,'�ͽ�'),PXDN8,COLORYELLOW;
DRAWTEXT(���¶��ν��,DEA*0.95,'���¶���'),PXDN8,COLORYELLOW;
DRAWTEXT(����,DEA*0.85,'����'),PXDN8,COLORYELLOW;
DRAWTEXT(�ױ�,DEA*0.80,'�ױ�'),PXDN8,COLORYELLOW;
DRAWTEXT(��ȫ,DEA*0.75,'��ȫ'),PXDN8,COLORRED;
DRAWTEXT(����,DEA,'����'),PXUP60,ColorFF5B00;
VERTLINE(����),LINEDOT,COLORGRAY;
DRAWTEXT(����,����,' �� \n �� \n �� \n �� \n'),ALIGN,COLORYELLOW;
DRAWICON(����,MJ_1*0.96,1),ALIGN,PXDN10;//��ղ34.47 �ɹ��ʣ�83.08%
DRAWTEXTEX(sysparam(3)=BARPOS,0,6,2,'����DIFFת�ۣ� '+NUMTOSTR(Z_2,2)),COLORGREEN;
DRAWTEXTEX(sysparam(3)=BARPOS,0,6,20,'����DEAת�ۣ� '+NUMTOSTR(Z_3,2)),COLORGREEN;
DRAWTEXTEX(sysparam(3)=BARPOS,0,6,38,'����MACDת�ۣ�'+NUMTOSTR(Z_4,2)),COLORGREEN;
DRAWTEXTEX(sysparam(3)=BARPOS,0,135,2,'����DIFFת�ۣ� '+NUMTOSTR(Y_2,2)),COLORYELLOW;
DRAWTEXTEX(sysparam(3)=BARPOS,0,135,20,'����DEAת�ۣ� '+NUMTOSTR(Y_3,2)),COLORYELLOW;
DRAWTEXTEX(sysparam(3)=BARPOS,0,135,38,'����MACDת�ۣ� '+NUMTOSTR(Y_4,2)),COLORYELLOW;
����:if(capital=0,v/sum(v,100)*100,v/FINANCE(7)),PRECISION2,LINETHICK,COLORGRAY;
�ǵ���:(C-REF(C,1))/REF(C,1)*100,PRECISION2,LINETHICK,COLORGRAY;
GDT2:=FINANCE(0);//������������
XXx:=STRTONUM(STRRIGHT(NUMTOSTR(FINANCE(0),0),2));//ȡ����λ��
Nn:=IF(XXx>11 OR XXx<3,1,IF(BETWEEN(XXx,2.9,6),4,IF(BETWEEN(XXx,5.9,9),2,4/3))),LINETHICK;
��Ӯ��:C/(FINANCE(33)*Nn),PRECISION2,LINETHICK,COLORGRAY;
���:C/FINANCE(34),PRECISION2,LINETHICK,COLORGRAY;
�������� 0��һ��ʽ�� ս��ʤָ�� (Դ��) ��һ��ʽ��Ψ�Ҷ�����ͼָ�� (Դ��)��ʲô���⣿�����ǽ��������ö��������|�����Ƽ�|�������� ͨ����423ͨ���š����������ͼ/ѡ�� ���ɱض��ϴ�5 ����ǿ�ƹ� ��������ʦ��Ʒ Դ�� ��ͼ�������︱ͼ���������ָ���õ�COST��������ϲ���¡�ʹ�÷���˵�����������ж�ֱ��...�����������