标题: 【RecentOcc】 [打印本页]

---

作者: 龙听    时间: 2022-11-2 11:54     标题: 【RecentOcc】

1. inputs:
   
2.         Test( truefalseseries ),
   
3.         Len( numericsimple ),
   
4.         Instance( numericsimple ),                           
   
5.         MLFlag( numericsimple ) ;                                                   
   
6. 
   
7. variables:
   
8.         var0( 0 ),
   
9.         var1( 0 ) ;
   
10. 
    
11. if MLFlag = 1 then
    
12.         var0 = 0
    
13. else if MLFlag = -1 then
    
14.         var0 = Len - 1 ;
    
15. 
    
16. var1 = 0 ;
    
17. 
    
18. while var0 >= 0 and var0 < Len and var1 < Instance
    
19.         begin
    
20.         if Test[var0] then
    
21.                 var1 = var1 + 1 ;
    
22.         var0 = var0 + MLFlag ;
    
23.         end ;
    
24. 
    
25. condition1 = var1 = Instance and Instance > 0 ;
    
26. if condition1 then
    
27.         RecentOcc = var0 - MLFlag + ExecOffset
    
28. else
    
29.         RecentOcc = -1 ;

复制代码

---

欢迎光临 龙听期货论坛 (http://www.qhlt.cn/)

Powered by Discuz! 7.2