TS:=130; 
 N:=99; 
 M:=3; 
 MT:=3; 
 M1:=5; 
 M2:=7; 
 M3:=21; 
 M4:=12; 
 M5:=50;  
DA1:=IF(TS>TOTALBARSCOUNT,TOTALBARSCOUNT,TS); 
 DA:=IF(CURRBARSCOUNT>DA1,0,DA1); 
 HI:=REFDATE(HHV(H,DA),DATE); 
 LO:=REFDATE(LLV(L,DA),DATE); 
 C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL); 
 GZ:=EXP(LN(HI/LO)/10);  
LH1:=SUM(IF(C1>=(HI/GZ),V,0),DA); 
 LH2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA); 
 LH3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1<(HI/POW(GZ,2)),V,0),DA); 
 LH4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA); 
 LH5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1<(HI/POW(GZ,4)),V,0),DA); 
 LH6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA); 
 LH7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1<(HI/POW(GZ,6)),V,0),DA); 
 LH8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA); 
 LH9:=SUM(IF(C1>=(LO*GZ) AND C1<LO*POW(GZ,2),V,0),DA); 
 LH10:=SUM(IF(C1>=LO AND C1<LO*GZ,V,0),DA); 
 L1:=REFDATE(HHV(LH1,DA),DATE),LINETHICK0; 
 L2:=REFDATE(HHV(LH2,DA),DATE),LINETHICK0; 
 L3:=REFDATE(HHV(LH3,DA),DATE),LINETHICK0; 
 L4:=REFDATE(HHV(LH4,DA),DATE); 
 L5:=REFDATE(HHV(LH5,DA),DATE); 
 L6:=REFDATE(HHV(LH6,DA),DATE); 
 L7:=REFDATE(HHV(LH7,DA),DATE); 
 L8:=REFDATE(HHV(LH8,DA),DATE); 
 L9:=REFDATE(HHV(LH9,DA),DATE); 
 L10:=REFDATE(HHV(LH10,DA),DATE); 
 SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10); 
  
STICKLINE(CEILING(DA*L1/SS)*3>=CURRBARSCOUNT,HI*N/100,(HI/GZ),1,1),COLOR454545,LINETHICK1; 
 STICKLINE(CEILING(DA*L2/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,1)*N/100,HI/POW(GZ,2),1,1),COLOR454545,LINETHICK1; 
 STICKLINE(CEILING(DA*L3/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,2)*N/100,HI/POW(GZ,3),1,1),COLOR454545,LINETHICK1; 
 STICKLINE(CEILING(DA*L4/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,3)*N/100,HI/POW(GZ,4),1,1),COLOR454545,LINETHICK1; 
 STICKLINE(CEILING(DA*L5/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,4)*N/100,HI/POW(GZ,5),1,1),COLOR454545,LINETHICK1; 
 STICKLINE(CEILING(DA*L6/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,5)*N/100,HI/POW(GZ,6),1,1),COLOR454545,LINETHICK1; 
 STICKLINE(CEILING(DA*L7/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,6)*N/100,HI/POW(GZ,7),1,1),COLOR454545,LINETHICK1; 
 STICKLINE(CEILING(DA*L8/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,2),LO*POW(GZ,3)*N/100,1,1),COLOR454545,LINETHICK1; 
 STICKLINE(CEILING(DA*L9/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,1),LO*POW(GZ,2)*N/100,1,1),COLOR454545,LINETHICK1; 
 STICKLINE(CEILING(DA*L10/SS)*3>=CURRBARSCOUNT,LO,LO*POW(GZ,1)*N/100,1,1),COLOR454545,LINETHICK1; 
 DRAWKLINE(H,O,L,C);JJ:=(CLOSE+HIGH+LOW)/3; 
DRAWBAND(MA(C,2),RGB(250,125,50),MA(C,7),RGB(0,150,250)); 
 今日保护价:(REF(C,2)+REF(C,1)+O)/3 ,COLOR8080FF,NODRAW; 
  
AA05:MA(C,3),LINETHICK3,COLOR00CCFF; 
 五日乖离率:=(C-AA05)/AA05*100; 
 BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416; 
 速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1); 
 加速度5:EMA((速度5-REF(速度5,1)),3),NODRAW; 
 IF(BB05>30 AND AA05>REF(AA05,1), AA05,DRAWNULL),LINETHICK6,COLOR5959FF; 
 AA10:MA(C,10),COLOR4080FF;AA20:=MA(C,20); 
 BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416; 
 IF(BB05<0 AND AA05<REF(AA05,1), AA05,DRAWNULL),LINETHICK3,COLORGREEN; 
 AA30:MA(C,30),COLOR515100,LINETHICK3; 
 三拾日乖离率:(C-AA30)/AA30*100,NODRAW; 
 VAR111:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1); 
 VAR122:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND AA30<REF(AA30,1); 
 BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416; 
 IF(BB30>15 AND AA30>REF(AA30,1), AA30,DRAWNULL),LINETHICK3,COLORFF00FF; 
 强势狙击:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10); 
 加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND AA05>REF(AA05,1) AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA10>REF(AA10,1) 
 AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) ; 
 清仓:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND (C>AA30 OR O>AA30) AND AA05<REF(AA05,1) AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10<REF(AA10,1),10); 
 DRAWTEXT(加仓 ,LOW*0.96,'加仓'),COLORFFFFFF; 
 JC:=CROSS(0,五日乖离率) AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10>REF(AA10,1) ; 
 减仓:=FILTER(JC,10); 
 MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA05>REF(AA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<AA30; 
 买入:=FILTER(MR,10); 
 DRAWTEXT(减仓,HIGH*1.02,'减仓'),COLORCYAN; 
 DRAWTEXT(买入,LOW*0.98,'买'),COLORFFFFFF; 
 DRAWTEXT(清仓 ,HIGH*1.02,'清仓'),COLORGREEN; 
 DRAWTEXT(强势狙击,LOW*0.98,'强势狙击'),COLORYELLOW; 
 VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2); 
 VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
 VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
 VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
 VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
 VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
 VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
 VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
 VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
 VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
 VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
 VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
 VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
 VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
 VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
 VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
 VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
 VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
 VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
 VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
 VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
 VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
 VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
 VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR 
 VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1; 
 VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR 
 VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD; 
 DRAWICON(VAR19,REF(CLOSE,1)*0.98,34); 
 DRAWICON(VAR1A,REF(CLOSE,1)*1.02,35); 
DRAWKLINE(H,O,L,C); 
ZKP:=IF(C>REF(C,1),REF(C,1),DRAWNULL); 
ZSP:=IF(C>REF(C,1),C,DRAWNULL); 
DKP:=IF(C<=REF(C,1),REF(C,1),DRAWNULL); 
DSP:=IF(C<=REF(C,1),C,DRAWNULL); 
DRAWKLINE(H,DKP,L,DSP); 
STICKLINE(C<=REF(C,1),DKP,DSP,3.05,0  |