大智慧价格预测副图指标

源码

{价格预测}
CJTY:=C;
CJHD:=FILTER(BACKSET(FILTER(REF(CJTY,10)=HHV(CJTY,2*10+1),10),10+1),10);
CJLD:=FILTER(BACKSET(FILTER(REF(CJTY,10)=LLV(CJTY,2*10+1),10),10+1),10);
CJA:=REF(C,BARSLAST(CJHD));
CJB:=REF(C,BARSLAST(CJLD));
CJT1:=BARSLAST(CJHD) CJT2:=BARSLAST(CJHD)>BARSLAST(CJLD) AND NOT(CJLD);
{波浪顶}
STICKLINE(CJT1,CJA,CJA,3,0),COLORFF00FF;
{波浪底}
STICKLINE(CJT2,CJB,CJB,3,0),COLORFF00FF;

统计天数:=BARPOS-hhv(if(DISPSTATUS=1,BARPOS,0),0)+1;
预测价格:=LLV(C,统计天数)*1.1618;
高点:=HHV(C,统计天数);{H}
低点:=LLV(C,统计天数);{L}

压力支撑五十:高点-(高点-低点)*0.5{,dotline},Linethick0,colorgreen;
支撑三五七:高点-(高点-低点)*0.35765{,dotline},Linethick0,colorgreen;
支撑六四二:高点-(高点-低点)*0.6423{,dotline},Linethick0,colorgreen;
压力三五七:=低点+(高点-低点)*0.35765;
压力六四二:=低点+(高点-低点)*0.6423;
牛顶:=低点+(高点-低点)*(1+0.618);
熊底:=ABS( 高点-(高点-低点)*(1+0.618) );

高点跌幅:= ( HHV(C,统计天数) -C )/HHV(C,统计天数);
低点涨幅:= ( C -LLV(C,统计天数) )/LLV(C,统计天数);
止跌:= HHV(C,统计天数) * 0.6;

预测价:预测价格,POINTDOT,Linethick2,colorblue;
DRAWTEXTrel(999,999-30, '低点涨幅:'+NUMTOSTR(低点涨幅) +'; ' +'高点跌幅:'+NUMTOSTR(高点跌幅) +'; ' +'高点40%止跌:'+NUMTOSTR(止跌) +'; ' + '预测:'+NUMTOSTR(预测价格) +'; '+'压支50%:'+NUMTOSTR(压力支撑五十) ),align2,colorblue;
DRAWTEXTrel(999,999-60, '牛顶:'+NUMTOSTR(牛顶) +'; '+'熊底:'+NUMTOSTR(熊底) +'; '+ '压36%:'+NUMTOSTR(压力三五七)+'; '+'压64%:'+NUMTOSTR(压力六四二)),align2;
DRAWTEXTrel(999,999-90, '支36%:'+NUMTOSTR(支撑三五七)+'; '+'支64%:'+NUMTOSTR(支撑六四二)),align2;