前段时间有朋友在论坛发表了仿麟龙四量图的指标非常不错。
自己也研究了一下，
不过是通达信版本的 本人使用大智慧软件 所以就改成了大智慧版本
并改了个选股公式
其实这个麟龙软件我知道，四量图和四色谱是最贵的软件里面的核心指标
但是这个仿的指标 可信度不高，成功率测试也较低。
在这里改成大智慧版本的 供大家研究参考学习一下。 依据指标买卖股票风险自担。
指标用法如下： 不过我说的是正版指标的用法，这个仿制的指标明显和正版的出入太多了
四根横着的量从上到下分别代表 散户 游资 机构 主力
当四根全都变红时为买入点 一直持股到主力量变绿为止
大智慧四量图源码如下：
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)<1and xg;
 |
