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

龙听

1. input:n1(5,0,50),n2(13,0,100),n3(21,0,200),n4(30,0,300);
   
2. m1:MA(CLOSE,n1),;
   
3. m2:MA(CLOSE,n2),;
   
4. m3:MA(CLOSE,n3),;
   
5. m4:MA(CLOSE,n4),;
   
6. MA1:=MA(CLOSE,3),;
   
7. MA2:=MA(CLOSE,5),;
   
8. MA3:=MA(CLOSE,10),;
   
9. MS3:=ref(c,2);
   
10. MC3:=C-ref(c,2);
    
11. JC3:=(MA(c,3)-ref(MA(c,3),1))*3;
    
12. YS3:=C-(MA(c,3)-ref(MA(c,3),1))*3;
    
13. MS1:=ref(c,9);
    
14. MC1:=c-ref(c,9);
    
15. JC1:=(MA(c,10)-ref(MA(c,10),1))*10;
    
16. YS1:=C-(MA(c,10)-ref(MA(c,10),1))*10;
    
17. MS:ref(c,4),color00FF00,LINETHICK0;
    
18. MC:c-ref(c,4),coloR00FF00,LINETHICK0;
    
19. JC:(MA(c,5)-ref(MA(c,5),1))*5,colorffff00,LINETHICK0;
    
20. YS:C-(MA(c,5)-ref(MA(c,5),1))*5,colorffFFff,LINETHICK0;
    
21. DRAWNUMBER(BARSCOUNT(C)=SYSPARAM(1),c,ref(c,4),2),align4,color00ffff;{明收＝4天前的价}
    
22. DRAWNUMBER(BARSCOUNT(C)=SYSPARAM(1),c,c-ref(c,4),2),align3,color00ffff;//明日差值
    
23. DRAWNUMBER(BARSCOUNT(C)=SYSPARAM(1),c,c-(MA(c,5)-ref(MA(c,5),1))*5,2),align5,colorFFffff;//应收
    
24. DRAWTEXT(BARSCOUNT(C)=SYSPARAM(1),c,' ←明收'),ALIGN4,color00ffff;{要求明日达到的收盘价}
    
25. DRAWTEXT(BARSCOUNT(C)=SYSPARAM(1),c,' ←明差'),ALIGN3,color00ffff;
    
26. DRAWTEXT(BARSCOUNT(C)=SYSPARAM(1),c,' ←应收'),ALIGN5,colorffffff;
    
27. ZD:=C-ref(C,1); ZF:=C/ref(C,1)*100-100;
    
28. EXPLAINEX(1,'明日均线:(最新)'+NUMTOSTR(C,2)+' 幅:',ZF,2,0);
    
29. EXPLAINEX(1,'三:今 '+NUMTOSTR(YS3,2)+' 明 '+NUMTOSTR(MS3,2)+' 超 ',MC3/MS3*100,2,0),colorFFFFFF;//今
    
30. EXPLAINEX(1,'五:今 '+NUMTOSTR(YS,2)+' 明 '+NUMTOSTR(MS,2)+' 超 ',MC/MS*100,2,0),color00FFFF;
    
31. EXPLAINEX(1,'十:今 '+NUMTOSTR(YS1,2)+' 明 '+NUMTOSTR(MS1,2)+' 超 ',MC1/MS1*100,2,1),color00FF00;
    
32. 三日:=MA1-ref(MA1,1);五日:=MA2-ref(MA2,1);十日:=MA1-ref(MA3,1);
    
33. EXPLAINEX(三日>0 ,'三:前 '+NUMTOSTR(ref(MA1,2),2)+' 昨 '+NUMTOSTR(ref(MA1,1),2)+' 今 ↑',MA1,2,0),COLORRED;
    
34. EXPLAINEX(三日<0 ,'三:前 '+NUMTOSTR(ref(MA1,2),2)+' 昨 '+NUMTOSTR(ref(MA1,1),2)+' 今 ↓',MA1,2,0),COLOR3300CC;
    
35. EXPLAINEX(五日>0 ,'五:前 '+NUMTOSTR(ref(MA2,2),2)+' 昨 '+NUMTOSTR(ref(MA2,1),2)+' 今 ↑',MA2,2,0),COLORFFFFFF;
    
36. EXPLAINEX(五日<0 ,'五:前 '+NUMTOSTR(ref(MA2,2),2)+' 昨 '+NUMTOSTR(ref(MA2,1),2)+' 今 ↓',MA2,2,0),COLORAAAAAA;
    
37. EXPLAINEX(十日>0 ,'十:前 '+NUMTOSTR(ref(MA3,2),2)+' 昨 '+NUMTOSTR(ref(MA3,1),2)+' 今 ↑',MA3,2,1),COLOR00FF00;
    
38. EXPLAINEX(十日<0 ,'十:前 '+NUMTOSTR(ref(MA3,2),2)+' 昨 '+NUMTOSTR(ref(MA3,1),2)+' 今 ↓',MA3,2,1),COLOR00AA00;
    
39. 
    
40. 
    
41. pt:=ref(h,1)-ref(l,1);
    
42. dp:=(ref(h,1)+ref(l,1)+ref(c,1)*2)/4;
    
43. ah:=dp+pt ,colorred,LINETHICK0;
    
44. nh:=dp*2-ref(l,1),colorff33ff,LINETHICK0;
    
45. cdp:=dp,colorbbbbbb,LINETHICK0;
    
46. nl:=dp*2-ref(h,1),colorcyan,LINETHICK0;
    
47. al:=dp-pt ,color00ff00,LINETHICK0;
    
48. EXPLAIN(1=1,'-------------------------'),COLORred;
    
49. EXPLAIN(1=1,'盘后预测 实时参考'),COLOR00ffff;
    
50. EXPLAINEX(1=1,'最高： ',ah,2,0)COLOR0000ff;
    
51. EXPLAINEX(1=1,'近高： ',nh,2,0)COLORff33ff;
    
52. EXPLAINEX(1=1,'中间价： ',cdp,2,0);
    
53. EXPLAINEX(1=1,'近低： ',nl,2,0)COLORffff00;
    
54. EXPLAINEX(1=1,'最低： ',al,2,0)COLOR00ff00;
    
55. CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
    
56. WARNING('',CURRENTTIME>180000 and (CXH=3 OR CXH=8));
    
57. EXPLAIN(1=1,'-------------------------'),COLORred;

复制代码