‹ 返回

47873

47873 | 查看原文 ↗
🔧 核心通用·带A股选股过滤(核心可用 · 把'去ST/选板块/CODELIKE'那行删掉,美港马加都能跑)
周期:长线用途:只管进单(找买点/选股)(纯多·只做多)
📊 把公式 47873 实时算进主散博弈(纯技术函数;选股/筹码特殊函数会标注不支持) 
🧩 这个指标拆开看 = 哪些"积木"组合的
★ 看主力(筹码 / 资金)
筹码/成本 COST·WINNER — ★算每股持仓成本分布,判主力建仓/获利盘/控盘度——票在谁手里
主力资金 — ★测大单/主力资金进出方向
① 定方向(趋势)
均线类 MA/EMA — 一段时间的平均价,铺出趋势中枢、看多空排列
DMA — 两条不同周期均线之差,测中线方向
② 验量能(量价)
成交量/额 VOL — 量在价先——放量证实突破、缩量过滤假信号
搭条件的零件
HHV/LLV/REF 等 — 取区间最高最低、引用前N根——搭条件的零件
图上标注买卖点
画线/标注 — 在图上画柱、标买卖点、上色提示(只是显示,不是判断逻辑)
⚠️ A股专属(港股/美股/马股/加密都没有)
代码/板块/题材 — 按代码段、行业、概念、龙头筛选(A股特有)
去ST/风险股 — 剔除A股ST风险股
组合思路:先盯主力筹码/资金(票在谁手里),再用均线/MACD 定方向,再用量能验证真假。把几件事叠在一起同时成立,才算一个'信号'——叠得越多看着越细,但也越容易过度拟合。 ⚠️ 这条含 A股专属逻辑(涨停板/龙虎榜/代码板块)——只有大陆A股有这制度,港股、美股、马股、加密统统没有,这部分搬不过去。 不过它的'根'在筹码/量价层——这套是普世的,港股美股马股加密都能算;尤其散户多、流通差的市场(如马股小盘、港股仙股)主力筹码更好使。和你的主散博弈/刘彩游龙同源。

指标公式

