1. 通达信【主力深度控盘系统】副图指标源码
pascal复制B1:=(HHV(H,35)-C)/(HHV(H,35)-LLV(LOW,35))*100-35;
B2:=SMA(B1,35,1)+100;
B3:=(C-LLV(L,35))/(HHV(H,35)-LLV(L,35))*100;
B4:=SMA(B3,3,1);
2. 通达信主力监控副图指标源码
pascal复制HG1:=(((CLOSE-MA(CLOSE,6))/MA(CLOSE,6))*100);
HG2:=(((CLOSE-MA(CLOSE,12))/MA(CLOSE,12))*100);
HG3:=(((CLOSE-MA(CLOSE,24))/MA(CLOSE,24))*100);
HG4:=(((HG1+(2*HG2))+(3*HG3))/6);
HG5:=MA(HG4,3);
HG6:=STICKLINE((HG5<=(0-10)),0,(0-20),3.5,0),COLOR00AAFF;
HG7:=EMA(EMA(CLOSE,3),1);
HG8:=(HG7-REF(HG7,1))/REF(HG7,1)*1000;
STICKLINE(HG8< 0,HG8,0,3.5,0),COLORFFAA00;
STICKLINE(HG8>REF(HG8,3) AND HG8>0,HG8,0,3.5,0),COLOR000088;
STICKLINE(HG8>REF(HG8,3) AND HG8>0,HG8,0,2.5,0),COLOR0000AA;
STICKLINE(HG8>REF(HG8,3) AND HG8>0,HG8,0,1.5,0),COLOR0000CC;
STICKLINE(HG8>REF(HG8,3) AND HG8>0,HG8,0,1,0),COLOR0000EE;
STICKLINE(HG8< REF(HG8,3) AND HG8>0,HG8,0,3.5,0),COLOR008800;
STICKLINE(HG8< REF(HG8,3) AND HG8>0,HG8,0,2.5,0),COLOR00AA00;
STICKLINE(HG8< REF(HG8,3) AND HG8>0,HG8,0,1.5,0),COLOR00CC00;
STICKLINE(HG8< REF(HG8,3) AND HG8>0,HG8,0,1,0),COLOR00EE00;
3. 通达信【主力资金控盘】副图指标源码
pascal复制价量:3*sma((close-llv(low,27))/(hhv(high,27)-llv(low,27))*100,5,1)-2*sma(sma((close-llv(low,27))/(hhv(high,27)-llv(low,27))*100,5,1),3,1),color00ccff,nodraw;
主线:(((价量-llv(价量,27))/(hhv(价量,27)-llv(价量,27)))*(4))*(25),colorcyan,nodraw;
快线:(((价量-llv(价量,9))/(hhv(价量,9)-llv(价量,9)))*(4))*(25),color55aaff,nodraw;
rsv:=(close-llv(low,13))/(hhv(high,13)-llv(low,13))*100;
k1:=sma(rsv,3,1);
d1:=sma(k1,3,1);
kk:=intpart(k1);
dd:=intpart(d1);
tfxxs:=kk+dd;
stickline(abc>0 and abc>ref(abc,1),100,abc+100,2.5,0),color0000aa;
stickline(abc>0 and abc>ref(abc,1),100,abc+100,1.5,0),color0022cc;
stickline(abc>0 and abc>ref(abc,1),100,abc+100,0.5,0),color0055ff;
stickline(abc<0 and abc>ref(abc,1),100,abc+100,2.5,0),coloraa00bb;
stickline(abc<0 and abc>ref(abc,1),100,abc+100,1.5,0),colorcc22bb;
stickline(abc<0 and abc>ref(abc,1),100,abc+100,0.5,0),colorff55bb;
stickline(abc>0 and abc<=ref(abc,1),100,abc+100,2.5,0),color00aaff;
stickline(abc>0 and abc<=ref(abc,1),100,abc+100,1.5,0),color00ccff;
stickline(abc>0 and abc<=ref(abc,1),100,abc+100,0.5,0),color00ffff;
4. 通达信【主力博弈】副图指标源码
pascal复制顶:90,POINTDOT,COLORRED;
风险:80,POINTDOT,COLORYELLOW;
平衡:50,POINTDOT,COLORFF00FF,NODRAW;
安全:20,POINTDOT,COLOR00FF00;
主力:=EMA((WINNER(CLOSE) * 70),3);
散户:=EMA(((WINNER((CLOSE * 1.1)) - WINNER((CLOSE * 0.9))) * 80),3);
主力控盘:((主力 / (主力 + 散户)) * 100),LINETHICK2,COLORLIRED;
DRAWICON(CROSS(主力控盘,50),主力控盘*1.002,9);
STICKLINE(FILTER((INDEXC-REF(INDEXC,1))/REF(INDEXC,1)>0.035,10),0,20,2,0),LINETHICK3,COLORRED;
DRAWTEXT(FILTER((INDEXC-REF(INDEXC,1))/REF(INDEXC,1)>0.035,10),15,'★飙升'),COLORWHITE;
DRAWICON(FILTER((INDEXC-REF(INDEXC,1))/REF(INDEXC,1)>0.035,10),20 * 1.002,5);
