‹ 返回14101
🔧 核心通用·带A股选股过滤（核心可用 · 把'去ST/选板块/CODELIKE'那行删掉，美港马加都能跑）
周期：长线用途：只管进单(找买点/选股)（纯多·只做多)
📊 把公式 14101 实时算进主散博弈(纯技术函数;选股/筹码特殊函数会标注不支持)
🧩 这个指标拆开看 = 哪些"积木"组合的
★ 看主力（筹码 / 资金）筹码/成本 COST·WINNER — ★算每股持仓成本分布，判主力建仓/获利盘/控盘度——票在谁手里
① 定方向（趋势）均线类 MA/EMA — 一段时间的平均价，铺出趋势中枢、看多空排列
波动通道BOLL/标准差 — 均线±标准差通道，测波动与超买超卖
④ 触发（信号扳机）突破/计数/过滤 — 突破前高、信号计时与去重
搭条件的零件HHV/LLV/REF 等 — 取区间最高最低、引用前N根——搭条件的零件
图上标注买卖点画线/标注 — 在图上画柱、标买卖点、上色提示（只是显示，不是判断逻辑）
⚠️ A股专属（港股/美股/马股/加密都没有）去ST/风险股 — 剔除A股ST风险股
组合思路：先盯主力筹码/资金（票在谁手里），再用均线/MACD 定方向，再用通道测波动边界，再用金叉/突破当买卖扳机。把几件事叠在一起同时成立，才算一个'信号'——叠得越多看着越细，但也越容易过度拟合。 ⚠️ 这条含 A股专属逻辑（涨停板/龙虎榜/代码板块）——只有大陆A股有这制度，港股、美股、马股、加密统统没有，这部分搬不过去。 不过它的'根'在筹码/量价层——这套是普世的，港股美股马股加密都能算；尤其散户多、流通差的市场(如马股小盘、港股仙股)主力筹码更好使。和你的主散博弈/刘彩游龙同源。
指标公式
���:=60;�յ�:=10;�л�:=5;
DRAWGBKLAST(1,STRIP(RGB(30,80,220),RGB(130,80,180),1));
nx:=CURRBARSCOUNT+1;
wz:=CURRBARSCOUNT+1=1;
wx:=CURRBARSCOUNT+1=���;
wt:=BARSLAST(wx);
wxz:=IF(wt>=0,1,DRAWNULL);
QH:=IF(nx>=�յ� AND nx<=���,H,DRAWNULL);
QL:=IF(nx>=�յ� AND nx<=���,L,DRAWNULL);
XZ:=IF(nx>=�յ�,1,DRAWNULL);
//�ָ����
ZH:=HHV(QH,0);
ZL:=LLV(QL,0);
HXT:=(ZH-ZL);
J1:=ZH-HXT*0.241;
J2:=ZH-HXT*0.382;
J3:=ZH-HXT*0.613;
J4:=ZH-HXT*0.786;
JXT:=(ZH-ZL)/8;
H1:=ZH-JXT*1;
H2:=ZH-JXT*2;
H3:=ZH-JXT*3;
H4:=ZH-JXT*5;
H5:=ZH-JXT*6;
H6:=ZH-JXT*7;
BXT:=(ZH-ZL)/10;
B1:=ZH-BXT*1;
B2:=ZH-BXT*2;
B3:=ZH-BXT*3;
B4:=ZH-BXT*4;
B5:=ZH-BXT*6;
B6:=ZH-BXT*7;
B7:=ZH-BXT*8;
B8:=ZH-BXT*9;
//��Ʊk��
STICKLINE(OPEN,CLOSE ,OPEN,9,0 ),COLOR000000;
STICKLINE(OPEN>CLOSE ,CLOSE ,OPEN,8,0 ),COLOR007700;
STICKLINE(OPEN>CLOSE ,CLOSE ,OPEN,7,0 ),COLOR009900;
STICKLINE(OPEN>CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00bb00;
STICKLINE(OPEN>CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00dd00;
STICKLINE(OPEN>CLOSE ,HIGH,LOW,1.5 ,0 ),COLOR00ff00;
STICKLINE(CLOSE>=OPEN ,CLOSE,OPEN,8,0) ,COLOR000077;
STICKLINE(CLOSE>=OPEN ,CLOSE,OPEN,7,0) ,COLOR000099;
STICKLINE(CLOSE>=OPEN ,CLOSE,OPEN,5,0) ,COLOR0000bb;
STICKLINE(CLOSE>=OPEN ,CLOSE,OPEN,3,0) ,COLOR0000dd;
STICKLINE(CLOSE>=OPEN ,HIGH,LOW,1.5,0 ),COLOR0000FF;
STICKLINE(HIGH=LOW AND CLOSE>REF(CLOSE,1),HIGH-0.01,HIGH+0.01,8,0 ),COLOR0000FF;
STICKLINE(HIGH=LOW AND CLOSE<REF(CLOSE,1),HIGH-0.01,HIGH+0.01,8,0 ),COLOR00FF00;
//�ָ���ʾ
IF �л�>=1 AND �л�<=3 THEN BEGIN
VERLINE(nx=�յ� OR nx=���,2),COLOR009fff;
x1:=IF(�л�=1,J1,IF(�л�=2,H1,IF(�л�=3,B1,DRAWNULL)));
x2:=IF(�л�=1,J2,IF(�л�=2,H2,IF(�л�=3,B2,DRAWNULL)));
x3:=IF(�л�=1,J3,IF(�л�=2,H3,IF(�л�=3,B3,DRAWNULL)));
x4:=IF(�л�=1,J4,IF(�л�=2,H4,IF(�л�=3,B4,DRAWNULL)));
��:BACKSET(IF(wz,ZH,DRAWNULL),���-1)*wxz,COLORff88ff,LINETHICK2;
��:BACKSET(IF(wz,ZL,DRAWNULL),���-1)*wxz,COLORff88ff,LINETHICK2;
��:BACKSET(IF(wz,(ZH+ZL)/2,DRAWNULL),���-1)*wxz,COLORff88ff;
��1:BACKSET(IF(wz,X1,DRAWNULL),���-1)*wxz,COLORffff00;
��2:BACKSET(IF(wz,X2,DRAWNULL),���-1)*wxz,COLORffff00;
��3:BACKSET(IF(wz,X3,DRAWNULL),���-1)*wxz,COLORffff00;
��4:BACKSET(IF(wz,X4,DRAWNULL),���-1)*wxz,COLORffff00;
END;
IF �л�=2 OR �л�=3 THEN BEGIN
x5:=IF(�л�=2,H5,B5);
x6:=IF(�л�=2,H6,B6);
��5:BACKSET(IF(wz,X5,DRAWNULL),���-1)*wxz,COLORffff00;
��6:BACKSET(IF(wz,X6,DRAWNULL),���-1)*wxz,COLORffff00;
END;
IF �л�=3 THEN BEGIN
x7:=B7;
x8:=B8;
��7:BACKSET(IF(wz,X7,NULL),���-1)*wxz,COLORffff00;
��8:BACKSET(IF(wz,X8,NULL),���-1)*wxz,COLORffff00;
END;
//�ָ���ʾ
DRAWTEXT(wz,��,'`'+TOSTRING(��,2)+'(��)'),COLORff88ff;
DRAWTEXT(wz,��,'`'+TOSTRING(��,2)+'(��)'),COLORff88ff;
DRAWTEXT(wz,��,'`'+TOSTRING(��,2)+'(��)'),COLORff88ff;
DRAWTEXT(wz,��1,'`'+TOSTRING(��1,2)+'(��1)'),COLORffffff;
DRAWTEXT(wz,��2,'`'+TOSTRING(��2,2)+'(��2)'),COLORffffff;
DRAWTEXT(wz,��3,'`'+TOSTRING(��3,2)+'(��3)'),COLORffffff;
DRAWTEXT(wz,��4,'`'+TOSTRING(��4,2)+'(��4)'),COLORffffff;
DRAWTEXT(wz,��5,'`'+TOSTRING(��5,2)+'(��5)'),COLORffffff;
DRAWTEXT(wz,��6,'`'+TOSTRING(��6,2)+'(��6)'),COLORffffff;
DRAWTEXT(wz,��7,'`'+TOSTRING(��7,2)+'(��7)'),COLORffffff;
DRAWTEXT(wz,��8,'`'+TOSTRING(��8,2)+'(��8)'),COLORffffff;
IF �л�=4 THEN BEGIN
AA5:MA(C,5),colorffffff;
AA10:MA(C,10),color00ffff;
AA20:MA(C,20),color009fff;
AA30:MA(C,30),colorffff00;
AA60:MA(C,60),color0000ff;
AA120:MA(C,120),color00ff00;
AA250:MA(C,250),colorff00ff;
zdx:=MAX(AA5,AA10,AA20,AA30,AA60,AA120,AA250);
ZXx:=MIN(AA5,AA10,AA20,AA30,AA60,AA120,AA250);
nhd:=(zdx/ZXx-1)*100;
���:=(AA5+AA10+AA20+AA30+AA60+AA120+AA250)/7;
PARTLINE(���,1,RGB(255,100,255),1,RGB(255,100,255)),LINETHICK2;
DRAWTEXT(CURRBARSCOUNT+1=1,��λ��,'``��λ��:'+TOSTRING(��λ��,2)+'`\n``ճ�϶�:'+TOSTRING(nhd,2)+'%'),colorff88ff;
END;
IF �л�=5 THEN BEGIN
BOLL:MA(CLOSE,20),COLORcccccc;//��������--�������--�����
PARTLINE(BOLL,BOLL>BOLL[1],RGB(255,0,0),BOLL<=BOLL[1],RGB(0,255,255));
UB:BOLL+2*STD(CLOSE,20),COLORff88ff;
LB:BOLL-2*STD(CLOSE,20),COLOR00FFff;
DRAWTEXT(CURRBARSCOUNT+1=1,BOLL,'``�й�ֵ:'+TOSTRING(BOLL,2)+'`\n``���¹��:'+TOSTRING((UB/LB-1)*100,2)+'%'),colorff88ff;
END;
DRAWTEXT_FIX(CURRBARSCOUNT=1,1/100,0,0,'��Ʊ�������������ָ�ͼ�� ��ǰ��'+IF(�л�=1,'[�ƽ�ָ�]',IF(�л�=2,'[�����ָ�]',
IF(�л�=3,'[�ٷֱ�]',IF(�л�=4,'[ƽ����]','������'))))),color00ffff;
�������� 0��һ��ʽ�� ������ Դ�� ��һ��ʽ���������� Դ����ʲô���⣿�����ǽ��������ö��������|�����Ƽ�|�������� ͨ����423ͨ���š����������ͼ/ѡ�� ���ɱض��ϴ�5 ����ǿ�ƹ� ��������ʦ��Ʒ Դ�� ��ͼ�������︱ͼ���������ָ���õ�COST��������ϲ���¡�ʹ�÷���˵�����������ж�ֱ��...�����������