D:=72;N:=26;P:=14;
VAR1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VAR2:=2*Abs(VAR1);
VAR3:=100-3*SMA((CLOSE-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1),15,1);
VAR4:=100-3*SMA((OPEN-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1),15,1);
VAR5:=(HIGH+LOW+CLOSE)/3;
VAR6:=(VAR5-MA(VAR5,14))/(0.015*AVEDEV(VAR5,14));
VAR7:=(VAR5-MA(VAR5,89))/(0.015*AVEDEV(VAR5,89));
VAR8:=IF(VAR6>=150 AND VAR6<200 AND VAR7>=150 AND VAR7<200,10,0);
VAR9:=IF(VAR6<=-150 AND VAR6>-200 AND VAR7<=-150 AND VAR7>-200,-10,VAR8);
VARA:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VARB:=100-ABS(VARA);
VARC:=3*SMA((INDEXC-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,D))*100,20,1)-2*SMA(SMA
((INDEXC-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,75))*100,20,1),15,1);
VARD:=3*SMA((INDEXO-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,D))*100,20,1)-2*SMA(SMA
((INDEXO-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,75))*100,20,1),15,1);
VARE:=REF(LOW,1)*0.9;
VARF:=LOW*0.9;
VAR10:=(VARF*vol+VARE*(CAPITAL-VOL))/CAPITAL;
VAR11:=EMA(VAR10,30);
VAR12:=VAR11-CLOSE;
VAR13:=REF(CLOSE,1);
VAR14:=SMA(MAX(CLOSE-VAR13,0),7,1)/SMA(ABS(CLOSE-VAR13),7,1)*100;
VAR15:=SMA(MAX(CLOSE-VAR13,0),13,1)/SMA(ABS(CLOSE-VAR13),13,1)*100;
VAR16:=BARSCOUNT(CLOSE);
VAR17:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100;
VAR18:=((-100)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+50)*2;
VAR19:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
VAR1A:=(SMA(VAR19,4,1)-50)*2;
VAR1B:=SMA(VAR1A,3,1);
VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
VAR1D:=SMA(VAR1C,4,1);
VAR1E:=SMA(VAR1D,3,1);
VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
VAR20:=IF(VAR17<=25 AND VAR18<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30 AND VAR12>=-0.25 AND VAR14<22 AND VAR15<28 AND VAR16>50,80,0);
势能: VAR3,COLORFF00FF;
OX: IF(VARB<90,VARB,100),COLORFFCC66;
VAR21:=IF(VAR1>0,VAR1,0);
核能:= IF(VAR1<0,VAR2,0);
牛角: VAR20,COLORYELLOW;
预警: IF(VAR7>=200 AND VAR6>=150,15,IF(VAR7<=-200 AND VAR6<=-150,-15,VAR9))+60,COLOR00FF00;
VAR22:=100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34));
VAR23:=MA(VAR22,3);
VAR24:=EMA(AMOUNT/VOL/100,5);
VAR25:=EMA(AMOUNT/VOL/100,13);
VAR26:=VAR24-VAR25;
动能: IF(1000*VAR26/VAR24>0,1000*VAR26/VAR24,0),COLORRED,LINETHICK2;
STICKLINE(VAR3>=REF(VAR4,1),VAR3,VAR4,8,1),COLORBLUE;
STICKLINE(VAR3
VAR28:=CLOSE
VAR2A:=VAR21>48 AND 预警>60 AND OX<100;
VAR2B:=核能>38 AND 预警<55;
VAR2C:=牛角>50 AND OX<90;
VAR2D:=VAR3
VAR2E:=VAR3>=REF(VAR4,1) AND CLOSE
DRAWTEXT(VAR28 AND COUNT(VAR28,30)=1,10,'出局为佳'),COLOR00FF00;
DRAWTEXT(VAR29 AND COUNT(VAR29,30)=1,70,'上涨过急，需要调整'),COLORWHITE;
DRAWTEXT(VAR2A AND COUNT(VAR2A,30)=1,80,'拉升在即狂牛！'),COLORYELLOW;
DRAWTEXT(VAR2B AND COUNT(VAR2B,30)=1,20,'不必杀跌有反弹 '),COLORWHITE;}
DRAWTEXT(VAR2C AND COUNT(VAR2C,30)=1,30,'角斗士，阶段底部 '),COLORYELLOW;
DRAWTEXT(VAR2D AND COUNT(VAR2D,30)=1,60,'大资金进场'),COLOR0099FF;
{DRAWTEXT(VAR2E AND COUNT(VAR2E,30)=1,40,'高点回落'),COLORFFCC66;}
{准入:IF(VAR3
JC1:=(REF(C,3)+REF(C,5)+REF(C,7)+REF(C,13)+REF(C,21))/5;
参考价1:=SMA(JC1,3,1),COLORBLUE;
上升趋势:IF(C>参考价1,108,100),COLORYELLOW;
买:IF( IF(OX<100 OR 预警<60 OR 上升趋势>105,10,0) AND 准入, 10,0),LINETHICK0;
STICKLINE(买,-5,-11,3,0),COLORYELLOW;}
{吸筹}
LC:=REF(CLOSE,1);
{止损价位:(LC*1.0035*97+0.2)/99.65,COLOR03B4EC,LINETHICK1;}
rsi5:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*100;
R:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
A:=SMA(R,3,1);
B:=SMA(A,3,1);
CCC:=(B/2+40)*1.1;
DDD:=SMA(CCC,3,1);
RR8:=MA(CLOSE,27);
RR9:=(CLOSE-RR8)/RR8*100;
RRA:=MA(RR9,2);
RRB:=BArslAST(crOSS(-10,RRA)=1);
RRD:=RRA<-10 AND RRB>3;
TYP:=(HIGH + LOW + CLOSE)/3;
cci:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)),LINETHICK0;
组C_02:=REF(LOW,1);
组C_03:=SMA(ABS(LOW-组C_02),3,1)/SMA(MAX(LOW-组C_02,0),3,1)*100;
组C_04:=EMA(IF(CLOSE*1.3,组C_03*10,组C_03/10),3);
组C_05:=LLV(LOW,13);
组C_06:=HHV(组C_04,13);
组C_07:=IF(MA(CLOSE,34),1,0);
组C_08:=EMA(IF(LOW<=组C_05,(组C_04+组C_06*2)/2,0),3)/618*组C_07;
组C_09:=IF(组C_08>100,100,组C_08);
STICKLINE(CROSS(DDD,RSI5),110,100,3,0),COLORRED;
STICKLINE(CROSS(80,RSI5),100,90,3,0),COLORGREEN;
庄家吸筹:组C_09,LINETHICK0,COLORYELLOW;
吸筹后:=IF(REF(庄家吸筹,1)>庄家吸筹,10,0);
STICKLINE(组C_09>-120,0,IF(组C_09*1.5>65,58,组C_09*1.5),1.7,0),COLOR338FDD;
STICKLINE(组C_09>-120,0,IF(组C_09*1.5>65,58,组C_09*1.5),1.7,0),COLOR00AAFF;
{STICKLINE(组C_09>-120,0,组C_09*1.5,2.3,0),COLOR00BBFF;
STICKLINE(组C_09>-120,0,组C_09*1.5,2,0),COLOR00CCFF;
STICKLINE(组C_09>-120,0,组C_09*1.5,1.8,0),COLOR00ddfF;
STICKLINE(组C_09>-120,0,组C_09*1.5,1.5,0),COLOR00EEFF;
STICKLINE(组C_09>-120,0,组C_09*1.5,1,0),COLOR00FFFF;}
组A_01:=EMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,5);
组A_02:=(HHV(HIGH,25)-LLV(LOW,25))/EMA((CLOSE-LLV(LOW,25)),5);
组A_03:=CROSS(组A_02,组A_01);
组A_04:=REF(组A_02,2)
组A_06:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
组A_07:=SMA(ABS(LOW-组A_06),13,1)/SMA(MAX(LOW-组A_06,0),10,1);
组A_08:=EMA(组A_07,10);
组A_09:=EMA(C,5);
组A_10:=LLV(LOW,33);
组A_11:=EMA(IF(LOW<=组A_10,组A_09,0),3)*40;
组A_12:=IF(组A_11>100,组A_11*0.312,组A_11);
高度:=(100*组A_12/组A_12)-1;
组A关注点:IF(组A_05 AND COUNT(组A_05,5)=1,10,0),LINETHICK0;
STICKLINE(组A关注点,-高度/5,高度/2,2,0),COLORRED;
买A2:IF(组A_02>3,组A_02*1.5,0),LINETHICK2,COLORWHITE;
{ _通达信股票指标公式}
{TYP1:= (HIGH + LOW + CLOSE)/3;
TYP2:(TYP1-MA(TYP1,N))/(0.015*AVEDEV(TYP1,N))/5,COLORWHITE;};
EMA13:=EMA(C,13),DRAWNULL;
EMA21:=EMA(C,21),DRAWNULL;
EMA34:=EMA(C,34),DRAWNULL;
EMA60:=MA(C,60),DRAWNULL;
VAR2G:=(2*CLOSE+HIGH+LOW)/4;
VAR3G:=IF(YEAR>=2099 AND MONTH>2,0,1);
VAR4G:=LLV(LOW,5);
VAR5G:=HHV(HIGH,4);
散户:=EMA((VAR2G-VAR4G)/(VAR5G-VAR4G)*100,4)*VAR3G;
庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR3G;
VAR9G:=CLOSE-REF(CLOSE,5);
VARAG:=EMA(EMA(VAR9G,5),5)/EMA(EMA(ABS(VAR9G),5),5);
VARCG:=EMA(EMA(VAR9G,20),20)/EMA(EMA(ABS(VAR9G),20),20);
卖出:=IF(VARAG>0 AND CROSS(VARCG,VARAG),90,100);
DRAWICON(卖出<0,H+0.05,2);
买线:=EMA(CLOSE,2);
卖线:=EMA(SLOPE(CLOSE,21)*20+CLOSE,42);
B1:=IF(CROSS(买线,卖线),L-0.02,DRAWNULL);
S1:=IF(CROSS(80,RSI)*30,H+0.02,DRAWNULL);
VC:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA (CLOSE,32))/MA(CLOSE,32)*100)/3;
S2:=IF(VC>20 AND FILTER(VC< REF(VC,1),5),H+0.02,DRAWNULL);
A0:=(L+H+C*2)/4;
A1:=EMA(A0,14);
A2:=EMA(A0,25);
A1X:=(A1-REF(A1,1))/REF(A1,1)*100,NODRAW;
A2X:=(A2-REF(A2,1))/REF(A2,1)*100,NODRAW;
看多:=IF(A1X>=0 AND BARSLAST(CROSS(A1X,0))>0,REF((C+O)/2,BARSLAST(CROSS(A1X,0))),DRAWNULL);
逃顶:=IF(A1X<0 AND BARSLAST(CROSS(0,A1X))>0,REF((C+O)/2,BARSLAST(CROSS(0,A1X))),DRAWNULL);
买入持股:=IF(A1X>=0,A1,DRAWNULL);
卖出空仓:=IF(A1X<0 AND A2X<0,A1,DRAWNULL);
MAI1:IF(CROSS(B1,0),5,0);
MAI2:IF(CROSS(买入持股,0),10,0);
STICKLINE(MAI1,-1,-9,1,0),COLORWHITE;
STICKLINE(MAI2,-11,-19,1,0),COLORYELLOW;
