龙听期货论坛's Archiver

C
+
+
版
量
化		 微信： QQ：

龙听 发表于 2018-12-15 10:17

大智慧获利盘+波浪指标源码[大智慧公式]

[b]说明：根据几条均线来判断股票所在状态。[/b]
[b][code]
买价参考:EMA(zz,4),COLORYELLOW,LINETHICK1,PRECIS2;
xxb:=CLOSE*VOL;
止损价:EMA((EMA(xxb,3)/EMA(VOL,3)+EMA(xxb,6)/EMA(VOL,6)+EMA(xxb,12)/EMA(VOL,12)+EMA(xxb,24)/EMA(VOL,24))/4,13),colorffffff,LINETHICK1,PRECIS2;

底线:COST(30),COLOR00FF00,DOTLINE,PRECIS2;
拉升线:COST(70),COLORFF00FF,DOTLINE,PRECIS2;

Var1:=IF(DATE>=10201201,0,1);
Var4:=(2*CLOSE+HIGH+LOW+OPEN)/5*Var1;
成本线:EMA(Var4,55),ColorC7787D,CIRCLEDOT,LINETHICK1,PRECIS2;
STICKline(c>1.099*ref(c,1),o,c,2,0),coloryelLOW;

CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('',CURRENTTIME>180000 and (CXH=3 OR CXH=8));
gj:=if(c=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(v+0.01)/100);
明日阻力:=l+(gj-l)+(c-l);
明日支撑:=l+(c-gj);
今日阻力:=ref(明日阻力 , 1);
今日支撑:=ref(明日支撑 , 1);
STICKLINE(DISPSTATUS=2and c>=今日阻力,今日阻力,今日阻力,20,0),Color0000FF;
STICKLINE(DISPSTATUS=2and c<今日阻力,今日阻力,今日阻力,20,0),Color00FF00;
STICKLINE(DISPSTATUS=2and c>=今日支撑,今日支撑,今日支撑,20,0),ColorFF00FF;
STICKLINE(DISPSTATUS=2and c<今日支撑,今日支撑,今日支撑,20,0),ColorFF9900;
DRAWTEXTREL(5,160,'今日支撑：'+NUMTOSTRN(今日支撑 ,2)),Colorred;
DRAWTEXTREL(5,207,'今日阻力：'+NUMTOSTRN(今日阻力 ,2)),ColorGREEN;
DRAWTEXTREL(115,155,'明日支撑：'+NUMTOSTRN(明日支撑 ,2 )),Color00FFFF;
DRAWTEXTREL(115,207,'明日阻力：'+NUMTOSTRN(明日阻力 ,2 )),ColorFF6A00;

DRAWTEXTREL(5,15,'所属板块:'+BKNAME),ColorDD00FF;
DRAWTEXTREL(5,58,'流通盘:'+FINANCE2(37)/10000+'亿'),ColorDD00FF;
DRAWTEXTREL(110,58,'每股收益:'+FINANCE2(3)+'元'),ColorDD00FF;
DRAWTEXTREL(230,58,'市盈率:'+DYNAINFO(39)+'倍'),ColorDD00FF;

获利盘:=WINNER(CLOSE)*100;
套牢盘:=100*(1-WINNER(C));
浮筹比例:=(WINNER(c*1.1)-WINNER(c*0.9))/WINNER(HHV(h,0))*100;
DRAWTEXTABS(5 ,30,'筹码分析：'),Color00FFFF;
DRAWTEXTABS(70,30,'获利盘:'+获利盘+'% '),Color0000FF;
DRAWTEXTABS(160,30,'套牢盘:'+套牢盘+'% '),ColorFF6A00;
DRAWTEXTABS(255,30,'浮筹比例:'+浮筹比例+'% '),ColorFFFF00;

SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);
DRAWTEXTREL(5,260,'量能饱和度：'+NUMTOSTRN(SAT,0)),LINETHICK1,ColorFFFF00;

E:=(HIGH+LOW+OPEN+2*CLOSE)/5;
明日突破:=E+(HIGH-LOW);
明日反转:=E-(HIGH-LOW);
DRAWTEXTREL(125,260,'明日突破：'+NUMTOSTRN(明日突破,2 )),ColorFF00FF;
DRAWTEXTREL(125,310,'明日反转：'+NUMTOSTRN(明日反转,2 )),COLORGREEN;



TY:=C;
HD:=FILTER(BACKSET(FILTER(ref(TY,10)=HHV(TY,2*10+1),10),10+1),10);
LD:=FILTER(BACKSET(FILTER(ref(TY,10)=LLV(TY,2*10+1),10),10+1),10);
AA:=ref(C,BARSLAST(HD));
BB:=ref(C,BARSLAST(LD));
T1:=BARSLAST(HD);
T2:=BARSLAST(LD) AND NOT(LD);
波浪顶:IF(T1,AA,AA),Color0067FF,POINTDOT,LINETHICK1,PRECIS2;
STICKLINE(T1,AA,AA,3,0),Color0067FF;
波浪底:IF(T2,BB,BB),ColorFF9800,POINTDOT,LINETHICK1,PRECIS2;
STICKLINE(T1,BB,BB,3,0),ColorFF9800;
[/code]
[/b]

[attach]5843[/attach]

页: [1]