您现在的位置:程序化交易>> 股票公式>> 大智慧>> 大智慧公式>>正文内容

牛年好运指标 龙虎看盘指标源码[大智慧公式]

相关标签: 牛年好运指标源码,龙虎看盘指标源码,牛年好运指标公式, 龙虎看盘指标公式,虎年好运指村源码、

 

 

{牛年好运指标源码}
A:=AMOUNT/V/100;
VARA:=EMA((((A-EMA(A,13))/EMA(A,13))*(0-100)),5);
操盘线:=EMA(((VARA/10)+EMA(A,10)),3);行情线:=EMA(A,3);
重心:=(C+0.618*ref(C,1)+0.382*ref(C,2)+0.236*ref(C,3)+0.146*ref(C,4))/2.382;
趋势线:=EMA(((SLOPE(C,22)*20)+C),55),COLORYELLOW,LINETHICK2;
红升:DRAWICON(重心>=趋势线,趋势线,10),COLORRED,LINETHICK2;
蓝降:DRAWICON(重心<趋势线,趋势线,11),COLORBLUE,LINETHICK2;
持股线:=EMA(CLOSE,26),Colorff00ff,LINETHICK2;
Var1:=(4*CLOSE+HIGH+LOW)/6;
Var2:=LLV(LOW,34);
Var3:=HHV(HIGH,34);
dif:= EMA((Var1-Var2)/(Var3-Var2)*100,13);
dea:= EMA(0.667*ref(dif,1)+0.333*dif,2);
多头:STICKLINE(dif>dea,CLOSE,OPEN,8,0),color0000ff;
STICKLINE(dif>dea,HIGH,LOW,0,0),color0000ff;
空头:STICKLINE(dif<=dea,CLOSE,OPEN,8,0),color00ff00;
STICKLINE(dif<=dea,HIGH,LOW,0,0),color00ff00;
关注:STICKLINE(dif>dea and c<持股线,CLOSE,OPEN,8,0),color00ffff;
STICKLINE(dif>dea and c<持股线,HIGH,LOW,0,0),color00ffff;
回踩:STICKLINE(dif<dea and c>持股线,CLOSE,OPEN,8,0),colorff0066;
STICKLINE(dif<dea and c>持股线,HIGH,LOW,0,0),colorff0066;
压力:MA(ref(HHV(C,30),1),2),COLOR9DFFFF;
支撑:MA(ref(LLV(C,30),1),2),COLORABFF46;

LC:=ref(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
抓大牛:=CROSS(RSI,11);
DRAWTEXT(抓大牛,L-0.3,'抓大牛'),COLORRED;
VAR7:=EMA(AMOUNT/VOL/100,3);
VAR8:=EMA(VAR7,88);
VAR9:=EMA(VAR7,88)*0.85;
VARA:=VAR9*0.87;
VARB:=LOW<VARA AND CLOSE>ref(CLOSE,1)*1.02;
DRAWTEXT(FILTER(VARB,6),L-0.05,'牛动'),COLORFF00FF;
VARF:=(2*CLOSE+HIGH+LOW)/4;
VA4:=LLV(LOW,34);
VA5:=HHV(HIGH,34);
VA6:=EMA((VARF-VA4)/(VA5-VA4)*100,6);
VA7:=EMA(0.667*ref(VA6,1)+0.333*VA6,4);
DRAWTEXT(IF(COUNT(CLOSE<ref(CLOSE,1),8)/8>0.3 AND COUNT(VA6>VA7,3) AND ref(LOW,1)=LLV(LOW,120) AND
CLOSE>OPEN,1,0),L-0.05,'牛好运'),COLORYELLOW;
A:=(3*CLOSE+LOW+OPEN+HIGH)/6;
D1:=(20*A+19*ref(A,1)+18*ref(A,2)+17*ref(A,3)+16*ref(A,4)+15*ref(A,5)+14*ref(A,6)
+13*ref(A,7)+12*ref(A,8)+11*ref(A,9)+10*ref(A,10)+9*ref(A,11)+8*ref(A,12)
+7*ref(A,13)+6*ref(A,14)+5*ref(A,15)+4*ref(A,16)+3*ref(A,17)+2*ref(A,18)+
ref(A,20))/211;
D2:=EMA(D1,2);
D3:=EMA(D2,2);
K1:=EMA(D3,2); {文章来至程序化交易网 cxh99.com}
DRAWTEXT(CROSS(D1,K1),L-0.05,'牛买入'),COLOR0099FF;
多方趋势:=7*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1)
-3*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1)
-SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1)
,3,1),2,1);
天线:=78.89;
DRAWTEXT(CROSS(天线,多方趋势),H*1.01,'牛回头'),COLOR00FF00;

