to make I work
the input array needs its bit order endianness reversed then the result needs the same treatment
which defeats any gain


Code:
    for d=0 to 14
    inbuff[d]= inbuff[d] rev 8
    next



 outpointer = 0
 while outpointer < 10
 inpointer = outpointer*12
 d=0
 while d<12
 dataword.0((outpointer * 16) + d) = inbuff.0(d + inpointer)
 d=d+1
 wend
 dataword[outpointer]=dataword[outpointer] rev 12
 outpointer= outpointer + 1
 wend