M1:=13;
M2:=5;
MA1:MA(CLOSE,M1);{设定均线}
MA2:=MA(CLOSE,M2);{设定均线}
DRAWKLINE(H,O,L,C);{写K线}
STICKLINE(MA1>=REF(MA1,1),H,L,0,0),COLOR0000FF;{均线上行，标记影线}
STICKLINE(MA1>=REF(MA1,1) AND (C>=O),O,C,3,1),COLOR0000FF;{均线上

DIFF :=( EMA(CLOSE,12) - EMA(CLOSE,26))*100;
DEA :=EMA(DIFF,9);
MACD :=2*(DIFF-DEA);
绿柱消失买入:STICKLINE(DIFF<0,0,DIFF,2,0),COLOR00FF00;
红柱消失卖出:STICKLINE(DIFF>=0,0,DIFF,2,0),COLORRED;
STICKLINE(DEA>=0,0,DEA,2,0),COLORB

强弱分界线: 50, POINTDOT, LINETHICK2, COLORYELLOW;
VAR2:=IF(MONTH<12,1,1);
VAR3:=(2*CLOSE+HIGH+LOW)/4;
VAR4:=LLV(LOW,34);
VAR5:=HHV(HIGH,34);
主力:EMA((VAR3-VAR4)/(VAR5-VAR4)*100,13)*VAR2,LINETHICK4,COLORRED;
散户:EMA(0.667*R

DRAWGBK(CURRBARSCOUNT=1, RGB(110,108,108),RGB(88,30,0),0,'',0);
P:=1;
K:=1;
N:=8;
ZGD:=HHV(H,60);
ZGD2:=CONST(ZGD);
ZDD:=LLV(L,60);
ZDD2:=CONST(ZDD);
GJ:=(C+H+L+O)/4;
明日阻力:=L+(GJ-L)+(C-L);
明日支撑:=

AMV0:=VOL*(O+C)/2;MA5:MA(C,5)COLORYELLOW,LINETHICK1;
博杀生命线:SUM(AMV0,88)/SUM(VOL,88)CROSSDOT,COLOR888888,LINETHICK1;
MJ:IF(CLOSE>SAR(4,6,20),SAR(4,6,20),DRAWNULL),CIRCLEDOT,COLORRED;
MC:IF(CLOSE<SAR(4,6,20),SAR(4,6,20),DRAWNULL),CIR

DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.009,'↓←减') , COLORGREEN,LINETHICK1;
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;
上

DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.009,'↓←减') , COLORGREEN,LINETHICK1;
K1:EMA(C,5),COLOR00AA00;
K2:EMA(C,10),COLOR00AA00;
K3:EMA(C,15),COLOR00AA00;
K4:EMA(C,20) ,COLOR00AA00;
K5:EMA(C,35) ,COLOR0000FF

