[FIX] Adapted the sam/bam module to new stream modul.

this seems slow to me. what about

```
for (size_t i = 0; i < length(record.seq); i+=2)
  writeValue(buffer, (MAP2[ordValue(record.seq[i])] << 4) | MAP2[ordValue(record.seq[i + 1])]);
if (length(record.seq) & 1 == 1)
  writeValue(buffer, MAP2[ordValue(back(record.seq))] << 4);
```
We have to look into this MAP2 array and if we really need it