alias binaryhashtest {
bread versions.txt 0 $file(versions.txt).size &input
echo -at * Read $bvar(&input,0) characters to &input
hfree -w test
hmake test
hadd -b test item &input
echo -at * item appears to be $len($hget(test,item)) characters long
echo -at * Got $hget(test,item,&output) characters from item and set it to &output
hfree -w test
editbox -a Echoing &output binary variable's content (Press CTRL+Break to stop)
var %x = 1
while ($bfind(&output,%x,$crlf).text) { echo -at * $bvar(&output,%x,$calc($v1 -%x)).text | var %x = $v1 + 4 }
editbox -a
}
