‹ 返回

14707

14707 | 查看原文 ↗
🔧 核心通用·带A股选股过滤(核心可用 · 把'去ST/选板块/CODELIKE'那行删掉,美港马加都能跑)
周期:长线用途:只管进单(找买点/选股)(纯多·只做多)
📊 把公式 14707 实时算进主散博弈(纯技术函数;选股/筹码特殊函数会标注不支持) 
🧩 这个指标拆开看 = 哪些"积木"组合的
① 定方向(趋势)
均线类 MA/EMA — 一段时间的平均价,铺出趋势中枢、看多空排列
② 验量能(量价)
成交量/额 VOL — 量在价先——放量证实突破、缩量过滤假信号
④ 触发(信号扳机)
CROSS 交叉 — 两线金叉/死叉当买卖扳机
搭条件的零件
HHV/LLV/REF 等 — 取区间最高最低、引用前N根——搭条件的零件
图上标注买卖点
画线/标注 — 在图上画柱、标买卖点、上色提示(只是显示,不是判断逻辑)
⚠️ A股专属(港股/美股/马股/加密都没有)
去ST/风险股 — 剔除A股ST风险股
组合思路:用均线/MACD 定方向,再用量能验证真假,再用金叉/突破当买卖扳机。把几件事叠在一起同时成立,才算一个'信号'——叠得越多看着越细,但也越容易过度拟合。 ⚠️ 这条含 A股专属逻辑(涨停板/龙虎榜/代码板块)——只有大陆A股有这制度,港股、美股、马股、加密统统没有,这部分搬不过去。

指标公式

