优化净吃庄血副图(通达信)

源码正文：

N:=8{XG51};
趋势:4*SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,5,1)-
3*Sma(SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,5,1),3.2,1),COLORBLacK,LINETHICK1;
取值:6,COLORLIGRAY,LINETHICK0;
买入: IF(crOSS(趋势,取值),80,0);
底盘: IF(趋势<=8,25,0),stICK,COLORRED,LINETHICK2;
庄家:=ema(EMA(CLOSE,10),10){XG51};
现价:=(庄家-REF(庄家,1))/REF(庄家,1)*1000{XG51};
STICKLINE(现价<REF(现价,1) AND 现价<0,现价,0,2,0),COLORYELLOW{XG51};
吸筹:IF(现价<REF(现价,1) AND 现价<0,现价,0)COLORYELLOW,NODRAW;
主力:=100*0.95{XG51};
STICKLINE(主力>50 AND COST(85)<CLOSE AND 现价>0,现价,0,2,0),COLORWHITE{XG51};
拉升:IF(主力>50 AND COST(85)<CLOSE AND 现价>0,现价,0),COLORWHITE,NODRAW{XG51};
STICKLINE(现价<REF(现价,1) AND 现价>0,现价,0,2,0),COLOR00FF00{XG51};
上升:=SMA(((HHV(CLOSE,13) - CLOSE) / (HHV(CLOSE,13) - LLV(CLOSE,13))),5,1){XG51};
冲顶:((10/上升)-10)/5,COLORSTICK,COLORBLUE{XG51};
STICKLINE((冲顶 >24),0,冲顶,1,1)COLORBLUE,LINETHICK1{XG51};
出货:IF(现价<REF(现价,1) AND 现价>0,现价,0),COLOR00FF00,NODRAW;
上价:=(MA(C,1)+MA(C,3)+MA(C,5)+MA(C,7)+MA(C,9))/5{XG51};
下价:=(MA(C,2)+MA(C,4)+MA(C,6)+MA(C,8)+MA(C,10))/5{XG51};
中价:=MAX(EMA(上价,1)-EMA(下价,5),0)*200{XG51};
吃庄价:=EMA(中价,5){XG51};
净吃:吃庄价,STICK,COLORFF00FF{XG51};
STICKLINE(吃庄价<REF(吃庄价,1),0,吃庄价,1,0),COLOR00FF00{XG51};
价位:= (HIGH + LOW + CLOSE)/3{XG51};
均价:=(HIGH+LOW+CLOSE*2)/4{XG51};
讲价:=EMA(均价,8);
讨价:=STD(均价,8);
卖价:=(均价-讲价)/讨价*100{XG51};
买价:=EMA(卖价,7){XG51};
cci:(价位-MA(价位,8))/(0.015*AVEDEV(价位,8)),LINETHICK1,COLORRED{XG51};
上穿买:-100,LINETHICK2,COLORGRAY{XG51};
下穿卖:100,LINETHICK1,COLORFF9900{XG51};
顶线！:150,COLORWHITE,LINETHICK2{XG51};
底线:-150,COLORLIMAGENTA,LINETHICK2{X=G^5-1=C=N={};

源码正文：

VAR1:=IF(OPEN<=REF(OPEN,1),0,maX(HIGH-OPEN,OPEN-REF(OPEN,1))){XG51};
VAR2:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1))){XG51};
VAR3:=SUM(VAR1,5){XG51};
VAR4:=SUM(VAR2,5){XG51};
VAR5:=IF(VAR3>VAR4,(VAR3-VAR4)/VAR3,IF(VAR3=VAR4,0,(VAR3-VAR4)/VAR4)){XG51};
VAR6:=MA(VAR5,5){XG51};
VAR8:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1))){XG51};
VAR9:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1))){XG51};
VARA:=SUM(VAR8,3){XG51};
VARB:=SUM(VAR9,3){XG51};
VARC:=IF(VARA>VARB,(VARA-VARB)/VARA,IF(VARA=VARB,0,(VARA-VARB)/VARB)){XG51};
VARD:=MA(VARC,3){XG51};
火: BArslAst(ema(CLOSE,5)<REF(EMA(CLOSE,5),1)), COLORWHITE{XG51};
VARE:=HHV(CLOSE,2){XG51};
VARF:=BARSLAST(VARE<REF(VARE,2)){XG51};
VAR10:=IF(VARF>=1,LLV(VARE,VARF),LOW){XG51};
VAR11:=VAR10+VAR10*VARF*0.5/100{XG51};
VAR12:=IF(VAR11<REF(VAR11,1),MA(LOW,3),VAR11){XG51};
VAR13:=VAR10+VAR10*(VARF-1)*1.618/100{XG51};
山: COUNT(EMA(CLOSE,5)>REF(EMA(CLOSE,5),1),5){XG51};
VAR14:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1))){XG51};
VAR15:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1))){XG51};
VAR16:=SUM(VAR8,3){XG51};
VAR17:=SUM(VAR9,3){XG51};
VAR18:=IF(VARA>VARB,(VARA-VARB)/VARA,IF(VARA=VARB,0,(VARA-VARB)/VARB)){XG51};
VAR19:=MA(VARC,3){XG51};
买入或持股: (山>0,火,0,2,0), COLORWHITE{XG51};
STICKLINE(山>0,火,0,2,0), COLORWHITE{XG51};
VAR1A:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1))){XG51};
VAR1B:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1))){XG51};
VAR1C:=SUM(VAR8,3){XG51};
VAR1D:=SUM(VAR9,3){XG51};
VAR1E:=IF(VARA>VARB,(VARA-VARB)/VARA,IF(VARA=VARB,0,(VARA-VARB)/VARB)){XG51};
VAR1F:=MA(VARC,3){XG51};
下跌→抛出: (山>0,火,山,2,1), COLORF0F000{XG51};
STICKLINE(山>0,火,山,2,1), COLORF0F000{XG51};
VAR20:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1))){XG51};
VAR21:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1))){XG51};
VAR22:=SUM(VAR8,3){XG51};
VAR23:=SUM(VAR9,3){XG51};
VAR24:=IF(VARA>VARB,(VARA-VARB)/VARA,IF(VARA=VARB,0,(VARA-VARB)/VARB)){XG51};
VAR25:=MA(VARC,3){XG51};
观望: STICKLINE(山=0 AND 火=0,0,1,4,1), COLORYELLOW{XG51};
VAR26:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1))){XG51};
VAR27:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1))){XG51};
VAR28:=SUM(VAR8,3){XG51};
VAR29:=SUM(VAR9,3){XG51};
VAR2A:=IF(VARA>VARB,(VARA-VARB)/VARA,IF(VARA=VARB,0,(VARA-VARB)/VARB)){XG51};
VAR2B:=MA(VARC,3){XG51};
植被: (山<火,火,山,1,0), COLOR00FF00{XG51};
STICKLINE(山<火,火,山,1,0), COLOR00FF00{XG51};
VAR2C:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1))){XG51};
VAR2D:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1))){XG51};
VAR2E:=SUM(VAR8,3){XG51};
VAR2F:=SUM(VAR9,3){XG51};
VAR30:=IF(VARA>VARB,(VARA-VARB)/VARA,IF(VARA=VARB,0,(VARA-VARB)/VARB)){XG51};
VAR31:=MA(VARC,3){XG51};
VAR32:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*10{XG51};
K: SMA(SMA(VAR32,2,1),2,1),COLOR00FF00 , {XG51};
D: SMA(SMA(SMA(VAR32,2,1),2,1),3,1), COLORBLUE{XG51};
J: (3*SMA(SMA(VAR32,2,1),2,1)-2*SMA(SMA(SMA(VAR32,2,1),2,1),3,1)), COLORF00FF0{XG51};
VAR33:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1))){XG51};
VAR34:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1))){XG51};
VAR35:=SUM(VAR8,3){XG51};
VAR36:=SUM(VAR9,3){XG51};
VAR37:=IF(VARA>VARB,(VARA-VARB)/VARA,IF(VARA=VARB,0,(VARA-VARB)/VARB)){XG51};
VAR38:=MA(VARC,3){XG51};
STICKLINE(REF(山,1)=0 AND 山>0,0,-1,2,0), COLORWHITE{XG51};
DRAWTEXT(REF(火,3)>0 AND REF(火,2)>0 AND REF(火,1)>0 AND 火=0 AND REF(火,1)>山,REF(火,1),'调整'),COLORBLUE , {X!G*5?1!C!N!{};