LC:=REF(CLOSE,1);
RSI5:=(SMA(MAX(CLOSE-LC,0),3,1))/(SMA(ABS(CLOSE-LC),3,1))*100;
WR10:=100*(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3));
活跃度:RSI5-WR10,LINETHICK0,colorFFFF;
STICKLINE(活跃度>0,0,活跃度,6,1),colorFF00FF;
STICKLINE

顶部:90,LINEDOT,COLOR3C3CFF,PRECISION0;
分界:50,LINEDOT,COLORYELLOW,PRECISION0;
底部:10,LINEDOT,COLORCYAN,PRECISION0;
VAR1:=LLV(LOW,13);
VAR2:=HHV(HIGH,13);
主力:SMA((CLOSE-VAR1)/(VAR2-VAR1)*100,5,1),COLORRED,PRECISION2;
散户:SMA

VAR1:=AMOUNT/VOL/7;
VAR2:=(HIGH+LOW+OPEN+2*CLOSE)/5;
VAR3:=SUM(AMOUNT,7)/VAR1/7;
VAR33:=SUM(AMOUNT,25)/VAR1/7;
VAR44:=DMA(VAR2,VOL/VAR33);
长线:(VAR2-VAR44)/VAR44*100,COLORRED ;
FILLRGN(长线>0,长线,0),COLOR32329B;

{参数: 红绿灯:10,10,25}
INPUT:红绿灯(10,10,25);
a1:=前M个波谷位置(2,0.1,1);
a2:=前M个波峰位置(1,0.1,1);
光标位置:=系统参数(1);
cldis:=a1[系统参数(1)];
chdis:=a2[系统参数(1)];
tcl:=光标位置-cldis;
tch:=光标位置-chdis;
K1:=IF(tcl>tch,tcl,tch);

