飞狐精品指标－钻石主图

阅读作者：股海网时间 2009-06-13 飞狐公式

C/C++ Code复制内容到剪贴板

{2-钻石主图}
N:=6;
BU:=BARSLAST(CLOSE=HHV(CLOSE,N));
SE:=BARSLAST(CLOSE=LLV(CLOSE,N));
KK1:=SE;
KK2:=BU;
LM1:=SE;
LM2:=BU;
OK:=KK1>KK2 AND LM1>LM2;
OK1:=KK1>KK2 AND LM1<LM2;
NOK:=KK2>KK1 AND LM2>LM1;
NOK1:=KK2>KK1 AND LM2<LM1;
STICKLINE(OK1,CLOSE,OPEN,8,0),colorFF0000;
STICKLINE(OK1,HIGH,LOW,0,0),colorFF0000;
STICKLINE(OK,CLOSE,OPEN,8,0),colorFF;
STICKLINE(OK,HIGH,LOW,0,0),colorFF;
STICKLINE(NOK,CLOSE,OPEN,8,0),colorFF0000;
STICKLINE(NOK,HIGH,LOW,0,0),colorFF0000;
STICKLINE(NOK1,CLOSE,OPEN,8,0),colorFF;
STICKLINE(NOK1,HIGH,LOW,0,0),colorFF;
DRAWICON(CROSS(KK1,KK2),OPEN*0.98,4);
DRAWICON(CROSS(KK2,KK1),OPEN*1.04,5);
DRAWTEXT(CROSS(KK1,KK2),OPEN*0.95,'买'),colorFFFFFF;
DRAWTEXT(CROSS(KK2,KK1),OPEN*1.065,'卖'),colorFFFF;
M1:WMA(CLOSE,14),LINETHICK2,colorFF;
M2:=WMA(M1,5);
M3:IF(M1>M2,M2,M1),LINETHICK2,colorFF00;
M2,LINETHICK2,color1;
X:=EMA(SLOPE(CLOSE,21)*20+CLOSE,68);
Y:=EMA(CLOSE,10);
LL:=REF(CLOSE,2);
MM:=(SMA(MAX(CLOSE-LL,0),6,1))/(SMA(ABS(CLOSE-LL),6,1))*100;
DB:=IF(MM<REF(MM,1) AND MM>79,MM,0);
{3-机构研判}
MA3:="MASS.A";
MA5:="MASS.B";
国家队:=STKINDI('AC48','Ⅰ-股海航灯.标准',0,DATATYPE)*MA3/MA5;
国家队操盘线:("AC48$CLOSE"-国家队)/国家队*100,LINETHICK2,colorFF00FF;
PARTLINE(国家队操盘线<0,国家队操盘线),LINETHICK2,colorFF;
二线:=STKINDI('AC49','Ⅰ-股海航灯.标准',0,DATATYPE)*MA3/MA5;
大机构操盘线:("AC49$CLOSE"-二线)/二线*100,LINETHICK2,colorFFFF;
PARTLINE(大机构操盘线<0,大机构操盘线),LINETHICK2,colorFF00;
机构:=STKINDI('399230','Ⅰ-股海航灯.标准',0,DATATYPE)*MA3/MA5;
普通机构操盘线:("399230$CLOSE"-机构)/机构*100,LINETHICK2,colorFFFFFF;
PARTLINE(普通机构操盘线<0,普通机构操盘线),LINETHICK2,colorFFFF00;
标准:0,CIRCLEDOT,colorFFFFFF;
时间:=DATE>960101;
止损中线:=STKINDI('1A0001','RDW.m',0,7)*MA3/MA5;
A:="1A0001$CLOSE"=LLV("1A0001$CLOSE",30) AND "1A0001$CLOSE"<止损中线 AND "1A0001$CLOSE"<"1A0001$OPEN";
M:=IF(A,"1A0001$CLOSE"*1.0557,0);
N:=REF(M,BARSLAST(M));
Z:=CROSS("1A0001$CLOSE",N);
Q0:Z AND COUNT(Z,BARSLAST(A))=1 AND "1A0001$VOL">MA("1A0001$VOL",20) AND "1A0001$HIGH">REF("1A0001$HIGH",1) AND "399001$HIGH">REF("399001$HIGH",1) OR "1A0001$CLOSE">REF("1A0001$CLOSE",1)*1.07 AND "1A0001$OPEN"<止损中线 OR Z AND COUNT(Z,BARSLAST(A))=1 AND "1A0001$VOL">MA("1A0001$VOL",10) AND REF("1A0001$VOL",1)>"1A0001$VOL"*0.9 AND "1A0001$HIGH">REF("1A0001$HIGH",1) AND "399001$HIGH">REF("399001$HIGH",1),LINETHICK0;
DRAWICON(Q0 AND 时间 AND MA3=MA5,25,1),ALIGN0;
DRAWTEXT(Q0 AND 时间 AND MA3=MA5,50,'牛股基因'),ALIGN0,colorFF;

注：3-机构研判缺引用！