{神熬五线源码}

DRAWTEXTREL(50,10,' 代码: '+STKLABEL+' '+STKNAME+' 日期: '+YEAR+'年'+MONTH+'月 '+DAY+'日 '),linethick2,ColorFFFF80;
 {引用}
DDX:="LX-DDX.DDX#day";
 DDY:="LX-DDY.DDY#day";
 DDZ:="LX-DDZ.DDZ#day";
 LH:="LX-DDX.连红#day";
 SH:="LX-DDX.拾红#day";
 RSH:="LX-DDX.廿红#day";
 LSH:="LX-DDX.陆拾红#day";
 MRDS:="全景引用.买入单#day";
 MCDS:="全景引用.卖出单#day";
 ZLC:="全景引用.主力差#day";
 TC:="全景引用.特单差#day";
 DC:="全景引用.大单差#day";
 ZC:="全景引用.中单差#day";
 XC:="全景引用.小单差#day";
 XN:="全景引用.小单买#day";
 XM:="全景引用.小单卖#day";
 ZN:="全景引用.中单买#day";
 ZM:="全景引用.中单卖#day";
 DN:="全景引用.大单买#day";
 DM:="全景引用.大单卖#day";
 TN:="全景引用.特单买#day";
 TM:="全景引用.特单卖#day";
 ZLN:="全景引用.主单买#day";
 ZLM:="全景引用.主单卖#day";
 SS:="全景引用.散持#day";
 ZS:="全景引用.中持#day";
 DS:="全景引用.大持#day";
 CS:="全景引用.超持#day";
 ZLS:="全景引用.主持#day";
 ZJDN:="全景引用.动能#day";
 LZZS:="全景引用.领涨指数#day";
 ZHS:="全景引用.帐户数#day";
 JHCG:="全景引用.均户持股#day";
 ZHZJ:="全景引用.帐户增减#day";
 JHCGZJ:="全景引用.均户持股增减#day";
 {条件}
DSC:=MCDS-MRDS;
 MDB:=MCDS/(MRDS+MCDS);
 NDB:=MRDS/(MRDS+MCDS);
 DSB:=MDB-NDB;
 DPZS:=INDEXC;
 DPZG:=INDEXH;
 DPZD:=INDEXL;
 {超赢}
HS:=(vol/capital);
 XDN:=SUM((XN*AMOUNT/10000),0);
 XDM:=SUM((XM*AMOUNT/10000),0);
 XJ:=XDN-XDM;
 XZ:=SUM(((vol/capital)*100*(XN-XM)),0);
 ZDN:=SUM((ZN*AMOUNT/10000),0);
 ZDM:=SUM((ZM*AMOUNT/10000),0);
 ZJ:=ZDN-ZDM;
 ZZ:=SUM(((vol/capital)*100*(ZN-ZM)),0);
 DDN:=SUM((DN*AMOUNT/10000),0);
 DDM:=SUM((DM*AMOUNT/10000),0);
 DJ:=DDN-DDM;
 DZ:=SUM(((vol/capital)*100*(DN-DM)),0);
 TDN:=SUM((TN*AMOUNT/10000),0);
 TDM:=SUM((TM*AMOUNT/10000),0);
 TJ:=TDN-TDM;
 TZ:=SUM(((vol/capital)*100*(TN-TM)),0);
 ZLDN:=SUM((ZLN*AMOUNT/10000),0);
 ZLDM:=SUM((ZLM*AMOUNT/10000),0);
 ZLJ:=ZLDN-ZLDM;
 ZLZ:=SUM(((vol/capital)*100*(ZLN-ZLM)),0);

{画柱图};
ZDZ:=300/(MAX(ZLDN,ZLDM,TDN,TDM,DDN,DDM,ZDN,ZDM,XDN,XDM,XJ,ZJ,DJ,TJ,ZLJ));
 ZLNR:=380-(ZLDN*ZDZ);
 ZLMC:=380-(ZLDM*ZDZ);
 TNR:=380-(TDN*ZDZ);
 TMC:=380-(TDM*ZDZ);
 DNR:=380-(DDN*ZDZ);
 DMC:=380-(DDM*ZDZ);
 ZNR:=380-(ZDN*ZDZ);
 ZMC:=380-(ZDM*ZDZ);
 XNR:=380-(XDN*ZDZ);
 XMC:=380-(XDM*ZDZ);
 XJN:=380-(ABS(XJ)*ZDZ);
 ZJN:=380-(ABS(ZJ)*ZDZ);
 DJN:=380-(ABS(DJ)*ZDZ);
 TJN:=380-(ABS(TJ)*ZDZ);
 ZLJN:=380-(ABS(ZLJ)*ZDZ);
