飞弧战无不胜系列指标
文章出处: 发布时间:2006-08-01
是源码?
--------------------------------------------------------------------------------
liudetao
ddddddddddddd
--------------------------------------------------------------------------------
kuaihuolin
谢谢楼主 ,下载拉,但打不开,请指教!
--------------------------------------------------------------------------------
zwh598
{苍狼MACD}
INPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
{短波}
短波EMA(C,N1)-EMA(C,N2))*300,LINETHICK0,COLORRED;
短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
MACD:=2*(短波-短均线);
{中波}
中波EMA(C,N3)-EMA(C,N4))*300,COLORYELLOW;
中均线:EMA(中波,M),COLORBLUE;
MACD2:2*(中波-中均线),LINETHICK1;
STICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
{绘图}
FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
FILLRGN(中波<中均线,中波,中均线),COLORBLUE;
{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
短均线,LINETHICK2,COLORCYAN;
PARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
PARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
{周金叉,死叉}
AA:="MACD.DIFF#WEEK";
BB:="MACD.DEA#WEEK";
周金叉:IF(CROSS(AA,BB),160,0),colorred;
周死叉:IF(CROSS(BB,AA),160,0), COLORBLUE;
DRAWTEXT(周金叉,160,'周金叉'), ALIGN,colorred;
DRAWTEXT(周死叉,160,'周死叉'), ALIGN, COLORBLUE;
{月金叉,死叉}
CC:="MACD.DIFF#MONTH";
DD:="MACD.DEA#MONTH";
月金叉:IF(CROSS(CC,DD),185,0), ALIGN,Color0080FF;
月死叉:IF(CROSS(DD,CC),185,0), ALIGN,Colorblue;
DRAWTEXT(月金叉,185, '月金叉'),ALIGN,COLORyellow;
DRAWTEXT(月死叉,185,'月死叉'),ALIGN,COLORBLUE;
{选股}
EE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
出来:FILTER(EE,10);
DRAWICON(出来,中均线,1);
天难绝(飞狐源码)
日:=EMA(CLOSE,7) ;
周:=EMA(日,21);
年:=EMA(CLOSE,240) ;
STICKLINE((日 > 周),日,周,10,0),,colorCCCCFF;
STICKLINE((日 < 周),日,周,10,0),,colorFF0000;
A:=AMOUNT / (100 * VOL);
【5】:MA(A,6),colorFFFF;
MA(A,13);
MA(A,34),colorFF;
MA(A,55),colorFF00;
B:=COST(6) * (1 + 1 / 100);
DRAWTEXT(CROSS(【5】,B),【5】,'<==发财机会'),,colorFFFF;
DRAWTEXT(CROSS(日,周),周,'<==追'),,colorFF;
STICKLINE(OPEN >= CLOSE,CLOSE,OPEN,7,0),,colorFF3333;
STICKLINE(OPEN >= CLOSE,CLOSE,OPEN,4,0),,colorFF3333;
STICKLINE(OPEN >= CLOSE,CLOSE,OPEN,4,0),,colorFFFF00;
STICKLINE(CLOSE > OPEN,CLOSE,OPEN,7,0),,color6666FF;
STICKLINE(CLOSE > OPEN,CLOSE,OPEN,4,0),,color6666FF;
STICKLINE(CLOSE > OPEN,CLOSE,OPEN,4,0),,colorFFFF;
STICKLINE(CLOSE > OPEN,OPEN,LOW,0.5,0),,colorCCFF;
STICKLINE(CLOSE > OPEN,CLOSE,HIGH,0.5,0),,colorCCFF;
STICKLINE(OPEN >= CLOSE,CLOSE,LOW,0.5,0),,colorFFFF66;
STICKLINE(OPEN >= CLOSE,OPEN,HIGH,0.5,0),,colorFFFF66;
STICKLINE(CLOSE = OPEN AND CLOSE > REF(CLOSE,1),CLOSE,OPEN,10,0),;
STICKLINE(CLOSE = OPEN AND CLOSE > REF(CLOSE,1),CLOSE,HIGH,0.5,0),;
STICKLINE(CLOSE = OPEN AND CLOSE > REF(CLOSE,1),OPEN,LOW,0.5,0),;
VARB1:=(EMA(CLOSE,3) - EMA(CLOSE,6)) - (EMA(CLOSE,8) - EMA(CLOSE,12)) * (- 100);
VARB2:=EMA(VARB1,3);
VARB3:=(EMA(CLOSE,3) - EMA(CLOSE,6)) - (EMA(CLOSE,24) - EMA(CLOSE,36)) * (- 100);
VARB4:=EMA(VARB3,9);
VARB5:=CROSS(VARB1,VARB2);
VARB6:=CROSS(VARB2,VARB1);
C:STICKLINE(VARB6,OPEN,CLOSE,7,0),,colorFFFFFF;
D:STICKLINE(VARB5,OPEN,CLOSE,7,0),,colorFF00;
E:STICKLINE(VARB5,OPEN,CLOSE - (CLOSE - OPEN) * 0.33,7,0),,colorFF;
VARB5A:=CROSS(VARB3,VARB4);
VARB6A:=CROSS(VARB4,VARB3);
F:STICKLINE(VARB6A,OPEN,CLOSE,10,1),,colorFFFFFF;
G:STICKLINE(VARB5A,OPEN,CLOSE,10,1),,colorFF00;
K:STICKLINE(VARB5A,OPEN,CLOSE - (CLOSE - OPEN) * 0.33,10,1),,colorFF;
DRAWTEXT(FILTER((EMA(CLOSE,55) - EMA(CLOSE,13)) > 0 AND EMA(CLOSE,12) / LOW > 1.15,5),LOW,'<@\n重现股市'),,colorFFFFFF;
DRAWTEXT(FILTER((EMA(CLOSE,13) - EMA(CLOSE,62)) > 0 AND HIGH / EMA(CLOSE,12) > 1.15,5),HIGH,'<=减仓\n时机'),,colorFFFF;
--------------------------------------------------------------------------------
fxw
飞弧战无不胜系列指标