龙听期货论坛 » 量化策略·公式·源码库 » 龙腾四海等经典指标源码集合[大智慧公式]

龙听 发表于 2018-12-11 10:44

龙腾四海等经典指标源码集合[大智慧公式]

龙腾四海指标公式源码   参数：{ file://龙腾四海 N,1,100,8 }
[code]
Var1:=(HHV(HIGH,21)-C)/(HHV(HIGH,21)-LLV(LOW,21))*100-10;
Var2:=(C-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
Var3:=SMA(Var2,13,8);
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
高位:90;
低位:0;
多方: SMA(Var3,13,8),COLORRED;
空方: SMA(Var1,21,8),COLOR00FF00;
中轴:45;
龙腾四海:100-100*(HHV(HIGH,5*N)-CLOSE)/(HHV(HIGH,5*N)-LLV(LOW,5*N)),COLOR00FFFF;
海面:20,COLOR0000FF;
海天分界线:50,COLOR00FF00;
天际:80,COLORFF8800 ;
坐标线:0;20;50;80;100;{买卖频谱指标源码}
买线:EMA(C,3);
卖线:EMA(SLOPE(C,21)*20+C,55);
买卖差:=买线-卖线;{文章来源 }
STICKLINE(买卖差>=0,(买线-买卖差*0.05),(买线-买卖差*0.15),3,0) ,COLOR00ffff;
STICKLINE(买卖差>=0,(买线-买卖差*0.2),(买线-买卖差*0.35),3,0) ,COLOR00ccff;
STICKLINE(买卖差>=0,(买线-买卖差*0.4),(买线-买卖差*0.55),3,0) ,COLOR0099ff;
STICKLINE(买卖差>=0,(买线-买卖差*0.6),(买线-买卖差*0.75),3,0) ,COLOR0066ff;
STICKLINE(买卖差>=0,(买线-买卖差*0.8),(买线-买卖差*0.95),3,0) ,COLOR0000cc;
STICKLINE(买卖差<0,(卖线+买卖差*0.05),(卖线+买卖差*0.15),3,0) ,COLOR006600;
STICKLINE(买卖差<0,(卖线+买卖差*0.2),(卖线+买卖差*0.35),3,0) ,COLOR009900;
STICKLINE(买卖差<0,(卖线+买卖差*0.4),(卖线+买卖差*0.55),3,0) ,COLOR00cc00;
STICKLINE(买卖差<0,(卖线+买卖差*0.6),(卖线+买卖差*0.75),3,0) ,COLOR00ff00;
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.cxh99.com',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
STICKLINE(买卖差<0,(卖线+买卖差*0.8),(卖线+买卖差*0.95),3,0) ,COLOR66ff00; {内容来至程序化交易网 CXH99.COM} {/主力进出指标源码 }
MAV:=(C*2+H+L)/4;
SK:=EMA(MAV,13) - EMA(MAV,34);
SD:=EMA(SK,5);
中轴:0;
空方主力 : (-2*(SK-SD))*3.8,COLOR00FF00;
多方主力 : (2*(SK-SD))*3.8,COLORRED; {操盘线指标源码}
MA5:MA(CLOSE,5),ColorFFFfff,linethick1;
MA10:MA(CLOSE,10),Color00Ffff,linethicK1;
MA21:MA(CLOSE,21),Color00ff00,linethick1;
MA30:MA(CLOSE,30),ColorFF00ff,linethick1;
MA60:MA(CLOSE,60),Color0000ff,linethick1;
MA120:MA(CLOSE,120),ColorFFff00,linethick1;
买线:EMA(C,2),color000000;
卖线:EMA(SLOPE(C,21)*20+C,42),pointdot,color000000;
BUY:=cross(买线,卖线);
SEL:=cross(卖线,买线);{文章来源 }
drawtext(buy,LOW*0.99,'Ψ'),colorf00ff0,linethick5;
drawtext(sel,HIGH*1.01,'◎'),colorwhite,linethick5;
STICKline(买线>=卖线,LOW,HIGH,0.1,0),colorred;
STICKline(买线>=卖线,CLOSE,open,4.5,0),color0000AA;
STICKline(买线>=卖线,CLOSE,open,3,0),color0000CC;
STICKline(买线>=卖线,CLOSE,open,2,0),color0000DD;
STICKline(买线>=卖线,CLOSE,open,1,0),color0000FF;
STICKline(买线<卖线,CLOSE,open,1,0),colorEEEE00;
STICKline(买线<卖线,CLOSE,open,2,0),colorDDDD00;
STICKline(买线<卖线,CLOSE,open,3,0),colorCCCC00;
STICKline(买线<卖线,CLOSE,open,4.5,0),colorAAAA00;
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.cxh99.com',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
STICKline(买线<卖线,LOW,HIGH,0.1,0),colorFFff00;
STICKline(cross(买线,卖线) or cross(卖线,买线),open,CLOSE,3.5,0),coloryelLOW;
{冰火两重天 P,1,100,16}
能量:=SQRT(VOL)*(((C-(H+L)/2))/((H+L)/2));
平滑能量:=EMA(能量,P);
能量惯性:EMA(平滑能量,P) ;
STICKLINE(能量惯性>=0,(能量惯性-能量惯性*0.05),(能量惯性-能量惯性*0.15),3,0), COLOR0000CC;
STICKLINE(能量惯性>=0,(能量惯性-能量惯性*0.2),(能量惯性-能量惯性*0.35),3,0), COLOR0066ff;
STICKLINE(能量惯性>=0,(能量惯性-能量惯性*0.4),(能量惯性-能量惯性*0.55),3,0),COLOR0099ff;
STICKLINE(能量惯性>=0,(能量惯性-能量惯性*0.6),(能量惯性-能量惯性*0.75),3,0), COLOR00CCff;
STICKLINE(能量惯性>=0,(能量惯性-能量惯性*0.8),(能量惯性-能量惯性*0.95),3,0), COLOR00ffff;
STICKLINE(能量惯性<0,(能量惯性-能量惯性*0.05),(能量惯性-能量惯性*0.15),3,0), COLORff3300;
STICKLINE(能量惯性<0,(能量惯性-能量惯性*0.2),(能量惯性-能量惯性*0.35),3,0), COLORFF6600;
STICKLINE(能量惯性<0,(能量惯性-能量惯性*0.4),(能量惯性-能量惯性*0.55),3,0), COLORFF9900;
STICKLINE(能量惯性<0,(能量惯性-能量惯性*0.6),(能量惯性-能量惯性*0.75),3,0), COLORffcc00;
STICKLINE(能量惯性<0,(能量惯性-能量惯性*0.8),(能量惯性-能量惯性*0.95),3,0), COLORffff00;  {//按部就班指标源码   参数 N,1,100,5 }
现价:C;
顶部: COST(19*n),colorffff33;
卖出: COST(15*n),colorgreen;
买入: COST(6*n),colorred;
底部: COST(1*n),coloryelLOW; {//波段无敌指标源码 }
P1:=0;
P2:= IF (CLOSE>MA(CLOSE,5),P1+10,P1-10);
P3:= IF (CLOSE>MA(CLOSE,10),P2+10,P2-10);
P4:= IF (CLOSE>MA(CLOSE,10),P3+10,P3-10);
P5:= IF (MA(CLOSE,5)>MA(CLOSE,10),P4+10,P4-10);
P6:= IF (MA(CLOSE,10)>MA(CLOSE,20),P5+10,P5-10);
BD:P6;
STICKLINE(BD>=-50,-50,BD,3,0),COLORGREEN;
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.cxh99.com',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
STICKLINE(BD>=-30,-30,BD,3,0),COLORFFFF00;
STICKLINE(BD>=0,0,BD,3,0),COLORYELLOW;
{STICKLINE(BD<=50 AND BD>=30,30,BD,3,0),COLORRED;}
STICKLINE(BD<=50 OR BD>=30,30,BD,3,0),COLORRED; { //筹码分析指标源码 }
HSL:=EMA(VOL/CAPITAL,3);
ZDL:=HHV(HSL,240);
ZXL:=LLV(HSL,240);
XS:=MA(C,33);{文章来源 }
锁定筹码:EMA((HSL-ZXL)/ZXL*XS,13);
浮动筹码:EMA((ZDL-HSL)/HSL*XS,13);
力量对比:锁定筹码-浮动筹码 ,COLORSTICK[/code]

查看完整版本: 龙腾四海等经典指标源码集合[大智慧公式]