|
GM 周MACD:'MACD.MACD#WEEK',COLORFF5300,POINTDOT,LINETHICK3,NODRAW;
周DIF:='MACD.DIF#WEEK',COLORGREEN,NODRAW;
Z1:=STICKLINE('MACD.MACD#WEEK'>=0,0,'MACD.MACD#WEEK',5,0),COLOR000055;
Z2:=STICKLINE('MACD.MACD#WEEK'<0,0,'MACD.MACD#WEEK',5,0),COLOR515100; DIF:EMA(CLOSE,12)-EMA(CLOSE,26),COLORFF00FF;
DEA:EMA(DIF,9),COLOR1ACFFF;
MACD:(DIF-DEA)*2,COLOR0000F2,COLORSTICK;
强天数:BARSLASTCOUNT(MACD>REF(MACD,1)),COLORFFFFFF,NODRAW;
弱天数:BARSLASTCOUNT(MACD<REF(MACD,1)),COLOR00FF00,NODRAW;
Z3:=STICKLINE(ISLASTBAR,周MACD,周MACD,35,1),COLORFF5300; ES:=REF(EMA(C,26),1);
EP:=REF(EMA(C,12),1);
DI:=REF(DIF,1);
DIF穿零价:((12+1)*(26-1)*ES-(26+1)*(12-1)*EP)/(2*(26+1)-2*(12+1)),NODRAW,COLORWHITE;
DIF拐点价:((12-1)*EP/(12+1)-(26-1)*ES/(26+1)-DI)*(26+1)*(12+1)/(2*(12+1)-2*(26+1)),COLORYELLOW,NODRAW;
X0:=IF(1,DIF,DRAWNULL),COLORCYAN; AA:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(AA=2,21)=1;
DRAWTEXT(二次金叉,0,' 二次金叉'),COLORYELLOW;
A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA);
底背:=DRAWLINE(A1=0,DEA,底背离,DEA,0),COLORYELLOW,LINETHICK2;
X2:=DRAWICON(底背离,0,1);
A2:=BARSLAST(REF(CROSS(DEA,DIF),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF,A2+1)>DIF AND CROSS(DEA,DIF);
顶背:=DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORGREEN,LINETHICK2;
X3:=DRAWICON(顶背离,0,2);
M1 DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
MACDD:=EMA(DIFF,9);
DEF:=2*(DIFF-MACDD),COLORSTICK;
DC:DRAWBAND(DEF,RGB(153,55,55),0,RGB(21,133,55));
K1:=BACKSET(DIFF>REF(DIFF,1),2);
强DIF:=IF(K1,DIFF,DRAWNULL),COLORRED,LINETHICK1;
K2:=BACKSET(DIFF<REF(DIFF,1),2);
弱DIF:=IF(K2,DIFF,DRAWNULL),COLORFF8B80,LINETHICK1;
K3:=BACKSET(MACDD>REF(MACDD,1),2);
强MACD:=IF(K3,MACDD,DRAWNULL),COLOR3300AA;
K4:=BACKSET(MACDD<REF(MACDD,1),2);
弱MACD:=IF(K4,MACDD,DRAWNULL),COLORFF3500;
底拐:=DRAWLINE(DIFF>=HHV(DIFF,21),DIFF,DIFF<=LLV(DIFF,21),DIFF,1),COLORWHITE,POINTDOT;
DRAWICON(强DIF>底拐 AND REF(DIFF,1)=REF(底拐,1) AND REF(DIFF,2)>REF(DIFF,1),0,1);
A1:=BARSLAST(REF(CROSS(DIFF,MACDD),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,MACDD);
UB:=DRAWLINE(A1=0,MACDD,底背离,MACDD,0),COLORYELLOW,LINETHICK1;
A2:=BARSLAST(REF(CROSS(MACDD,DIFF),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(MACDD,DIFF);
DB:=DRAWLINE(A2=0,MACDD,顶背离,MACDD,0),COLOR00FFFF,LINETHICK1;
周MACD:'MACD.MACD#WEEK',COLORFF5300,POINTDOT,LINETHICK3,NODRAW;
X:=STICKLINE(ISLASTBAR,周MACD,周MACD,35,1),COLORFF5300;
DIF:DIFF,COLORWHITE;
DEA:MACDD,COLOR00CCFF;
MACD:DEF,COLORFF00FF,COLORSTICK,NODRAW;
强天数:BARSLASTCOUNT(MACD>REF(MACD,1)),COLORFFFFFF,NODRAW;
弱天数:BARSLASTCOUNT(MACD<REF(MACD,1)),COLOR00FF00,NODRAW;
AA1:=IF(DEF>0,1,-1);
AA2:=REF(AA1,1);
AA3:=AA1*AA2;
AA4:=BARSLAST(AA3<0);
AA5:=AA4+1;
面积:=SUM(DEF,AA5)/10,COLORGREEN,NODRAW; M2 N:=14;M:=6; NEWDIF:EMA(CLOSE,9)-EMA(CLOSE,18),COLORWHITE,LINETHICK3;
NEWDEA:EMA(NEWDIF,7),LINETHICK1,COLORGREEN;
红命:IF(NEWDEA>REF(NEWDEA,1),NEWDEA,DRAWNULL),COLORRED,LINETHICK1;
绿命:=IF(NEWDEA<REF(NEWDEA,1),NEWDEA,DRAWNULL),COLORGREEN,LINETHICK1;
平均股价:(INDEXA/INDEXV)/100,COLORRED,NODRAW;{分沪深的}
X:=DRAWBAND(NEWDIF,RGB(255,10,10),NEWDEA,RGB(10,255,10));
X1:STICKLINE(NEWDIF>NEWDEA,NEWDIF,NEWDEA,0.5,-1),COLORRED;
X2:STICKLINE(NEWDIF<NEWDEA,NEWDIF,NEWDEA,0.5,-1),COLORGREEN;
顶:HHV(NEWDIF,21),COLORLIBLUE,LINETHICK1;
底:LLV(NEWDIF,21),COLORLIBLUE,LINETHICK1;
超买:IF(REF(顶,1)=REF(NEWDIF,1) AND 顶>NEWDIF,顶,DRAWNULL),COLORGREEN,POINTDOT,LINETHICK8;
超卖:IF(REF(底,1)=REF(NEWDIF,1) AND 底<NEWDIF,底*0.9999999,DRAWNULL),COLORRED,POINTDOT,LINETHICK8; {顶底信号}
N2:=3;
AA:=REF(NEWDIF,N2)=HHV(NEWDIF,2*N2+1);
BB:=BACKSET(AA,N2+1);
CCC:=FILTER(BB,N2) AND NEWDIF=HHV(NEWDIF,N2+1);
AA1:=BARSLAST(REF(CCC,1));
顶背离:=REF(CLOSE,AA1+1)<C AND REF(NEWDIF,AA1+1)>NEWDIF AND CCC;
X4:=DRAWICON(顶背离,顶,2);
AA2:=REF(NEWDIF,N2)=LLV(NEWDIF,2*N2+1);
BB2:=BACKSET(AA2,N2+1);
CC2:=FILTER(BB2,N2) AND NEWDIF=LLV(NEWDIF,N2+1);
AB2:=BARSLAST(REF(CC2,1));
底背离:=REF(CLOSE,AB2+1)>CLOSE AND REF(NEWDIF,AB2+1)<NEWDIF AND CC2;
X3:=DRAWICON(底背离,底,1); {趋势强度};
TRR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),N);
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),N);
PDI:=DMP*100/TRR,COLORFFFFFF,NODRAW;
MDI:=DMM*100/TRR,COLOR00FF00,NODRAW;
方向:PDI-MDI,COLOR00DDCC,NODRAW;
力度:EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,M),COLORFF00FF,LINETHICK1,NODRAW;
ADXR:=EXPMEMA(ADX,M),COLOR00FF00,LINETHICK1; AO CC:=(H+L)/2;
AA:=MA(CC,5);
BB:=MA(CC,34);
OSC:AA-BB,COLORSTICK,NODRAW,COLOR00FF00;
MOSC:MA(OSC,5),COLOR0000FF;
Q:IF(MOSC<REF(MOSC,1),MOSC,DRAWNULL),COLORFF7700;
STICKLINE(OSC<REF(OSC,1) AND OSC>0,0,OSC,0.1,1),COLORFF88FF;
STICKLINE(OSC>=REF(OSC,1) AND OSC<0,0,OSC,0.1,1),COLOR0099FF;
STICKLINE(OSC>=REF(OSC,1) AND OSC>0,0,OSC,0.1,0),COLORRED;
STICKLINE(OSC<REF(OSC,1) AND OSC<0,0,OSC,0.1,0),COLORFF6600; M3 DIF:(EMA(CLOSE,12)-EMA(CLOSE,26))/(EMA(CLOSE,26))*100,COLORWHITE;
DEA:EMA(DIF,9),COLORYELLOW;
DRAWBAND(DIF,RGB(205,92,92),DEA,RGB(28,134,238));
MACD:(DIF-DEA)*2,COLORSTICK;
ZSX1:=(EMA(C,3)-EMA(C,8))*100/EMA(CLOSE,8);
ZSXK:=SMA(ZSX1,2,1);
ZSXD:=SMA(ZSXK,2,1);
JSX:=SMA(5*ZSXK-4*ZSXD,2,1);
加速线:JSX,COLORMAGENTA,LINETHICK1;
S1:=7,POINTDOT,COLORGREEN;
S2:=-7,POINTDOT,COLORGREEN;
STICKLINE(MACD>=REF(MACD,1),0,MACD,0,0),COLORRED;
STICKLINE(MACD<REF(MACD,1),0,MACD,0,0),COLORCYAN; N2:=3;
AA:=REF(DIF,N2)=HHV(DIF,2*N2+1);
BB:=BACKSET(AA,N2+1);
CCC:=FILTER(BB,N2) AND DIF=HHV(DIF,N2+1);
AA1:=BARSLAST(REF(CCC,1));
顶背离:=REF(CLOSE,AA1+1)<C AND REF(DIF,AA1+1)>DIF AND CCC;
DRAWICON(顶背离,0,2);
AA2:=REF(DIF,N2)=LLV(DIF,2*N2+1);
BB2:=BACKSET(AA2,N2+1);
CC2:=FILTER(BB2,N2) AND DIF=LLV(DIF,N2+1);
AB2:=BARSLAST(REF(CC2,1));
底背离:=REF(CLOSE,AB2+1)>CLOSE AND REF(DIF,AB2+1)<DIF AND CC2;
DRAWICON(底背离,0,1); TR0:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),14);
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),14);
PDI:=DMP*100/TR0;
MDI:=DMM*100/TR0;
PM:PDI-MDI,COLORRED,NODRAW;
ADX: EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,6),NODRAW,COLOR00FF00; 三丰诱空 零轴:0,COLOR999999;
S1:30,COLORCCAABB;
S2:100,COLORCCAABB; 获利盘:=WINNER(C)*100,COLORRED;
获利盘最高:HHV(获利盘,20),COLORWHITE; {二十天}
获利盘最低:LLV(获利盘,20),COLORE99A2C;{二十天}
乖离:EMA((100+获利盘-获利盘最高),3),COLOR0000FF,LINETHICK1;
成本乖离:(C/COST(50)-1)*100,LINETHICK1,COLOR00FF00;
获利:获利盘,COLOR00FFFF; 辅助数浪的公式 VAO VAR1:=REF(CLOSE,1);
VAR2:=(SUM(VOL,2) / ((HHV(HIGH,2) - LLV(LOW,2)) * 100))/1000;
VAR3:=((CLOSE - VAR1) * VAR2);
VAR4:=SUM(VAR3,0);
VAR5:=SMA(VAR4,5,1);
VAR6:=SMA(VAR4,8,1);
VAO:(VAR5 - VAR6),COLOR33FF33,NODRAW;
VAO5:MA(VAO,4),COLORRED,NODRAW;
VAC:VAO-VAO5,COLORFFFFFF,NODRAW;
DN:(SUM(IF((VAO<= 0),(VAO* 0.97),((VAO * 0.97) < 0)),34) / 34),COLOR00FF00;
UP:(SUM(IF((VAO> 0),(VAO * 1.003),((VAO * 1.003) > 0)),34) / 34),COLORFF00FF; N:=14;
TR := SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),
ABS(LOW-REF(CLOSE,1))),N,1);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SMA(IF(HD>0 AND HD>LD,HD,0),N,1);
DMM:= SMA(IF(LD>0 AND LD>HD,LD,0),N,1);
PDI:=DMP*100/TR,COLORRED;
MDI:=DMM*100/TR,COLOR00FF00;
PM:=PDI-MDI,COLORFFCC00,NODRAW;
ADX:=SMA(ABS(MDI-PDI)/(MDI+PDI)*100,N,1),COLOR00FF00,NODRAW; TR1:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
ATR:MA(TR1,14) ,NODRAW,COLORWHITE; VOLUME:=VOL;
MAVOL1:=MA(VOLUME,5);
MAVOL2:=MA(VOLUME,35);
MAVOL3:=MA(VOLUME,135);
TJ:=CROSS(0.9,1/VOL*1000>0.01 AND 'KDJ.J'<0); HAR2:=IF(C>=O,H,0);
HAR3:=IF(C<=O,REF(H,1),HAR2);
HAR4:=IF(C>=O,V,0);
HAR5:=IF(C<=O,REF(V,1),HAR4);
HAR6:=COUNT(HAR3>REF(HAR3,1) AND HAR5<REF(HAR5,1),3)>=2 AND C>O; M1:=VAO>=REF(VAO,1);
M2:=VAO<REF(VAO,1);
STICKLINE(M2,0,VAO,2.1,0),COLORFF7700;
STICKLINE(M2,0,VAO,1,0),COLORFF9900;
STICKLINE(M2,0,VAO,0,0),COLORFFCC00;
STICKLINE(M1,0,VAO,2.1,0),COLOR000077;
STICKLINE(M1,0,VAO,1,0),COLOR0000AA;
STICKLINE(M1,0,VAO,0,0),COLOR0000FF; O1 P1:=5; P2:=34; MA1:=EMA((HIGH+LOW)/2,P1); MA2:=EMA((HIGH+LOW)/2,P2); OSC:MA1-MA2,LINETHICK0; X1:=DRAWBAND(OSC,RGB(155,50,50),0,RGB(0,100,50)); X2:STICKLINE( OSC>=REF(OSC,1), 0, OSC, 2, 0),COLORRED; X3:STICKLINE( OSC<=REF(OSC,1), 0, OSC, 2, 0),COLORBBDD00; UPO:=IF(OSC>=0,OSC,DRAWNULL); UP: EMA(UPO,P2+P1/1.618),COLOR539A00,LINETHICK2; DNO:=IF(OSC<=0,OSC,DRAWNULL); DN: EMA(DNO,P2+P1/1.618),COLOR338A00,LINETHICK2; 强:=IF(OSC>=REF(OSC,1),OSC,DRAWNULL),COLORRED; 弱:=IF(OSC<=REF(OSC,1),OSC,DRAWNULL),COLOR00FF00; O2 SHORT:=5;LONG:=17; MA1:=MA((HIGH+LOW)/2,SHORT); MA2:=MA((HIGH+LOW)/2,LONG); OSC:MA1-MA2,NODRAW; STICKLINE(OSC>=REF(OSC,1),0,OSC,0,0),COLORRED; STICKLINE(OSC<REF(OSC,1),OSC,0,0,0),COLORCYAN; VAR4:=IF(MA1>MA2,OSC,0); VAR5:=IF(MA1<MA2,OSC,0); UP:EMA(VAR4,17+5/1.618),COLOR00FFFF; DN:EMA(VAR5,17+5/1.618),COLORFF00FF; O3 LONG:=70;SHORT:=10; MA1:=MA((HIGH+LOW)/2,SHORT); MA2:=MA((HIGH+LOW)/2,LONG); OSC:MA1-MA2,NODRAW; STICKLINE(OSC>=REF(OSC,1),0,OSC,0,0),COLORRED; STICKLINE(OSC<REF(OSC,1),0,OSC,0,0),COLORCYAN; VAR4:=IF(MA1>MA2,OSC,0); VAR5:=IF(MA1<MA2,OSC,0); UP:EMA(VAR4,70+10/1.618),COLOR00FFFF; DN:EMA(VAR5,70+10/1.618),COLORFF00FF; 波段 D1:EMA(C,13)-EMA(C,55),COLOR33FF33,NODRAW; D2:=EMA(D1,3),COLORRED; S1:=D1>D2; S2:=D1<D2; STICKLINE(D1,D1,D2,0.1,0),COLORRED; STICKLINE(D2,D1,D2,0.1,0),COLOR33FF33; RS 排序:ABS(MA(C,20)-MA(C,90))/MA(C,60); RPS:=C/REF(C,20);
RPSS:=INDEXC/REF(INDEXC,20);
P20:RPS/RPSS*100,NODRAW; RPS0:=C/REF(C,30);
RPS01:=INDEXC/REF(INDEXC,30);
P30:RPS0/RPS01*100,NODRAW; RPS3:=C/REF(C,60);
RPS31:=INDEXC/REF(INDEXC,60);
P60:RPS3/RPS31*100,NODRAW; RPS1:=C/REF(C,120);
RPS11:=INDEXC/REF(INDEXC,120);
P120:RPS1/RPS11*100,NODRAW; RPS2:=C/REF(C,250);
RPS22:=INDEXC/REF(INDEXC,250);
P250:RPS2/RPS22*100,NODRAW; AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
买量:=IF(CLOSE>OPEN,AA*(HIGH-LOW),
IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),LINETHICK0,COLORRED;
卖量:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),
IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)),LINETHICK0,COLORCYAN;
进出量:=买量+卖量,COLOR00FFFF;
N:=5;
五日和:SUM(进出量,N)/10000,LINETHICK1,COLORGREEN;
M4 DIF:EMA(CLOSE,5) - EMA(CLOSE,34),NODRAW;
DEA:EMA(DIF,9),NODRAW;
DRAWBAND(DIF,RGB(205,92,92),DEA,RGB(28,134,238));
MACD:2*(DIF-DEA),COLORSTICK;
A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
B1:=REF(C,A1+1)>C AND REF(DIF,A1+1)<DIF AND CROSS(DIF,DEA);
A2:=BARSLAST(REF(CROSS('KDJ.K'(9,3,3),'KDJ.D'(9,3,3)),1));
B2:=REF(C,A2+1)>C AND REF('KDJ.K'(9,3,3),A2+1)<'KDJ.K'(9,3,3) AND CROSS('KDJ.K'(9,3,3),'KDJ.D'(9,3,3));
A3:=BARSLAST(REF(CROSS('RSI.RSI1'(6,12,24),'RSI.RSI2'(6,12,24)),1));
B3:=REF(C,A3+1)>C AND REF('RSI.RSI1'(6,12,24),A3+1)<'RSI.RSI1'(6,12,24) AND CROSS('RSI.RSI1'(6,12,24),'RSI.RSI2'(6,12,24));
C1:=BARSLAST(REF(CROSS(DEA,DIF),1));
D1:=REF(C,C1+1)<C AND REF(DIF,C1+1)>DIF AND CROSS(DEA,DIF);
C2:=BARSLAST(REF(CROSS('KDJ.D'(9,3,3),'KDJ.K'(9,3,3)),1));
D2:=REF(C,C2+1)<C AND REF('KDJ.K'(9,3,3),C2+1)>'KDJ.K'(9,3,3) AND CROSS('KDJ.D'(9,3,3),'KDJ.K'(9,3,3));
C3:=BARSLAST(REF(CROSS('RSI.RSI2'(6,12,24),'RSI.RSI1'(6,12,24)),1));
D3:=REF(C,C3+1)<C AND REF('RSI.RSI1'(6,12,24),C3+1)>'RSI.RSI1'(6,12,24) AND CROSS('RSI.RSI2'(6,12,24),'RSI.RSI1'(6,12,24));
KDJΜ×±3:IF(B2>0,-0.1,0),COLORFF00FF,POINTDOT;
RSIΜ×±3:IF(B3>0,-0.1,0),COLORYELLOW,POINTDOT;
KDJ?￥±3:IF(D2>0,0.1,0),COLORFFCC66,POINTDOT;
RSI?￥±3:IF(D3>0,0.1,0),COLORWHITE,POINTDOT;
STICKLINE(B2>0,-0.1,0,2,0),COLORFF00FF;
STICKLINE(B3>0,-0.1,0,2,0),COLORYELLOW;
STICKLINE(D2>0,0.1,0,2,0),COLORFFCC66;
STICKLINE(D3>0,0.1,0,2,0),COLORWHITE;
DRAWICON(B1>0,DEA,1);
DRAWICON(D1>0,DEA,2);
底背:DRAWLINE(A1=0,DEA,B1>0,DEA,0),COLORRED,LINETHICK3;
顶背:DRAWLINE(A2=0,DEA,D1>0,DEA,0),COLORGREEN,LINETHICK3;
AA:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(AA=2,21)=1;
DRAWTEXT(二次金叉,0.2,' 二次金叉'),COLORYELLOW; 实战MACD DIFF1:=EMA(CLOSE,16) - EMA(CLOSE,58),COLORWHITE;
DEA1:=EMA(DIFF1,88),COLORYELLOW;
MACD1:2*(DIFF1-DEA1)*100 ;
MAMACD1:MA(MACD1,5),,COLORWHITE;
DRAWBAND(MACD1,RGB(205,92,92),MAMACD1,RGB(28,134,238));
DIFF:=EMA(CLOSE,8) - EMA(CLOSE,26),COLORWHITE;
DEA:=EMA(DIFF,50),COLORYELLOW;
MACD:2*(DIFF-DEA)*100 ;
MAMACD:MA(MACD,5),,COLORWHITE;
STICKLINE(MACD1<MAMACD1,0,MACD1,0,0),COLORGREEN;
STICKLINE(MACD>MAMACD AND MACD<REF(MACD,1) AND MACD<0,MACD1*0.6,0,0.1,0),COLORYELLOW;
STICKLINE(MACD<0,MAMACD,MACD1,0,0),COLORGREEN;
STICKLINE(MACD1>MAMACD1 AND MACD>MAMACD ,0,MACD1,0,0),COLORRED; DMI新编 N:=13;M:=6; {DMI新编}
110,COLORGREEN,LINETHICK1;
-110,COLORYELLOW,LINETHICK1;
N:=21;M:=6;M1:=20;
TR1:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),N);
DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),N);
PDI:= DMP*100/TR1;
MDI:= DMM*100/TR1;
ADX: EMA((PDI-MDI)/(MDI+PDI)*100,M)*2;
ADXR:EMA(ADX,M);
ADMA:EMA(ADX,M1),COLOR09FF09,LINETHICK1,CIRCLEDOT;
OMD:(ADX-2*ADMA+ADXR)/2, COLORSTICK;
DRAWBAND(ADX,RGB(255,50,50),ADXR,RGB(0,100,250));
STICKLINE(OMD>REF(OMD,1),0,OMD,0.1,0),COLORRED;
STICKLINE(OMD<REF(OMD,1),0,OMD,1,0),COLORCBCBC0;
STICKLINE(OMD>=0 OR OMD<=0,0,0,50,1),COLORWHITE;
ADX1:=ADX,COLORRED;
ADXR1:=ADXR,COLORGREEN;
ADMA1:=ADMA;
强:=IF(ADX1>=ADXR1,ADX1,DRAWNULL),COLORRED,LINETHICK3;
买入:IF(OMD>0 AND OMD-REF(OMD,1)>0,30,0),COLORWHITE;
{OMD;}
0,COLORWHITE; 趋势MACD DIF1:=EMA(CLOSE,36)-EMA(CLOSE,78); DEA1:=EMA(DIF1,27); MACD1:=2*(DIF1-DEA1); MACD2:=EMA(MACD1,3),COLORCYAN; STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,0.1,1),COLORLIRED; STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,0.1,1),COLORYELLOW; STICKLINE(MACD1<MACD2,0,MACD1,0.1,1),COLORLIBLUE; DIF:=EMA(CLOSE,24)-EMA(CLOSE,52); DEA:=EMA(DIF,18); MACD:=(DIF-DEA)*2; DIF10:(EMA(C,72)-EMA(C,156)),COLORRED,NODRAW; DEA10:EMA(DIF10,54),COLORGREEN,NODRAW; STICKLINE(ISLASTBAR,DIF10,DIF10,33,0),COLORRED; STICKLINE(ISLASTBAR,DEA10,DEA10,33,0),COLORGREEN; DIF0:=EMA(CLOSE,24)-EMA(CLOSE,52),COLORWHITE; DEA0:=EMA(DIF,18),COLORYELLOW; 底拐:=DRAWLINE(DIF>=HHV(DIF,21),DIF,DIF<=LLV(DIF,21),DIF,0), COLORGREEN,CROSSDOT; 顶拐:=DRAWLINE(DIF<=LLV(DIF,21),DIF,DIF>=HHV(DIF,21),DIF,0), COLORYELLOW,,CROSSDOT; J1:=DRAWICON(底拐=LLV(DIF,21),底拐*0.97,23); J2:=DRAWICON(顶拐=HHV(DIF,21),顶拐*1.03,14); DIFX:EMA(CLOSE,12)-EMA(CLOSE,26),COLORWHITE; DEAX:EMA(DIFX,9),COLORYELLOW; MACDX:(DIFX-DEAX)*2,COLORSTICK;
|
