‹ 返回

6896

6896 | 查看原文 ↗
🔧 核心通用·带A股选股过滤(核心可用 · 把'去ST/选板块/CODELIKE'那行删掉,美港马加都能跑)
周期:中线用途:只管进单(找买点/选股)🔻 明确含做空逻辑
📊 把公式 6896 实时算进主散博弈(纯技术函数;选股/筹码特殊函数会标注不支持) 
🧩 这个指标拆开看 = 哪些"积木"组合的
★ 看主力(筹码 / 资金)
筹码/成本 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;
short:=12;long:=26;M:=9;
DIFF1:=EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);
DEA1:=EMA(DIFF1,M);
MACD:2*(DIFF1-DEA1),linethick0;
DIFF : EMA(CLOSE,SHORT) - EMA(CLOSE,LONG),colorff00ff,linethick0;
DEA  : EMA(DIFF1,M),colorwhite,linethick0;
AH:HHV(DIFF1,55),COLOR6600ff,linethick0,layer0;
PARTLINE(ah,ah),COLORWHITE,POINTDOT,linethick0,layer0;
DRAWICON( ref(aH=diff1,1) and DIFF<REF(DIFF1,1),AH*0.65,8),ALIGN1;
AL:LLV(DIFF1,55),COLOR248a24,linethick0,layer0;
PARTLINE(al,Al),COLORWHITE,POINTDOT,linethick0,layer0;
DRAWICON( ref(al=diff1,1) and DIFF>REF(DIFF1,1),al*0.65,7),ALIGN1;
VAR1:=HHV(DEA,53);
VAR2:=LLV(DEA,30);
VAR3:=DEA-(DIFF-DEA);
UP:IF(DIFF>VAR1 AND DEA=VAR1,MAX(LLV(VAR1,10),VAR3),VAR1),COLORbb9a00,LINETHICK0,LAYER0;
DN:IF(DIFF<VAR2 AND DEA=VAR2,MIN(HHV(VAR2,10),VAR3),VAR2),COLORaa00bb,LINETHICK0,LAYER0;
������:CROSS(DIFF ,DEA ) AND CROSS( DIFF,DN ) AND DN<0,linethick0;
STICKLINE(������,-0.1,-0.20,6,0),COLORRED;
DRAWTEXT(������,-0.15,'������'),ALIGN1,COLOR8080FF,linethick2,LAYER1;
�����½��:IF(CROSS(DIFF,DEA) AND DIFF<-0.001,0.3,0),COLORWHITE,POINTDOT,LINETHICK0;
STICKLINE(�����½��,0.1,0.20,6,0),COLORffffff;
drawtext(�����½��,0.15,'���½��'),ALIGN1,color6600FF,layer1;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
������:IF(CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1,0.2,0),COLORred,POINTDOT,LINETHICK0;
STICKLINE(������,0.20,0.3,6,0),COLORred;
drawtext(������,0.25,'����'),ALIGN1,colorffffFF,layer1;
A3:=CROSS(DIFF,DEA) AND DEA<0;
�����¶��ν��:IF(FILTER(COUNT(A3,21)=2,10) AND DEA<0,0.05,0),COLORblue,POINTDOT,LINETHICK0;
STICKLINE(�����¶��ν��,0.3,0.4,6,0),COLORblue;
drawtext(�����¶��ν��,0.35,'���¶��ν��'),ALIGN1,colorYELLOW,layer1;
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
���ױ���:IF(REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA),0.1,0),COLORFFFF00;
STICKLINE(���ױ���,0.2,0.25,6,0),COLORFFFF00;
;
����:0,LINETHICK2,COLORYELLOW,LAYER1;
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,8,0 ),COLOr008800; 
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,7,0 ),COLOR009900;
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,6,0 ),COLOR00aa00; 
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,5,0 ),COLOR00bb00;
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,4,0 ),COLOR00cc00;
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,3,0 ),COLOR00dd00;
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,2,0 ),COLOR00ee00;
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,1,0 ),COLOR00ff00;
STICKLINE(MACD>=ref(MACD,1)and MACD>0,0,MACD,8,0 ),COLOR000088; 
STICKLINE(MACD>=ref(MACD,1)and MACD>0,0,MACD,7,0 ),COLOR000099; 
STICKLINE(MACD>=ref(MACD,1)and MACD>0,0,MACD,6,0 ),COLOR0000aa;
STICKLINE(MACD>=ref(MACD,1)and MACD>0,0,MACD,5,0 ),COLOR0000bb; 
STICKLINE(MACD>=ref(MACD,1)and MACD>0,0,MACD,4,0 ),COLOR0000cc; 
STICKLINE(MACD>=ref(MACD,1)and MACD>0,0,MACD,3,0 ),COLOR0000dd;
STICKLINE(MACD>=ref(MACD,1)and MACD>0,0,MACD,2,0 ),COLOR0000ee;
STICKLINE(MACD>=ref(MACD,1)and MACD>0,0,MACD,1,0 ),COLOR0000ff;
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,8,0 ),COLOR338fdd;
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,7,0 ),COLOR339fdd;
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,6,0 ),COLOR33afdd;
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,5,0 ),COLOR33bfdd; 
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,4,0 ),COLOR33cfdd; 
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,3,0 ),COLOR33dfdd;
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,2,0 ),COLOR33efdd;
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,1,0 ),COLOR33ffdd;
STICKLINE(MACD<=ref(MACD,1)and MACD<0,0,MACD,8,0 ),COLORFF4400;
STICKLINE(MACD<=ref(MACD,1)and MACD<0,0,MACD,7,0 ),COLORFF6600; 
STICKLINE(MACD<=ref(MACD,1)and MACD<0,0,MACD,6,0 ),COLORFF7700;
STICKLINE(MACD<=ref(MACD,1)and MACD<0,0,MACD,5,0 ),COLORFF8800; 
STICKLINE(MACD<=ref(MACD,1)and MACD<0,0,MACD,4,0 ),COLORFF9900; 
STICKLINE(MACD<=ref(MACD,1)and MACD<0,0,MACD,3,0 ),COLORFFaa00;
STICKLINE(MACD<=ref(MACD,1)and MACD<0,0,MACD,2,0 ),COLORFFbb00;
STICKLINE(MACD<=ref(MACD,1)and MACD<0,0,MACD,1,0 ),COLORFFcc00;
DRAWTEXTREL(5,70,'��  �� �� �ۣ�'+NUMTOSTRN(������,0)),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,250,'��  ���½�棺'+NUMTOSTRN(�����½��,0)),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,430,'��  ���ν�棺'+NUMTOSTRN(�����ν��,0)),COLORFFFFFF,linethick1,layer0;
DRAWTEXTREL(5,610,'��  ���¶��ν�棺'+NUMTOSTRN(�����¶��ν��,0)),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,790,'��  �� �ƣ�'),COLORffffff,linethick1,layer0;
MRY1:=������=1;
MRY2:=������=0 AND ( �����½��>0 OR �����ν��>0 OR �����¶��ν��>0 );
MRY3:=������=0 AND �����½��=0 AND �����ν��=0 AND �����¶��ν��=0 ;
IF BARSTATUS=2 AND MRY1 THEN BEGIN 
DRAWTEXTREL(25,70,'                �� ���������ۣ�'),colorRED,layer0;
END
ELSE
IF BARSTATUS=2 AND MRY2 THEN BEGIN 
DRAWTEXTREL(25,70,'                �� �����㣡'),colorgreen,layer0;
END
ELSE
IF BARSTATUS=2 AND MRY3 THEN BEGIN 
DRAWTEXTREL(25,70,'                �� �� ��'),colorgreen,layer0;
END;
LXJC1:=�����½��>0;
LXJC2:=�����½��=0 AND (�����ν��>0 OR �����¶��ν��>0);
LXJC3:=�����½��=0 AND �����ν��=0 AND �����¶��ν��=0 AND ������=0 ;
IF BARSTATUS=2 AND LXJC1 THEN BEGIN 
DRAWTEXTREL(25,250,'                �� ����Ϣ��'),colorRED,layer0;
END
ELSE
IF BARSTATUS=2 AND LXJC2 THEN BEGIN 
DRAWTEXTREL(25,250,'                �� ����û�� ��'),colorgreen,layer0;
END
ELSE
IF BARSTATUS=2 AND LXJC3 THEN BEGIN 
DRAWTEXTREL(25,250,'                ��   �� ��'),colorgreen,layer0;
END 
ECJC1:=������>0;
ECJC2:=�����ν��=0 AND ( �����½��>0 OR �����¶��ν��>0 );
ECJC3:=�����ν��=0 AND �����½��=0 AND �����¶��ν��=0  AND ������=0 ;
IF BARSTATUS=2 AND ECJC1 THEN BEGIN 
DRAWTEXTREL(25,430,'                �� ��͸���ˣ�'),colorRED,layer0;
END
ELSE
IF BARSTATUS=2 AND ECJC2 THEN BEGIN 
DRAWTEXTREL(25,430,'                �� �Ȳ�ȥ ��'),colorgreen,layer0;
END
ELSE
IF BARSTATUS=2 AND ECJC3 THEN BEGIN 
DRAWTEXTREL(25,430,'                ��     �� ��'),colorgreen,layer0;
END
LXECJC1:=�����¶��ν��>0;
LXECJC2:=�����¶��ν��=0 AND ( �����½��>0 OR �����ν��>0);
LXECJC3:=�����¶��ν��=0 AND �����ν��=0 AND �����½��=0 AND ������=0 ;
IF BARSTATUS=2 AND LXECJC1 THEN BEGIN 
DRAWTEXTREL(25,610,'                �� ��ͷ���ˣ�'),colorRED,layer0;
END
ELSE
IF BARSTATUS=2 AND LXECJC2 THEN BEGIN 
DRAWTEXTREL(25,610,'                �� ��  �� ��'),colorgreen,layer0;
END
ELSE
IF BARSTATUS=2 AND LXECJC3 THEN BEGIN 
DRAWTEXTREL(25,610,'                ��       �� ��'),colorgreen,layer0;
END
׼��1:=MACD>0 AND MACD>REF(MACD,1);
׼��2:=MACD>0 AND MACD<REF(MACD,1);
���1:=MACD<0 AND MACD>REF(MACD,1);
���2:=MACD<0 AND MACD<REF(MACD,1);
IF BARSTATUS=2 AND ׼��1 THEN BEGIN 
DRAWTEXTREL(25,790,'       �� �������� ���������У�'),colorRED,layer0;
END
ELSE
IF BARSTATUS=2 AND ׼��2 THEN BEGIN 
DRAWTEXTREL(25,790,'       �� �������� �����µ��У�'),colorgreen,layer0;
END;
IF BARSTATUS=2 AND ���1 THEN BEGIN 
DRAWTEXTREL(25,790,'       �� �����Ա ���������У�'),colorRED,layer0;
END
ELSE
IF BARSTATUS=2 AND ���2 THEN BEGIN 
DRAWTEXTREL(25,790,'       �� �����Ա �����µ��У���'),colorgreen,layer0;
END;  ���޴����� 0��һ��ʽ�� ֻΪ���ŷ��㣡��������ͼ��ʾ���ݡ�Դ�롢��ͼ�� ��һ��ʽ���·���������ͼ Դ�� ͼ����ʲô���⣿�����ǽ��������ö��������|�����Ƽ�|�������� ͨ����423ͨ���š����������ͼ/ѡ�� ���ɱض��ϴ�5 ��׼��׽ǿ�ƹ� ��������ʦ��Ʒ Դ�� ��ͼ�������︱ͼ���������ָ���õ�COST��������ϲ���¡�ʹ�÷���˵�����������ж�ֱ��...�����������