编程思路破译DIFF赋值:收盘价的8日指数移动平均-收盘价的13日指数移动平均 DEA赋值:DIFF的5日指数移动平均 当满足条件DIFF>DEA时,在1位置画1号图标 当满足条件DIFF<DEA时,在1位置画2号图标 A1赋值:DIFF>DEA MACDX赋值:如果A1,返回1,否则返回0 RSV1赋值:(收盘价-8日内最低价的最低值)/(8日内最高价的最高值-8日内最低价的最低值)*100 K赋值:RSV1的3日[1日权重]移动平均 D赋值:K的3日[1日权重]移动平均 当满足条件K>D时,在2位置画1号图标 当满足条件K<D时,在2位置画2号图标 A2赋值:K>D KDJX赋值:如果A2,返回2,否则返回0 LC赋值:1日前的收盘价 RSI1赋值:(收盘价-LC和0的较大值的5日[1日权重]移动平均)/(收盘价-LC的绝对值的5日[1日权重]移动平均)*100 RSI2赋值:(收盘价-LC和0的较大值的13日[1日权重]移动平均)/(收盘价-LC的绝对值的13日[1日权重]移动平均)*100 当满足条件RSI1>RSI2时,在3位置画1号图标 当满足条件RSI1<RSI2时,在3位置画2号图标 A3赋值:RSI1>RSI2 RSIX赋值:如果A3,返回3,否则返回0 RSV赋值:-(13日内最高价的最高值-收盘价)/(13日内最高价的最高值-13日内最低价的最低值)*100 LWR1赋值:RSV的3日[1日权重]移动平均 LWR2赋值:LWR1的3日[1日权重]移动平均 当满足条件LWR1>LWR2时,在4位置画1号图标 当满足条件LWR1<LWR2时,在4位置画2号图标 A4赋值:LWR1>LWR2 LWRX赋值:如果A4,返回4,否则返回0 BBI赋值:(收盘价的3日简单移动平均+收盘价的6日简单移动平均+收盘价的12日简单移动平均+收盘价的24日简单移动平均)/4 当满足条件收盘价>BBI时,在5位置画1号图标 当满足条件收盘价<BBI时,在5位置画2号图标 A5赋值:收盘价>BBI BBIX赋值:如果A5,返回5,否则返回0 MTM赋值:收盘价-1日前的收盘价 MMS赋值:100*MTM的5日指数移动平均的3日指数移动平均/MTM的绝对值的5日指数移动平均的3日指数移动平均 MMM赋值:100*MTM的13日指数移动平均的8日指数移动平均/MTM的绝对值的13日指数移动平均的8日指数移动平均 当满足条件MMS>MMM时,在6位置画1号图标 当满足条件MMS<MMM时,在6位置画2号图标 A6赋值:MMS>MMM MTMX赋值:如果A6,返回6,否则返回0 六箭齐发赋值:A1+A2+A3+A4+A5+A6=6 当满足条件六箭齐发=1ANDREF(六箭齐发,1)=0时,在1和2位置之间画柱状线,宽度为0,0不为0则画空心柱. 程序源码DIFF:=EMA(CLOSE,8)-EMA(CLOSE,13); DEA:=EMA(DIFF,5); DRAWICON(DIFF>DEA,1,1); DRAWICON(DIFF<DEA,1,2); {DRAWTEXTABS(0,70,'.MACD'),COLORFFFFFF;} A1:=DIFF>DEA; MACDX:=IF(A1,1,0); 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); {DRAWTEXTABS(0,59,'.KDJ'),COLORFFFFFF;} A2:=K>D; KDJX:=IF(A2,2,0); 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); {DRAWTEXTABS(0,47,'.RSI'),COLORFFFFFF;} A3:=RSI1>RSI2; RSIX:=IF(A3,3,0); 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); {DRAWTEXTABS(0,35,'.LWR'),COLORFFFFFF;} A4:=LWR1>LWR2; LWRX:=IF(A4,4,0); BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4; DRAWICON(CLOSE>BBI,5,1); DRAWICON(CLOSE<BBI,5,2); {DRAWTEXTABS(0,23,'.BBI'),COLORFFFFFF;} A5:=CLOSE>BBI; BBIX:=IF(A5,5,0); 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); {DRAWTEXTABS(0,11,'.MTM'),COLORFFFFFF;} A6:=MMS>MMM; MTMX:=IF(A6,6,0); 六箭齐发:=A1+A2+A3+A4+A5+A6=6; STICKLINE(六箭齐发=1 AND REF(六箭齐发,1)=0,1,2,0,0); |
|