‹ 返回

41763

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

指标公式

LS3:=LLV(HIGH,240);
LS4:=100*(CLOSE-LS3)/LS3;
LS5:=REF(LLV(CLOSE,480),1);
LS6:=REF(HHV(CLOSE,480),1);
LS7:=100*(CLOSE-LS5)/(LS6-LS5);LS8:=(CLOSE-LLV(CLOSE,981))/(HHV(CLOSE,981)-LLV(CLOSE,981))*100;
LS9:=(CLOSE-LLV(CLOSE,393))/(HHV(CLOSE,393)-LLV(CLOSE,393))*100;
LSA:=(CLOSE-LLV(LOW,981))/(HHV(HIGH,981)-LLV(LOW,981))*100;
LSB:=(CLOSE-LLV(LOW,393))/(HHV(HIGH,393)-LLV(LOW,393))*100;
LSC1:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),5);
LSC:=LSC1/4;
LSD:=IF(LSC>23.6,LSC,0);
LSE:=LSC<1;
LSF:=LSD;
LS10:=LS4<LS7 AND LS4<0;
LS11:=1;
LS12:=(HIGH+LOW+CLOSE*2)/4*LS11;
LS13:=EMA(LS12,21);
LS14:=STD(LS12,21);
LS15:=((LS12-LS13)/LS14*100+200)/4*LS11;
LS161:=EMA(LS15,89);
LS16:=(LS161-25)*1.56*LS11;
LS171:=EMA(LS16,5);
LS17:=LS171*1.22*LS11;
LS181:=EMA(LS17,3);
LS18:=LS181*LS11;
LS19:=3*LS17-2*LS18*LS11;
LS1A:=IF(CROSS(LS19,LS17)AND CROSS(LS19,LS18)AND CROSS(LS17,LS18),1,0);
LS1B:=IF(CROSS(LS17,LS19)AND CROSS(LS18,LS19)AND CROSS(LS18,LS17),1,0);
LS1C:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),13)/4;
LS1D1:=EMA(CLOSE,2);
LS1D2:=EMA(CLOSE,89);
LS1D:=LS1D1-LS1D2;
LS1E:=EMA(LS1D,30);
LS1F:=(LS1D-LS1E)*20;
LS20:=POW(LS1F,3)*0.1+POW(LS1F,2);
LS21:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));
LS22:=EMA(LS21*0.97,3);
LS23:=(HIGH+LOW+CLOSE)/3;
LS24:=(LS23-MA(LS23,14))/(0.015*AVEDEV(LS23,14));
LS25:=IF(LS1F>0.015,LS20,0)/45;
LS26:=IF(LS1F<0.015,LS20,0)/45;
ׯ��:(LS25+LS26)/2,COLORyellow;
VAR1ff:= 1;
VAR3ff:= LLV(HIGH,240);
VAR4ff:= 100*(CLOSE-VAR3ff)/vAR3ff*VAR1ff;
VAR5ff:= REF(LLV(CLOSE,480),1)*VAR1ff;
VAR6ff:= REF(HHV(CLOSE,480),1)*VAR1ff;
VAR7ff:= 100*(CLOSE-VAR5ff)/(VAR6ff-VAR5ff)*VAR1ff;
VAR8ff:= (CLOSE-LLV(CLOSE,981))/(HHV(CLOSE,981)-LLV(CLOSE,981))*100*VAR1ff;
VAR9ff:= (CLOSE-LLV(CLOSE,393))/(HHV(CLOSE,393)-LLV(CLOSE,393))*100*VAR1ff;
VARA:= (CLOSE-LLV(LOW,981))/(HHV(HIGH,981)-LLV(LOW,981))*100*VAR1ff;
VARB:= (CLOSE-LLV(LOW,393))/(HHV(HIGH,393)-LLV(LOW,393))*100*VAR1ff;
VARC:= EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),5)/4*VAR1ff;
VARD:= IF(VARC>23.16,VARC,0)*VAR1ff;
VARE:= VARC<1*VAR1ff;
VARF:= VARD*VAR1ff;
VAR10ff:= VAR4ff<0 AND VAR7ff<0;
VAR11ff:= 1;
VAR12ff:= (HIGH+LOW+CLOSE*2)/4*VAR11ff;
VAR13ff:= EMA(VAR12ff,21);
VAR14ff:= STD(VAR12ff,21);
VAR15ff:= ((VAR12ff-VAR13ff)/vAR14ff*100+200)/4*VAR11ff;
VAR16ff:= (EMA(VAR15ff,89)-25)*1.56*VAR11ff;
VAR17ff:= EMA(VAR16ff,5)*1.22*VAR11ff;
VAR18ff:= EMA(VAR17ff,3)*VAR11ff;
VAR19ff:= 3*VAR17ff-2*VAR18ff*VAR11ff;
VAR1A:= IF(CROSS(VAR19ff,VAR17ff) AND CROSS(VAR19ff,VAR18ff) AND CROSS(VAR17ff,VAR18ff),1,0);
VAR1B:= IF(CROSS(VAR17ff,VAR19ff) AND CROSS(VAR18ff,VAR19ff) AND CROSS(VAR18ff,VAR17ff),1,0);
VAR1C:= EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),13)/4*VAR1ff;
VAR1D:= EMA(CLOSE,2)-EMA(CLOSE,89)*VAR1ff;
VAR1E:= EMA(VAR1D,30)*VAR1ff;
VAR1F:= 2*(VAR1D-VAR1E)*10*VAR1ff;
VAR20ff:= POW(VAR1F,3)*0.1+POW(VAR1F,2)*VAR1ff;
VAR21ff:= SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));
VAR22ff:= EMA(VAR21ff*0.97,3)*VAR1ff;
VAR23ff:= (HIGH+LOW+CLOSE)/3*VAR1ff;
VAR24ff:= (VAR23ff-MA(VAR23ff,14))/(0.015*AVEDEV(VAR23ff,14))*VAR1ff;
VAR25ff:= IF(YEAR<2009 AND VAR1F>0.015,VAR20ff,0)/45*VAR1ff;
����: VAR25ff,LINETHICK7,COLOR0000FF,pointdot;
VAR26ff:= EMA(CLOSE,2)-EMA(CLOSE,150);
VAR27ff:= EMA(VAR26ff,100);
VAR28ff:= 2*(VAR26ff-VAR27ff);
VAR29ff:= POW(VAR28ff,3)*0.1+POW(VAR28ff,1);
VAR2A:= SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));
VAR2B:= EMA(VAR2A*0.97,3);
VAR2C:= (HIGH+LOW+CLOSE)/3;
VAR2D:= (VAR2C-MA(VAR2C,14))/(0.015*AVEDEV(VAR2C,14));
����: IF(VAR28ff>0.1,VAR29ff,0)*5,LINETHICK1,COLORFFFFFF,pointdot;
PJJQTR:=DMA((H + L + C * 2) / 4,0.9);
JJQTR:=REF(EMA(PJJQTR,3),1);
QJJQTR:=VOL / ((H - L) * 2 - ABS(C - O));
XVLQTR:=IF(C > O,QJJQTR * (H - L),IF(C < O,QJJQTR * (H - O + (C - L)),VOL / 2)) + IF(C > O,0 - QJJQTR * (H - C + (O - L)),IF(C < O,0 - QJJQTR * (H - L),0 - VOL / 2));
ZLLQTR:=VOL / CAPITAL;
HSL1QTR:=IF(ZLLQTR > 10,10,ZLLQTR);
HSLQTR:=XVLQTR / 20 / 1.15;
��������A:=HSLQTR * 0.55 + REF(HSLQTR,1) * 0.33 + REF(HSLQTR,2) * 0.22;
GJJA:=EMA(��������A,8);
���A:=GJJA*1000;
PJJ:=DMA((H + L + C * 2) / 4,0.9);
JJ:=REF(EMA(PJJ,3),1);
QJJ:=VOL / ((H - L) * 2 - ABS(C - O));
XVL:=IF(C > O,QJJ * (H - L),IF(C < O,QJJ * (H - O + (C - L)),VOL / 2)) + IF(C > O,0 - QJJ * (H - C + (O - L)),IF(C < O,0 - QJJ * (H - L),0 - VOL / 2));
ZLL:=VOL / CAPITAL;
HSL1:=IF(ZLL > 10,10,ZLL);
HSL:=XVL / 20 / 1.15;����:HSL / 1000,COLOR9B37FF;
ZLCM:=EMA(WINNER(CLOSE)*70,3);
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);
ZSHTL:=SHCM/(ZLCM+SHCM)*100;
ZZLKP:=ZLCM/(ZLCM+SHCM)*100;
ZCMZL:=MA(ZLCM+SHCM,13);
ZZNTS:=BARSLAST(ZSHTL<90 AND REF(ZSHTL,1)>90);
ZSHJJ:=EMA(ZSHTL,89);
ZZLJJ:=EMA(ZZLKP,89);
ZJLRQD:=INTPART(ZZLKP-ZZLJJ);
SH8:=EMA(ZSHTL,8);
DKB:=IF(ZZLKP-REF(ZZLKP,1)>ZSHTL-REF(ZSHTL,1),1,0);
����:INTPART(ZZLKP),LINETHICK0,COLORCYAN;
��ǿ:ZJLRQD,LINETHICK0,COLORRED;���ܶ�LLL:=(CLOSE-MA(CLOSE,30))/MA(CLOSE,20)*120;
����:EMA(EMA(���ܶ�LLL,30),3)*20,COLORRED,LINETHICK2;
����:EMA(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3),colorred,pointdot;
������:EMA(100*(INDEXC-LLV(INDEXL,34))/(HHV(INDEXH,34)-LLV(INDEXL,34)),3),
colorgreen,pointdot;
���������:INTPART(ZCMZL),LINETHICK0,COLORGREEN;
ɢ������ϵ��:INTPART(ZSHTL),LINETHICK0,COLORWHITE;
TJTS:=BARSTATUS=2;
DRAWTEXT(TJTS and ZCMZL>REF(ZCMZL,1) AND DKB=1,���A*1.525,'���������أ���������                                                                   '),COLORRED,ALIGN2;
DRAWTEXT(TJTS and ZCMZL>REF(ZCMZL,1) AND DKB=0,���A*1.525,'���������أ���������                                                                   '),COLORMAGENTA,ALIGN2;
DRAWTEXT(TJTS and ZCMZL=REF(ZCMZL,1),���A*1.525,'���������أ����ƽ��                                                                   '),COLORGRAY,ALIGN2;
DRAWTEXT(TJTS and ZCMZL<REF(ZCMZL,1) AND DKB=1,���A*1.525,'���������أ������ز�                                                                   '),COLORFF9933,ALIGN2;
DRAWTEXT(TJTS and ZCMZL<REF(ZCMZL,1) AND DKB=0,���A*1.525,'���������أ���������                                                                   '),COLORGREEN,ALIGN2;
DRAWTEXT(TJTS and ZSHTL>90, ���A*1.8,'�ر��ź���ʾ������ɢ����                                                                   '),COLOR66FFCC,ALIGN2;
DRAWTEXT(TJTS and ZZLKP>75, ���A*1.8,'�ر��ź���ʾ������������                                                                 '),COLORCYAN,ALIGN2;
DRAWTEXT(TJTS and CROSS(ZCMZL,ZZLJJ) AND ZZLKP>ZZLJJ AND ZZLKP>10 AND ZZLJJ>REF(ZZLJJ,1) AND ZCMZL>REF(ZCMZL,1), ���A*1.8525,'�ر��ź���ʾ����Խ����                                                                   '),COLORRED,ALIGN2;
DRAWTEXT(TJTS and CROSS(ZCMZL,ZZLKP) AND ZZLKP>ZZLJJ AND ZZLKP<ZSHTL AND ZZLKP>10 AND ZZLJJ>REF(ZZLJJ,1) AND ZCMZL>REF(ZCMZL,1), ���A*1.8,'�ر��ź���ʾ����Խ����                                                                   '),COLORYELLOW,ALIGN2;
DRAWTEXT(TJTS and CROSS(ZCMZL,ZSHTL) AND ZSHTL>ZZLKP AND ZCMZL>REF(ZCMZL,1), ���A*1.8,'�ر��ź���ʾ����Խɢ��                                                                   '),COLORGREEN,ALIGN2;
DRAWTEXT(TJTS and CROSS(ZCMZL,100) AND ZCMZL>REF(ZCMZL,1), ���A*1.8,'�ر��ź���ʾ��ȫ�̴�Խ                                                                   '),COLOR3399FF,ALIGN2;
DRAWTEXT(TJTS and REF(ZSHTL,1)>90 AND ZSHTL<90, ���A*1.8,'�ر��ź���ʾ�����غڶ�                                                                   '),COLOR9966FF,ALIGN2;
RSV:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
K1:=SMA(RSV,10,1);
D1:=SMA(K1,5,1);
KK:=INTPART(K1);
DD:=INTPART(D1);
TFXXS:=KK+DD;
TGLD:=MOD(TFXXS,10);
TGLXS:=(TFXXS-REF(TFXXS,1))*10;
TYCFX:=TFXXS+TGLXS;
DRAWTEXT(BARSTATUS=2 and TFXXS<=50, ���A*1.8525,'����������ʾ���������'),COLORYELLOW,ALIGN2;
DRAWTEXT(BARSTATUS=2 and TFXXS>=160, ���A*1.8525,'����������ʾ����������'),COLORCYAN,ALIGN2;
DRAWTEXT(BARSTATUS=2 and TFXXS>50 AND TFXXS<160 AND TFXXS>=REF(TFXXS,1) AND TFXXS<=100, ���A*1.8525,'����������ʾ��׷�Dz���'),COLORRED,ALIGN2;
DRAWTEXT(BARSTATUS=2 and TFXXS>50 AND TFXXS<160 AND TFXXS>=REF(TFXXS,1) AND TFXXS>100, ���A*1.8525,'����������ʾ���Ƚ��ֹ�'),COLORMAGENTA,ALIGN2;
DRAWTEXT(BARSTATUS=2 and TFXXS>50 AND TFXXS<160 AND TFXXS<REF(TFXXS,1) AND TFXXS>100, ���A*1.8525,'����������ʾ���̵�����'),COLORWHITE,ALIGN2;
DRAWTEXT(BARSTATUS=2 and TFXXS>50 AND TFXXS<160 AND TFXXS<REF(TFXXS,1) AND TFXXS<=100, ���A*1.8525,'����������ʾ��ɱ���ղ�'),COLORGREEN,ALIGN2;
��������:=HSL * 0.55 + REF(HSL,1) * 0.33 + REF(HSL,2) * 0.22;
GJJ:=EMA(��������,8);
LLJX:=EMA(��������,3);
����:LLJX,COLORC875B7;
STICKLINE(���� > 0,����*1000,0,4,0),COLOR0000FF;
STICKLINE(���� < 0,����*1000,0,4,0),COLORFF4242;
��������:GJJ,COLOR00BBBB;
ZJLL:=REF(LLJX,1);
QZJJ:=(((LLJX - ZJLL) / ZJLL) * 100);
STICKLINE(HSL * 0.4 >= 0,HSL * 0.4 * 1.5*1000,0,0,1),COLORYELLOW;
STICKLINE(HSL * 0.4 < 0,HSL * 0.4 * 1.5*1000,0,0,1),Color95FF95;
ZJLL:=REF(LLJX,1);
QZJJ:=(((LLJX - ZJLL) / ZJLL) * 100);
������:IF(((LLJX > 0) AND (ZJLL < 0)),ABS(QZJJ),IF((((LLJX <