‹ 返回6840
🔧 核心通用·带A股选股过滤（核心可用 · 把'去ST/选板块/CODELIKE'那行删掉，美港马加都能跑）
周期：中线用途：只管进单(找买点/选股)🔻 明确含做空逻辑
📊 把公式 6840 实时算进主散博弈(纯技术函数;选股/筹码特殊函数会标注不支持)
🧩 这个指标拆开看 = 哪些"积木"组合的
★ 看主力（筹码 / 资金）筹码/成本 COST·WINNER — ★算每股持仓成本分布，判主力建仓/获利盘/控盘度——票在谁手里
① 定方向（趋势）均线类 MA/EMA — 一段时间的平均价，铺出趋势中枢、看多空排列
MACD — 快慢均线之差，测趋势动能、金叉死叉
② 验量能（量价）成交量/额 VOL — 量在价先——放量证实突破、缩量过滤假信号
③ 抓买卖点（择时摆动）KDJ 随机 — 收盘在近期高低区间的位置，抓超买超卖+金叉
④ 触发（信号扳机）CROSS 交叉 — 两线金叉/死叉当买卖扳机
突破/计数/过滤 — 突破前高、信号计时与去重
搭条件的零件HHV/LLV/REF 等 — 取区间最高最低、引用前N根——搭条件的零件
图上标注买卖点画线/标注 — 在图上画柱、标买卖点、上色提示（只是显示，不是判断逻辑）
⚠️ A股专属（港股/美股/马股/加密都没有）去ST/风险股 — 剔除A股ST风险股
组合思路：先盯主力筹码/资金（票在谁手里），再用均线/MACD 定方向，再用量能验证真假，再用摆动指标抓超买超卖，再用金叉/突破当买卖扳机。把几件事叠在一起同时成立，才算一个'信号'——叠得越多看着越细，但也越容易过度拟合。 ⚠️ 这条含 A股专属逻辑（涨停板/龙虎榜/代码板块）——只有大陆A股有这制度，港股、美股、马股、加密统统没有，这部分搬不过去。 不过它的'根'在筹码/量价层——这套是普世的，港股美股马股加密都能算；尤其散户多、流通差的市场(如马股小盘、港股仙股)主力筹码更好使。和你的主散博弈/刘彩游龙同源。
指标公式
�������
DIF:EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);
DEA:EMA(DIF,M),COLORBLUE,LINETHICK3;
MACD:2*(DIF-DEA),COLORSTICK;
A4:=BARSLAST(ref(cross(dif,dea),1));
B1:=ref(c,A4+1)>c and ref(dif,A4+1)<dif and cross(dif,dea);
DRAWTEXT(FILTER(B1>0,5),dif+0.2,'����'),COLORyellow;
����:STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,2,0),COLORRED;
����:STICKLINE(MACD>=0 AND MACD< REF(MACD,1),0,MACD,2,0),COLORff9900;
����:STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,2,0),COLORYELLOW;
Ѱ��:STICKLINE(MACD<0 AND MACD< REF(MACD,1),0,MACD,2,0),COLORFFFF00;
�ղ�:0,COLORWHITE;
if(dif<0,dif,0),coloryellow,linethick1;
if(dif<0,0,dif),colorred,linethick1;
if(dif<dea,dif,dea),COLORWHITE,linethick1;
if(dif>dea,dea,dea),COLORgreen,linethick1;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
�ܣ�:=MA("KDJ.K#WEEK"(9,3,3) ,5);
�ܣ�:=MA("KDJ.D#WEEK"(9,3,3) ,5);
�ܣ�:=MA("KDJ.J#WEEK"(9,3,3) ,5);
DRAWICON(k<20 and cross(k,d),MACD,1),align2;
�ܽ�:DRAWTEXT(CROSS("KDJ.K#WEEK"(9,3,3),"KDJ.D#WEEK"(9,3,3)) ,MACD,'��'),align2,COLORred;
����:DRAWTEXT(CROSS("KDJ.d#WEEK"(9,3,3),"KDJ.k#WEEK"(9,3,3)) ,macd*1.5,'��'),align2,COLORgreen;
�½�:DRAWTEXT(CROSS("KDJ.K#MONTH"(9,3,3),"KDJ.D#MONTH"(9,3,3)) ,MACD,'��'),align2,COLORMAGENTA;
����:DRAWTEXT(CROSS("KDJ.D#MONTH"(9,3,3),"KDJ.K#MONTH"(9,3,3)) ,macd*1.5,'��'),align2,COLORYELLOW;
VAR1C:=(HIGH - MIN(OPEN,CLOSE));
VAR2C:=(CLOSE - OPEN);
VAR3C:=(MIN(OPEN,CLOSE) - LOW);
VAR4C:=(HIGH - LOW);
VAR5C:=((VOL * VAR1C) / VAR4C);
VAR6C:=((VOL * VAR2C) / VAR4C);
VAR7C:=((VOL * VAR3C) / VAR4C);
VAR8C:=((VAR5C - VAR6C) - VAR7C);
VAR4:=MA(CLOSE,5);
VAR5:=MA(CLOSE,10);
VAR6:=MA(CLOSE,30);
VAR7:=MA(CLOSE,60);
VAR8:=EMA(COST(85),7);
VAR9:=EMA(COST(15),7);
VARA:=(SUM(((CLOSE * VOL) * 10),4) / SUM((VOL * 200),4));
VARB:=(INTPART((VARA * 10)) / 10);
VARC:=(SUM(((CLOSE * VOL) * 10),7) / SUM((VOL * 200),7));
VARD:=(INTPART((VARC * 10)) / 10);
VARE:=(SUM(((CLOSE * VOL) * 10),28) / SUM((VOL * 200),28));
VARF:=(INTPART((VARE * 10)) / 10);
��������:(EMA(CLOSE,5) - EMA(CLOSE,10)),COLORMAGENTA,LINETHICK2;
��������:EMA(��������,9),COLORMAGENTA,LINETHICK3;
VAR10:=((0 - ((10 * (HHV(CLOSE,5) - CLOSE)) / (HHV(CLOSE,5) - LLV(LOW,5)))) + 10);
VAR11:=((0 - ((10 * (HHV(CLOSE,10) - CLOSE)) / (HHV(CLOSE,10) - LLV(LOW,10)))) + 10);
VAR12:=((0 - ((10 * (HHV(CLOSE,20) - CLOSE)) / (HHV(CLOSE,20) - LLV(LOW,20)))) + 10);
VAR13:=((0 - ((10 * (HHV(CLOSE,30) - CLOSE)) / (HHV(CLOSE,30) - LLV(LOW,30)))) + 10);
VAR14:=REF(��������,1);
VAR15:=��������;
VAR16:=(VAR15 - VAR14);
VAR17:=REF(��������,1);
VAR18:=��������;
VAR19:=(VAR18 - VAR17);
VAR1A:=OPEN;
VAR1B:=CLOSE;
ׯ������:IF((((((((VAR1A <= VAR4) AND (VAR1A <= VAR5)) AND (VAR1A <= VAR6)) AND (VAR1B >= VAR4)) AND (VAR1B >= VARF)) AND (VAR16 > 0)) AND (VAR19 > 0)),0.5,0),LINETHICK2,COLOR66FF00;
����ָ��:IF(((((CROSS(��������,��������) AND (�������� < 0)) AND (�������� < (0 - 0.2))) AND (VAR11 > 45)) AND (VAR16 > 0)),0.3,0.1),COLOR66FF00; �������� 0��һ��ʽ�� ������ͼ ��һ��ʽ������̫������ͼ Դ�룩��ʲô���⣿�����ǽ��������ö��������|�����Ƽ�|�������� ͨ����423ͨ���š����������ͼ/ѡ�� ���ɱض��ϴ�5 ����ǿ�ƹ� ��������ʦ��Ʒ Դ�� ��ͼ�������︱ͼ���������ָ���õ�COST��������ϲ���¡�ʹ�÷���˵�����������ж�ֱ��...�����������