M1:=5;M2:=10;M3:=30;M4:=60;
MA1:MA(CLOSE,M1);
MA2:MA(CLOSE,M2);
MA3:MA(C,13),COLOR00FF00,LINETHICK3;
MA4:MA(CLOSE,M4);
VAR3:=LLV(HIGH,240);
VAR4:=100*(CLOSE-VAR3)/VAR3;
VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;
VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;
VAR7:=0;
VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);
VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);
��:=VAR10;
��:=(VAR11+VAR13+VAR15+VAR17);
����:=(VAR12+VAR14+VAR16+VAR18);
B:IF(��>0 OR ��>0,LOW*0.99,DRAWNULL),CROSSDOT,LINETHICK3,COLORYELLOW;
DRAWTEXT(��>0 OR ��>0,LOW*0.99,'����'),COLORRED;
S:IF(����>0,HIGH*1.01,DRAWNULL),CROSSDOT,LINETHICK3,COLORGREEN;
DRAWTEXT(����>0,HIGH*1.02,'����'),COLORGREEN;
VAR100:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20))));
VAR200:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20))));
VAR300:=(100 - MA(((100 * (HHV(HIGH,5) - CLOSE)) / (HHV(HIGH,5) - LLV(LOW,5))),34));
F:IF(CROSS(VAR200,MA(VAR300,5)),LOW * 0.98,DRAWNULL),CROSSDOT,LINETHICK3,COLOREE00EE;
��:MA(CLOSE,22),LINETHICK2,COLORWHITE;
��B:=L2_AMO(0,2)/10000.0;
��B:=L2_AMO(1,2)/10000.0;
��B:=L2_AMO(2,2)/10000.0;
СB:=L2_AMO(3,2)/10000.0;
��S:=L2_AMO(0,3)/10000.0;
��S:=L2_AMO(1,3)/10000.0;
��S:=L2_AMO(2,3)/10000.0;
СS:=L2_AMO(3,3)/10000.0;
TESTSKIP(NOT(��B OR ��B OR ��B OR СB OR ��S OR ��S OR ��S OR СS)!=0);
���ڽ�:=(��B)+(��B),NODRAW;
���ڳ�:=(��S)+(��S),NODRAW;
�Ǵ��ڽ�:=(��B)+(СB),NODRAW;
�Ǵ��ڳ�:=(��S)+(СS),NODRAW;
���ڽ�����:=IF((��B+��B)=0,0,���ڽ�);
���ڳ�����:=IF((��S+��S)=0,0,���ڳ�);
�Ǵ��ڽ�����:=IF(��B+СB=0,0,�Ǵ��ڽ�);
�Ǵ��ڳ�����:=IF(��S+СS=0,0,�Ǵ��ڳ�);
����������:=(��B+��B)-(��S+��S),COLORRED,NODRAW;
ɢ��������:=(��B+СB)-(��S+СS),COLORRED,NODRAW;
������:=(��B+��B+��B+СB)-(��S+��S+��S+СS),COLORRED,NODRAW;
������:=(��B+��B)/(��B+��B+��S+��S)*100,NODRAW;
����������:=IF((��B+��B+��S+��S)=0,0,������);
��������:=(��S+��S)/(��B+��B+��S+��S)*100,NODRAW;
����������:=IF((��B+��B+��S+��S)=0,0,��������);
�������:=(��B+��B+��B+СB)/(��B+��B+��B+СB+��S+��S+��S+СS)*100,NODRAW;
��������:=(��S+��S+��S+СS)/(��B+��B+��B+СB+��S+��S+��S+СS)*100,NODRAW;
�ɽ�����:=(��B+��B+��B+СB+��S+��S+��S+СS),NODRAW;
���������:=(��B+��S+��B+��S)/�ɽ�����*100,COLORYELLOW,NODRAW;
��ǿ��:=(��B+��B-��S-��S)/�ɽ�����*100,COLORYELLOW,NODRAW;
��ǿ������:=IF(��ǿ��=0,-100,��ǿ��);
��ǿ�ȱ�:=IF(��ǿ��>=0,(��ǿ������+100)/2,100-ABS((��ǿ������-100)/2)),NODRAW;
����ǿ��:=(��B-��S)/(��B+��S)*100,COLORYELLOW,NODRAW;
����ǿ������:=IF(����ǿ��=0,-100,����ǿ��);
����ǿ�ȱ�:=IF(����ǿ��>0,(����ǿ������+100)/2,IF(����ǿ��<0,100-ABS((����ǿ������-100)/2),0)),NODRAW;
DAZHIV:=CONST(MAX(ABS(���ڽ�),MAX(ABS(���ڳ�),MAX(ABS(�Ǵ��ڽ�),ABS(�Ǵ��ڳ�))))),NODRAW;
DRAWRECTREL(0,CONST(940-(ABS(���ڽ�)*250/DAZHIV)),30,950,IF(CONST(���ڽ�>0),RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(32,CONST(940-(ABS(���ڳ�)*250/DAZHIV)),62,950,IF(CONST(���ڳ�>0),RGB(23,125,255),RGB(255,0,0)));
DRAWRECTREL(70,CONST(940-(ABS(�Ǵ��ڽ�)*250/DAZHIV)),100,950,IF(CONST(�Ǵ��ڽ�>0),RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(102,CONST(940-(ABS(�Ǵ��ڳ�)*250/DAZHIV)),132,950,IF(CONST(�Ǵ��ڳ�>0),RGB(23,125,255),RGB(255,0,0)));
DRAWRECTREL(138,CONST(950-(ABS(������)*250/DAZHIV))-20,175,950,IF(CONST(������>0),RGB(200,0,0),RGB(0,125,50)));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.0001,0.9,0,STRCAT('',CON2STR(���ڽ�/1,0))),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.033,0.9,0,STRCAT('',CON2STR(���ڳ�/1,0))),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.07,0.9,0,STRCAT('',CON2STR(�Ǵ��ڽ�/1,0))),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.101,0.9,0,STRCAT('',CON2STR(�Ǵ��ڳ�/1,0))),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.138,0.9,0,STRCAT('',CON2STR(������/1,0))),COLORYELLOW;
DRAWTEXT_FIX(1,0.000,0.99,0,STRCAT(STRCAT('���� ',CON2STR(����������,0)),'��')),COLORMAGENTA;
DRAWTEXT_FIX(1,0.072,0.99,0,STRCAT(STRCAT('ɢ�� ',CON2STR(ɢ��������,0)),'��')),COLORCYAN;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.135,0.99,0,'������:(��)'),COLORYELLOW;
����A:=ACTINVOL,COLORRED,NODRAW;
����A:=ACTOUTVOL,COLORGREEN,NODRAW;
����:=����A*100/(����A+����A),NODRAW,COLORRED;
����:=����A*100/(����A+����A),NODRAW,COLORGREEN;
�����:=LARGEINTRDVOL*100/(LARGEINTRDVOL+LARGEOUTTRDVOL);
������:=LARGEOUTTRDVOL*100/(LARGEINTRDVOL+LARGEOUTTRDVOL);
����������:=(LARGEINTRDVOL-LARGEOUTTRDVOL),COLORYELLOW,NODRAW;
����������:=(ACTINVOL-ACTOUTVOL),COLORMAGENTA,NODRAW;
�����ʽ��:=((L2_AMO(0,0)+L2_AMO(1,0)-L2_AMO(0,1)-L2_AMO(1,1)))/10000,COLORCYAN,NODRAW;
����������:=LARGEINTRDVOL*100/VOL;
����������:=LARGEOUTTRDVOL*100/VOL;
�������ȱ�:=����������/(����������+����������)*100,NODRAW;
�������ȱ�:=����������/(����������+����������)*100,NODRAW;
���ȱ�����:=IF((LARGEINTRDVOL+LARGEOUTTRDVOL)=0,0,�����);
JGV:=(L2_VOL(0,0) - L2_VOL(0,1))*VOL/100000000,COLORRED;
DHV:=(L2_VOL(1,0) - L2_VOL(1,1))*VOL/100000000,COLORFF00FF;
ZHV:=(L2_VOL(2,0) - L2_VOL(2,1))*VOL/100000000,COLOR00FFFF;
SHV:=(L2_VOL(3,0) - L2_VOL(3,1))*VOL/100000000,COLORFFFFFF;
NOTEXT��������:=MA((JGV+DHV),5),COLORYELLOW;
��������:=JGV,COLOR0000FF,NODRAW;
��������:=DHV,COLORMAGENTA,NODRAW;
��������:=(JGV+DHV),COLORYELLOW,NODRAW;
������:=(ZHV+SHV),COLORWHITE,NODRAW;
�����ʽ��:=��������/(ABS(JGV)+ABS(DHV)+ABS(ZHV)+ABS(SHV))*100,COLORYELLOW,NODRAW;
�����ʽ������:=IF(�����ʽ��=0,-100,�����ʽ��);
����ǿ�ȱ�:=IF(�����ʽ��>0,(�����ʽ������+100)/2,IF(�����ʽ��<0,100-ABS((�����ʽ������-100)/2),0)),COLORGREEN,NODRAW;
С���ʽ��:=С������/(ABS(JGV)+ABS(DHV)+ABS(ZHV)+ABS(SHV))*100,COLORYELLOW,NODRAW;
С��ǿ�ȱ�:=IF(С���ʽ��>=0,(С���ʽ��+100)/2,100-ABS((С���ʽ��-100)/2)),COLORCYAN,NODRAW;
MVR:=REF(MA(V,5),1);
FVR:=REF(V,1);
PVR:=(MVR+FVR)/2;
���ܱ�:=V/(V+PVR)*100/FROMOPEN*240;
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
�����ܱ��͡�:=IF(SAT>1,1,SAT)*100,COLORYELLOW,NODRAW;
LC:=REF(CLOSE,1);
RSI5:=(SMA(MAX(CLOSE-LC,0),3,1))/(SMA(ABS(CLOSE-LC),3,1))*100;
WR10:=(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3))*100;
��Ծ��:=(RSI5-WR10),COLORFFFF00,LINETHICK1,NODRAW;
��Ծ�ȱ�:=IF(��Ծ��>=0,(��Ծ��+100)/2,100-ABS((��Ծ��-100)/2));
DRAWRECTREL(80,0,240,40,RGB(0,75,200));
DRAWRECTREL(80,0,160,40,RGB(0,250,50));
DRAWRECTREL(80,0,80+CONST(���ȱ�����*160/100),40,RGB(200,0,50));
DRAWTEXT_FIX(1,0.00,0.00,0,STRCAT(STRCAT('�������ȱ� ',CON2STR(�����,2)),'����')),COLORYELLOW;
DRAWRECTREL(80,50,240,90,RGB(0,100,0));
DRAWRECTREL(80,50,160,90,RGB(0,250,50));
DRAWRECTREL(80,50,80+CONST(����ǿ�ȱ�*160/100),90,RGB(175,50,250));
DRAWTEXT_FIX(1,0.00,0.05,0,STRCAT(STRCAT('����ǿ�ȱ� ',CON2STR(����ǿ�ȱ�,2)),'����')),COLORYELLOW;
DRAWRECTREL(330,0,490,40,RGB(0,75,200));
DRAWRECTREL(330,0,410,40,RGB(0,250,50));
DRAWRECTREL(330,0,330+CONST(����*160/100),40,RGB(175,50,250));
DRAWTEXT_FIX(1,0.25,0.00,0,STRCAT(STRCAT('���������� ',CON2STR(����,2)),' ��')),COLORYELLOW;
DRAWRECTREL(330,50,490,90,RGB(0,100,0));
DRAWRECTREL(330,50,410,90,RGB(0,250,50));
DRAWRECTREL(330,50,330+CONST(���������*160/100),90,RGB(200,0,50));
DRAWTEXT_FIX(1,0.25,0.05,0,STRCAT(STRCAT('��������� ',CON2STR(���������,2)),' ��')),COLORYELLOW;
DRAWRECTREL(580,0,740,40,RGB(0,100,0));
DRAWRECTREL(580,0,660,40,RGB(0,250,50));
DRAWRECTREL(580,0,580+CONST(����������*160/100),40,RGB(200,0,50));
DRAWTEXT_FIX(1,0.500,0.00,0,STRCAT(STRCAT('������� ',CON2STR(����������,2)),' ����')),COLORYELLOW;
DRAWRECTREL(580,50,740,90,RGB(0,200,250));
DRAWRECTREL(580,50,660,90,RGB(0,250,50));
DRAWRECTREL(580,50,580+CONST(��ǿ�ȱ�*160/100),90,RGB(175,50,250));
DRAWTEXT_FIX(1,0.500,0.05,0,STRCAT(STRCAT('��ǿ�ȱ� ',CON2STR(��ǿ�ȱ�,2)),' ����')),COLORYELLOW;
DRAWRECTREL(830,0,990,40,RGB(0,100,0));
DRAWRECTREL(830,0,910,40,RGB(0,250,50));
DRAWRECTREL(830,0,830+CONST(�������*160/100),40,RGB(175,50,250));
DRAWTEXT_FIX(1,0.75,0.00,0,STRCAT(STRCAT('�ʽ������ ',CON2STR(�������,2)),' ��')),COLORYELLOW;
DRAWRECTREL(830,50,990,90,RGB(0,200,250));
DRAWRECTREL(830,50,910,90,RGB(0,250,50));
DRAWRECTREL(830,50,830+CONST(���ܱ�*160/100),90,RGB(200,0,50));
DRAWTEXT_FIX(1,0.75,0.05,0,STRCAT(STRCAT('�ʽ����ܱ� ',CON2STR(���ܱ�,2)),' ��')),COLORYELL