通达信飓风仿制主图指标公式

所属板块:=STRCAT('【所属板块】'STRCAT(STRCAT(STRCAT(' [行业]—'HYBLOCK)STRCAT(' [地域]—'DYBLOCK))STRCAT(' [概念]—'GNBLOCK)));
DRAWTEXT_FIX(ISLASTBAR0.0050.050所属板块)COLOR00C0C0;
K2:=1;
A:=EMA((EMA(C29)+EMA(C31)+EMA(C33))/33);
A1:=EMA((EMA(C1)+EMA(C3)+EMA(C5))/33)COLOR1010FF;
A3:=IF(K2!=2EMA((EMA(C5)+EMA(C6)+EMA( C7))/33)DRAWNULL)COLORCYANLINETHICK3;{COLOR1030FF;}
A4:=IF(K2!=2 EMA((EMA(C7)+EMA(C9)+EMA( C11))/33)DRAWNULL)COLOR1040FF;
A5:=IF(K2!=2 EMA((EMA(C9)+EMA(C11)+EMA( C13))/33)DRAWNULL)COLOR1050FF;
A6:=IF(K2!=2 EMA((EMA(C11)+EMA(C13)+EMA( C15))/33)DRAWNULL)COLOR1060FF;
A7:=IF(K2!=2 EMA((EMA(C13)+EMA(C15)+EMA( C17))/33)DRAWNULL)COLOR1070FF;
A8:=IF(K2!=2 EMA((EMA(C15)+EMA(C17)+EMA( C19))/33)DRAWNULL)COLOR1080FF;
A9:=IF(K2!=2 EMA((EMA(C17)+EMA(C19)+EMA( C21))/33)DRAWNULL)COLORLIMAGENTA;{COLOR1080EF;}
A10D:=IF(K2!=2 EMA((EMA(C19)+EMA(C21)+EMA( C23))/33)DRAWNULL)COLORLIMAGENTA;{COLOR10C0FF;}
A11D:=IF(K2!=2 EMA((EMA(C21)+EMA(C23)+EMA( C25))/33)DRAWNULL)COLORWHITELINETHICK2;
A15D:IF(K2!=2 A-(A1-A*0.977)DRAWNULL)COLORBLUELINETHICK3;{COLORFF0000;原997}
A24D:=IF(K2!=2 A-(A10D-A)DRAWNULL)COLORF6D030;
A25D:=IF(K2!=2 A-(A11D-A*0.987)DRAWNULL)COLORF5F030;{原997}
AK2:=IF(K2=2EMA((EMA(C5)+EMA(C7)+EMA( C9))/33)DRAWNULL);
AK1:=IF(K2=2A-(A1-A*0.987)DRAWNULL);{原997}
{5日变色线}
越过成仙M240:=MA(C240)COLORGRAYLINETHICK1;
M144:=MA(C144)COLORWHITELINETHICK1;
M88:=MA(C88)COLORLIGRAYLINETHICK1;
越过有道M120:=MA(C120)COLORMAGENTALINETHICK1;
{越过强势M60:MA(C60)COLORGREENLINETHICK3;}
M30:=MA(C27)COLORGREENLINETHICK2;
M20:=MA(C17)COLORMAGENTALINETHICK2;
M10:=MA(C10)COLORWHITELINETHICK1;
M5:MA(C3)COLORREDLINETHICK3;
BB55:=ATAN((M5/REF(M51)-1)*100)*180/3.1416;
IF(BB55>30 AND M5>REF(M51) M5DRAWNULL)COLORREDLINETHICK3;
BB100:=ATAN((M10/REF(M101)-1)*100)*180/3.1416;
IF(BB55<0 AND M5<REF(M51) M5DRAWNULL)COLORCYANLINETHICK2;
V1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE20))/MA(CLOSE20);
V2:=(1-7/100)*(DMA(CLOSEV1));
{变色下插支撑线}
{YM:=EMA(SLOPE((CLOSE+HIGH+LOW)/324)*20+(CLOSE+HIGH+LOW)/340);
YM1:=EMA(YM1)NODRAW;
YM2:=EMA(YM12)NODRAW;
DRAWBAND(YM1RGB(24012080)YM2RGB(4024050));{变色条。如喜欢可以去掉括号}
{下插操作线}
{6、绿色新中操作线，无未来}
BR:=MA(CLOSE13)+MA(CLOSE13)-REF(MA(CLOSE13)1);
分水岭R:=IF(MA(CLOSE17)<BRBRMA(CLOSE17))COLORFF00FFNODRAW;
YR:=分水岭R-(EMA(C3)-分水岭R)COLORGREENLINETHICK2;
{多方上穿Y1变红色}
{IF(M5>REF(YR1)YRDRAWNULL)COLORYELLOWLINETHICK2;}
OUTF:=CROSS(M5YR);
{DRAWICON(OUTFL*1.219);}
越过强势M60:=MA(C60)COLORWHITELINETHICK2;{60日均线};
B55:=ATAN((A15D/REF(A15D1)-1)*100)*180/3.1416;
IF(55>30 AND A15D>REF(A15D1) A15DDRAWNULL)COLORCYANLINETHICK3;
B100:=ATAN((M5/REF(M51)-1)*100)*180/3.1416;
IF(B55<0 AND A15D<REF(A15D1) A15DDRAWNULL)COLORREDLINETHICK3;
OUT1:=CROSS(M5A15D);
IF(M5>REF(A31)A3DRAWNULL)COLORYELLOWLINETHICK5;{黄金支撑线}
DRAWICON(OUT1L*0.9813);
DRAWICON(OUTFL*1.119);
DRAWTEXT(ISLASTBAR M5' M5')COLORYELLOW ;
DRAWTEXT(ISLASTBAR A15D' A15D')COLORRED ;
涨停:=BETWEEN(CLOSE/REF(CLOSE1)1.09841.110) AND C=H AND C>O;
R1:=(C>REF(C1) AND C>REF(C2));
R2:=(REF(R11) AND C<=REF(C1) AND C>=REF(C2));
R3:=(REF(R21) AND C>=REF(C1) AND C<=REF(C2));
R4:=(REF(R31) AND C<=REF(C1) AND C>=REF(C2));
R5:=(REF(R41) AND C>=REF(C1) AND C<=REF(C2));
R6:=(REF(R51) AND C<=REF(C1) AND C>=REF(C2));
R7:=(REF(R61) AND C>=REF(C1) AND C<=REF(C2));
R8:=(REF(R71) AND C<=REF(C1) AND C>=REF(C2));
R9:=(REF(R81) AND C>=REF(C1) AND C<=REF(C2));
RA:=(REF(R91) AND C<=REF(C1) AND C>=REF(C2));
RB:=(REF(RA1) AND C>=REF(C1) AND C<=REF(C2));
RC:=(REF(RB1) AND C<=REF(C1) AND C>=REF(C2));
RD:=(C<REF(C1) AND C<REF(C2));
RE:=(REF(RD1) AND C>=REF(C1) AND C<=REF(C2));
RF:=(REF(RE1) AND C<=REF(C1) AND C>=REF(C2));
R10:=(REF(RF1) AND C>=REF(C1) AND C<=REF(C2));
R11:=(REF(R101) AND C<=REF(C1) AND C>=REF(C2));
R12:=(REF(R111) AND C>=REF(C1) AND C<=REF(C2));
R13:=(REF(R121) AND C<=REF(C1) AND C>=REF(C2));
R14:=(REF(R131) AND C>=REF(C1) AND C<=REF(C2));
R15:=(REF(R141) AND C<=REF(C1) AND C>=REF(C2));
R16:=(REF(R151) AND C>=REF(C1) AND C<=REF(C2));
R17:=(REF(R161) AND C<=REF(C1) AND C>=REF(C2));
R18:=(REF(R171) AND C>=REF(C1) AND C<=REF(C2));
R19:=((REF(RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R181)) AND R1);
R1A:=((REF(R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC1)) AND RD);
蓝心板:=REF(RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R181);
RSV9:=(C-LLV(LOW9))/(HHV(HIGH9)-LLV(LOW9))*100;
K1:=SMA(RSV931);
DK1:=K1-REF(K11);
出手就赢:=IF(DK1>7 AND REF(DK11)<0 AND (DK1-REF(DK11))>9500);
绿心板:=(出手就赢=50 OR REF("KDJ.J"1)<0) AND "KDJ.J">0;
红心板:=蓝心板 AND 绿心板;
绿心过滤:=IF((蓝心板)DRAWNULL绿心板);
蓝心过滤:=IF((绿心板)DRAWNULL蓝心板);
{STICKLINE(涨停OC3.61)COLORYELLOW;
STICKLINE(涨停 AND 蓝心过滤OC0.40)COLORBLUE;
STICKLINE(涨停 AND 绿心过滤OC0.40)COLORGREEN;
STICKLINE(涨停 AND 红心板OC0.40)COLORRED;};
VAR11A:=DMA(AMOUNT/VOL/100VOL/CAPITAL);
VAR4AA:=CLOSE/(REF(CLOSE1))>1.05 AND (HIGH/CLOSE<1.01);{1.05;1.01}
游资进场:=(FILTER(VAR4AA>034)AND DYNAINFO(4)>0)*8COLORYELLOW;
LS:=C/REF(C1)>1.048 AND C=H AND BETWEEN(FORCAST(V4)0.2*FORCAST(V12)2.1*FORCAST(V12));
拉升:=FILTER(LS28);
DRAWTEXT(游资进场=8L*0.90'---飓风口')COLORCYAN;
STICKLINE(游资进场L*0.91L*0.9820)COLORBLUE;
VARR1:=(C+H+O+L)/4;
AA1:=XMA(VARR120)*(1+80/1000);
BB1:=XMA(VARR132)*(1-100/1000);
SJXZ:=IF(DATE<193112810);
通道上轨:=AA1*SJXZCOLORYELLOWLINETHICK2;
通道下轨:=BB1*SJXZCOLORREDLINETHICK2;
STICKLINE(BB1>LOW AND BB1<HIGH AND A15D>M5BB1MIN(MIN(OPENCLOSE)BB1)30)COLORF00FF0;
STICKLINE(BB1>MIN(CO) AND BB1<MAX(CO) AND A15D>M5BB1MIN(OPENCLOSE)30)COLORF00FF0;
STICKLINE(BB1>HIGH AND A15D>M5OPENCLOSE30)COLORF00FF0;
STICKLINE(BB1>HIGH AND A15D>M5HIGHLOW00)COLORF00FF0;
坑后上涨:=CROSS(BB1>HIGH AND C<M5 AND C< A15D AND A15D>M50.99);
DRAWTEXT(坑后上涨H*1.09'★坑后上涨')COLORCYAN;
STICKLINE(坑后上涨H*1.0055H*1.085510)COLORWHITE;
买点柱:=CROSS(M5>REF(A31) AND A15D>M50.99);
DRAWTEXT(买点柱H*1.09'★买点柱')COLORYELLOW;
STICKLINE(买点柱H*1.0055H*1.085520)COLORRED;
VAR1C:=CLOSE>REF(CLOSE1) AND CLOSE>REF(CLOSE2);
VAR2C:=REF(VAR1C1) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2);
VAR3C:=REF(VAR2C1) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2);
VAR4C:=REF(VAR3C1) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2);
VAR5C:=REF(VAR4C1) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2);
VAR6C:=REF(VAR5C1) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2);
VAR7C:=REF(VAR6C1) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2);
VAR8C:=REF(VAR7C1) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2);
VAR9C:=REF(VAR8C1) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2);
VARAC:=REF(VAR9C1) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2);
VARBC:=REF(VARAC1) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2);
VARCC:=REF(VARBC1) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2);
VARDC:=CLOSE<REF(CLOSE1) AND CLOSE<REF(CLOSE2);
VAREC:=REF(VARDC1) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2);
VARFC:=REF(VAREC1) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2);
VAR10C:=REF(VARFC1) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2);
VAR11C:=REF(VAR10C1) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2);
VAR12C:=REF(VAR11C1) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2);
VAR13C:=REF(VAR12C1) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2);
VAR14C:=REF(VAR13C1) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2);
VAR15C:=REF(VAR14C1) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2);
VAR16C:=REF(VAR15C1) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2);
VAR17C:=REF(VAR16C1) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2);
VAR18C:=REF(VAR17C1) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2);
VAR19C:=REF(VARDC OR VAREC OR VARFC OR VAR10C OR VAR11C OR VAR12C OR VAR13C OR VAR14C OR VAR15C OR VAR16C OR VAR17C OR VAR18C1) AND VAR1C;
STICKLINE(VAR19C AND A15D>M5L*0.960L*0.99050)COLORGREEN;
DRAWTEXT(VAR19C AND A15D>M5L*0.94'---潜伏')COLORWHITE;