DRAWGBK(c>1, COLORRGB(50,110,40), COLORRGB(20,100,110),1);
ssar:=SAR(4,2,34),CIRCLEDOT;ssar>c,CIRCLEDOT,color004400;
ssar<c,CIRCLEDOT;0,color006600,CIRCLEDOT;
vol/capital/winner(c)/l*0.18,colorgreen;
TZ:IF(VOL/240>MA(VO

VAR1:="DMI.PDI"(12,6);
VAR2:="DMI.MDI"(12,6);
VAR3:=VAR1>65 AND VAR1>REF(VAR1,1);
VAR4:=LLV(VAR1,0);
VAR5:=BARSLAST(VAR4=VAR1);
VAR6:=(0-REF(VAR2,4))/(VAR4-REF(VAR2,VAR5))>2;
VAR7:=VAR1

MA10:MA(C,10);
MA20:MA(C,20);
MA62:MA(C,62);
A10:=ATAN((MA(C,10)/REF(MA(C,10),1)-1)*100)*3.1416*MA(C,10);
小金角:=REF(CROSS(MA(C,10),MA(C,20)),1) AND A10>10.0,Color00FF00;
DRAWTEXT(小金角,L-0.20,'小\n金\n角'),Color00FF00;
B20

DRAWTEXTEX(CLOSE,1,4,0,'机构红多禄空,大户紫多青空.中户橙多兰空,散户白多灰空'),Color80FFFF;
VV:=IF(CAPITAL<1,INDEXV,VOL);
VVC:=IF(CAPITAL<1,SUM(INDEXV,71),CAPITAL);
换手:=VV/VVC;
机构意图:=MA(换手,21)*100;
大户意图:=MA(换手,13)*100;
中户意图:=MA(换手,8)*100;

短期:(MA(CLOSE,3)+MA(CLOSE,4)+MA(CLOSE,5)+MA(CLOSE,6))/4,colorFF00;
中期:(MA(CLOSE,6)+MA(CLOSE,7)+MA(CLOSE,8)+MA(CLOSE,9))/4,LINETHICK3,colorFF00;
PARTLINE(短期>REF(短期,1),短期),colorFF;
PARTLINE(中期>REF(中期,1),中期),LINETHICK3,colorFF;

input: nn(22,1,70);
mid:=ma(c,26);
upper:mid+2*std(c,26),Linethick2,colorcd7f7d;
lower:mid-2*std(c,26),Linethick2,colorcd7f7d;
fillrgn(c>0,upper,lower),color333311;
mid,colorcd7f7d;
upper,colorcd7f7d;
lower,col

RSI1预设:=5000;
RSI2预设:=5000;
RSI3预设:=5000;
LC:=REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
RSI3:=SMA(MAX(CLOSE-LC,0),24,1)/SMA(ABS

DRAWGBK((DATE > 0),COLORRGB(40,40,173),COLORRGB(1,1,14),1);
LC:=REF(CLOSE,1);
止损价位:(LC*1.0035*97+0.2)/99.65,COLORRED,LINETHICK0;
滤网:=close>ref(high,1) and close>open;
RSI5:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*

MID : MA(CLOSE,7),POINTDOT,LINETHICK7,COLORwhite;
UPPER: MID + 2*STD(CLOSE,7),linethick3,colorwhite;
LOWER: MID -2*STD(CLOSE,7),linethick3,COLORwhite;
A:=(MA(C,3)+MA(C,5)+MA(C,8)+MA(C,13))/4;
B:=A*(1+ ((C+O+H+L)/4-SMA(C,10,1))/SMA

空方防守价:=EMA(HIGH,4);
多方防守价:=EMA(LOW,5);
B1:=IF(CROSS(CLOSE,空方防守价),1,IF(CROSS(多方防守价,CLOSE),-1,0));
B2:=REF(B1,BARSLAST(B1));
B3:=IF(B2=1,多方防守价,IF(B2=-1,空方防守价,0));
分界点:=B3;
DRAWTEXTEX(1,1,10,900,'分界点'+NUMTOSTR(分界点,3)),COLO

优化版量:VOL,VOLSTICK;
流通:CAPITAL/1000000,coloryellow;
市值:CAPITAL/100*CLOSE/10000,colorgreen;
换手:VOL/CAPITAL*(100)colormagenta;
主营利:FINANCE(21)/100000,LINETHICK2,color9090ff; {亿元}
净利:FINANCE(30)/100000,coloryellow; {亿元}

EMA13:EMA(C,13),COLOR0000FF,LINETHICK2;
EMA34:EMA(C,34),COLORYELLOW;
EMA55:EMA(C,55),COLORFF00FF;
EMA120:EMA(C,120),COLORFFCC66;
AR1:=EMA55>EMA34 AND EMA34>EMA13;
AR2:=BARSLAST((C-EMA13)/EMA13*100<-6);
AR3:=EMA

zz:=(hhv(h,3)+llv(l,3))/2;a:=if(c>zz,vol,0);b:=if(c<zz,vol,0);总0:=(a-b);
BBD:EMA(总0,3)/sum(vol,5)*100,LINETHICK;
STICKLINE(BBD>=0,0,BBD,8,0),COLOR000088;
STICKLINE(BBD>=0,0,BBD,5,0),COLOR0000AA;
STICKLINE(BBD

DRAWGBK((DATE > 0),COLORRGB(0,33,0),COLORRGB(0,33,0),1);
D_C:=INDEXC; D_H:=MA(INDEXH,3); D_L:=MA(INDEXL,3);
D_F:=if(INDEXC>ref(D_H,1),1,if(INDEXC<ref(D_L,1),-1,0));
for i=5+1 to datacount do begin
if D_C[i]>D_H[i-

BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
UPR:=BBI+3*STD(BBI,13),LINETHICK2;
DWN:=BBI-3*STD(BBI,13);
安全:=MA(CLOSE,60),LINETHICK2;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;

ZJ:EMA(C,13),COLOR0000FF;
HY:EMA(C,20),COLORFF00FF;
PARTLINE(ZJ>REF(ZJ,1),ZJ),COLORRED,LINETHICK2;
PARTLINE(ZJ<=REF(ZJ,1),ZJ),COLORBLUE,LINETHICK2;
PARTLINE(HY>REF(HY,1),HY),COLORFF00FF,LINETHICK2;
PARTLINE(HY<REF