M1:=55; HR:=HHV(HIGH,M1); HRY:=LLV(LOW,M1); HRY11:=HR*HRY; HRY33:SQRT(HRY11),COLORGREEN,LINETHICK2; IF(C>HRY33 AND HRY33 >=REF(HRY33 ,1), HRY33 ,DRAWNULL),LINETHICK2,COLORRED; TEND:EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),42), POINTDOT,COLORFF00FF,LINETHICK2; WLT1:=EMA(C,3),COLORBLUE,LINETHICK1; WLT2:=EMA(C,5),COLORWHITE,LINETHICK1; WLT3:=EMA(WLT2,5),COLOR00FF00,LINETHICK1; DRAWBAND(WLT1,RGB(255,255,0),WLT2,RGB(256,200,0)); QQ:= C MM:=WLT1>REF(WLT1,1) AND REF(WLT1,1) MM0:=WLT1REF(WLT1,2) ; WL:=CROSS(WLT1,WLT2); WL1:=CROSS(WLT2,WLT1); WL2:=CROSS(WLT1,TEND); WL3:=LLV(LOW,55); WL6:=HHV(HIGH,21); WL8:=LLV(LOW,34); DRAWICON(WL AND MM AND CWL6*0.6,LOW*0.97,23); RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K:=SMA(RSV,3,1); D:=SMA(K,3,1); DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26); DEA :=EMA(DIFF,9); MACD:=2*(DIFF-DEA); 生命:MA(C,24),COLOR00FFFF; 做多:=IF(K>D AND MACD>0 AND V>1,2,0),COLORRED; 做空:=IF(K<0 AND V>1,-2,0),COLOR00FF00; 强洗:=IF(MACD>0 AND K1,1,0),COLOR0099FF; 弱升:=IF(MACD<0 AND K>D AND V>1,-1,0),COLORFFFF00; STICKLINE(做多,L,H,0,0),COLORRED; STICKLINE(做多 AND C STICKLINE(做多 AND C>=O,C,O,3,1),COLORRED; STICKLINE(做多 AND C STICKLINE(做多 AND C STICKLINE(做多 AND C STICKLINE(做空 AND C>=O,L,H,0.1,0),COLOR0000FF; STICKLINE(做空 AND C>=O,C,O,3,1),COLOR00FF00; STICKLINE(做空 AND C STICKLINE(做空 AND C STICKLINE(做空 AND C STICKLINE(强洗 AND C>=O,L,H,0.1,0),COLOR0000FF; STICKLINE(强洗 AND C>=O,C,O,3,1),COLORFFFF00; STICKLINE(强洗 AND C STICKLINE(强洗 AND C STICKLINE(强洗 AND C STICKLINE(弱升 AND C>=O,L,H,0,0),COLOR0000FF; STICKLINE(弱升 AND C>=O,C,O,3,1),COLOR00FFFF; STICKLINE(弱升 AND C STICKLINE(弱升 AND C STICKLINE(弱升 AND C SAL:=FILTER(CROSS(TEND,C) AND C WLT1WL8*1.2,13); DRAWICON(SAL,HIGH*1.03,15); TJ1:=WL AND MM AND CWL6*0.8; TJ2:=WL2 AND C>TEND; TJ3:=TJ1 OR TJ2; TJ4:=COUNT(TJ3,3)=2; DRAWICON(FILTER(TJ4,3),LOW*0.95,23); STICKLINE(WL AND MM AND CWL6*0.8,C,O,4,0),COLOR009999; STICKLINE(WL AND MM AND CWL6*0.8,C,O,2.5,0),COLOR00BBBB; STICKLINE(WL AND MM AND CWL6*0.8,C,O,1,0),COLOR00DDDD; STICKLINE(WL AND MM AND CWL6*0.8,C,O,0.3,0),COLOR00FFFF; STICKLINE(WL2 AND C>TEND,C,O,4,0),COLOR000099; STICKLINE(WL2 AND C>TEND,C,O,2.5,0),COLOR0000BB; STICKLINE(WL2 AND C>TEND,C,O,1,0),COLOR0000DD; STICKLINE(WL2 AND C>TEND,C,O,0.3,0),COLOR0000FF; STICKLINE(MM0 AND C>WL8*1.2,C,O,1,0),COLORFF0000; HIGHN:=10;LOWN:=10;HIGHDISPLAY:=0;LOWDISPLAY:=0;ZGDISPLAY:=0;MADISPLAY:=0; AA:=REF(H,HIGHN)=HHV(H,2*HIGHN+1); {HIGHN日前的最高价=2*HIGHN+1日内最高价的最高值} QY:=BACKSET(AA,HIGHN+1);{若AA则将最近HIGHN+1周期置为1} CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1); {QY的HIGHN日过滤 AND 最高价=HIGHN+1日内最高价的最高值} DRAWICON(CC,H*1.02,2); DDD:=BARSLAST(CC);{上次CC距今天数} GDTS:=IF(CC,CURRBARSCOUNT,0);{如果CC,返回到最后交易日的周,否则返回0} DINGBU:=IF(DDD,REF(H,DDD),H);{顶部} DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS); DINGBU1:=REF(DINGBU,DDD+1); GDCS1:=CONST(DINGBUTS); DINGBUTS1:=REF(DINGBUTS,DDD+1); GDCS2:=CONST(DINGBUTS1); DINGBU2:=REF(DINGBU1,DDD+1); MMM:=IF(CURRBARSCOUNT>GDCS2,0,1); 高点压力RAWLINE(CURRBARSCOUNT=GDCS2,H, CURRBARSCOUNT=GDCS1,H,1) COLORGREEN,LINETHICK1; DRAWLINE(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),COLOR0055FF,POINTDOT; DRAWLINE(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),COLORYELLOW,POINTDOT; AA1:=REF(L,LOWN)=LLV(L,2*LOWN+1); QY1:=BACKSET(AA1,LOWN+1); CC1:=FILTER(QY1,LOWN) AND L=LLV(L,LOWN+1); {DRAWICON(CC1,L*0.98,1);} DD1:=BARSLAST(CC1); DDTS:=IF(CC1,CURRBARSCOUNT,0); YDB:=IF(DD1,REF(L,DD1),L); DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS); DDCS1:=CONST(DDTS1); ZDB:=REF(YDB,DD1+1); DDTS2:=REF(DDTS1,DD1+1); DDCS2:=CONST(DDTS2); 低点支撑RAWLINE(CURRBARSCOUNT=DDCS2,L, CURRBARSCOUNT=DDCS1,L,1) COLORRED,LINETHICK1; ZGSTAR:=(高点压力+低点支撑)/2; ZGEND:=CONST((高点压力+低点支撑)/2); STARDAY:=IF(DDCS2 中轨RAWLINE(CURRBARSCOUNT=STARDAY,ZGSTAR,ISLASTBAR,ZGEND,1), COLORFFBBFF,LINETHICK1; DRAWLINE(CURRBARSCOUNT=DDCS1,L,ISLASTBAR, REF(L,DDCS1-1),1),COLORFF00FF,POINTDOT,; DRAWLINE(CURRBARSCOUNT=DDCS2,L,ISLASTBAR, REF(L,DDCS2-1),1),COLORCYAN,POINTDOT; DRAWICON(WL2 AND C>TEND AND C DRAWTEXT(WL2 AND C>TEND AND C N8:=89; HH:=CONST(HHV(H,N8)); LL:=CONST(LLV(L,N8)); M:=CONST(HH/2+LL/2); CCC:=CONST(C); YYY:=CONST(IF(CCC>=M,LL-(HH-LL)*0.2,HH+(HH-LL)*0.2)); V11:=(C+H+L)/3; MA33:=MA(V11,2); MA55:=MA(V11,5); N18:=BARSLAST(CROSS(MA33,MA55)); N28:=BARSLAST(CROSS(MA55,MA33)); N88:=IF(N18 STICKLINE(N88>0,YYY,YYY+0.1,3,0),COLOR0000FF; STICKLINE(N88<0,YYY,YYY+0.1,3,0),COLOR00FF00; |