AB:=EMA(((2*C+H+L)/4-LLV(LOW,30))/ (HHV(HIGH,30)-LLV(LOW,30))*100,8);
BA:=EMA(AB,5);
A1{高}:=REFDATE(REF(HHV(H,96),5),DATE);
B1{低}:=REFDATE(REF(LLV(L,96),5),DATE);
D{中}:=((A1)+(B1))/2;
箱顶:IF(AB>0 AND AB-BA<=0,A1,A1),LINETHICK1,COLORGREEN;
箱腰:IF(AB>0 AND AB-BA<=0,D,D),LINETHICK1,COLORYELLOW;
箱低:IF(AB>0 AND AB-BA<=0,B1,B1),LINETHICK1,COLORRED;
{WWW.fxjgsw.com}
DRAWTEXT(CROSS(ZIG(3,10),REF(ZIG(3,10),1)),LOW*0.98,'买') , COLORMAGENTA;
DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.02,'卖');
HJ_1:=EMA(CLOSE,2);
HJ_2:=EMA(SLOPE(CLOSE,21)*20+CLOSE,42);
HJ_3:=CROSS(HJ_1,HJ_2);
HJ_4:=CROSS(HJ_2,HJ_1);
DRAWTEXT(HJ_3,LOW*0.97,'↖低吸'),COLORYELLOW;
STICKLINE(HJ_1>=HJ_2,LOW,HIGH,0.01,0),COLOR0000DD;
STICKLINE(HJ_1>=HJ_2,CLOSE,OPEN,2,1),COLORRED;
STICKLINE(HJ_1<HJ_2,LOW,HIGH,0.01,0),COLORFFDD00;
STICKLINE(HJ_1<HJ_2,CLOSE,OPEN,2,0),COLORCYAN;
STICKLINE(CROSS(HJ_1,HJ_2),OPEN,CLOSE,2.5,0),COLORYELLOW;
STICKLINE(CROSS(HJ_2,HJ_1),OPEN,CLOSE,2.5,0),COLORWHITE;
HJ_5:=MA(CLOSE,10);
HJ_6:=MA(CLOSE,54);
HJ_7:=(CLOSE-HJ_6)/HJ_6<0.1;
HJ_8:=(CLOSE-HJ_5)/HJ_5<0.3;
HJ_9:=(HJ_7=1 AND HJ_8=1)*0.2;
HJ_10:=(HJ_9=0 AND REF(HJ_9,1)=0.2 AND REF(COUNT(HJ_9=0.2,10)=10,1)=1)*1;
Z1:=STRCAT(DYBLOCK,' ');
Z2:=STRCAT(Z1,HYBLOCK);
Z3:=STRCAT(Z2,' ');
Z4:=STRCAT(Z3,GNBLOCK);
Z5:=STRCAT(Z4,' ');
Z6:=STRCAT(Z5,FGBLOCK);
DRAWTEXT_FIX(ISLASTBAR,0.06,0.012,0,STRCAT(Z6,ZHBLOCK)),COLORYELLOW;
DRAWTEXT_FIX(1,0.83.5,0.92,0,''),COLOR0000FF;
ZAA:=MONTH-REF(MONTH,1);
DRAWTEXT(ZAA>1 OR (ZAA<0 AND ZAA>-11),L*0.9,'停牌');
DRAWTEXT_FIX(1,0.00,0.12,0,'每股收益:')COLORFF00FF;
DRAWTEXT_FIX(1,0.04,0.12,0,STRCAT(CON2STR(FINANCE(30)/FINANCE(1),2),' （元/股）'))COLORFF00FF;
DRAWTEXT_FIX(1,0.00,0.18,0,'每股净资产(元):')COLORFF00FF;
DRAWTEXT_FIX(1,0.06,0.18,0,CON2STR(FINANCE(34),2))COLORFF00FF;
上市天数:FINANCE(42),,COLORRED;
上市日期:=STRCAT(' 上市日期: ',CON2STR(HHV((BARSCOUNT(C)=0)*(DATE+19000000),0),0));
DRAWTEXT_FIX(ISLASTBAR,0.001,0.08,0,上市日期),COLORYELLOW;
HM1:=ABS(((3.48*CLOSE+HIGH+LOW+O)/5-EMA(CLOSE,20))/EMA(CLOSE,20));
HM2:=DMA(((2.15*CLOSE+LOW+HIGH + O)/5),HM1);
妖股线:=EMA(HM2,200)*1.26 ,LINETHICK2,COLORGREEN;
牛熊线:=EMA(HM2,200)*1.18 ,LINETHICK2,COLORGREEN;
Q1:=MA((L+H+C)/3,5);
AHC1:=CLOSE*VOL;
AHC2:=EMA((EXPMA(AHC1,3)/EXPMA(VOL,3)+EXPMA(AHC1,6)/EXPMA(VOL,6)+EXPMA(AHC1,12)/EXPMA(VOL,12)+EXPMA(AHC1,24)/EXPMA(VOL,24))/4,13),COLORYELLOW;
上轨:=1.06*AHC2,LINETHICK2,COLORWHITE;
顶:=1.13*AHC2,LINETHICK2,COLORWHITE;
MM2:=MIN(上轨,妖股线);
KK2:=MIN(上轨,牛熊线);
ZT:=REF(C,1)*1.1-C<0.01 AND H=C;
超牛:=CROSS(C,顶) AND ZT;
DRAWTEXT(超牛,L*0.98,'超牛'),COLORRED;
VAR2:=((((C - O) / O) * (100)) > 4);
VAR3:=((((C - (REF(C,1))) / (REF(C,1))) * (100)) > 8);
VAR4:=(((((REF(C,1)) * (1.1)) - C) < (0.01)) AND (H = C));
VAR5:=((20 * H + 19 * (REF(H,1)) + 18 * (REF(H,2)) + 17 * (REF(H,3)) + 16 * (REF(H,4)) + 15 * (REF(H,5)) + 14 * (REF(H,6)) + 13 * (REF(H,7)) + 12 * (REF(H,8)) + 11 * (REF(H,9)) + 10 * (REF(H,10)) + 9 * (REF(H,11)) + 8 * (REF(H,12)) + 7 * (REF(H,13)) + 6 * (REF(H,14)) + 5 * (REF(H,15)) + 4 * (REF(H,16)) + 3 * (REF(H,17)) + 2 * (REF(H,18)) + REF(H,20)) / (210));
牛线:(EMA(VAR5,90)),LINETHICK2,COLORYELLOW;
持股线:((MA(C,3) + MA(C,6) + MA(C,12) + MA(C,24)) / 4)COLORRED,LINETHICK2;
VAR6:=((牛线) - ((((C - (牛线)) * C) - (牛线)) / (牛线)));
VAR7:=(牛线 + (((C - (牛线)) * C) - (黄牛线)) / (牛线));
涨速线:=(IF((牛线) > (VAR6),(牛线) * (0.9),VAR6)),LINETHICK2,COLORYELLOW;
VAR8:=(((REF(牛线,2)) >= (REF(牛线,1))) AND ((REF(牛线,1)) < (牛线)));
VAR9:=(CROSS(牛线,VAR6));
VAR10:=(CROSS(VAR6,牛线));
VAR11:=(CROSS(C,VAR6));
VAR12:=(CROSS(VAR7,C));
DRAWTEXT((VAR9) AND (VAR4),L,'↖金条'),LINETHICK4,COLORYELLOW;
DRAWTEXT((VAR11) AND (VAR4),L,'导弹')LINETHICK4,COLORWHITE;
DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.015,'←出') ,COLORGREEN;
DRAWTEXT(CROSS(ZIG(3,10),REF(ZIG(3,10),1)),LOW*0.99,'←进') ,COLORYELLOW;
DRAWTEXT(CROSS(90,RSI) , HIGH*1.01,'←出逃!'),COLOR00FF00 ;
MA5:=MA(C,5);
MA6:=MA(C,6);
MA10:=MA(C,10);
MA20:=MA(C,20);
A2:=REF(MA20,1);J1:=(MA20-A2)/A2*100;MJ1:=MA(J1,3);
MA30:=MA(C,30);
MA55:=MA(C,60);
MA120:=MA(C,120);
乖离2:=(MA20-MA30)/MA30*100;
MAX1:=MAX(MA20,MA30);
MAX2:=MAX(MAX1,MA55);
MIN11:=MIN(MA20,MA30);
MIN2:=MIN(MIN11,MA55);
K1:=(MAX2/MIN2-1)*100;
VAR1:=IF(BETWEEN(乖离2,-2,5),2,0);
短线暴涨:DRAWTEXT(FILTER( (VAR1 OR VAR2) AND MA10>REF(MA10,1) AND COUNT(MA30>REF(MA30,1),3)=3 AND MA30>MA55 AND COUNT(CROSS(MA5,MA30),3) AND J1>MJ1 AND MA(V,5)>MA(V,60)
AND MA(V,60)>REF(MA(V,60),1),5),MA55*0.99,'←暴涨'),COLORRED;
AA10:=MA(CLOSE,10);
AA12:=MA(CLOSE,12);
BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10);
BB12:=((ATAN((AA12 - REF(AA12,1))) * 3.1416) * 10);
VARA:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);
VARB:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);
VARC:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);
VARD:=REF(CLOSE,1);
VARE:=((SMA(MAX((CLOSE - VARD),0),5,1) / SMA(ABS((CLOSE - VARD)),5,1)) * 100);
VARF:=(((HIGH + LOW) + CLOSE) / 3);
VAR13:=(VAR11 AND VAR12);
VAR14:=((((VARA >= (0 - 45)) AND (VARA <= (0 - 10))) AND (VARB <= (0 - 15))) AND (VARC <= (0 - 20)));
VAR15:=(COUNT(VAR14,1) >= 1);
VAR16:=(VAR13 AND VAR15);
VAR17:=1;{WWW.fxjgsw.com}
VAB0:=531;VAB1:=1510000;VAB2:=VAB0 + VAB1; VAB3:=IF(DATE > VAB2,0,1);
VARA12:=SMA(H,10,9)*VAB3; VARA13:=SMA(L,10,9)*VAB3; VAR18:=(CLOSE * VOL);
高抛价参考:VARA12,COLORRED,NODRAW;
低吸价参考:VARA13,COLORGREEN,NODRAW; |
