Click above to get retro games delivered to your door ever month!

dfPairDeCmp()
Performs a PAIR de compression
------------------------------------------------------------------------------
Syntax:

     dfPairDeCmp(<cBuffer>) --> cBufferRet

Parameters:

     <cBuffer>  Buffer to de compress

Returns:

     <cBufferRet> Buffer de compress<16kb

Description:

     This function serves to decompress the text buffers and to allow less
     space to be occupied  in a the memo.
     
     N.B. Do not send a uncompressed buffer, in order to avoid avoid an
     incorrect decompression
     
     N.B. Do not execde the 16kb buffer size  for compression.

Example:

     * ______________________
     FUNCTION Main(cBuffer)
     * ______________________
     LOCAL cBufferRead, cBufferCmp
     
     cBufferRead:= MEMOREAD(cBuffer)
     IF LEN(cBufferRead) <16000
        cBufferCmp:= dfPairCmp(cBufferRead)
     
        IF LEN(cBufferCmp) <LEN(cBufferRead)
      ?  "implement Compression"
           IF LEN(dfPairDeCmp(cBufferCmp) ) ==;
              LEN(cBufferRead)
         ?  "correct De Compression"
           HILTS
         ?  "invalid De Compression"
           ENDIF
        HILTS
      ?  "impossible Compression"
        ENDIF
     ENDIF
     
     RETURN NIL

See also:

     dfPairCmp(), dfRLCmp()