★发多用超赢模板公式及超赢顺势主图(左右图形)公式原码
本文来自:理想论坛 www. 作者:法华镇792 点击1898次
-------------------------------------------------------------------------------- 原文:http://www./viewthread.php?tid=3210651 ★说明:全部公式已经用雨扬老师DDE数据包接口.方便各方使用. ★共有一个模板公式,二个主图公式,二个主图公式各可分成二个图形.即方案1,方案2, 分别为三柱图,单柱图,分别为左图,右图,朋友们自行选择.左图(超赢顺势A)用于老股票, 右图(超赢顺势B)用于新股票,用键盘上下键调整.朋友们要问下部图形,因为新股票和沪市 601部分股票,银行股大部分图形压抑(不知何因),所以不发了. ★分时超赢监控原码(与日线同步,与SV资金同步)以发,见下方连接 http://www./viewthread.php?tid=3182898&extra=page%3D3%26amp%3Bfilter%3Dtype%26amp%3Btypeid%3D47 ★样图见下方. ★模板建立:在技术分析页面,鼠标右击,点'重新设计页面',鼠标下拖,在底部(沪指数上方),左击 鼠标,当出现蓝框后,在提示栏中,TOP指标前方框里打勾,保存,退出,提示页面改变,是否保存, 点'是'.完成后,复制公式,在刚的模板处右上角,点'设',在提示栏中,点'新建指标',粘贴公式, (注意,看一下公式尾部有没有地址连接,请删除,否则通不过),将公式描述后语句粘贴在'公式 描述'中,测试通过后,●点'饼图',确认.上下左右调整即可,保存页面. ★模板说明: 模板中'单数比'需L2行情,才能实时,否则盘后,'主动率'只是当天,可移动光标查看
前段时间的情况.其他有顶牛DDE,虎拓主力动向描述数据,在第一行. 圆形图左侧为卖出,右侧买入,超+大=主力,同龙虎看盘一样,开盘前一段时间会隐蔽不见. 1★★{理想监控-公式描述:■■■理想超赢分类及资金进出龙虎榜} {TODAY:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT AND TIME0<55800;} TODAY:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT and (ORDER(1)=0 and ORDER(2)=0); HS:=vol/capital; SVOL:=SUM(VOL,1); 小单买:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1))); 小单卖:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1))); 中单买:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2))); 中单卖:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2))); 大单买:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3))); 大单卖:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3))); 特单买:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3)); 特单卖:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3)); 主单买:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)),BIGORDER(1,2)); 主单卖:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)),BIGORDER(2,2)); 散户买额:=小单买*AMOUNT/10000; 散户卖额:=小单卖*AMOUNT/10000; 散户净额:=散户买额-散户卖额; 散户买量:=小单买*SVOL; 散户卖量:=小单卖*SVOL; 散户净量:=散户买量-散户卖量; 散户增减:=HS*100*(小单买-小单卖); 散户持仓:=25+SUM(散户增减,0); 散户单差:=(小单买-小单卖)*100;{散户净买比} 散户单数比:=小单卖/小单买; 中户买额:=中单买*AMOUNT/10000; 中户卖额:=中单卖*AMOUNT/10000; 中户净额:=中户买额-中户卖额; 中户买量:=中单买*SVOL; 中户卖量:=中单卖*SVOL; 中户净量:=中户买量-中户卖量; 中户增减:=HS*100*(中单买-中单卖); 中户持仓:=25+SUM(中户增减,0); 中户单差:=(中单买-中单卖)*100;{中户净买比} 中户单数比:=中单卖/中单买; 大户买额:=大单买*AMOUNT/10000; 大户卖额:=大单卖*AMOUNT/10000; 大户净额:=大户买额-大户卖额; 大户买量:=大单买*SVOL; 大户卖量:=大单卖*SVOL; 大户净量:=大户买量-大户卖量; 大户增减:=HS*100*(大单买-大单卖); 大户持仓:=25+SUM(大户增减,0); 大户单差:=(大单买-大单卖)*100;{大户净买比} 大户单数比:=大单卖/大单买; 超大买额:=特单买*AMOUNT/10000; 超大卖额:=特单卖*AMOUNT/10000; 超大净额:=超大买额-超大卖额; 超大买量:=特单买*SVOL; 超大卖量:=特单卖*SVOL; 超大净量:=超大买量-超大卖量; 超大增减:=HS*100*(特单买-特单卖); 超大持仓:=25+SUM(超大增减,0); 超大单差:=(特单买-特单卖)*100;{超大净买比} 超大单数比:=特单卖/特单买; 主力买额:=主单买*AMOUNT/10000; 主力卖额:=主单卖*AMOUNT/10000; 主力净额:=主力买额-主力卖额; 主力买量:=主单买*SVOL; 主力卖量:=主单卖*SVOL; 主力净量:=主力买量-主力卖量; 主力增减:=HS*100*(主单买-主单卖); 主力持仓:=50+SUM(主力增减,0); 主力单差:=(主单买-主单卖)*100;{主力净买比} 主力单数比:=主单卖/主单买; 超大卖额,COLOR5B5BFF; 大户卖额,COLOR00A800; 中户卖额,COLORFEDCBA; 散户卖额,COLORFFF000; 散户买额,COLORFF9911; 中户买额,COLOR999999; 大户买额,COLOR00FF00; 超大买额,COLORFF11FF; 外盘:=sum(if(DYNAINFO(23)*close,DYNAINFO(23),0),0)*0.003906; 内盘:=sum(if(DYNAINFO(22)*close,DYNAINFO(22),0),0)*0.003906; 主动率:=(外盘-内盘)/(内盘+外盘)*100; 通吃率:=(主单买-主单卖)*VOL/VOL*100; {机构力道:=(主单买-主单卖)*VOL/VOL*100;} 主力介入:=(主单买-主单卖)*VOL/VOL*100; 散户跟风:=(小单买-小单卖)*VOL/VOL*100; DRAWTEXTABS(115,4,'主动率:'+NUMTOSTRN(主动率,2)),COLORFFFFFF; DRAWTEXTABS(195,4,'单数比:'+NUMTOSTRN(ORDER(2)/ORDER(1),2)),COLORFFFFFF; DRAWTEXTABS(265,4,'通吃率,净买比,主力介入:'+NUMTOSTRN(通吃率,2)),COLORFFFFFF; DRAWTEXTABS(440,4,'散户跟风:'+NUMTOSTRN(散户跟风,2)),COLORFFFFFF; {活跃度:主力买卖占流通盘的比例} {买卖气:主力买入占总成交量比例} {买入力度:主力5日吸筹情况} 活跃度:=(主单买+主单卖)*VOL/CAPITAL/2*100; 买卖气:=((主单买-主单卖)*VOL/VOL)*100; 买入力度:=sum(散户增减,5)*-1; DRAWTEXTABS(530,4,'活跃度:'+NUMTOSTRN(活跃度,2)),COLORFFFFFF; DRAWTEXTABS(605,4,'买卖气:'+NUMTOSTRN(买卖气,2)),COLORFFFFFF; DRAWTEXTABS(685,4,'买入力度:'+NUMTOSTRN(买入力度,2)),COLORFFFFFF; DRAWTEXTABS( 0, 0,''+YEAR+'/'+MONTH+'/'+DAY+' '+STKNAME),COLOR00FFFF; DRAWTEXTABS(120,20,'分 类'),COLORFFFFFF; DRAWTEXTABS(114,37,'超'),COLORFF11FF; DRAWTEXTABS(126,36,'大'),COLOR00FF00; DRAWTEXTABS(139,36,'主力'),COLOR00FFFF; DRAWTEXTABS(115,52,'■'),COLOR5B5BFF;{买} DRAWTEXTABS(125,52,'■超大'),COLORFF11FF;{卖} DRAWTEXTABS(115,68,'■'),COLOR00A800;{买} DRAWTEXTABS(125,68,'■大户'),COLOR00FF00;{卖} DRAWTEXTABS(115,84,'■'),COLORFEDCBA;{买} DRAWTEXTABS(125,84,'■中户'),COLOR999999;{卖} DRAWTEXTABS(115,100,'■'),COLORFFF000;{买} DRAWTEXTABS(125,100,'■散户'),COLORFF9911;{卖} DRAWTEXTABS(170,20,'持仓%'),COLOR1199FF; DRAWTEXTABS(170,36,NUMTOSTRN(主力持仓,2)),COLOR1199FF; DRAWTEXTABS(170,52,NUMTOSTRN(超大持仓,2)),COLOR1199FF; DRAWTEXTABS(170,68,NUMTOSTRN(大户持仓,2)),COLOR1199FF; DRAWTEXTABS(170,84,NUMTOSTRN(中户持仓,2)),COLOR1199FF; DRAWTEXTABS(170,100,NUMTOSTRN(散户持仓,2)),COLOR1199FF; DRAWTEXTABS(210,20,'增减%'),COLORFFFF00; DRAWTEXTABS(210,36,NUMTOSTRN(主力增减,3)),COLORFFFF00; DRAWTEXTABS(210,52,NUMTOSTRN(超大增减,3)),COLORFFFF00; DRAWTEXTABS(210,68,NUMTOSTRN(大户增减,3)),COLORFFFF00; DRAWTEXTABS(210,84,NUMTOSTRN(中户增减,3)),COLORFFFF00; DRAWTEXTABS(210,100,NUMTOSTRN(散户增减,3)),COLORFFFF00; DRAWTEXTABS(255,20,'净额(万)'),COLOR00FFFF; DRAWTEXTABS(255,36,numtostrn(主力净额,2)),COLOR00FFFF; DRAWTEXTABS(255,52,numtostrn(超大净额,2)),COLOR00FFFF; DRAWTEXTABS(255,68,numtostrn(大户净额,2)),COLOR00FFFF; DRAWTEXTABS(255,84,numtostrn(中户净额,2)),COLOR00FFFF; DRAWTEXTABS(255,100,numtostrn(散户净额,2)),COLOR00FFFF; DRAWTEXTABS(315,20,'买额(万)'),COLORFF00FF; DRAWTEXTABS(315,36,numtostrn(主力买额,2)),COLORFF00FF; DRAWTEXTABS(315,52,numtostrn(超大买额,2)),COLORFF00FF; DRAWTEXTABS(315,68,numtostrn(大户买额,2)),COLORFF00FF; DRAWTEXTABS(315,84,numtostrn(中户买额,2)),COLORFF00FF; DRAWTEXTABS(315,100,numtostrn(散户买额,2)),COLORFF00FF; DRAWTEXTABS(380,20,'卖额(万)'),COLOR00FF00; DRAWTEXTABS(380,36,numtostrn(主力卖额,2)),COLOR00FF00; DRAWTEXTABS(380,52,numtostrn(超大卖额,2)),COLOR00FF00; DRAWTEXTABS(380,68,numtostrn(大户卖额,2)),COLOR00FF00; DRAWTEXTABS(380,84,numtostrn(中户卖额,2)),COLOR00FF00; DRAWTEXTABS(380,100,numtostrn(散户卖额,2)),COLOR00FF00; DRAWTEXTABS(445,20,'净量(手)'),COLOR0099FF; DRAWTEXTABS(445,36,numtostrn(主力净量,0)),COLOR0099FF; DRAWTEXTABS(445,52,numtostrn(超大净量,0)),COLOR0099FF; DRAWTEXTABS(445,68,numtostrn(大户净量,0)),COLOR0099FF; DRAWTEXTABS(445,84,numtostrn(中户净量,0)),COLOR0099FF; DRAWTEXTABS(445,100,numtostrn(散户净量,0)),COLOR0099FF; DRAWTEXTABS(495,20,'买量(手)'),COLOR00FFFF; DRAWTEXTABS(495,36,numtostrn(主力买量,0)),COLOR00FFFF; DRAWTEXTABS(495,52,numtostrn(超大买量,0)),COLOR00FFFF; DRAWTEXTABS(495,68,numtostrn(大户买量,0)),COLOR00FFFF; DRAWTEXTABS(495,84,numtostrn(中户买量,0)),COLOR00FFFF; DRAWTEXTABS(495,100,numtostrn(散户买量,0)),COLOR00FFFF; DRAWTEXTABS(550,20,'卖量(手)'),COLORFF9922; DRAWTEXTABS(550,36,numtostrn(主力卖量,0)),COLORFF9922; DRAWTEXTABS(550,52,numtostrn(超大卖量,0)),COLORFF9922; DRAWTEXTABS(550,68,numtostrn(大户卖量,0)),COLORFF9922; DRAWTEXTABS(550,84,numtostrn(中户卖量,0)),COLORFF9922; DRAWTEXTABS(550,100,numtostrn(散户卖量,0)),COLORFF9922; DRAWTEXTABS(605,20,'买单比'),COLOR5B5BFF; DRAWTEXTABS(605,36,numtostrn(SUM(主单买*100,1),1)+'%'),COLOR5B5BFF; DRAWTEXTABS(605,52,numtostrn(SUM(特单买*100,1),1)+'%'),COLOR5B5BFF; DRAWTEXTABS(605,68,numtostrn(SUM(大单买*100,1),1)+'%'),COLOR5B5BFF; DRAWTEXTABS(605,84,numtostrn(SUM(中单买*100,1),1)+'%'),COLOR5B5BFF; DRAWTEXTABS(605,100,numtostrn(SUM(小单买*100,1),1)+'%'),COLOR5B5BFF; DRAWTEXTABS(650,20,'卖单比'),COLOR99FF99; DRAWTEXTABS(650,36,numtostrn(SUM(主单卖*100,1),1)+'%'),COLOR99FF99; DRAWTEXTABS(650,52,numtostrn(SUM(特单卖*100,1),1)+'%'),COLOR99FF99; DRAWTEXTABS(650,68,numtostrn(SUM(大单卖*100,1),1)+'%'),COLOR99FF99; DRAWTEXTABS(650,84,numtostrn(SUM(中单卖*100,1),1)+'%'),COLOR99FF99; DRAWTEXTABS(650,100,numtostrn(SUM(小单卖*100,1),1)+'%'),COLOR99FF99; DRAWTEXTABS(695,20,'单 差'),COLOR999EEF; DRAWTEXTABS(695,36,numtostrn(主力单差,1)+'%'),COLOR999EEF; DRAWTEXTABS(695,52,numtostrn(超大单差,1)+'%'),COLOR999EEF; DRAWTEXTABS(695,68,numtostrn(大户单差,1)+'%'),COLOR999EEF; DRAWTEXTABS(695,84,numtostrn(中户单差,1)+'%'),COLOR999EEF; DRAWTEXTABS(695,100,numtostrn(散户单差,1)+'%'),COLOR999EEF; DRAWTEXTABS(735,20,'单 比'),COLORFFFF99; DRAWTEXTABS(735,36,numtostrn(主力单数比,1)+'%'),COLORFFFF99; DRAWTEXTABS(735,52,numtostrn(超大单数比,1)+'%'),COLORFFFF99; DRAWTEXTABS(735,68,numtostrn(大户单数比,1)+'%'),COLORFFFF99; DRAWTEXTABS(735,84,numtostrn(中户单数比,1)+'%'),COLORFFFF99; DRAWTEXTABS(735,100,numtostrn(散户单数比,1)+'%'),COLORFFFF99; ★主图A 使用说明:公式中有(方案1,方案2),现默认方案1,三柱图(即买入,卖出,
净买).(方案2)单柱图(即净买),各有千秋,由于使用了比例,有时净买比例看不见, 看数据,如果要放大,调整最大值,将100改200,不过会压K线图,如果要(方案2). 请将(方案1)大刮号{},在'最大值'前,在'COLOR00FFFF;'引号后.去除(方案2)大刮号{}, 在'最大值前',在'COLOR00FFFF;'引号后.(方案1)颜色提示:红色,买入.青色,卖出.净买 正值为紫色,负值为黄色.(方案2)颜色提示:净买,正值为紫色,负值为黄色. 也可将(方案1或方案2)移到其他主图中,注意有'variable:p1=0;'等,必须将其放在最前. 2★★{超赢顺势A}
variable:p1=0;
{TODAY:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT AND TIME0<55800;} TODAY:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT and (ORDER(1)=0 and ORDER(2)=0); ZLLR:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)),BIGORDER(1,2))*AMOUNT/10000;
ZLLC:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)),BIGORDER(2,2))*AMOUNT/10000; 主净:ZLLR-ZLLC,LINETHICK0,COLOR00FFFF,PRECIS2; 主增:=(ZLLR-ZLLC)/(AMOUNT/10000)*(vol/capital)*100; TDLR:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT/10000; TDLC:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT/10000; 超净:TDLR-TDLC,LINETHICK0,COLOR00FFFF,PRECIS2; 超增:=(TDLR-TDLC)/(AMOUNT/10000)*(vol/capital)*100; DDLR:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT/10000; DDLC:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT/10000; 大净:DDLR-DDLC,LINETHICK0,COLOR00FFFF,PRECIS2; 大增:=(DDLR-DDLC)/(AMOUNT/10000)*(vol/capital)*100; ZDLR:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT/10000; ZDLC:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT/10000; 中净:ZDLR-ZDLC,LINETHICK0,COLOR00FFFF,PRECIS2; 中增:=(ZDLR-ZDLC)/(AMOUNT/10000)*(vol/capital)*100; XDLR:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT/10000; XDLC:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT/10000; 散净:XDLR-XDLC,LINETHICK0,COLOR00FFFF,PRECIS2; 散增:=(XDLR-XDLC)/(AMOUNT/10000)*(vol/capital)*100; {超赢A方案1} 最大值:=100/(MAX(ZLLR,ZLLC,TDLC,TDLC,DDLR,DDLC,ZDLR,ZDLC,XDLR,XDLC,散净,中净,大净,超净,主净)); 主力买:=0+(ZLLR*最大值); 主力卖:=0+(ZLLC*最大值); 超大买:=0+(TDLR*最大值); 超大卖:=0+(TDLC*最大值); 大户买:=0+(DDLR*最大值); 大户卖:=0+(DDLC*最大值); 中户买:=0+(ZDLR*最大值); 中户卖:=0+(ZDLC*最大值); 散户买:=0+(XDLR*最大值); 散户卖:=0+(XDLC*最大值); 散户净买:=0+(ABS(散净)*最大值); 中户净买:=0+(ABS(中净)*最大值); 大户净买:=0+(ABS(大净)*最大值); 超大净买:=0+(ABS(超净)*最大值); 主力净买:=0+(ABS(主净)*最大值); DRAWRECTREL(0,0,100,1000,rgb(0,50,0)),color000000,LAYER1; DRAWRECTREL(0,150,ABS(主力净买),200,(IF((主净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWRECTREL(0,50,ABS(主力买),100,RGB(200,0,0)),COLOR000000,LAYER0; DRAWRECTREL(0,100,ABS(主力卖),150,RGB(0,220,0)),COLOR000000,LAYER0; DRAWTEXTREL(0,00,'主增'+NUMTOSTRN(主增,3)+'%'),COLOR00FFFF; DRAWRECTREL(0,350,ABS(超大净买),400,(IF((超净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWRECTREL(0,250,ABS(超大买),300,RGB(200,0,0)),COLOR000000,LAYER0; DRAWRECTREL(0,300,ABS(超大卖),350,RGB(0,220,0)),COLOR000000,LAYER0; DRAWTEXTREL(0,200,'超增'+NUMTOSTRN(超增,3)+'%'),COLOR00FFFF; DRAWRECTREL(0,550,ABS(大户净买),600,(IF((大净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWRECTREL(0,450,ABS(大户买),500,RGB(200,0,0)),COLOR000000,LAYER0; DRAWRECTREL(0,500,ABS(大户卖),550,RGB(0,220,0)),COLOR000000,LAYER0; DRAWTEXTREL(0,400,'大增'+NUMTOSTRN(大增,3)+'%'),COLOR00FFFF; DRAWRECTREL(0,750,ABS(中户净买),800,(IF((中净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWRECTREL(0,650,ABS(中户买),700,RGB(200,0,0)),COLOR000000,LAYER0; DRAWRECTREL(0,700,ABS(中户卖),750,RGB(0,220,0)),COLOR000000,LAYER0; DRAWTEXTREL(0,600,'中增'+NUMTOSTRN(中增,3)+'%'),COLOR00FFFF; DRAWRECTREL(0,950,ABS(散户净买),1000,(IF((散净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWRECTREL(0,850,ABS(散户买),900,RGB(200,0,0)),COLOR000000,LAYER0; DRAWRECTREL(0,900,ABS(散户卖),950,RGB(0,220,0)),COLOR000000,LAYER0; DRAWTEXTREL(0,800,'散增'+NUMTOSTRN(散增,3)+'%'),COLOR00FFFF; {超赢A方案2} {最大值:=100/(MAX(散净,中净,大净,超净,主净)); 散户净买:=0+(ABS(散净)*最大值); 中户净买:=0+(ABS(中净)*最大值); 大户净买:=0+(ABS(大净)*最大值); 超大净买:=0+(ABS(超净)*最大值); 主力净买:=0+(ABS(主净)*最大值); DRAWRECTREL(0,0,100,750,rgb(0,50,0)),color000000,LAYER1; DRAWRECTREL(0,50,ABS(主力净买),150,(IF((主净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWTEXTREL(0,00,'主增'+NUMTOSTRN(主增,3)+'%'),COLOR00FFFF; DRAWRECTREL(0,200,ABS(超大净买),300,(IF((超净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWTEXTREL(0,150,'超增'+NUMTOSTRN(超增,3)+'%'),COLOR00FFFF; DRAWRECTREL(0,350,ABS(大户净买),450,(IF((大净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWTEXTREL(0,300,'大增'+NUMTOSTRN(大增,3)+'%'),COLOR00FFFF; DRAWRECTREL(0,500,ABS(中户净买),600,(IF((中净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWTEXTREL(0,450,'中增'+NUMTOSTRN(中增,3)+'%'),COLOR00FFFF; DRAWRECTREL(0,650,ABS(散户净买),750,(IF((散净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWTEXTREL(0,600,'散增'+NUMTOSTRN(散增,3)+'%'),COLOR00FFFF;} {成本均线} a5:cyc(5),colorwhite,linethick1,LAYER2; a13:cyc(13),coloryellow,linethick1,LAYER2; a34:cyc(34),colormagenta,linethick1,LAYER2; DRAWTEXTABS(135,5,'上涨家数:'+NUMTOSTRN(DYNAINFO(69),0)+' 下跌家数:'+NUMTOSTRN(DYNAINFO(70),0)+' 平盘家数:'+NUMTOSTRN(DYNAINFO(71),0)),COLOR00FFFF; {TRT} {variable:p1=0;} c1:=INTPART(cyc(5)*100*0.96)/100; p2:=intpart(ref(cyc(5),1)*100)/100; p3:=intpart(ref(cyc(5),1)*0.96*100)/100; vv:=intpart(min(capital*0.05,ref(ma(vol,34),1))/100); p40:=intpart(maxcyc*100)/100; p41:=intpart(ref(MAXCYC,1)*100)/100; p4:=p1=0 and c>p2 or (ref(vol/100,1)<vv and c>intpart(p2*0.98*100)/100 and vol>min(capital*0.05,ref(ma(vol,34),1))); p5:=p1=1 and c<min(p3,p41); p1:=if(p4=1,1,if(p5=1,0,ref(p1,1))); STICKLINE(p1=1 and c<o,c,o,8,1),color5454ff; STICKLINE(p1=1 and c<o,c,o,6,0),colorffff54; STICKLINE(p1=1 and c<o,c,l,0.5,0),color5454ff; STICKLINE(p1=1 and c<o,h,o,0.5,0),color5454ff; STICKLINE(p1=0 and c>o,c,o,8,1),colorffff54; STICKLINE(p1=0 and c>o,c,h,0.5,0),colorffff54; STICKLINE(p1=0 and c>o,l,o,0.5,0),colorffff54; DRAWTEXT(cross(p1,0),l*0.9,'B'),coloryellow,LINETHICK3,LAYER3; DRAWTEXT(cross(1,p1),h*1.05,'S'),COLORgreen,LINETHICK3,LAYER3; DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c>0.1,c,'持币'); DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c<=0.1 and ref(vol/100,1)<vv,c,'明日收盘价超过'+str(c1)+';或收盘价超过'+str(intpart(c1*0.98*100)/100)+'且成交量大于'+str(vv)+'买入'); DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c<=0.1 and ref(vol/100,1)>=vv,c,'明日收盘价超过'+str(c1)+'买入'); DRAWFLAGTEXT(p1=1 and (c-min(c1,p40))/min(c1,p40)>0.1 ,c,'持股'); DRAWFLAGTEXT(p1=1 and (c-min(c1,p40))/min(c1,p40)<=0.1 ,c,'明日收盘价跌破'+str(min(c1,p40))+'卖出'); ★主图B 使用说明:公式中有(方案1,方案2),现默认方案1,三柱图(即买入,卖出,
净买).(方案2)单柱图(即净买),各有千秋,由于使用了比例,有时净买比例看不见, 看数据,如果要放大,调整最大值,将100改200,不过会压K线图,如果要(方案2). 请将(方案1)大刮号{},在'最大值'前,在'COLOR00FFFF;'引号后.去除(方案2)大刮号{}, 在'最大值前',在'COLOR00FFFF;'引号后.(方案1)颜色提示:红色,买入.青色,卖出.净买 正值为紫色,负值为黄色.(方案2)颜色提示:净买,正值为紫色,负值为黄色. 也可将(方案1或方案2)移到其他主图中,注意有'variable:p1=0;'等,必须将其放在最前. 3★★{超赢顺势B}
variable:p1=0; {TODAY:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT AND TIME0<55800;} TODAY:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT and (ORDER(1)=0 and ORDER(2)=0); ZLLR:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)),BIGORDER(1,2))*AMOUNT/10000;
ZLLC:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)),BIGORDER(2,2))*AMOUNT/10000; 主净:ZLLR-ZLLC,LINETHICK0,COLOR00FFFF,PRECIS2; 主增:=(ZLLR-ZLLC)/(AMOUNT/10000)*(vol/capital)*100; TDLR:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT/10000; TDLC:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT/10000; 超净:TDLR-TDLC,LINETHICK0,COLOR00FFFF,PRECIS2; 超增:=(TDLR-TDLC)/(AMOUNT/10000)*(vol/capital)*100; DDLR:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT/10000; DDLC:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT/10000; 大净:DDLR-DDLC,LINETHICK0,COLOR00FFFF,PRECIS2; 大增:=(DDLR-DDLC)/(AMOUNT/10000)*(vol/capital)*100; ZDLR:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT/10000; ZDLC:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT/10000; 中净:ZDLR-ZDLC,LINETHICK0,COLOR00FFFF,PRECIS2; 中增:=(ZDLR-ZDLC)/(AMOUNT/10000)*(vol/capital)*100; XDLR:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT/10000; XDLC:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT/10000; 散净:XDLR-XDLC,LINETHICK0,COLOR00FFFF,PRECIS2; 散增:=(XDLR-XDLC)/(AMOUNT/10000)*(vol/capital)*100; {超赢B方案1} 最大值:=100/(MAX(ZLLR,ZLLC,TDLR,TDLC,DDLR,DDLC,ZDLR,ZDLC,XDLR,XDLC,散净,中净,大净,超净,主净)); 主力买:=1000-(ZLLR*最大值); 主力卖:=1000-(ZLLC*最大值); 超大买:=1000-(TDLR*最大值); 超大卖:=1000-(TDLC*最大值); 大户买:=1000-(DDLR*最大值); 大户卖:=1000-(DDLC*最大值); 中户买:=1000-(ZDLR*最大值); 中户卖:=1000-(ZDLC*最大值); 散户买:=1000-(XDLR*最大值); 散户卖:=1000-(XDLC*最大值); 散户净买:=1000-(ABS(散净)*最大值); 中户净买:=1000-(ABS(中净)*最大值); 大户净买:=1000-(ABS(大净)*最大值); 超大净买:=1000-(ABS(超净)*最大值); 主力净买:=1000-(ABS(主净)*最大值); DRAWRECTREL(1000,0,900,1000,rgb(0,50,0)),color000000,LAYER1; DRAWRECTREL(1000,150,ABS(主力净买),200,(IF((主净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWRECTREL(1000,50,ABS(主力买),100,RGB(200,0,0)),COLOR000000,LAYER0; DRAWRECTREL(1000,100,ABS(主力卖),150,RGB(0,220,0)),COLOR000000,LAYER0; DRAWTEXTREL(900,00,'主增'+NUMTOSTRN(主增,3)+'%'),COLOR00FFFF; DRAWRECTREL(1000,350,ABS(超大净买),400,(IF((超净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWRECTREL(1000,250,ABS(超大买),300,RGB(200,0,0)),COLOR000000,LAYER0; DRAWRECTREL(1000,300,ABS(超大卖),350,RGB(0,220,0)),COLOR000000,LAYER0; DRAWTEXTREL(900,200,'超增'+NUMTOSTRN(超增,3)+'%'),COLOR00FFFF; DRAWRECTREL(1000,550,ABS(大户净买),600,(IF((大净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWRECTREL(1000,450,ABS(大户买),500,RGB(200,0,0)),COLOR000000,LAYER0; DRAWRECTREL(1000,500,ABS(大户卖),550,RGB(0,220,0)),COLOR000000,LAYER0; DRAWTEXTREL(900,400,'大增'+NUMTOSTRN(大增,3)+'%'),COLOR00FFFF; DRAWRECTREL(1000,750,ABS(中户净买),800,(IF((中净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWRECTREL(1000,650,ABS(中户买),700,RGB(200,0,0)),COLOR000000,LAYER0; DRAWRECTREL(1000,700,ABS(中户卖),750,RGB(0,220,0)),COLOR000000,LAYER0; DRAWTEXTREL(900,600,'中增'+NUMTOSTRN(中增,3)+'%'),COLOR00FFFF; DRAWRECTREL(1000,950,ABS(散户净买),1000,(IF((散净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWRECTREL(1000,850,ABS(散户买),900,RGB(200,0,0)),COLOR000000,LAYER0; DRAWRECTREL(1000,900,ABS(散户卖),950,RGB(0,220,0)),COLOR000000,LAYER0; DRAWTEXTREL(900,800,'散增'+NUMTOSTRN(散增,3)+'%'),COLOR00FFFF; {超赢B方案2} {最大值:=100/(MAX(散净,中净,大净,超净,主净)); 散户净买:=1000-(ABS(散净)*最大值); 中户净买:=1000-(ABS(中净)*最大值); 大户净买:=1000-(ABS(大净)*最大值); 超大净买:=1000-(ABS(超净)*最大值); 主力净买:=1000-(ABS(主净)*最大值); DRAWRECTREL(1000,0,900,750,rgb(0,50,0)),color000000,LAYER1; DRAWRECTREL(1000,50,ABS(主力净买),150,(IF((主净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWTEXTREL(900,00,'主增'+NUMTOSTRN(主增,3)+'%'),COLOR00FFFF; DRAWRECTREL(1000,200,ABS(超大净买),300,(IF((超净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWTEXTREL(900,150,'超增'+NUMTOSTRN(超增,3)+'%'),COLOR00FFFF; DRAWRECTREL(1000,350,ABS(大户净买),450,(IF((大净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWTEXTREL(900,300,'大增'+NUMTOSTRN(大增,3)+'%'),COLOR00FFFF; DRAWRECTREL(1000,500,ABS(中户净买),600,(IF((中净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWTEXTREL(900,450,'中增'+NUMTOSTRN(中增,3)+'%'),COLOR00FFFF; DRAWRECTREL(1000,650,ABS(散户净买),750,(IF((散净 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER0; DRAWTEXTREL(900,600,'散增'+NUMTOSTRN(散增,3)+'%'),COLOR00FFFF;} {成本均线} a5:cyc(5),colorwhite,linethick1,PRECIS2; a13:cyc(13),coloryellow,linethick1,PRECIS2; a34:cyc(34),colormagenta,linethick1,PRECIS2; DRAWTEXTABS(135,5,'上涨家数:'+NUMTOSTRN(DYNAINFO(69),0)+' 下跌家数:'+NUMTOSTRN(DYNAINFO(70),0)+' 平盘家数:'+NUMTOSTRN(DYNAINFO(71),0)),COLOR00FFFF; {TRT} {variable:p1=0;} c1:=INTPART(cyc(5)*100*0.96)/100; p2:=intpart(ref(cyc(5),1)*100)/100; p3:=intpart(ref(cyc(5),1)*0.96*100)/100; vv:=intpart(min(capital*0.05,ref(ma(vol,34),1))/100); p40:=intpart(maxcyc*100)/100; p41:=intpart(ref(MAXCYC,1)*100)/100; p4:=p1=0 and c>p2 or (ref(vol/100,1)<vv and c>intpart(p2*0.98*100)/100 and vol>min(capital*0.05,ref(ma(vol,34),1))); p5:=p1=1 and c<min(p3,p41); p1:=if(p4=1,1,if(p5=1,0,ref(p1,1))); STICKLINE(p1=1 and c<o,c,o,8,1),color5454ff; STICKLINE(p1=1 and c<o,c,o,6,0),colorffff54; STICKLINE(p1=1 and c<o,c,l,0.5,0),color5454ff; STICKLINE(p1=1 and c<o,h,o,0.5,0),color5454ff; STICKLINE(p1=0 and c>o,c,o,8,1),colorffff54; STICKLINE(p1=0 and c>o,c,h,0.5,0),colorffff54; STICKLINE(p1=0 and c>o,l,o,0.5,0),colorffff54; DRAWTEXT(cross(p1,0),l*0.9,'B'),coloryellow,LINETHICK3; DRAWTEXT(cross(1,p1),h*1.05,'S'),COLORgreen,LINETHICK3; DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c>0.1,c,'持币'); DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c<=0.1 and ref(vol/100,1)<vv,c,'明日收盘价超过'+str(c1)+';或收盘价超过'+str(intpart(c1*0.98*100)/100)+'且成交量大于'+str(vv)+'买入'); DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c<=0.1 and ref(vol/100,1)>=vv,c,'明日收盘价超过'+str(c1)+'买入'); DRAWFLAGTEXT(p1=1 and (c-min(c1,p40))/min(c1,p40)>0.1 ,c,'持股'); DRAWFLAGTEXT(p1=1 and (c-min(c1,p40))/min(c1,p40)<=0.1 ,c,'明日收盘价跌破'+str(min(c1,p40))+'卖出'); [ 本帖最后由 法华镇792 于 2009-12-3 11:53 编辑 ]
附件 2009-12-02_184650.jpg (532.52 KB) 2009-12-3 08:26 T1
2009-12-02_185948.jpg (517.61 KB)
2009-12-3 08:26 T2
2009-12-02_190903.jpg (500.41 KB)
2009-12-3 08:26 T3
2009-12-03_052813.jpg (529.71 KB)
2009-12-3 08:26 T4
2009-12-03_054211.jpg (471.79 KB)
2009-12-3 08:26 T5
|
|