‹ 返回41787
🔧 核心通用·带A股选股过滤（核心可用 · 把'去ST/选板块/CODELIKE'那行删掉，美港马加都能跑）
周期：长线用途：只管进单(找买点/选股)（纯多·只做多)
📊 把公式 41787 实时算进主散博弈(纯技术函数;选股/筹码特殊函数会标注不支持)
🧩 这个指标拆开看 = 哪些"积木"组合的
★ 看主力（筹码 / 资金）筹码/成本 COST·WINNER — ★算每股持仓成本分布，判主力建仓/获利盘/控盘度——票在谁手里
① 定方向（趋势）均线类 MA/EMA — 一段时间的平均价，铺出趋势中枢、看多空排列
MACD — 快慢均线之差，测趋势动能、金叉死叉
② 验量能（量价）成交量/额 VOL — 量在价先——放量证实突破、缩量过滤假信号
OBV 能量潮 — 涨加量跌减量，看资金净流向
③ 抓买卖点（择时摆动）KDJ 随机 — 收盘在近期高低区间的位置，抓超买超卖+金叉
动量类 MTM/ROC/TRIX — 价格惯性/变动率，测动能强弱
④ 触发（信号扳机）CROSS 交叉 — 两线金叉/死叉当买卖扳机
突破/计数/过滤 — 突破前高、信号计时与去重
搭条件的零件HHV/LLV/REF 等 — 取区间最高最低、引用前N根——搭条件的零件
图上标注买卖点画线/标注 — 在图上画柱、标买卖点、上色提示（只是显示，不是判断逻辑）
⚠️ A股专属（港股/美股/马股/加密都没有）代码/板块/题材 — 按代码段、行业、概念、龙头筛选（A股特有）
去ST/风险股 — 剔除A股ST风险股
组合思路：先盯主力筹码/资金（票在谁手里），再用均线/MACD 定方向，再用量能验证真假，再用摆动指标抓超买超卖，再用金叉/突破当买卖扳机。把几件事叠在一起同时成立，才算一个'信号'——叠得越多看着越细，但也越容易过度拟合。 ⚠️ 这条含 A股专属逻辑（涨停板/龙虎榜/代码板块）——只有大陆A股有这制度，港股、美股、马股、加密统统没有，这部分搬不过去。 不过它的'根'在筹码/量价层——这套是普世的，港股美股马股加密都能算；尤其散户多、流通差的市场(如马股小盘、港股仙股)主力筹码更好使。和你的主散博弈/刘彩游龙同源。
指标公式
DRAWGBKLAST(v>1,STRIP(RGB(0,0,205),RGB(60,179,113),0));
OBVf:=MA(SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0)/25000,1);
obve:=ema(obvf,3);
RSVd:=(obve-LLV(obve,6))/(HHV(obve,6)-LLV(obve,6))*100;
Kddd:=SMA(RSVd,2,1);
Dddd:=SMA(Kddd,2,1);
Jddd:=3*Kddd-2*Dddd;
Var1ddd:=hhv(c/ref(c,1),4)>1.05 and l>llv(c,4) and Dddd<50;
DRAWTEXT(if(cross(jddd,Dddd),50,0),-35,'obv��'),align1,COLORRED;
DRAWTEXT(if(Var1ddd and cross(Kddd,Dddd),50,0),-55,'obv�Ͳ�'),align1,COLORRED;Var1z:=(CLOSE*2+HIGH+LOW)/4*3;
Var2z:=EMA(Var1Z,13)-EMA(Var1Z,34);
Var3Z:=EMA(Var2Z,5);
Var4Z:=2*(Var2Z-Var3Z)*5.5;
����: var4Z*18,COLORred,linethick2 ;
drawtext(cross(����,0),����,'ע��');
partline(����, ����>=ref(����,1),rgb(255,0,0), ����<ref(����,1),rgb(0,250,0)),linethick3;
����:=(2*C+H+L+O)/5;
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
ƫ����:=����-BBI;
RSV:=(ƫ����-LLV(ƫ����,9))/(HHV(ƫ����,9)-LLV(ƫ����,9))*100;
K:SMA(RSV,3,1),LINETHICK1,COLORffffff;
d:SMA(K,3,1),LINETHICK1,COLORyellow;
J:3*K-2*D,LINETHICK1,COLORwhite;
����:=ref(J,1)<ref(D ,1) and J>=D;
drawicon(����,J*1,1);
����:=ref(J,1)>ref(D,1) and J<=D;
drawicon(����,D*1,6);
partline(J,J>=ref(J,1),rgb(255,0,0),J<ref(J,1),rgb(0,250,0)),linethick3;
RV:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
RG:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
varj4:=SMA(RV,3,1);
varj5:=SMA(varj4,3,1);
KK:=EMA(SMA(RG,3,1),2);
DD:=SMA(KK,3,1);
DRAWICON(cross(varj4,varj5) and varj5<30,2,7);
DRAWICON(cross(varj5,varj4) and varj5>30,97,8);
DRAWTEXT(cross(varj4,varj5) and cross(KK,DD),37,'��*��'),align1,COLORred;
jhit80:=CROSS(100,j);
DRAWTEXT(jhit80,100,'����'),align1,ColorYELLOW;
Var2:=(2*CLOSE+HIGH+LOW)/4;
Var3:=IF(YEAR>=2099 AND MONTH>2,0,1);
Var4:=LLV(LOW,5);
Var5:=HHV(HIGH,4);
ɢ��:=EMA((Var2-Var4)/(Var5-Var4)*100,4)*Var3;
ׯ��:=EMA(0.667*REF(ɢ��,1)+0.333*ɢ��,2)*Var3;
DRAWTEXT(CROSS(ɢ��,ׯ��) AND ɢ��<50 AND 29<ɢ��,-5,'�̽�'),align1,COLOR00FF00;
DRAWTEXT(CROSS(ׯ��,ɢ��) AND ɢ��>40 AND 71>ɢ��,120,'�̳�'),align1,COLOR00FFFF;
DRAWTEXT(CROSS(ɢ��,ׯ��) AND ɢ��<30,0,'����'),align1,COLOR3399CC;
DRAWTEXT(CROSS(ׯ��,ɢ��) AND ɢ��>70,90,'��'),align1,COLORFFFF33;
��K:="KDJ.K"(89,3,3);
��D:="KDJ.D"(89,3,3);
��K:="KDJ.K"(27,3,3);
��D:="KDJ.D"(27,3,3);
��K:="KD.K"(5,3,3);
��D:="KD.D"(5,3,3);
DRAWTEXT(IF(CROSS(��K,��D),50,0),20,'�ղ�'),align1,COLORFFFFFF;
DRAWTEXT(IF(CROSS(��K,��D),30,0),10,'�ܲ�'),align1,COLORRED;
DRAWTEXT(IF(CROSS(��K,��D),20,0),30,'�²�'),align1,COLORYELLOW;
RSVh:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
Kh:=SMA(RSVh,3,1);
Dh:=SMA(Kh,3,1);
A2:=BARSLAST(REF(CROSS(Kh,Dh),1));
B2:=REF(C,A2+1)>C AND REF(Kh,A2+1)<Kh AND CROSS(Kh,Dh);
KDJ�ױ���:STICKLINE(FILTER(B2>0,5),0,1,3,0),COLORYELLOW;
DRAWTEXT(FILTER(B2>0,5),-20,'KDJ�ױ�'),COLORYELLOW;
C2:=BARSLAST(REF(CROSS(Dh,Kh),1));
D2:=REF(C,C2+1)<C AND REF(Kh,C2+1)>Kh AND CROSS(Dh,Kh);
DRAWTEXT(FILTER(D2>0,5),90,'KDJ��'),COLORRED;
AAE:= WINNER(CLOSE+CLOSE*15/100)*100;
BBE:= WINNER(CLOSE+CLOSE*0/100)*100;
CCE:= AAE-BBE;
DDE:= (WINNER(CLOSE-CLOSE*0.1/100)-WINNER(CLOSE-CLOSE*15/100))*100;
EEE:= CCE<3 AND DDE<0.5 ;
AE1:= DYNAINFO(6);
AE2:= IF(LOW>AE1,0,IF(HIGH<AE1,1,(AE1-LOW+0.01)/(HIGH-LOW+0.01)));
AE3:= VOL/WINNER(LOW);
AE4:= REF(HHV(CLOSE,120),1);
AE5:= REF(LLV(CLOSE,120),1);
AE6:= 100*(CLOSE-AE5)/(AE4-AE5);
AE7:= AE2>0 OR AE2=1;
AE8:= AE7 AND AE3/REF(AE3,3)>=3 AND AE6<80;
AE9:= REF(AE8,1) OR REF(AE8,2) OR REF(AE8,3) OR REF(AE8,4);
AE10:= AE8 AND AE9;
AE11:= IF(FILTER(AE8,3),5,0);
AE12:= FILTER(IF(FILTER(AE10,3) OR EEE,10,0),3);
DRAWTEXT(AE12, -10,'���'),COLORRED;
drawtext(AE11, -20,'���'),COLORYELLOW;
ffvvz:=ref(INDEXC,1)<ref(INDEXC,2) and ref(c,2)*0.95>=ref(c,1) and ref(o,1)/ref(c,1)>=1.05
and ref(c,1)<ref(o,1) and c>o and c/o>=1.05 and c>ref(o,1)
and ref(vol,1)<ref(vol,2);
DRAWTEXT(ffvvz,-60,' #��') ,align2,colorred;
nM:=9;
m1M:=3;
m2M:=3;
RSVM:=(CLOSE-LLV(LOW,NM))/(HHV(HIGH,NM)-LLV(LOW,NM))*100;
KM:=SMA(RSVM,M1M,1);
DM:=SMA(KM,M2M,1);
JM:=3*KM-2*DM;
bbM:=MA("KDJ.J#WEEK"(9,m1M,m2M) ,5);
DRAWTEXT(IF(CROSS(JM,ref(JM,1))and bbM-ref(bbM,1)>0.2and jM<60 and bbM<50 ,50,0), LOW*0.89,'��'),COLORRED ;
DRAWTEXT(IF(CROSS(bbM,ref(bbM,1))and jM-ref(jM,1)>10 ,50,0),LOW*0.94,''),COLORRED ;
MA20:=MA(CLOSE,20);
Var1HH:=(h-l)/l*100;
Var2HH:=ref(Var1HH,1) ;
Var3HH:=ref(Var1HH,2);
Var4HH:=Var2HH-Var3HH;
var5HH:=Var2HH+Var4HH;
drawtext((c/ref(c,1)-1)>Var5HH and ma20>ref(ma20,1) and C>O,50,'����'),ALIGN1,colorred;
����:=(llv(l,3)=llv(l,60) and c/ref(c,1)>=1.04);
DRAWTEXT(����, -35,'�ﱬ'),Colorgreen;
VARui21:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
Kui2:=SMA(VARui21,3,1) ;
Dui2:=SMA(Kui2,3,1) ;
drawtext((CROSS(Kui2,Dui2) AND Dui2<10),-40,'$B'),ALIGN1,COLOR0000FF,LINETHICK2;
Varzc1:=HHV(HIGH,21);
Varzc2:=HHV(HIGH,69);
DRAWTEXT(1*(CROSS((Varzc1/MA(C,60)*0.91-0.7), (Varzc2/MA(C,60)*0.83-0.7))),50,'*��'),align1,COLORred ;
������:=REF(CLOSE,2)/REF(OPEN,2)<0.98 AND REF(OPEN,1)< REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.04 AND CLOSE/OPEN>1.03 AND CLOSE>REF(CLOSE,2) OR Var2>80 AND CAPITAL<=1500000 AND BARSCOUNT(CLOSE)>120 AND VOL/CAPITAL>0.04 AND VOL>REF(HHV(VOL,10),5)*20;
DRAWTEXT(������,40,'��@��'),ALIGn1,colorred;
����82:=REF(C,1)/REF(C,2)<=0.93 AND BETWEEN(C/REF(C,1),1.03,0.97)
and close/ref(close,8)<=0.8 and between(ref(c,2)/ref(c,3),1.04,0.96)
and between(ref(c,3)/ref(c,4),1.04,0.96);
��:=����82;
DRAWTEXT(�� ,35 , '&��'),ALIGN1,COLORred;
MTM:=C-REF(C,1);
DXc:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
DRAWTEXT(filter(IF(LLV(DXc,2)=LLV(DXc,7) AND COUNT(DXc<0,2) AND CROSS(DXc,MA(DXc,2)),1,0)=1,5),-25,'�ﵨ'),COLORRED;
�������:=EMA(WINNER(CLOSE)*70,3);
ɢ�����:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*70,3);
��������:=ɢ�����-�������;
�ܹɱ�:=FINANCE2( 35);
VAR1YY:=HHV(HIGH,9)-LLV(LOW,9);
VAR2YY:=HHV(HIGH,9)-CLOSE;
VAR3YY:=CLOSE-LLV(LOW,9);
VAR4YY:=VAR2YY/VAR1YY*100-70;
VAR5YY:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VAR6YY:=(2*CLOSE+HIGH+LOW)/4;
VAR7YY:=SMA(VAR3YY/VAR1YY*100,3,1);
VAR8YY:=LLV(LOW,34);
VAR9YY:=SMA(VAR7YY,3,1)-SMA(VAR4YY,9,1);
VARAYY:=IF(VAR9YY>100,VAR9YY-100,0);
VARBYY:=HHV(HIGH,34);
AAYY:= VARAYY*2;
BBYY:= EMA((VAR6YY-VAR8YY)/(VARBYY-VAR8YY)*100,13);
VARCYY:=EMA(0.667*REF(BBYY,1)+0.333*BBYY,2);
CCYY:= SMA(VAR5YY,20,1);
VARDYY:=SMA(AAYY,2,1)-AAYY;
VAREYY:=EMA(0.667*REF(BBYY,1)+0.333*BBYY,2)-BBYY;
VAR1A:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
VAR2A:=SMA(VAR1A,9,1)+100;
VAR3A:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR4A:=SMA(VAR3A,3,1);
VAR5A:=SMA(VAR4A,3,1)+100;
VAR6A:=VAR5A-VAR2A;
�ͳ�:=IF(VAR6A>N2,VAR6A-N2,0);
��ׯ��:=IF(VAR6A>N1,VAR6A-N1,0);
����:=IF(CROSS(�ͳ�,0.01),8,0);
DRAWTEXT(����,15,'����'),ALIGN1,ColorWHITE;
��:=CROSS(�������,��������);
DRAWTEXT(��,25,'��'),ALIGN1,ColorWHITE;
�ܲ�:=CROSS(�������,ɢ�����);
DRAWTEXT(�ܲ�,35,'�ܲ�'),ALIGN1,ColorWHITE;
��������:=CROSS(0,��������);
DRAWTEXT(��������,45,'����'),ALIGN1,ColorWHITE;
DRAWICON(��������>0,0,7),LAYER0,ALIGN1;
��������:=EMA(WINNER(CLOSE)*70,10);
ɢ������:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,10);
��ʼ�߿�:=CROSS(��������,ɢ������);
DRAWTEXT(��ʼ�߿�,55,'�߿�'),ALIGN1,ColorWHITE;
RSVjj:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100);
Kjj:=SMA(RSVjj,3,1);
Djj:=SMA(Kjj,3,1);
Jjj:=((3 * Kjj) - (2 * Djj));
VAR2jj:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);
VAR3jj:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);
VAR4jj:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);
VAR5jj:=(((VAR2jj + (2 * VAR3jj)) + (3 * VAR4jj)) / 6);
VAR6jj:=MA(VAR5jj,3);
�ײ�1jj:=IF(VAR6jj ,20,0);
DRAWTEXT((CROSS(Jjj,Kjj) AND (�ײ�1jj >= 20)),58,'ȫ#��'),align1,colorwhite;
VAR6d:="KDJ.J#WEEK"(9,3,3);
VAR8d:="KDJ.J#MONTH"(9,3,3);
VAR6dd:="KDJ.J#WEEK"(5,3,3);
VAR8dd:="KDJ.J#MONTH"(5,3,3);
DEA7d:="MACD.DEA#WEEK";
DIFF7d:="MACD.DIFF#WEEK";
d7d:=DIFF7d-DEA7d;
DEA8d:="MACD.DEA#MONTH";
DIFF8d:="MACD.DIFF#MONTH";
d8d:=DIFF8d-DEA8d;
��������:cross(var6d,0) AND D8d>0 OR cross(var8d,0) and d7d>0;
DRAWTEXT(cross(var6d,0) AND D8d>0 OR cross(var8d,0) and d7d>0, 78,'�����1'),ALIGN1,COLORyellow;
DRAWTEXT(cross(var6dd,0) AND D8d>0 OR cross(var8dd,0) and d7d>0, 88,'������2'),ALIGN1,COLORyellow;
ima5:=ema(c,6);
ima10:=ema(c,13);
imv5:=ema(v,5);
imv10:=ema(v,13);
ik:="kdj.k"(9,3,3);
id:="kdj.d"(9,3,3);
iDIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
iDEA:=EMA(iDIF,9);
imacd1:=idif>ref(idif,1) and idea>=ref(idea,1) and idif>idea;
iv1:=ima5>ref(ima5,1) and ima10>ref(ima10,1) and c>ref(c,1) and c/o>1.01;
ivv1:=imv5>ref(imv5,1) and imv10>=ref(imv10,1) and v>ref(v,1)*1.2 ;
ikd1:=ik>ref(ik,1) and id>=ref(id,1);
iva:=count(cross(ik,id),4)>=1 and count(cross(ima5,ima10),4)>=1 and
count(cross(imv5,imv10),4)>=1 and count(cross(idif,idea),4)>=1;
drawtext(iv1 and ivv1 and ikd1 and imacd1 and iva,90,'�Ľ��'),align1,
colorwhite;
TR1 := SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(C