‹ 返回

8712

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

指标公式

input:F2(0,0,999,1),F3(0,0,999,1),F4(0,0,999,1),F5(5,0,999,1),F6(10,0,999,1),F7(20,0,999,1),F8(30,0,999,1),F9(0,0,999,1),����(0,0,999,1),G(7,0,25),G1(5,0,10),n(0,0,10),mB(960,1,2500),��1(25,1,255);
//DRAWGBK(1, COLORRGB(180,180,180),COLORRGB(250,250,250),1);
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,10,2,'������:'+STKLABEL+' ����:'+STKNAME+'��'),ColorFFFFFF,linethick1;
��:=IF(CLOSE>200,VOL/1000000,VOL/1),linethick0;
������:=VOL/CAPITAL*100,linethick0,PRECISion2,colorffff00;
���ջ���:=SUM(������,5),PRECISION2,LINETHICK0 ,colorffaadd;
MAI:=CLOSE*1.017,LINETHICK0;
MAII:=CLOSE*1.03,LINETHICK0;
FMAI:=REF(MAI,1),LINETHICK0;
FMAII:=REF(MAII,1),LINETHICK0;
//����������ʱ�������ӡ������ա���Ȼ�ա�
aj:=DATEDIFF(DATE,CURRENTDATE);
b:=DATACOUNT-BARPOS+0;
���:=((HIGH-LOW)/LOW)*100,linethick0,color00FFff;
���:=HIGH-LOW,linethick0,color00FFff;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,7,0),COLOR0000AA;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,6,0),COLOR0000CC ;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,4,0),COLOR0000DD ;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,2,0),COLOR0000FF;
STICKLINE(CLOSE>=OPEN,HIGH,LOW,0,0),COLORRED;
STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,7,0),Colorcccc00;
STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,6,0),Colordddd00;
STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,4,0),Coloreeee00;
STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,2,0),COLORffff00;
STICKLINE(CLOSE<=OPEN,HIGH,LOW,0,0),ColorFFFF00;
VAR3:=(HIGH < REF(LOW,1));
VAR4:=(LOW > REF(HIGH,1));
DRAWTEXT(VAR3,(HIGH ),'ȱ��'),ALIGN0,ColorFFFF00;
DRAWTEXT(VAR4,(LOW ),'ȱ��'),ALIGN0,Color00FFBF;
a:=(3*CLOSE+LOW+OPEN+HIGH)/6;
X:=(20*a+19*REF(a,1)+18*REF(a,2)+17*REF(a,3)+16*REF(a,4)+15*REF(a,5)+
14*REF(a,6)+13*REF(a,7)+12*REF(a,8)+11*REF(a,9)+10*REF(a,10)+9*REF(a,11)+8*REF(a,12)
+7*REF(a,13)+6*REF(a,14)+5*REF(a,15)+4*REF(a,16)+3*REF(a,17)+2*REF(a,18)+
REF(a,20))/210;
�ص���ͬ:EMA(X,G),color208fff;
DRAWTEXT(BARSTATUS=2 AND �ص���ͬ<>REF(�ص���ͬ,1),�ص���ͬ,'�ص���ͬ��'+NUMTOSTR(�ص���ͬ,2)),color00aaff;
�䶥:HHV(MA((HIGH),G1),30),color00ffaa,linethick1;
DRAWTEXT(BARSTATUS=2 AND �䶥<>REF(�䶥,1),�䶥,'�䶥��'+NUMTOSTR(�䶥,2)),color00ff00,ALIGN2,pxup25;
DRAWTEXT(BARSTATUS=2 AND �䶥=REF(�䶥,1),�䶥,'�䶥��'+NUMTOSTR(�䶥,2)),color00ff00,ALIGN2,pxup25;
//�Ƕ���
z:ZIG(3,n),COLORffffff;
f:=z-REF(z,1);
zh:=PEAK(3,n,1);
wh:=PEAKBARS(3,n,1);
zL:=TROUGH(3,n,1);
wL:=TROUGHBARS(3,n,1);
x:=ATAN((z/zh-1)/wh*100)*57.3,linethick0;
�����:ATAN((z/zL-1)/wL*100)*57.3,linethick0;
DRAWNUMBER(wh=0 or (ISLASTBAR and wL<wh),z*1.01,REF(�����,1),1)ALIGN2,Color0aeeff;
DRAWTEXT(wh=0 or (ISLASTBAR and wL<wh),z*1.01,'����    ')ALIGN2,ColorColor0aeeff;
DRAWTEXT(wh=0 or (ISLASTBAR and wL<wh),z*1.01,' ��'),Color0aeeff;
DRAWNUMBER(wL=0 or (ISLASTBAR and wL>wh),z*0.99,REF(x,1),1)ALIGN2,Coloreeff00;
DRAWTEXT(wL=0 or (ISLASTBAR and wL>wh),z*0.99,'����     ')ALIGN2,Coloreeff00;
DRAWTEXT(wL=0 or (ISLASTBAR and wL>wh),z*0.99,' ��'),Coloreeff00;
//���ڴ�ֱ��
fbars:=SYSPARAM(0);
ff5:=BARSSINCE(CLOSE)=fbars+4;
VERTLINE(ff5),POINTDOT,color996666,linethick1;
DRAWNUMBER(ff5,SYSPARAM(5),5,0),colorffffff,pxup50;
ff8:=BARSSINCE(CLOSE)=fbars+7;
VERTLINE(ff8),POINTDOT,color996666,linethick1;
DRAWNUMBER(ff8,SYSPARAM(5),8,0),colorffffff,pxup50;
ff13:=BARSSINCE(CLOSE)=fbars+12;
VERTLINE(ff13),POINTDOT,color996666,linethick1;
DRAWNUMBER(ff13,SYSPARAM(5),13,0),colorffffff,pxup50;
ff21:=BARSSINCE(CLOSE)=fbars+20;
VERTLINE(ff21),POINTDOT,color996666,linethick1;
DRAWNUMBER(ff21,SYSPARAM(5),21,0),colorffffff,pxup50;
ff34:=BARSSINCE(CLOSE)=fbars+32;
VERTLINE(ff34),POINTDOT,color996666,linethick1;
DRAWNUMBER(ff34,SYSPARAM(5),33,0),colorffffff,pxup50;
ff55:=BARSSINCE(CLOSE)=fbars+54;
VERTLINE(ff55),POINTDOT,color996666,linethick1;
DRAWNUMBER(ff55,SYSPARAM(5),55,0),colorffffff,pxup50;
ff89:=BARSSINCE(CLOSE)=fbars+88;
VERTLINE(ff89),POINTDOT,color996666,linethick1;
DRAWNUMBER(ff89,SYSPARAM(5),89,0),colorffffff,pxup50;
ff144:=BARSSINCE(CLOSE)=fbars+143;
VERTLINE(ff144),POINTDOT,color996666,linethick1;
DRAWNUMBER(ff144,SYSPARAM(5),144,0),colorffffff,pxup50;
ff233:=BARSSINCE(CLOSE)=fbars+232;
VERTLINE(ff233),POINTDOT,color996666,linethick1;
DRAWNUMBER(ff233,SYSPARAM(5),233,0),colorffffff,pxup50;
ff377:=BARSSINCE(CLOSE)=fbars+376;
VERTLINE(ff377),POINTDOT,color996666,linethick1;
DRAWNUMBER(ff377,SYSPARAM(5),377,0),colorffffff,pxup50;
ff610:=BARSSINCE(CLOSE)=fbars+610;
//����������ʱ�����������ֻ�����
ZGG:=REF(HIGH,����);
HHHH:=HHV(zgg,1);
LLL:=LOW;
HHH:=CLOSE;
GF1 := HHH*0.95;  GF2 := HHH*0.93;
GFA := HHH*0.91;  GFB := HHH*0.90;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,10,80,'�������ص�,ͨ������£��г��������ᳬ�� �������䡿'),LINETHICK2,ColorFFFFFF;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,10,92,'  һ������  ��('+NUMTOSTR(GF1[SYSPARAM(1)],2)+') '+'-----('+NUMTOSTR(GF2[SYSPARAM (1)],2)+') '),LINETHICK2,Color00FFDD;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,10,106,'  ��������  ��('+NUMTOSTR(GFA[SYSPARAM(1)],2)+') '+'-----('+NUMTOSTR(GFB[SYSPARAM (1)],2)+') '),LINETHICK2,Color00FFFF;
LL2 := LLL;
GFB1 := LL2*1.05;  GFB2 := LL2*1.07;  GFB3 := LL2*1.10; GFB4 := LL2*1.12; GFBD := LL2*1.18;  GFBD1 := LL2*1.21;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,10,20,'���𶯵����� ѹ�����䡿'),colorFFFFFF;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,10,32,'  һ�����䣺('+NUMTOSTR(GFB1[SYSPARAM(1)],2)+') '+'-----('+NUMTOSTR(GFB2[SYSPARAM
(1)],2)+') '),LINETHICK2,ColorFFFF00;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,10,44,'  �������䣺('+NUMTOSTR(GFB3[SYSPARAM(1)],2)+') '+'-----('+NUMTOSTR(GFB4[SYSPARAM
(1)],2)+') '),LINETHICK2,ColorFFEE00;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,6,56,'   ��С���г����ܳ��ֶ���������ת↓'+'\n'
+'   18%--21% ��('+NUMTOSTR(GFBD[SYSPARAM(1)],2)+') '+'-----('+NUMTOSTR(GFBD1[SYSPARAM(1)],2)+') '),color00FF00;
xz:=DYNAINFO(7);
xx:=DYNAINFO(5);
yy:=DYNAINFO(6);
sz:=xz-lll;
zz:=sz/lll*100;
gsz:=xx-lll;
gzz:=gsz/lll*100;
//ggB:=hhhH-yy;
//vv:=ggB/hhhH*100;
ggA:=XZ-HHHH;
vvA:=ggA/hhhH*100;
ggB:=yy-hhhH;
vvB:=ggB/hhhH*100;
k:=hhhH-lll;
w:=k/llL*100;
DRAWTEXT(ISLASTBAR=1,HHHH,'����/��ǰ��ͷ���/��ǰ����:('+NUMTOSTR(HHHh,2)+')('+NUMTOSTR(VVB,2)+'%)('+NUMTOSTR(VVA,2)+'%)'+''+'������������'),ALIGN2,Color8080FF,pxDN2;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,10,118,'���𶯵�/��ǰ�߷���'+'/��ǰ���ȡ�:��'+NUMTOSTR(LLL[SYSPARAM(1)],2)+' Ԫ ��('+NUMTOSTR
(GZZ[SYSPARAM(1)],2)+'%) '+'('+NUMTOSTR(ZZ[SYSPARAM(1)],2)+'%) '),LINETHICK0,ColorffFFFF;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,190,2,'  ���������:'+NUMTOSTR(���[SYSPARAM(1)],2)+'%'+'--�۲�:'+NUMTOSTR(���[SYSPARAM(1)],2)+'Ԫ ��'),LINETHICK2,ColorFFFF00;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,6,146,'����/������Ӯ��[1.7%--3%:]'+NUMTOSTR(FMAI[SYSPARAM(1)],2)+''+'--'+NUMTOSTR(FMAII[SYSPARAM(1)],2)+'/'+NUMTOSTR(MAI[SYSPARAM(1)],2)+''+'--'+NUMTOSTR(MAII[SYSPARAM(1)],2)),LINETHICK2,ColorFFFFFF;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,10,133,'�������ʡ�:'+NUMTOSTR(������[SYSPARAM(1)],2)+'% '+'�����ջ��֡�:'+NUMTOSTR(���ջ���[SYSPARAM(1)],2)+'% '+ '�����ɽ�����'+NUMTOSTR(��[SYSPARAM(1)],0)+'��'),colorFFFF00;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,10,170,' ������:'+NUMTOSTR(b[SYSPARAM(1)],0)+'(��) '+' ��Ȼ��:'+NUMTOSTR(aj[SYSPARAM(1)],0)
+'(��) '),color00DDFF;
kk:=DYNAINFO( 3);
GGC:=kk*0.10;
Y:=kk+GGC;
U:=kk-GGC;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,4,157,'����ͣ��:'+NUMTOSTR(Y,2)),Color8080FF;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,99,157,'����ͣ��:'+NUMTOSTR(U,2)),ColorFFFF00;
//FINANCE
ZX:=DYNAINFO( 7);//�������¼�
������ӯ��:=ZX/FINANCE(33);
YS:=DYNAINFO(39);//��ӯ��
������ֵ:=��1*FINANCE(33);
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,2,186,
' �ܹɱ�:'+NUMTOSTR(FINANCE(1)/10000,2 )+'��'+' ��'+'��ͨ��:'+ NUMTOSTR(FINANCE(7)/10000,2)+'��'+' ��'+'��������:'+ NUMTOSTR(FINANCE(33),3)+''+'\n'+' ������ӯ��:'+NUMTOSTR(YS,2 )+'%'+' ��'+'������ӯ��:'+NUMTOSTR(������ӯ��,2 )+'%'+'\n'
),ColorAEDDFF;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,2,210,' ���¹�ֵ:'+NUMTOSTR(���¹�ֵ,2 )+'��'+'['+NUMTOSTR(��1,0 )+'����ӯ�ʹ���]'),ColorAEDDFF;
��ֵ:=FINANCE(10)-(FINANCE(15)+FINANCE(16)+FINANCE(14));
QE:=��ֵ/FINANCE( 1);
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,2,222,' �����ֵ: '+NUMTOSTR(QE,2)+' [���ʲ�-������ծ-���ڸ�ծ]'),LINETHICK1,ColorAEDDFF;
M:=(SYSPARAM(4)-SYSPARAM(5))/(SYSPARAM(3)-SYSPARAM(2));
DRAWSL(BARPOS=SYSPARAM(1),LOW,18.5*M/50,0,0),ColorFF00FF,LINEDASHDOT;
DRAWSL(BARPOS=SYSPARAM(1),LOW,27.5*M/50,0,0),ColorFF0000,LINEDASHDOT;
DRAWSL(BARPOS=SYSPARAM(1),LOW,38.5*M/50,0,0),COLORdddddd,LINEDASHDOT;
DRAWSL(BARPOS=SYSPARAM(1),LOW,55*M/50,0,0),Color0080FF;
DRAWSL(BARPOS=SYSPARAM(1),LOW,78*M/50,0,0),Colordddddd,LINEDASHDOT;
DRAWSL(BARPOS=SYSPARAM(1),LOW,110*M/50,0,0),,ColorFF0000,LINEDASHDOT;
DRAWSL(BARPOS=SYSPARAM(1),LOW,165*M/50,0,0),,ColorFF00FF,LINEDASHDOT;
DRAWSL(BARPOS=SYSPARAM(1),LOW,220*M/50,0,0),Color458A00,LINEDASHDOT;
//����
MC2:MA(CLOSE,F2),Colorffff00,linethick1,LINEDOT,COLORffffFF;
MC3:MA(CLOSE,F3),Colorffff00,linethick1,LINEDOT,COLORffffFF;
MC4:MA(CLOSE,F4),Colorffff00,linethick1,LINEDOT,COLORffffFF;
MC5:MA(CLOSE,F5),Colorffff00,linethick1,LINEDOT,COLORffffFF;
MC6:MA(CLOSE,F6),Colorffff00,linethick1,LINEDOT,COLOR00ffff;
MC7:MA(CLOSE,F7),Colorffff00,linethick1,LINEDOT,COLORff00ff;
MC8:MA(CLOSE,F8),Colorffff00,linethick1,LINEDOT,COLOR00ff00;
MC9:MA(CLOSE,F9),Colorffff00,linet