【_Single 1dir Rnge En】

1. inputs:
   
2.         LongOrShort( 1 ),                                       
   
3.         DayOrGTF( 1 ),                                                   
   
4.         RangeHi( 105 ),
   
5.         RangeLo( 95 ),
   
6.         Quantity( 1000 ),
   
7.         EffectiveBarDate_YYMMDD( 030102 ),                                             
   
8.                            
   
9.         EffectiveBarTime_HHMM( 1300 ) ;                                             
   
10.                                                                                      
    
11.                                  
    
12. 
    
13. variables:
    
14.         var0( iff( EffectiveBarDate_YYMMDD < 500000, EffectiveBarDate_YYMMDD
    
15.          + 1000000, EffectiveBarDate_YYMMDD ) ),
    
16.         var1( false ),
    
17.         var2( false ),
    
18.         var3( false ),
    
19.         var4( false ) ;
    
20. 
    
21. var1 = Date next bar = var0 and ( BarType = 2 or
    
22. ( BarType = 1 and Time next bar >= EffectiveBarTime_HHMM ) ) ;
    
23. var2 = Date next bar > var0 ;
    
24. 
    
25. if DayOrGTF = 1 then
    
26.         var3 = var1
    
27. else
    
28.         var3 = var1 or var2 ;
    
29. 
    
30. if var3 then
    
31.         begin
    
32.         condition1 = var4 = false
    
33.                 and var3[1]
    
34.                 and ( High >= RangeHi or Low <= RangeLo ) ;
    
35. 
    
36.         if condition1
    
37.         then
    
38.                 var4 = true ;
    
39. 
    
40.         if var4 = false then
    
41.                 if LongOrShort = 1 then
    
42.                         begin
    
43.                         Buy Quantity shares next bar at RangeHi stop ;
    
44.                         Buy Quantity shares next bar at RangeLo limit ;
    
45.                         end
    
46.                 else
    
47.                         begin
    
48.                         Sell Short Quantity shares next bar at RangeLo stop ;
    
49.                         Sell Short Quantity shares next bar at RangeHi limit ;
    
50.                         end ;
    
51.         end ;

复制代码