龙听期货论坛's Archiver

龙听 发表于 2018-10-10 09:36

[转载]麟龙四量图指标(副图、源码、贴图、用法说明)给大家改成了大智慧版本以及选股

前段时间有朋友在论坛发表了仿麟龙四量图的指标  非常不错。
自己也研究了一下,
不过是通达信版本的 本人使用大智慧软件 所以就改成了大智慧版本
并改了个选股公式

其实这个麟龙软件我知道,四量图和四色谱是最贵的软件里面的核心指标
但是这个仿的指标 可信度不高,成功率测试也较低。
在这里改成大智慧版本的 供大家研究参考学习一下。 依据指标买卖股票风险自担。

指标用法如下: 不过我说的是正版指标的用法,这个仿制的指标明显和正版的出入太多了
四根横着的量从上到下分别代表 散户 游资 机构 主力
当四根全都变红时为买入点 一直持股到主力量变绿为止

大智慧四量图源码如下:

[code]
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
牛线:=(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210;
马线:=MA(牛线,6);
STICKLINE(C>牛线,2.5,4,8,0),COLORRED{COLORGREEN},LINETHICK2;
STICKLINE(C<马线,2.5,4,8,0),COLORGREEN{COLORRED},LINETHICK2;
STICKLINE(牛线>=C AND C>=马线,2.5,4,8,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2;
A:=MAX(MA(C,60),MA(C,120));
B:=MIN(MA(C,60),MA(C,120));
STICKLINE(C>=A,0.5,2,8,0),COLORRED{COLORGREEN},LINETHICK2;
STICKLINE(C<=B,0.5,2,8,0),COLORGREEN{COLORRED},LINETHICK2;
STICKLINE(A>=C AND C>=B,0.5,2,8,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2;

{R:=0;}
E:=MAX(MA(C,45),MA(C,90));
F:=MIN(MA(C,45),MA(C,90));
STICKLINE(C>E,-1.5,0,8,0),COLORRED{COLORGREEN},LINETHICK2;
STICKLINE(C<F,-1.5,0,8,0),COLORGREEN{COLORRED},LINETHICK2;
STICKLINE(E>=C AND C>=F,-1.5,0,8,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2;
J:=MAX(MA(C,30),MA(C,60));
K:=MIN(MA(C,30),MA(C,60));
STICKLINE(C>J,-3.5,-2,8,0),COLORRED{COLORGREEN},LINETHICK2;
STICKLINE(C<K,-3.5,-2,8,0),COLORGREEN{COLORRED},LINETHICK2;
STICKLINE(J>=C AND C>=K,-3.5,-2,8,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2;


改成的选股公式如下:


MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
牛线:=(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210;
马线:=MA(牛线,6);
xg1:=C>牛线;

A:=MAX(MA(C,60),MA(C,120));

B:=MIN(MA(C,60),MA(C,120));
xg2:=C>=A;


E:=MAX(MA(C,45),MA(C,90));
F:=MIN(MA(C,45),MA(C,90));
xg3:=C>E;

J:=MAX(MA(C,30),MA(C,60));
K:=MIN(MA(C,30),MA(C,60));
xg4:=C>J;
xg:=xg1 and xg2 and xg3 and xg4;
xgo:ref(xg,1)<1  and xg;
[/code]

[attach]4471[/attach]

页: [1]