‹ 返回13224
🔧 核心通用·带A股选股过滤(核心可用 · 把'去ST/选板块/CODELIKE'那行删掉,美港马加都能跑)
周期:长线用途:只管进单(找买点/选股)(纯多·只做多)
📊 把公式 13224 实时算进主散博弈(纯技术函数;选股/筹码特殊函数会标注不支持)
🧩 这个指标拆开看 = 哪些"积木"组合的
★ 看主力(筹码 / 资金)筹码/成本 COST·WINNER — ★算每股持仓成本分布,判主力建仓/获利盘/控盘度——票在谁手里
① 定方向(趋势)均线类 MA/EMA — 一段时间的平均价,铺出趋势中枢、看多空排列
MACD — 快慢均线之差,测趋势动能、金叉死叉
② 验量能(量价)成交量/额 VOL — 量在价先——放量证实突破、缩量过滤假信号
④ 触发(信号扳机)CROSS 交叉 — 两线金叉/死叉当买卖扳机
突破/计数/过滤 — 突破前高、信号计时与去重
搭条件的零件HHV/LLV/REF 等 — 取区间最高最低、引用前N根——搭条件的零件
图上标注买卖点画线/标注 — 在图上画柱、标买卖点、上色提示(只是显示,不是判断逻辑)
⚠️ A股专属(港股/美股/马股/加密都没有)去ST/风险股 — 剔除A股ST风险股
组合思路:先盯主力筹码/资金(票在谁手里),再用均线/MACD 定方向,再用量能验证真假,再用金叉/突破当买卖扳机。把几件事叠在一起同时成立,才算一个'信号'——叠得越多看着越细,但也越容易过度拟合。 ⚠️ 这条含 A股专属逻辑(涨停板/龙虎榜/代码板块)——只有大陆A股有这制度,港股、美股、马股、加密统统没有,这部分搬不过去。 不过它的'根'在筹码/量价层——这套是普世的,港股美股马股加密都能算;尤其散户多、流通差的市场(如马股小盘、港股仙股)主力筹码更好使。和你的主散博弈/刘彩游龙同源。
指标公式
S:=2;
A:=BARSCOUNT(C);
AH:=HHV(HIGH,120);
AL:=LLV(LOW,120);
B0:=(AH-AL)/40;
B1:=HIGH+B0;
B2:=LOW-B0;
AMV0:=((VOL * (((OPEN + CLOSE) + HIGH) + LOW)) / 4);
��:=(EMA(AMV0,21) / EMA(VOL,21));
N1:=BARSCOUNT(5) ;
N:=((N1 - CURRBARSCOUNT ) + 1);
HH:=HHV(HIGH,N);
LL:=LLV(LOW,N);
���:=HHV(N1,1),POINTDOT;
���:=LLV(N1,1),COLOR00FFFF;
DIFF:=(EMA(CLOSE,5) - EMA(CLOSE,26));
DEA:=EMA(DIFF,3);
MACD:=(2 * (DIFF - DEA));
MA5:=MA(CLOSE,5);
MA20:=MA(CLOSE,20);
MA120:=MA(CLOSE,120);
AA10:=MA(CLOSE,10);
Y:=((LLV(LOW,1) = LLV(LOW,60)) AND ((CLOSE / REF(CLOSE,1)) > 1.04));
WX:=MA(CLOSE,0);
MB5:=(MA(CLOSE,15) * IF((20 < 5),WX,1));
MB7:=(MA(CLOSE,20) * IF((20 < 7),WX,1));
M5:=(MA(CLOSE,15) * IF((20 < 5),WX,1));
DDD:=(EMA(CLOSE,10) - EMA(CLOSE,100));
AMA:=EMA(DDD,4);
BMA:=(EMA(CLOSE,3) - EMA(CLOSE,30));
BMB:=EMA(BMA,4);
BMA1:=(EMA(CLOSE,13) - EMA(CLOSE,30));
SS:=(MA(CLOSE,8) * 0.998),COLORFFFFFF;
��:=(DDD >= AMA AND BMA >= BMB);
HH1:=FILTER(((DDD >= AMA) AND (BMA >= BMB)),33);
VARR1:=((SMA(MAX((CLOSE - REF(CLOSE,1)),0),12,1) / SMA(ABS((CLOSE - REF(CLOSE,1))),12,1)) * 100);
VAR1:=REF(CLOSE,1);
VAR2:=((SMA(MAX((CLOSE - VAR1),0),12,1) / SMA(ABS((CLOSE - VAR1)),12,1)) * 100);
�����״�:=(CROSS(80,VAR2) * 1);
������:=((3 * SMA((((CLOSE - LLV(LOW,28)) / (HHV(HIGH,28) - LLV(LOW,28))) * 100),5,1)) - (2 * SMA(SMA((((CLOSE - LLV(LOW,27)) / (HHV(HIGH,27) - LLV(LOW,27))) * 100),5,1),3,1)));
����������:=(((CLOSE - MA(CLOSE,13)) / MA(CLOSE,13)) * 100);
VARA:=EMA(((AMOUNT / VOL) / 100),3);
D:=LLV(CLOSE,20);
XXY:=EMA(VARA,88);
XXD:=(XXY * 0.74);
DRAWTEXT(FILTER(((((((���ڹ����� < 6) AND (OPEN <= D)) AND (LOW <= XXD)) AND ((CLOSE / OPEN) > 1.03)) AND (CLOSE > REF(CLOSE,1))) AND ((CLOSE / LOW) > 1.03)),5),(LOW - (LOW * 0.09)),'��'),COLORFF00FF;
����:=((((HIGH + LOW) + OPEN) + CLOSE) / 4);
B:=((2 * EMA(LLV(����,88),5)) - ����);
����:=((3 * B) - (2 * SMA(B,5,1))),COLORFF0033,LINETHICK1;
Y2:=DRAWTEXT(CROSS(CLOSE,����),L*0.97,'�� '),COLORFF00FF;
�Ƶ����:=IF(Y2,L*0.97-0.01,DRAWNULL),CIRCLEDOT,COLOR00FFFF,LINETHICK2;
�����:=((C-REF(MA(C,55),1))/6+MA(C,55))*1.004;
�������:=CROSS(C,�����) AND �����>REF(�����,1);
���:STICKLINE(�������,H,L,0,0),COLORMAGENTA,LINETHICK2;
STICKLINE(�������,O,C,3,0),COLORMAGENTA,LINETHICK2;
KS:=(C-MA(C,33))/MA(C,33)*(-200);
RKS:=REF(KS,1);
FT:=RKS/KS>=1.23 AND RKS>=8 AND C/REF(C,1)>=1.03;
����:STICKLINE(FT,H,L,0,1),COLORMAGENTA,LINETHICK2;
STICKLINE(FT,O,C,3,0),COLORYELLOW,LINETHICK2;
K1:=BACKSET(SS>=REF(SS,1),2),COLORFFFFCC,LINETHICK1;
���߳���:=IF(K1,SS, DRAWNULL),COLORWHITE,LINETHICK2;
K2:=BACKSET(SS<=REF(SS,1),2);
��:=IF(K2,SS, DRAWNULL),COLORGREEN,LINETHICK2;
������:IF(��,���߳���*0.988,DRAWNULL),POINTDOT,COLORRED,LINETHICK5;
VAR10:=MA(C,80)-MA(C,10)/3;
VAR11:=REF(C,1);
VAR12:=SMA(MAX(C-VAR11,0),18,1)/SMA(ABS(C-VAR11),18,1)*100;
��1:=REF(HHV(H,10),20);
��1:=REF(LLV(L,10),20);
H1:=��1-(��1-��1)*0.191;
H2:=��1-(��1-��1)*0.382;
H3:=��1-(��1-��1)*0.5;
H4:=��1-(��1-��1)*0.618;
H5:=��1-(��1-��1)*0.809;
��:=REFDATE(��1,DATE),COLORWHITE;
����:REFDATE(H1,DATE),COLORGRAY,LINETHICK3;
DRAWTEXT(ISLASTBAR,����,'----����'),COLORYELLOW,LINETHICK4;
��:=REFDATE(H2,DATE),COLOR33FF33,POINTDOT;
��:=REFDATE(H3,DATE),COLORLIGRAY;
��:=REFDATE(H4,DATE),COLORRED;
ˮƽ��:REFDATE(H5,DATE),COLORGRAY,LINETHICK2;
DRAWTEXT(ISLASTBAR,ˮƽ��,'ˮƽ��'),COLORYELLOW,LINETHICK4;
��:=REFDATE(��1,DATE),COLORYELLOW,POINTDOT;
DRAWTEXT( C=C AND CURRBARSCOUNT=50,����+0.02,'����'),COLORYELLOW;
DRAWTEXT( C=C AND CURRBARSCOUNT=20,ˮƽ��-0.02,' ˮƽ��'),COLORFFFFCC;
KSS:=(C-MA(C,33))/MA(C,33)*(-200);
RKSS:=REF(KSS,1);
VAR101:=MA(C,80)-MA(C,10)/3;
VAR111:=REF(C,1);
VAR122:=SMA(MAX(C-VAR111,0),18,1)/SMA(ABS(C-VAR111),18,1)*100;
DRAWTEXT(CROSS(79,VAR122),H*1.04,' ��↓'),COLOR33FF33;
;
Y1:=(H+L)/2;
AO:=MA(Y1 ,5 )-MA(Y ,34 );
DU0:=CROSS(AO,0);
UD0:=CROSS(0,AO);
TDU0:=BARSLAST(DU0);
TUD0:=BARSLAST(UD0);
DU3:=REF(DU0,1);
UD3:=REF(UD0,1);
TDU3:=BARSLAST(DU3);
TUD3:=BARSLAST(UD3);
������:IF(TDU3<TUD3,REF(HHV(H,2),TDU3),REF(LLV(L,2),TUD3)),COLORYELLOW;
DRAWTEXT(ISLASTBAR,������,'������'),COLORYELLOW;
����:REFDATE(REF(HHV(H,22),1),DATE),COLORGRAY,LINETHICK4;
DRAWTEXT(ISLASTBAR,����,'----------����'),COLORRED,LINETHICK4;
��:REFDATE(REF(LLV(L,22),1),DATE),COLORGRAY,LINETHICK4;
DRAWTEXT(ISLASTBAR,��,'��'),COLORRED,LINETHICK4;
AA17:=EMA(C,14)COLORWHITE,LINETHICK1;
A17X:=(AA17-REF(AA17,1))/REF(AA17,1)*100,NODRAW;
�������:IF(A17X>=0,REF(EMA(C,14),BARSLAST(CROSS(A17X,0))+1),DRAWNULL)COLORRED,LINETHICK1;
DRAWTEXT(ISLASTBAR,�������,'�������'),COLORRED,LINETHICK1;
DMLJ:=HHV(H,120);
E:=(H+L+O+2*C)/5;
CRTP:=E+(H-L);
CRZL:=2*E-L;
CRZC:=2*E-H;
CRFZ:=E-(H-L);
CRXL:=(E+CRTP+CRZL+CRZC+CRFZ)/5;
��:=CONST(CRTP),COLORRED;
��:=CONST(CRZL),COLORC7C9FF;
֧:=CONST(CRZC),COLOR7C9CFF;
��:=CONST(CRFZ),COLORDD00DD;
����:=CONST(CRXL);
��ѹ:DRAWLINE(S>1&&CURRBARSCOUNT=5+1,��,ISLASTBAR,��,1),COLOR0000FF;
����1:DRAWLINE(S>1&&CURRBARSCOUNT=5+1,��,ISLASTBAR,��,1),COLOR0099FF;
֧��:DRAWLINE(S>1&&CURRBARSCOUNT=5+1,֧,ISLASTBAR,֧,1),COLORGREEN;
��ת��:DRAWLINE(S>1&&CURRBARSCOUNT=5+1,��,ISLASTBAR,��,1),COLORDD00DD;
����������:DRAWLINE(S>1&&CURRBARSCOUNT=5+1,����,ISLASTBAR,����,1),COLORFFFFFF;
DRAWTEXT(ISLASTBAR,��,' �� ת��'),LINETHICK1,COLORDD00DD;
DRAWTEXT(ISLASTBAR,֧,' ֧ ��'),LINETHICK1,COLOR00FF00;
DRAWTEXT(ISLASTBAR,��,' �� ��1'),LINETHICK1,COLOR0099FF;
DRAWTEXT(ISLASTBAR,��,' �� ѹ'),LINETHICK1,COLOR0000FF;
T1:=CONST(LLVBARS(LOW,10));
T1HIGH:=CONST(REF(HIGH,T1));
CC:=CONST(CURRBARSCOUNT);
T2:=CONST(BARSLAST(CURRBARSCOUNT>CC+T1 AND H>T1HIGH));
T2HIGH:=CONST(REF(HIGH,T2));
T3:=CONST(BARSLAST(CURRBARSCOUNT>CC+T2 AND HIGH>T2HIGH));
T3HIGH:=CONST(REF(HIGH,T3));
�Ի���:DRAWLINE(CURRBARSCOUNT=T3+1, T3HIGH, ISLASTBAR, T3HIGH, 1),COLORGRAY,LINETHICK1;
DRAWTEXT(ISLASTBAR, T3HIGH, '------------������')LINETHICK1,COLORYELLOW;
IF(S=1, CRTP,DRAWNULL),COLORRED;
IF(S=1, CRZL,DRAWNULL),COLORC7C9FF;
IF(S=1, CRZC,DRAWNULL),COLOR7C9CFF;
IF(S=1, CRFZ,DRAWNULL),COLORDD00DD;
IF(S=1, CRXL,DRAWNULL),COLORFFDDFF;
��12:=EXPMA(CLOSE,12),COLORGRAY,LINETHICK2;
��33:EXPMA(CLOSE,33),COLORFF00FF,LINETHICK4;
IF(��33<REF(��33,1),��33,DRAWNULL),COLOR00FF00,LINETHICK3;
�������� 0��һ��ʽ�� ��ʽ��������ͼָ�� (Դ��) ��һ��ʽ���ɽ���������ָ�� (Դ��)��ʲô���⣿�����ǽ��������ö��������|�����Ƽ�|�������� ͨ����423ͨ���š����������ͼ/ѡ�� ���ɱض��ϴ�5 ����ǿ�ƹ� ��������ʦ��Ʒ Դ�� ��ͼ�������︱ͼ���������ָ���õ�COST��������ϲ���¡�ʹ�÷���˵�����������ж�ֱ��...�����������