VAR1:=1;
VAR55:=LLV(LOW,8);
VAR66:=HHV(HIGH,8);
VAR77:=(VAR66-VAR55)/10;
VAR88:=SMA((CLOSE-VAR55)/VAR77,20,1);
VARA:=3*VAR88-2*SMA(VAR88,15,1);
散户筹码集中度: (10-VARA)*VAR1*6,colorgreen,LINETHICK2;
机构筹码集中度:EMA(WINNER(C

S1:=EMA(CLOSE,3);
S2:=EMA(CLOSE,6);
S3:=EMA(CLOSE,9);
S4:=EMA(CLOSE,12);
S5:=EMA(CLOSE,15);
S6:=EMA(CLOSE,18);
S7:=EMA(CLOSE,21);
S8:=EMA(CLOSE,24);
S9:=EMA(CLOSE,27);
S10:=EMA(CLOSE,30);
X1:=IF(

主力持仓:EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3),colormagenta,LINETHICK2;
主力筹码集中度:WINNER(C)*100 ,colorred,LINETHICK2;
散筹筹码集中度:(WINNER(C*1.1)-WINNER(C*0.9))*100 ,colorgreen,LINETHICK2;
强弱分界: 80,coloryellow;
趋势线: 3*SMA(

SHORT:=12;
LONG:=26;
M:=9;
DIFF := EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);
DEA_:= EMA(DIFF,M);
MACD_ := 2*(DIFF-DEA_),COLORSTICK;
MACD:MACD_,colorwhite;
DIF:DIFF,colorwhite;
DEA:DEA_,coloryellow;
A1:=BARSL

Var1:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
Var2:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
Var3:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
Var4:=(Var1+2*Var2+3*Var3)/6;
Var5:=MA(Var4,3);
Var6:=(CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(

VAR2:=1/WINNER(CLOSE);
VAR3:=MA(CLOSE,13);
VAR4:=100-ABS((CLOSE-VAR3)/VAR3*100);
VAR5:=LLV(LOW,75);
VAR6:=HHV(HIGH,75);
VAR7:=(VAR6-VAR5)/100;
VAR8:=SMA((CLOSE-VAR5)/VAR7,20,1);
VAR9:=SMA((OPEN-VAR5)/VAR7,20,1);

N:=9;
M1:=3;
M2:=3;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,LINETHICK2;
K:SMA(RSV,M1,1),LINETHICK1;
D:SMA(K,M2,1),LINETHICK1;
J:3*K-2*D,COLORFF00FF,LINETHICK1;
IF(J<0,J,DRAWNULL),colorgreen,LINETHI

F:=100*(C-REF(C,1))/REF(C,1);
今小昨:=IF(C<REF(O,1) AND F<0,1,0);
S1:=今小昨;
今小前:=IF(C<REF(O,2) AND F<0,1,0),LINETHICK0;
S2:=今小前;
A1:=S1=0 AND REF(S1,1)=1 AND S2=0 AND REF(S2,1)=1 AND CROSS(ZIG(3,3) ,REF(ZIG(3 ,3),1));

RSV:=((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9)))*(100);
TJ:=IF((RSV<5),0,RSV);
投机:=IF((TJ>95),100,TJ),COLOR008000,LINETHICK1;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
中期:=EMA(D,10);
STICKLINE((K>=D),D,REF(D,1),4,0),CO

CC:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
DD:=DMA(CLOSE,CC);
下:(1-12/100)*DD,coloryellow;
CC1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
DD1:=DMA(CLOSE,CC1);
上:(1+12/100)*DD1,CIRCLEDOT,coloryellow;

b:=(C-O)/(H-L)*VOL;
IF(O<C,VOL+REF(b,2),REF(b,2)-VOL);
IF(O=C,REF(b,1),REF(b,1));
IF(O=H,REF(b,2)-VOL,REF(b,2)-VOL);
IF(O=L,VOL+REF(b,2),REF(b,2)+VOL);

;Z:=MA(C,120);
VAR3:=(MA(C,5)-Z)/Z;
VAR4:=MA((CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10))*100,3);
波段进场:IF(CLOSE>Z AND REF(VAR4,1)<30 AND VAR4>REF(VAR4,1) AND REF(VAR4,1)<REF(VAR4,2),80,50);
反弹进场:IF(REF(VAR4,1)<5 AN

Var1:=(CLOSE*2+HIGH+LOW)/4;
SK: EMA(Var1,13)-EMA(Var1,21);
SD: EMA(SK,2);
多方能量: 2*(SK-SD)*3.8;
空方能量: (-2)*(SK-SD)*3.8;
DRAWTEXT(CROSS(空方能量,SK),空方能量,'始');
DRAWTEXT(CROSS(SK,空方能量),SK,'终');

A1:=1;
A2:=(3);
A3:=(((2*CLOSE)+HIGH)+LOW)/4;
A4:=LLV(LOW,36);
A5:=HHV(HIGH,36);
A6:=EMA((((A3-A4)/(A5-A4))*100),10);
A7:=(EMA(((0.667*(REF(A6,1)))+(0.333*A6)),2))*A1;
决策线:(EMA(A7,A2))*A1,colorred;
A8:=(HHV(

A:70;
B:90;
波段线:5*SMA((CLOSE- LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-3*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1)-SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),2,1),NODRAW;
趁

DIF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIF,9);
MACD:(DIF-DEA)*2,COLORSTICK;
红面积:SUM(MACD,BARSLAST(MACD<0))*(MACD>0),COLOR0000FF,NODRAW;
绿面积:SUM(MACD,BARSLAST(MACD>0))*(MACD<0),COLORFFFF00,NODRAW;
AA:=ROUND(REF(绿

VAR22:=REF(LOW,1);
VAR23:=((SMA(ABS((LOW - VAR22)),3,1) / SMA(MAX((LOW - VAR22),0),3,1)) * 100);
VAR24:=EMA(IF((CLOSE * 1.2),(VAR23 * 10),(VAR23 / 10)),3);
VAR25:=LLV(LOW,38);
VAR26:=HHV(VAR24,38);
VAR27:=IF(LLV(LOW,90),1,0);

N:=4;
N1:=25;
VAR0:=EMA(EMA(EMA(CLOSE,N),N),N);
买入线: VAR0-REF(VAR0,1)+VAR0;
卖出线: MA(买入线,N1);
STICKLINE(买入线>卖出线,卖出线,买入线,0.1,1);
STICKLINE(卖出线>买入线,买入线,卖出线,0.1,1);
DRAWTEXT(CROSS(卖出线,买入线),买入线*1.01,'↓降'), ,

x:=(3*C+L+O+H)/6;
宝塔多空线:(20*x+19*REF(x,1)+18*REF(x,2)+17*REF(x,3)+16*REF(x,4)+15*REF(x,5)+14*REF(x,6)
+13*REF(x,7)+12*REF(x,8)+11*REF(x,9)+10*REF(x,10)+9*REF(x,11)+8*REF(x,12)
+7*REF(x,13)+6*REF(x,14)+5*REF(x,15)+4*REF(x,16)+3*REF(x,17)+

VAR1:=EMA(EMA(CLOSE,13),13);
控盘:= (VAR1-REF(VAR1,1))/REF(VAR1,1)*1000,COLORFFCCCC,POINTDOT;
STICKLINE(控盘<0,控盘,0,4,0),colorwhite;
无庄控盘:0,colorwhite;
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,4,1),colorred;
有庄控盘: 0,colorred