‹ 返回

6897

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

指标公式

DRAWRECTREL(0,10,200,1000,rgb(0,0,255)),layer0;
CS:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
YJD:=(EMA(CS,3)-50)*2;������:YJD,LINETHICK0;
����:0,LINETHICK2,COLORYELLOW,LAYER1;
DRAWICON(cross(YJD,����),0,7),ALIGN1;
������1:=������>=0;
������2:=������<=0;
Var1:=(2*CLOSE+HIGH+LOW)/4;
Var2:=LLV(LOW,5);
Var3:=HHV(HIGH,4);
Var5:=(Var1-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100;
Var6:=SMA(Var5,2,1);
sK:EMA((Var1-Var2)/(Var3-Var2)*100,4),LINETHICK0,precis2;
sD:EMA(0.667*REF(sK,1)+0.333*sK,2),LINETHICK0,precis2;
sJ:2*sK-1*sD,LINETHICK0,precis2;
sKD��:sK-sD,colorred,LINETHICK0,precis2;
������: SMA(Var6,2,1),COLOR889999,linethick0;
PARTLINE(������,������>REF(������,1),RGB(255,0,0),������<REF(������,1),RGB(0,250,0)),linethick1;
���:if(CROSS(sK,sD),������,0),colorffffff,LINETHICK2,layer1;
VERTLINE(CROSS(���,0.1),2),COLORffffff,layer7;
�������:barslast(cross(sK,sD)),linethick0;
STICKLINE(YJD<ref(YJD,1)and YJD>0,0,YJD,8,0 ),COLOr008800; 
STICKLINE(YJD<ref(YJD,1)and YJD>0,0,YJD,7,0 ),COLOR009900;
STICKLINE(YJD<ref(YJD,1)and YJD>0,0,YJD,6,0 ),COLOR00aa00; 
STICKLINE(YJD<ref(YJD,1)and YJD>0,0,YJD,5,0 ),COLOR00bb00;
STICKLINE(YJD<ref(YJD,1)and YJD>0,0,YJD,4,0 ),COLOR00cc00;
STICKLINE(YJD<ref(YJD,1)and YJD>0,0,YJD,3,0 ),COLOR00dd00;
STICKLINE(YJD<ref(YJD,1)and YJD>0,0,YJD,2,0 ),COLOR00ee00;
STICKLINE(YJD<ref(YJD,1)and YJD>0,0,YJD,1,0 ),COLOR00ff00;
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,8,0 ),COLOR000088; 
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,7,0 ),COLOR000099; 
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,6,0 ),COLOR0000aa;
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,5,0 ),COLOR0000bb; 
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,4,0 ),COLOR0000cc; 
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,3,0 ),COLOR0000dd;
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,2,0 ),COLOR0000ee;
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,1,0 ),COLOR0000ff;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,8,0 ),COLOR338fdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,7,0 ),COLOR339fdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,6,0 ),COLOR33afdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,5,0 ),COLOR33bfdd; 
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,4,0 ),COLOR33cfdd; 
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,3,0 ),COLOR33dfdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,2,0 ),COLOR33efdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,1,0 ),COLOR33ffdd;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,8,0 ),COLORFF4400;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,7,0 ),COLORFF6600; 
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,6,0 ),COLORFF7700;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,5,0 ),COLORFF8800; 
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,4,0 ),COLORFF9900; 
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,3,0 ),COLORFFaa00;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,2,0 ),COLORFFbb00;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,1,0 ),COLORFFcc00;
DRAWTEXTREL(5,30,'��' ),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,50,'    ��  �棺'+NUMTOSTRN(���,2)),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,190,'��   '),COLORgreen,linethick1,layer0;
DRAWTEXTREL(5,350,'��  �����ߣ�'+NUMTOSTRN(YJD,2)),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,510,'��  '),COLORgreen,linethick1,layer0;
DRAWTEXTREL(5,670,'��  �����ߣ�'+NUMTOSTRN(������,2)),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,830,'�� '),COLORgreen,linethick1,layer0;
JC0:=��� < 35 and ��� >0 and YJD > ref(yjd,1) and ������ > ref(������,1);
JC1:=��� < 35 and ��� >0 and (YJD < ref(yjd,1) OR ������ < ref(������,1));
JC2:=��� <= 55 and ��� > 35 and YJD > ref(yjd,1) and ������ > ref(������,1);
JC3:=��� <=55 and ��� > 35 and (YJD < ref(yjd,1) or ������ < ref(������,1));
JC4:=��� > 55;
IF BARSTATUS=2 AND JC0 THEN BEGIN 
DRAWTEXTREL(25,190,' �� ��� ������������ ��'),colorred,layer0;
END
ELSE
IF BARSTATUS=2 AND JC1 THEN BEGIN 
DRAWTEXTREL(25,190,' �� ��λ�� �����������ص� �ɿ�����'),colorred,layer0;
END
ELSE
IF BARSTATUS=2 AND JC2 THEN BEGIN 
DRAWTEXTREL(25,190,' �� ��� ������������ ��'),colorred,layer0;
END
ELSE
IF BARSTATUS=2 AND JC3 THEN BEGIN 
DRAWTEXTREL(25,190,' �� ��λ�� �����߼��� ����'),coloryellow,layer0;
END
ELSE
IF BARSTATUS=2 AND JC4 THEN BEGIN 
DRAWTEXTREL(25,190,' �� ��λ�����б���Ҳ������!!'),coloryellow,layer0;
END;
NJC1:=��� = 0 AND ������� <=1 and YJD > ref(yjd,1) and ������ > ref(������,1) and  YJD <30;
NJC2:=��� = 0 AND ������� <=1 and YJD > ref(yjd,1) and ������ > ref(������,1) and  YJD <60 and  YJD >30;
NJC3:=��� = 0 AND ������� <=1 and YJD > ref(yjd,1) and ������ > ref(������,1) and  YJD >60 ;
NJC4:=��� = 0 AND ������� <=1 and (YJD < ref(yjd,1) or ������ < ref(������,1)) ;
NJC5:=��� = 0 AND ������� =2 ;
NJC6:=��� = 0 AND ������� >2 and YJD > ref(yjd,1) and ������ > ref(������,1);
NJC7:=��� = 0 AND ������� >2 and (YJD < ref(yjd,1) or ������ < ref(������,1)) ;
NJC8:=��� = 0 AND ������� >2 and YJD < ref(yjd,1) and ������ < ref(������,1) ;
IF BARSTATUS=2 AND NJC1 THEN BEGIN 
DRAWTEXTREL(25,30,'               �� '+NUMTOSTRN(�������,0)+'��ǰ���'),colorred,layer0;
DRAWTEXTREL(25,190,'               �� ��λ�ɽ���'),colorred,layer0;
END
ELSE
IF BARSTATUS=2 AND NJC2 THEN BEGIN 
DRAWTEXTREL(25,30,'               �� '+NUMTOSTRN(�������,0)+'��ǰ���'),colorred,layer0;
DRAWTEXTREL(25,190,'               �� ��λ�ɽ���'),colorred,layer0;
END
ELSE
IF BARSTATUS=2 AND NJC3 THEN BEGIN 
DRAWTEXTREL(25,30,'               �� '+NUMTOSTRN(�������,0)+'��ǰ���'),coloryellow,layer0;
DRAWTEXTREL(25,190,'       �� ��λС�� ţ�� ���ǣ�'),coloryellow,layer0;
END
ELSE
IF BARSTATUS=2 AND NJC4 THEN BEGIN 
DRAWTEXTREL(25,30,'               �� '+NUMTOSTRN(�������,0)+'��ǰ���'),coloryellow,layer0;
DRAWTEXTREL(25,190,'               �� ���� ���ǣ�'),coloryellow,layer0;
END
ELSE 
IF BARSTATUS=2 AND NJC5 THEN BEGIN 
DRAWTEXTREL(25,30,'               �� '+NUMTOSTRN(�������,0)+'��ǰ���'),coloryellow,layer0;
DRAWTEXTREL(25,190,'       �� ����û�� �´�������'),coloryellow,layer0;
END
ELSE 
IF BARSTATUS=2 AND NJC6 THEN BEGIN 
DRAWTEXTREL(25,30,'               �� '+NUMTOSTRN(�������,0)+'��ǰ���'),colorYELLOW,layer0;
DRAWTEXTREL(25,190,'               �� ���� ���ǣ�'),colorYELLOW,layer0;
END
ELSE 
IF BARSTATUS=2 AND NJC7 THEN BEGIN 
DRAWTEXTREL(25,30,'               �� '+NUMTOSTRN(�������,0)+'��ǰ���'),colorgreen,layer0;
DRAWTEXTREL(25,190,'               �� �Ȳ�ȥ�ɣ�'),colorgreen,layer0;
END
ELSE 
IF BARSTATUS=2 AND NJC8 THEN BEGIN 
DRAWTEXTREL(25,190,'               �� �ȿ���ȥ�ˣ�'),colorgreen,layer0;
END;
NL0:=YJD > ref(yjd,1) and YJD >0 and YJD <70;
NL1:=YJD < ref(yjd,1) and YJD >0 and YJD <70;
NL2:=YJD > ref(yjd,1) and YJD <0 ;
NL3:=YJD < ref(yjd,1) and YJD <0 ;
NL4:=YJD >0 and YJD > ref(yjd,1) and YJD >70 ;
NL5:=YJD >0 and YJD < ref(yjd,1) and YJD >70 ;
IF BARSTATUS=2 AND NL0 THEN BEGIN 
DRAWTEXTREL(25,350,'               �� ��������'),colorred,layer0;
DRAWTEXTREL(25,510,'               �� ���� �ƺ�'),colorred,layer0;
END
ELSE
IF BARSTATUS=2 AND NL1 THEN BEGIN 
DRAWTEXTREL(25,350,'               �� ��������'),colorgreen,layer0;
DRAWTEXTREL(25,510,'               �� ���� �³�'),colorgreen,layer0;
END
ELSE
IF BARSTATUS=2 AND NL2 THEN BEGIN 
DRAWTEXTREL(25,350,'               �� ��������'),colorgreen,layer0;
DRAWTEXTREL(25,510,'               �� ��������'),colorred,layer0;
END
ELSE
IF BARSTATUS=2 AND NL3 THEN BEGIN 
DRAWTEXTREL(25,350,'               �� ��������'),colorgreen,layer0;
DRAWTEXTREL(25,510,'               �� �Ȳ�ɣ�'),colorgreen,layer0;
END
ELSE
IF BARSTATUS=2 AND NL4 THEN BEGIN
DRAWTEXTREL(25,350,'               �� ������'),colorgreen,layer0; 
DRAWTEXTREL(25,510,'               �� ����70С�ģ�'),coloryellow,layer0;
END
ELSE
IF BARSTATUS=2 AND NL5 THEN BEGIN 
DRAWTEXTREL(25,350,'               �� ������'),colorgreen,layer0; 
DRAWTEXTREL(25,510,'               �� 70�µ����ӣ�'),colorgreen,layer0;
END;
PL1:=������ > ref(������,1);
PL2:=������ < ref(������,1);
IF BARSTATUS=2 AND PL1 THEN BEGIN 
DRAWTEXTREL(25,670,'               �� ���� �ƺ�'),colorred,layer0;
END
ELSE
IF BARSTATUS=2 AND PL2 THEN BEGIN 
DRAWTEXTREL(25,670,'               �� ���� ����'),colorgreen,layer0;
END;
PL3:=������ > 65 and ������ <70;
PL4:=������ > 70;
IF BARSTATUS=2 AND PL3 THEN BEGIN 
DRAWTEXTREL(25,830,'               �� ����65С�ģ�'),coloryellow,layer0;
END
ELSE
IF BARSTATUS=2 AND PL4 THEN BEGIN 
DRAWTEXTREL(25,830,'               �� ����70���ˣ�'),colorgreen,layer0;
END;
����:80,COLORred,dotline,layer7;
ǿ��:65,COLORffffff,dotline,precis2,layer7;
����:-65,COLORred,dotline,precis2,layer7;
����:-80,COLORgreen,dotline,layer7;  ���޴����� 0��һ��ʽ�� MACD�����ۣ��������ۣ� ��һ��ʽ��K���ϴ���Դ��(��ͼ��Դ�롢��ͼ)��ʲô���⣿�����ǽ��������ö��������|�����Ƽ�|�������� ͨ����423ͨ���š����������ͼ/ѡ�� ���ɱض��ϴ�5 ��׼��׽ǿ�ƹ� ��������ʦ��Ʒ Դ�� ��ͼ�������︱ͼ���������ָ���õ�COST��������ϲ���¡�ʹ�÷���˵�����������ж�ֱ��...�����������