大智慧L2帐号版‘卫东’【WD.K线】源码翻译

来源:百度文库 编辑:神马文学网 时间:2024/04/29 16:59:43
大智慧L2帐号版‘卫东’【WD.K线】源码翻译   主图叠加:WD.K线 公式描述:  源码:  {K线主图}
{p1:0,0,100,1}
DRAWTEXTREL(15,0,'K线'),COLORYELLOW;
DRAWTEXTABS(30,0,'《夏卫东-自编》'),COLOR0000FF;总股本:=FINANCE2(35) ;
流通股:=FINANCE2(37);
限售A股:=FINANCE2(41);
每股收益:=FINANCE2(3);
市盈率:=DYNAINFO(39);
每股公积金:=FINANCE2(7);
所属板块:=BKNAME;
DRAWTEXTABS(12,14, '所属板块: '+所属板块),Color464646{,COLORYELLOW};
DRAWTEXTABS(12,27,'每股收益: '+NUMTOSTRN(每股收益,3)+'元   利润增长:'+FINANCE2(10)+'%   市盈率:'+NUMTOSTRN(市盈率,1)+'倍 '+' 每股公积金:'+NUMTOSTRN(每股公积金,2)+'元'),Color464646{,COLORYELLOW};
DRAWTEXTABS(12,40,'总 股 本: '+NUMTOSTRN(总股本,2)+'万股'+'  流通A股:'+NUMTOSTRN(流通股,2)+'万股'+'  限售A股:'+NUMTOSTRN(限售A股,2)+'万股'),Color464646{,COLORYELLOW};MA5:MA(CLOSE,5),COLORYELLOW,LAYER0;
MA10:MA(CLOSE,10),COLORRED,LAYER0;
MA20:MA(CLOSE,20),COLORMAGENTA,LAYER0;
MA30:MA(CLOSE,30),COLORFF9E3E,LAYER0;
MA60:MA(CLOSE,60),COLORGREEN,LAYER0;
MA120:MA(CLOSE,120),Color808040,LAYER0;STICKLINE(CLOSE>=OPEN and OPEN<>0,HIGH,LOW,1,0),Color0022FF;STICKLINE(CLOSE>=OPEN and OPEN<>0,CLOSE,OPEN,7.5,0),color000033;
STICKLINE(CLOSE>=OPEN and OPEN<>0,CLOSE,OPEN,6,0),color000066;
STICKLINE(CLOSE>=OPEN and OPEN<>0,CLOSE,OPEN,5,0),color000088;
STICKLINE(CLOSE>=OPEN and OPEN<>0,CLOSE,OPEN,4,0),color0000BB;
STICKLINE(CLOSE>=OPEN and OPEN<>0,CLOSE,OPEN,2.5,0),Color0000EE;
STICKLINE(CLOSE>=OPEN and OPEN<>0,CLOSE,OPEN,1,0),Color0022FF;STICKLINE(CLOSE0,HIGH,LOW,1,0),Color00FF00;STICKLINE(CLOSE0,CLOSE,OPEN,7.5,0),Color003300;
STICKLINE(CLOSE0,CLOSE,OPEN,6,0),Color006600;
STICKLINE(CLOSE0,CLOSE,OPEN,5,0),Color008800;
STICKLINE(CLOSE0,CLOSE,OPEN,4,0),Color00BB00;
STICKLINE(CLOSE0,CLOSE,OPEN,2.5,0),Color00EE00;
STICKLINE(CLOSE0,CLOSE,OPEN,1,0),Color00FF00;买线:EMA(C,2),pointdot,color0000DD;
卖线:EMA(SLOPE(C,21)*20+C,42),pointdot,color00DD00;
BU:=cross(买线,卖线);
SEL:=cross(卖线,买线);
drawtext(bu,LOW-0.5,'买'),coloryellow,LINETHICK3;
drawtext(sel,HIGH+0.5,'卖'),colorgreen,linethick3;
DRAWicon(BU,l-0.2,7),LINETHICK5;
DRAWicon(SEL,h+0.2,8),LINETHICK5;
{十字光标提示}
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)intpart(p2*0.98*100)/100 and vol>min(capital*0.05,ref(ma(vol,34),1)));
p5:=p1=1 and cp1:=if(p4=1,1,if(p5=1,0,ref(p1,1)));DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c>0.1,c,'<*t=0092F7*><*c=FFFFFF*><*p=95*>'+datestr(date)+'\n'+'<*t=E7FFFF*><*c=111100*><*p=95*>'+'持币');
DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c<=0.1 and ref(vol/100,1)<*c=FFFFFF*><*p=95*>'+datestr(date)+'\n'+'<*t=E7FFFF*><*c=111100*><*p=95*>'+'明日收盘价超过'+str(c1)+'元;'+'\n'+'<*t=E7FFFF*><*c=111100*><*p=95*>'+'或收盘价超过'+str(intpart(c1*0.98*100)/100)+'元;'+'\n'+'<*t=E7FFFF*><*c=111100*><*p=95*>'+'并且成交量大于'+str(vv)+'<*c=0000FF*>'+'买入');
DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c<=0.1 and ref(vol/100,1)>=vv,c,'<*t=0092F7*><*c=FFFFFF*><*p=95*>'+datestr(date)+'\n'+'<*t=E7FFFF*><*c=111100*><*p=95*>'+'明日收盘价超过'+str(c1)+'<*c=0000FF*><*p=99*>'+'买入');
DRAWFLAGTEXT(p1=1 and (c-min(c1,p40))/min(c1,p40)>0.1 ,c,'<*t=0092F7*><*c=FFFFFF*><*p=95*>'+datestr(date)+'\n'+'<*t=E7FFFF*><*c=111100*><*p=95*>'+'持股');
DRAWFLAGTEXT(p1=1 and (c-min(c1,p40))/min(c1,p40)<=0.1 ,c,'<*t=0092F7*><*c=FFFFFF*><*p=95*>'+datestr(date)+'\n'+'<*t=E7FFFF*><*c=111100*><*p=95*>'+'明日收盘价跌破'+str(min(c1,p40))+'卖出');  源码翻译: RAWTEXTREL(15,0,'K线'),画黄色
DRAWTEXTABS(30,0,'《夏卫东-自编》'),COLOR0000FF
总股本赋值:FINANCE2(35)
流通股赋值:FINANCE2(37)
限售A股赋值:FINANCE2(41)
每股收益赋值:FINANCE2(3)
市盈率赋值:市盈率
每股公积金赋值:FINANCE2(7)
所属板块赋值:BKNAME
DRAWTEXTABS(12,14, '所属板块: '+所属板块),COLOR464646
DRAWTEXTABS(12,27,'每股收益: '+NUMTOSTRN(每股收益,3)+'元   利润增长:'+FINANCE2(10)+'%   市盈率:'+NUMTOSTRN(市盈率,1)+'倍 '+' 每股公积金:'+NUMTOSTRN(每股公积金,2)+'元'),COLOR464646
DRAWTEXTABS(12,40,'总 股 本: '+NUMTOSTRN(总股本,2)+'万股'+'  流通A股:'+NUMTOSTRN(流通股,2)+'万股'+'  限售A股:'+NUMTOSTRN(限售A股,2)+'万股'),COLOR464646
输出MA5:收盘价的5日简单移动平均,画黄色,LAYER0
输出MA10:收盘价的10日简单移动平均,画红色,LAYER0
输出MA20:收盘价的20日简单移动平均,画洋红色,LAYER0
输出MA30:收盘价的30日简单移动平均,COLORFF9E3E,LAYER0
输出MA60:收盘价的60日简单移动平均,画绿色,LAYER0
输出MA120:收盘价的120日简单移动平均,COLOR808040,LAYER0
当满足条件收盘价>=OPENANDOPEN<>0时,在最高价和最低价位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR0022FF
当满足条件收盘价>=OPENANDOPEN<>0时,在收盘价和开盘价位置之间画柱状线,宽度为7.5,0不为0则画空心柱.,COLOR000033
当满足条件收盘价>=OPENANDOPEN<>0时,在收盘价和开盘价位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR000066
当满足条件收盘价>=OPENANDOPEN<>0时,在收盘价和开盘价位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR000088
当满足条件收盘价>=OPENANDOPEN<>0时,在收盘价和开盘价位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR0000BB
当满足条件收盘价>=OPENANDOPEN<>0时,在收盘价和开盘价位置之间画柱状线,宽度为2.5,0不为0则画空心柱.,COLOR0000EE
当满足条件收盘价>=OPENANDOPEN<>0时,在收盘价和开盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR0022FF
当满足条件收盘价0时,在最高价和最低价位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR00FF00
当满足条件收盘价0时,在收盘价和开盘价位置之间画柱状线,宽度为7.5,0不为0则画空心柱.,COLOR003300
当满足条件收盘价0时,在收盘价和开盘价位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR006600
当满足条件收盘价0时,在收盘价和开盘价位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR008800
当满足条件收盘价0时,在收盘价和开盘价位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR00BB00
当满足条件收盘价0时,在收盘价和开盘价位置之间画柱状线,宽度为2.5,0不为0则画空心柱.,COLOR00EE00
当满足条件收盘价0时,在收盘价和开盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR00FF00
输出买线:收盘价的2日指数移动平均,POINTDOT,COLOR0000DD
输出 卖线:收盘价的21日线性回归斜率*20+收盘价的42日指数移动平均,POINTDOT,COLOR00DD00
BU赋值:买线上穿卖线
SEL赋值:卖线上穿买线
 当满足条件BU时,在最低价-0.5位置书写文字,画黄色,LINETHICK3
 当满足条件SEL时,在最高价+0.5位置书写文字,画绿色,LINETHICK3
