【资料名称】:分时全景介绍
【资料描述】:
分时全景
{引用}
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);
{MACD}
DIFF:= "MACD.DIFF";
DEA:= "MACD.DEA";
MACD:= "MACD.MACD";
DRAWTEXTABS(10,145,'MACD数据运算:'+'DIFF:'+ NUMTOSTRN(DIFF,3)+' DEA:'+ NUMTOSTRN(DEA,3)+' MACD:'+ NUMTOSTRN(MACD,3)+''),colorffff66;
{多时分KDJ}
K:= "KDJ.K";
D:= "KDJ.D";
J:= "KDJ.J";
FZ120K:= "KDJ.K#MIN120";
FZ60K:= "KDJ.K#MIN60";
FZ30K:= "KDJ.K#MIN30";
FZ15K:= "KDJ.K#MIN15";
FZ120D:= "KDJ.D#MIN120";
FZ60D:= "KDJ.D#MIN60";
FZ30D:= "KDJ.D#MIN30";
FZ15D:= "KDJ.D#MIN15";
FZ60J:= "KDJ.J#MIN60";
FZ30J:= "KDJ.J#MIN30";
FZ15J:= "KDJ.J#MIN15";
DRAWTEXTABS(10,165,'KDJ-数据运算:'+'K:'+ NUMTOSTRN(K,2)+' D:'+ NUMTOSTRN(D,2)+' J:'+ NUMTOSTRN(J,2)+''),ColorCCCCCC;
DRAWTEXTABS(10,185,'KDJ-拾伍分钟:'+'K:'+ NUMTOSTRN(FZ15K,2)+' D:'+ NUMTOSTRN(FZ15D,2)+' J:'+ NUMTOSTRN(FZ15J,2)+''),Color99ff99;
DRAWTEXTABS(10,205,'KDJ-叁拾分钟:'+'K:'+ NUMTOSTRN(FZ30K,2)+' D:'+ NUMTOSTRN(FZ30D,2)+' J:'+ NUMTOSTRN(FZ30J,2)+''),Color99ff99;
DRAWTEXTABS(10,225,'KDJ-陆拾分钟:'+'K:'+ NUMTOSTRN(FZ60K,2)+' D:'+ NUMTOSTRN(FZ60D,2)+' J:'+ NUMTOSTRN(FZ60J,2)+''),Color99ff99;
{画柱图};
ZDZ:=300/(MAX(ZLDN,ZLDM,TDN,TDM,DDN,DDM,ZDN,ZDM,XDN,XDM,XJ,ZJ,DJ,TJ,ZLJ));
ZLNR:=680-(ZLDN*ZDZ);
ZLMC:=680-(ZLDM*ZDZ);
TNR:=680-(TDN*ZDZ);
TMC:=680-(TDM*ZDZ);
DNR:=680-(DDN*ZDZ);
DMC:=680-(DDM*ZDZ);
ZNR:=680-(ZDN*ZDZ);
ZMC:=680-(ZDM*ZDZ);
XNR:=680-(XDN*ZDZ);
XMC:=680-(XDM*ZDZ);
XJN:=680-(ABS(XJ)*ZDZ);
ZJN:=680-(ABS(ZJ)*ZDZ);
DJN:=680-(ABS(DJ)*ZDZ);
TJN:=680-(ABS(TJ)*ZDZ);
ZLJN:=680-(ABS(ZLJ)*ZDZ);
DRAWRECTREL(560,XNR,580,680,RGB(200,0,0)),COLOR000000,LAYER5;
DRAWRECTREL(580,XMC,600,680,RGB(0,200,0)),COLOR000000,LAYER5;
DRAWRECTREL(600,XJN,620,680,(IF((XJ >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER5;
DRAWRECTREL(650,ZNR,670,680,RGB(200,0,0)),COLOR000000,LAYER5;
DRAWRECTREL(670,ZMC,690,680,RGB(0,200,0)),COLOR000000,LAYER5;
DRAWRECTREL(690,ZJN,710,680,(IF((ZJ >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER5;
DRAWRECTREL(740,DNR,760,680,RGB(200,0,0)),COLOR000000,LAYER5;
DRAWRECTREL(760,DMC,780,680,RGB(0,200,0)),COLOR000000,LAYER5;
DRAWRECTREL(780,DJN,800,680,(IF((DJ >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER5;
DRAWRECTREL(830,TNR,850,680,RGB(200,0,0)),COLOR000000,LAYER5;
DRAWRECTREL(850,TMC,870,680,RGB(0,200,0)),COLOR000000,LAYER5;
DRAWRECTREL(870,TJN,890,680,(IF((TJ >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER5;
DRAWRECTREL(920,ZLNR,940,680,RGB(200,0,0)),COLOR000000,LAYER5;
DRAWRECTREL(940,ZLMC,960,680,RGB(0,200,0)),COLOR000000,LAYER5;
DRAWRECTREL(960,ZLJN,980,680,(IF((ZLJ >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER5;
DRAWTEXTREL(520,690,'买入'),COLOR6600FF;
DRAWTEXTREL(520,730,'卖出'),ColorABFF46;
DRAWTEXTREL(520,780,'净买'),COLORFFFFFF;
DRAWTEXTREL(540,580,'散'),COLOR00FF00;
DRAWTEXTREL(540,620,'户'),COLOR00FF00;
DRAWTEXTREL(560,690,NUMTOSTRN(XDN,2)),COLOR6600FF;
DRAWTEXTREL(560,730,NUMTOSTRN(XDM,2)),ColorABFF46;
DRAWTEXTREL(560,780,NUMTOSTRN(XJ,2)),COLOR00FF00;
DRAWTEXTREL(630,580,'中'),ColorFF0000;
DRAWTEXTREL(630,620,'户'),ColorFF0000;
DRAWTEXTREL(650,690,NUMTOSTRN(ZDN,2)),COLOR6600FF;
DRAWTEXTREL(650,730,NUMTOSTRN(ZDM,2)),ColorABFF46;
DRAWTEXTREL(650,780,NUMTOSTRN(ZJ,2)),ColorFF0000;
DRAWTEXTREL(720,580,'大'),COLORFFFF00;
DRAWTEXTREL(720,620,'户'),COLORFFFF00;
DRAWTEXTREL(740,690,NUMTOSTRN(DDN,2)),COLOR6600FF;
DRAWTEXTREL(740,730,NUMTOSTRN(DDM,2)),ColorABFF46;
DRAWTEXTREL(740,780,NUMTOSTRN(DJ,2)),colorCyan;
DRAWTEXTREL(810,580,'特'),COLOR0000FF;
DRAWTEXTREL(810,620,'大'),COLOR0000FF;
DRAWTEXTREL(830,690,NUMTOSTRN(TDN,2)),COLOR6600FF;
DRAWTEXTREL(830,730,NUMTOSTRN(TDM,2)),ColorABFF46;
DRAWTEXTREL(830,780,NUMTOSTRN(TJ,2)),COLORRED;
DRAWTEXTREL(900,580,'主'),color33FFFF;
DRAWTEXTREL(900,620,'力'),color33FFFF;
DRAWTEXTREL(920,690,NUMTOSTRN(ZLDN,2)),COLOR6600FF;
DRAWTEXTREL(920,730,NUMTOSTRN(ZLDM,2)),ColorABFF46;
DRAWTEXTREL(920,780,NUMTOSTRN(ZLJ,2)),coloryellow;
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;
DRAWTEXTABS(10,65,'主动率:'+ NUMTOSTRN(ZDL,2)+' 通吃率/主力差:'+ NUMTOSTRN(TCL,1)),Color33FF99;
DRAWTEXTABS(10,125,''+'DDX:'+ NUMTOSTRN(DDX,3)+' DDY:'+ NUMTOSTRN(DDY,3)+' DDZ:'+ NUMTOSTRN(DDZ,3)+''),colorccff99;
DRAWTEXTABS(230,125,''+'连红:'+ NUMTOSTRN(LH,0)+' 拾红:'+ NUMTOSTRN(SH,0)+' 廿红:'+ NUMTOSTRN(RSH,0)+' 陆拾红:'+ NUMTOSTRN(LSH,0)+''),color9966FF;
DRAWTEXTABS(345,25,'上涨家数:'+NUMTOSTRN(DYNAINFO(69),0)+' 下跌家数:'+NUMTOSTRN(DYNAINFO(70),0)+' 平盘家数:'+NUMTOSTRN(DYNAINFO(71),0)),colorCC33FF;
DRAWTEXTABS(10,5,'所属:板块/概念/行业/地域:' +BKNAME),Color9DFFFF;
DRAWTEXTABS(220,65,''+'特单差:'+ NUMTOSTRN(TC,1)+' 大单差:'+ NUMTOSTRN(DC,1)+' 中单差:'+ NUMTOSTRN(ZC,1)+' 小单差:'+ NUMTOSTRN(XC,1)+''),Color33FF99;
DRAWTEXTABS(10,45,''+'买入单数:'+ NUMTOSTRN(MRDS,0)+' 卖出单数:'+ NUMTOSTRN(MCDS,0)+' 单数差:'+ NUMTOSTRN(DSC,0)+' 单数比:'+ NUMTOSTRN(DSB,3)),color3399ff;
DRAWTEXTABS(480,45,''+'资金动能:'+ NUMTOSTRN(ZJDN,3)+''),colorCCFFff;
DRAWTEXTABS(10,25,''+'大盘指数:'+ NUMTOSTRN(DPZS,2)+' 大盘最高:'+ NUMTOSTRN(DPZG,2)+' 大盘最低:'+ NUMTOSTRN(DPZD,2)+''),colorffcc66;
DRAWTEXTABS(10,105,'帐号户数:'+NUMTOSTRN(ZHS,0)+'(户)'),color99cccc;
DRAWTEXTABS(140,105,'帐户增减:'+NUMTOSTRN(ZHZJ,0)+'(户)'),color99cccc;
DRAWTEXTABS(260,105,'均户持股:'+NUMTOSTRN(JHCG,0)+'(股)'),color99ccff;
DRAWTEXTABS(380,105,'均户增减:'+NUMTOSTRN(JHCGZJ,0)+'(股)'),color99ccff;
DRAWTEXTABS(370,45,'BBD:'+NUMTOSTRN(ZLJ,2)+'(万)'),ColorCCCCFF;
{五分钟资金趋势}
ZL5:=ZLJ-REF(ZLJ,5);
T5:=TJ-REF(TJ,5);
D5:=DJ-REF(DJ,5);
Z5:=ZJ-REF(ZJ,5);
X5:=XJ-REF(XJ,5);
DRAWTEXTABS(10,85,'五分钟各单净买(万):'+'主力:'+ NUMTOSTRN(ZL5,2)+' 特大:'+ NUMTOSTRN(T5,2)+' 大户:'+ NUMTOSTRN(D5,2)+' 中户:'+ NUMTOSTRN(Z5,2)+' 散户:'+ NUMTOSTRN(X5,2)),colorFFCCCC;
{各单增减比例显示}
DRAWTEXTREL(520,830,'增减'),colorFFFFFF;
DRAWTEXTREL(560,830,NUMTOSTRN(XZ,2)+'%'),COLOR00FF00;
DRAWTEXTREL(650,830,NUMTOSTRN(ZZ,2)+'%'),ColorFF0000;
DRAWTEXTREL(740,830,NUMTOSTRN(DZ,2)+'%'),colorCyan;
DRAWTEXTREL(830,830,NUMTOSTRN(TZ,2)+'%'),COLORRED;
DRAWTEXTREL(920,830,NUMTOSTRN(ZLZ,2)+'%'),coloryellow;
DRAWTEXTREL(520,880,'持仓'),colorFFFFFF;
DRAWTEXTREL(560,880,NUMTOSTRN(SS,2)+'%'),COLOR00FF00;
DRAWTEXTREL(650,880,NUMTOSTRN(ZS,2)+'%'),ColorFF0000;
DRAWTEXTREL(740,880,NUMTOSTRN(DS,2)+'%'),colorCyan;
DRAWTEXTREL(830,880,NUMTOSTRN(CS,2)+'%'),COLORRED;
DRAWTEXTREL(920,880,NUMTOSTRN(ZLS,2)+'%'),color33FFFF;
{分时线}
最新:C,COLORWHITE,LINETHICK1,PRECIS2,LAYER0;
AA:=SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C));
BB:=BETWEEN(C/AA,C+H,C-H);
均线:IF(BB=0,MA(C,BARSCOUNT(C)),AA),COLOR00FFFF,LINETHICK1,PRECIS2;
上次雨杨先生更新接收器增加分时查询新函数 用新函数做了分时全景系列 未加入正版函数 导致只能查询点播公式显示
现在更新正版 雨杨版 夏班长免费版 通用公式
如果做副图 只需要吧分时线 最新到均线用{}大括号括起来 或者直接删除
源码在上 需要日线引用公式
下列压缩包内分 正版雨杨版 以及 正版夏卫东免费版 引入公式时别搞错了
公式无加密有兴趣请自查 请老师同学多指教
TPM模板 放在大智慧 userdata——IndiTemp里
FNC公式引入
gd17950
【下载地址隐藏】： 点：回复可见地址 
