s as string : o as string
s = "00110000001011110001111101001111010100010100100001001101010100110001111100100001010000010110100001101101011000000111000101111000000111110110110101100100011101010110010001110001001010110001111101000011010000010001111101100101011011100111000101100100011101010110010001110001001000000001111100100001001110100001111100011111001110010001111101000110010011100101001101001110000111110011000000101111"
i as integer : a as integer
if file exist("out.dba") then delete file "out.dba"
open to write 1,"out.dba"
write string 1,"open to write 1,"+chr$(34)+"out.txt"+chr$(34)
a = -1
for i = 0 to (len(s))
if a < 8 then o = o + mid$(s,i) : inc a
if a = 8 then write string 1,"write byte 1,%"+o : a = 0 : o = ""
next i
write string 1,"close file 1"
close file 1
That code sould leave you with a out.dba file.
Compile and run the out.dba file and out.txt will be the file you need to run.
For some reason it doesn't work, is it my code or a problem with the code tag messing up the data. Proberly my code
p166mmx @ 233 : 256mb : sb 128pci : sis onboard