A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);
牛运线:=EMA(A51,5);A54:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
趋势线:=(MA(3*SMA(A54,6,1)-2*SMA(SMA(A54,5,1),5,1),2));
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.cxh99.com',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
DRAWTEXT(CROSS(趋势线,0)AND 牛运线<40,(HIGH*0.97),'▲牛起'),COLORYELLOW; {内容来至程序化交易网 CXH99.COM}

 

 

{龙虎看盘指标源码}
换手率:=VOL/CAPITAL*100;
fsbs:=DYNAINFO(51);
x:=v;
{EXPLAINICON(c>0,'LHKP');}
EXPLAINICON(HIGH>=HHV(HIGH,20),'LHKP');
EXPlain(1,' '+STKLABEL+' '+STKNAME),ColorFFFF80;
yy:=DATE;
EXPLAINEX(1=1,'',date,0,0),COLORffef40;
yy1:=WEEKDAY;
EXPLAIN(yy1=5,'星期五'),COLORffef40;
EXPLAIN(yy1=4,'星期四'),COLORffef40;
EXPLAIN(yy1=3,'星期三'),COLORffef40;
EXPLAIN(yy1=2,'星期二'),COLORffef40;
EXPLAIN(yy1=1,'星期一'),COLORffef40;
EXPLAIN(yy1=6,' 星期六'),COLORffef40;
EXPLAIN(yy1=0,' 星期日'),COLORffef40;

db:stkindi('','LHKP.db',0,0),LINETHICK0;
db1:=stkindi('','LHKP.db1',0,0),LINETHICK2;
db2:=stkindi('','LHKP.db2',0,0),LINETHICK2;
ds:=stkindi('','LHKP.ds',0,0);
ds1:=stkindi('','LHKP.ds1',0,0);
ds2:=stkindi('','LHKP.ds2',0,0);
sb:=stkindi('','LHKP.sb',0,0);
sb1:=stkindi('','LHKP.sb1',0,0);
ss:=stkindi('','LHKP.ss',0,0);
ss1:=stkindi('','LHKP.ss1',0,0);
总:=DYNAINFO( 8);

EXPLAINEX(1,'■■■总成交手:',总,0,0),COLORccffcc;
EXPLAINex(1,'■大单买入:',db,0,0),coloryelLOW;
EXPLAINEX(1,'■大单卖出:',ds,0,0)coloryelLOW;
EXPLAINEX(1,'□■大单买卖净量:',(db-ds),2,0),COLORccffcc;
EXPLAINEX(1,'■大单买入笔数:',db1,0,0),color5454ff;
EXPLAINEX(1,'■大单卖出笔数:',ds1,0,1)colorffff54; {本文来至CXH99.COM}

EXPLAINEX(1,'□小单买入:',sb,0,0)colorred;
EXPLAINEX(1,'□小单卖出:',ss,0,0)colorred;
EXPLAINEX(1,'□小单买入笔数:',sb1,0,0)colorred;
EXPLAINEX(1,'□小单卖出笔数:',ss1,0,0)colorgreen;
EXPLAINEX(1,'■■■■成交总笔数:',fsbs,0,0),coloryelLOW;
EXPLAINEX(1,'■■大单买入均价:',db2/(db*100),3,0)COLORccffcc;
EXPLAINEX(1,'■■大单卖出均价:',ds2/(ds*100),2,0)COLORccffcc;
散户跟风系数:=sb/(db+ds)*100;
ht:=if(c>o,1,-1);
EXPLAINEX(1,'□■散户跟风系数:',散户跟风系数*ht,2,0),COLORccffcc;
////////////// {内容来至程序化交易网 CXH99.COM}

