软件名称：[B]发表公式，出一个精品看盘公式，请大家多多支持，谢谢【分时主图 源码】[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：20.0 KB
官方主页：Home Page
更新时间：2011-09-29 04:57:10
软件简介:

input:叠加线数(4,1,4);
N:=叠加线数;
时长:=if(HOUR>=10 AND HOUR<15 ,1,0);{10点至 15点}
DRAWTEXTABS(20,240,'板块：'+BKNAME),Colorcyan,LINETHICK2;

DRAWTEXTABS(850,5,'理想论坛-左手秋天梦想-荣誉出品'),COLORRED,LINETHICK1;
DRAWTEXTABS(20,220,'本人于2011年10月7日结婚！特意放出看盘公式！大家祝福我吧！谢谢！哈哈大笑！'),COLORRED,LINETHICK2;

均线:=IF(BETWEEN(C/(SUM(AMOUNT,0)/SUM(VOL*100,0)),1.05,0.95)=0,MA(C,0),(SUM(AMOUNT,0)/SUM(VOL*100,0)));
均线H:(均线*1.007 ),COLORFF6600,LINETHICK0,LAYER0;
均线L:(均线/1.005 ),COLOR00FF00,LINETHICK0;
均线横盘:=C<均线H and C>均线L;
量比:=sum(vol,0)*240/dynainfo(38)/barscount(c);
量比5分钟:=sum(量比,5);
量比10:=sum(量比,10);
上个5分钟量比:=量比10-量比5分钟;
放量:=sum(VOL,6)>REF(ma(VOL,30),1)*10;
CC:CLOSE,COLORWHITE,LINETHICK2;
partline(CC,CC>=ref(CC,1),rgb(255,151,255),CC<ref(CC,1),rgb(0,255,255)),linethick2,LAYER0;

MA30:=EMA(CLOSE,30);
强弱:EMA(CLOSE,900);
STICKLINE((MA30>强弱),MA30,强弱,1,0),COLOR0000FF;
STICKLINE((MA30<强弱),MA30,强弱,1,0),COLOR00FF00;
H1:=MAX(DYNAINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H1-L1;
阻力:L1+P1*7/8,LINETHICK3, COLORYELLOW;
支撑:L1+P1*0.5/8,LINETHICK3,COLORCYAN;
现价:CLOSE,COLORWHITE,LINETHICK1;
STICKLINE(CROSS(支撑,现价),支撑,阻力,1,0),COLORYELLOW;
DRAWTEXT(LONGCROSS(支撑,现价,2),支撑*1.001,'★秋天★'),COLORYELLOW;{吸}
DRAWTEXT(LONGCROSS(现价,阻力,2),现价,'★梦想★'),COLORRED;{抛};

{叠加大盘线}
TC:=STRCMP(STRLEFT(MARKETLABEL,2),'SZ');
DPSH:="SH000001$CLOSE"/HHV(STKINDI('SH000001','分超引用.昨收#DAY'),0);
DPSZ:="SZ399001$CLOSE"/HHV(STKINDI('SZ399001','分超引用.昨收#DAY'),0);
DPC:=IF(INBLOCK('A股板块'),DYNAINFO(3)*IF(TC=0,DPSZ,DPSH),C);
POLYLINE(C>0,DPC),COLOR3399ff,LINETHICK1,LAYER0;
DRAWTEXT( BARSTATUS=2,DPC ,'大盘' ),Color3399ff;

{叠加板块线}
BK1002:="991002$CLOSE"/HHV(STKINDI('991002','分超引用.昨收#DAY'),0);
BK1003:="991003$CLOSE"/HHV(STKINDI('991003','分超引用.昨收#DAY'),0);
BK1004:="991004$CLOSE"/HHV(STKINDI('991004','分超引用.昨收#DAY'),0);
BK1006:="991006$CLOSE"/HHV(STKINDI('991006','分超引用.昨收#DAY'),0);
BK1007:="991007$CLOSE"/HHV(STKINDI('991007','分超引用.昨收#DAY'),0);
BK1008:="991008$CLOSE"/HHV(STKINDI('991008','分超引用.昨收#DAY'),0);
BK1009:="991009$CLOSE"/HHV(STKINDI('991009','分超引用.昨收#DAY'),0);
BK1010:="991010$CLOSE"/HHV(STKINDI('991010','分超引用.昨收#DAY'),0);
BK1011:="991011$CLOSE"/HHV(STKINDI('991011','分超引用.昨收#DAY'),0);
BK1014:="991014$CLOSE"/HHV(STKINDI('991014','分超引用.昨收#DAY'),0);
BK1016:="991016$CLOSE"/HHV(STKINDI('991016','分超引用.昨收#DAY'),0);
BK1017:="991017$CLOSE"/HHV(STKINDI('991017','分超引用.昨收#DAY'),0);
BK1018:="991018$CLOSE"/HHV(STKINDI('991018','分超引用.昨收#DAY'),0);
BK1019:="991019$CLOSE"/HHV(STKINDI('991019','分超引用.昨收#DAY'),0);
BK1020:="991020$CLOSE"/HHV(STKINDI('991020','分超引用.昨收#DAY'),0);
BK1021:="991021$CLOSE"/HHV(STKINDI('991021','分超引用.昨收#DAY'),0);
BK1023:="991023$CLOSE"/HHV(STKINDI('991023','分超引用.昨收#DAY'),0);
BK1024:="991024$CLOSE"/HHV(STKINDI('991024','分超引用.昨收#DAY'),0);
BK1025:="991025$CLOSE"/HHV(STKINDI('991025','分超引用.昨收#DAY'),0);
BK1026:="991026$CLOSE"/HHV(STKINDI('991026','分超引用.昨收#DAY'),0);
BK1027:="991027$CLOSE"/HHV(STKINDI('991027','分超引用.昨收#DAY'),0);
BK1028:="991028$CLOSE"/HHV(STKINDI('991028','分超引用.昨收#DAY'),0);
BK1031:="991031$CLOSE"/HHV(STKINDI('991031','分超引用.昨收#DAY'),0);
BK1032:="991032$CLOSE"/HHV(STKINDI('991032','分超引用.昨收#DAY'),0);
BK1033:="991033$CLOSE"/HHV(STKINDI('991033','分超引用.昨收#DAY'),0);
BK1034:="991034$CLOSE"/HHV(STKINDI('991034','分超引用.昨收#DAY'),0);
BK1035:="991035$CLOSE"/HHV(STKINDI('991035','分超引用.昨收#DAY'),0);
BK1036:="991036$CLOSE"/HHV(STKINDI('991036','分超引用.昨收#DAY'),0);
BK1037:="991037$CLOSE"/HHV(STKINDI('991037','分超引用.昨收#DAY'),0);
BK1135:="991135$CLOSE"/HHV(STKINDI('991135','分超引用.昨收#DAY'),0);
BK1136:="991136$CLOSE"/HHV(STKINDI('991136','分超引用.昨收#DAY'),0);
BK1255:="991255$CLOSE"/HHV(STKINDI('991255','分超引用.昨收#DAY'),0);
BKCC:=IF(INBLOCK('工程建筑'),DYNAINFO(3)*BK1002,IF(INBLOCK('电力'),DYNAINFO(3)*BK1003,IF(INBLOCK('计算机'),DYNAINFO(3)*BK1004,
IF(INBLOCK('电子信息'),DYNAINFO(3)*BK1006,IF(INBLOCK('房地产'),DYNAINFO(3)*BK1007,IF(INBLOCK('纺织服装'),DYNAINFO(3)*BK1008,
IF(INBLOCK('钢铁'),DYNAINFO(3)*BK1009,IF(INBLOCK('供水供气'),DYNAINFO(3)*BK1010,IF(INBLOCK('化工化纤'),DYNAINFO(3)*BK1011,
IF(INBLOCK('电器'),DYNAINFO(3)*BK1014,IF(INBLOCK('交通设施'),DYNAINFO(3)*BK1016,IF(INBLOCK('银hang类'),DYNAINFO(3)*BK1017,
IF(INBLOCK('旅游酒店'),DYNAINFO(3)*BK1018,IF(INBLOCK('煤炭石油'),DYNAINFO(3)*BK1019,IF(INBLOCK('酿酒食品'),DYNAINFO(3)*BK1020,
IF(INBLOCK('农林牧渔'),DYNAINFO(3)*BK1021,IF(INBLOCK('商业连锁'),DYNAINFO(3)*BK1023,IF(INBLOCK('建材'),DYNAINFO(3)*BK1024,
IF(INBLOCK('其他行业'),DYNAINFO(3)*BK1025,IF(INBLOCK('汽车类'),DYNAINFO(3)*BK1026,IF(INBLOCK('机械'),DYNAINFO(3)*BK1027,
IF(INBLOCK('医药'),DYNAINFO(3)*BK1028,IF(INBLOCK('外贸'),DYNAINFO(3)*BK1031,IF(INBLOCK('教育传媒'),DYNAINFO(3)*BK1032,
IF(INBLOCK('仪电仪表'),DYNAINFO(3)*BK1033,IF(INBLOCK('有色金属'),DYNAINFO(3)*BK1034,IF(INBLOCK('造纸印刷'),DYNAINFO(3)*BK1035,
IF(INBLOCK('券商'),DYNAINFO(3)*BK1036,IF(INBLOCK('电力设备'),DYNAINFO(3)*BK1037,IF(INBLOCK('通信'),DYNAINFO(3)*BK1135,
IF(INBLOCK('运输物流'),DYNAINFO(3)*BK1136,IF(INBLOCK('保险'),DYNAINFO(3)*BK1255,C))))))))))))))))))))))))))))))));
BKC:=IF(N>1,BKCC,C);
POLYLINE(C>0,BKC),COLOR808000,LINETHICK1;
DRAWTEXT( BARSTATUS=2,BKC ,'板块' ),Color808000;

最新价:=NUMTOSTRN(DYNAINFO(7),2);
涨幅:=NUMTOSTRN(DYNAINFO(14)*100,2);
大盘:=NUMTOSTRN(INDEXC,2);
DRAWTEXT( BARSTATUS=2,C ,'最新价:'+最新价+' 涨幅:'+涨幅+'%'),Colorffffff;
DRAWTEXT( BARSTATUS=2,DPC ,'大盘:'+大盘),Color9999ff;

s:=barscount(c);
均线0:=SUM(AMOUNT,s)/SUM(VOL*100,s);
均价:=NUMTOSTRN(DYNAINFO(11),2);
DRAWTEXT( BARSTATUS=2,均线0 ,'均价:'+均价),Color00ffff;

年1:=YEAR;
月1:=MONTH;
日1:=DAY;
星期:=WEEKDAY;
时:=HOUR;
分:=MINUTE;
秒:=TIME;
wyy2:=LMONTH;
wyy3:=LDAY;
DRAWTEXTABS(120,260,NUMTOSTR(年1)+'年'+NUMTOSTR(月1)+'月'+NUMTOSTR(日1)+'日 星期'+NUMTOSTR(星期)+
' 北京时间: '+STRLEFT(NUMTOSTRN(IF(CURRENTTIME<10000,0,CURRENTTIME),0),IF(CURRENTTIME>=10000 AND
CURRENTTIME<100000,1,2))+'点 '+STRMID(NUMTOSTRN(CURRENTTIME,0),IF(CURRENTTIME<10000,1,IF(CURRENTTIME>=10000 AND
CURRENTTIME<100000,2,3)),2)+'分 '+STRRIGHT(NUMTOSTRN(CURRENTTIME,0),2)+'秒'),LINETHICK2,COLORyellow;
DRAWTEXTABS(20,260,'农历:'+NUMTOSTRN(wyy2,0)+'月'+NUMTOSTRN(wyy3,0)+'日'),LINETHICK2,COLORyellow;

XDLR:=IF(AMOUNT*(DYNAINFO(95)+DYNAINFO(94)+DYNAINFO(93))>0,SUM(((AMOUNT-AMOUNT*(DYNAINFO(95)+DYNAINFO(94)+DYNAINFO(93)))/10000),0),0);
XDLC:=IF(AMOUNT*(DYNAINFO(98)+DYNAINFO(97)+DYNAINFO(96))>0,SUM(((AMOUNT-AMOUNT*(DYNAINFO(98)+DYNAINFO(97)+DYNAINFO(96)))/10000),0),0);
DRAWTEXTABS(20,280,'上涨家数:'+NUMTOSTRN(DYNAINFO(69),0)+' 家'),LINETHICK2,COLOR0000FF;
DRAWTEXTABS(150,280,'下跌家
[url=http://www.70822.com/soft/sort013/sort03/down-39338.html]发表公式，出一个精品看盘公式，请大家多多支持，谢谢【分时主图 源码】[/url]