# checksum8, checksum8file

8bit checksumを計算する。(バージョン4.78以降)

    checksum8 <intvar> <string>
    checksum8file <intvar> <filename>

## 解説

引数の文字列およびファイルから加算サム(8bit)を計算する。
計算結果は intvar 変数に数値として格納される。
checksum8file でファイルが開けなかった場合は、システム変数 result に -1 が格納される。

## 例

    str = 'this is a test string to be checksum8ed'
    checksum8 crc str

    ; Display checksum8 result asHEX
    sprintf '0x%08X' crc
    messagebox inputstr 'checksum8 = '

    checksum8file crc 'foo.bin'
    if result = -1 then
        messagebox 'file open error' 'checksum8file = '
    else
        sprintf '0x%08X' crc
        messagebox inputstr 'checksum8file = '
    endif