三日总换手:=SUM(换手率,3);
五日总换手:=SUM(换手率,5);
十日总换手:=SUM(换手率,10);
二十日总换手:=SUM(换手率,20);
EXPLAIN(十日总换手,'■三日总换手■'),colorFFFFFF;
EXPLAIN(1,'今总:'+NUMTOSTR(三日总换手,2)+' %'+'\n'+'昨总:'+NUMTOSTR(ref(三日总换手,1),2)+' %'+'\n'+'前总:'
+NUMTOSTR(ref(三日总换手,2),2)+' %'+'\n'+'前一:'+NUMTOSTR(ref(三日总换手,3),2)+' %'+'\n'+'前二:'+NUMTOSTR(ref(三日总换手,4),2)+' %'),colorFFFF;
EXPLAIN(1,'■五日总换手■'),COLORRED;
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.cxh99.com',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
EXPLAIN(1,'今总:'+NUMTOSTR(五日总换手,2)+' %'+'\n'+'昨总:'+NUMTOSTR(ref(五日总换手,1),2)+' %'+'\n'+'前总:'
+NUMTOSTR(ref(五日总换手,2),2)+' %'+'\n'+'前一:'+NUMTOSTR(ref(五日总换手,3),2)+' %'+'\n'+'前二:'+NUMTOSTR(ref(五日总换手,4),2)+' %'),COLORWHITE;
EXPLAIN(十日总换手,'■十日总换手■'),colorFFFFFF;
EXPLAIN(1,'今总:'+NUMTOSTR(十日总换手,2)+' %'+'\n'+'昨总:'+NUMTOSTR(ref(十日总换手,1),2)+' %'+'\n'+'前总:'
+NUMTOSTR(ref(十日总换手,2),2)+' %'+'\n'+'前一:'+NUMTOSTR(ref(十日总换手,3),2)+' %'+'\n'+'前二:'+NUMTOSTR(ref(十日总换手,4),2)+' %'),colorFFFF;

PT:=ref(HIGH,1)-ref(LOW,1);
CDP:=(HIGH+LOW+2*CLOSE)/4;
AH:=CDP+PT;
AL:=CDP-PT;
NH敏感阻力:=2*CDP-LOW;
NL:=2*CDP-HIGH;
EXPLAINEX(AH,'解盘:次日重大阻力价位=',AH,2,0),colorFF00;
EXPLAINEX(NH敏感阻力,'解盘:次日敏感阻力区域=',NH敏感阻力,2,0),colorFFFF;
EXPLAINEX(CDP,'解盘:次日关键均衡价位=',CDP,2,0),colorFFFFFF;
EXPLAINEX(NL,'解盘:次日重要支撑区域=',NL,2,0),colorFF0000;
EXPLAINEX(AL,'解盘:次日关键支撑价位=',AL,2,0),colorFF;
STICKLINE(BARSCOUNT(C)=SYSPARAM(1),AH,AH,12,0),ColoryelLOW,LINETHICK3,shift1;
DRAWNUMBER(BARSCOUNT(C)=SYSPARAM(1),AH,AH,2),shift2,colorYELLOW;
STICKLINE(BARSCOUNT(C)=SYSPARAM(1),AL,AL,12,0),,ColorFFBB00,LINETHICK3,shift1;
DRAWNUMBER(BARSCOUNT(C)=SYSPARAM(1),AL,AL,2),shift2,,ColorFFBB00;
 

 

 

[1] {本文来至CXH99.COM}

------
{LHKP}{龙虎看盘引用}
if DATATYPE<>0 then exit;

xs:=FINANCE(7)*n/1000;
dbv:=if(v>xs and BUYVOL,v,0);
dsv:=if(v>xs and SELLVOL,v,0);
sbv:=if(v<=xs and BUYVOL,v,0);
ssv:=if(v<=xs and SELLVOL,v,0);
db:SUM(dbv,0);
ds:SUM(dsv,0);
sb:SUM(sbv,0);
ss:SUM(ssv,0);
买卖净量:(db-ds),STICK;
dbv1:=if(v>xs and BUYVOL,qt,0);
dsv1:=if(v>xs and SELLVOL,qt,0);
sbv1:=if(v<=xs and BUYVOL,qt,0);
ssv1:=if(v<=xs and SELLVOL,qt,0);
db1:SUM(dbv1,0);
ds1:SUM(dsv1,0);
sb1:SUM(sbv1,0);
ss1:SUM(ssv1,0); {本文来至CXH99.COM}

dbv2:=if(v>xs and BUYVOL,AMOUNT,0);
dsv2:=if(v>xs and SELLVOL,AMOUNT,0);
sbv2:=if(v<=xs and BUYVOL,AMOUNT,0);
ssv2:=if(v<=xs and SELLVOL,AMOUNT,0);
db2:SUM(dbv2,0);
ds2:SUM(dsv2,0);
sb2:SUM(sbv2,0);
ss2:SUM(ssv2,0);
{本文来源:}

 

{文章来至程序化交易网 cxh99.com}

 

(责任编辑:程序化交易网整理)

 

 

 

有思路,想编写各种指标公式,程序化交易模型,选股公式,预警公式的朋友

可联系技术人员 QQ: 262069696  点击在线交流进行 有偿 编写!不贵!点击查看价格!

 


【字体: 】【打印文章】【查看评论

相关文章

    没有相关内容