哪位高手给我做个捉大妖的预警公式谢谢

zhengfughmd

{================背景 ================};
DRAWGBK(ISLASTBAR, RGB(60,60,60),RGB(0,0,0),0,'0',0);
字:=STRCAT(STRCAT(STRCAT('名称: ',STKNAME),' 代码: '),CODE);
DRAWTEXT_FIX(ISLASTBAR,0.8,0,0,字),COLORYELLOW;
更多精准指标:INDEXADV,COLORMAGENTA ,NODRAW; 联系:INDEXADV,COLORYELLOW,NODRAW; QQ2605887666:INDEXADV,COLORMAGENTA ,NODRAW;

N:=2;M:=30;
MA(H,M) * (1 + 13 / 100) * 1.0382,LINETHICK1,COLORYELLOW  ;
MA(H,M) * (1 + 13 / 100),LINETHICK1,COLORYELLOW  ;

EMA(L,30) * (1 - 15 / 100),COLORGREEN ,  NODRAW ;
EMA(L,30) * (1 - 15 / 100) * 0.82,NODRAW, COLORGREEN ;
GUAIXIANTAITOUEMA(C,5) * 7 + EMA(C,10) * 3) / 10,LINETHICK2,COLORWHITE;
A1:=(H + L + O + C) / 4;
A2:=EMA(A1,13) - EMA(A1,34);
A3:=EMA(A2,5);
A4:=(A2 - A3) * 5;
A5:=IF(A4 >= 1000,1000,IF(A4 <= A1,A1,A4));
A6:=FORCAST(FORCAST(A5,32),10);
A7:=(C - EMA(C,13)) / EMA(C,13) * (0 - 100);
A8:=EMA(A7 / 10 + EMA(C,13),8);
A9:=EMA(C,3);
A10:=EMA(SLOPE(C,22) * 20 + C,45);
A11:=IF(PERIOD >8 AND PERIOD < 11,MA(A10,1),IF(PERIOD = 8,MA(A10,4),IF(PERIOD = 7,MA(A10,8),IF(PERIOD = 6,MA(A10,16),IF(PERIOD = 5,MA(A10,32),0)))));
A12:=A11 * 0.865;
A13:=IF(A9 > A11,A9,A12);
买卖线:REVERSE(A13) + 2 * A6,    , COLORMAGENTA;
DRAWTEXT(ISLASTBAR,买卖线,'上穿卖下穿买'),COLORMAGENTA  ;
拐点:IF(EMA((1 - C / SMA(C,5,1)) * 100 * C / 100 + EMA(C,13),9) < GUAIXIANTAITOU AND GUAIXIANTAITOU > 买卖线,EMA((1 - C / SMA(C,5,1)) * 100 * C / 100 + EMA(C,13),9),GUAIXIANTAITOU),LINETHICK2, COLORRED  ;
IF(GUAIXIANTAITOU <= 买卖线,GUAIXIANTAITOU,DRAWNULL),LINETHICK3,COLORGREEN;
DRAWTEXT(ISLASTBAR,拐点,'红线开口主升'),COLORRED;
A14:=C * V;
A15:=EMA((EMA(A14,3) / EMA(V,3) + EMA(A14,6) / EMA(V,6) + EMA(A14,12) / EMA(V,12) + EMA(A14,24) / EMA(V,24)) / 4,13);
A16:=1.06 * A15;
A17:=(C - REF(C,1)) / REF(C,1) * 100 > 8.5;
A18:=EMA(H,10) * (1 + 5 / 100);
捉妖:CROSS(GUAIXIANTAITOU,MA(H,30) * (1 + 13 / 100)) * 10,NODRAW;
A19:=(C - O) / REF(C,1) * 100;
A20:=REF(H,N) = HHV(H,2 * N + 1);
A21:=FILTER(A20,N);
A22:=BACKSET(A21,N + 1);
A23:=FILTER(A22,N);
A24:=REF(L,N) = LLV(L,2 * N + 1);
A25:=FILTER(A24,N);
A26:=BACKSET(A25,N + 1);
A27:=FILTER(A26,N);
A28:=(REF(LLV(L,2 * N),1) + REF(HHV(H,2 * N),1)) / 2;
A29:=(H + L) / 2;
A30:=(A23 AND NOT(A27 AND A28 >= A29)) OR ISLASTBAR OR BARSCOUNT(C) = 1;
A31:=A27 AND NOT(A23 AND A28 < A29);
A32:=REF(BARSLAST(A30),1) + 1;
A33:=BACKSET(A30 AND COUNT(A31,A32) > 0,LLVBARS(IF(A31,L,10000),A32));
A34:=A33 > REF(A33,1);
A35:=BACKSET(A34,2);
A36:=A35 > REF(A35,1);
A37:=A36 OR ISLASTBAR OR BARSCOUNT(C) = 1;
A38:=REF(BARSLAST(A37),1) + 1;
A39:=BACKSET(A37 AND COUNT(A23 AND NOT(A27 AND A28 >= A29),A38) > 0,HHVBARS(IF(A23 AND NOT(A27 AND A28 >= A29),H,0),A38));
A40:=A39 > REF(A39,1);
A41:=BACKSET(A40,2);
A42:=A41 > REF(A41,1);
A43:=BACKSET(ISLASTBAR,BARSLAST(A42) + 1);
A44:=A43 > REF(A43,1);
A45:=BACKSET(A44,REF(BARSLAST(A42),1) + 2);
A46:=A45 > REF(A45,1);
短期压力RAWLINE(A46,H,A44,H,1),NODRAW  ,COLORGREEN ;
STICKLINE(GUAIXIANTAITOU >= 买卖线,C,H,0,0),COLORRED;
STICKLINE(GUAIXIANTAITOU >= 买卖线 AND C > O,C,O,2.5,1),COLORRED;
STICKLINE(GUAIXIANTAITOU >= 买卖线,L,O,0,0),COLORRED;
STICKLINE(GUAIXIANTAITOU >= 买卖线 AND C <= O,O,C,3,1),COLORRED;
STICKLINE(GUAIXIANTAITOU >= 买卖线 AND C <= O,O,C,1,0),COLORAAAA00;
STICKLINE(GUAIXIANTAITOU < 买卖线 AND C <= O,C,O,1.5,0),COLORCYAN;
STICKLINE(GUAIXIANTAITOU < 买卖线 AND C <= O,O,H,0,0),COLORCYAN;
STICKLINE(GUAIXIANTAITOU < 买卖线 AND C <= O,L,C,0,0),COLORCYAN;
STICKLINE(GUAIXIANTAITOU < 买卖线 AND C >= O,L,O,0,0),COLORCYAN;
STICKLINE(GUAIXIANTAITOU < 买卖线 AND C >= O,C,H,0,0),COLORCYAN;
STICKLINE(GUAIXIANTAITOU < 买卖线 AND C >= O,O,C,2.5,1),COLORCYAN;
STICKLINE(A17 > 0 AND CROSS(MA(C,1),A18) AND CROSS(MA(C,1),A16),(L + H + O) / 3,O,3,0),COLORRED;
STICKLINE(A17 > 0 AND CROSS(MA(C,1),A18) AND CROSS(MA(C,1),A16),(H + O) / 2,C,3,0),COLORYELLOW;
STICKLINE(A17 > 0 AND CROSS(MA(C,1),A18) AND CROSS(MA(C,1),A16),(H + O) / 2,(L + H + O) / 3,3,0),COLORFF0000;
STICKLINE(CROSS(GUAIXIANTAITOU,MA(H,30) * (1 + 13 / 100)),MA(H,30) * (1 + 13 / 100),MA(H,30) * (1 + 13 / 100) * 1.0052,8,0),COLORYELLOW;
STICKLINE(C >= REF(C,1) * 1.095 AND C = O AND L < C,C,O,5,0),COLORWHITE;
STICKLINE(C >= REF(C,1) * 1.095 AND C = O AND L < C,C,L,0,0),COLORWHITE;
STICKLINE(A19 > 7.5 AND REF(A19,1) < -5 AND C > REF(O,1),H,L,0,0),COLORFF0099;
STICKLINE(A19 > 7.5 AND REF(A19,1) < -5 AND C > REF(O,1),C,O,3,0),COLORFF0099;
DRAWTEXT(CROSS(GUAIXIANTAITOU,买卖线),L*0.98,'B'),LINETHICK3,COLORYELLOW;
DRAWTEXT(CROSS(买卖线,GUAIXIANTAITOU),H * 1.02,'S'),LINETHICK3,COLORGREEN;
DRAWTEXT(FILTER(CROSS(GUAIXIANTAITOU,EMA((1 - C / SMA(C,5,1)) * 100 * C / 100 + EMA(C,13),9)),10),GUAIXIANTAITOU,'拐点'),COLORYELLOW;
DRAWTEXT(A17 > 0 AND CROSS(MA(C,1),A18) AND CROSS(MA(C,1),A16),(H + O) / 2,' 追击'),LINETHICK1,COLORYELLOW;
DRAWTEXT(FILTER(CROSS(GUAIXIANTAITOU,MA(H,30) * (1 + 13 / 100)),5),MA(H,30) * (1 + 13 / 100) * 0.88,'↖捉大妖'),COLORYELLOW;
{=====================================}
VAR22:=IF(((YEAR) >= (2019)) AND ((MONTH) > 3),0,1);
VAR33:=(MA(C,3) + MA(C,6) + MA(C,12) + MA(C,24)) / 4 + ((1.88) * (STD((MA(C,3) + MA(C,6) + MA(C,12) + MA(C,24)) / 4,9))) * (VAR22);
急拉涨停线(MA(VAR33,12)) * (1.06)) * (VAR22),LINETHICK2,COLORCYAN ;
VAR55:=(EMA(H,10)) * (1 + 5 / (100));
VAR6:=C * V;
VAR7:=EMA(((EMA(VAR6,3)) / (EMA(V,3)) + (EMA(VAR6,6)) / (EMA(V,6)) + (EMA(VAR6,12)) / (EMA(V,12)) + (EMA(VAR6,24)) / (EMA(V,24))) / 4,13);
VAR8:=(1.06) * (VAR7);
VAR9:=(L / ((H + REF(C,1) + O) / 3)) * C;
DRAWTEXT(((CROSS(VAR9,VAR8)) AND (C > (VAR55))) AND (C > (急拉涨停线)),L,'▲'),LINETHICK1,COLORYELLOW;
{==========开口捉妖多彩K线========}
NN:=5;MM:=3;
VAR0:=((EMA(C,5)) * 7 + (EMA(C,10)) * 3) / 10;
VAR1:=IF((YEAR) >= (2025),0,1);
VAR2:=EMA(EMA(L,21) + (6.8) * (STD(L,2)),55);
VAR3:=EMA(((C / (VAR2)) * ((1.88) * C + L + O)) / (2.75),3);
VAR4:=(((VAR3) - (VAR2)) / (VAR2)) / 2;
VAR5:=(EMA((VAR3) - ((VAR4) * (VAR3)),5)) * (VAR1);
黄金轨道IF((VAR0) > (VAR5),VAR0,VAR5)) * (VAR1),NODRAW  ,COLORRED ;{红线}
上轨:IF(((VAR5) < (VAR0)) AND ((VAR5) < (C * (0.15))),(EMA(C,300)) - (3 * (STD(C,300))),VAR5),NODRAW  ,COLORYELLOW;{黄线}
IF((VAR5) > (VAR0),上轨,DRAWNULL),COLORCYAN  ,NODRAW  ;{中轴}
VAR10:=(((SMA(MAX(C - (REF(C,1)),0),24,1)) / (SMA(ABS(C - (REF(C,1))),24,1))) * (100)) * (VAR1);
VAR13:=((SMA(MAX(C - (REF(C,1)),0),14,1)) / (SMA(ABS(C - (REF(C,1))),14,1))) * (100);
VAR14:=(EMA(C,60) + EMA(C,120) + EMA(C,240) + EMA(C,480)) / 4;
VAR15:=VAR14 + (1.91) * (STD(VAR14,3));
VAR16:=(EMA(VAR15,12)) * (1.23);
{红色中线}
STICKLINE((((VAR10) > 65) AND ((VAR13) >= 65)) AND ((MA(C,1)) > (VAR16)),H,L,0,0),COLORRED;
{红色}
STICKLINE((((VAR10) >= (64.5)) AND ((VAR13) >= 65)) AND ((MA(C,1)) > (VAR16)),C,O,3,0),COLORRED;
VAR37:=((L + H) / 2);
VAR39:=(EMA((C + L + H) / 3,1));
{黄色}
STICKLINE(((((VAR10) >= (64.5)) AND ((VAR13) >= 65)) AND ((MA(C,1)) > (VAR16))) AND ((MA(C,1)) > ((MA(H,30)) * (1 + 15 / (100)))),O,(VAR37 + L) / 2,3,0),COLORYELLOW;
{白色}
STICKLINE(((C > ((MA(H,30)) * (1 + 18 / (100)))) AND (C > (VAR5))) AND ((VAR10) > (64.5)),VAR39,VAR37,3,0),COLORWHITE;
{================超牛=================}
转强:=100*(C-REF(C,12))/REF(C,12);
超强:=((H+L+C)/3-MA((H+L+C)/3,88))/(0.015*AVEDEV((H+L+C)/3,88));
通道:=1.07*DMA(C,ABS((2*C+H+L)/4-MA(C,26))/MA(C,26));
趋势:=MA(ATAN(通道-REF(通道,1)),3);
QS1:=IF((C>O OR C<O) AND H>=REF(C,1),ATAN(MA(H,5)*1.02-REF(MA(C,5)*1.02,1)),0);
QS2:=IF((C>O OR C<O) AND H<REF(C,1),-ATAN(REF(MA(C,5)*1.02,1)-MA(H,5)*1.02),0);
分界:=MA(REF((QS1+QS2),1),26);
强势:=趋势>分界 AND 趋势>REF(趋势,1);
超级牛股:=强势 AND 超强>200 AND  转强>20  AND C>REF(C,1);
DRAWTEXT(超级牛股,L*0.95,'↖龙'),COLORYELLOW  ,LINETHICK2;