当满足条件BU时,在最低价-0.2位置画7号图标,LINETHICK5
当满足条件SEL时,在最高价+0.2位置画8号图标,LINETHICK5
C1赋值:成本均线(5)*100*0.96的?整数部分/100
P2赋值:昨日成本均线(5)*100的?整数部分/100
P3赋值:昨日成本均线(5)*0.96*100的?整数部分/100
VV赋值:当前流通股本(手)*0.05和昨日成交量(手)的34日简单移动平均的较小值/100的?整数部分
P40赋值:MAXCYC*100的?整数部分/100
P41赋值:昨日MAXCYC*100的?整数部分/100
P4赋值:P1=0 AND 收盘价>P2 OR (昨日成交量(手)/100P2*0.98*100的?整数部分/100 AND 成交量(手)>当前流通股本(手)*0.05和昨日成交量(手)的34日简单移动平均的较小值)
P5赋值:P1=1 AND 收盘价P1赋值:如果P4=1,返回1,否则返回如果P5=1,返回0,否则返回昨日P1
DRAWFLAGTEXT(P1=0 AND (C1*0.98-收盘价)/收盘价>0.1,收盘价,'<*T=0092F7*><*收盘价=FFFFFF*><*P=95*>'+DATESTR(日期)+'\N'+'<*T=E7FFFF*><*收盘价=111100*><*P=95*>'+'持币')
DRAWFLAGTEXT(P1=0 AND (C1*0.98-收盘价)/收盘价<=0.1 AND 昨日成交量(手)/100<*收盘价=FFFFFF*><*P=95*>'+DATESTR(日期)+'\N'+'<*T=E7FFFF*><*收盘价=111100*><*P=95*>'+'明日收盘价超过'+STR(C1)+'元;'+'\N'+'<*T=E7FFFF*><*收盘价=111100*><*P=95*>'+'或收盘价超过'+STR(C1*0.98*100的?整数部分/100)+'元;'+'\N'+'<*T=E7FFFF*><*收盘价=111100*><*P=95*>'+'并且成交量大于'+STR(VV)+'<*收盘价=0000FF*>'+'买入')
DRAWFLAGTEXT(P1=0 AND (C1*0.98-收盘价)/收盘价<=0.1 AND 昨日成交量(手)/100>=VV,收盘价,'<*T=0092F7*><*收盘价=FFFFFF*><*P=95*>'+DATESTR(日期)+'\N'+'<*T=E7FFFF*><*收盘价=111100*><*P=95*>'+'明日收盘价超过'+STR(C1)+'<*收盘价=0000FF*><*P=99*>'+'买入')
DRAWFLAGTEXT(P1=1 AND (收盘价-C1和P40的较小值)/C1和P40的较小值>0.1 ,收盘价,'<*T=0092F7*><*收盘价=FFFFFF*><*P=95*>'+DATESTR(日期)+'\N'+'<*T=E7FFFF*><*收盘价=111100*><*P=95*>'+'持股')
DRAWFLAGTEXT(P1=1 AND (收盘价-C1和P40的较小值)/C1和P40的较小值<=0.1 ,收盘价,'<*T=0092F7*><*收盘价=FFFFFF*><*P=95*>'+DATESTR(日期)+'\N'+'<*T=E7FFFF*><*收盘价=111100*><*P=95*>'+'明日收盘价跌破'+STR(C1和P40的较小值)+'卖出')
 2010.10.06于长沙