DIFF:=EMA(CLOSE,8)-EMA(CLOSE,13); DEA:=EMA(DIFF,5); DRAWICON(DIFF>DEA,-1,1); DRAWICON(DIFF<DEA,-1,2); DRAWTEXT(ISLASTBAR=1,-1,'MACD'),COLORFFFFFF; A1:=DIFF>DEA,COLORRED; RSV1:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100; K:=SMA(RSV1,3,1); D:=SMA(K,3,1); DRAWICON(K>D,-2,1); DRAWICON(K<D,-2,2); DRAWTEXT(ISLASTBAR=1,-2,'KDJ'),COLORFFFFFF; A2:=K>D,COLORRED; LC:=REF(CLOSE,1); RSI1:=(SMA(MAX(CLOSE-LC,0),5,1))/(SMA(ABS(CLOSE-LC),5,1))*100; RSI2:=(SMA(MAX(CLOSE-LC,0),13,1))/(SMA(ABS(CLOSE-LC),13,1))*100; DRAWICON(RSI1>RSI2,-3,1); DRAWICON(RSI1<RSI2,-3,2); DRAWTEXT(ISLASTBAR=1,-3,'RSI'),COLORFFFFFF; A3:=RSI1>RSI2; RSV:=-(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*100; LWR1:=SMA(RSV,3,1); LWR2:=SMA(LWR1,3,1); DRAWICON(LWR1>LWR2,-4,1); DRAWICON(LWR1<LWR2,-4,2); DRAWTEXT(ISLASTBAR=1,-4,'.LWR'),COLORFFFFFF; A4:=LWR1>LWR2; BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4; DRAWICON(CLOSE>BBI,-5,1); DRAWICON(CLOSE<BBI,-5,2); DRAWTEXT(ISLASTBAR=1,-5,'.BBI'),COLORFFFFFF; A5:=CLOSE>BBI; MTM:=CLOSE-REF(CLOSE,1); MMS:=100*EMA(EMA(MTM,5),3)/EMA(EMA(ABS(MTM),5),3); MMM:=100*EMA(EMA(MTM,13),8)/EMA(EMA(ABS(MTM),13),8); DRAWICON(MMS>MMM,-6,1); DRAWICON(MMS<MMM,-6,2); DRAWTEXT(ISLASTBAR=1,-6,'.MTM'),COLORFFFFFF; A6:=MMS>MMM; 这不是我编写的,而是在别人的导入不了的时候作了一点小小的修改后就能导入了。最后,我还是要谢谢原编者的无私奉献。 |
|