源码
MA6:=EMA(CLOSE,6);
MA21:EMA(CLOSE,21),ColorFF0FFF;
PARTLINE(MA6,MA6>REF(MA6,1),RGB(250,250,10),MA6<=REF(MA6,1),RGB(0,0,250)),LINETHICK2;
RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
RSV24:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
K24:=SMA(RSV24,3,1);
D24:=SMA(K24,3,1);
J24:=3*K24-2*D24;
压力位:IF(CROSS(J24,J),H,REF(H,BARSLAST(CROSS(J24,J)))),COLORFFFF1A,LINETHICK1;
支撑位:IF(CROSS(J,J24),L,REF(L,BARSLAST(CROSS(J,J24)))),Color1EFFFF,LINETHICK1;
支撑价:LLV(LOW,34),Color006DDB,LINETHICK1;
阻力价:HHV(HIGH,19),COLOR00FF33, LINETHICK1;
MA6:=MA(C,6);
X1:=REF(EMA(C,6),1);
X2:=(EMA(C,6)-X1)/X1*100;
N1:=BARSLAST(CROSS(X2,0));
N2:=BARSLAST(CROSS(0,X2));
X3:=CROSS(X2,0) OR CROSS(0,X2);
STICKLINE(N1<N2,REF(MA6,N1),REF(MA6,N1),8,1),ColorFF15FF;
STICKLINE(N2<N1,REF(MA6,N2),REF(MA6,N2),8,1),ColorFF8B17;
qs1:=IF(C>MA(C,4),1,0);
qs2:=IF(C<MA(C,4),-1,0);
qs3:=IF(MA(C,5)>REF(MA(C,5),1),1,0);
qs4:=IF(MA(C,5)<REF(MA(C,5),1),-1,0);
qs:=qs1+qs2+qs3+qs4;
STICKLINE((qs=-2 AND C<O),H,L,0,0),Color00FF00;
STICKLINE((qs=-2 AND C<O),OPEN,CLOSE,10,0),Color009500;
STICKLINE((qs=-2 AND C<O),OPEN,CLOSE,8,0),Color00AA00;
STICKLINE((qs=-2 AND C<O),OPEN,CLOSE,6,0),Color00BF00;
STICKLINE((qs=-2 AND C<O),OPEN,CLOSE,4,0),Color00D500;
STICKLINE((qs=-2 AND C<O),OPEN,CLOSE,2,0),Color00EA00;//绿
STICKLINE((qs=-2 AND C>O),H,L,0,0),ColorFF00FF;
STICKLINE((qs=-2 AND C>O),O,C,10,0),ColorBB00BB;
STICKLINE((qs=-2 AND C>O),O,C,8,1),colorFF5BFF;
STICKLINE((qs=-2 AND C>O),O,C,4,0),colorF900F9;
STICKLINE((qs=-2 AND C>O),O,C,2,0),ColorFF11FF;//桔
STICKLINE((qs=0 AND C<O),H,L,0,0),ColorFFFFFF;
STICKLINE((qs=0 AND C<O),O,C,10,0),ColorCCCCCC;
STICKLINE((qs=0 AND C<O),O,C,8,1),ColorDEDEDE;
STICKLINE((qs=0 AND C<O),O,C,4,0),ColorF6F6F6;
STICKLINE((qs=0 AND C<O),O,C,2,0),ColorFFFFFF;//白
STICKLINE((qs=0 AND C>O),H,L,0,0),Color009FFF;
STICKLINE((qs=0 AND C>O),O,C,10,0),Color009FFF;
STICKLINE((qs=0 AND C>O),O,C,8,1),Color00B5FF;
STICKLINE((qs=0 AND C>O),O,C,4,0),Color00E4FF;
STICKLINE((qs=0 AND C>O),O,C,2,0),Color00FFFF;//黄
STICKLINE((qs=2 AND C<O),H,L,0,0),ColorFFFF00;
STICKLINE((qs=2 AND C<O),O,C,10,0),ColorAAAA00;
STICKLINE((qs=2 AND C<O),O,C,8,1),ColorBFBF00;
STICKLINE((qs=2 AND C<O),O,C,4,0),ColorD5D500;
STICKLINE((qs=2 AND C<O),O,C,2,0),ColorEAEA00;//青
STICKLINE((qs=2 AND C>O),H,L,0,0),Color0000FF;
STICKLINE((qs=2 AND C>O),O,C,10,0),Color0000AA;
STICKLINE((qs=2 AND C>O),O,C,8,0),Color0000BF;
STICKLINE((qs=2 AND C>O),O,C,6,0),Color0000D5;
STICKLINE((qs=2 AND C>O),O,C,4,0),Color0000EA;//红
STICKLINE((qs=2 AND C>O),O,C,2,0),Color0000FF;
AC:=AMOUNT/(VOL);
YY:=MA(AC,9);
LLL:=(C-YY)/YY*100;
MIDC := MA(CLOSE,14);
UPPERC:= MIDC + 2*STD(C,14);
LOWERC:= MIDC - 2*STD(C,14);
BBA:=(C-LOWERC)/(UPPERC-LOWERC);
BBC:=FORCAST(BBA,3);
LIFENGCYC:=(REF(LLL,1)<-15 AND REF(BBA,1)<0 AND LLL>REF(LLL,1));
DRAWTEXT(LIFENGCYC>0,LOW*0.99,'▲'),colorffffff;
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'▼'),ColorFFFFFF;