文华鳄鱼分形指标.docx

/混沌分形 主图TMP:=OPEN-CLOSE;DRAWLINE(TMP0.0001,HIGH,TMP0.0001,OPEN,COLORCYAN);DRAWLINE(TMP0.0001,LOW,TMP0.0001,CLOSE,COLORCYAN);DRAWLINE(TMP-0.0001,HIGH,TMP-0.0001,CLOSE,COLORRED);DRAWLINE(TMP-0.0001CLOSE,LOW,TMP-0.0001,OPEN,COLORRED);DRAWLINE(ABS(TMP)0.0001,LOW,ABS(TMP)0.0001,OPEN,COLORWHITE);DRAWLINE(ABS(TMP)0.0001,HIGH,ABS(TMP)0,OPEN,CLOSE,COLORCYAN,0);STICKLINE(TMP=REFX(HIGH,1) & HIGH=REFX(HIGH,2) & HIGH=HHV(HIGH,3);VAR2:=LOW=REFX(LOW,1) & LOWHIGH AND REF(HIGH,1)Jaw;BBUY:REF(REF(HIGH,1),BARSLAST(P1),COLORWHITE;STICKLINE(CROSS(HIGH,BBUY) AND LOWBBUY,(HIGH+LOW)/2,(HIGH+LOW)/2,COLORWHITE,0);STICKLINE(CROSS(HIGH,BBUY) AND LOW=BBUY,BBUY,BBUY,COLORWHITE,0);P2:=REF(LOW,1)LOW AND REF(LOW,1)Jaw;BSELL:REF(REF(LOW,1),BARSLAST(P2),COLORMAGENTA;STICKLINE(CROSS(BSELL,LOW) AND HIGH=BSELL,BSELL,BSELL,COLORMAGENTA,0);ho:=HIGHREF(HIGH,1) AND HIGHREF(HIGH,2) AND HIGH=REFX(HIGH,1) AND IFELSE(HIGH=REFX(HIGH,2),HIGHREFX(HIGH,3),HIGHREFX(HIGH,2);fxh:=CROSS(ho,0.9);hh:=REF(HIGH,BARSLAST(fxh);lo:=LOWREF(LOW,1) AND LOWREF(LOW,2) AND LOW=REFX(LOW,1) AND IFELSE(LOW=REFX(LOW,2),LOWREFX(LOW,3),LOWac1,20,ac+20,8,0),colorRED;/STICKLINE(ACao1,0,ao,8,0),colorRED;/STICKLINE(Aoac1 AND AOao1,HIGH,LOW,COLORRED,0);m:=IFELSE(CLOSEOPEN,0,1);STICKLINE(ACac1 AND AOao1 AND CLOSEac1 AND AOao1 AND CLOSEOPEN,CLOSE,OPEN,colorred,0);STICKLINE(ACac1 AND AOao1 OR ACao1,HIGH,LOW,COLORLIGHTGREY,0);STICKLINE(ACac1 AND AOao1 OR ACao1) AND CLOSEOPEN,CLOSE,OPEN,COLORLIGHTGREY,0);STICKLINE(ACac1 AND AOao1 OR ACao1) AND CLOSEOPEN,CLOSE,OPEN,COLORLIGHTGREY,1);STICKLINE(ACac1 AND AOao1,HIGH,LOW,COLORGREEN,0);STICKLINE(ACac1 AND AOOPEN,CLOSE,OPEN,COLORGREEN,0);STICKLINE(ACac1 AND AOao1 AND CLOSEOPEN,CLOSE,OPEN,COLORGREEN,1);R1:=REF(SMA(Y,8,1),5);R2:=IFELSE(CR1,0,R1);/=AO及AC方向=DRAWTEXT(ISLASTBAR AND AOREF(AO,1) AND ACREF(AC,1),1.0004*R1,);DRAWTEXT(ISLASTBAR AND AOREF(AO,1) AND ACREF(AO,1) AND ACREF(AC,1),1.0004*R1,);DRAWTEXT(ISLASTBAR AND AOREF(AC,1),1.0004*R1,);文华财经用AC指标（副图）/ Chaos Accelerator/Decelerator Oscillator / Measures acceleration -AC/ Plot AS histogram Y:=(HIGH+LOW)/2;AC:=MA(Y,5)-MA(Y,34)-MA(MA(Y,5)-MA(Y,34),5);/Put in the same window AND plot greenACGreen:IFELSE(ACREF( AC,1) ,AC,0 ),COLORRED;STICKLINE(ACREF(AC,1),0,AC,COLORGREEN,1);/Put in its on window AS a histogram AND plot redACRed:IFELSE(ACREF(AC,1),0,AC,COLORRED,1);ac1:=REF(AC,1);buy1:=REF(AC,3)REF(ac1,3) AND REF(AC,2)REF(ac1,2) AND REF(AC,2)REF(ac1,1) AND ACac1 AND COUNT(AC0,4)=4;/ REF(AC,3)0 AND REF(AC,1)0 AND REF(AC,2)0 AND AC0;/DRAWICON(buy1,AC,4);DRAWTEXT(buy1,AC, B),COLORWHITE;buy2:=COUNT(AC0,4)=4 AND REF(AC,3)ac1,3)=3;/DRAWICON(buy2,AC,4);DRAWTEXT(buy2,AC, B),COLORWHITE;buy3:=REF(AC,3)REF(ac1,3) AND REF(AC,2)REF(ac1,2) AND REF(AC,2)ac1,2)=2 AND REF(AC,1)0;/DRAWICON(buy3,AC,4);DRAWTEXT(buy3,AC, B),COLORWHITE;buy4:=REF(AC,4)REF(ac1,4) AND REF(AC,3)REF(ac1,3) AND REF(AC,3)ac1,3)=3 AND REF(AC,1)0;/DRAWICON(buy4,AC,4) ALIGN0;DRAWTEXT(buy4,AC, B),COLORWHITE;s1:=REF(AC,3)REF(ac1,3) AND REF(AC,2)REF(ac1,2) AND REF(AC,2)REF(AC,3) AND REF(AC,1)REF(ac1,1) AND ACac1 AND COUNT(AC0,4)=4;/ REF(AC,3)0 AND REF(AC,1)0 AND REF(AC,2)0 AND AC0,4)=4 AND REF(AC,3)REF(ac1,3) AND COUNT(ACREF(ac1,3) AND REF(AC,2)REF(ac1,2) AND REF(AC,2)REF(AC,3) AND COUNT(AC0 AND ACREF(ac1,4) AND REF(AC,3)REF(ac1,3) AND REF(AC,3)REF(AC,4) AND COUNT(AC0 AND ACREF(AO,1),AO,0),COLORRED;STICKLINE(AO=REF(AO,1),0,AO,COLORRED,1);AORed:IFELSE(AOREF( AO,1),AO,0),COLORGREEN;STICKLINE(AOREF(AO,1),0,AO,COLORGREEN,1);SignalLine:MA(AO,5),COLORBLUE;s1:=CROSS(0,AO);/DRAWICON(s1,AO,5),ALIGN0; /文华此函数绘图不佳DRAWTEXT(s1,AO,S),COLORWHITE;/-以上是下穿0信号;s2:=AOREF(AO,2) AND AO0,ao,lu2,0);/DRAWICON(s2,AO,5),ALIGN0;DRAWTEXT(s2,AO,S),COLORWHITE;/-以上碟型卖出信号;scount:=BARSLAST(AO0后到现在的周期数;/DRAWNUMBER(10,ao-0.1,scount,0);sd:=HHV(AO,scount);/求上面周期的最大ao;scountd:=HHVBARS(AO,scount);/求最大值到现在的周期数;/DRAWNUMBER(10,ao-0.3,scountd,0);s3:=AO0 AND REF(AO,1)REF(AO,2) AND AO0,ao-0.5,s31,0);/DRAWICON(s31=2 AND s3,AO,5),ALIGN0;DRAWTEXT(s31=2 AND s3,AO,S),COLORWHITE;/-以上是双峰卖出信号;b1:=CROSS(AO,0);/DRAWICON(b1,AO,4),ALIGN0;DRAWTEXT(b1,AO,B),COLORWHITE;/-以上是上穿0信号;b2:=AO0 AND REF(AO,1)REF(AO,1) ;/DRAWNUMBER(10,AO,lu2,0);/DRAWICON(b2,AO,4),ALIGN0;DRAWTEXT(b2,AO,B),COLORWHITE;/-以上碟型买入信号;bcount:=BARSLAST(AO0);/上一次ao0后到现在的周期数;/DRAWNUMBER(10,ao-0.1,bcount,0);bd:=LLV(AO,bcount);/求上面周期的最小ao;bcountd:=LLVBARS(AO,bcount);/求最小值到现在的周