{================走强线 ================};
HM1:=ABS(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,20))/EMA(CLOSE,20));
HM2:=DMA(((2.15*CLOSE+LOW+HIGH)/4),HM1);
走强线:EMA(HM2,200)*1.118 ,LINETHICK1,COLORRED;
DRAWTEXT(ISLASTBAR,走强线,'  ←走强线'),COLORRED;
A:=EMA((EMA(CLOSE,29)+EMA(CLOSE,31)+EMA(CLOSE,33))/3,3),COLORYELLOW,LINETHICK1;
轴线:REF(A,1),COLORWHITE ,LINETHICK1;

锦绣人生

谢谢楼主的分享！

cwyyx

谢谢楼主分享

kjjzsl

学习学习学习

大盘密钥

ok
TOU:=EMA(C,5) * 7 + EMA(C,10) * 3 /10;
捉妖:CROSS(TOU,MA(H,30) * (1 + 13 / 100)) * 10;

大盘密钥

转强:=100*(C-REF(C,12))/REF(C,12);
超强:=((H+L+C)/3-MA((H+L+C)/3,88))/(0.015*AVEDEV((H+L+C)/3,88));
通道:=1.07*DMA(C,ABS((2*C+H+L)/4-MA(C,26))/MA(C,26));
趋势:=MA(ATAN(通道-REF(通道,1)),3);
QS1:=IF((C>O OR C<O) AND H>=REF(C,1),ATAN(MA(H,5)*1.02-REF(MA(C,5)*1.02,1)),0);
QS2:=IF((C>O OR C<O) AND H<REF(C,1),-ATAN(REF(MA(C,5)*1.02,1)-MA(H,5)*1.02),0);
分界:=MA(REF((QS1+QS2),1),26);
强势:=趋势>分界 AND 趋势>REF(趋势,1);
超级牛股:强势 AND 超强>200 AND  转强>20  AND C>REF(C,1);

zhengfughmd

大盘密钥 发表于 2020-10-3 09:07
转强:=100*(C-REF(C,12))/REF(C,12);
超强:=((H+L+C)/3-MA((H+L+C)/3,88))/(0.015*AVEDEV((H+L+C)/3,88)); ...

虽然不是与我要的不一样但是还是非常感谢您的付出。