以下是鳄鱼线 AO AC源码,另加MFI视窗(无源码的请下载附件导入)
鳄鱼-线★
Y:=(H+L)/2;
AA:=REF(SMA(Y,5,1),3);
BB:=REF(SMA(Y,8,1),5);
CC:=REF(SMA(Y,13,1),8);
鳄:CC,COLORFF6600;
齿:BB,COLORRED;
唇:AA,COLORGREEN;
R2:=REF(齿,5);
KU1:=IF(HIGH=HHV(HIGH,3),1,0);
KD1:=IF(LOW=LLV(LOW,3),1,0);
UL:=IF(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0,REF(HIGH,2),REF(HIGH,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(LOW,2),REF(LOW,2+BARSLAST(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0)));
上分形:IF(HIGH>=R2,UL,REF(UL,BARSLAST(HIGH>R2))),POINTDOT,LINETHICK3,COLORMAGENTA;
下分形:IF(LOW<=R2,DL,REF(DL,BARSLAST(LOW<=R2))),POINTDOT,LINETHICK3,COLORYELLOW;
DRAWICON(CLOSE>上分形 AND REF(CLOSE,1)<REF(上分形,1),HIGH*1.03,1);
DRAWICON(CLOSE<下分形 AND REF(CLOSE,1)>REF(下分形,1),LOW*0.99,2);
AO:=MA(Y,5)-MA(Y,34);
MAO:=MA(AO,5);
AC:=AO-MAO;
AC1:=REF(AC,1);
AO1:=REF(AO,1);
KAC:=IF(AC>AC1 AND AO>AO1,1,0);
KAO:=IF(AC<AC1 AND AO<AO1,-1,0);
STICKLINE(KAC=1 AND CLOSE>=OPEN,OPEN,CLOSE,3,1),COLORRED;
STICKLINE(KAO=-1 AND CLOSE>=OPEN,OPEN,CLOSE,3,1),COLORGREEN;
STICKLINE(KAO=0 AND KAC=0 AND CLOSE>=OPEN,OPEN,CLOSE,3,1),COLORDDDDDD;
STICKLINE(CLOSE>=OPEN,HIGH,CLOSE,0.1,0),COLORRED;
STICKLINE(CLOSE>=OPEN,OPEN,LOW,0.1,0),COLORRED;
STICKLINE(KAC=1 AND CLOSE<OPEN,OPEN,CLOSE,3,0),COLORRED;
STICKLINE(KAO=-1 AND CLOSE<OPEN,OPEN,CLOSE,3,0),COLORGREEN;
STICKLINE(KAO=0 AND KAC=0 AND CLOSE<OPEN,OPEN,CLOSE,3,0),COLORDDDDDD;
VAR1:=(HIGH+LOW)/2;
AO动量:MA(VAR1,5)-MA(VAR1,34),LINETHICK0;
STICKLINE(AO动量>=REF(AO动量,1),0,AO动量,2.2,1),COLORRED;
STICKLINE(AO动量<REF(AO动量,1),0,AO动量,2.2,1),COLORGREEN;
AO5:MA(AO动量,5),COLORFF6600;
S1:=CROSS(0,AO动量);
DRAWTEXT(S1,AO动量,'S'),COLORWHITE;
DRAWICON(S1,AO动量,2);
S2:=AO动量<0 AND REF(AO动量,1)>REF(AO动量,2) AND AO动量<REF(AO动量,1);
DRAWTEXT(S2,AO动量,'S'),COLORWHITE;
DRAWICON(S2,AO动量,2);
SCOUNT:=BARSLAST(AO动量<0);
SD:=HHV(AO动量,SCOUNT);
SCOUNTD:=HHVBARS(AO动量,SCOUNT);
S3:=AO动量>0 AND REF(AO动量,1)>REF(AO动量,2) AND AO动量<REF(AO动量,1);
S31:=COUNT(S3,SCOUNTD);
DRAWTEXT(S31>=2 AND S3,AO动量,'S'),COLORWHITE;
DRAWICON(S31>=2 AND S3,AO动量,2);
B1:=CROSS(AO动量,0);
DRAWTEXT(B1,AO动量,'B'),COLORWHITE;
DRAWICON(B1,AO动量,1);
B2:=AO动量>0 AND REF(AO动量,1)<REF(AO动量,2) AND AO动量>REF(AO动量,1);
DRAWTEXT(B2,AO动量,'B'),COLORWHITE;
DRAWICON(B2,AO动量,1);
BCOUNT:=BARSLAST(AO动量>0);
BD:=LLV(AO动量,BCOUNT);
BCOUNTD:=LLVBARS(AO动量,BCOUNT);
B3:=AO动量<0 AND REF(AO动量,1)<REF(AO动量,2) AND AO动量>REF(AO动量,1);
B31:=COUNT(B3,BCOUNTD);
DRAWTEXT(B31>=2 AND B3,AO动量,'B'),COLORWHITE;
DRAWICON(B31>=2 AND B3,AO动量,1);
AO2:=MA((HIGH+LOW)/2,5)-MA((HIGH+LOW)/2,34);
AO5_2:=MA(AO2,5);
AC加速:AO2-AO5_2,LINETHICK0;
STICKLINE(AC加速>=REF(AC加速,1),0,AC加速,2.2,1),COLORRED;
STICKLINE(AC加速<REF(AC加速,1),0,AC加速,2.2,1),COLORGREEN;
AC1_2:=REF(AC加速,1);
aY12341:=REF(AC加速,3)<REF(AC1_2,3) AND REF(AC加速,2)<REF(AC1_2,2) AND REF(AC加速,2)<REF(AC加速,3) AND REF(AC加速,1)>REF(AC1_2,1) AND AC加速>AC1_2 AND COUNT(AC加速>0,4)=4;
DRAWTEXT(aY12341,AC加速,'B'),COLORWHITE;
DRAWICON(aY12341,AC加速,1);
aY12342:=COUNT(AC加速<0,4)=4 AND REF(AC加速,3)<REF(AC1_2,3) AND COUNT(AC加速>AC1_2,3)=3;
DRAWTEXT(aY12342,AC加速,'B'),COLORWHITE;
DRAWICON(aY12342,AC加速,1);
aY12343:=REF(AC加速,3)<REF(AC1_2,3) AND REF(AC加速,2)<REF(AC1_2,2) AND REF(AC加速,2)<REF(AC加速,3) AND COUNT(AC加速>AC1_2,2)=2 AND REF(AC加速,1)<0 AND AC加速>0;
DRAWTEXT(aY12343,AC加速,'B'),COLORWHITE;
DRAWICON(aY12343,AC加速,1);
aY12344:=REF(AC加速,4)<REF(AC1_2,4) AND REF(AC加速,3)<REF(AC1_2,3) AND REF(AC加速,3)<REF(AC加速,4) AND COUNT(AC加速>AC1_2,3)=3 AND REF(AC加速,1)<0 AND AC加速>0;
DRAWTEXT(aY12344,AC加速,'B'),COLORWHITE;
DRAWICON(aY12344,AC加速,1);
S1_2:=REF(AC加速,3)>REF(AC1_2,3) AND REF(AC加速,2)>REF(AC1_2,2) AND REF(AC加速,2)>REF(AC加速,3) AND REF(AC加速,1)<REF(AC1_2,1) AND AC加速<AC1_2 AND COUNT(AC加速<0,4)=4;
DRAWTEXT(S1_2,AC加速,'S'),COLORWHITE;
DRAWICON(S1_2,AC加速,2);
S2_2:=COUNT(AC加速>0,4)=4 AND REF(AC加速,3)>REF(AC1_2,3) AND COUNT(AC加速<AC1_2,3)=3;
DRAWTEXT(S2_2,AC加速,'S'),COLORWHITE;
DRAWICON(S2_2,AC加速,2);
S3_2:=REF(AC加速,3)>REF(AC1_2,3) AND REF(AC加速,2)>REF(AC1_2,2) AND REF(AC加速,2)>REF(AC加速,3) AND COUNT(AC加速<AC1_2,2)=2 AND REF(AC加速,1)>0 AND AC加速<0;
DRAWICON(S3_2,AC加速,2);
MFI:(H-L)*1000000/V,STICK;
A1:=MFI>=REF(MFI,1)*1.1 AND V>=REF(V,1)*1.1;
A2:=MFI<=REF(MFI,1)*0.9 AND V<=REF(V,1)*0.9;
A3:=MFI>=REF(MFI,1)*1.1 AND V<=REF(V,1)*0.9;
A4:=MFI<=REF(MFI,1)*0.9 AND V>=REF(V,1)*1.1;
STICKLINE(A1,0,MFI,0.1,1),COLORGREEN;
STICKLINE(A2,0,MFI,0.1,1),COLORBLUE;
STICKLINE(A3,0,MFI,0.1,1),COLORBROWN;
STICKLINE(A4,0,MFI,0.1,1),COLORMAGENTA;
MA5:MA(MFI,5);
绿灯:IF(A1,MFI,DRAWNULL),STICK,COLORGREEN;
衰退:IF(A2,MFI,DRAWNULL),STICK,COLORBLUE;
伪装:IF(A3,MFI,DRAWNULL),STICK,COLORBROWN;
蛰伏:IF(A4,MFI,DRAWNULL),STICK,COLORMAGENTA;