买线:=EMA(C,2);
卖线:=EMA(SLOPE(C,21)*20+C,42);
 STICKLINE(买线>=卖线,-50+REF(HHV(H,0),DATE)/5,-50+REF(LLV(L,0),DATE)/5,6,0),COLORMAGENTA;
 STICKLINE(买线<卖线,-50+REF(HHV(H,0),DATE)/5,-50+REF(LLV(L,0),DATE)/5,6,0),COLORBLUE;
 RSV:=((((HHV(HIGH,10) - CLOSE) / (HHV(HIGH,10) - LLV(LOW,10))) * 200) - 125);
散户:SMA(RSV,5,1)+15,COLORGREEN,LINETHICK1;
 RSV1:=((((CLOSE - LLV(LOW,10)) / (HHV(HIGH,10) - LLV(LOW,10))) * 200) - 105);
主力:SMA(RSV1,5,1)+15,COLORRED,LINETHICK1;
买进:=IF(主力>REF(主力,1),主力,0);
持币:=IF(散户>REF(散户,1),散户,0);
 {P(10,1,100),A(5,1,100);}
 SVOL:=INTPART(SUM(V,0)/CAPITAL);
 TJ0:=SVOL>REF(SVOL,1) OR BARSSINCE(CLOSE)=0;
 S1:=BARSLAST(TJ0)+1;
 TJ2:=S1<REF(S1,1);
 S2:=IF(TJ2,REF(S1,1)+1,S1);
 S3:=SUM(TJ2,0);
 ZK1:="KD.K#WEEK"(9,3,3);
 ZD2:="KD.D#WEEK"(9,3,3);
 ZF1:="MACD.DIF#WEEK"(12,26,9);
 ZA2:="MACD.DEA#WEEK"(12,26,9);
换手:=V/CAPITAL*100;
 JCD:=FILTER(CROSS(ZK1,ZD2) AND REF(ZD2,1)<30,13);
取点:=BARSLAST(JCD);
吸筹区:=IF(取点>0 AND 取点<61,取点,0);
 ZS1:=吸筹区;
ZS2:=吸筹区+1;
 ZS3:=换手/5;
 ZSA:=IF(ZS1>0,SUM((ZS3),吸筹区+1),0);
主力筹码:=ZSA;
建仓天数:=ZS1;
阶段总额（万）:=SUM(AMOUNT/10000,S2)*100;
阶段总量（手）:=SUM(V,S2)*100;
阶段成本（元）:=(阶段总额（万）/(阶段总量（手）/100));
换手冷清:STICKLINE(换手<3,-80,(换手+5-40)*2,0.0,0),COLORCYAN;
 {换手冷清:(换手<3,-80,(换手-6)*4,0.0,0);}
换手活跃:STICKLINE(换手>=3 AND 换手<7,-80,(换手+5-40)*2,0.0,0),COLORYELLOW;
 {换手活跃:(换手>=3 AND 换手<7,-80,(换手-6)*4,0.0,0);}
换手热烈:STICKLINE(换手>=7,-80,(换手+5-40)*2,0.5,0),COLORRED;
 {换手热烈:(换手>=7,-80,(换手-6)*4,0.5,0);}
 STICKLINE(JCD,(0-6)*4,6*6,0.5,0),COLORGREEN;
 DRAWTEXT(建仓天数,40,'建仓'),COLORGREEN;
 LL:=REF(CLOSE,1);
 MM:=SMA(MAX(CLOSE-LL,0),6,1)/SMA(ABS(CLOSE-LL),6,1)*100;
出: IF(CROSS(80,MM),90,100),COLORCYAN;
 DRAWTEXT(CROSS(80,MM),MM,'卖 '),COLORWHITE;
 DRAWTEXT(CROSS(主力,散户),0,'买 '),COLORRED;
 AA:=(WINNER((CLOSE + ((CLOSE * 15) / 100))) * 100);
 BB:=(WINNER((CLOSE + ((CLOSE * 0) / 100))) * 100);
 CC:=(AA - BB);
 DD:=((WINNER((CLOSE - ((CLOSE * 0.1) / 100))) - WINNER((CLOSE - ((CLOSE * 15) / 100)))) * 100);
 EE:=(((CC < 3) AND (DD < 0.5)) AND (OPEN > LOW));
 A1:=DYNAINFO(6);
 A22:=IF((LOW > A1),0,IF((HIGH < A1),1,(((A1 - LOW) + 0.01) / ((HIGH - LOW) + 0.01))));
 A3:=(VOL / WINNER(LOW));
 A4:=REF(HHV(CLOSE,120),1);
 A5:=REF(LLV(CLOSE,120),1);
 A6:=((100 * (CLOSE - A5)) / (A4 - A5));
 A7:=((A22 > 0) OR (A22 = 1));
 A8:=((A7 AND ((A3 / REF(A3,3)) >= 3)) AND (A6 < 80));
 A9:=(((REF(A8,1) OR REF(A8,2)) OR REF(A8,3)) OR REF(A8,4));
 A10:=(A8 AND A9);
 A11:=IF(FILTER(A8,3),5,0);
 A12:=IF((FILTER(A10,3) OR EE),10,0);
进场:STICKLINE(A11,-48,-30,2.5,0),COLORFF7700;
加仓:STICKLINE(A12,-48,-28,2.5,0),COLORFF00FF;
 STICKLINE(A11,-48,-30,2.5,0),COLORFF7700;
 STICKLINE(A11,-48,-30,2,0),COLORFFDD00;
 STICKLINE(A11,-48,-30,1,0),COLORFFEE00;
 STICKLINE(A12,-48,-28,2.5,0),COLOR1020DD;
 STICKLINE(A12,-48,-28,2,0),COLOR1020EE;
 STICKLINE(A12,-48,-28,1,0),COLOR1020FF;
 DRAWTEXT(进场=5,-30,'进场'),COLORFFFF00;
 DRAWTEXT(加仓=10,-28,'加仓'),COLORFFFFFF;
 VAR2L:=REF(LOW,1);
 VAR3L:=SMA(ABS(LOW-VAR2L),3,1)/SMA(MAX(LOW-VAR2L,0),3,1)*110;
 VAR4L:=EMA(IF(CLOSE*1.3,VAR3L*10,VAR3L/10),3);
 VAR5L:=LLV(LOW,13);
 VAR6L:=HHV(VAR4L,13);
 VAR7L:=IF(MA(CLOSE,34),1,0);
 VAR8L:=EMA(IF(LOW<=VAR5L,(VAR4L+VAR6L*2)/2,0),3)/618*VAR7L;
 VAR9LL:=IF(VAR8L>110,110,VAR8L);
 STICKLINE(VAR9LL<REF(VAR9LL,1),48,48+VAR9LL,0.5,0),COLORYELLOW;
 RSV2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 K:=SMA(RSV2,2,1);
 D:=SMA(K,2,1);
 J:=3*K-2*D;
 J1:=REVERSE(J);
 AA1:=REF(MA(C,1),10)>REF(MA(C,60),10);
买点:CROSS(J,J1) AND AA1;
 STICKLINE(买点,0,30,5,0),COLOR0000FF;
 STICKLINE(买点,30,60,3,0),COLORWHITE;
 STICKLINE(买点,60,80,1,0),COLORYELLOW;
 DRAWTEXT(买点,40,'庄家出现！'),COLORFF00FF;