VOLUME:VOL,VOLSTICK;
Ԥ��:=IF(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT,MAX(VOL,DYNAINFO(17)*REF(MA(VOL,5),1)),0),NODRAW;
TT:=IF(ISLASTBAR,Ԥ��/VOL,1),NODRAW;
����:=HSCOL,NODRAW,COLOR00FF00;
MA5��:SUM(HSCOL,5),NODRAW,COLOR00FFFF;
�»�:SUM(HSCOL,20),NODRAW,COLORFFFF80;
V��:VOL/REF(VOL,1),NODRAW,COLORFFFF80;
JJQ:=(HIGH+LOW+CLOSE)/3;QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
QJ1:=QJ0*(MIN(OPEN,CLOSE)-LOW);
QJ2:=QJ0*(JJQ-MIN(CLOSE,OPEN));
QJ3:=QJ0*(HIGH-MAX(OPEN,CLOSE));
QJ4:=QJ0*(MAX(CLOSE,OPEN)-JJQ);
ǧ��DDX:IF(HIGH=LOW,4*QJ0,((QJ1+QJ2)-(QJ3+QJ4)))/SUM(VOL,10)*100,NODRAW,COLOR80FF00;
ZFA:=(C/REF(C,1)-1)*100;
ZFB1:=(C/O-1)*100;
ZF:MAX(ZFA,ZFB1),NODRAW,COLOR00FFFF;
VARA2:=LLV(MA(LOW,3),3);
VARA3:=HHV(MA(HIGH,3),3);
NN1:=120;
HH:=HHV(V*TT,NN1);
LL:=LLV(V,NN1);
���:=CONST(HH);
���:=CONST(LL);
RCC:=���*0.9-(���-���)*0.5;
RHL:=RCC;
HLMAX:=���;
HLMIN:=���;
HLMN1:=(HLMAX+HLMIN)/2;
HLMN2:=HLMAX-HLMIN;
HLMN3:=(100-0)/2*1.3;
HLMN4:=(100-0)/1*1.3;
P:=���/120;
��:=2*SMA(V*((C+L)/2+(H+C)/2+L)/3,2,1)/SMA(V,2,1)-(3*HHV(SMA(V*((C+L)/2+(H+C)/2+L)/3,2,1)/SMA(V,2,1),2)-2*SMA(V*((C+L)/2+(H+C)/2+L)/3,2,1)/SMA(V,2,1));
��:=(2*��+EMA((2*(C+L)/2+(H+C)/2+L+O)/5,2)+2*((EMA((C*2+H+L+O)/5,5)+MA((C*2+H+L+O)/5,13)+MA((C*2+H+L+O)/5,21))/3)+((EMA
((C*2+H+L+O)/5,13)+MA((C*2+H+L+O)/5,21)+MA((C*2+H+L+O)/5,34))/3)+((EMA((C*2+H+L+O)/5,21)+MA((C*2+H+L+O)/5,34)+MA((C*2+H+L+O)/5,55))/3))/7; 
����:=(FORCAST(HHV((C+L)/2,1),21)+(EMA(((C+L)/2+L+(H+C)/2)/3,55)-(C-EMA(((C+L)/2+L+(H+C)/2)/3,55))))/2;
��������:=(((C+L)/2+(H+C)/2+L)/3+(3*(C+H+L+(O+C+L)/3)/4-2*(C+L)/2))/2;
ǿ:=(EMA((����+3*((EMA(��������,5)*5+����)/6+((EMA(��,5)+EMA(��,8)+EMA(��,13))/3))/2)/4,3)/3),POINTDOT,COLOR00FFFF;
��֤:=((((C+L)/2-LLV(L,24))/(HHV((H+C)/2,24)-LLV(L,24))*1.1*(C+L)/2)); 
������֤:=EMA((2*(5*((EMA((2*C+L)/3,2)-EMA((2*C+H)/3,5))
-EMA((EMA((2*C+L)/3,2)-EMA((2*C+H)/3,5)),21)))
+(((C*2+H)/3+(C*2+H)/3)/2)+EMA(��֤,2))/4,2),COLOR555555;
��:=TT;
��V:=TT;
T:=IF(ISLASTBAR,IF(FROMOPEN>60,IF(FROMOPEN-INTPART(FROMOPEN/60)*60=0,1,
60/(FROMOPEN-INTPART(FROMOPEN/60)*60)),60/FROMOPEN),1);
WJ:=(H+L+C)/3;
V1:=IF(H=L,1,H-MAX(O,C));
V2:=IF(H=L,1,MAX(C,O)-WJ);
V3:=IF(H=L,1,MIN(O,C)-L);
V4:=IF(H=L,1,WJ-MIN(C,O));
V5:=VOL/IF(H=L,4,H-L);
V6:=(V1*V5);
V7:=(V2*V5);
V8:=(V3*V5);
V9:=(V4*V5);
����1:=DYNAINFO(23)*��;
����1:=DYNAINFO(22)*��;
����2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));
����2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));
����A:=IF(ISLASTBAR AND PERIOD=5 AND C<300,����1,����2);
����A:=IF(ISLASTBAR AND PERIOD=5 AND C<300,����1,����2);
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
����:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL /2)),POINTDOT,COLORRED;
����:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL /2)),LINETHICK0,COLORGREEN;
����:����-����,NODRAW,COLOR4080FF;VOL,VOLSTICK;
ZLCM1:=EMA(WINNER(CLOSE)*70,3);
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);
ZZLKP:=ZLCM1/(ZLCM1+SHCM);
ZZLJJ:=EMA(ZZLKP,89);
DD1:=EMA((O+H+L)/3,4)COLORWHITE,NODRAW;
DD2:=EMA(C+(H-L)*0.618,3)COLORYELLOW,NODRAW;
����1:=DD2+(DD2-DD1)*0.618,NODRAW,COLORWHITE;
����2:=EMA((O+H+L)/3,4)+((H+L)/2-REF((O+H+L)/3,3))/4,NODRAW;
����3:=MA(REF(����1,1),1)*1,COLORLIMAGENTA,NODRAW;
����4:=REF(����2,1),COLORLIMAGENTA,NODRAW;
����5:=MA(REF(DD2,1),1)*1,COLORLIMAGENTA,NODRAW;
����6:=REF(DD1,1),COLORLIMAGENTA,NODRAW;
STICKLINE(1,HLMAX,HLMAX*0.96,5,0),COLORGREEN;
�����:STICKLINE(����1>����3,HLMAX,HLMAX*0.96,5,0),COLORRED;
STICKLINE(1,HLMAX*0.98,HLMAX*0.98,5,0),COLORWHITE;
STICKLINE(1,HLMAX*0.93,HLMAX*0.89,5,0),COLORRED;
�̵���:STICKLINE(����2<=����4,HLMAX*0.93,HLMAX*0.89,5,0),COLORGREEN;
STICKLINE(1,HLMAX*0.91,HLMAX*0.91,5,0),COLORWHITE;
������1:STICKLINE(����1>(����3) AND C>����2 OR ����2>����4,HLMAX*0.82,HLMAX*0.86,5,0),COLORRED;
������2:STICKLINE(C>����2 AND ����1>����3,HLMAX*0.82,HLMAX*0.86,5,0),COLORMAGENTA;
������3:STICKLINE(����1<����3 AND ����2>����4,HLMAX*0.82,HLMAX*0.86,5,0),COLORYELLOW;
STICKLINE(����1>(����3) AND C>����2 OR ����2>����4 OR C>����2 AND ����1>����3,HLMAX*0.84,HLMAX*0.84,5,0),COLORWHITE;
IF(ZZLJJ<REF(ZZLJJ,1),-35*P,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK1;
IF(ZZLJJ>REF(ZZLJJ,1),-35*P,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK1;
IF(������֤<ǿ,-5*P,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK1;
IF(������֤>=ǿ,-5*P,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK1;
IF(������֤>= REF(������֤,1),-11*P,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK1;
IF(������֤< REF(������֤,1),-11*P,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK1;
IF(ZF<0,-17*P,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK1;
IF(ZF>0,-17*P,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK1;
IF(ǧ��DDX<0,-23*P,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK1;
IF(ǧ��DDX>0,-23*P,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK1;
�����ʽ���:=MA(C,1)/MA(REF(C,18),18)*100;
�ʽ�������:=MA(FORCAST(�����ʽ���,20),6);
������:�����ʽ���>�ʽ�������,COLOR000000,STICK,LINETHICK1;
IF(������<=0,-29*P,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK1;
IF(������>0,-29*P,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK1;
CC:=CLOSE;
WW:=(CC-LOW+0.01)/(HIGH-LOW+0.01);
N120:=IF(BARSSINCE(CLOSE>0)<120,BARSSINCE(CLOSE>0),120);
N90:=IF(BARSSINCE(CLOSE>0)<90,BARSSINCE(CLOSE>0),90);
N55:=IF(BARSSINCE(CLOSE>0)<55,BARSSINCE(CLOSE>0),55);
N34:=IF(BARSSINCE(CLOSE>0)<34,BARSSINCE(CLOSE>0),34);
ZLCMA:=(DMA(WW,VOL/(MA(VOL,N120)*N120))+DMA(WW,VOL/(MA(VOL,N90)*N90))+DMA(WW,VOL/(MA(VOL,N55)*N55))+DMA(WW,VOL/(MA(VOL,N34)*N34)))/4*800;
NN:=IF(PERIOD=5,240,IF(PERIOD=6,360,240));
ZLCMC:=(ZLCMA-LLV(ZLCMA,NN))*100/(HHV(ZLCMA,NN)-LLV(ZLCMA,NN));
ZLCMB:=WINNER(CLOSE)*100;
ZLB:=IF(ZLCMB>0,ZLCMB,DRAWNULL);
ZLCM:=IF(ZLB=DRAWNULL,ZLCMC,ZLCMB);
ZLQS:EMA(ZLCM,3),COLORYELLOW;
BBCM:=ZLQS-REF(ZLQS,1);
IF(BBCM<0,-35*P,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK1;
IF(BBCM>0,-35*P,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK1;
VAR2:=(HIGH - LOW);
VAR3:=ABS((OPEN - CLOSE));
VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN));
VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW);
VAR6:=((VAR3 / VAR2) * VOL);
VAR7:=((VAR4 / VAR2) * VOL);
VAR8:=((VAR5 / VAR2) * VOL);
VAR9:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100)))));
��ͷ:STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,3,0),COLOR000088;
STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,2,0),COLOR0000AA;
STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,1,0),COLOR0000DD;
STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,0.5,0),COLOR0000FF;
��ͷ:STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,3,0),COLOR008800;
STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,2,0),COLOR00AA00;
STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,1,0),COLOR00DD00;
STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,0.5,0),COLOR00FF00;
�Ӳ�:STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) 
AND (CLOSE > OPEN)),0,VAR6,3,0),COLOR880088;
STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) 
AND (CLOSE > OPEN)),0,VAR6,2,0),COLORAA00AA;
STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) 
AND (CLOSE > OPEN)),0,VAR6,1,0),COLORDD00DD;
STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) 
AND (CLOSE > OPEN)),0,VAR6,0.5,0),COLORFF00FF;
����:STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) 
AND (CLOSE < OPEN)),0,VAR6,3,0),COLOR880000;
STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) 
AND (CLOSE < OPEN)),0,VAR6,2,0),COLORBB0000;
STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) 
AND (CLOSE < OPEN)),0,VAR6,1,0),COLORDD0000;
STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) 
AND (CLOSE < OPEN)),0,VAR6,0.5,0),COLORFF0000;
ϴ��:STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,3,0),COLOR999999;
STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,2,0),COLORAAAAAA;
STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,1,0),COLORDDDDDD;
STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,0.6,0),COLORFFFFFF;
����:STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,3,0),COLOR008888;
STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,2,0),COLOR00AAAA;
STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,1,0),COLOR00DDDD;
STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,0.5,0),COLOR00FFFF;
B1:=(����A+����A)<MA(V,60)/3 ;
B2:=MA(V,5)/2>V AND V>B1;
((80-HLMN3)*HLMN2/HLMN4+HLMN1),COLORCCCCCC,LINETHICK1,DOTLINE;
((50-HLMN3)*HLMN2/HLMN4+HLMN1),COLORCCCCCC,LINETHICK1,DOTLINE;
((20-HLMN3)*HLMN2/HLMN4+HLMN1),COLORCCCCCC,LINETHICK1,DOTLINE;
((10-HLMN3)*HLMN2/HLMN4+HLMN1),COLORCCCCCC,LINETHICK1;
KA:=(EMA((CLOSE-VARA2)/(VARA3-VARA2)*100,4)-50)*0.5+50;
DB:=EMA(0.667*REF(KA,1)+0.333*KA,2);
JJ:=3*KA-2*DB;
((KA-HLMN3)*HLMN2/HLMN4+HLMN1),COLORFFF111,LINETHICK1;
((DB-HLMN3)*HLMN2/HLMN4+HLMN1),COLOR00FF00,LINETHICK1;
((JJ-HLMN3)*HLMN2/HLMN4+HLMN1),COLORFF00FF,LINETHICK1;
DRAWTEXT_FIX(1,0.01,0.24,0,'����ϴ�̽���__���Ƹ��׵�����__����ׯ��׷��__������ׯ������'),COLORFFFF00;
DRAWICON(V>=3*REF(V,1) AND O<C,V*1.1,23);
DRAWICON(V>=2*REF(V,1) AND O<C,V*0.8,25);