散户:XJ,linethick1,COLORFFFFFF;
中户:ZJ,linethick1,colorGreen;
大户:DJ,linethick1,colorYellow;
机构:TJ,linethick1,ColorFF0000;
主力:ZLJ,linethick2,colorRed;
 DRAWRECTREL(160,XNR,180,380,RGB(200,0,0)),COLOR000000,LAYER5;
 DRAWRECTREL(180,XMC,200,380,RGB(0,200,0)),COLOR000000,LAYER5;
 DRAWRECTREL(200,XJN,220,380,(IF((XJ >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER5;
 DRAWRECTREL(250,ZNR,270,380,RGB(200,0,0)),COLOR000000,LAYER5;
 DRAWRECTREL(270,ZMC,290,380,RGB(0,200,0)),COLOR000000,LAYER5;
 DRAWRECTREL(290,ZJN,310,380,(IF((ZJ >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER5;
 DRAWRECTREL(340,DNR,360,380,RGB(200,0,0)),COLOR000000,LAYER5;
 DRAWRECTREL(360,DMC,380,380,RGB(0,200,0)),COLOR000000,LAYER5;
 DRAWRECTREL(380,DJN,400,380,(IF((DJ >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER5;
 DRAWRECTREL(430,TNR,450,380,RGB(200,0,0)),COLOR000000,LAYER5;
 DRAWRECTREL(450,TMC,470,380,RGB(0,200,0)),COLOR000000,LAYER5;
 DRAWRECTREL(470,TJN,490,380,(IF((TJ >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER5;
 DRAWRECTREL(520,ZLNR,540,380,RGB(200,0,0)),COLOR000000,LAYER5;
 DRAWRECTREL(540,ZLMC,560,380,RGB(0,200,0)),COLOR000000,LAYER5;
 DRAWRECTREL(560,ZLJN,580,380,(IF((ZLJ >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER5;
 DRAWTEXTREL(120,400,'买入'),COLOR6600FF;
 DRAWTEXTREL(120,480,'卖出'),ColorABFF46;
 DRAWTEXTREL(120,560,'净买'),COLORFFFF00;
 DRAWTEXTREL(140,240,'散'),COLORFFFFFF;
 DRAWTEXTREL(140,320,'户'),COLORFFFFFF;
 DRAWTEXTREL(160,400,NUMTOSTRN(XDN,2)),COLOR6600FF;
 DRAWTEXTREL(160,480,NUMTOSTRN(XDM,2)),ColorABFF46;
 DRAWTEXTREL(160,560,NUMTOSTRN(XJ,2)),COLORFFFFFF;
 DRAWTEXTREL(230,240,'中'),colorGreen;
 DRAWTEXTREL(230,320,'户'),colorGreen;
 DRAWTEXTREL(250,400,NUMTOSTRN(ZDN,2)),COLOR6600FF;
 DRAWTEXTREL(250,480,NUMTOSTRN(ZDM,2)),ColorABFF46;
 DRAWTEXTREL(250,560,NUMTOSTRN(ZJ,2)),colorGreen;
 DRAWTEXTREL(320,240,'大'),colorYellow;
 DRAWTEXTREL(320,320,'户'),colorYellow;
 DRAWTEXTREL(340,400,NUMTOSTRN(DDN,2)),COLOR6600FF;
 DRAWTEXTREL(340,480,NUMTOSTRN(DDM,2)),ColorABFF46;
 DRAWTEXTREL(340,560,NUMTOSTRN(DJ,2)),colorYellow;
 DRAWTEXTREL(410,240,'特'),ColorFF0000;
 DRAWTEXTREL(410,320,'大'),ColorFF0000;
 DRAWTEXTREL(430,400,NUMTOSTRN(TDN,2)),COLOR6600FF;
 DRAWTEXTREL(430,480,NUMTOSTRN(TDM,2)),ColorABFF46;
 DRAWTEXTREL(430,560,NUMTOSTRN(TJ,2)),ColorFF0000;
 DRAWTEXTREL(500,240,'主'),colorRed;
 DRAWTEXTREL(500,320,'力'),colorRed;
 DRAWTEXTREL(520,400,NUMTOSTRN(ZLDN,2)),COLOR6600FF;
 DRAWTEXTREL(520,480,NUMTOSTRN(ZLDM,2)),ColorABFF46;
 DRAWTEXTREL(520,560,NUMTOSTRN(ZLJ,2)),colorRed;
 WP:=sum(if(DYNAINFO(23)*close,DYNAINFO(23),0),0)*0.003906;
 NP:=sum(if(DYNAINFO(22)*close,DYNAINFO(22),0),0)*0.003906;
 ZDL:=(WP-NP)/(NP+WP)*100;
 TCL:=(ZLN-ZLM)*VOL/VOL*100;
 {各单增减比例显示}
DRAWTEXTREL(120,640,'增减'),COLORFFFF00;
 DRAWTEXTREL(160,640,NUMTOSTRN(XZ,2)+'%'),COLORFFFFFF;
 DRAWTEXTREL(250,640,NUMTOSTRN(ZZ,2)+'%'),colorGreen;
 DRAWTEXTREL(340,640,NUMTOSTRN(DZ,2)+'%'),colorYellow;
 DRAWTEXTREL(430,640,NUMTOSTRN(TZ,2)+'%'),ColorFF0000;
 DRAWTEXTREL(520,640,NUMTOSTRN(ZLZ,2)+'%'),colorRed;
 DRAWTEXTREL(120,720,'持仓'),COLORFFFF00;
 DRAWTEXTREL(160,720,NUMTOSTRN(SS,2)+'%'),COLORFFFFFF;
 DRAWTEXTREL(250,720,NUMTOSTRN(ZS,2)+'%'),colorGreen;
 DRAWTEXTREL(340,720,NUMTOSTRN(DS,2)+'%'),colorYellow;
 DRAWTEXTREL(430,720,NUMTOSTRN(CS,2)+'%'),ColorFF0000;
 DRAWTEXTREL(520,720,NUMTOSTRN(ZLS,2)+'%'),colorRed;