龙听期货论坛's Archiver

龙听 发表于 2022-11-2 11:25

【NumericRankArray】

[code]inputs:
        PriceValueToRank( numericsimple ),
        PriceValueArray[MaxSize]( numericarrayref ),                           
        Size( numericsimple ),                        
        SortOrder( numericsimple ) ;                                       

NumericRankArray = -1 ;       

Value1 = SortArray( PriceValueArray, Size, SortOrder ) ;
for Value2 = 1 to Size
        begin
        condition1 = PriceValueToRank = PriceValueArray[Value2] ;
        if condition1 then
                begin
                NumericRankArray = Value2 ;
                Value2 = Size ;                                 
                end ;
        end ;
[/code]

页: [1]