‹ 返回5887
🔧 核心通用·带A股选股过滤（核心可用 · 把'去ST/选板块/CODELIKE'那行删掉，美港马加都能跑）
周期：长线用途：只管进单(找买点/选股)（纯多·只做多)
📊 把公式 5887 实时算进主散博弈(纯技术函数;选股/筹码特殊函数会标注不支持)
🧩 这个指标拆开看 = 哪些"积木"组合的
★ 看主力（筹码 / 资金）筹码/成本 COST·WINNER — ★算每股持仓成本分布，判主力建仓/获利盘/控盘度——票在谁手里
主力资金 — ★测大单/主力资金进出方向
① 定方向（趋势）均线类 MA/EMA — 一段时间的平均价，铺出趋势中枢、看多空排列
② 验量能（量价）成交量/额 VOL — 量在价先——放量证实突破、缩量过滤假信号
④ 触发（信号扳机）CROSS 交叉 — 两线金叉/死叉当买卖扳机
突破/计数/过滤 — 突破前高、信号计时与去重
搭条件的零件HHV/LLV/REF 等 — 取区间最高最低、引用前N根——搭条件的零件
图上标注买卖点画线/标注 — 在图上画柱、标买卖点、上色提示（只是显示，不是判断逻辑）
⚠️ A股专属（港股/美股/马股/加密都没有）代码/板块/题材 — 按代码段、行业、概念、龙头筛选（A股特有）
去ST/风险股 — 剔除A股ST风险股
组合思路：先盯主力筹码/资金（票在谁手里），再用均线/MACD 定方向，再用量能验证真假，再用金叉/突破当买卖扳机。把几件事叠在一起同时成立，才算一个'信号'——叠得越多看着越细，但也越容易过度拟合。 ⚠️ 这条含 A股专属逻辑（涨停板/龙虎榜/代码板块）——只有大陆A股有这制度，港股、美股、马股、加密统统没有，这部分搬不过去。 不过它的'根'在筹码/量价层——这套是普世的，港股美股马股加密都能算；尤其散户多、流通差的市场(如马股小盘、港股仙股)主力筹码更好使。和你的主散博弈/刘彩游龙同源。
指标公式
��ɫ����ͼ ������
INPUT:M(10,1,30,1);
ֹӯ��:(MA(CLOSE,M) * 1.15),Color0000FF;
��ˮ��:(MA(CLOSE,M) * 1),COLORWHITE;
ֹ����:(MA(CLOSE,M) * 0.85),Color00FF80;
�ܹɱ�:=FINANCE2(35) ;
��ͨ��:=FINANCE2(37);
����A��:=FINANCE2(41);
ÿ������:=FINANCE2(3);
��ӯ��:=DYNAINFO(39);
ÿ�ɹ�����:=FINANCE2(7);
�������:=BKNAME;
DRAWTEXTABS(12,14, '������飺 '+�������),COLORYELLOW;
DRAWTEXTABS(12,27,'ÿ�����棺 '+NUMTOSTRN(ÿ������,3)+'Ԫ ����������'+FINANCE2(10)+'% ��ӯ�ʣ�'+NUMTOSTRN(��ӯ��,1)+'�� '+' ÿ�ɹ�����'+NUMTOSTRN(ÿ�ɹ�����,2)+'Ԫ'),COLORYELLOW;
DRAWTEXTABS(12,40,'�� �� ���� '+NUMTOSTRN(�ܹɱ�,2)+'���'+' ��ͨA�ɣ�'+NUMTOSTRN(��ͨ��,2)+'���'+' ����A�ɣ�'+NUMTOSTRN(����A��,2)+'���'),COLORYELLOW;
x9:FORCAST(c,9),Colorwhite,LINETHICK2;
llx:=llv(FORCAST(c,9),2);
DRAWGBKLAST(DYNAINFO(3)<DYNAINFO(7),STRIP(RGB(0,150,0),RGB(150,0,0),1));
DRAWGBKLAST(DYNAINFO(3)>DYNAINFO(7),STRIP(RGB(150,0,0),RGB(0,150,0),1));
DRAWTEXTREL(550,900,STKLABEL+' '+STKNAME+' '+DYNAINFO(7)+'Ԫ'+' '+DYNAINFO(14)*100+'%'),LINETHICK4,COLORFFFF00;
PARTLINE(x9,x9=llx,rgb(255,205,0),x9<>llx,rgb(255,0,0)),linethick4;
STICKLINE(c>=o and o<>0,HIGH,LOW,0.5,0),color0000CD;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,8,0),color070084;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,7,0),color0000A3;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,6,0),color0000B7;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,5,0),color0000CD;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,4,0),color0000E9;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,2,0),color0754E9;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,0.5,0),Color68B8FF;
STICKLINE(c<o and o<>0,HIGH,LOW,0.5,0),colorFFBE00;
STICKLINE(CLOSE<OPEN and OPEN<>0,HIGH,LOW,0.5,0),colorFFBE00;
STICKLINE(CLOSE<OPEN and OPEN<>0,CLOSE,OPEN,8,0),ColorCA6500;
STICKLINE(CLOSE<OPEN and OPEN<>0,CLOSE,OPEN,7,0),ColorE17100;
STICKLINE(CLOSE<OPEN and OPEN<>0,CLOSE,OPEN,6,0),ColorF27900;
STICKLINE(CLOSE<OPEN and OPEN<>0,CLOSE,OPEN,5,0),ColorFF850B;
STICKLINE(CLOSE<OPEN and OPEN<>0,CLOSE,OPEN,4,0),ColorFF9326;
STICKLINE(CLOSE<OPEN and OPEN<>0,CLOSE,OPEN,2,0),ColorFFA851;
STICKLINE(CLOSE<OPEN and OPEN<>0,CLOSE,OPEN,0.5,0),colorFFFF00;
DRAWGBK(c,'7' );
Var3:=LLV(H,240);
Var4:=100*(C-Var3)/Var3;
Var5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;
Var6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;
Var8:=MA(HHV(C-REF(C,1),0),34)/MA(ABS(C-REF(C,1)),7)*100;
Var9:=MA(HHV(C-REF(C,1),0),13)/MA(ABS(C-REF(C,1)),13)*100;
VarA:=BARSCOUNT(C);
VarB:=Var8<20 AND Var9<23 AND VarA>35;
VarC:=VarB AND COUNT(VarB,1)=1;
VarD:=EMA(C,21)-EMA(C,8);
VarE:=EMA(VarD,5);
VarF:=TROUGH(3,6,1)<4 AND CROSS(VarD,VarE);
Var10:=IF(TROUGH(3,16,1)=0 AND H>L+0.04,4,0);
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);
Var12:=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);
Var13:=ZIG(3,22)>REF(ZIG(3,22),1)AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2)AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
Var14:=ZIG(3,22)<REF(ZIG(3,22),1)AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2)AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
Var15:=ZIG(3,51)>REF(ZIG(3,51),1)AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
Var16:=ZIG(3,51)<REF(ZIG(3,51),1)AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2)AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
Var17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2)AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
Var18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2)AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
Var19:=EMA(C,2)-EMA(C,150);
Var1A:=EMA(Var19,100);
Var1B:=2*(Var19-Var1A);
Var1C:=POW(Var1B,3)*0.1+POW(Var1B,1);
Var1D:=SQRT(SQRT(L*H*O*C));
Var1E:=EMA(Var1D*0.97,3);
Var1F:=(H+L+C)/3;
Var20:=(Var1F-MA(Var1F,14))/(0.015*AVEDEV(Var1F,14));
Var21:=CROSS(Var1E,L);
���1:=Var10;
���2:=(Var11+Var13+Var15+Var17);
����1:=(Var12+Var14+Var16+Var18);
Var22:=���1 AND VarF AND VarC AND Var21 AND Var4<0AND Var5=0 AND Var6=0 AND Var20<(-110);
DRAWTEXT(���1>0,L-0.15,'B'),LINETHICK4,ALIGN1,colorred;
DRAWTEXT(���2>0,L-0.25,'��'),LINETHICK4,ALIGN1,COLOR00FFFF;
DRAWTEXT(����1>0,H+0.95,'��'),LINETHICK4,ALIGN1,COLOR33FF33;
a:="LTFunc6@FORLT2";
s1:="LTFunc6@LT_S1";
hs:="LTFunc6@LT_HS";
ls:="LTFunc6@LT_LS";
p1:="LTFunc6@LT_P1";
upp:="LTFunc6@LT_UPP";
udd:="LTFunc6@LT_UDD";
;
d1:=ema(abs("ddx.ddx"),60);
d2:=max("ddx.ddx"/d1+7.5,7.5);
d3:=min("ddx.ddx"/d1,10);
fb:=if(s1=0,hs,ls);
tr0:=ifs(p1=1,'�������̼�<'+numtostrn(udd,2)+',����“��”��\n','���������̼�>'+numtostrn(upp,2)+',����“��”��\n');
tr1:=ifs(s1=1,'�������̼�<'+numtostrn(ls,2)+',������������','���������̼�>'+numtostrn(hs,2)+'�����������');
tr2:=ifs(p1=1,ifs(cross(p1,0),'“��”��','�ֹ�'),ifs(cross(1,p1),'“��”��','�ֱ�'));
tr3:=ifs(s1=0,'����,','����,');
tr4:='3.��������:'+numtostrn(d3,1)+'��';
c1:=INTPART(cyc(5)*100*0.96)/100;
p2:=intpart(ref(cyc(5),1)*100)/100;
p3:=intpart(ref(cyc(5),1)*0.96*100)/100;
vv:=intpart(min(capital*0.05,ref(ma(vol,34),1))/100);
p40:=intpart(maxcyc*100)/100;
p41:=intpart(ref(MAXCYC,1)*100)/100;
p4:=p1=0 and c>p2 or (ref(vol/100,1)<vv and c>intpart(p2*0.98*100)/100 and vol>min(capital*0.05,ref(ma(vol,34),1)));
p5:=p1=1 and c<min(p3,p41);
p1:=if(p4=1,1,if(p5=1,0,ref(p1,1)));
DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c>0.1,c,'�ֱ�');
DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c<=0.1 and ref(vol/100,1)<vv,c,'�������̼۳���'+str(c1)+';�����̼۳���'+str(intpart(c1*0.98*100)/100)+'�ҳɽ�������'+str(vv)+'����');
DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c<=0.1 and ref(vol/100,1)>=vv,c,'�������̼۳���'+str(c1)+'����');
DRAWFLAGTEXT(p1=1 and (c-min(c1,p40))/min(c1,p40)>0.1 ,c,'�ֹ�');
DRAWFLAGTEXT(p1=1 and (c-min(c1,p40))/min(c1,p40)<=0.1 ,c,'�������̼۵���'+str(min(c1,p40))+'����');
bs:='<*t=0092F7*><*c=FFFFFF*><*p=95*>'+datestr(date)+'���������ϵͳ��ʾ\n'+'<*t=E7FFFF*><*c=000000*><*p=95*>'+'1.BS��:'+tr2+','+tr0+'<*t=E7FFFF*><*c=000000*><*p=95*>'+'2.����:'+tr3+tr1+'\n'+'<*t=E7FFFF*><*c=000000*><*p=95*>'+tr4;
drawflagtext(1,fb,bs);
DRAWTEXTREL(15,0,'��ɫ��'),COLORYELLOW;
�������� 0��һ��ʽ�� ��Խ����(��ͼ Դ�� ����� ������ʾ) ��һ��ʽ����ӪF10��Ҳ�ƣ�F10���� ���ǻ۰汾��ʽ����ͼ Դ�룩��ʲô���⣿�����ǽ��������ö��������|�����Ƽ�|�������� ͨ����423ͨ���š����������ͼ/ѡ�� ���ɱض��ϴ�5 ����ǿ�ƹ� ��������ʦ��Ʒ Դ�� ��ͼ�������︱ͼ���������ָ���õ�COST��������ϲ���¡�ʹ�÷���˵�����������ж�ֱ��...�����������