相關標簽:龍騰四海指標公式源碼, 龍騰四海指標公式 、 龍騰四海指標 、 龍騰四海 、 龍騰四海國語版 、 網游之龍騰四海 、 龍騰四海國語高清 、 龍騰四海論壇 、 劉德華龍騰四海 、 龍騰四海天龍 、

龍騰四海指標公式源碼   參數：{ file://龍騰四海 N,1,100,8 }

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('http://www.kzuj.com.cn',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
高位:90;
低位:0;
多方: SMA(Var3,13,8),COLORRED;
空方: SMA(Var1,21,8),COLOR00FF00;
中軸:45; {文章來至程序化交易網 cxh99.com}；；；

龍騰四海: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; {文章來至程序化交易網 cxh99.com}
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.kzuj.com.cn',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; {本文來至CXH99.COM}
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.kzuj.com.cn',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; {內容來至程序化交易網 CXH99.COM}
STICKLINE(能量慣性<0,(能量慣性-能量慣性*0.6),(能量慣性-能量慣性*0.75),3,0), COLORffcc00;
STICKLINE(能量慣性<0,(能量慣性-能量慣性*0.8),(能量慣性-能量慣性*0.95),3,0), COLORffff00; {文章來至程序化交易網 cxh99.com}

{//按部就班指標源碼   參數 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.kzuj.com.cn',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 {本文來至程序化交易網 cxh99.com}