‹ 返回

18664

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

指标公式

N:=20;
DRAWGBKLAST(DATE>900101,STRIP(RGB(75,75,75),RGB(0,0,0),0));
DRAWTEXTABS(10,10,STKLABEL+' '+STKNAME+' '+BKNAME),COLOR00FFFF;
STICKLINE(C>=O,C,O,8,0),COLOR000055;
STICKLINE(C>=O,C,O,6.5,0),COLOR000075;
STICKLINE(C>=O,C,O,5,0),COLOR000095;
STICKLINE(C>=O,C,O,3.5,0),COLOR0000B5;
STICKLINE(C>=O,C,O,2,0),COLOR0000D5;
STICKLINE(C>=O,H,L,0.5,0),COLOR0000F5;
STICKLINE(C<O,C,O,8,0),COLOR303000;
STICKLINE(C<O,C,O,6.5,0),COLOR404000;
STICKLINE(C<O,C,O,5,0),COLOR505000;
STICKLINE(C<O,C,O,3.5,0),COLOR606000;
STICKLINE(C<O,C,O,2,0),COLOR707000;
STICKLINE(C<O,H,L,0.5,0),COLOR808000;
�ܹɱ����ڣ�:FINANCE2(35)/10000,COLORYELLOW,LINETHICK0;
��ͨ���ڣ�:FINANCE2(37)/10000,COLORFFFFFF,LINETHICK0;
����:=(3*C+H+L+O)/6;
VAR1:=(8*����+7*REF(����,1)+6*REF(����,2)+5*REF(����,3)+4*REF(����,4)+3*REF(����,5)+2*REF(����,6)+REF(����,8))/36;
VAR2:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;
FILLRGN(VAR1,VAR2,VAR1>VAR2,(RGB(100,0,100)));
����:VAR1,ColorFFFFFF;
����:VAR2,COLORYELLOW;
PARTLINE(����,����<REF(����,1)),COLORGREEN;
SZ1:=REF(VAR1,1)=REF(VAR2,1) AND VAR1>VAR2 AND CLOSE>VAR1;
SZ2:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1) AND H/VAR1<1.1 AND L>VAR2 AND CLOSE>VAR1;
SZ3:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>=REF(VAR2,1) AND H/VAR1>1.1;
SZ4:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1) AND CLOSE>VAR2 AND CLOSE<VAR1;
SZ5:=(VAR1>VAR2 AND VAR2>REF(VAR2,1) AND VAR1<>REF(VAR1,1) AND CLOSE<VAR2) OR (VAR1>VAR2 AND VAR1<REF(VAR1,1) AND VAR2<REF(VAR2,1) AND CLOSE<VAR2);;
SZ6:=REF(VAR1,1)>REF(VAR2,1) AND VAR1=VAR2 AND CLOSE<VAR2;
XD1:=VAR1=VAR2 AND CLOSE<VAR2 OR (VAR1<REF(VAR1,1) AND VAR2<REF(VAR2,1) AND REF(VAR1,1)=REF(VAR2,1) AND CLOSE<VAR2);
XD2:=VAR1=VAR2 AND CLOSE>VAR1; 
SAT:=(AMOUNT/C)/(HHV(AMOUNT,N)/HHV(C,N));
���ܱ��Ͷ�:=IF(SAT>1,1,SAT)*100;
IF BARSTATUS=2 AND SZ1 THEN BEGIN 
DRAWTEXTABS(320,25,'�����������߽���'),COLORRED;
END
ELSE
IF BARSTATUS=2 AND SZ2 THEN BEGIN 
DRAWTEXTABS(320,25,'����ͨ����������'),COLORRED;
END
ELSE
IF BARSTATUS=2 AND SZ3 THEN BEGIN 
DRAWTEXTABS(320,25,'�ɼ�ƫ��ע�����'),COLORRED;
END
ELSE
IF BARSTATUS=2 AND SZ4 THEN BEGIN 
DRAWTEXTABS(320,25,'����ͨ������ϴ��'),COLORGREEN;
END
ELSE
IF BARSTATUS=2 AND SZ5 THEN BEGIN 
DRAWTEXTABS(320,25,'ת������ע���볡'),COLORGREEN;
END
ELSE
IF BARSTATUS=2 AND SZ6 THEN BEGIN 
DRAWTEXTABS(320,25,'ͨ���ı����볡'),COLORGREEN;
END
ELSE
IF BARSTATUS=2 AND XD1 THEN BEGIN 
DRAWTEXTABS(320,25,'�µ�ͨ��ֻ�˹���'),COLORGREEN;
END
ELSE
IF BARSTATUS=2 AND XD2 THEN BEGIN 
DRAWTEXTABS(320,25,'���ڵײ�׼������'),COLORYELLOW;
END;
AB1:=COST(0.33);
AB2:=COST(5);
AB3:=COST(15);
AB4:=COST(55);
AB5:=COST(97);
AA1:=COST(90);
AA2:=COST(70);
AA3:=COST(30);
AA4:=COST(10);
����:=WINNER(CLOSE)*100;
����:=100-WINNER(CLOSE)*100;
DRAWTEXTABS(15,25,'���ܱ��Ͷ�:'+NUMTOSTRN(���ܱ��Ͷ�,2)+'%'),COLOR00FFFF;
DRAWTEXTABS(15,40,'90�ɱ�:'+NUMTOSTRN(AA1,2)),COLOR00FFFF;
DRAWTEXTABS(15,55,'70�ɱ�:'+NUMTOSTRN(AA2,2)),COLOR00FFFF;
DRAWTEXTABS(15,70,'30�ɱ�:'+NUMTOSTRN(AA3,2)),COLOR00FFFF;
DRAWTEXTABS(15,85,'10�ɱ�:'+NUMTOSTRN(AA4,2)),COLOR00FFFF;
DRAWTEXTABS(15,100,'�׳���:'+NUMTOSTRN(AB1,2)),COLOR00FFFF;
DRAWTEXTABS(520,25,'����:'+NUMTOSTRN(AB2,2)),COLOR00FFFF;
DRAWTEXTABS(600,25,'�쵶:'+NUMTOSTRN(AB3,2)),COLOR00FFFF;
DRAWTEXTABS(675,25,'����:'+NUMTOSTRN(AB4,2)),COLOR00FFFF;
DRAWTEXTABS(520,40,'����:'+NUMTOSTRN(����,2)+'%'),COLOR00FFFF;
DRAWTEXTABS(600,40,'����:'+NUMTOSTRN(����,2)+'%'),COLOR00FFFF;
DRAWTEXTABS(675,40,'Ԥ��:'+NUMTOSTRN(AB5,2)),COLOR00FFFF;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1;
��׮��:=FILTER(TJ1,5);
TJ2:=IF(BARSLAST(��׮��)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(��׮��)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(��׮��)=3 AND CLOSE>REF(HIGH,3),1,0)));
ͻ��:=TJ2=1;
STICKLINE(CLOSE,REF(HIGH,BARSLAST(��׮��)),REF(HIGH,BARSLAST(��׮��)),6,0),COLORCYAN;
STICKLINE(CLOSE,REF(LOW,BARSLAST(��׮��)),REF(LOW,BARSLAST(��׮��)),6,0),COLORYELLOW;
TJ3:=IF(BARSLAST(��׮��)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(��׮��)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(��׮��)=3 AND CLOSE>REF(LOW,3),1,0)));
���취��:=TJ3=1;
����:=���취�� AND ͻ��;
��������:=FILTER(����,3);
DRAWTEXT(��������,L*0.99,'����'),COLORYELLOW;
DRAWRECTREL(0,85,15,380,RGB(30,30,30)),COLORWHITE;
AAA:=���ܱ��Ͷ�<=10; 
BBB:=���ܱ��Ͷ�>10 AND ���ܱ��Ͷ�<=20;
CCC:=���ܱ��Ͷ�>20 AND ���ܱ��Ͷ�<=30; 
DDD:=���ܱ��Ͷ�>30 AND ���ܱ��Ͷ�<=50;
EEE:=���ܱ��Ͷ�>50 AND ���ܱ��Ͷ�<=70;
FFF:=���ܱ��Ͷ�>70 AND ���ܱ��Ͷ�<=80;
GGG:=���ܱ��Ͷ�>80 AND ���ܱ��Ͷ�<=90;
HHH:=���ܱ��Ͷ�>90;
IF BARSTATUS=2 AND AAA THEN BEGIN DRAWRECTREL(0,350,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND BBB THEN BEGIN DRAWRECTREL(0,320,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND CCC THEN BEGIN DRAWRECTREL(0,290,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND DDD THEN BEGIN DRAWRECTREL(0,230,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND EEE THEN BEGIN DRAWRECTREL(0,170,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND FFF THEN BEGIN DRAWRECTREL(0,140,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND GGG THEN BEGIN DRAWRECTREL(0,110,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND HHH THEN BEGIN DRAWRECTREL(0,85,15,380,RGB(255,0,0));
END;
  ���޴����� 0��һ��ʽ�� ���ǻ۶���ָ��(Դ��) ��һ��ʽ�����ǻ۸߹�������ͻ��ѡ��ָ��(Դ��)��ʲô���⣿�����ǽ��������ö��������|�����Ƽ�|�������� ͨ����423ͨ���š����������ͼ/ѡ�� ���ɱض��ϴ�5 ��׼��׽ǿ�ƹ� ��������ʦ��Ʒ Դ�� ��ͼ�������︱ͼ���������ָ���õ�COST��������ϲ���¡�ʹ�÷���˵�����������ж�ֱ��...�����������