- 金币:
-
- 奖励:
-
- 热心:
-
- 注册时间:
- 2003-12-8
|
|
楼主 |
发表于 2004-10-12 15:46
|
显示全部楼层
Chaos Fractal and Chaos Alligator Oscillator for FXJ
和飞弧对过,一样的。Fractal 公式部分是网上公式抽出的,我没有核定!
Y:=(H+L)/2;
BLUE:=SMA(Y,13,1);
RED:=SMA(Y,8,1);
GREEN:=SMA(Y,5,1);
JAW:BLUE,COLORBLUE,MOVE8;
TEETH:RED,COLORRED,MOVE5;
LIP:GREEN,COLORGREEN,MOVE3;
KU1:=IF(H=HHV(H,3),1,0);
KD1:=IF(L=LLV(L,3),1,0);
UL:=IF(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0,REF(H,2),REF(H,2+BARSLAST(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0)));
DL:=IF(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0,REF(L,2),REF(L,2+BARSLAST(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0)));
KU:=IF(C>JAW AND C>TEETH AND C>LIP,1,0);
KD:=IF(C<JAW AND C<TEETH AND C<LIP,-1,0);
KK:=IF(BARSLAST(KU=1 AND REF(KU,1)=0)<BARSLAST(KD=-1 AND REF(KD,1)=0),1,-1);
Uplevel:IF(H>=TEETH,UL,REF(UL,BARSLAST(H>TEETH))),COLORMAGENTA,linethick0;
Lowlevel:IF(L<=TEETH,DL,REF(DL,BARSLAST(L<=TEETH))),COLORCYAN,linethick0;
STICKLINE(BARSLAST(ABS(Uplevel-REF(Uplevel,1)))<BARSLAST(c>Uplevel AND REF(c,1)<REF(Uplevel,1)),Uplevel,Uplevel,3,1),COLORMAGENTA;
STICKLINE(BARSLAST(ABS(Lowlevel-REF(Lowlevel,1)))<BARSLAST(c<Lowlevel AND REF(c,1)>REF(Lowlevel,1)),Lowlevel,Lowlevel,3,1),COLORCYAN; |
-
|
|