强弱分界线: 50, POINTDOT, LINETHICK2, COLORYELLOW;
VAR2:=IF(MONTH<12,1,1);
VAR3:=(2*CLOSE+HIGH+LOW)/4;
VAR4:=LLV(LOW,34);
VAR5:=HHV(HIGH,34);
主力:EMA((VAR3-VAR4)/(VAR5-VAR4)*100,13)*VAR2,LINETHICK4,COLORRED;
散户:EMA(0.667*R

NCAAA2:=0.15;
NCZQD:=55;
NCAAA3:=0.20;
NCAAA4:=0.20;
NCAAA5:=0.20;
NCAAA6:=0.20;
NCAAA7:=0.20;
NCAAA8:=0.20;
V5NCAAA3:=0.10;
卖出线:=100,LINETHICK2;
阶段卖:= 90,LINETHICK2;
底部: 10,LINETHICK2;

A1:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
A2:=(MA(3*SMA(A1,6,1)-2*SMA(SMA(A1,5,1),5,1),2));
A3:=(C-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
A4:=SMA(SMA(A3,3,1),3,1);
A5:=3*SMA(A3,3,1)-2*A4;
A6:=EMA(A5,5);
A7:=E

VAR3:=REF(HIGH,1)*1.1;
VAR4:=HIGH*1.1;
VAR5:=(VAR4*VOL+VAR3*(CAPITAL-VOL))/CAPITAL;
VAR6:=REF(LOW,1)*0.9;
VAR7:=LOW*0.9;
VAR8:=(VAR7*VOL+VAR6*(CAPITAL-VOL))/CAPITAL;
VAR9:=EMA(VAR8,30);
VARA:=EMA(VAR5,30);
V

N:=20;M:=32;P1:=80;P2:=100;
VAR1:=(C+H+O+L)/4;
卖出:=XMA(VAR1,N)*(1+P1/1000),COLORFFFFFF,LINETHICK3;
买入:=XMA(VAR1,M)*(1-P2/1000),COLOR0000FF,LINETHICK3;
DRAWBAND(卖出,RGB(200,50,55),卖出*1.03,RGB(0,100,50));
DRAWBAND(买入,RGB(0,55,0)

TEXT1:=CROSS(MA(C,5),MA(C,20));
TEXT2:=CROSS(MA(C,20),MA(C,5));
DRAWTEXT(TEXT1,MA(C,20),'买进');
DRAWTEXT(TEXT2,MA(C,20),'卖出');
MA5:MA(C,5),COLORRED,LINETHICK2;
MA10:MA(C,10),COLORYELLOW,LINETHICK2;
MA20:MA(C,20),COLORMAG

花:=EMA(SLOPE(1,1)+C,3),COLORRED;
女:=EMA(SLOPE(1,1)+C,7),COLORBLUE;
DRAWTEXT(COUNT (花<女,5)=4 AND 花>=女,C*0.95,'B'), COLORRED;
DRAWTEXT(COUNT (花>=女,5)=4 AND 花<女,C*1.08,'S'), COLORYELLOW;
STICKLINE(花>= 女 ,CLOSE,OPEN,8,0)

QW1:=(H+L+C*2)/4;
QW3:=EMA(QW1,10);
QW4:=STD(QW1,10);
QW5:=(QW1-QW3)*100/QW4;
QW6:=EMA(QW5,5);
RK7:=EMA(QW6,10);
Z:=EMA(QW6,10)+100/2-5;
D:=EMA(Z,4);
出局:IF(CROSS(D,80),1,0),COLORGREEN,LINETHICK1;
DRAWT

VAR1:=(2*CLOSE+HIGH+LOW+OPEN)/5;
高抛: 80, POINTDOT;
VAR2:=LLV(LOW,34);
VAR3:=HHV(HIGH,34);
SK: EMA((VAR1-VAR2)/(VAR3-VAR2)*100,13);
SD: EMA(SK,3);
低吸: 20, POINTDOT;
强弱分界: 50, POINTDOT;
VAR4:=IF(CROSS(SK,SD),4

DRAWGBK(C>0, RGB(50,60,250),RGB(17,21,89),0,'11',0);
H1:=MAX(DYNAINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H1-L1;
阻力:=L1+P1*7/8,COLORGREEN;
支撑:=L1+P1*0.5/8,COLORRED;
中线:=(支撑+阻力)/2,COLORWHITE,POINTDO

DRAWGBK(1,RGB(0,0,0),RGB(0,0,0),0,'BJ1',0);
N:=120;
K:=BARSLAST(CURRBARSCOUNT=N);
GD:=CONST(IF(ISLASTBAR=1,HHV(H,K),0)),NODRAW;{高点}
DD:=CONST(IF(ISLASTBAR=1,LLV(L,K),0)),NODRAW;{低点}
KJ:=GD-DD;{高低点差值=分区高度}
GD4:=IF(CURRBA

E1:=BARSCOUNT(C);
AH:=HHV(H,200);
AL:=LLV(L,200);
B0:=(AH-AL)/40;
KB1:=H+B0;
KB2:=L-B0;
STICKLINE((E1+0)/34=FLOOR((E1+0)/34),KB2,KB2-3*B0,1,0),COLORYELLOW,LINETHICK3;
DRAWTEXT((E1+0)/34=FLOOR((E1+0)/34),KB2-2*B0,'

J:=MA("KDJ.J#WEEK",5)/1.1;
STICKLINE(J>=REF(J,1),H,L,0,0),COLORRED;
STICKLINE(J<=REF(J,1),H,L,0,0),COLORFFBB00;
STICKLINE(J>=REF(J,1),C,O,3,0),COLORRED;
STICKLINE(C>O AND J>=REF(J,1),C,O,3,1),COLORRED;