请教公式编写

发如雪

请问怎样编写在每周或每月最后一天了画竖线公式，还有在每周或每月最后一天收盘价位置向后画横线？最好是只显示最后一周或最后一月的，万分感谢！！！

易得君1号

1. // 月竖
   
2. nM := IntPart(BelongDate/100);
   
3. VertLine(nM != refx(nM, 1), 0), ColorGray;
   
4. 
   
5. // 周竖
   
6. nW := WeekOfYear;
   
7. VertLine(nW != refx(nW, 1), 0), ColorBrown;
   
8. 
   
9. // 最后月横
   
10. HoriLine(nM != refx(nM, 1), c, IsLastBar), ColorRed;
    
11. 
    
12. // 最后周横
    
13. HoriLine(nW != refx(nW, 1), c, IsLastBar), ColorBlue;
    
14. 
    

复制代码

易得君1号

易得君1号 发表于 2022-7-20 18:06

1. // 月竖
   
2. nM := IntPart(BelongDate/100);
   
3. VertLine(nM != refx(nM, 1), 0), ColorGray;
   
4. 
   
5. // 周竖
   
6. nW := WeekOfYear;
   
7. VertLine(nW != refx(nW, 1), 0), ColorBrown;
   
8. 
   
9. // 最后月横
   
10. HM := const(HHV(nM, 0));
    
11. DrawLine(HM = refx(nM, 1) && nM != refx(nM, 1) , c, 1, ref(c,1), 1), ColorRed;;
    
12. 
    
13. // 最后周横
    
14. nWW := IntPart(BelongDate/10000)*100 + nW;
    
15. HW := const(HHV(nWW, 0));
    
16. DrawLine(HW = refx(nWW, 1) && nWW != refx(nWW, 1) , c, 1, ref(c,1), 1), ColorBlue;
    

复制代码

这样貌似效果更好。

发如雪

多谢多谢！！！厉害