请老师帮助将大智慧新一代画线指标改为通达信
[大智慧] 5968
快线:EMA(EMA(EMA(EMA(CLOSE,2),2),2),2),LINETHICK1,COLORFF00FF; 慢线:EMA(REF(快线,1),2),LINETHICK2,COLOR00FFFF; 总趋势:EMA(EMA(EMA(EMA(EMA(CLOSE,55),2),2),2),2),LINETHICK1,COLOR0000FF; partline(总趋势,总趋势>=ref(总趋势,1),rgb(255,0,0),总趋势<ref(总趋势,1),rgb(0,250,0)),linethick1; k:=2;p1:=3; VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3); VAR2222:=CROSS(VAR1111,0.9); VAR3333:=BACKSET(REF(LOW,2)=LLV(LOW,5),3); VAR4444:=CROSS(VAR3333,0.9); 压力:= REF(HIGH,BARSLAST(VAR2222)); STICKLINE(CLOSE,REF(HIGH,BARSLAST(VAR2222)),REF(HIGH,BARSLAST(VAR2222)),0.5,1),COLOREA91B5,LINETHICK3; 支撑:= REF(LOW,BARSLAST(VAR4444)); STICKLINE(CLOSE,REF(LOW,BARSLAST(VAR4444)),REF(LOW,BARSLAST(VAR4444)),0.5,1),COLOR00B4FF,LINETHICK3; 下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100); n:=8; V7:=BARSTATUS=2; V8:=(REF(HIGH,n) = HHV(HIGH,((2 * n) + 1))); V9:=FILTER(V8,n); VA:=BACKSET(V9,(n + 1)); VB:=FILTER(VA,n); VC:=(VB OR V7); VD:=(REF(LOW,n) = LLV(LOW,((2 * n) + 1))); VE:=FILTER(VD,n); VF:=BACKSET(VE,(n + 1)); V10:=FILTER(VF,n); V11:=(V10 AND NOT(VB)); V12:=BACKSET(VC,(REF(BARSLAST(V11),1) + 1)); V13:=(V12 > REF(V12,1)); V14:=BACKSET(V13,2); V15:=(V14 > REF(V14,1)); V16:=BACKSET((V15 AND (COUNT(VC,(REF(BARSLAST(V11),1) + 2)) = 0)),(REF(BARSLAST(V11),1) + 2)); V17:=(V16 > REF(V16,1)); V18:=BACKSET((V17 AND (COUNT(VC,(REF(BARSLAST(V11),1) + 2)) = 0)),(REF(BARSLAST(V11),1) + 2)); V19:=(V18 > REF(V18,1)); V1A:=IF(VC,COUNT(V11,(REF(BARSLAST(VC),1) + 1)),0); V1B:=IF(((V1A = 1) AND VC),BARSLAST(V15),0); V1C:=IF((VC AND (REF(LOW,BARSLAST(V15)) >= REF(LOW,BARSLAST(V17)))),BARSLAST(V17),BARSLAST(V15)); V1D:=IF(((V1A = 2) AND VC),V1C,0); V1E:=IF(((V1A >= 3) AND VC),IF((VC AND (REF(LOW,V1C) >= REF(LOW,BARSLAST(V19)))),BARSLAST(V19),V1C),0); V1F:=((V1B + V1D) + V1E); V20:=BACKSET(VC,V1F); V21:=(V20 > REF(V20,1)); V22:=BACKSET(V21,2); V23:=(V22 > REF(V22,1)); V24:=(V23 OR V7); V25:=BACKSET(V24,(REF(BARSLAST(VC),1) + 1)); V26:=(V25 > REF(V25,1)); V27:=BACKSET(V26,2); V28:=(V27 > REF(V27,1)); V29:=BACKSET((V28 AND (COUNT(V24,(REF(BARSLAST(VC),1) + 2)) = 0)),(REF(BARSLAST(VC),1) + 2)); V2A:=(V29 > REF(V29,1)); V2B:=BACKSET((V2A AND (COUNT(V24,(REF(BARSLAST(VC),1) + 2)) = 0)),(REF(BARSLAST(VC),1) + 2)); V2C:=(V2B > REF(V2B,1)); V2D:=IF(V24,COUNT(VB,(REF(BARSLAST(V24),1) + 1)),0); V2E:=IF(((V2D = 1) AND V24),BARSLAST(V28),0); V2F:=IF((V24 AND (REF(HIGH,BARSLAST(V28)) <= REF(HIGH,BARSLAST(V2A)))),BARSLAST(V2A),BARSLAST(V28)); V30:=IF(((V2D = 2) AND V24),V2F,0); V3B:=IF(((V2D >= 3) AND V24),IF((V24 AND (REF(HIGH,V2F) <= REF(HIGH,BARSLAST(V2C)))),BARSLAST(V2C),V2F),0); V3C:=((V2E + V30) + V3B); V3D:=BACKSET(V24,V3C); V3E:=(V3D > REF(V3D,1)); AA:=BACKSET(V3E,2); AAA:=(AA > REF(AA,1)); BB:=BACKSET(V7,(BARSLAST(AAA) + 1)); CC1:=(BB > REF(BB,1)); CC:=BACKSET(CC1,(REF(BARSLAST(AAA),1) + 2)); AAA2:=(CC > REF(CC,1)); DRAWLINE(K=1 AND AAA2,HIGH,K=1 AND CC1,HIGH,1),POINTDOT,color00AAAA; BB2:=(REF(HIGH,4) = HHV(HIGH,((2 * 4) + 1))); CC22:=FILTER(BB2,4); CC2:=BACKSET(CC22,(4 + 1)); EA:=FILTER(CC2,4); EB:=(EA OR BARSTATUS=2); A6:=(REF(LOW,4) = LLV(LOW,((2 * 4) + 1))); EE:=FILTER(A6,4); FF1:=BACKSET(EE,(4 + 1)); EE2:=FILTER(FF1,4); FF2:=(EE2 AND NOT(EA)); EE3:=BACKSET(EB,(REF(BARSLAST(FF2),1) + 1)); FF3:=(EE3 > REF(EE3,1)); JS:=BACKSET(FF3,2); G1:=(JS > REF(JS,1)); GA:=BACKSET((G1 AND (COUNT(EB,(REF(BARSLAST(FF2),1) + 2)) = 0)),(REF(BARSLAST(FF2),1) + 2)); G2:=(GA > REF(GA,1)); G3:=BACKSET((G2 AND (COUNT(EB,(REF(BARSLAST(FF2),1) + 2)) = 0)),(REF(BARSLAST(FF2),1) + 2)); GG:=(G3 > REF(G3,1)); JA:=IF(EB,COUNT(FF2,(REF(BARSLAST(EB),1) + 1)),0); JB:=IF(((JA = 1) AND EB),BARSLAST(G1),0); JJ:=IF((EB AND (REF(LOW,BARSLAST(G1)) >= REF(LOW,BARSLAST(G2)))),BARSLAST(G2),BARSLAST(G1)); LD:=IF(((JA = 2) AND EB),JJ,0); LD1:=IF(((JA >= 3) AND EB),IF((EB AND (REF(LOW,JJ) >= REF(LOW,BARSLAST(GG)))),BARSLAST(GG),JJ),0); HEA:=((JB + LD) + LD1); HEB:=BACKSET(EB,HEA); HEE:=(HEB > REF(HEB,1)); HFF1:=BACKSET(HEE,2); HEE2:=(HFF1 > REF(HFF1,1)); HFF2:=(HEE2 OR BARSTATUS=2); HEE3:=BACKSET(HFF2,(REF(BARSLAST(EB),1) + 1)); HFF3:=(HEE3 > REF(HEE3,1)); HJS:=BACKSET(HFF3,2); HG1:=(HJS > REF(HJS,1)); HGA:=BACKSET((HG1 AND (COUNT(HFF2,(REF(BARSLAST(EB),1) + 2)) = 0)),(REF(BARSLAST(EB),1) + 2)); HG2:=(HGA > REF(HGA,1)); HG3:=BACKSET((HG2 AND (COUNT(HFF2,(REF(BARSLAST(EB),1) + 2)) = 0)),(REF(BARSLAST(EB),1) + 2)); HGG:=(HG3 > REF(HG3,1)); HJA:=IF(HFF2,COUNT(EA,(REF(BARSLAST(HFF2),1) + 1)),0); HJB:=IF(((HJA = 1) AND HFF2),BARSLAST(HG1),0); HJJ:=IF((HFF2 AND (REF(HIGH,BARSLAST(HG1)) <= REF(HIGH,BARSLAST(HG2)))),BARSLAST(HG2),BARSLAST(HG1)); HD:=IF(((HJA = 2) AND HFF2),HJJ,0); X1:=IF(((HJA >= 3) AND HFF2),IF((HFF2 AND (REF(HIGH,HJJ) <= REF(HIGH,BARSLAST(HGG)))),BARSLAST(HGG),HJJ),0); X2:=((HJB + HD) + X1); Y1:=BACKSET(HFF2,X2); Y2:=(Y1 > REF(Y1,1)); Z1:=BACKSET(Y2,2); Z2:=(Z1 > REF(Z1,1)); UU:=BACKSET(BARSTATUS=2,(BARSLAST(HEE2) + 1)); VV:=(UU > REF(UU,1)); WW:=BACKSET(BARSTATUS=2,(BARSLAST(Z2) + 1)); XX:=(WW > REF(WW,1)); UU2:=IF((BARSLAST(VV) < BARSLAST(XX)),VV,XX); VV2:=IF((BARSLAST(VV) < BARSLAST(XX)),LOW,HIGH); DRAWLINE(K=1 AND UU2,VV2,K=1 AND BARSTATUS=2,CLOSE,0),POINTDOT,colorFF9900; WW2:=BACKSET(BARSTATUS=2,(BARSLAST(HEE2) + 1)); XX2:=(WW2 > REF(WW2,1)); VAR246:=BACKSET(XX2,(REF(BARSLAST(HEE2),1) + 2)); VAR247:=(VAR246 > REF(VAR246,1)); DRAWLINE(K=1 AND VAR247,LOW, K=1 AND XX2,LOW,1),POINTDOT,color00ffff; VAR249:=BACKSET(BARSTATUS=2,(BARSLAST(Z2) + 1)); VAR250:=(VAR249 > REF(VAR249,1)); VAR251:=BACKSET(VAR250,(REF(BARSLAST(Z2),1) + 2)); VAR252:=(VAR251 > REF(VAR251,1)); DRAWLINE(K=1 AND VAR252,HIGH, K=1 AND VAR250,HIGH,1),POINTDOT,color00ffff; wN:=p1;{原码 N:=3;} wA1:=REF(H,wN)=HHV(H,2*wN+1); wB1:=FILTER(wA1,wN); wC1:=BACKSET(wB1,wN+1); wD1:=FILTER(wC1,wN);{高点} wA2:=REF(L,wN)=LLV(L,2*wN+1); wB2:=FILTER(wA2,wN); wC2:=BACKSET(wB2,wN+1); wD2:=FILTER(wC2,wN);{低点} wE1:=(REF(LLV(L,2*wN),1)+REF(HHV(H,2*wN),1))/2; wE2:=(H+L)/2;{高低点出现在同一K线上时可作取舍} wH1:=(wD1 AND NOT(wD2 AND wE1>=wE2)) OR DISPSTATUS=2 OR BARSCOUNT(C)=1; wL1:=(wD2 AND NOT(wD1 AND wE1<wE2)); wH2:=wD1 AND NOT(wD2 AND wE1>=wE2); wX1:=REF(BARSLAST(wH1),1)+1; wF1:=BACKSET(wH1 AND COUNT(wL1,wX1)>0,LLVBARS(IF(wL1,L,10000),wX1)); wG1:=wF1>REF(wF1,1); wI1:=BACKSET(wG1,2); wLD:=wI1>REF(wI1,1);{过滤后低点} wL2:=wLD OR DISPSTATUS=2 OR BARSCOUNT(C)=1; wX2:=REF(BARSLAST(wL2),1)+1; wF2:=BACKSET(wL2 AND COUNT(wH2,wX2)>0,HHVBARS(IF(wH2,H,0),wX2)); wG2:=wF2>REF(wF2,1); wI2:=BACKSET(wG2,2); wHD:=wI2>REF(wI2,1);{过滤后高点} wR1:=BACKSET(DISPSTATUS=2,BARSLAST(wHD)+1); wS1:=wR1>REF(wR1,1); {前一高} wT1:=BACKSET(DISPSTATUS=2,BARSLAST(wLD)+1); wU1:=wT1>REF(wT1,1); {前一低} wR2:=BACKSET(wS1,REF(BARSLAST(wHD),1)+2); wS2:=wR2>REF(wR2,1); {前二高} wT2:=BACKSET(wU1,REF(BARSLAST(wLD),1)+2); wU2:=wT2>REF(wT2,1); {前二低} wT3:=BACKSET(wU2,REF(BARSLAST(wLD),1)+2); wU3:=wT3>REF(wT3,1); {前三低} wT4:=BACKSET(wU3,REF(BARSLAST(wLD),1)+2); wU4:=wT4>REF(wT4,1); {前四低} wR3:=BACKSET(wS2,REF(BARSLAST(wHD),1)+2); wS3:=wR3>REF(wR3,1); {前三高} wR4:=BACKSET(wS3,REF(BARSLAST(wHD),1)+2); wS4:=wR4>REF(wR4,1); {前四高} DRAWLINE(K=2 AND wS2,H,K=2 AND wS1,H,1),Color008888; {★压力1:} DRAWLINE(K=2 AND wU2,L,K=2 AND wU1,L,1),POINTDOT,Color008888;{★支撑1:} DRAWLINE(K=2 AND wS3,H,K=2 AND wS2,H,1),Color888000; {★压力2:} DRAWLINE(K=2 AND wU3,L,K=2 AND wU2,L,1),POINTDOT,Color888000;{★支撑2:} DRAWLINE(K=2 AND wS4,H,K=2 AND wS3,H,1),Color0000CC;{★压力3:} DRAWLINE(K=2 AND wU4,L,K=2 AND wU3,L,1),POINTDOT,Color0000CC;{★支撑3:}; {画线} QA:=REF(H,10)=HHV(H,21); QB:=BACKSET(QA,11); QC:=FILTER(QB,10) AND H=HHV(H,11); QD:=BARSLAST(QC); bbb1:=backset(barstatus=2,QD+1); bbb2:=backset(barstatus=2,ref(QD,QD+1)+QD+2); DRAWLINE(bbb2>ref(bbb2,1),H,bbb1>ref(bbb1,1),H,1),COLOR00CCFF; |
相关股票
延展阅读
楼主 |
2楼 |
3楼 |