源码如下：
{10七彩彩虹}{副图}
VAR0:=IF((DATE<=1090418),1,0);
AMV0:=((VOL)*(OPEN+CLOSE))/(2);
生死符:=((SUM(AMV0,88))/(SUM(VOL,88)))*(VAR0);
阴阳决:=(MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1)))*(VAR0);
祥云:=(HHV(MA(HIGH,13),13))*(VAR0);
飞龙:=(LLV(MA(HIGH,13),1))*(VAR0);
YT1:=(EMA(CLOSE,8))*(VAR0);
YT2:=(EMA(YT1,20))*(VAR0);
倚天剑1:=CROSS(YT1,YT2);
倚天1:=(CLOSE>(飞龙)*(0.95)) AND 倚天剑1 AND (CLOSE>(生死符)*(0.92));
倚天2:=((CLOSE+HIGH)*(0.505)>祥云) AND (COUNT(倚天1,5)>=1) AND ((REF(祥云,1)-祥云)/(CLOSE)<0.02) AND ((祥云-飞龙)/(CLOSE)<0.08) AND ((OPEN+CLOSE)/(2)<(祥云)*(1.08));
倚天剑B:=(COUNT(REF(倚天2,1),5)=0) AND 倚天2;
TL1:=(EMA(CLOSE,5))*(VAR0);
TL2:=(EMA(TL1,15))*(VAR0);
屠龙刀2:=CROSS(TL1,TL2);
屠龙1:=(CLOSE>(飞龙)*(0.95)) AND 屠龙刀2 AND (CLOSE>(生死符)*(0.92));
屠龙2:=((CLOSE+HIGH)*(0.505)>祥云) AND (COUNT(屠龙1,5)>=1) AND ((REF(祥云,1)-祥云)/(CLOSE)<0.02) AND ((祥云-飞龙)/(CLOSE)<0.08) AND ((OPEN+CLOSE)/(2)<(祥云)*(1.08));
屠龙刀B:=(COUNT(REF(屠龙2,1),5)=0) AND 屠龙2;
MA5:=(VAR0)*(MA(CLOSE,5));
MA10:=(VAR0)*(MA(CLOSE,10));
MA20:=(VAR0)*(MA(CLOSE,20));
MA30:=(VAR0)*(MA(CLOSE,30));
MA60:=(VAR0)*(MA(CLOSE,60));
MA90:=(VAR0)*(MA(CLOSE,90));
MA120:=(VAR0)*(MA(CLOSE,120));
MG1:=CROSS(MA5,MA20) AND CROSS(MA5,MA30) AND CROSS(MA5,MA60);
MG2:=(MA60>MA10) AND CROSS(MA10,(VAR0)*(MA30)) AND (MA30>MA20) AND ((ABS(MA60-MA20))/(MA20)<0.05);
MG3:=(MA30>MA5) AND CROSS(MA5,MA20) AND (MA20>MA10);
MG4:=(ABS(MA5-MA10+MA10-MA20+MA20-MA30)<0.02) AND (MA5>REF(MA5,1)) AND (MA10>REF(MA10,1));
MG5:=(MA20>MA5) AND CROSS(MA5,MA10) AND (MA10>MA60) AND ((ABS(MA20-MA60))/(MA60)<0.05);
MG6:=((((MG1 or MG2) or MG3) or MG4) or MG5);
玫瑰刺3:=MG6 AND FILTER(MG6,8);
玫瑰1:=(CLOSE>(飞龙)*(0.95)) AND 玫瑰刺3 AND (CLOSE>(生死符)*(0.92));
玫瑰2:=((CLOSE+HIGH)*(0.505)>祥云) AND (COUNT(玫瑰1,5)>=1) AND ((REF(祥云,1)-祥云)/(CLOSE)<0.02) AND ((祥云-飞龙)/(CLOSE)<0.08) AND ((OPEN+CLOSE)/(2)<(祥云)*(1.08));
玫瑰刺B:=(COUNT(REF(玫瑰2,1),5)=0) AND 玫瑰2;
KQ0:=((VAR0)*((3)*(CLOSE)+LOW+OPEN+HIGH))/(6);
KQ1:=((VAR0)*((20)*(KQ0)+(19)*(REF(KQ0,1))+(18)*(REF(KQ0,2))+(17)*(REF(KQ0,3))+(16)*(REF(KQ0,4))+(15)*(REF(KQ0,5))+(14)*(REF(KQ0,6))+(13)*(REF(KQ0,7))+(12)*(REF(KQ0,8))+(11)*(REF(KQ0,9))+(10)*(REF(KQ0,10))+(9)*(REF(KQ0,11))+(8)*(REF(KQ0,12))+(7)*(REF(KQ0,13))+(6)*(REF(KQ0,14))+(5)*(REF(KQ0,15))+(4)*(REF(KQ0,16))+(3)*(REF(KQ0,17))+(2)*(REF(KQ0,18))+REF(KQ0,20)))/(211);
KQ2:=(VAR0)*(EMA(KQ1,2));
KQ3:=(VAR0)*(EMA(KQ2,2));
KQ4:=(VAR0)*(EMA(KQ3,2));
孔雀翎4:=CROSS(KQ1,KQ4);
孔雀1:=(CLOSE>(飞龙)*(0.95)) AND 孔雀翎4 AND (CLOSE>(生死符)*(0.92));
孔雀2:=((CLOSE+HIGH)*(0.505)>祥云) AND (COUNT(孔雀1,5)>=1) AND ((REF(祥云,1)-祥云)/(CLOSE)<0.02) AND ((祥云-飞龙)/(CLOSE)<0.08) AND ((OPEN+CLOSE)/(2)<(祥云)*(1.08));
孔雀翎B:=(COUNT(REF(孔雀2,1),5)=0) AND 孔雀2;
FH1:=(EMA(CLOSE,5))*(VAR0);
FH2:=(EMA((EMA(CLOSE,29))*(1.01),10))*(VAR0);
风火轮5:=CROSS(FH1,FH2);
风火1:=(CLOSE>(飞龙)*(0.95)) AND 风火轮5 AND (CLOSE>(生死符)*(0.92));
风火2:=((CLOSE+HIGH)*(0.505)>祥云) AND (COUNT(风火1,5)>=1) AND ((REF(祥云,1)-祥云)/(CLOSE)<0.02) AND ((祥云-飞龙)/(CLOSE)<0.08) AND ((OPEN+CLOSE)/(2)<(祥云)*(1.08));
风火轮B:=(COUNT(REF(风火2,1),5)=0) AND 风火2;
HT1:=((VAR0)*(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24)))/(4);
HT2:=(VAR0)*(MA(HT1,5));
HT3:=(VAR0)*(MA(HT1,10));
混天绫6:=CROSS(HT1,HT2) AND (HT2<HT3);
混天1:=(CLOSE>(飞龙)*(0.95)) AND 混天绫6 AND (CLOSE>(生死符)*(0.92));
混天2:=((CLOSE+HIGH)*(0.505)>祥云) AND (COUNT(混天1,5)>=1) AND ((REF(祥云,1)-祥云)/(CLOSE)<0.02) AND ((祥云-飞龙)/(CLOSE)<0.08) AND ((OPEN+CLOSE)/(2)<(祥云)*(1.08));
混天绫B:=(COUNT(REF(混天2,1),5)=0) AND 混天2;
霸王枪7:=(CLOSE>OPEN) AND (HIGH>祥云) AND (OPEN<祥云) AND ((HIGH-REF(CLOSE,1))/(REF(CLOSE,1))>0.06);
基色:(VAR0)*(IF(倚天剑B,1,0)+IF(屠龙刀B,1,0)+IF(玫瑰刺B,1,0)+IF(孔雀翎B,1,0)+IF(风火轮B,1,0)+IF(混天绫B,1,0)+(IF(霸王枪7,1,0))*(3)),CoLorFFFFFF;
STICKLINE(倚天剑1,0,1,4,0),CoLorC0C0C0;
STICKLINE(倚天剑B,0,1,7,0),CoLor00FF00;
倚天剑:(1)*(VAR0),CoLor00FF00;
STICKLINE(屠龙刀2,1,2,4,0),CoLorC0C0C0;
STICKLINE(屠龙刀B,1,2,7,0),CoLorFFFF00;
屠龙刀:(2)*(VAR0),CoLorFFFF00;
STICKLINE(玫瑰刺3,2,3,4,0),CoLorC0C0C0;
STICKLINE(玫瑰刺B,2,3,7,0),CoLorFF00FF;
玫瑰刺:(3)*(VAR0),CoLorFF00FF;
STICKLINE(孔雀翎4,3,4,4,0),CoLorC0C0C0;
STICKLINE(孔雀翎B,3,4,7,0),CoLorB0B0FF;
孔雀翎:(4)*(VAR0),CoLorB0B0FF;
STICKLINE(风火轮5,4,5,4,0),CoLorC0C0C0;
STICKLINE(风火轮B,4,5,7,0),CoLor00FFFF;
风火轮:(5)*(VAR0),CoLor00FFFF;
STICKLINE(混天绫6,5,6,4,0),CoLorC0C0C0;
STICKLINE(混天绫B,5,6,7,0),CoLorFFAA00;
混天绫:(6)*(VAR0),CoLorFFAA00;
STICKLINE(霸王枪7,6,9,7,0),CoLor0000FF;
霸王枪:(9)*(VAR0),CoLor0000FF;
{------------------ ------------------}
|
|
|
|
|
【