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

dfRLDeCmp()
Make an RLE DeCompression
------------------------------------------------------------------------------
Syntax:

     dfRLDeCmp( <cBuffer> ) --> cBufferRet

Parameters:

     <cBuffer>  Buffer to decompres

Returns:

     <cBufferRet>  Buffer decompres <16kb

Description:

     This function is usefull to decompres some TXT buffer
     
     N.B. NEVER use buffer not compressed for an incorrect decompression
     
     N.B. NEVER use buffer>16kb

Example:

     * ######################
     FUNCTION Main( cBuffer )
     * ######################
     LOCAL cBufferRead, cBufferCmp
     
     cBufferRead := MEMOREAD( cBuffer )
     IF LEN(cBufferRead)<16000
        cBufferCmp  := dfRLCmp( cBufferRead )
     
        IF LEN(cBufferCmp) < LEN(cBufferRead)
           ? "OK"
           IF LEN(dfRLDeCmp(cBufferCmp))==LEN(cBufferRead)
              ? "OK"
           ELSE
              ? "Error"
           ENDIF
        ELSE
           ? "Compression impossible"
        ENDIF
     ENDIF
     
     RETURN NIL

See also:

     dfRLCmp()