大智慧古道西风主图指标

源码

a1:=ema((ema(c,1)+ema(c,3)+ema(c,5))/3,3);
a2:=ema((ema(c,3)+ema(c,5)+ema( c,7))/3,3);
a3:=ema((ema(c,5)+ema(c,7)+ema( c,9))/3,3);
a4:=ema((ema(c,7)+ema(c,9)+ema( c,11))/3,3);
a5:=ema((ema(c,9)+ema(c,11)+ema( c,13))/3,3);
a6:=ema((ema(c,11)+ema(c,13)+ema( c,15))/3,3);
a7:=ema((ema(c,13)+ema(c,15)+ema( c,17))/3,3);
a8:=ema((ema(c,15)+ema(c,17)+ema( c,19))/3,3);
a9:=ema((ema(c,17)+ema(c,19)+ema( c,21))/3,3);
a10:=ema((ema(c,19)+ema(c,21)+ema( c,23))/3,3);
a11:=ema((ema(c,21)+ema(c,23)+ema( c,25))/3,3);
A:=ema((ema(c,29)+ema(c,31)+ema(c,33))/3,3);
a15:=a-(a1-a*0.997);
a16:=a-(a2-a);
a17:=a-(a3-a);
a18:=a-(a4-a);
a19:=a-(a5-a);
a20:=a-(a6-a);
a21:=a-(a7-a);
a22:=a-(a8-a);
a23:=a-(a9-a);
a24:=a-(a10-a);
a25:=a-(a11-a*0.997);
RANGE(A,A23,A23<A),color4D635A;
RANGE(A,A23,A23>A),color4D635A;
IF(a15>A1,A1,A15),colorFF1010;
IF(a16>A2,A2,A16),colorFF2010;
IF(a17>A3,A3,A17),colorFF3010;
IF(a18>A4,A4,A18),colorFF4010;
IF(a19>A5,A5,A19),colorFF5010;
IF(a20>A6,A6,A20),colorFF6010;
IF(a21>A7,A7,A21),colorFF7010;
IF(a22>A8,A8,A22),colorFF8010;
IF(a23>A9,A9,A23),colorFF9010;
IF(a24>A10,A10,A24),colorFFc010;
IF(a25>A11,A11,A25),colorFFe010;

IF(a1<A25,A25,A1),color1010FF;
IF(a2<A24,A24,A2),color1020FF;
IF(a3<A23,A23,A3),color1030FF;
IF(a4<A22,A22,A4),color1040FF;
IF(a5<A21,A21,A5),color1050FF;
IF(a6<A20,A20,A6),color1060FF;
IF(a7<A19,A19,A7),color1070FF;
IF(a8<A18,A18,A8),color1080FF;
IF(a9<A17,A17,A9),color1090FF;
IF(a10<A16,A16,A10),color10c0FF;
IF(a11<A15,A15,A11),color10e0FF;
aQ:=(3*c+l+o+h)/6;
中轴:ma(c,21),colorffcc33;
压力:中轴 + 2*STD(c,21),COLORRED,linethick2;
支撑:中轴 - 2*STD(c,21),COLORRED,linethick2;
DRAWTEXT(c>=ma(c,20) ,ma(c,20) ,'·' ),Color0000FF;
DRAWTEXT(c<ma(c,20) ,ma(c,20) ,'·' ),Color00FF00;
DRAWTEXT(c>=ma(c,20) ,ma(c,20) ,'◎' ),Color0000FF;
DRAWTEXT(c<ma(c,20) ,ma(c,20) ,'◎' ),Color00FF00;
FD:=(h-l)/3;
OPEN1:=o>FD*2+l;
OPEN3:=o<FD+l;
OPEN2:=not(OPEN1 OR OPEN3);
CLOSE1:=c>FD*2+l;
CLOSE3:=c<FD+l;
CLOSE2:=not(CLOSE1 OR CLOSE3);
DFZD:=CLOSE1 OR (OPEN3 AND CLOSE2);
WQS1:=OPEN2 AND CLOSE2;
KFZD:=not(DFZD OR WQS1);
ZD:=(h+l)/2;
QSXS:=ZD>REF(h,1);
QSXX:=ZD<REF(l,1);
WQS2:=not(QSXS OR QSXX);
ZTDL:=v>REF(v,1)*1.1 OR v>REF(v,1)*1.5;
FTDL:=v<REF(v,1)*0.7 OR v<REF(v,1)*0.5;
ZTDL2:=ZTDL AND FTDL<1;
FTDL2:=FTDL AND ZTDL<1;
MFI1:=(h-l)/(v/10000);
MFI2:=(h-l)/(v/1000000);
ZMFI1:=MFI1>REF(MFI1,1);
ZMFI2:=MFI2>REF(MFI2,1);
ZMFI:=ZMFI1 OR ZMFI2;
FMFI:=not(ZMFI);
LD:=ZTDL2 AND ZMFI;
ST:=FTDL2 AND FMFI;
WZ:=FTDL2 AND ZMFI;
QF:=ZTDL2 AND FMFI;
AA1:=REF(h,2);
AA2:=FILTER(hhv(h,5)=AA1,2);
AA3:=BACKSET(AA2,3);
AA4:=if(FILTER(A3,2),h,0);
AA5:=SUM(AA4,3);
C1:=REF(l,2);
C2:=FILTER(llv(l,5)=C1,2);
C3:=BACKSET(C2,3);
C4:=if(FILTER(C3,2),l,0);
C5:=SUM(C4,3);
XHWZ1:=h*1.003;
XHWZ2:=l*0.998;
XHWZ3:=if(QSXX,XHWZ2,if(QSXS,XHWZ1,if(DFZD,XHWZ1,XHWZ2)));
XHWZ4:=if(ZD<REF(ZD,1),XHWZ2,XHWZ1);
S1:=DFZD AND QSXS ;
S2:=KFZD AND QSXX ;
S3:=DFZD AND QSXX;
S4:=KFZD AND QSXS;
S5:=DFZD AND WQS2;
S6:=KFZD AND WQS2;
S7:=WQS1 AND (QSXS OR QSXX OR WQS2);
STICKLINE(1,l,h,0.5,0 ),COLOR00FFFF;
STICKLINE(S2 ,c ,o,7,0 ),COLORFF2020;
STICKLINE(S1,c,o,7 ,0 ),COLOR2020FF;
STICKLINE(S3,c,o,7,0),COLORYELLOW;
STICKLINE(S4,c,o,7,0),COLORFFCC66;
STICKLINE(S5,c,o,7,0),COLORFF00FF;
STICKLINE(S6,c,o,7,0),COLOR00FF00;
STICKLINE(S7,c,o,7,0),COLORGRAY;
STICKLINE(1,c,o,2,0),COLORWHITE;
STICKLINE(LD,XHWZ3,XHWZ3*0.999,3,0),COLOR00FF00;
STICKLINE(ST,XHWZ3,XHWZ3*0.999,3,0),COLORFF00FF;
STICKLINE(WZ,XHWZ3,XHWZ3*0.999,3,0),COLORYELLOW;
STICKLINE(QF,XHWZ3,XHWZ3*0.999,3,0),COLORRED;
STICKLINE(AA5>0.1,AA5,AA5*1.0001,5,0),COLORFF00FF;
STICKLINE(C5>0.1,C5,C5*1.0001,5,0),COLOR00FF00;