大智慧L2賬號版‘衛(wèi)東’【WD.K線】源碼翻譯
主圖疊加：WD.K線
公式描述：
源碼：
{K線主圖}
{p1:0,0,100,1}
DRAWTEXTREL(15,0,'K線'),COLORYELLOW;
DRAWTEXTABS(30,0,'《夏衛(wèi)東-自編》'),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(CLOSE<OPEN and OPEN<>0,HIGH,LOW,1,0),Color00FF00;
STICKLINE(CLOSE<OPEN and OPEN<>0,CLOSE,OPEN,7.5,0),Color003300;
STICKLINE(CLOSE<OPEN and OPEN<>0,CLOSE,OPEN,6,0),Color006600;
STICKLINE(CLOSE<OPEN and OPEN<>0,CLOSE,OPEN,5,0),Color008800;
STICKLINE(CLOSE<OPEN and OPEN<>0,CLOSE,OPEN,4,0),Color00BB00;
STICKLINE(CLOSE<OPEN and OPEN<>0,CLOSE,OPEN,2.5,0),Color00EE00;
STICKLINE(CLOSE<OPEN and OPEN<>0,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)<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)));
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)<vv,c,'<*t=0092F7*><*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,'《夏衛(wèi)東-自編》'),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
當滿足條件收盤價<OPENANDOPEN<>0時,在最高價和最低價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR00FF00
當滿足條件收盤價<OPENANDOPEN<>0時,在收盤價和開盤價位置之間畫柱狀線,寬度為7.5,0不為0則畫空心柱.,COLOR003300
當滿足條件收盤價<OPENANDOPEN<>0時,在收盤價和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR006600
當滿足條件收盤價<OPENANDOPEN<>0時,在收盤價和開盤價位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR008800
當滿足條件收盤價<OPENANDOPEN<>0時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR00BB00
當滿足條件收盤價<OPENANDOPEN<>0時,在收盤價和開盤價位置之間畫柱狀線,寬度為2.5,0不為0則畫空心柱.,COLOR00EE00
當滿足條件收盤價<OPENANDOPEN<>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 (昨日成交量(手)/100<VV AND 收盤價>P2*0.98*100的?整數部分/100 AND 成交量(手)>當前流通股本(手)*0.05和昨日成交量(手)的34日簡單移動平均的較小值)
P5賦值:P1=1 AND 收盤價<P3和P41的較小值
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<VV,收盤價,'<*T=0092F7*><*收盤價=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于長沙
