‹ 返回50764
🔧 核心通用·带A股选股过滤（核心可用 · 把'去ST/选板块/CODELIKE'那行删掉，美港马加都能跑）
周期：中线用途：只管进单(找买点/选股)（纯多·只做多)
📊 把公式 50764 实时算进主散博弈(纯技术函数;选股/筹码特殊函数会标注不支持)
🧩 这个指标拆开看 = 哪些"积木"组合的
★ 看主力（筹码 / 资金）筹码/成本 COST·WINNER — ★算每股持仓成本分布，判主力建仓/获利盘/控盘度——票在谁手里
① 定方向（趋势）均线类 MA/EMA — 一段时间的平均价，铺出趋势中枢、看多空排列
MACD — 快慢均线之差，测趋势动能、金叉死叉
DMA — 两条不同周期均线之差，测中线方向
② 验量能（量价）成交量/额 VOL — 量在价先——放量证实突破、缩量过滤假信号
③ 抓买卖点（择时摆动）KDJ 随机 — 收盘在近期高低区间的位置，抓超买超卖+金叉
RSI — 涨跌力量强弱，超买超卖与背离
WR 威廉 — 反向超买超卖
CCI — 价偏离均值的强弱，±100 进出
④ 触发（信号扳机）CROSS 交叉 — 两线金叉/死叉当买卖扳机
突破/计数/过滤 — 突破前高、信号计时与去重
搭条件的零件HHV/LLV/REF 等 — 取区间最高最低、引用前N根——搭条件的零件
图上标注买卖点画线/标注 — 在图上画柱、标买卖点、上色提示（只是显示，不是判断逻辑）
⚠️ A股专属（港股/美股/马股/加密都没有）代码/板块/题材 — 按代码段、行业、概念、龙头筛选（A股特有）
去ST/风险股 — 剔除A股ST风险股
组合思路：先盯主力筹码/资金（票在谁手里），再用均线/MACD 定方向，再用量能验证真假，再用摆动指标抓超买超卖，再用金叉/突破当买卖扳机。把几件事叠在一起同时成立，才算一个'信号'——叠得越多看着越细，但也越容易过度拟合。 ⚠️ 这条含 A股专属逻辑（涨停板/龙虎榜/代码板块）——只有大陆A股有这制度，港股、美股、马股、加密统统没有，这部分搬不过去。 不过它的'根'在筹码/量价层——这套是普世的，港股美股马股加密都能算；尤其散户多、流通差的市场(如马股小盘、港股仙股)主力筹码更好使。和你的主散博弈/刘彩游龙同源。
指标公式
W:=10;
W2:=6;
W3:=1;
N1:=60;
100,COLORBLACK;
80,COLORBLACK;
VOLUME:=VOL,VOLSTICK;
MAVOL1:=MA(VOLUME,5);
MAVOL2:=MA(VOLUME,10);
SSTS:=BARSSINCE(C>0);
N4:=IF(SSTS<N1,SSTS,N1);
MAV200:=EMA(VOL,N4);
QD1:=IF(MAVOL1>=MAVOL2,10,0);
PJJ:=DMA((HIGH+LOW+CLOSE*2)/4,0.9);
JJ:=REF(EMA(PJJ,3),1);
QJJ:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
XVL:=IF(CLOSE>OPEN,QJJ*(HIGH-LOW),IF(CLOSE<OPEN,QJJ*(HIGH-OPEN+CLOSE-LOW),VOL/2))+IF
(CLOSE>OPEN,0-QJJ*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-QJJ*(HIGH-LOW),0-VOL/2));
HSL:=(XVL/20)/1.15;
��������:=((HSL*0.55+(REF(HSL,1)*0.33))+(REF(HSL,2)*0.22));
GJJ:=EMA(��������,8);
LLJX:=EMA(��������,3);
�ʽ�����:=LLJX,LINETHICK0,COLOR0000FF;
A10:=�ʽ�����>0;
QD2:=IF(�ʽ�����>=0,10,0);
DIF60:=EMA(CLOSE,12/2)-EMA(CLOSE,26/2);
DEA60:=EMA(DIF60,9/2);
QD3:=IF(DIF60>=DEA60,10,0);
RSV60:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36));
K60:=SMA(RSV60,3,1);
D60:=SMA(K60,3,1);
QD4:=IF(K60>= D60,10,0);
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
QD5:=IF(DIF>=DEA,10,0);
��MD:=MACD.DIF#WEEK;
��MA:=MACD.DEA#WEEK;
QD6:=IF(��MD>=��MA,10,0);
��MD:=MACD.DIF#MONTH;
��MA:=MACD.DEA#MONTH;
QD7:=IF(��MD>=��MA,10,0);
RSV:=(CLOSE-LLV(LOW,12))/(HHV(HIGH,12)-LLV(LOW,12));
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
QD8:=IF(K>=D,10,0);
��K:=MA("KDJ.K#WEEK"(9,3,3) ,5);
��D:=MA("KDJ.D#WEEK"(9,3,3) ,5);
��J:=MA("KDJ.J#WEEK"(9,3,3) ,5);
QD9:=IF(��K>=��D,10,0);
QD10:=IF(��K>=��D,10,0);
QD11:=IF(��J>=REF(��J,1),10,0);
DRAWICON(��K>=REF(��K,1) AND DIF60>=DEA60,85,25);
��K:="KDJ.K#MONTH" ;
��D:="KDJ.D#MONTH" ;
QD12:=IF(��K>=��D,10,0);
��RSI1:="RSI.RSI1#DAY"(9);
��RSI2:="RSI.RSI2#DAY"(9);
QD13:=IF(��RSI1>=��RSI2,10,0);
��RSI1:="RSI.RSI1#WEEK"(9);
��RSI2:="RSI.RSI2#WEEK"(9);
QD14:=IF(��RSI1>=��RSI2,10,0);
��RSI1:="RSI.RSI1#MONTH"(9);
��RSI2:="RSI.RSI1#MONTH"(9);
QD15:=IF(��RSI1>=��RSI2,10,0);
XH1:=IF(DIF60>=DEA60,1,0);
XH2:=IF(K60>= D60,1,0);
XH3:=IF(DIF>=DEA,1,0);
XH4:=IF(��MD>=��MA,1,0);
XH5:=IF(��MD>=��MA,1,0);
XH6:=IF(K>=D,1,0);
XH7:=IF(��K>=REF(��K,1),1,0);
XH8:=IF(��J>=REF(��J,1),1,0);
XH9:=IF(��K>=��D,1,0);
XH10:=IF(MAVOL1>MAVOL2,1,0);
XH11:=IF(�ʽ�����>0,1,0);
XH12:=IF(��RSI1>=��RSI2,1,0);
XH13:=IF(��RSI1>=��RSI2,1,0);
XH14:=IF(��RSI1>=��RSI2,1,0);
XH15:=IF(��K>=��D,1,0);
ZTB:=COUNT(C/REF(C,1)>=1.09,5)>=1;
XHHJ:XH1+XH2+XH3+XH4+XH6+XH7+XH8+XH5+XH9+XH10+XH11+XH12+XH13+XH14+XH15,NODRAW;
STICKLINE(XHHJ<8 ,0,XHHJ*5,2,0),COLORLIGREEN;
STICKLINE(XHHJ>=8 AND XHHJ<10,0,XHHJ*5,2,0),COLORLIRED;
STICKLINE(XHHJ>=10 ,0,XHHJ*5,2,0),COLORYELLOW;
������:=EMA(100*(C-LLV(L,34))/(HHV(H,34)-LLV(L,34)),3),LINETHICK0;
RSI:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100,LINETHICK0;
RSV1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,LINETHICK0;
K1:=SMA(RSV1,3,1);
D1:=SMA(K1,3,1);
J1:=3*K1-2*D1,LINETHICK0;
����WR:=(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14))*100,LINETHICK0;
TYP := (HIGH + LOW + CLOSE)/3;
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)),LINETHICK0;
��ָA:WMA((������+RSI+J-����WR+CCI)/5,5);
��ָB:WMA((������+RSI+J-����WR+CCI)/5,13);
WMA((������+RSI+J-����WR+CCI)/5,5),COLOR00FF00,LINETHICK3;
IF(��ָA>REF(��ָA,1),��ָA,DRAWNULL),COLOR0000FF,LINETHICK3;
KC:=FORCAST(((2*C+H+L)/4*0.618+C*0.382),3);
AAX:=(KC-MA(KC,9))/MA(KC,9)*100;
VAR0:=MIN(EXIST(KC,55),9);
AAX1:=EMA(AAX,VAR0)*VAR0;
AAX2:=MA(AAX1,3);
AAX3:=MA(AAX1,5);
��:=AAX3>3 AND AAX1<REF(AAX1,1) AND CROSS(AAX2,AAX1);
VBA:=FILTER(��,5);
DRAWTEXT(VBA,��ָA*1.08,'�����'),COLORYELLOW;
DRAWICON(FILTER(VBA=1,3),��ָA,2),COLORFFFF00;
DRAWTEXT(CROSS(REF(��ָA,1),��ָA) AND ��ָB<REF(��ָB,1) AND ��ָA>-20 ,��ָA*1,'��ղ�'),COLORFFFF00;
VB2:=EMA(EMA(C-REF(C,1),6),6)/EMA(EMA(ABS(C-REF(C,1)),6),6)*100;
VB3:=IF(LLV(VB2,3)=LLV(VB2,11) AND COUNT(VB2<0,2) AND CROSS(VB2,MA(VB2,2)),1,0);
VB4:=FILTER(VB3=1,5);
DRAWTEXT(VB4,��ָA*1,'�ｨ��'),COLORD9D919;
DRAWTEXT(CROSS(��ָA,��ָB),��ָA*1,'��Ӳ�'),COLORYELLOW;
DRAWICON(FILTER(VB4=1,3),��ָA,1),COLORFFFF00;
���0:=(H-L)/REF(C,1)*100;
���:���0,NODRAW,COLORRED;
�������̹�:FINANCE(7)>=8000000000,COLORRED,NODRAW;
���̹�:FINANCE(7)<8000000000 AND FINANCE(7)>=800000000,COLORYELLOW,NODRAW;
���̹�:FINANCE(7)<800000000 AND FINANCE(7)>=400000000,COLORGREEN,NODRAW;
С�̹�:FINANCE(7)<400000000,COLORWHITE,NODRAW;
������:FINANCE(7)<1000000000 AND DYNAINFO(39)>0 AND DYNAINFO(39)<=28,COLOR9933FF,NODRAW;
����:WINNER(C)*100,COLORLIBLUE,LINETHICK2,NODRAW;
STICKLINE(����<=5,-50,-48,2,0),COLORBLUE;
STICKLINE(����>=5 AND ����<10,-50,-46,2,0),COLORLIBLUE;
STICKLINE(����>=10 AND ����<20,-50,-44,2,0),COLORLIGREEN;
STICKLINE(����>=20 AND ����<50,-50,-42,2,0),COLORWHITE;
STICKLINE(����>=50 AND ����<80,-50,-40,2,0),COLORLIRED;
STICKLINE(����>=80 AND ����<90,-50,-38,2,0),COLORRED;
STICKLINE(����>=90 AND ����<=100,-50,-36,2,0),COLORYELLOW;
XHHJ1:=XH2+XH6+XH9+XH15;
XHHJ2:=XH3+XH4+XH5+XH1;
XHHJ3:=XH12+XH13+XH14+XH2;
XG1:=(XHHJ1=4) ;
XG2:=(XHHJ2= 4) ;
XG3:=(XHHJ3= 4) ;
DRAWTEXT(XG1,-18,'K');DRAWTEXT(XG2,-25,'M');DRAWTEXT(XG3,-32,'R');
DRAWICON(CROSS(XHHJ1,3) OR CROSS(XHHJ2,3),94,23);
DRAWTEXT(VOL>=MAV200*2 AND VOL<MAV200*3,96 ,'2');
DRAWTEXT(VOL>=MAV200*3 AND VOL<MAV200*4,96 ,'3');
DRAWTEXT(VOL>=MAV200*4 AND VOL<MAV200*5,96 ,'4');
DRAWTEXT(VOL>=MAV200*5 AND VOL<MAV200*6,96 ,'5');
DRAWTEXT(VOL>=MAV200*6 AND VOL<MAV200*7,96 ,'6');
DRAWTEXT(VOL>=MAV200*7 AND VOL<MAV200*8,96,'7');
DRAWTEXT(VOL>=MAV200*8 AND VOL<MAV200*9,96,'8');
DRAWTEXT(VOL>=MAV200*9 AND VOL<MAV200*10,96,'9');
DRAWTEXT(VOL>=MAV200*10,96,'10');
����: DYNAINFO(17),NODRAW;