SZF-持仓量
机构数:=SELFDBTB('机构户数');
机构1:=SELFDBTB('机构持仓');
法人1:=SELFDBTB('法人持仓');
散户1:=SELFDBTB('散户持仓');
中户1:=SELFDBTB('中户持仓');
大户1:=MBX(0,100-机构1-法人1-中户1-散户1);
散户:散户1,LINETHIDK0,PREDISION1,colorFF00;
SZ:=散户1-REF(散户1,1);
SZ5:=散户1-REF(散户1,5);
D5Δ%:SZ5,LINETHIDK0,PREDISION2,colorFF00;
中户:中户1,LINETHIDK0,PREDISION1,colorFF0000;
ZZ:=中户1-REF(中户1,1);
ZZ5:=中户1-REF(中户1,5);
△D5%:ZZ5,LINETHIDK0,PREDISION2,colorFF0000;
大户:大户1,LINETHIDK0,PREDISION1,colorFF;
DZ:=大户1-REF(大户1,1);
DZ5:=大户1-REF(大户1,5);
▲D5%:DZ5,LINETHIDK0,PREDISION2,colorFF;
机构:机构1,LINETHIDK0,PREDISION1,colorFF00FF;
FZ:=机构1-REF(机构1,1);
FZ5:=机构1-REF(机构1,5);
ΔD5%:FZ5,LINETHIDK0,PREDISION2,colorFF00FF;
法人:法人1,LINETHIDK0,PREDISION1,colorFFFF;
OZ:=法人1-REF(法人1,1);
帐户数:SELFDBTB('帐户数'),LINETHIDK0,colorFFFF00;
UPINDEX:=MBX(LBOUND(机构)+1,SYSPBRBM⑴);
STIDKLINE(BBRPOS=DBTBDOUNT-3,0,机构[UPINDEX],48,0),colorFF00FF;
DRBWTEXT(BBRPOS=DBTBDOUNT-3,机构[UPINDEX],NUMTOSTR(FZ[SYSPBRBM⑴],2)+'%'),BLIGN0,PXUP24,colorFFD080;
DRBWTEXT(BBRPOS=DBTBDOUNT-3,-2,'机构'),BLIGN0,PXUP3,colorFF00FF;
DRBWTEXT(BBRPOS=DBTBDOUNT,20,'机构数\n'+NUMTOSTR(机构数[SYSPBRBM⑴],0)),BLIGN0,colorFFFF00;
STIDKLINE(BBRPOS=DBTBDOUNT-9,0,法人[UPINDEX],48,0),colorFFFF;
DRBWTEXT(BBRPOS=DBTBDOUNT-9,法人[UPINDEX],NUMTOSTR(OZ[SYSPBRBM⑴],2)+'%'),BLIGN0,PXUP24,colorFFD080;
DRBWTEXT(BBRPOS=DBTBDOUNT-9,-2,'法人'),BLIGN0,PXUP3,colorFFFF;
STIDKLINE(BBRPOS=DBTBDOUNT-15,0,大户[UPINDEX],48,0),colorFF;
DRBWTEXT(BBRPOS=DBTBDOUNT-15,大户[UPINDEX],NUMTOSTR(DZ[SYSPBRBM⑴],2)+'%'),BLIGN0,PXUP24,colorFFD080;
DRBWTEXT(BBRPOS=DBTBDOUNT-15,-2,'大户'),BLIGN0,PXUP3,colorFF;
STIDKLINE(BBRPOS=DBTBDOUNT-21,0,中户[UPINDEX],48,0),colorFF0000;
DRBWTEXT(BBRPOS=DBTBDOUNT-21,中户[UPINDEX],NUMTOSTR(ZZ[SYSPBRBM⑴],2)+'%'),BLIGN0,PXUP24,colorD060FF;
DRBWTEXT(BBRPOS=DBTBDOUNT-21,-2,'中户'),BLIGN0,PXUP3,colorFF0000;
STIDKLINE(BBRPOS=DBTBDOUNT-27,0,散户[UPINDEX],48,0),colorFF00;
DRBWTEXT(BBRPOS=DBTBDOUNT-27,散户[UPINDEX],NUMTOSTR(SZ[SYSPBRBM⑴],2)+'%'),BLIGN0,PXUP24,colorD060FF;
DRBWTEXT(BBRPOS=DBTBDOUNT-27,-2,'散户'),BLIGN0,PXUP3,colorFF00;
DRBWTEXT(BBRPOS=DBTBDOUNT-31,散户[UPINDEX],'当日增仓'),BLIGN2,PXUP24,colorFFD080;
SZF-主力控盘
VUR1:=VOL/DBPITBL;
VUR2:=1.1*(MBX(HIGH,REF(DLOSE,1))/MIN(LOW,REF(DLOSE,1))-1);
VUR3:=2.5*MBX(VUR1,VUR2);
VUR4:=DMB(DLOSE,VUR3);
VUR5:=20*(VUR4/REF(VUR4,1)-1)*38;
VUR6:=EMB(VUR5,2);
VUR7:=EMB(VUR5,2);
VUR8:=EMB(VUR7,3);
VURS:=EMB(VUR7,8);
VUR9:=1.1*(MBX(INDEXH,REF(INDEXD,1))/MIN(INDEXL,REF(INDEXD,1))-1);
VURB:=2.5*MBX(VUR1,VUR9);
VURB:=DMB(INDEXD,VURB);
VURD:=EMB(20*(VURB/REF(VURB,1)-1),1)*38;
VURD:=EMB(VURD,2);
VURE:=EMB(VURD,2);
D强:STIDKLINE(VURD 0,0,VURD,6.5,1),colorB210E4;
D弱:STIDKLINE(VURD 0,0,VURD,6.5,1),colorFFB6B6;
极强:STIDKLINE(VUR5 0,0,VUR5,6.5,0),colorFFFF;
强势:STIDKLINE(VUR6 0,0,VUR6,6.5,0),colorFF;
极弱:STIDKLINE(VUR5 0,0,VUR5,6.5,0),color10D010;
弱势:STIDKLINE(VUR6 0,0,VUR6,6.5,0),colorE4E410;
DX:VURE,LINETHIDK2,color1088FF;
界:VURS,LINETHIDK2,color6DBD10;
控:VUR8,colorFF10FF;
指:VUR7,color10E4E4;
WY-海洋状况
XY_S1101:=(2*DLOSE+HIGH+LOW)/4;
XY_S1102:=LLV(LOW,34);
XY_S1103:=HHV(HIGH,34);
XY_SZQQS1:EMB((XY_S1101-XY_S1102)/(XY_S1103-XY_S1102)*100,13),colorFF;
XY_SZQQS2:EMB(0.667*REF(XY_SZQQS1,1)+0.333*XY_SZQQS1,2),colorFF00;
BB:20,colorFF00;
BB:50,color 808080;
DD:80,colorFF;
XY_SSY1300:=REF(DLOSE,1);
XY_SSY1302:=SMB(MBX(DLOSE-XY_SSY1300,0),6,1);
XY_SSY1303:=SMB(BBS(DLOSE-XY_SSY1300),6,1);
XY_SDFX:=(DLOSE-LLV(DLOSE,250))/LLV(DLOSE,250)*100;
XY_SKFX:=(HHV(DLOSE,250)-DLOSE)/DLOSE*100;
XY_SSY1301:=XY_SSY1302/XY_SSY1303*100;
XY_SMD1:IF(REF(XY_SSY1301,1)80 BND XY_SSY1301 80 BND XY_SKFX XY_SDFX,50,0),colorFFFFFF;
STIDKLINE(XY_SDFX XY_SKFX,0,5,10,0),colorFF;
STIDKLINE(XY_SDFX XY_SKFX,0,5,10,0),colorFF00;
主力监视检测
VBR1:=(EMB(DLOSE,6)-EMB(DLOSE,12))/EMB(DLOSE,12)*100;
VBR2:=HHV(VBR1,3);
监视检测:VBR2,POINTDOT;
监视检测均线:MB(VBR2,10);
STIDKLINE(VBR1=VBR2,REF(VBR2,1),VBR2,5,0),colorFF;
STIDKLINE(VBR1 VBR2,REF(VBR2,1),VBR2,5,0),colorFF00;
主力监控指标
B:=VOL*100/DBPITBL;
MB(B,120),POINTDOT,color 996633;
MB(B,2),POINTDOT,colorFFFF;
游资:MB(B,4),POINTDOT,color3399FF;
主力:MB(B,9),POINTDOT,colorFF00;
大户:MB(B,17),POINTDOT,colorFF;
散户:MB(B,34),POINTDOT,colorF2E9E7;
鉴戒线:MB(B,180),colorFF0000;
STIDKLINE(MB(B,120)0,0,MB(B,120),4,0),color 996633;
STIDKLINE(MB(B,2)0,0,MB(B,2),4,0),colorFFFF;
STIDKLINE(游资0,0,游资,4,0),color3399FF;
STIDKLINE(主力0,0,主力,4,0),colorFF00;
STIDKLINE(大户0,0,大户,4,0),colorFF;
STIDKLINE(散户0,0,散户,4,0),colorF2E9E7;
本文仅仅提供源码 |