Scripts for reading and writing binary files

[Paul Dupuis]

Of course, now if you use these scripts, you should replace 'char' with
'byte' for the eventual day the two are no longer synonymous.

On 12/16/2011 8:03 AM, Alejandro Tejada wrote:
> Hi all,
>
> Recently, I had to test and modify some binary files,
> so digging in my own stacks,  I found these scripts:
>
> [WARNING: The script on step 3, OVERWRITE the
> original file. If you do not want this, simply
> change the path and/or name of the file]
>
> 1) create a field to hold the converted
> binary to hexadecimal data.
> Set the name of this field to: "tHex"
>
> 2) Create a button named "Import" to hold
> the following script:
> ----------------------------------------------------
> global tFile
>
> on mouseUp
>   answer file "select"
>   if it is not empty then
>     put "binfile:"&it into tFile
>       put url tFile into tData
>       -- convert binary data to Hexadecimal
>       repeat for each char n in tData
>         put chartonum(n) into nft
>         put baseconvert(nft,10,16) into kjh
>         if the number of chars of kjh < 2 then put "0" before kjh
>         put kjh & space after cdf
>       end repeat
>       put cdf into fld "tHex"
> end mouseUp
> -----------------------------------------------------
> Now, you have the field "tHex" with Hexadecimal numbers,
> like these:
>
> 46 57 53 03 4F 00 00 00 78 00 05 5F 00 00 0F A0
> 00 00 0C 01 00 43 02 FF FF FF BF 00 23 00 00 00
> 01 00 70 FB 49 97 0D 0C 7D 50 00 01 14 00 00 00
> 00 01 25 C9 92 0D 21 ED 48 87 65 30 3B 6D E1 D8
> B4 00 00 86 06 06 01 00 01 00 00 40 00 00 00
>
> After you make all the modifications to
> the file (using hexadecimal), save it
> back as a binary file:
>
> 3) Create a button named "Export"
> and paste this script:
>
> ------------------------------------------------------
> global tFile
>
> on mouseUp
> put fld "tHex" into tData
>
> repeat for each word n in tData
> put numtochar(baseconvert(n,16,10)) after tBinary
> end repeat
>
> put tBinary into url tFile
> end mouseUp
> ------------------------------------------------------
>
> Thanks in advance for your
> opinions and comments!
>
> Al
>
> --
> View this message in context: http://runtime-revolution.278305.n4.nabble.com/Scripts-for-reading-and-writing-binary-files-tp4204548p4204548.html
> Sent from the Revolution - User mailing list archive at Nabble.com.
>
> _______________________________________________
> use-livecode mailing list
> use-livecode at lists.runrev.com
> Please visit this url to subscribe, unsubscribe and manage your subscription preferences:
> http://lists.runrev.com/mailman/listinfo/use-livecode
>

-- 
Paul Dupuis
Cofounder
Researchware, Inc.
http://www.researchware.com/
http://www.twitter.com/researchware
http://www.facebook.com/researchware
http://www.linkedin.com/company/researchware-inc