龙听期货论坛's Archiver

C
+
+


 微信: QQ:

龙听 发表于 2018-12-15 10:11

提前显示明日均线位置的指标公式[大智慧公式]

[code]
input:n1(5,0,50),n2(13,0,100),n3(21,0,200),n4(30,0,300);
m1:MA(CLOSE,n1),;
m2:MA(CLOSE,n2),;
m3:MA(CLOSE,n3),;
m4:MA(CLOSE,n4),;
MA1:=MA(CLOSE,3),;
MA2:=MA(CLOSE,5),;
MA3:=MA(CLOSE,10),;
MS3:=ref(c,2);
MC3:=C-ref(c,2);
JC3:=(MA(c,3)-ref(MA(c,3),1))*3;
YS3:=C-(MA(c,3)-ref(MA(c,3),1))*3;
MS1:=ref(c,9);
MC1:=c-ref(c,9);
JC1:=(MA(c,10)-ref(MA(c,10),1))*10;
YS1:=C-(MA(c,10)-ref(MA(c,10),1))*10;
MS:ref(c,4),color00FF00,LINETHICK0;
MC:c-ref(c,4),coloR00FF00,LINETHICK0;
JC:(MA(c,5)-ref(MA(c,5),1))*5,colorffff00,LINETHICK0;
YS:C-(MA(c,5)-ref(MA(c,5),1))*5,colorffFFff,LINETHICK0;
DRAWNUMBER(BARSCOUNT(C)=SYSPARAM(1),c,ref(c,4),2),align4,color00ffff;{明收=4天前的价}
DRAWNUMBER(BARSCOUNT(C)=SYSPARAM(1),c,c-ref(c,4),2),align3,color00ffff;//明日差值
DRAWNUMBER(BARSCOUNT(C)=SYSPARAM(1),c,c-(MA(c,5)-ref(MA(c,5),1))*5,2),align5,colorFFffff;//应收
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(1),c,' ←明收'),ALIGN4,color00ffff;{要求明日达到的收盘价}
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(1),c,' ←明差'),ALIGN3,color00ffff;
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(1),c,' ←应收'),ALIGN5,colorffffff;
ZD:=C-ref(C,1); ZF:=C/ref(C,1)*100-100;
EXPLAINEX(1,'明日均线:(最新)'+NUMTOSTR(C,2)+' 幅:',ZF,2,0);
EXPLAINEX(1,'三:今 '+NUMTOSTR(YS3,2)+' 明 '+NUMTOSTR(MS3,2)+' 超 ',MC3/MS3*100,2,0),colorFFFFFF;//今
EXPLAINEX(1,'五:今 '+NUMTOSTR(YS,2)+' 明 '+NUMTOSTR(MS,2)+' 超 ',MC/MS*100,2,0),color00FFFF;
EXPLAINEX(1,'十:今 '+NUMTOSTR(YS1,2)+' 明 '+NUMTOSTR(MS1,2)+' 超 ',MC1/MS1*100,2,1),color00FF00;
三日:=MA1-ref(MA1,1);五日:=MA2-ref(MA2,1);十日:=MA1-ref(MA3,1);
EXPLAINEX(三日>0 ,'三:前 '+NUMTOSTR(ref(MA1,2),2)+' 昨 '+NUMTOSTR(ref(MA1,1),2)+' 今 ↑',MA1,2,0),COLORRED;
EXPLAINEX(三日<0 ,'三:前 '+NUMTOSTR(ref(MA1,2),2)+' 昨 '+NUMTOSTR(ref(MA1,1),2)+' 今 ↓',MA1,2,0),COLOR3300CC;
EXPLAINEX(五日>0 ,'五:前 '+NUMTOSTR(ref(MA2,2),2)+' 昨 '+NUMTOSTR(ref(MA2,1),2)+' 今 ↑',MA2,2,0),COLORFFFFFF;
EXPLAINEX(五日<0 ,'五:前 '+NUMTOSTR(ref(MA2,2),2)+' 昨 '+NUMTOSTR(ref(MA2,1),2)+' 今 ↓',MA2,2,0),COLORAAAAAA;
EXPLAINEX(十日>0 ,'十:前 '+NUMTOSTR(ref(MA3,2),2)+' 昨 '+NUMTOSTR(ref(MA3,1),2)+' 今 ↑',MA3,2,1),COLOR00FF00;
EXPLAINEX(十日<0 ,'十:前 '+NUMTOSTR(ref(MA3,2),2)+' 昨 '+NUMTOSTR(ref(MA3,1),2)+' 今 ↓',MA3,2,1),COLOR00AA00;


pt:=ref(h,1)-ref(l,1);
dp:=(ref(h,1)+ref(l,1)+ref(c,1)*2)/4;
ah:=dp+pt ,colorred,LINETHICK0;
nh:=dp*2-ref(l,1),colorff33ff,LINETHICK0;
cdp:=dp,colorbbbbbb,LINETHICK0;
nl:=dp*2-ref(h,1),colorcyan,LINETHICK0;
al:=dp-pt ,color00ff00,LINETHICK0;
EXPLAIN(1=1,'-------------------------'),COLORred;
EXPLAIN(1=1,'盘后预测 实时参考'),COLOR00ffff;
EXPLAINEX(1=1,'最高: ',ah,2,0)COLOR0000ff;
EXPLAINEX(1=1,'近高: ',nh,2,0)COLORff33ff;
EXPLAINEX(1=1,'中间价: ',cdp,2,0);
EXPLAINEX(1=1,'近低: ',nl,2,0)COLORffff00;
EXPLAINEX(1=1,'最低: ',al,2,0)COLOR00ff00;
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('',CURRENTTIME>180000 and (CXH=3 OR CXH=8));
EXPLAIN(1=1,'-------------------------'),COLORred;
[/code]

页: [1]